70,038
社区成员
发帖
与我相关
我的任务
分享?PR?_HEX_BCD?HEX_BCD SEGMENT CODE
PUBLIC _HEX_BCD
RSEG ?PR?_HEX_BCD?HEX_BCD
_HEX_BCD:
CLR A ;BCD码初始化
MOV R3,A
MOV R4,A
MOV R5,A
MOV R2,#10H ;转换双字节十六进制整数
HB3:
MOV A,R7 ;从高端移出待转换数的一位到CY中
RLC A
MOV R7,A
MOV A,R6
RLC A
MOV R6,A
MOV A,R3 ;BCD码带进位自身相加,相当于乘2
ADDC A,R3
DA A ;十进制调整
MOV R3,A
MOV A,R4
ADDC A,R4
DA A
MOV R4,A
MOV A,R5
ADDC A,R5
MOV R5,A ;双字节十六进制数的万位数不超过6,不用调整
DJNZ R2,HB3 ;处理完16bit
mov a,r3
mov r7,a
mov a,r4
mov r6,a
mov r4,#0
RET
end