四位十六进制输入，以十进制输出

DATA SEGMENT
BUF DB 5
    DB ?
    DB 5 DUP(?)
MINUS DW 10
STORE DB 6 DUP(0)
PRINT DB 10,13
STORE2 DB 5 DUP(0),10,13,'$'

BIN DW ?
DATA ENDS

CODE SEGMENT
        ASSUME CS:CODE,ES:DATA,DS:DATA
MAIN PROC FAR
        MOV AX,DATA
        MOV ES,AX
        MOV DS,AX

    CALL INPUT
CALL CHANGE
CALL OUTPUT

        MOV AX,4C00H
        INT 21H
MAIN ENDP

INPUT PROC ; 输入程序
       LEA DX,BUF  ;DX 为地址
       MOV AH,0AH