ST функции OWEN Logic

[askaev]

Ну вы даете, прямо над вами в предыдущем сообщении, последняя ссылка на Логарифмы любого формата. Универсальный логарифм с изменяемым основанием и изменяемой функцией.

Задумался и пропустил как-то. Спасибо! Отправляюсь изучать и применять.

[ПавелП]

Привет всем.

В документации Язык программирования ST описька небольшая

IF Time_1 :=T#0ms THEN

Как я понимаю, структура ST в OL повторяет CodeSYS на 100%?
Те реализации работы со временем аналогичны.

VAR    
      Time_1 : TIME:=T#0ms;    
      Time_2 : TIME:=T#0ms;    
      Q : BOOL:=FALSE;  
END_VAR

IF  Time_1 :=T#0ms     THEN       
     Time_1 :=GET_TIME();
END_IF  

Time_2 :=GET_TIME();

IF (Time_2 - Time_1) >=T#1000ms  THEN    
     Q :=NOT Q;    
     Time_1 :=T#0ms;    
     Time_2 :=T#0ms;
END_IF

// добавляйте, пожалуйста, комментарии по алгоритму,
// желательно в каждую строку

Схема опператора IF.png

Избыточной информации в документации не бывает.

[ПавелП]

Продолжаю работать с документацией.

Очередная описька:

Вложение 73722

[Королев Кирилл]

Продолжаю работать с документацией.

Очередная описька:

Вложение 73722

Вложение не открывается. Продублируйте, пожалуйста

[ПавелП]

Вложение не открывается. Продублируйте, пожалуйста

У меня открывается.

Вот ещё:

изображение_2024-02-21_105259830.png

[ПавелП]

У меня открывается.

Вот ещё:

изображение_2024-02-21_105259830.png

Так никто ничего и не исправил.
А почему с 21.02.2024? А потому!

[Gans]

Всем добрый день.
Пытался объявить массив таймеров вот так "arrTon: array [1..3] of SYS.TON;". Оказалось так не работает(
Возник вопрос: как объявить массив таймеров, тригеров и тд.?
Такое возможно в OWEN Logic?

[kondor3000]

Всем добрый день.
Пытался объявить массив таймеров вот так "arrTon: array [1..3] of SYS.TON;". Оказалось так не работает(
Возник вопрос: как объявить массив таймеров, тригеров и тд.?
Такое возможно в OWEN Logic?

Массив TON в ОЛ объявить не получится, не работает. Делайте с отдельными TON.

[kondor3000]

Для тех, кто хочет поломать голову в свободное время, на днях столкнулся со сборкой REAL из 2 WORD в этой теме https://owen.ru/forum/showthread.php?t=39248&page=4#39
Открыл что было быстрее, в ОЛ программу сборки от capzap ( когда то он её выложил в одной из тем), программу проверял в нескольких пределах, всё работало правильно.
Ввёл числа 52429 и 16268 и получил 0.1 1 Сборка REAL.jpg Потом проверил в другой программе Codesys 2.3 , получил 1.1 1 Передача REAL_2.jpg
Позже оказалось что Функция arrWToReal, врёт только на пределе от 1.0 до 1.99999 и от -1.0 до -1.99999, на остальных пределах считает правильно.
Вопрос, где ошибка в коде функции arrWToReal ?

Выложил вариант в Лоджике и в Codesys 2.3, кому как удобнее.
В Codesys 2.3, для сравнения функция через указатели, считает правильно.
Сам пока решил, вводом дополнительной строки в конце функции.

[capzap]

Для тех, кто хочет поломать голову в свободное время, на днях столкнулся со сборкой REAL из 2 WORD в этой теме https://owen.ru/forum/showthread.php?t=39248&page=4#39
Открыл что было быстрее, в ОЛ программу сборки от capzap ( когда то он её выложил в одной из тем), программу проверял в нескольких пределах, всё работало правильно.
Ввёл числа 52429 и 16268 и получил 0.1 1 Сборка REAL.jpg Потом проверил в другой программе Codesys 2.3 , получил 1.1 1 Передача REAL_2.jpg
Позже оказалось что Функция arrWToReal, врёт только на пределе от 1.0 до 1.99999 и от -1.0 до -1.99999, на остальных пределах считает правильно.
Вопрос, где ошибка в коде функции arrWToReal ?

Выложил вариант в Лоджике и в Codesys 2.3, кому как удобнее.
В Codesys 2.3, для сравнения функция через указатели, считает правильно.
Сам пока решил, вводом дополнительной строки в конце функции.

я посмотрел другие примеры, в них отсутствет такой код

if exponent = 0 then
    mant_mult := 0;
else
    mant_mult := 1;
end_if;

вместо него надо просто записать mant_mult := 1;