Advertisement
rhn

Reactor Airlock

rhn
Jul 19th, 2014
326
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 4.78 KB | None | 0 0
  1. mouseWidth = 0
  2. mouseHeight = 0
  3.  
  4. monitor = peripheral.wrap("top")
  5.  
  6. monitor.clear()
  7.  
  8.  
  9. monitor.setCursorPos(1,1)
  10.  
  11. w,h=monitor.getSize()
  12.  
  13. print(w)
  14. print(h)
  15.  
  16. -- Draw buttons
  17. monitor.setCursorPos(1,1)
  18. monitor.write("Airlock")
  19. monitor.setCursorPos(1,2)
  20. monitor.write("Control")
  21.  
  22. monitor.setBackgroundColour((colours.lime))
  23. monitor.setCursorPos(1,4)
  24. monitor.write(" Exit  ")
  25.  
  26. monitor.setBackgroundColour((colours.green))
  27. monitor.setCursorPos(1,6)
  28. monitor.write("Reactor")
  29.  
  30. monitor.setBackgroundColour((colours.green))
  31. monitor.setCursorPos(1,8)
  32. monitor.write(" Fuel  ")
  33. monitor.setCursorPos(1,9)
  34. monitor.write("  Lab  ")
  35.  
  36. monitor.setBackgroundColour((colours.green))
  37. monitor.setCursorPos(1,11)
  38. monitor.write(" Power ")
  39. monitor.setCursorPos(1,12)
  40. monitor.write("Distrib")
  41.  
  42. monitor.setBackgroundColour((colours.black))
  43.  
  44.  
  45.  
  46. -- Check click function
  47.  
  48. function checkClickPosition()
  49.   if mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 4 then
  50.     -- button Exit clicked (white)
  51.     monitor.setBackgroundColour((colours.lime))
  52.     monitor.setCursorPos(1,4)
  53.     monitor.write(" Exit  ")
  54.  
  55.     monitor.setBackgroundColour((colours.green))
  56.     monitor.setCursorPos(1,6)
  57.     monitor.write("Reactor")
  58.  
  59.     monitor.setBackgroundColour((colours.green))
  60.     monitor.setCursorPos(1,8)
  61.     monitor.write(" Fuel  ")
  62.     monitor.setCursorPos(1,9)
  63.     monitor.write("  Lab  ")
  64.  
  65.     monitor.setBackgroundColour((colours.green))
  66.     monitor.setCursorPos(1,11)
  67.     monitor.write(" Power ")
  68.     monitor.setCursorPos(1,12)
  69.     monitor.write("Distrib")
  70.  
  71.     monitor.setBackgroundColour((colours.black))
  72.  
  73.         redstone.setBundledOutput("bottom", colours.white+colours.orange+colours.magenta+colours.lightBlue)
  74.     sleep(1)
  75.     redstone.setBundledOutput("bottom", colours.orange+colours.magenta+colours.lightBlue)
  76.  
  77.   elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 6 then
  78.     -- button Reactor clicked (orange)
  79.     monitor.setBackgroundColour((colours.green))
  80.     monitor.setCursorPos(1,4)
  81.     monitor.write(" Exit  ")
  82.  
  83.     monitor.setBackgroundColour((colours.lime))
  84.     monitor.setCursorPos(1,6)
  85.     monitor.write("Reactor")
  86.  
  87.     monitor.setBackgroundColour((colours.green))
  88.     monitor.setCursorPos(1,8)
  89.     monitor.write(" Fuel  ")
  90.     monitor.setCursorPos(1,9)
  91.     monitor.write("  Lab  ")
  92.  
  93.     monitor.setBackgroundColour((colours.green))
  94.     monitor.setCursorPos(1,11)
  95.     monitor.write(" Power ")
  96.     monitor.setCursorPos(1,12)
  97.     monitor.write("Distrib")
  98.  
  99.     monitor.setBackgroundColour((colours.black))
  100.  
  101.         redstone.setBundledOutput("bottom", colours.white+colours.orange+colours.magenta+colours.lightBlue)
  102.     sleep(1)
  103.     redstone.setBundledOutput("bottom", colours.white+colours.magenta+colours.lightBlue)
  104.  
  105.   elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight >= 8 and mouseHeight <= 9 then
  106.     -- button Fuel lab clicked (magenta)
  107.     monitor.setBackgroundColour((colours.green))
  108.     monitor.setCursorPos(1,4)
  109.     monitor.write(" Exit  ")
  110.  
  111.     monitor.setBackgroundColour((colours.green))
  112.     monitor.setCursorPos(1,6)
  113.     monitor.write("Reactor")
  114.  
  115.     monitor.setBackgroundColour((colours.lime))
  116.     monitor.setCursorPos(1,8)
  117.     monitor.write(" Fuel  ")
  118.     monitor.setCursorPos(1,9)
  119.     monitor.write("  Lab  ")
  120.  
  121.     monitor.setBackgroundColour((colours.green))
  122.     monitor.setCursorPos(1,11)
  123.     monitor.write(" Power ")
  124.     monitor.setCursorPos(1,12)
  125.     monitor.write("Distrib")
  126.  
  127.     monitor.setBackgroundColour((colours.black))
  128.  
  129.         redstone.setBundledOutput("bottom", colours.white+colours.orange+colours.magenta+colours.lightBlue)
  130.     sleep(1)
  131.     redstone.setBundledOutput("bottom", colours.white+colours.orange+colours.lightBlue)
  132.  
  133.   elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight >= 11 and mouseHeight <= 12 then
  134.     -- button Power distribution clicked
  135.     monitor.setBackgroundColour((colours.green))
  136.     monitor.setCursorPos(1,4)
  137.     monitor.write(" Exit  ")
  138.  
  139.     monitor.setBackgroundColour((colours.green))
  140.     monitor.setCursorPos(1,6)
  141.     monitor.write("Reactor")
  142.  
  143.     monitor.setBackgroundColour((colours.green))
  144.     monitor.setCursorPos(1,8)
  145.     monitor.write(" Fuel  ")
  146.     monitor.setCursorPos(1,9)
  147.     monitor.write("  Lab  ")
  148.  
  149.     monitor.setBackgroundColour((colours.lime))
  150.     monitor.setCursorPos(1,11)
  151.     monitor.write(" Power ")
  152.     monitor.setCursorPos(1,12)
  153.     monitor.write("Distrib")
  154.  
  155.     monitor.setBackgroundColour((colours.black))   
  156.  
  157.     redstone.setBundledOutput("bottom", colours.white+colours.orange+colours.magenta+colours.lightBlue)
  158.     sleep(1)
  159.     redstone.setBundledOutput("bottom", colours.white+colours.orange+colours.magenta)
  160.  
  161.   end
  162. end
  163.  
  164. redstone.setBundledOutput("bottom", colours.orange+colours.magenta+colours.lightBlue)
  165.  
  166.  
  167. repeat
  168.     event,p1,p2,p3 = os.pullEvent()
  169.         if event=="monitor_touch" then
  170.                 mouseWidth = p2 -- sets mouseWidth
  171.                 mouseHeight = p3 -- and mouseHeight
  172.                 checkClickPosition() -- this runs our function
  173.         end
  174. until event=="char" and p1==("x")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement