prog8_9.asm

汇编语言-王爽 源代码 加 卜艳萍版源代码

stack  segment stack
       dw  100 dup(0)
stack  ends
data  segment
      count  dw  91
data  ends
code  segment
      assume  cs:code,ds:data,ss:stack
main proc  far
      mov  ax,data
      mov  ds,ax
      mov  ah,35h
      mov  al,1ch
      int  21h
      push  es
      push  bx
      push  ds
      mov  dx,seg int1ch
      mov  ds,dx
      lea  dx,int1ch
      mov  ah,25h
      mov  al,1ch
      int  21h
      pop  ds
      in  al,21h
      and  al,0fch
      out  21h,al
      sti
      mov  ah,6
      mov  al,0
      mov  bh,1fh
      mov  cx,0
      mov  dx,184fh
      int  10h
      mov  al,40h
print0:push  ax
      mov  ah,1
      int  21h
      or  al,20h
      cmp  al,'q'
      pop  ax
      je  exit0
      inc  al
      cmp  al,'z'
      jna  gonext
      mov  al,41h
gonext:mov  dx,0002h
      mov  bh,0
print10:inc  dh
      cmp  dh,24
      ja  print0
      add  dl,3
      mov  ah,2
      int  10h
      mov ah,9
      mov  bl,1fh
      mov  cx,1
      int  10h
      jmp  print10
exit0:pop  dx
      pop  ds
      mov  ah,25h
      mov  al,1ch
      int  21h
      mov  ah,4ch
      int  21h
main  endp
int1ch  proc far
        push  ax
        push  bx
        push  cx
        push  dx
        push  si
        push  di
        push  bp
        push  ds
        push  es
        sti
        mov  ax,data
        mov  ds,ax
        dec  count
        jnz  exit
        mov  ah,2
        mov  bh,0
        mov  dl,79
        int  10h
        mov  ah,0eh
        mov  bh,0
        mov  al,'V'
        int  10h
        mov  count,91
   exit:cli
        pop  es
        pop  ds
        pop  bp
        pop  di
        pop  si
        pop  dx
        pop  cx
        pop  bx
        pop  ax
        iret
        int1ch  endp
  code  ends
        end  main