СПК107 Программное изменение ID-адреса COM-порта в режиме Slave

[vlalys]

Добрый день! Есть задача программного задания/изменения ID-адреса порта COM2, настроенного в режиме Slave. Проблема в том, что устройства с СПК107 устанавливаются на очень удаленные объекты и включаются о общую сеть Modbus с другими устройствами, адреса которых заранее неизвестны. Существует ли возможность программного изменения адреса COM-порта, или он жестко программируется в CodeSys?

[Евгений Кислов]

Добрый день! Есть задача программного задания/изменения ID-адреса порта COM2, настроенного в режиме Slave. Проблема в том, что устройства с СПК107 устанавливаются на очень удаленные объекты и включаются о общую сеть Modbus с другими устройствами, адреса которых заранее неизвестны. Существует ли возможность программного изменения адреса COM-порта, или он жестко программируется в CodeSys?

Добрый день. Используйте библиотеку Modbus Slave - в ней поддержан нужный вам функционал.

[vlalys]

А можно поподробнее? Какой функциональный блок (или блоки) этой библиотеки используются? Переменную адреса устройства (DevAddr) я увидел только в блоке MB_SLAVE. Там она присутствует как входная переменная обращения к порту.

[Евгений Кислов]

А можно поподробнее? Какой функциональный блок (или блоки) этой библиотеки используются? Переменную адреса устройства (DevAddr) я увидел только в блоке MB_SLAVE. Там она присутствует как входная переменная обращения к порту.

Пример работы с библиотекой приведен в этом документе:
http://ftp.owen.ru/index.html/CoDeSy...dbus_v.1.0.pdf

Все верно, блок MB_SLAVE реализует слэйв, DevAddr - это его ID. В процессе работы останавливайте блок (Enable:=FALSE), изменяйте значение DevAdrr и запускайте блок заново.

[vlalys]

Спасибо! Буду пробовать.

[vlalys]

Пример работы с библиотекой приведен в этом документе:
http://ftp.owen.ru/index.html/CoDeSy...dbus_v.1.0.pdf

Все верно, блок MB_SLAVE реализует слэйв, DevAddr - это его ID. В процессе работы останавливайте блок (Enable:=FALSE), изменяйте значение DevAdrr и запускайте блок заново.

Здравствуйте, Евгений! Так и не получилось у меня разобраться, что-то я недопонимаю - в блоке MB_SLAVE нет бита останова/запуска. Т.е. я должен отключить порт битом Enable, задать в MB_SLAVE новое значение адреса, а затем снова подключить порт? Если возможно, листинг бы программы изменения адреса.

[Евгений Кислов]

Т.е. я должен отключить порт битом Enable, задать в MB_SLAVE новое значение адреса, а затем снова подключить порт?

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

[vlalys]

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

Я извиняюсь за свою глупость, но так и не разобрался с этим вопросом. Может мы о разном говорим? Мне надо программно изменять не адрес внешнего устройства, подключенного к порту, а ID-адрес COM-порта в режиме Slave для его опроса внешним Мастером. Picture.png

[Евгений Кислов]

Я извиняюсь за свою глупость, но так и не разобрался с этим вопросом. Может мы о разном говорим? Мне надо программно изменять не адрес внешнего устройства, подключенного к порту, а ID-адрес COM-порта в режиме Slave для его опроса внешним Мастером. Picture.png

Мы говорим об одном и том же. Постараюсь завтра подготовить видео.

[Евгений Кислов]

Как и обещал, на коленке сделал видео:

листинг примера:

PROGRAM PLC_PRG
VAR
	stCom_Settings: 	ComSerice.SysCom.COM_Settings;
	stCom_SettingsEx: 	ComSerice.SysCom.COM_SettingsEx;
	fbComService: 		COM_SERVICE;
	fbModbusSlave:	    MB_SLAVE;
	
	bySlaveID:			BYTE;
	awSlaveBuffer:		ARRAY [0..31] OF WORD;
	xSlaveEnable:		BOOL;
END_VAR



stCom_Settings.sPort		:=	2;
stCom_Settings.byStopBits	:=	1;
stCom_Settings.byParity		:=	0;
stCom_Settings.ulBaudrate	:=	115200;


stCom_SettingsEx.byByteSize	:=  8;

fbComService
	(
		Enable		:= 	TRUE, 
		Settings	:= 	stCom_Settings, 
		sets_ex		:= 	stCom_Setting**** 
		Task		:=  ComSerice.COM_TSK.OPEN_TSK, 
		Ready=> , 
		handle=> 
	);
	

IF xSlaveEnable AND fbComService.Ready THEN
	
	fbModbusSlave
		(
			ComHandle	:= fbComService.handle, 
			DevAddr		:= bySlaveID, 
			pBuffer		:= ADR(awSlaveBuffer), 
			BufSize		:= SIZEOF(awSlaveBuffer), 
			NewData=> , 
			Error=> 
		);
		
END_IF