n="justify"> (* ======================== ручне включення електропривода ============= ============ *) _R1: IF (statusport (di14)=TRUE) (* якщо натиснута кнопка пуску електроприводу ЗРК *)
THEN
OPEN_SHTORKA (di_0=di15; do_0=do5, ao_0=ao12); (* відкриття жалюзі воздуховходного вікна *)
setport (24, do1, infinite); (* Включити електропривод ЗРК *)
setport (12, a01); (* Відкрити заслінку ЗРК на половину *)
JMP (MET1); _IF;
ELSE
JMP (MET_R2);
END_ELSE;
END_IF;
(* =============== автоматичне включення електропривода ЗРК і відкриття жалюзі =============== *): OPEN_SHTORKA (di_0=di15; do_0=do5, ao_0=ao12); (* Виклик функц. Блоку <ім'я блоку> (<вхідні змінні>; <вихідні змінні>; <внутр. Змінні>); *)
setport (24, do1, infinite); (* Включити електропривод ЗРК *)
setport (12, a01); (* Відкрити заслінку ЗРК на половину *) (* ================== ручне включення електропривода ЗРК і відкриття жалюзі ============== ==== *) _R2: OPEN_SHTORKA (di_0=d125; do_0=do5, ao_0=ao12);
setport (24, do1, infinite); (* Включити електропривод ЗРК *)
setport (12, a01); (* Відкрити заслінку ЗРК на половину *)
(* ======================== перевірка на зупинку роботи системи =========== =============== *): IF ((statusport (di14)=TRUE) AND (statusport (di17)=FALSE))
THEN
JMP (START);
ELSE
JMP (STOP);
END_IF;
(* ============================= зупинка пристроїв системи ======== ====================== *): IF (((statusport (di4)=TRUE) AND (statusport (di17)=FALSE))
THEN
setport (0, ao1); (* Встановити ЗРК в положення-закрито *)
CLOSE_SHTORKA (di_0=di16; do_0=do6, ao_0=ao12);
setport (24, ao12); (* Погасити світлодіод" Мережа *)
setport (0, do1, infinite); (* Зупинити електропривод ЗРК *)
END_IF;
(* ==================== неіспрвность в ЗРК - сигнал з датчика електроприводу ============ ======== *)
IF (statusport (di20)=TRUE)
THEN
IF (i3=0)
setport (18, ao12); (* Запалити світлодіод «Несправність ЗРК» *)
i3=1;
JMP (STOP)
END_IF;
(* ================================ забруднення фільтрів ====== ========================= *)
IF (statusport (di6)=TRUE) or (statusport (di7)=TRUE) or (statusport (di8)=TRUE) or (statusport (di9)=TRUE)
THEN
IF (i1=0)
setport (19, ao12); (* Запалити світлодіод «Фільтр засмічений» *)
i1=1;
JMP (STOP)
END_IF;
END_IF;
IF (hand_time=1)
THEN
JMP...