3_1_4.asm

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

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

data segment 
     B1 db 12H
     B2 db 34H
     B3 db 21H
     B4 db 20H
     B5 db 11H
     W  dw ?
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 al,B1  ;ax 1471
      add al,B2  ;ax 1412
      sub al,B3  ;ax 1446
      mov ah,00H ;ax 1425
      div B4     ;ax 0025
      mul B5     ;ax 0501
      mov bx,0002H ;ax 0011
      mul bx      ;ax 0011,bx 0002
      mov W,ax    ;ax 0022 
              
      ret
                        ;result right
begin   endp
code    ends
      end begin