В принципе нормальное решение. Спасибо за совет
Вид для печати
По поводу комментарий согласен. Как писал ранее, за комментарий знаю, просто в этой итоговой программе опустил их. Программу начинал с самого начала несколько раз и по началу все комментировал. Ну и как не странно, порой из-за нехватки времени или энергии, после трудового дня, забрасывал все на 1-1,5 недели и потом возвращаясь к ней буквально за 5-10 минут понимал, что куда и откуда без комментов.
По поводу названий шагов можете пример привести? Просто тот же Сергей Романов так же называет шаги 0,1,10,20 и т.д.
Спасибо, попробую
Создаёте новый тип данных enStep (на вкладке типы данных) с примерно таким содержимым (имена и числа произвольно):
В программе используете например так:Код:TYPE enStep : (
gciStopped := 0, (* Остановлен *)
gciRun := 1, (* Запущен *)
gciPause := 10, (* Пауза *)
gciDelay := 30, (* Задержка *)
gciAvar := 31 (* Авария *)
);
END_TYPE
С типом данных "перечисление" можно работать, как с типом данных "INT"Код:
Step: enStep; (* Объявление *)
...
IF ALARM THEN Step:=gciAvar; END_IF
...
IF Step=gciPause AND ...
...
CASE Step OF
gciRun: RED:=TRUE; GREEN:=FALSE; YELLOW:=FALSE; ZOOMER:=FALSE;
...