511.asm

来自「汇编语言课后习题答案」· 汇编 代码 · 共 55 行

;511.asm

        .model  small
        .stack  100h
        .data
max     db  80
act     db  ?
char    db  80 dup(?)
        .code
main    proc  far
start:
        mov  ax,@data
        mov  ds,ax
start1: lea  dx,max
        mov  ah,0ah
        int  21h
        mov  dl,0dh
        mov  ah,2
        int  21h
        mov  dl,0ah
        mov  ah,2
        int  21h
        mov  cl,act
        mov  si,0
        mov  bx,0
        cmp  cl,0
loop1:  jz   next2
        cmp  char[si],30h
        jl   next
        cmp  char[si],39h
        jg   next
        jmp  short  next1
next:   inc  bx
next1:  inc  si
        dec  cl
        jmp  short loop1
next2:  mov  ch,4
loop2:  mov  cl,4
        rol  bx,cl
        mov  al,bl
        and  al,0fh
        add  al,30h
        cmp  al,3ah
        jl   printit
        add  al,07h
printit:mov  dl,al
        mov  ah,2
        int  21h
        dec  ch
        jnz  loop2
        mov  ax,4c00h
        int  21h
main    endp
        end  start