Advertisement
kremnev8

doorcont

Mar 9th, 2015
242
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.10 KB | None | 0 0
  1. m = peripheral.wrap("back")
  2.  
  3. if fs.exists("GUI") then
  4. print("loading 1Ridav's GUI lib")
  5. os.loadAPI("GUI")
  6. else
  7. shell.run("pastebin","get","XcbJj1n4","GUI")
  8. print("loading 1Ridav's GUI lib")
  9. os.loadAPI("GUI")
  10. end
  11.  
  12. write("enter channel(number, from 1 to 65000)")
  13. inp = read()
  14.  
  15. act ={}
  16.  
  17.  
  18. if type(tonumber(inp)) == "number" then
  19. channel = tonumber(inp)
  20. m.open(channel)
  21. else
  22. error("not value")
  23. end
  24.  
  25. function steek(s)
  26. st = tostring(s.check)
  27. m.transmit(channel,channel,"STEEKREED="..st)
  28. GUI.MainPanel:draw()
  29. end
  30.  
  31. function main(s)
  32. st = tostring(s.check)
  33. m.transmit(channel,channel,"MAIN="..st)
  34. GUI.MainPanel:draw()
  35. end
  36.  
  37. function exp(s)
  38. st = tostring(s.check)
  39. m.transmit(channel,channel,"EXPERM="..st)
  40. GUI.MainPanel:draw()
  41. end
  42.  
  43.  
  44.  
  45.  
  46.  
  47. term.clear()
  48. term.setCursorPos(1,1)
  49. FDOOR = GUI.NewCheckBox(nil, 3, 3, 10, 3, "STEEK DOOR", steek)
  50. EXPDOOR = GUI.NewCheckBox(nil, 3, 7, 10, 3, "EXPER DOOR", exp)
  51. MAINDOOR = GUI.NewCheckBox(nil, 3, 10, 10, 3, "MAIN DOOR ", main)
  52. SIDET = GUI.NewLabel(nil, 3,1,"door control:")
  53. GUI.MainPanel:addCHILD(FDOOR,EXPDOOR,MAINDOOR,SIDET)
  54. GUI.MainPanel:draw()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement