exa111.asm

掌握汇编源程序的编辑、汇编、链接和执行的全过程；修改一个有错误的源程序；

       ;filename:exa111.asm
       .486
data segment  use16
sum    db  ?,?
mesg   db  '25+9='
       db   0,0,'$'
n1     db   9,0f0h
n2     db   25
data   ends

code   segment  use16
       assume cs:code,ds:data
beg:   mov   ax,data
       mov   ds,ax
       mov   bx,offset sum
       mov   ah,n1
       mov   al,n2
       add   ah,al 
       mov   [bx],ah
       call  chang
       mov   ah,9
       mov   dx,offset mesg
       int   21h
       mov   ah,4ch
       int   21h

chang  proc
last:  cmp  byte ptr [bx],10
       jc    next
       sub  byte ptr [bx],10
       inc  byte ptr [bx+7]
       jmp   last
next:  mov   al,[bx]
       mov   [bx+8],al
       add   byte ptr [bx+7],30h
       add   byte ptr [bx+8],30h
       ret
chang  endp

code   ends
       end   beg