prog7_11.asm

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

wwidth=40
wleft1=10
wleft2=20
wright1=20
wright2=wleft2+wwidth-1
corl=70h
cr=0dh
lf=0ah
stack  segment stack
       dw  100 dup(?)
stack  ends
data  segment
string  db 'the example of interrupt 10h'
leng    equ $-string
data  ends
code  segment
      assume  cs:code,ds:data,ss:stack
main  proc far
      mov  ax,data
      mov  ds,ax
      mov  ah,0
      mov  al,3
      int  10h
      mov  ah,6
      mov  al,0
      mov  bh,1fh
      mov  cx,0
      mov  dx,184fh
      int  10h
      mov  ah,6
      mov  al,0
      mov  bh,corl
      mov  ch,wleft1
      mov  cl,wleft2
      mov  dh,wright1
      mov  dl,wright2
      int  10h
      mov  ah,2
      mov  bh,0
      mov  dh,wright1
      mov  dl,wleft2
      int  10h
      mov  ah,9
      mov  al,'*'
      mov  bh,0
      mov  bl,0eh
      mov  cx,1
      int  10h
      mov  ah,0eh
      mov  al,cr
      int  10h
      mov  ah,0eh
      mov  al,lf
      int  10h
      mov  ah,3
      mov  bh,0
      int  10h
      cmp  dh,wright1+1
      jne  l1
      mov  ah,6
      mov  al,1
      mov  bh,corl
      mov  ch,wleft1
      mov  cl,wleft2
      mov  dh,wright1
      mov  dl,wright2
      int  10h
      mov  ah,2
      mov  bh,0
      mov  dh,wright1
      mov  dl,wleft2
      int  10h
 l1:  mov  ah,9
      mov  al,string
      mov  bh,0
      mov  bl,4fh
      mov  cx,1
      int  10h
      mov  ah,0
      int  16h
      mov  ah,13h
      mov  al,1
      mov  bh,0
      mov  bl,corl
      mov  dh,wright1
      mov  dl,wleft2+1
      lea  bp,string+1
      int  10h
      mov  ah,0
      int 16h
      mov  ah,4ch
      int  21h
main  endp
code  ends
      end  main