輸入一個帶符號的十進位數字串，以四位十六進位的形式輸出該串對應的值

DATA SEGMENT
BUF1 DB  20
    DB   ?
    DB 20 DUP(?)
BUF2 DB  20
    DB   ?
    DB 20 DUP(?)
INPUT DB '記得帶符號啊親，Input:$'
OUTPUT DB 'Output:$'
CTRL DB 0DH,0AH,'$'
SHI DW 0AH         ;不能是DB,用DW，要用字乘法
FUHAO DB ?          ;儲存符號
Iint  DW 0
DATA ENDS

STACK SEGMENT
      DB 200 DUP(0)
STACK ENDS

CODE SEGMENT
 ASSUME CS:CODE,DS:DATA,SS:STACK
 
START:
MOV AX,DATA
MOV DS,AX
;輸出提示符‘Input:’
LEA DX,INPUT
MOV AH,9
INT 21H
;輸入數值
LEA DX,BUF1
MOV AH,10
INT 21H
;輸出斷行符號換行
LEA DX,CTRL
MOV AH,9
INT 21H
;把ASCII碼化成十進位

MOV CL,BUF1+1    ;擷取字元個數
LEA SI,BUF1+2     ;首地址
MOV AL,[SI]
MOV [FUHAO],AL
;轉化好的存在Iint中
;因為MUL DL,所以單獨處理第一個字元
INC SI   ;從第一個非符號開始
DEC CL   ;這一步別忘了啊
MOV BX,0
MOV Dl,[SI]
MOV DH,0
MOV AX,DX
SUB Al,30H
DEC CL
INC SI
NEXT:
;MOV DL,10   ;用這兩行的話，如果是字乘法，那麼結果存在DX,AX中，所以導致轉化成的16進位為4位時，AX的高位元組一部分在DL中，所以老是出錯
;MUL 10    
MUL [SHI]  
ADD AH,DL
MOV DL,[SI]
MOV BL,DL
SUB BL,30H
ADD AX,BX
DEC CL
INC SI
CMP CL,0
JNE NEXT
MOV [Iint],AX

CMP [FUHAO],02BH   ;符號為正
JE ZHENG
;符號位負
MOV BX,0FFFFH
SUB BX,[Iint]
ADD BX,01H
MOV [Iint],BX
ZHENG:
;把十進位轉化為十六進位
MOV CL,0  ;記錄有多少個資料入棧
MOV AX,[Iint]
MOV DX,0
TO:
MOV BX,16
DIV BX    ;AX/(OPS)==>AL,AH
MOV BX,AX ;儲存商，用於輾轉相除
PUSH DX      ;把餘數入棧，所以要把商賦為0
INC CL
MOV AX,BX   ;還原商，用於輾轉相除
MOV DX,0    ;消除上次的餘數
CMP AX,0
JNE TO

;處理位元
MOV BL,4
SUB BL,CL
MOV CL,BL
CMP CL,0
JBE AAAA    ;小於等於0，則說明已經有4位了
BU0:
MOV AX,0H
PUSH AX
DEC CL
CMP CL,0
JNE BU0

AAAA:
;出棧
MOV SI,0
MOV CL,0
OUTSTACK:
POP AX
CMP AL,9   ;把16進位轉化成ascii
JA DAYU9
ADD AL,30H
JMP XIAOYU9
DAYU9:
ADD AL,37H
XIAOYU9:
MOV [SI][BUF2],AL
INC SI
INC CL
CMP CL,4
JNE OUTSTACK
MOV [SI][BUF2],'H'
;輸出提示提示符
LEA DX,OUTPUT
MOV AH,9
INT 21H

;輸出數值
LEA SI,BUF2
MOV CL,5
PRINT:
MOV DX,[SI]
MOV AH,2
INT 21H
INC SI
DEC CL
JNZ PRINT

MOV AH,4CH
INT 21H
CODE ENDS
END START