PROGRAM PRG_3
VAR
Mech1 :BYTE:= 2#0001;
Mech2 :BYTE:= 2#0011;
Mech3 :BYTE:= 2#0111;
Mech4 :BYTE:= 2#1111;
Stop1 : TP:= ( PT := T#1s);
Start1 : TP:= ( PT := T#1s);
Stop2 : TP:= ( PT := T#1s);
Start2 : TP:= ( PT := T#1s);
Stop3 : TP:= ( PT := T#1s);
Start3 : TP:= ( PT := T#1s);
Stop4 : TP:= ( PT := T#1s);
Start4 : TP:= ( PT := T#1s);
Fan: WORD;
Do1: BOOL;
Do2: BOOL;
Do3: BOOL;
Do4: BOOL;
END_VAR
(************************************************* **********)
Fan:= Mech1 OR Mech2 OR Mech3 OR Mech4;
Start1(IN:=Fan.0,Q=>Do1 );
Stop1(IN:=NOT Fan.0,Q=>Do1 );