Advertisement
Guest User

Untitled

a guest
Mar 18th, 2019
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.77 KB | None | 0 0
  1. @Tunnel Sensor Refresh{
  2. if Blink Lenght of Hangar Sensor Memory > 0
  3. {
  4. writeLine to Tunnel Hangar Display = "Lights On"
  5. Open of (Tunnel Hangar Doors) = True
  6. }
  7. else
  8. {
  9. writeLine to Tunnel Hangar Display = "Lights Off"
  10. Open of (Tunnel Hangar Doors) = False
  11. }
  12. }
  13.  
  14. @Variables{
  15. LightCount = Blink Lenght of Hangar Sensor Memory
  16. PrevCount = Math(Blink Lenght of Hangar Sensor Memory - 1)
  17. NextCount = Math(Blink Lenght of Hangar Sensor Memory + 1)
  18. }
  19. @Tunnel Sensor On{
  20. writeLine to Tunnel Hangar Display = "On"
  21. Blink Lenght of Hangar Sensor Memory = NextCount
  22. @Tunnel Sensor Refresh
  23. }
  24. @Tunnel Sensor Off{
  25. writeLine to Tunnel Hangar Display = "Off"
  26. if Blink Lenght of Hangar Sensor Memory > 0
  27. {
  28. Blink Lenght of Hangar Sensor Memory = PrevCount
  29. }
  30. @Tunnel Sensor Refresh
  31. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement