ПР 200 нужна помощь

[Dimensy]

Как вариант!

Так, я думаю, чуть лучше будет

Код:

function_block Level
    var_input
       Max : real;
       Val : real;
    end_var

    var_output
       L0  : bool;
       L1  : bool;
       L2  : bool;
       L3  : bool;
       L4  : bool;
       L5  : bool;
       L6  : bool;
       L7  : bool;
       L8  : bool;
       L9  : bool;
       L10 : bool;
       L11 : bool;
       L12 : bool;
       L13 : bool;
       L14 : bool;
       L15 : bool;
    end_var

    var
       delta : real;
       blink : SYS.BLINK;
    end_var

    delta := Max / 16;
    blink(I := true, Th := t#500ms, Tl := t#500ms); 
    L0  := Val > 0.5 * delta or (blink.Q and Val > 0);
    L1  := Val > 1.5 * delta or (blink.Q and Val > delta);
    L2  := Val > 2.5 * delta or(blink.Q and Val > delta * 2);
    L3  := Val > 3.5 * delta or (blink.Q and Val > delta * 3);
    L4  := Val > 4.5 * delta or (blink.Q and Val > delta * 4);
    L5  := Val > 5.5 * delta or (blink.Q and Val > delta * 5);
    L6  := Val > 6.5 * delta or (blink.Q and Val > delta * 6);
    L7  := Val > 7.5 * delta or (blink.Q and Val > delta * 7);
    L8  := Val > 8.5 * delta or (blink.Q and Val > delta * 8);
    L9  := Val > 9.5 * delta or (blink.Q and Val > delta * 9);
    L10 := Val > 10.5 * delta or (blink.Q and Val > delta * 10);
    L11 := Val > 11.5 * delta or (blink.Q and Val > delta * 11);
    L12 := Val > 12.5 * delta or (blink.Q and Val > delta * 12);
    L13 := Val > 13.5 * delta or (blink.Q and Val > delta * 13);
    L14 := Val > 14.5 * delta or (blink.Q and Val > delta * 14);
    L15 := Val > 15.5 * delta or (blink.Q and Val > delta * 15);

end_function_block

Но в таком виде 16 разрядов не очень информативен в количественной оценке. Должна быть целая пропорция, например 0..100% - 10 разрядов, 0..150 литров - 15 разрядов

[Cs-Cs]

Dimensy Ой! я думал, что у меня в коде простое деление и хотел ругнуться на то, что нафиг всё жёстко хардкодить в числах, а потом посмотрел свой и понял, что я сам лох - и тоже всё захардкодил. Вот мой вариант для диммера:
OWL-ProgressBar-1.gif OWL-ProgressBar-2.gif

[Dimensy]

Dimensy Ой! я думал, что у меня в коде простое деление и хотел ругнуться на то, что нафиг всё жёстко хардкодить в числах, а потом посмотрел свой и понял, что я сам лох - и тоже всё захардкодил. Вот мой вариант для диммера:

А не проще так?

Безымянный.png

[EFrol]

А не проще так?

Безымянный.png

Я почему и ратую за публичную помощь новичкам. Делая это - мы сами можем друг-друга многому научить!

[Dimensy]

Я почему и ратую за публичную помощь новичкам. Делая это - мы сами можем друг-друга многому научить!

Никто не против помощи новичкам. Просто, если просьба озвучена криво или звучит типа "сделайте мне это, я не могу (не хочу, мне лень и т.п.), то у многих гуру начинает одно место подгорать

[Cs-Cs]

А не проще так?

Во-во! Я не догадался про округление и сам-то подумал, что что-то не то сделал.

Я почему и ратую за публичную помощь новичкам. Делая это - мы сами можем друг-друга многому научить!

Тогда, когда эта помощь требуется. Тут видно (мне), что чел спрашивает по делу и готов делать. А не в стиле "Как сделать чтобы ворота открывались-закрывались на ПР завтра к утру"

[АРТ.Кар 64]

https://disk.yandex.ru/i/8pCAvPT5J5cWNA

Про сложности вычисления вроде как бы разговор у автора и не шёл,но...
Какой бы ни был "замысловатый макрос" на Экран нужно выводить не только "Шкалу",но и "Значение"
Раз был вопрос "Можно?"-то и ответ "Можно".

[maintenancekbk24@gmail.com]

Вот что получилось в итоге.

[kondor3000]

Вот что получилось в итоге.

Вам же EFrol, то же самое выложил, только универсальный ФБ, можно Мах менять и будет работать с любым числом.

[maintenancekbk24@gmail.com]

Вам же EFrol, то же самое выложил, только универсальный ФБ, можно Мах менять и будет работать с любым числом.

уже в работе прибор работает без нареканий.