将8421BCD码转换为十进制数

//*****************************************************************

转自 http://hi.baidu.com/asdf7890123/blog/item/fc203518fb42cd4d42a9ad62.html

//bcd hex //此函数用于将8421BCD码转换为十进制数，从函数参数可以看出此BCD码是由两位十进制数组成的。BCD码是用二进制数对十进制数的各个位数进行编码，比如十进制数58，那么转换为BCD码为0x58，356对应BCD码就是0x356。注意这是编码不是数进制间的转换，他们之间不存在等价关系。只是进行编号，为了方便对编号后的数据用十六进制数表示。对应编码规则如下：
十进制数---8421BCD码----编码后用等价的十六进制数表示
0-----------0000----------0x0
1-----------0001----------0x1
2-----------0010----------0x2
3-----------0011----------0x3
4-----------0100----------0x4
5-----------0101----------0x5
6-----------0110----------0x6
7-----------0111----------0x7
8-----------1000----------0x8
9-----------1001----------0x9
知道了编码规则，那么将2位8421bcd码编号的数，还原为十进制数也就方便了。函数参数是一个字节那么决定了此8421BCD码是两位码即高四位是一个码值、低四位是一个码值，将高四位乘以10加上低四位码值就得到了十进制数。
byte bcd2_hex(byte val)
{
byte i;

i = val&0x0f; //按位与，i得到低四位数。
val >>= 4; //右移四位，将高四位移到低四位的位置，得到高四位码值。
val &= 0x0f; //防止移位时高位补进1，只保留高四位码值
val *= 10; //高位码值乘以10
i += val; //然后与第四位码值相加。
return i; //将得到的十进制数返回
}
//*****************************************************************
//这个应该是一个类似I2C协议的字节写操作。
static void DS1302_WriteByte(byte val)
{
byte i;

//MinCardClk(0); //stop clk
//Sys_SetCpuClk(clockdiv1);
for(i = 0; i < 8; i++) //通过循环将1字节也即8位二进制数送给i2c数据线。
{
if(val&0x01)DS1302_SDA_W(1); //如果此位是1,那么送给数据线1
else DS1302_SDA_W(0); //如果是0，那么给数据线0
DS1302_SCK(0); //时钟线置0也即拉低
DS1302_SCK(1); //时钟线置1，通过这两个动作时钟线产生一个从低到高的跳变，作用是通知从器件取走数据线上的数据。
val >>= 1;// FOR DELAY AND SHIFT //右移数据，接着发送下一位数据，数据是从低位到高位发送。
}
//DS1302_SCK(0);
//Sys_SetCpuClk(clockdiv0);
//MinCardClk(1); //start clk
}
//*****************************************************************
//同理i2c读字节
static byte DS1302_ReadByte(void)
{
byte i,val;

//MinCardClk(0); //stop clk
//Sys_SetCpuClk(clockdiv1);
val=0;
DS1302_SDA_W(1);
for(i = 0; i < 8; i++) //循环从数据线上读取8位数据，然后凑成一字节。
{
DS1302_SCK(1);
DS1302_SCK(0); //时钟一个从高到低的跳变，通知从器件将数据放到数据线上。
val >>= 1; //接收完1位后右移数据，准备接收下一位，这里也是从低位到高位接收数据。
if(DS1302_SDA_R())val |= 0x80; //如果是1那么与0x80或后就得到了1，如果是0，就不用管了因为在移位时直接补的是0.
}
//Sys_SetCpuClk(clockdiv0);
//MinCardClk(1); //start clk
return val;
}