SERHY
15.02.2023, 12:22
Особенности контроллеров ОВЕН при работе с СОМ портами:
1.В перечислителе портов нет порта СОМ0, поэтому стандартная библиотека SysLibCom доработана и перечислитель имеет вид:
TYPE PORTS : (COM0:=0, COM1, COM2,COM3,COM4);
END_TYPE
2.При успешном открытии порта функция SysComOpen возвращает ноль, т.е.:
VAR
ports:PORTS:=COM0;
END_VAR
open:=SysComOpen(ports)(*open в случае успеха будет равен нулю*)
3.Во всех других функциях вопреки описанию на библиотеку SysLibCom в качестве аргумента используется не дискриптор открытого порта, а его номер(примеры ниже:
IF op =1 THEN
open:=SysComOpen(ports);
op:=0;
END_IF
IF s_p=1 THEN
set_port:=SysComSetSettings(ports, ADR(port));
s_p:=0;
END_IF
IF wr = 1 THEN
write:=SysComWrite(ports, ADR(send_byte), 11, 1);
wr:=0;
END_IF
IF cl = 1 THEN
close:=SysComClose(ports);
cl:=0;
END_IF
библиотека отредактирована и протестирована на ПЛК110(М02)-60 СОМ0.На других портах и для других контроллеров не проверял.Об обнаруженных косяках прошу сообщать.
1.В перечислителе портов нет порта СОМ0, поэтому стандартная библиотека SysLibCom доработана и перечислитель имеет вид:
TYPE PORTS : (COM0:=0, COM1, COM2,COM3,COM4);
END_TYPE
2.При успешном открытии порта функция SysComOpen возвращает ноль, т.е.:
VAR
ports:PORTS:=COM0;
END_VAR
open:=SysComOpen(ports)(*open в случае успеха будет равен нулю*)
3.Во всех других функциях вопреки описанию на библиотеку SysLibCom в качестве аргумента используется не дискриптор открытого порта, а его номер(примеры ниже:
IF op =1 THEN
open:=SysComOpen(ports);
op:=0;
END_IF
IF s_p=1 THEN
set_port:=SysComSetSettings(ports, ADR(port));
s_p:=0;
END_IF
IF wr = 1 THEN
write:=SysComWrite(ports, ADR(send_byte), 11, 1);
wr:=0;
END_IF
IF cl = 1 THEN
close:=SysComClose(ports);
cl:=0;
END_IF
библиотека отредактирована и протестирована на ПЛК110(М02)-60 СОМ0.На других портах и для других контроллеров не проверял.Об обнаруженных косяках прошу сообщать.