求一个HEX转化成压缩BCD码的算法

amu226

求一个HEX转化成压缩BCD码的算法 [复制链接]

例如有一个unisigned int x 一个uchar y[3]
要把X转化成压缩BCD码放到Y中
这个8位机没BCD相关指令,没有乘除法指令,
只有加减,带进位加减,移位等常用指令,
有做过的给个合适的算法,谢谢了

coffeewjf

BIN转BCD,就是不停做除以10的运算. 既然处理器没有除法,那就首先实现除法

ttkkxx

网上有很多这样的现在源代码。
除法就是采用移位指令来实现。

楼主可以看看：
http://www.avrw.com/article/art_107_3613.htm

几种码制之间的转换 BCD HEX BIN

1. #include
   
2. #include
   
3. #include
   
4. #include
   
5. 
   
6. /**此宏定义摘自51bbs Youth发表***/
   
7. #define LongToBin(n) \
   
8. (\
   
9. ((n >> 21) & 0x80) | \
   
10. ((n >> 18) & 0x40) | \
    
11. ((n >> 15) & 0x20) | \
    
12. ((n >> 12) & 0x10) | \
    
13. ((n >> 9) & 0x08) | \
    
14. ((n >> 6) & 0x04) | \
    
15. ((n >> 3) & 0x02) | \
    
16. ((n ) & 0x01) \
    
17. )
    
18. 
    
19. #define Bin(n) LongToBin(0x##n##l)
    
20. 
    
21. /********** HEX转BCD******/
    
22. /***bcd_data(<0x255,>0)***/
    
23. unsigned char BCD2HEX(unsigned int bcd_data)
    
24. {
    
25.     unsigned char temp;
    
26.     temp=((bcd_data>>8)*100)|((bcd_data>>4)*10)|(bcd_data&0x0f);
    
27.     return temp;
    
28. }
    
29. /********** HEX转BCD******/
    
30. /***hex_data(<0xff,>0)****/
    
31. unsigned int HEX2BCD(unsigned char hex_data)
    
32. {
    
33.     unsigned int bcd_data;
    
34.     unsigned char temp;
    
35.     temp=hex_data%100;
    
36.     bcd_data=((unsigned int)hex_data)/100<<8;
    
37.     bcd_data=bcd_data|temp/10<<4;
    
38.     bcd_data=bcd_data|temp%10;
    
39.     return bcd_data;
    
40. }
    
41. 
    
42. void main(void)
    
43. {
    
44.   unsigned int c;
    
45. 
    
46.   c= Bin(10101001);  // then c = 0xA9
    
47.   c=BCD2HEX(0x255);  //255 转成HEX为0xff
    
48.   c=HEX2BCD(0xff);    //0xff 转成BCD码为 255
    
49. }

复制代码

还有很多，楼主自己搜索下、

standstone

路过

linxiuhua

这个应该就可以了

1. 
   
2. unsigned int x1;        //外部变量
   
3. void HEX2BCD(unsigned int x,unsigned char y[3])
   
4. {
   
5.     unsigned char i =0;
   
6.     x1 =x;
   
7.     y[2] =  get(10000);
   
8.     y[1] =  get(1000) <<4;
   
9.     y[1] += get(100);
   
10.     y[0] =  get(10) <<4;
    
11.     y[0] += xl;
    
12. }
    
13. 
    
14. unsigned char get(unsigned int da)
    
15. {
    
16.     unsigned char i=0;
    
17.     while(x1 > da)
    
18.     {
    
19.         x1 -=da;
    
20.         i++;
    
21.     }
    
22.     return i;
    
23. }
    

复制代码

heyi000

这样的代码太多了，楼主一搜就一大堆的

JJJwan

MARK

amdsempron

以前写的一个，没有很好验证过，楼主不介意就帮忙验证一下吧。记得告诉验证结果啊。

1. 
   
2. /*
   
3. ****************************************************************************************************
   
4. * Function Name   : Hex_To_Dec
   
5. * Description     : 十六进制向十进制转换
   
6. * Arguments       : hex     - 待转换的十六进制数
   
7. *                   dec     - 十进制数存储区(BCD压缩格式)
   
8. *                   len     - 十进制最大长度
   
9. * Returns         : 0       - 正常
   
10. *                   1       - 十进制数存储区过小
    
11. ****************************************************************************************************
    
12. */
    
13. #define DEC(hex)    (((hex / 10) << 4) + (hex % 10))
    
14. uint8 Hex_To_Dec(uint32 hex,uint8 dec[],uint16 len)
    
15. {
    
16.     uint8   temp;
    
17.     uint8   pdec = dec;
    
18. 
    
19.     while(0 != hex)
    
20.     {
    
21.         if(0 == len)
    
22.         {
    
23.             return(1);
    
24.         }
    
25.         
    
26.         len--;
    
27.         temp = hex % 100;
    
28.         hex /= 100;
    
29.        *pdec++ = DEC(temp);
    
30.     }
    
31.     for(;len>0;len--)
    
32.     {
    
33.         *pdec++ = 0x00;
    
34.     }
    
35.     return(0);
    
36. }
    

复制代码

shu12

懒得验证了,把汇编版的除法写出来就没什么大问题了
/10000,得到结果余数,再把余数/1000,得到结果和余数........