преобразования

[Игорь Петров]

В лоб число в строку в десятичном виде совсем просто str1 := INT_TO_STRING(x);

В 16-ый формат так не получится. Я бы написал под это отдельную функцию для преобразования из байта в строку в 16-ом формате:

FUNCTION Byte_to_hex_str : STRING
VAR_INPUT
byIn : BYTE;
END_VAR
VAR CONSTANT
saHEX: ARRAY [0..15] OF STRING(1) := '0','1','2','3','4','5','6','7','8','9','A','B','C ','D','E','F';
END_VAR

Byte_to_hex_str := CONCAT(saHEX[SHR(byIn,4)],saHEX[byIn AND 16#0F]);

Есть очень интересная бесплатная биб-ка для систем автоматизации зданий и не только, вкл. всякие полезные штуки. Надо зайти на сайт OSCAT (он на немецком), в верху в меню жмем oscat.lib 1.6 fur CoDeSys – закачать.

[Gans]

В лоб число в строку в десятичном виде совсем просто str1 := INT_TO_STRING(x);

В 16-ый формат так не получится. Я бы написал под это отдельную функцию для преобразования из байта в строку в 16-ом формате:

FUNCTION Byte_to_hex_str : STRING
VAR_INPUT
byIn : BYTE;
END_VAR
VAR CONSTANT
saHEX: ARRAY [0..15] OF STRING(1) := '0','1','2','3','4','5','6','7','8','9','A','B','C ','D','E','F';
END_VAR

Byte_to_hex_str := CONCAT(saHEX[SHR(byIn,4)],saHEX[byIn AND 16#0F]);

В строчке:
saHEX: ARRAY [0..15] OF STRING(1) := '0','1','2','3','4','5','6','7','8','9','A','B','C ','D','E','F';
ошибка, необходимо заменить на:
saHEX: ARRAY [0..15] OF STRING := '0','1','2','3','4','5','6','7','8','9','A','B','C ','D','E','F';

и + огромное СПАААСИИИБООО!!! ОЧЕНЬ помогло:-)

[Gans]

Здравствуйте.

В лоб число в строку в десятичном виде совсем просто str1 := INT_TO_STRING(x);

В 16-ый формат так не получится. Я бы написал под это отдельную функцию для преобразования из байта в строку в 16-ом формате:

FUNCTION Byte_to_hex_str : STRING
VAR_INPUT
byIn : BYTE;
END_VAR
VAR CONSTANT
saHEX: ARRAY [0..15] OF STRING(1) := '0','1','2','3','4','5','6','7','8','9','A','B','C ','D','E','F';
END_VAR

Byte_to_hex_str := CONCAT(saHEX[SHR(byIn,4)],saHEX[byIn AND 16#0F]);

В строчке:
saHEX: ARRAY [0..15] OF STRING(1) := '0','1','2','3','4','5','6','7','8','9','A','B','C ','D','E','F';

Необходимо убрать лишний пробел заменить 'C ' на 'C'.
Нашел и ткнул носом Цапзап.

[bort992]

Совсем запутался. Задача такая, есть переменная STRING с номером абонента '9051458992', это значение нужно разбить пополам "90514" и "58992" в формате DWORD и отправить на панель Скады. Помогите пожалуйста

[capzap]

Совсем запутался. Задача такая, есть переменная STRING с номером абонента '9051458992', это значение нужно разбить пополам "90514" и "58992" в формате DWORD и отправить на панель Скады. Помогите пожалуйста

а запутались то в чем, какие функции использовали

[bort992]

Petera, спасибо вам!!! А я искал в других библиотеках.

[petera]

Совсем запутался. Задача такая, есть переменная STRING с номером абонента '9051458992', это значение нужно разбить пополам "90514" и "58992" в формате DWORD и отправить на панель Скады. Помогите пожалуйста

Функции из standart.lib
LEFT
RIGHT
и два раза STRING_TO_DWORD

PROGRAM PLC_PRG
VAR
	strNumber: STRING(10);
	loDWORD: DWORD;
	hiDWORD: DWORD;
END_VAR
loDWORD:= STRING_TO_DWORD(RIGHT(strNumber, 5));
hiDWORD:= STRING_TO_DWORD(LEFT(strNumber, 5));