Advertisement
Guest User

Untitled

a guest
Jan 16th, 2018
70
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.62 KB | None | 0 0
  1. PROGRAM STEROWANIE
  2. VAR_EXTERNAL (*$AUTO*)
  3. END_VAR
  4. VAR
  5. DirUp: BOOL; (* Napełnianie / Opróżnianie *)
  6. END_VAR
  7.  
  8. (* Program sterowania zbiornikiem *)
  9. IF AUTO THEN
  10. IF START AND NOT ALM THEN
  11. IF NOT H1 OR DirUp THEN
  12. Z1 := TRUE;
  13. Z3 := FALSE;
  14. DirUp := TRUE;
  15. END_IF
  16. IF H3 OR NOT DirUp THEN
  17. Z1 := FALSE;
  18. Z3 := TRUE;
  19. DirUp := FALSE;
  20. END_IF
  21. ELSE
  22. Z1 := FALSE;
  23. Z2 := FALSE;
  24. Z3 := FALSE;
  25. IF ALM THEN
  26. AUTO := FALSE;
  27. END_IF
  28. END_IF
  29. END_IF
  30.  
  31. END_PROGRAM
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement