ST функции OWEN Logic

Цитата:

---

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

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

---

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

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

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

Цитата:

---

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

Для тех, кто хочет поломать голову в свободное время, на днях столкнулся со сборкой REAL из 2 WORD в этой теме https://owen.ru/forum/showthread.php?t=39248&page=4#39
Открыл что было быстрее, в ОЛ программу сборки от capzap ( когда то он её выложил в одной из тем), программу проверял в нескольких пределах, всё работало правильно.
Ввёл числа 52429 и 16268 и получил 0.1 Вложение 74640 Потом проверил в другой программе Codesys 2.3 , получил 1.1 Вложение 74641
Позже оказалось что Функция 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;

Если верить Число одинарной точности
то:
Вложение 74658
получается:

Код:

---

..
    exp_raw := shr(stuffAdd, 23) mod 256;
    mantissa := stuffAdd mod 8388608;
    if exp_raw = 0 then
        mantissa := mantissa + 8388608;
    end_if;

    exponent := udint_to_real(exp_raw) - udint_to_real(127);
    mant_mult := 1;
..

---

Цитата:

---

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

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

Код:

---

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

---

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

---

Согласен, так считает правильно, у меня получилось немного длиннее)))
Выкладываю исправленные варианты.

ЗЫ: Добавляю, при 0 результат не верный, правильно так

Код:

---

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

---

Цитата:

---

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

..Выложил вариант в Лоджике..

---

секунда перфекционизма
Внешняя часть. А внутренности сами выше разобрали

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

---
и вот например

Код:

---

negative := shr(stuffAdd, 31) > 0;

---

==

Код:

---

negative := stuffAdd.31;

---

это ж не какое-то там си ))

Цитата:

---

Сообщение от Валенок

секунда перфекционизма
Внешняя часть. А внутренности сами выше разобрали

А что может сподвигнуть на использования этого?

---

Этот вариант у меня уже давно есть, только в выложенном варианте опять ошибка, получается 0.1 Вложение 74662 а здесь правильно 1.1 Вложение 74663

Цитата:

---

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

в выложенном варианте опять ошибка...

---

))

Цитата:

---

А внутренности сами выше разобрали

---

я туда не лазил. Вам верю

Цитата:

---

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

А с 31 битом в Лоджике проблемы и уже давно, ждём когда исправят, поэтому так не катит.

---

Катит. Это ж функция а не фБ. В нем не катит чего то.
Да и ДО того как сделаться 31-ым, он 15-й

Цитата:

---

Сообщение от Валенок

Катит. Это ж функция а не фБ. В нем не катит чего то.
Да и ДО того как сделаться 31-ым, он 15-й

---

В функциях этот баг был исправлен ранее, в ФБ исправим и выпустим в ближайшем хотфиксе