disp.asm

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

DATA    SEGMENT
DAT     DB 34H,4FH,0A8H
SHOW1   DB 'The data is: 34H,4FH,A8H  $'   
SHOW2   DB 'Output Result : $'
CHR     DB 'H,$'
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

        CALL CRLF
        MOV DX,OFFSET SHOW2
        MOV AH,09H
        INT 21H
        
        MOV CX,3
        MOV SI,OFFSET DAT
AGAIN:  MOV DL,[SI]
        PUSH DX
        AND DL,0F0H
        PUSH CX
        MOV CL,4
        SHR DL,CL
        CALL SHOW
        POP CX
        POP DX
        AND DL,0FH
        CALL SHOW

        MOV DX,OFFSET CHR
        MOV AH,09H
        INT 21H

        INC SI
        LOOP AGAIN

        CALL CRLF
        RET
MAIN    ENDP
;-----------------------------------
SHOW    PROC NEAR
        CMP DL,0AH
        JB NUM
        ADD DL,07H
NUM:    ADD DL,30H
        MOV AH,02H
        INT 21H
        RET
SHOW    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