 Разработка, производство и продажа радиоэлектронной аппаратуры  |
Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс. e-mail:jobsmp@pochta.ru |
фрагмент (чтение даты и времени, упаковка в longint, далее - 4 раза увеличение longint'а и распаковка):
getdate(dt.year,dt.month,dt.day,dummy);
gettime(dt.hour,dt.min,dt.sec,dummy);
packtime(dt,ftime);
inc(ftime);
unpacktime(ftime,dt);
writeln(' ',dt.hour,':',dt.min,':',dt.sec,' ',
dt.day,':',dt.month,':',dt.year,' ',
ftime);
inc(ftime);
unpacktime(ftime,dt);
.....
результат:
Время Дата 4-х битное упакованное время
17:30:58 25:1:2007 909741021
17:30:60 25:1:2007 909741022
17:30:62 25:1:2007 909741023
17:31:0 25:1:2007 909741024
Если есть какой патч или описание как обойти - дайте ссылочку. Или можете поделиться своей функцией для упаковки/распаковки?
З.Ы. Потом всё это будет закачиваться в DS2415 (1-wire, 4 byte counter + 32768kHz oscillator).
