ST функции OWEN Logic

[Валенок]

.. Надеюсь мы сюда не в баню ходим а смотрим для чего тема создавалась и поменьше спамим.

Я очень рад что вы с кем-то на пару смотрите для чего тема создавалась и меньше спамите. Такое редкость сейчас. Особенно про создание темы и чтение всей ветки.

А касаемо лично Вашего ключика к счастью - так часто требуется индексный доступ к входам/выходам? У Вас там релюшки сами прыгают с места на место?

[Armorgan]

Кто нибудь знает как написать функцию random на языке ST?

[capzap]

Кто нибудь знает как написать функцию random на языке ST?

все алгоритмы случайных чисел запоминают предыдущее значение, поэтому функцию ни как, или макрос или ФБ

[Armorgan]

А может кто-нибудь объяснить как с помощью команды get_time() привязаться не к миллисекундам, а к секундам?

[Dimensy]

А может кто-нибудь объяснить как с помощью команды get_time() привязаться не к миллисекундам, а к секундам?

На 1000 разделите, получите секунды

[МихаилГл]

Кто нибудь знает как написать функцию random на языке ST?

все алгоритмы случайных чисел запоминают предыдущее значение, поэтому функцию ни как, или макрос или ФБ

Буквально вчера для эмулятора модбас сервера придумывал... На аляпаскале:

var
  H, M, S, mS: Word;
  I: Integer;
  J: Integer;
begin
  if (Reg_13= 0) and (J= 0) then
  begin
    J:= 1;
    DecodeTime(Now,H,M,S,mS);
    self:= H + 100 * M + S + mS;
  end;
  if (Reg_13<> 0) and (J= 1) then
  begin
    J:= 0;
  end;
end;

Может на лоджике такое же возможно...

[borzov161]

Очень нравится ST и то что вы сделали. Хотелось бы менять размер шрифта (масштаб) в редакторе ST. Особенно на экране Full HD маловато.
Еще нет битовых операций, чтение бита, запись бита,...
Просматривал свои программы 2020 года и вижу небо и земля. Как намного легче стало с ST.
Спасибо разработчикам. В этом году приобрели несколько овенов. Сижу пишу в ST, просто сказка. почти как СИ.

[EFrol]

Очень нравится ST и то что вы сделали. Хотелось бы менять размер шрифта (масштаб) в редакторе ST. Особенно на экране Full HD маловато.
Еще нет битовых операций, чтение бита, запись бита,...
Просматривал свои программы 2020 года и вижу небо и земля. Как намного легче стало с ST.
Спасибо разработчикам. В этом году приобрели несколько овенов. Сижу пишу в ST, просто сказка. почти как СИ.

Очень нравится?! А руководство по программированию не читаете!
А ну проверьте:

function setBit5: udint;    // Установка 5-го бита во входном числе
    var_input
        in : udint;
    end_var
    
    setBit5 := in;
    setBit5.5 := true;
    
end_function

[borzov161]

не смог найти. просмотрел несколько раз. может не там смотрю. помогите плиз где это написано2024-12-04_22-35-14.png
кроме этого.

[borzov161]

Очень нравится?! А руководство по программированию не читаете!
А ну проверьте:

function setBit5: udint;    // Установка 5-го бита во входном числе
    var_input
        in : udint;
    end_var
    
    setBit5 := in;
    setBit5.5 := true;
    
end_function

помогите пожалуйста. Не смог найти в руководстве ST. Как читать bit