Цикл WHILE

[EugeneMoor]

Добрый день.

Столкнулся с проблемой.

Не работает цикл While в коде (но работал в режиме эмуляции).

Используется ПЛК 200-01-CS.

Речь идет про подобные куски кода:


Суть следующая: приходит оператор, устанавливает несколько точек нагрева с удержанием в определенный промежуток времени при достижении уставки.

Значения, заданные оператором, с помощью оператора case и переменной изменения индекса этого самого case, все время хранятся в одной переменной, что позволяет корректно выполняться программе.

Если углубляться в работу, то установил оператор 2 уставки и задал время поддержания для каждой:
200 градусов 30 секунд
100 градусов 20 секунд
300 градусов 10 секунд

ПИД регулятор доводит температуру до 200, в течении 30 секунд поддерживает ее, после чего отключается.
Температура падает до 100. Как только значение текущей температуры <= 100, то запускается очередной таймер, но уже на 20 секунд.
После чего, температура вновь начинает расти до 300 градусов и держится 10 секунд.

И как раз таки, когда оператор указал температуру на понижение, то этот while позволяет мне удерживать цикл и не идти дальше...

Не могу решить проблему, потратил уже невероятно много времени.

Программированием недавно начала заниматься, поэтому за код не осуждайте(

Была задача, нужно было сделать, начал разбираться в программирование - дошел до этого.

Прикладываю частичную демонстрацию работу:
https://vk.com/video/@eugenemoor99?z...l_463512182_-2
https://vk.com/video/@eugenemoor99?z...l_463512182_-2

Буду рад любой помощи. Возможно кто-то сможет помочь за оплату. Прикладываю проект в том числе...

[МихаилГл]

Не нравится мне вайл... Может переделать на то что внутри на иф зэн, а то что снаружи на элсэ...?

[kondor3000]

Думаю удерживать автомат CASE на данном шаге, с помощью WHILE, это плохая идея. Автомат и так будет стоять на данном шаге, пока вы не сделаете управление шагом +1. Точнее программа будет работать, а шаг стоять.
Вот тут вам и надо думать. Предусмотреть все условия перехода. А WHILE вообще все выкинуть.

[МихаилГл]

Думаю удерживать автомат CASE на данном шаге, с помощью WHILE, это плохая идея. Автомат и так будет стоять на данном шаге, пока вы не сделаете управление шагом +1. Точнее программа будет работать, а шаг стоять.
Вот тут вам и надо думать. Предусмотреть все условия перехода. А WHILE вообще все выкинуть.

У ТС шаг прибавляется перед case... Это условие надо тоже внутрь IF ... THEN ... ELSE перемещать. А во-вторых, программа сильно громадная, ее надо сворачивать в условие FOR, реально ее в 5 раз уменьшить. Очень много лишних операций, вернее даже однотипных.

PS Например так (писалось в блокноте, надо проверять):

    IF tempReached = TRUE and not bit_x THEN
		bit_x:= TRUE; //бит, чтобы обрабатывать только один раз, после надо его снова сделать ложью
        flagOne:=false;
        holdingTimer(IN := FALSE, PT := T#0S);
        //currentTempIndex := currentTempIndex + 1; - это тут не надо
		currentTempIndex := 1; //как раз для первого опроса сойдет
	end_if
	t_ix:= t[currentTempIndex];//Массив температур
    IF t_ix > 0 and currentTempIndex <= 10 THEN
		    IF t_ix < xAi6 THEN 
                integral := 0.0;
                previousError := 0.0;
                xAo1 := 0;
                timerPID(IN := FALSE);
                mainflag:=true;            
			else
				mainflag:=false;
                tempReached:=false;
                targetTemp := t_ix; 
                holdingTime := TimeForCalibration; 
                tempReached:=FALSE;
				currentTempIndex := currentTempIndex + 1;				
            END_IF
	elsif currentTempIndex > 10 
            timerPID(IN := FALSE, PT := T#0s);
            TimeHeat(IN := FALSE, PT := T#0s);
            //holdingTimer(IN := FALSE, PT := T#0s);
            Calibration:=false;
            xAo1:=0;
            integral := 0.0;
            previousError := 0.0;
            //currentTempIndex:=1;
            MassiveForCalibration:=1;
            mainflag:=false;
			bit_x:= FALSE;////////////////////////////
	end_if

[EugeneMoor]

Спасибо! Сегодня попробую

[Cs-Cs]

1. Я позволю себе напомнить то, что в ПЛК программа выполняется так:
* Получает все входы
* Выполняет код программы
* Выдаёт то, что получилось, на выходы
То есть, WHILE в ПЛК прокрутится СРАЗУ и ЦЕЛИКОМ за один цикл работы ПЛК. Без промежуточных итераций.
Он не будет, как в СИ, крутиться постоянно.

2. Я тут вижу таймер timerPID. Он вызывается с IN = FALSE, но тогда, когда его надо остановить.
А где он вызывается для того, чтобы он РАБОТАЛ?
Может быть поможет подзаголовок 7 моей статьи: https://cs-cs.net/funkciya-fun-i-fun...n_tof_tp_blink

[Sergey666]

Добрый день.

Столкнулся с проблемой.

Не работает цикл While в коде
Программированием недавно начала заниматься, поэтому за код не осуждайте(

Забудьте вообще про циклы, это для опытных, тем более путь решения задачи через CASE выбран правильно, но с организацией цикла получилась полная каша.
При организации конечного автомата управление указателем производится из Стэйта, а на сначала, как у вас, повторяю у вас полный не рабочий говнокод. Учится и осваивать надо поступательно, а не все сразу.

[EugeneMoor]

Всем спасибо. Я справился. Сделал

if flagOne = true then
HoldingTimer (IN := TRUE, PT := holdingTime); // Запуск таймера поддержания
IF HoldingTimer.ET > T#90S THEN
CollectionTimer(IN := TRUE, PT := T#1S);
if CollectionTimer.Q = true then
targetMassive[Index] := xAi7;
Index := Index + 1;
CollectionTimer(IN := FALSE);
end_if
end_if
if HoldingTimer.Q = true THEN
tempReached := TRUE;
massiveReacher:=true;
currentTempIndex := currentTempIndex + 1;
end_if
end_if

IF tempReached = TRUE THEN
CASE currentTempIndex OF
2: IF t2 > 0 THEN
IF (T2<xAi6) THEN
integral := 0.0;
previousError := 0.0;
xAo1 := 0;
// Остановка таймера PID
timerPID(IN := FALSE);
mainflag:=true;
holdingTimer(IN := FALSE);
holdingTime := TimeForCalibration;
elsif (xAi6 <= T2) or (xAi6 <= targetTemp) then
targetTemp := t2;
holdingTimer(IN := FALSE);
holdingTime := TimeForCalibration;
flagOne:=false;
mainflag:=false;
tempReached:=FALSE;
end_if
END_IF

[Cs-Cs]

Во! Прям по моей статье: и циклы, которые работают не так, как в компьютерах, и вызовы таймеров в условиях. Были!
Молодец, здорово! Поздравляю!

[Валенок]

Во! Прям по моей статье: и циклы, которые работают не так, как в компьютерах, и вызовы таймеров в условиях. Были!
Молодец, здорово! Поздравляю!

С чем? 20 переменных на 40 строк одного блока? Юзать автомат а менять его где-то в бубенях (см.пост#7)?
С IF'ом вложенным в IF вложенным в CASE вложенным в IF? Глубина вложения не ограничена, чо.

Я справился. Сделал

Сделал. Как-то работает. Даихусим. Зачем только было показывать?