fx.asm

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

DATA    SEGMENT
MSG1    DB "Input data: $"
MSG2    DB "The result: $"
ARRE    DB 10 DUP(?)
DATA    ENDS
;-------------------------------------------------
STACK   SEGMENT
        DB 100 DUP(?)
STACK   ENDS
;-------------------------------------------------
CODE    SEGMENT
        ASSUME CS:CODE,DS:DATA,SS:STACK,ES:DATA
MAIN    PROC FAR

START:  MOV AX,DATA
        MOV DS,AX
        MOV ES,AX
        MOV AX,STACK
        MOV SS,AX
;--------------------------------------------------
        MOV DX,OFFSET MSG1
        MOV AH,09
        INT 21H
        MOV SI,0
        MOV CX,10

INPUT:  MOV AH,01H
        INT 21H
        MOV ARRE[SI],AL
        INC SI
        DEC CX
        JNZ INPUT
;---------------------------------------------------
        CALL CRLF
        CALL CRLF

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

        MOV SI,9
        MOV CX,10

OUTPUT: MOV DL,ARRE[SI]
        MOV AH,02H
        INT 21H
        DEC SI
        DEC CX
        JNZ OUTPUT
;---------------------------------------------------
        CALL CRLF
        MOV AH,4CH
        INT 21H

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