;****************************************************
;十六进制转换为十进制的程序
;四位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