T; (* Лічильник *) _VAR
setport (Ushtr, do_0, infinite); (* Закрити жалюзі воздуховходного вікна *)
DELAY (tzad_shtr);
resetport (di_0); (* Очистити буфер обміну порту *)
IF (statusport (di_0)=TRUE) (* шибер не закрили - аварійна ситуація *)
THEN
setport (Udiod_shtr, ao0); (* Погасити світлодіод «Жалюзі закриті» *)
FOR check1:=0 TO 200 DO (* миготіння лампочкою «Жалюзі не зачинилися» *)
setport (Udiod_shtr_avaria, ao0);
DELAY (3000); (* Тривалість світіння - 3 с. *)
check1:=check1 +1; (Час миготіння - 10 хв.)
END_FOR;
JMP (STOP1); («Аварійний вихід з блоку - зупинка роботи системи») END_IF; (Udiod_shtr, ao12); (* Погасити світлодіод «Жалюзі закриті» *); (* Вихід з функц. Блоку *) _FUNCTION_BLOCK
(*=============================================================================*)U_PROG
(* оголошення змінної *)
(* оголошення блоку констант *)
const t_regulirovki=30: REAL;
(* лічильники *)
i=0, i1=0, i2=0: INT;
hand_time=0: INT; _VAR
(* опис змінних підтримки портів введення-виведення, змінні типу «PORT» *) _INPUT
(* датчики положення жалюзі, дискретні *)
di15=in_port_d_15, di16=in_port_d_16: PORT;
(* датчики тиску води, аналогові *)
di1=in_port_d_1, di2=in_port_d_2, di3=in_port_d_3, di4=in_port_d_4: PORT;
(* сигнал з сітчастого фільтра, дискретний *)
di6=in_port_d_6, di7=in_port_d_7, di8=in_port_d_8, di9=in_port_d_9: PORT;
(* датчик температури на вході в градирню, аналоговий *)
ai10=in_port_a_10: PORT;
(* датчик температури на виході з градирні, аналоговий *)
ai11=in_port_a_11: PORT;
(* сигнал з насосної станції, дискретний - сама насосна станція не розглядається, важливо тільки працює вона чи ні *)
di17=out_port_d_17: PORT;
(* електропривод оснащений датчиком, що сигналізує некоректну роботу клапана з заслінкою, в даній програмі нам важливий тільки сигнал - справний чи ні клапан *)
di20=out_port_d_20: PORT;
(* кнопкові пускачі, дискретні, згідно 5.6 *)
di12=in_port_d_12,di13=in_port_d_13,di14=in_port_d_14,di18=in_port_d_18,di19=in_port_d_19:PORT;_VAR_OUTPUT
(* запуск електродвигуна ЗРК, дискретний *)
do1=out_port_d_1: PORT;
(* управління воздуховходнимі пристроями, дискретні *)
do5=out_port_d_5, do6=out_port_d_6: PORT;
(* управління електроприводом запірно-регулюючого клапана, аналоговий *)
ao1=out_port_a_1: PORT;
(* управління світлодіодним панеллю, аналогови...
