Создать функцию на ST

[Andrey G]

так на скрине же пишеться о том что break не нужен, программа сама выйдет из кейса не выполнив нижеследующие, я об этом с самого начала не пишу, но такой код бесмсленный об этом упоминал и по поводу Вашего радостного согласия с Валенком, прочитайте справку из ОЛ, бесконечный это цикл или не очень Вложение 62740

Да, там ошибка в справке.
попробуйте такую функцию на холст кинуть. Будет ошибка "программа зашла в бесконечный цикл"

function function1: bool; 
    var_input 
        inputVariable : bool; 
    end_var
    repeat
        
    until false
    end_repeat
    function1 := true;
end_function

Я Вас использовать exit таким образом не агитирую. Обходитесь без него - прекрасно. Зачем и в каких случаях я им пользуюсь написал, так как были заданы такие вопросы

[Andrey G]

я за документацию не отвечаю, я ей обычно верю. Хорошо ошибка, тогда все работает и exit и тот способ который я бы использовал вместо констант

У Вас case 2: никогда не выполняется.
Это так же видно по тому что блок на выходе всегда дает 1. Если бы цикл выполнился дважды, было бы 2

    repeat
        count := count + 1;
        case count of
            2:
                exit;
            1:
                foo := true;     // в первый проход цикла попадаем сюда
            else
        end_case;
    until foo  // условие выполнилось, выходим из цикла

В остальном я сейчас так же делаю, поскольку exit не работает.
exit не работает, по крайней мере после выполнения кода ниже count = 2. Правда с поддержки написали что вроде бы починили в последней версии.

    repeat
        count := count + 1;
        case count of
            2:
                count := 100;
                foo := true;
                exit;
            1:
                foo := false;
            else
        end_case;
    until foo
    end_repeat

[Andrey G]

в эмуляции отредактировать с 1 на 3 и проверить необходмио 10 секунд, считаете это проблема

попробуйте перед exit присвоение сделать, как ниже
Блок будет выдавать на выходе 2 вместо 100

    repeat
        count := count + 1;
        case count of
            2:
                count := 100;
                exit;
            3:
                foo := true;
            else
        end_case;
    until foo
    end_repeat

[Andrey G]

ну а я о чем говорил, exit тут не причем, с самим repeat что то не так

Это пусть разработчики разбираются, с exit, repeat или case у них проблема. Или со всем сразу )
Мне кажется что exit неправильно работает если вызывается внутри case, если его не использовать то отлично все работает

В функции вызывается exit, и она возвращает 2 вместо 105

        repeat
        count := count + 1;
        case count of
            1:
                foo := false;
            2:
                count := 105;
                foo := true;
                exit;
            else
        end_case;
    until foo
    end_repeat
    function1 := count;

та же функция, но вызов exit закомментирован. Работает правильно. Возвращает 105

        repeat
        count := count + 1;
        case count of
            1:
                foo := false;
            2:
                count := 105;
                foo := true;
                //exit;
            else
        end_case;
    until foo
    end_repeat
    function1 := count;

[Andrey G]

Ну раз верно работает теперь уберите все что относится к репит и убедитесь что он лишний

Если убрать repeat то функция будет выдавать 1, а не 105

[melky]

Ну так exit не относится к case, чего вы от него хотите? мозги ожидают либо следующего case, если вдруг не совпало предыдущее, а ему НА на выход иди

пытаюсь переварить код со своей колокольни, а чего там еще else делает? он от кого там?

[Andrey G]

Ну так exit не относится к case, чего вы от него хотите? мозги ожидают либо следующего case, если вдруг не совпало предыдущее, а ему НА на выход иди

пытаюсь переварить код со своей колокольни, а чего там еще else делает? он от кого там?

else в данном примере не нужен, просто у capzap был, я не стал убирать.
ограничений на использование exit не накладывается. Главное чтобы внутри цикла был. По крайней мере в в реализации CodeSys работает.
Может есть реализации где во вложенных операторах ветвления нельзя exit вызывать. Но в этом случае компилятор должен ошибку выдать, хотя бы.

[Andrey G]

Ну ведь потому что заходя в кейс счётчик имеет значение 1, а в единице ни каких присвоений нет, так что все верно

Верно. А в кейс 2, где есть присваивание он никогда не попадает, потому что нет repeat.
То есть repeat там не был лишним, если мы по прежнему ожидаем 105 на выходе

[Andrey G]

Для чего он?
Чтоб в одном блоке что то посчитать, перейти в другой опять что то посчитать, допустим перейти в третий и ещё продолжить вычисления и дать результат на выход При всех этих шагах входные условия не изменяются, зачем эта карусель?
Надеюсь хоть идемпотентность функции не нарушается иначе не место таким программистами в промавтоматике

Не знаю для чего. Пример то Вы написали

[SiriusMan]

Добрый день. подскажите как в Функции на ST в Owen Logic работать с датами и временем