Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.05.22;
Скачать: [xml.tar.bz2];

Вниз

Помогите написать конвертор   Найти похожие ветки 

 
Тот самый Джо   (2003-05-12 12:04) [0]

В бинарном файле хранятся 17-и байтовые значения чисел, помогите понять как их можно преобразовать в формат BCD и обратно:
Примеры хранения чисел:
--------------------------------------------------------------
Число | Точность | HEX (17 byte)
--------------------------------------------------------------
1 | 4 | C400000000000000000000000000010000
--------------------------------------------------------------
1 | 8 | C800000000000000000000000100000000
--------------------------------------------------------------
1.44 | 4 | C400000000000000000000000000014400
--------------------------------------------------------------
1.44 | 8 | C800000000000000000000000144000000
--------------------------------------------------------------
0 | 4 | C400000000000000000000000000000000
--------------------------------------------------------------
0 | 8 | C800000000000000000000000000000000
--------------------------------------------------------------
-1 | 4 | 44FFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFF
--------------------------------------------------------------
-1 | 8 | 48FFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFF
--------------------------------------------------------------
-1.44 | 4 | 44FFFFFFFFFFFFFFFFFFFFFFFFFFFEBBFF
--------------------------------------------------------------
-1.44 | 8 | 48FFFFFFFFFFFFFFFFFFFFFFFEBBFFFFFF
--------------------------------------------------------------

Насколько я понял, для отрицательных значений нужно делать xor $80 Помогите please :)


 
Тот самый Джо   (2003-05-12 12:56) [1]

Жаль...а я было подумал, что это несложная для некоторых задача :(


 
Dms   (2003-05-12 13:01) [2]

это задача для тебя. почитай про форматы чисел, про логические операции и вперед.


 
Anatoly Podgoretsky   (2003-05-12 13:07) [3]

А оно уже и так BCD не упакованное, а ты в какое BCD хочешь преобразовать?


 
Тот самый Джо   (2003-05-12 13:16) [4]

Я хочу преобразовать в тип TBCD (unit FmtBcd.pas)

type
TBcd = packed record
Precision: Byte; { 1..64 }
SignSpecialPlaces: Byte; { Sign:1, Special:1, Places:6 }
Fraction: packed array [0..31] of Byte; { BCD Nibbles, 00..99 per Byte, high Nibble 1st }
end;



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.05.22;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.006 c
3-70185
Filat
2003-05-02 16:35
2003.05.22
FireBird - SYSDBA. А можно для клиента без последнего?


3-70111
Sergey
2003-04-28 13:54
2003.05.22
Midas событие ReconcileError ?


6-70425
Vovaka
2003-03-25 09:39
2003.05.22
Как получить текущий DNS-сервер ?


8-70397
Axis_of_Evil
2002-12-16 09:25
2003.05.22
UnDelphiX


1-70343
Officeman
2003-05-09 12:58
2003.05.22
какой код





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский