Чтение FLOAT по Modbus

[IvPoed]

Здравствуйте

Имеется ТРМ-138.
Читаю регистры 3 и 4 (соответственно - младшее и старшее слово вещественного числа по измеренному значению).
Почему-то не получается обратно собрать два слова в вещественное число. Получается ерунда.
Местами менял Эффекта нет.

Подскажите пожалуйста, в чем тут хитрость?
Буду признателен за пример кода на любом языке.

Заранее спасибо!

[Емельянов Кирилл]

Вы сначала покажите как делаете, потом, возможно, кто-то укажет на вашу ошибку

[Sergey666]

Буду признателен за пример кода на любом языке...
https://ftp.owen.ru/CoDeSys3/11_Docu...odbus_v3.2.pdf

[Khedron]

Чем читаете и как? Проверьте, что адресация у вас совпадает, может вы с единицы их считаете и считываются 2 и 3 регистр вместо 3 и 4.

[kondor3000]

Подскажите пожалуйста, в чем тут хитрость?
Буду признателен за пример кода на любом языке.
Заранее спасибо!

Тут пример функции, меняя входы и выходы, можно собирать, разбирать (переставлять) регистры и байты в любом типе переменных.
Можно переделать на ФБ - если нужно разобрать на 2-4 части.
https://owen.ru/forum/showthread.php?t=37645&page=3#30

[IvPoed]

Делаю запрос в адрес ТРМ-138:
08 04 00 03 00 02 81 52

Адрес - 8, читаю командой 04 регистры начиная с 03 в количестве 2-х штук, т.е. как раз 3 и 4.
По документации в них содержится младшее и старшее слово вещественного числа измеренного параметра.

Получаю в ответ:
08 04 04 41 9D 9F 35 4E B1

Последние два байта - CRC16.
Слово 1 = 419D
Слово 2 = 9F35

Дальше пытаюсь объединить их (использую Делфи), например так:
MakeLong(Слово1, Слово2)

Получаю хрень

[kondor3000]

Слово 1 = 419D
Слово 2 = 9F35
Получаю хрень

Слово 1 = 419D, это 16797 в DEC
Слово 2 = 9F35, это 40757 в DEC
При сборке получаем, если регистры переставлены -3.838251e-020, если регистры правильно, то 19.70274 Скрин 1 Сборка REAL.jpg

[Сергей0308]

Может проще из первого регистра читать, там в INT-е, в смысле, ничего и тасовать не надо!

ТРМ138_5.PNG

[AlexandrGr]

Делаю запрос в адрес ТРМ-138:
Дальше пытаюсь объединить их (использую Делфи), например так:
MakeLong(Слово1, Слово2)

Получаю хрень

Вам же float надо а не long.

[IvPoed]

Все, разобрался.
В делфи есть побайтовый доступ. Примерно так:

var r: single;
r.Bytes[3] := $41;
r.Bytes[2] := $9d;
r.Bytes[1] := $9f;
r.Bytes[0] := $35;

Всё работает. Порядок получается обратный.