Преобразование Hex To Decimal Для @-формул

[phantom76]

может кто уже писал подобныую формулу?

Надо преобразовать значение техстового поля из HEX в Decimal на языке @-формул, или буду изобретать велосипед.

 

[Medevic]

Скопипащено.

Преобразование чисел в 16-ричные коды (строки) и обратно
Две приводимые ниже функции решают утилитарные задачи
Вызывает интерес математические приемы их решения

SourceNumber - целое беззнаковое 4-х байтное число, а его 16-ричный код (SourceHexCode), соответственно, восьмизначный.

dec := @Explode ("0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15");
hex := @Explode ("0 1 2 3 4 5 6 7 8 9 A B C D E F");
base := @Power (16; 7:6:5:4:3:2:1:0);

nn := SourceNumber;
hh := @Implode (@Replace (@Text (@Modulo (nn / base; 16)); dec; hex); "");

hh := SourceHexCode;
nn := @Sum (base * @TextToNumber (@Explode (@ReplaceSubstring (@Right("00000000" + @UpperCase (hh); 8); hex; dec + " "))));

 

[phantom76]

Скопипащено.

Спасибо! Действительно любопытно реализовано!!! )