ТМ 5231 - протокол

Ребята, поможите!

Какой протокол у этого старичка? Где вообще взять его.
Если не скажите, где, то хоть может кто вспомнит какой у него алгоритм формирования контрольной суммы для каждого запроса, все биты в запросе и ответы я уже расшифровал с помошью прог.

Заранее Спасибо.

vald, ОГРОМНОЕ СПАСИБО!
Попробую на новой неделе сгенерировать этот пресловутый CRC.

Только вот жаль, что CRC там двухбайтовый, мне осталось расшифровать 5 последних байтов, и если только два из них CRC, то что-же значат остальные? Да... Задачка. :( Скинул по мылу "Элемеру" просьбу выслать протокол. Так ответа до сих пор нет. :(

Но спасибо за отклик :)

Нашел!

Протокол легкий. Раскрою здесь, авось кому-нибудь пригодится.

Протокол ТМ 5231:

Запрашиваемые параметры
Прибор ТМ5231 производит индикацию температуры по 8 каналам. В качестве запрашиваемых параметров выступают 8 температур (по 1-й на каждый канал). Прибор не ведет никакой тип архива, и выдает только текущие данные.

Тип связи
В качестве канала связи используется RS-232. Используются следующие настройки COM-порта::
•     количество бит      – 8;
•     количество стоповых бит      – 1;
•     проверка на четность      – отсутствует.
Скорость передачи по каналу связи – 9600 б/сек.

Формат запросов:
:<номер прибора>;<команда>;<код;>;<контрольная сумма><CR>, где:
•     <номер прибора> - число в диапазоне от 1 до 254 записанное с использованием символов 0,1,2,...,9 и определяющее, к какому прибору посылается запрос. Заводская установка - 1 (для всех приборов);
•     <команда> - команда, определяющая дальнейшие действия прибора (по-моему всегда 1);
•     <код> - канал измерения температуры (коды 0-7 соответствуют 1-8 каналам измерения температуры);
•     <контрольная сумма> - контрольная сумма. Массив, защищаемый контрольной суммой, начинается с первого символа номера прибора и заканчивается последним символом ";" включительно.
•     <CR> - символ с кодом 13(десятичное).
Все значения передаются в десятичном виде.

Допустимые символы при обмене:
ASCII символ     0     9     :     !     ;     .     $     <CR>
Код ASCII символа     48     57-58     33     59     45     46     36     13

Если прибор принял посылку, содержащую какие-либо другие символы, не правильную контрольную сумму или посылку не соответствующую формату конкретной команды, ответ не возвращается.

Пример запроса:
Десятичные коды
:1;1;2;32202

ASCII символов
58,49,59,49,59,50,59,51,50,50,48,50,13

Формат ответов:
!<номер прибора>;<команда>;<код;>;<контрольная сумма><CR>, где:

•     <номер прибора> - число в диапазоне от 1 до 254 записанное с использованием символов 0,1,2,...,9 и определяющее, к какому прибору посылается запрос. Заводская установка - 1 (для всех приборов);
•     <команда> - команда, определяющая дальнейшие действия прибора;
•     <код> - значение температуры;
•     <контрольная сумма> - контрольная сумма. Массив, защищаемый контрольной суммой, начинается с первого символа номера прибора и заканчивается последним символом ";" включительно.
•     <CR> - символ с кодом 13(десятичное).

Все значения принимаются в десятичном виде.

Если в ответе прибора значение операнда начинается с символа "$" , это значит, что произошла ошибка, а код этой ошибки находится после символа "$" .
Возможные коды ошибок:
•     0 - прибор не исправен и требует ремонта;
•     1 - прибор не исправен и требует ремонта;
•     2 - входной сигнал превышает максимально допустимый уровень;
•     3 - не существующий номер канала.

Пример ответа:
Десятичные коды
!1;-49.8;12161

ASCII символов
33,49,59,45,52,57,46,56,59,49,50,49,54,49,13

Расчет контрольной суммы (алгоритм на Pascal):
function Ttm_52xx.CRCCheck (var S: String): string;
Var
r, l : integer;
ks   : word;
ss   : string;
Begin
    ks:=65535;
    for r:=2 to length(s) do
      begin
        ks := ks xor ORD(s[r]);
        for l :=1 to 8 do
          IF (ks div 2)*2<>ks then ks:=(ks div 2) xor 40961
                             else ks:=(ks div 2);
      end;
    Str(ks,ss);
    Result := ss;
End;



ТО ЖЕ, НО НА С


void _CRCCheck( BYTE * chBufReq, BYTE count )
{
     unsigned short ks;
     int y,l;

     ks = 0xFFFF;
    for ( y = 2; y < count; y++ )
     {
        ks ^= chBufReq[y];
        for ( l = 1; l <= 8; l++ )
               if ( (ks / 2)*2 != ks )
                    ks = (ks >> 1) ^ 0xA001;
            else
                    ks = (ks >> 1);
     }
     int t = ks;
}
,где

chBufReq - буфер сообщения всего,
count - длина буфера (без CRC и символа конца строки)

А я в самом начале так подумал, да вот неправильно его реализовал походу :) Поэтому и возникли сомнения...