四位16進制轉換成5位十進制源程序

;****************************************************
;十六進制轉換為十進制的程序
;四位16進制轉換成5位十進制子程序,
;R2,R3是保存的十六進制值
;其中入口R2為低位,R3為高位
;R4(十位,個位)R5(千位,百位)R6(萬位) 為高位
;****************************************************

ORG 100H
HBCD:
;調試過程中方便R2,R3移出位的變化情況
BITST DATA 20H
R2BIT BIT BITST.0
R3BIT BIT BITST.1

MOV R2,#023H;11011110
MOV R3,#0C2H;11000010
CLR A
NOP
MOV R4,A
MOV R5,A
MOV R6,A

MOV R7,#10H ;設置循環指針
HBCD1:
;左移一位,移入C
CLR R2BIT
CLR C ;(清位累加累C)
MOV A,R2 ;將低位數據R2送入A
RLC A
MOV R2,A
MOV R2BIT,C


CLR R3BIT
MOV A,R3 ;將高位數據R3送入A
RLC A
MOV R3,A
MOV R3BIT,C

;每循環一下相當于乘2
;最高位相當于乘2的15次方
;次最高位相當于乘2的14次方
;。。。。。。。。。。。。。
MOV A,R4
ADDC A,R4
DA A
MOV R4,A

MOV A,R5
ADDC A ,R5
DA A
MOV R5,A

MOV A,R6
ADDC A,R6
DA A
MOV R6,A

DJNZ R7,HBCD1

LJMP $
END

;RET