exp61.asm

来自「汇编语言 参考书 包含作业与答案 从入门到精通 通俗易懂」· 汇编 代码 · 共 46 行

STACK   SEGMENT PARA STACK
S_AREA  DW      100H DUP(?)
S_TOP   EQU     $-S_AREA
STACK   ENDS

DATA    SEGMENT PARA
VALUE   DW      1101100111100110B        ;D9E6H
DATA    ENDS

CODE    SEGMENT PARA
        ASSUME  CS:CODE,DS:DATA,SS:STACK

MAIN    PROC    FAR
        MOV     AX,STACK
        MOV     SS,AX
        MOV     SP,S_TOP
        MOV     AX,DATA
        MOV     DS,AX

        MOV     BX,VALUE
        MOV     CX,4

LP1:    PUSH    CX
        MOV     CL,4
        ROL     BX,CL
        MOV     AL,BL
        AND     AL,0FH
        ADD     AL,30H
        CMP     AL,39H
        JBE     DISP
        ADD     AL,'A'-'9'-1

DISP:   MOV     DL,AL
        MOV     AH,2
        INT     21H
        POP     CX
        LOOP    LP1

EXIT:   MOV     AX,4C00H
        INT     21H
MAIN    ENDP
CODE    ENDS
        END     MAIN