CODESYS V3.5. Работа с модемами

[Эдуард_Н]

Если не вводить ни одного номера, будет происходить отправка СМС?

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

Если не вводить ни одного номера, будет происходить отправка СМС?

Нет, потому что непонятно, куда в таком случае ее отправлять.

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

Предложите свой вариант, в ST. И для меня примером будет. Пробую в ST, но пока тяжело.

В качестве примера:

PROGRAM PLC_PRG
VAR
	// задал 2 номера для теста
	asPhoneNumbers:					ARRAY [1..c_iPhoneNumberCount] OF STRING(16) := ['79101234567', '','79101234568', '', ''];
	sModemPhoneNumbers:				STRING;
	i:						INT;
	xCreateString:					BOOL;
END_VAR
VAR CONSTANT
	c_iPhoneNumberCount:		                INT := 5;
END_VAR



IF xCreateString THEN
	
	// очищаем строку
	MEM.MemFill(ADR(sModemPhoneNumbers), SIZEOF(sModemPhoneNumbers), 0);

	FOR i := 1 TO c_iPhoneNumberCount DO
	
		// игнорируем незаданные номера
		IF asPhoneNumbers[i] = '' THEN
			CONTINUE;
		ELSE
			sModemPhoneNumbers := OSU.CONCAT4(sModemPhoneNumbers, '+', asPhoneNumbers[i], ';');
		END_IF
	END_FOR
	
	// после последнего номера не должно быть разделителя
	sModemPhoneNumbers[LEN(sModemPhoneNumbers) - 1] := 0;
	
	xCreateString := FALSE;
	
END_IF

[Эдуард_Н]

В качестве примера:

PROGRAM PLC_PRG
VAR
	// задал 2 номера для теста
	asPhoneNumbers:					ARRAY [1..c_iPhoneNumberCount] OF STRING(16) := ['79101234567', '','79101234568', '', ''];
	sModemPhoneNumbers:				STRING;
	i:						INT;
	xCreateString:					BOOL;
END_VAR
VAR CONSTANT
	c_iPhoneNumberCount:		                INT := 5;
END_VAR



IF xCreateString THEN
	
	// очищаем строку
	MEM.MemFill(ADR(sModemPhoneNumbers), SIZEOF(sModemPhoneNumbers), 0);

	FOR i := 1 TO c_iPhoneNumberCount DO
	
		// игнорируем незаданные номера
		IF asPhoneNumbers[i] = '' THEN
			CONTINUE;
		ELSE
			sModemPhoneNumbers := OSU.CONCAT4(sModemPhoneNumbers, '+', asPhoneNumbers[i], ';');
		END_IF
	END_FOR
	
	// после последнего номера не должно быть разделителя
	sModemPhoneNumbers[LEN(sModemPhoneNumbers) - 1] := 0;
	
	xCreateString := FALSE;
	
END_IF

Так понимаю, что в эмуляции не работает?

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

Этот код сработает и в эмуляции.

[Эдуард_Н]

Этот код сработает и в эмуляции.

Но вроде не работает или там библиотека ещё нужна?Screenshot_2.jpg


Всё, понял. Спасибо.

[Эдуард_Н]

Подскажите к какому порту лучше подключить модем к 232 или 485?

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

Подскажите к какому порту лучше подключить модем к 232 или 485?

Зависит от того, какие интерфейсы есть у модема.
Если есть оба и для RS-232 не требуются дополнительные пины (RTS/CTS и т.д.) - то разницы нет.

[Эдуард_Н]

Зависит от того, какие интерфейсы есть у модема.
Если есть оба и для RS-232 не требуются дополнительные пины (RTS/CTS и т.д.) - то разницы нет.

Модем конечно ваш, зачем огород городить.

[Эдуард_Н]

Здравствуйте, подскажите компонент модем теперь сам конфигурирует модем? Какую лучше скорость обмена с портом ставить?