Вы действительно думаете, что кто-то будет вникать в этот код без единого комментария, выискивая соответствия между обозначениями в программе и ТЗ?
Да вы сами через месяц не вспомните что делаете в той или иной строке.
Используйте тип перечисление с осмысленными названиями для нумерации шагов.
Зачем сделаны присваивания выходов ФБ промежуточным переменным вроде
TP1(IN:=TP1_IN , PT:=T#5s , Q=>TP1_Q , ET=>TP1_ET );
чтобы потом написать
ZOOMER:=TP1_Q; ?
так можно сразу написать:
ZOOMER:=TP1.Q;
Аналогично вместо TP1_IN := FALSE; можно сразу писать TP1.IN := FALSE; , опуская потом IN при вызове ФБ TP1





Ответить с цитированием