Прошу помощи с ST

[FallenDAY]

немного грубо, но работает
VAR
Start: BOOL;
RPD: BOOL;
Fan1, Fan2: BOOL;
TP1,TP2: TP;
Alarm: BOOL;
END_VAR

TP1(IN:=Start, PT:=t#10s);
Fan1:=TP1.Q OR (Start AND RPD AND NOT Fan2);
TP2(IN:=(Start AND NOT Fan1), PT:=t#10s);
Fan2:=TP2.Q OR (Start AND RPD AND NOT Fan1);
Alarm:=Start AND NOT Fan1 AND NOT Fan2;

Благодарю))) А я там намудрил, оказалось элементарно)