求分析汇编语言,输入16进制转化为10进制显示。流程图该怎么画
DATAS SEGMENT
STRING db 0dh,0ah,'INPUT 4 HEX NUMBERS:$'
NUM DB 5
DB ?
DB 5 DUP(?)
DATAS ENDS
STACKS SEGMENT
db 200 dup(0)
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
LEA dx,STRING
MOV AX,9
INT 21H
lea dx,num
mov ax,10
int 21h
lea SI,NUM
MOV CL,[NUM+1]
N2: MOV AH,0
MOV NUM,CL
MOV AL,[NUM+2]
CMP AL,'A'
JB N1
SUB AL,07H
N1: SUB AL,30H
CMP NUM,0
JZ TEN
INC NUM
DEC NUM
MOV CL,NUM
N3: CMP NUM,0
JZ N4
MOV DX,16
MUL DX
DEC NUM
JMP N3
N4: ADD BX,AX
JMP N2
TEN:MOV AX,BX
MOV DX,0
MOV CX,10000
DIV CX
CALL PLAY
MOV CX,1000
DIV CX
CALL PLAY
MOV CX,100
DIV CX
CALL PLAY
MOV CX,10
DIV CX
CALL PLAY
CALL PLAY
MOV AH,4CH
INT 21H
PLAY PROC NEAR
XCHG AX,DX
PUSH AX
ADD DL,30H
MOV AH,02H
INT 21H
POP AX
MOV DX,0
RET
PLAY ENDP
CODES ENDS
END START