Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (*** Regulacja temperatury cieczy (p.6) ***)
- T1X:=REAL_TO_INT(200.0*T1);
- T2X:=REAL_TO_INT(200.0*T2);
- IF(START=TRUE AND AUTO=TRUE) THEN
- IF(T2X<(T1X-50)) THEN (* Warunek wł. grzałki G1 *)
- G1:=TRUE; (* Włączenie grzałki G1 *)
- END_IF
- IF(T2X>(T1X+50)) THEN (* Warunek wył. grzałki G1 *)
- G1:=FALSE; (* Wyłączenie grzałki G1 *)
- END_IF
- END_IF
- (*** Sygnalizacja alarmów (p.5) ***)
- IF(P1=TRUE)THEN (* Jeśli przekroczono ciśnienie P1 *)
- ALM:=TRUE; (* Włączenie alarmu *)
- END_IF
- IF(H2=TRUE)THEN (* Jeśli poziom cieczy > 50% wys. zbiornika *)
- IF (H1=FALSE) THEN (* i jeśli poziomu cieczy < 10% wys. zbiornika *)
- ALM:=TRUE; (* Włączenie alarmu *)
- END_IF
- END_IF
- IF(H3=TRUE)THEN
- IF (H2=FALSE) THEN
- ALM:=TRUE;
- END_IF
- IF (H1=FALSE) THEN
- ALM:=TRUE;
- END_IF
- END_IF
- IF(G1=TRUE AND H1=FALSE) THEN
- ALM:=TRUE;
- END_IF
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement