[an error occurred while processing this directive]
[an error occurred while processing this directive]
|
//перевод двоичного целого в формат BCD
//для 2х значных цифр (0-99)
//выход - 2 старшие цифры
//(цифры выводятся на ЖК экран)
char bin_to_bcd(char r)
{char temp;
char deli;
temp=0;
deli=10;
if (r>=deli)
{
do
{temp++;
r-=deli;
}while (r>=deli);
};
temp<<=4;
temp|=r;
return (temp);
}
E-mail: info@telesys.ru