Отправлено Гамма СПб 25 апреля 2006 г. 11:06 В ответ на: 2 Гамма СПб - возвращаясь к BIN2BCD ... отправлено <font color=gray>MikhailSh</font> 25 апреля 2006 г. 08:52

static uint8 adj(uint8 val);
static void bin2bcd32(uint32 var)
{
uint8 cnt = 32;

bcd[0] = bcd[1] = bcd[2] = bcd[3] = 0;

for(;;)
{
*(uint32*)bcd <<= 1;
if (var & 0x80000000)
bcd[0] |= 1;
var <<= 1;
if (!--cnt) break;
bcd[0] = adj(bcd[0]);
bcd[1] = adj(bcd[1]);
bcd[2] = adj(bcd[2]);
bcd[3] = adj(bcd[3]);
}
}

static uint8 adj(uint8 val)
{
val += 0x33;
if (!(val & 0x08)) val -= 0x03;
if (!(val & 0x80)) val -= 0x30;
return val;
}

• Ответ: В той программе, что прислана ранее, только 4 десятичные цифры, а нужно 5 — MikhailSh   (25.04.2006 13:02 217.77.103.246, пустое)
• Человеку достаточно bin2bcd16 — Russ   (25.04.2006 11:13 81.211.97.86, пустое)
  • внатуре, даже не посмотрел. Тока bin2bcd16 я ему уже давал, поэтому и закинул сразу 32 — Гамма СПб   (25.04.2006 11:40 85.249.46.122, пустое)

E-mail: info@telesys.ru