3-18.asm

华工电信系汇编习题的编程实现

stack segment stack 'stack'
      dw 32 dup(?)
stack ends

data segment 
     Num1 dd 01020304H
     Num2 dd 05060708H
     OutBuf db 5 dup(?),'$'

data ends

code segment 
begin proc far
      assume ss:stack,cs:code,ds:data
      push ds
      sub ax,ax
      push ax
      mov ax,data
      mov ds,ax
;
      mov SI,offset Num1
      mov bx,offset Num2
      mov cx,4
      mov ax,0
      mov dl,0
AGAIN:
      mov ah,0
      mov al,[SI]
      add al,dl
      add al,[bx]
      aaa
      mov DI,cx
      add al,30H
      mov OutBuf[DI],al 
      mov dl,ah
      
      INC bx
      INC SI           
      loop AGAIN
      
      add ah,30H
      mov OutBuf,ah
      sub ah,30H
      and ah,ah
      
      mov dx,0
      JNZ MYEND
            
      add dx,1
MYEND:
      add dx,offset OutBuf
      mov ah,9
      int 21h
                
      ret
begin   endp
code    ends
      end begin

;输出:6912   结果正确