Библиотека unm.lib

Вид для печати

12.11.2016, 18:30
Newcomer

Библиотека unm.lib

Не пойму как при работе с библиотекой unm.lib выбрать порт и задать его параметры.
12.11.2016, 18:34
capzap

первый созданный будет нулевой далее плюс один
12.11.2016, 18:36
Newcomer

Цитата:

Сообщение от capzap

первый созданный будет нулевой далее плюс один

А параметры порта как задать ?
12.11.2016, 18:39
Newcomer

Понял, в конфигураторе.
12.11.2016, 18:43
Newcomer

Вложений: 1

Мне надо работать через RS-232. Сделал так. Это правильно ?
12.11.2016, 18:46
capzap

да вроде правильно все, кстати есть описалово к бибке http://www.owen.ru/catalog/codesys_v2/67395347 там вроде можно порт и из самой бибки настроить, но я пользовался настройками конфигуратора всегда
12.11.2016, 18:56
Newcomer

Связь не рвется при работе через unm.lib ?
12.11.2016, 19:01
Newcomer

Вложений: 1

Вот настройки порта. Frame orient я правильно задал ?
12.11.2016, 20:30
capzap

RTU или ASCII ни на что не влияет. Я предпочитаю 38400, поэтому не знаю будут ли ошибки на более высоких скоростях, у меня что на ПЛК100 проблем небыло, как бы его некоторые не ругали
12.11.2016, 20:57
Newcomer

Ясно, спасибо.
15.11.2016, 18:29
Newcomer

Библиотека UNM

Добрый вечер.

Необходимо послать во внешнее устройство через RS-232 (номер порта 1) ПЛК100 команду с кодом FEA1.

Правильно ли записана функция Передать в интерфейс строку байт данных: SetByte(1, 'FEA1', 4)

Или надо записать так: SetByte(1, '$FE$A1', 4)
15.11.2016, 18:34
capzap

FEA1 это набор символов или WORD?
15.11.2016, 18:36
Newcomer

Цитата:

Сообщение от capzap

FEA1 это набор символов или WORD?

Это два байта (FE и A1), которые надо послать в порт.
15.11.2016, 18:46
capzap

Я обычно держал константный массив байт для каждой команды, а в функцию отправлял через указатель на строку, гарантированно работает. Но для такого вида тоже должно работать
15.11.2016, 19:23
Newcomer

Так как правильно будет отправить в порт два байта FE и A1 - SetByte(1, 'FEA1', 4) или SetByte(1, '$FE$A1', 4) ?
15.11.2016, 19:37
capzap

stuff : ARRAY[0..1] OF BYTE := 16#FE,16#A1
ptr : POINTER TO STRING;
*****
ptr :=ADR(stuff);
SetByte(1, ptr^, 2);

как то так, за комп.орфографию не ручаюсь, по памяти сочинил
15.11.2016, 19:41
Newcomer

Цитата:

Сообщение от capzap

stuff : ARRAY[0..1] OF BYTE := 16#FE,16#A1
ptr : POINTER TO STRING;
*****
ptr :=ADR(stuff);
SetByte(1, ptr^, 2);

как то так, за комп.орфографию не ручаюсь, по памяти сочинил

А ptr^ что означает ?
15.11.2016, 20:06
capzap

Цитата:

Сообщение от Newcomer

А ptr^ что означает ?

обратное преобразование из указателя в строку
15.11.2016, 20:14
Newcomer

А может должно быть не ptr: POINTER TO STRING; а ptr: POINTER TO BYTE;

stuff это же байтовый массив.
15.11.2016, 20:28
capzap

нет, в описании функции что сказзано, вторым аргументом идет строка, значит подавать надо тоже строку, а формировать её можно хоть из массива байт, хоть содержимое файла передать, хоть банально строку
16.11.2016, 16:49
Newcomer

Байты, которые приходят в последовательный порт ПЛК от внешнего устройства сохраняются в буфере порта или никакого буфера нет и надо следить за приходом каждого байта ?
16.11.2016, 17:49
capzap

вычитывать каждый байт,насчет слежения за приходом не знаю
16.11.2016, 19:38
Newcomer

Цитата:

Сообщение от capzap

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

После отправки из ПЛК запроса данных во внешнее устройство делается пауза, далее начинается чтение данных. Если пауза перед чтением будет слишком велика, то часть данных, приходящих из внешнего устройства, можно потерять ?
16.11.2016, 19:55
capzap

все от кода зависит, после записи сразу переходят на чтение порта и даже если абонент долго не отвечает, можно организовать тайм-аут, но чтоб потерять данные это надо постараться
16.11.2016, 20:16
Newcomer

otvet_RB: POINTER TO RBDATA; (*Структура ответа *)
otvet: ARRAY [0..127] OF BYTE := 128(0); (*Ответ *)
p:POINTER TO BYTE; (* Указатель *)
count: WORD; (* Число принятых байт *)

90: count := 0; N := 100;

100: (* Чтение данных *)
EN := TRUE; SET := UT_5s; (* Запустили таймер *)
otvet_RB := GetByte(0);
IF (otvet_RB > 0) THEN (* Если получили новый байт, то собираем его в результат и ведем подсчет принятых байт *)
p:=ADR(otvet) + count;
p^ := otvet_RB^.data;
count := count + 1;
END_IF
IF (OUT1) THEN EN := FALSE; N := 110; END_IF

Сделал чтение данных из порта по аналогию с примером.

Предполагается, что внешнее устройство выдает данные не более 5 сек.

Правильно у меня все сделано ?
16.11.2016, 22:20
capzap

ну я бы поправил переменную count, сменил ей тип на DWORD, чтоб одинаково было с указателем. И дописал бы как в примерах таймаут
17.11.2016, 09:55
Newcomer

Цитата:

Сообщение от capzap

ну я бы поправил переменную count, сменил ей тип на DWORD, чтоб одинаково было с указателем. И дописал бы как в примерах таймаут

Таймаут на что ?
17.11.2016, 10:55
Newcomer

otvet_RB: POINTER TO RBDATA; (*Структура ответа *)
otvet: ARRAY [0..127] OF BYTE := 128(0); (*Ответ *)
p:POINTER TO BYTE; (* Указатель *)
count: WORD; (* Число принятых байт *)

90: count := 0; N := 100;

100: (* Чтение данных *)
EN := TRUE; SET := UT_5s; (* Запустили таймер *)
otvet_RB := GetByte(0);
IF (otvet_RB > 0) THEN (* Если получили новый байт, то собираем его в результат и ведем подсчет принятых байт *)
p:=ADR(otvet) + count;
p^ := otvet_RB^.data;
count := count + 1;
END_IF
IF (OUT1) THEN EN := FALSE; N := 110; END_IF

У меня в программе циклически повторяется шаг 100. На этом шаге заполняется массив otvet. Не пойму как сделать чтобы в каждом цикле массив otvet заполнялся начиная с нулевого элемента. Тут дело в строке p:=ADR(otvet) + count;, count у меня обнуляется. А как обнулить ADR(otvet) ?
17.11.2016, 11:09
capzap

не надо его обнулять, это же указатель
по поводу таймера, незнаю какой пример Вы брали, я бы рекомендовал просмотреть бибку меркурия, общая часть у Вас идентична, но не хватает анализа как принимаемых байт так и самой передачи данных. Невстречал протоколы, у которых неизвестна длинна данных, всегда можно определить когда заканчивается ответ
17.11.2016, 11:37
Newcomer

Цитата:

Сообщение от capzap

не надо его обнулять, это же указатель

Все таки как сделать чтобы каждый раз массив otvet заполняться начиная с нулевого элемента ? Как обнулить индекс этого массива ?
17.11.2016, 11:40
capzap

Цитата:

Сообщение от Newcomer

Все таки как сделать чтобы каждый раз массив otvet заполняться начиная с нулевого элемента ? Как обнулить индекс этого массива ?

делать count равным нулю и всё
17.11.2016, 11:55
Newcomer

Цитата:

Сообщение от capzap

делать count равным нулю и всё

ADR(otvet) всегда указывает на нулевой элемент массива ?
17.11.2016, 12:08
capzap

Цитата:

Сообщение от Newcomer

ADR(otvet) всегда указывает на нулевой элемент массива ?

для пущей гарантии я выставляю иногда так ADR(otvet[0])
17.11.2016, 12:33
Newcomer

Цитата:

Сообщение от capzap

для пущей гарантии я выставляю иногда так ADR(otvet[0])

Мне то же такое на ум пришло.
20.11.2018, 18:27
repinandrey

Здравствуйте!
Подскажите пример чтения данных по RS-485 по нестандартному протоколу (надо читать данные с датчиков температуры-влажности th-485). Чnо-то никак разобраться с библиотекой не могу, нужен пример. Спасибо.