tmul.asm

fx.asm 反序输出 cpc.asm 人机对话 DECHEX.ASM 十进制到十六进制转换 PX.ASN 排序 DISP.ASM 显示非组合BCD码 COUNTA.ASM 统计字符A

DATA    SEGMENT
SHOW1   DB 'Input number 1: $'   
SHOW2   DB 'Input number 2: $'    
SHOW3   DB 'The Result is: $'
DATA    ENDS
;------------------------------------
STACK   SEGMENT PARA STACK 'STACK'
        DB 100 DUP( ? )
STACK   ENDS
;------------------------------------
CODE    SEGMENT
        ASSUME CS:CODE,DS:DATA,SS:STACK
MAIN    PROC FAR
START:  PUSH DS
        MOV AX,0
        PUSH AX
        MOV AX,DATA
        MOV DS,AX
;----------------------------------------
        CALL CRLF
        MOV DX,OFFSET SHOW1
        MOV AH,09H
        INT 21H

        MOV AH,01H
        INT 21H
        SUB AL,30H
        MOV DL,AL

        PUSH DX

        CALL CRLF
        MOV DX,OFFSET SHOW2
        MOV AH,09H
        INT 21H

        MOV AH,01H
        INT 21H
        SUB AL,30H
        POP DX
        MUL DL
        AAM
        
        PUSH AX

        CALL CRLF
        MOV DX,OFFSET SHOW3
        MOV AH,09H
        INT 21H
        
        POP AX
        PUSH AX

        MOV DL,AH
        ADD DL,30H
        MOV AH,02H
        INT 21H

        POP AX
        ADD AL,30H
        MOV DL,AL
        MOV AH,02H
        INT 21H
        
        RET
MAIN    ENDP        
;-----------------------------------
CRLF    PROC NEAR
        MOV DL,0AH
        MOV AH,02H
        INT 21H
        MOV DL,0DH
        MOV AH,02H
        INT 21H
        RET
CRLF    ENDP
;------------------------------------
CODE    ENDS
        END START