chp3_27.asm

关于8086汇编的一些作业程序

stack segment stack'stack'
      dw 32 dup(?)
stack ends
data segment
N DB 3,0,3 DUP(?)
OBF DB 7 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 DX,OFFSET N
      MOV AH,10
      INT 21H
      MOV AL,N+2
      AND AX,0FH
      CMP N+1,2
      JNE ONE
      MOV AH,AL
      MOV AL,N+3
      AND AL,0FH
      AAD
ONE:  MOV CX,AX
      CALL SUM
      MOV BX,6
      MOV OBF[BX],'$'
      MOV CX,4
AGAIN:MOV DL,0FH
      AND DL,AL
      ADD DL,30H
      DEC BX
      MOV OBF[BX],DL
      SHR AX,CL
      AND AX,AX
      JNZ AGAIN
      DEC BX
      MOV BYTE PTR [BX],0AH
      MOV DX,BX
      MOV AH,9
      INT 21H
      ret
begin endp
SUM PROC
      MOV AX,0
      MOV DL,2
LOP:  ADD AL,DL
      DAA
      XCHG AH,AL
      ADC AL,0
      DAA
      XCHG AH,AL
      XCHG AL,DL
      ADD AL,2
      DAA
      XCHG AL,DL
      LOOP LOP
      RET
SUM ENDP
code ends
      end begin