Как получить ASCII-код символа в Codesys?

Мне нужно получить байтовый код символа в Codesys (на языке ST). Как это сделать?
Например, в C++ все довольно просто:
int c = 'h';
А в Codesys как?
т.е. есть строка:
sTmp: STRING(10) := '12345678';
мне нужно получить 5-й символ:
IF sTmp[4] = 5 THEN .... - ошибка!

Цитата:

---

FUNCTION CODE : BYTE
VAR_INPUT
STR : STRING(STRING_LENGTH); (*Строка*)
POS : INT; (*Позиция*)
END_VAR
VAR
PT : POINTER TO BYTE;
END_VAR

IF pos < 1 OR pos > LEN(str) THEN
CODE := 0;
RETURN;
ELSE
PT := ADR(STR) + INT_TO_DWORD(pos - 1);
CODE := pt^;
END_IF;

---

Почитайте про библиотеку Oscat

Цитата:

---

Сообщение от Николай Суриков

Почитайте про библиотеку Oscat

---

Ругается, что не определено STRING_LENGTH

VAR_GLOBAL CONSTANT
STRING_LENGTH : INT := 250;
END_VAR

В библиотеках оскат есть функция code, она возвращает код символа.

Но можно просто навести указатель на нужный байт.

Спасибо, получилось!

Еще вопрос по работе со строками.

Код:

---

s1 : STRING := "12345678';
s2 : STRING := '';
x : INT;

FOR x := 0 TO LEN( s1 ) DO
  ...
  s2 := CONCAT( s2, s1[x] );
END_FOR

---

по идее на выходе s2 должна быть копией s1, но там коды символов вместо самих символов.
я так понимаю, что s1[x] нужно перевести в строку?
как исправить?

а чем

Код:

---

s2 := s1;

---

не нравится?

Цитата:

---

Сообщение от -=Vovka=-

Еще вопрос по работе со строками.

Код:

---

s1 : STRING := "12345678';
s2 : STRING := '';
x : INT;

FOR x := 0 TO LEN( s1 ) DO
  ...
  s2 := CONCAT( s2, s1[x] );
END_FOR

---

по идее на выходе s2 должна быть копией s1, но там коды символов вместо самих символов.
я так понимаю, что s1[x] нужно перевести в строку?
как исправить?

---

Какую именно задачу вы пытаетесь решить и какой у вас контроллер?

Цитата:

---

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

а чем

Код:

---

s2 := s1;

---

не нравится?

---

не нравится тем, что это цикл парсинга строки! И я привел проблемный фрагмент, остальное заменив многоточием

Цитата:

---

Сообщение от -=Vovka=-

Еще вопрос по работе со строками.

Код:

---

s1 : STRING := "12345678';
s2 : STRING := '';
x : INT;

FOR x := 0 TO LEN( s1 ) DO
  ...
  s2 := CONCAT( s2, s1[x] );
END_FOR

---

по идее на выходе s2 должна быть копией s1, но там коды символов вместо самих символов.
я так понимаю, что s1[x] нужно перевести в строку?
как исправить?

---

Код:

---

VAR
        s1 : STRING := '12345678';
        s2 : STRING := '';
        x : INT;
END_VAR
IF LEN(s1) <> LEN(s2) THEN
FOR x := 1 TO LEN( s1 ) DO
  s2 := CONCAT( s2, MID(s1,1,x) );
END_FOR
END_IF

---

Цитата:

---

Сообщение от Евгений Кислов

Какую именно задачу вы пытаетесь решить и какой у вас контроллер?

---

Парсинг строки в структуру (в ней строки и числа). Данные разделены либо 0x0A либо 0x0D 0x0A
ПЛК210

Цитата:

---

Сообщение от -=Vovka=-

Парсинг строки в структуру (в ней строки и числа). Данные разделены либо 0x0A либо 0x0D 0x0A
ПЛК210

---

А зачем в рамках этой задачи посимвольное копирование строк?

Цитата:

---

Сообщение от -=Vovka=-

не нравится тем, что это цикл парсинга строки! И я привел проблемный фрагмент, остальное заменив многоточием

---

Тогда так:

Код:

---

        FOR xxx := 1 TO LEN(s1) - 1 DO
                s2 := CONCAT(s2, MID(s1, 1, xxx));
        END_FOR

---

petera, спасибо!
Оказывается в кодесисе поменяны местами два последних параметра!
В си, php сначала идет позиция, а потом длина!
И самое приятное это то, что первая позиция начинается с 1

Подскажите, в как получить символ по его коду?
Например, мне нужен символ с кодом 0.

Цитата:

---

Сообщение от ВладОвен

Подскажите, в как получить символ по его коду?
Например, мне нужен символ с кодом 0.

---

Для CODESYS V3.5 (вы же о нем спрашиваете? тогда написали вопрос не в том разделе):

Код:

---

VAR
  sChar:  STRING(1);
END_VAR

sChar[0] := 0;

---