十进制ASCII码转换为BCD码
要求：输入十进制ASCII存于3500H起单元，转为BCD后再存于350AH起内存，若输入非十进制ASCII则结果存为“FF
STACK SEGMENT STACK
DW 64 DUP(?)
STACK ENDS
DATA SEGMENT
ORG 3500H
DATA1 DB 5 DUP(?)
ORG 350AH
DATA2 DB 5 DUP(?)
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START: MOV AX,DATA
MOV DS,AX
LEA SI,DATA1
LEA DI,DATA2
MOV CX,0005H
MOV AH,00H
A1:MOV AL,[SI]
MOV BL,0FFH
CMP AL,3AH
JNB A2
CMP AL,30H
JB A2
SUB AL,30H
MOV BL,AL
A2:MOV AL,BL
MOV [DI],AL
INC SI
INC DI
LOOP A1
INT 03H
CODE ENDS
END START
评论0