Advertisement
LeslieCraft

[HUN] Minecraft, computercraft Bundled cable v1.0

Feb 15th, 2013
385
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -----[[ File Save/Loade ]]-----
  2.  
  3. installedFile = "data/RsBundled.cfg"
  4. crashFile = "data/crash.log"
  5. tw, th = term.getSize()
  6. side = "back"
  7. srs1 = colors.purple
  8. srs2 = colors.blue
  9. srs3 = colors.brown
  10. srs4 = colors.green
  11. srs5 = colors.red
  12. srs6 = colors.gray
  13. srs7 = colors.cyan
  14. srs8 = colors.yellow
  15. srs9 = colors.magenta
  16. srs10 = colors.orange
  17. srs11 = colors.pink
  18. srs12 = colors.lime
  19. srs13 = colors.lightGray
  20. srs14 = colors.lightBlue
  21. srs15 = colors.white
  22. srs16 = colors.black
  23.  
  24. function cls()
  25.     term.clear()
  26.     term.setCursorPos(1,1)
  27. end
  28.  
  29. function Help()
  30.     cls()
  31.     PrintC("Hamarosan")
  32.     sleep(3)
  33. end
  34.  
  35. function PrintC(sText)
  36.     local w, h = term.getSize()
  37.     local x, y = term.getCursorPos()
  38.     x = math.max(math.floor((w / 2) - (#sText / 2)), 0)
  39.     term.setCursorPos(x, y)
  40.     print(sText)
  41. end
  42.  
  43. function PrintC2(sText)
  44.     local w, h = term.getSize()
  45.     local x, y = term.getCursorPos()
  46.     x = math.max(math.floor((w / 2) - 6), 0)
  47.     term.setCursorPos(x, y)
  48.     print(sText)
  49. end
  50.  
  51. function installFile()
  52.         cls()
  53.         for i=1, 100 do
  54.             term.setCursorPos( tw/2-4, 2 )
  55.             write("Installing")
  56.             term.setCursorPos( tw/2-1, 4 )
  57.             write(i .. " %")
  58.             term.setCursorPos( tw/2-(12)+i/4, 5 )
  59.             write("#")
  60.             sleep(.01)
  61.         end
  62.         local rs1 = colors.black
  63.         local rs2 = colors.black
  64.         local rs3 = colors.black
  65.         local rs4 = colors.black
  66.         local rs5 = colors.black
  67.         local rs6 = colors.black
  68.         local rs7 = colors.black
  69.         local rs8 = colors.black
  70.         local rs9 = colors.black
  71.         local rs10 = colors.black
  72.         local rs11 = colors.black
  73.         local rs12 = colors.black
  74.         local rs13 = colors.black
  75.         local rs14 = colors.black
  76.         local rs15 = colors.black
  77.         local rs16 = colors.black
  78.  
  79.  
  80.         local sPurName = "NoName"
  81.         local sBluName = "NoName"
  82.         local sBroName = "NoName"
  83.         local sGreName = "NoName"
  84.         local sRedName = "NoName"
  85.         local sGraName = "NoName"
  86.         local sCyaName = "NoName"
  87.         local sYelName = "NoName"
  88.         local sMagName = "NoName"
  89.         local sOraName = "NoName"
  90.         local sPinName = "NoName"
  91.         local sLimName = "NoName"
  92.         local sLgrName = "NoName"
  93.         local sLblName = "NoName"
  94.         local sWhiName = "NoName"
  95.    
  96.    
  97.         fs.makeDir("data")
  98.         local file = fs.open(installedFile, "w")
  99.         file.writeLine("purple")
  100.         file.writeLine("    Name:   =   " .. sPurName)
  101.         file.writeLine("    Set:    =   " .. rs1)
  102.         file.writeLine("blue")
  103.         file.writeLine("    Name:   =   " .. sBluName)
  104.         file.writeLine("    Set:    =   " .. rs2)
  105.         file.writeLine("brown")
  106.         file.writeLine("    Name:   =   " .. sBroName)
  107.         file.writeLine("    Set:    =   " .. rs3)
  108.         file.writeLine("green")
  109.         file.writeLine("    Name:   =   " .. sGreName)
  110.         file.writeLine("    Set:    =   " .. rs4)
  111.         file.writeLine("red")
  112.         file.writeLine("    Name:   =   " .. sRedName)
  113.         file.writeLine("    Set:    =   " .. rs5)
  114.         file.close()
  115.        
  116.         local file = fs.open(installedFile, "a")
  117.         file.writeLine("gray")
  118.         file.writeLine("    Name:   =   " .. sGraName)
  119.         file.writeLine("    Set:    =   " .. rs6)
  120.         file.writeLine("cyan")
  121.         file.writeLine("    Name:   =   " .. sCyaName)
  122.         file.writeLine("    Set:    =   " .. rs7)
  123.         file.writeLine("yellow")
  124.         file.writeLine("    Name:   =   " .. sYelName)
  125.         file.writeLine("    Set:    =   " .. rs8)
  126.         file.writeLine("magenta")
  127.         file.writeLine("    Name:   =   " .. sMagName)
  128.         file.writeLine("    Set:    =   " .. rs9)
  129.         file.writeLine("orange")
  130.         file.writeLine("    Name:   =   " .. sOraName)
  131.         file.writeLine("    Set:    =   " .. rs10)
  132.         file.close()
  133.        
  134.         local file = fs.open(installedFile, "a")
  135.         file.writeLine("pink")
  136.         file.writeLine("    Name:   =   " .. sPinName)
  137.         file.writeLine("    Set:    =   " .. rs11)
  138.         file.writeLine("lime")
  139.         file.writeLine("    Name:   =   " .. sLimName)
  140.         file.writeLine("    Set:    =   " .. rs12)
  141.         file.writeLine("L_Gray")
  142.         file.writeLine("    Name:   =   " .. sLgrName)
  143.         file.writeLine("    Set:    =   " .. rs13)
  144.         file.writeLine("L_Blue")
  145.         file.writeLine("    Name:   =   " .. sLblName)
  146.         file.writeLine("    Set:    =   " .. rs14)
  147.         file.writeLine("white")
  148.         file.writeLine("    Name:   =   " .. sWhiName)
  149.         file.writeLine("    Set:    =   " .. rs15)
  150.         file.close()
  151.         cls()
  152.         term.setCursorPos(1, (th/2)-1)
  153.         PrintC("***************")
  154.         PrintC("*  Installed  *")
  155.         PrintC("***************")
  156.         sleep(2)
  157. end
  158.  
  159. function fileInstall()
  160.     if not fs.exists(installedFile) then
  161.         installFile()
  162.     end
  163. end
  164.  
  165.  
  166. function saveData()
  167.  
  168.     if fs.exists(installedFile) then
  169.         cls()
  170.         local szaz = 3
  171.         for i=1, 5 do
  172.             term.setCursorPos( tw/2-1, 2 )
  173.             write(math.floor(i*6) .. " %")
  174.             term.setCursorPos( 14+i+szaz, 3 )
  175.             write("#")
  176.             sleep(.001)
  177.         end
  178.         local file = fs.open(installedFile, "w")
  179.         file.writeLine("purple")
  180.         file.writeLine("    Name:   =   " .. sPurName)
  181.         file.writeLine("    Set:    =   " .. rs1)
  182.         file.writeLine("blue")
  183.         file.writeLine("    Name:   =   " .. sBluName)
  184.         file.writeLine("    Set:    =   " .. rs2)
  185.         file.writeLine("brown")
  186.         file.writeLine("    Name:   =   " .. sBroName)
  187.         file.writeLine("    Set:    =   " .. rs3)
  188.         file.writeLine("green")
  189.         file.writeLine("    Name:   =   " .. sGreName)
  190.         file.writeLine("    Set:    =   " .. rs4)
  191.         file.writeLine("red")
  192.         file.writeLine("    Name:   =   " .. sRedName)
  193.         file.writeLine("    Set:    =   " .. rs5)
  194.         file.close()
  195.         local szaz = szaz+30
  196.         for i=1,5 do
  197.             term.setCursorPos( tw/2-1, 2 )
  198.             write(math.floor(i*6+szaz) .. " %")
  199.             term.setCursorPos( 14+i+szaz/4, 3 )
  200.             print("#")
  201.         end
  202.        
  203.         local file = fs.open(installedFile, "a")
  204.         file.writeLine("gray")
  205.         file.writeLine("    Name:   =   " .. sGraName)
  206.         file.writeLine("    Set:    =   " .. rs6)
  207.         file.writeLine("cyan")
  208.         file.writeLine("    Name:   =   " .. sCyaName)
  209.         file.writeLine("    Set:    =   " .. rs7)
  210.         file.writeLine("yellow")
  211.         file.writeLine("    Name:   =   " .. sYelName)
  212.         file.writeLine("    Set:    =   " .. rs8)
  213.         file.writeLine("magenta")
  214.         file.writeLine("    Name:   =   " .. sMagName)
  215.         file.writeLine("    Set:    =   " .. rs9)
  216.         file.writeLine("orange")
  217.         file.writeLine("    Name:   =   " .. sOraName)
  218.         file.writeLine("    Set:    =   " .. rs10)
  219.         file.close()
  220.         local szaz = 69
  221.         for i=1, 5 do
  222.             term.setCursorPos( tw/2-1, 2 )
  223.             write(math.floor(i*6+szaz+1) .. " %")
  224.             term.setCursorPos( 14+i+szaz/4-4, 3 )
  225. --          term.setCursorPos( tw/2-(11)+szaz/3+(i*5/3)-9, 3 )
  226.             print("#")
  227.         end
  228.        
  229.         local file = fs.open(installedFile, "a")
  230.         file.writeLine("pink")
  231.         file.writeLine("    Name:   =   " .. sPinName)
  232.         file.writeLine("    Set:    =   " .. rs11)
  233.         file.writeLine("lime")
  234.         file.writeLine("    Name:   =   " .. sLimName)
  235.         file.writeLine("    Set:    =   " .. rs12)
  236.         file.writeLine("L_Gray")
  237.         file.writeLine("    Name:   =   " .. sLgrName)
  238.         file.writeLine("    Set:    =   " .. rs13)
  239.         file.writeLine("L_Blue")
  240.         file.writeLine("    Name:   =   " .. sLblName)
  241.         file.writeLine("    Set:    =   " .. rs14)
  242.         file.writeLine("white")
  243.         file.writeLine("    Name:   =   " .. sWhiName)
  244.         file.writeLine("    Set:    =   " .. rs15)
  245.         file.close()
  246.         term.setCursorPos(1, (th/2)-1)
  247.         PrintC("************")
  248.         PrintC("*   Done   *")
  249.         PrintC("************")
  250.         sleep(1)
  251.     end
  252. end
  253.  
  254. function loadData()
  255.     if fs.exists(installedFile) then
  256.         local file = fs.open(installedFile, "r")
  257.         if not file then
  258.             local crashfile = fs.open(crashFile, "a")
  259.             file.writeLine("File olvasasi hiba")
  260.             file.writeLine("File: " .. file )
  261.             file.writeLine()
  262.             file.close()
  263.             sleep(1)
  264.             print("File olvasasi hiba, tobb informacio a data/crash.log file-ba")
  265.             local ido = 6
  266.             while not ido == 0 do
  267.                 local ido = ido - 1
  268.                 sleep(1)
  269.                 cls()
  270.                 print(ido)
  271.             end
  272.             os.reboot()
  273.         end
  274.         file.readLine()
  275.        
  276.         lPur = file.readLine()      --Purple
  277.         s1 = lPur:find("=")
  278.         sPurName = lPur:sub(s1+2)
  279.        
  280.         lPurset = file.readLine()
  281.         s1 = lPurset:find("=")
  282.         rs1 = lPurset:sub(s1+2)
  283.         file.readLine()
  284.        
  285.         lBlu = file.readLine()      --Blue
  286.         s1 = lBlu:find("=")
  287.         sBluName = lBlu:sub(s1+2)
  288.        
  289.         lBluset = file.readLine()
  290.         s1 = lBluset:find("=")
  291.         rs2 = lBluset:sub(s1+2)
  292.         file.readLine()
  293.        
  294.         lbro = file.readLine()      --brown
  295.         s1 = lbro:find("=")
  296.         sBroName = lbro:sub(s1+2)
  297.        
  298.         lbroset = file.readLine()
  299.         s1 = lbroset:find("=")
  300.         rs3 = lbroset:sub(s1+2)
  301.         file.readLine()
  302.        
  303.         lgre = file.readLine()      --green
  304.         s1 = lgre:find("=")
  305.         sGreName = lgre:sub(s1+2)
  306.        
  307.         lgreset = file.readLine()
  308.         s1 = lgreset:find("=")
  309.         rs4 = lgreset:sub(s1+2)
  310.         file.readLine()
  311.        
  312.         lred = file.readLine()      --red
  313.         s1 = lred:find("=")
  314.         sRedName = lred:sub(s1+2)
  315.        
  316.         lredset = file.readLine()
  317.         s1 = lredset:find("=")
  318.         rs5 = lredset:sub(s1+2)
  319.         file.readLine()
  320.        
  321.         lgra = file.readLine()      --gray
  322.         s1 = lgra:find("=")
  323.         sGraName = lgra:sub(s1+2)
  324.        
  325.         lgraset = file.readLine()
  326.         s1 = lgraset:find("=")
  327.         rs6 = lgraset:sub(s1+2)
  328.         file.readLine()
  329.        
  330.         lcya = file.readLine()      --cyan
  331.         s1 = lcya:find("=")
  332.         sCyaName = lcya:sub(s1+2)
  333.        
  334.         lcyaset = file.readLine()
  335.         s1 = lcyaset:find("=")
  336.         rs7 = lcyaset:sub(s1+2)
  337.         file.readLine()
  338.        
  339.         lyel = file.readLine()      --yellow
  340.         s1 = lyel:find("=")
  341.         sYelName = lyel:sub(s1+2)
  342.        
  343.         lyelset = file.readLine()
  344.         s1 = lyelset:find("=")
  345.         rs8 = lyelset:sub(s1+2)
  346.         file.readLine()
  347.        
  348.         lmag = file.readLine()      --magenta
  349.         s1 = lmag:find("=")
  350.         sMagName = lmag:sub(s1+2)
  351.        
  352.         lmagset = file.readLine()
  353.         s1 = lmagset:find("=")
  354.         rs9 = lmagset:sub(s1+2)
  355.         file.readLine()
  356.        
  357.         lora = file.readLine()      --orange
  358.         s1 = lora:find("=")
  359.         sOraName = lora:sub(s1+2)
  360.        
  361.         loraset = file.readLine()
  362.         s1 = loraset:find("=")
  363.         rs10 = loraset:sub(s1+2)
  364.         file.readLine()
  365.        
  366.         lpin = file.readLine()      --pink
  367.         s1 = lpin:find("=")
  368.         sPinName = lpin:sub(s1+2)
  369.        
  370.         lpinset = file.readLine()
  371.         s1 = lpinset:find("=")
  372.         rs11 = lpinset:sub(s1+2)
  373.         file.readLine()
  374.        
  375.         llim = file.readLine()      --lime
  376.         s1 = llim:find("=")
  377.         sLimName = llim:sub(s1+2)
  378.        
  379.         llimset = file.readLine()
  380.         s1 = llimset:find("=")
  381.         rs12 = llimset:sub(s1+2)
  382.         file.readLine()
  383.        
  384.         lLgr = file.readLine()      --L_Gray
  385.         s1 = lLgr:find("=")
  386.         sLgrName = lLgr:sub(s1+2)
  387.        
  388.         lLgrset = file.readLine()
  389.         s1 = lLgrset:find("=")
  390.         rs13 = lLgrset:sub(s1+2)
  391.         file.readLine()
  392.        
  393.         lLbl = file.readLine()      --L_Blue
  394.         s1 = lLbl:find("=")
  395.         sLblName = lLbl:sub(s1+2)
  396.        
  397.         lLblset = file.readLine()
  398.         s1 = lLblset:find("=")
  399.         rs14 = lLblset:sub(s1+2)
  400.         file.readLine()
  401.        
  402.         lwhi = file.readLine()      --white
  403.         s1 = lwhi:find("=")
  404.         sWhiName = lwhi:sub(s1+2)
  405.        
  406.         lwhiset = file.readLine()
  407.         s1 = lwhiset:find("=")
  408.         rs15 = lwhiset:sub(s1+2)
  409.        
  410.         redstone.setBundledOutput(side, rs1+rs2+rs3+rs4+rs5+rs6+rs7+rs8+rs9+rs10+rs11+rs12+rs13+rs14+rs15)
  411.     end
  412. end
  413. -----[[ Menu system ]]-----
  414.  
  415. --[[ Local variables ]]--
  416.  
  417. local termWidth, termHeight = term.getSize()
  418. local selectedItem = 1
  419. local inMainMenu = true
  420. local inOtherMenu = false
  421.  
  422. --[[ Menu Methods ]]--
  423.  
  424. function purple()
  425.     inOtherMenu = true
  426.     selectedItem = 1
  427.     Bcolor = "purple"
  428.     while inOtherMenu do
  429.         term.clear()
  430.         term.setCursorPos(1,1)
  431.         printMenu2(otherMenu)
  432.         event, key = os.pullEvent("key")
  433.         onKeyPressed(key, otherMenu)
  434.     end
  435. end
  436.  
  437. function blue()
  438.     inOtherMenu = true
  439.     selectedItem = 1
  440.     Bcolor = "blue"
  441.     while inOtherMenu do
  442.         term.clear()
  443.         term.setCursorPos(1,1)
  444.         printMenu2(otherMenu)
  445.         event, key = os.pullEvent("key")
  446.         onKeyPressed(key, otherMenu)
  447.     end
  448. end
  449.  
  450. function brown()
  451.     inOtherMenu = true
  452.     selectedItem = 1
  453.     Bcolor = "brown"
  454.     while inOtherMenu do
  455.         term.clear()
  456.         term.setCursorPos(1,1)
  457.         printMenu2(otherMenu)
  458.         event, key = os.pullEvent("key")
  459.         onKeyPressed(key, otherMenu)
  460.     end
  461. end
  462.  
  463. function green()
  464.     inOtherMenu = true
  465.     selectedItem = 1
  466.     Bcolor = "green"
  467.     while inOtherMenu do
  468.         term.clear()
  469.         term.setCursorPos(1,1)
  470.         printMenu2(otherMenu)
  471.         event, key = os.pullEvent("key")
  472.         onKeyPressed(key, otherMenu)
  473.     end
  474. end
  475.  
  476. function red()
  477.     inOtherMenu = true
  478.     selectedItem = 1
  479.     Bcolor = "red"
  480.     while inOtherMenu do
  481.         term.clear()
  482.         term.setCursorPos(1,1)
  483.         printMenu2(otherMenu)
  484.         event, key = os.pullEvent("key")
  485.         onKeyPressed(key, otherMenu)
  486.     end
  487. end
  488.  
  489. function gray()
  490.     inOtherMenu = true
  491.     selectedItem = 1
  492.     Bcolor = "gray"
  493.     while inOtherMenu do
  494.         term.clear()
  495.         term.setCursorPos(1,1)
  496.         printMenu2(otherMenu)
  497.         event, key = os.pullEvent("key")
  498.         onKeyPressed(key, otherMenu)
  499.     end
  500. end
  501.  
  502. function cyan()
  503.     inOtherMenu = true
  504.     selectedItem = 1
  505.     Bcolor = "cyan"
  506.     while inOtherMenu do
  507.         term.clear()
  508.         term.setCursorPos(1,1)
  509.         printMenu2(otherMenu)
  510.         event, key = os.pullEvent("key")
  511.         onKeyPressed(key, otherMenu)
  512.     end
  513. end
  514.  
  515. function yellow()
  516.     inOtherMenu = true
  517.     selectedItem = 1
  518.     Bcolor = "yellow"
  519.     while inOtherMenu do
  520.         term.clear()
  521.         term.setCursorPos(1,1)
  522.         printMenu2(otherMenu)
  523.         event, key = os.pullEvent("key")
  524.         onKeyPressed(key, otherMenu)
  525.     end
  526. end
  527.  
  528. function magenta()
  529.     inOtherMenu = true
  530.     selectedItem = 1
  531.     Bcolor = "magenta"
  532.     while inOtherMenu do
  533.         term.clear()
  534.         term.setCursorPos(1,1)
  535.         printMenu2(otherMenu)
  536.         event, key = os.pullEvent("key")
  537.         onKeyPressed(key, otherMenu)
  538.     end
  539. end
  540.  
  541. function orange()
  542.     inOtherMenu = true
  543.     selectedItem = 1
  544.     Bcolor = "orange"
  545.     while inOtherMenu do
  546.         term.clear()
  547.         term.setCursorPos(1,1)
  548.         printMenu2(otherMenu)
  549.         event, key = os.pullEvent("key")
  550.         onKeyPressed(key, otherMenu)
  551.     end
  552. end
  553.  
  554. function pink()
  555.     inOtherMenu = true
  556.     selectedItem = 1
  557.     Bcolor = "pink"
  558.     while inOtherMenu do
  559.         term.clear()
  560.         term.setCursorPos(1,1)
  561.         printMenu2(otherMenu)
  562.         event, key = os.pullEvent("key")
  563.         onKeyPressed(key, otherMenu)
  564.     end
  565. end
  566. function lime()
  567.     inOtherMenu = true
  568.     selectedItem = 1
  569.     Bcolor = "lime"
  570.     while inOtherMenu do
  571.         term.clear()
  572.         term.setCursorPos(1,1)
  573.         printMenu2(otherMenu)
  574.         event, key = os.pullEvent("key")
  575.         onKeyPressed(key, otherMenu)
  576.     end
  577. end
  578.  
  579. function LGray()
  580.     inOtherMenu = true
  581.     selectedItem = 1
  582.     Bcolor = "LGray"
  583.     while inOtherMenu do
  584.         term.clear()
  585.         term.setCursorPos(1,1)
  586.         printMenu2(otherMenu)
  587.         event, key = os.pullEvent("key")
  588.         onKeyPressed(key, otherMenu)
  589.     end
  590. end
  591.  
  592. function LBlue()
  593.     inOtherMenu = true
  594.     selectedItem = 1
  595.     Bcolor = "LBlue"
  596.     while inOtherMenu do
  597.         term.clear()
  598.         term.setCursorPos(1,1)
  599.         printMenu2(otherMenu)
  600.         event, key = os.pullEvent("key")
  601.         onKeyPressed(key, otherMenu)
  602.     end
  603. end
  604.  
  605. function white()
  606.     inOtherMenu = true
  607.     selectedItem = 1
  608.     Bcolor = "white"
  609.     while inOtherMenu do
  610.         term.clear()
  611.         term.setCursorPos(1,1)
  612.         printMenu2(otherMenu)
  613.         event, key = os.pullEvent("key")
  614.         onKeyPressed(key, otherMenu)
  615.     end
  616. end
  617.  
  618. function alloff()
  619.  
  620.     rs1 = srs16
  621.     rs2 = srs16
  622.     rs3 = srs16
  623.     rs4 = srs16
  624.     rs5 = srs16
  625.     rs6 = srs16
  626.     rs7 = srs16
  627.     rs8 = srs16
  628.     rs9 = srs16
  629.     rs10 = srs16
  630.     rs11 = srs16
  631.     rs12 = srs16
  632.     rs13 = srs16
  633.     rs14 = srs16
  634.     rs15 = srs16
  635.     saveData()
  636.     OnOff()
  637. end
  638.  
  639. function allon()
  640.  
  641.     rs1 = srs1
  642.     rs2 = srs2
  643.     rs3 = srs3
  644.     rs4 = srs4
  645.     rs5 = srs5
  646.     rs6 = srs6
  647.     rs7 = srs7
  648.     rs8 = srs8
  649.     rs9 = srs9
  650.     rs10 = srs10
  651.     rs11 = srs11
  652.     rs12 = srs12
  653.     rs13 = srs13
  654.     rs14 = srs14
  655.     rs15 = srs15
  656.     saveData()
  657.     OnOff()
  658. end
  659.  
  660. function Back()
  661.     selectedItem = 1
  662.     inOtherMenu = false
  663. end
  664.  
  665. function Exit()
  666.     inMainMenu = false
  667. end
  668.  
  669. function Reboot()
  670.     os.reboot()
  671. end
  672.  
  673. function On()
  674.     if Bcolor == "purple" then rs1 = srs1 end
  675.     if Bcolor == "blue" then rs2 = srs2 end
  676.     if Bcolor == "brown" then rs3 = srs3 end
  677.     if Bcolor == "green" then rs4 = srs4 end
  678.     if Bcolor == "red" then rs5 = srs5 end
  679.     if Bcolor == "gray" then rs6 = srs6 end
  680.     if Bcolor == "cyan" then rs7 = srs7 end
  681.     if Bcolor == "yellow" then rs8 = srs8 end
  682.     if Bcolor == "magenta" then rs9 = srs9 end
  683.     if Bcolor == "orange" then rs10 = srs10 end
  684.     if Bcolor == "pink" then rs11 = srs11 end
  685.     if Bcolor == "lime" then rs12 = srs12 end
  686.     if Bcolor == "LGray" then rs13 = srs13 end
  687.     if Bcolor == "LBlue" then rs14 = srs14 end
  688.     if Bcolor == "white" then rs15 = srs15 end
  689.    
  690.     saveData()
  691.     OnOff()
  692.     selectedItem = 1
  693.     inOtherMenu = false
  694. end
  695.  
  696. function Off()
  697.  
  698.     if Bcolor == "purple" then rs1 = srs16 end
  699.     if Bcolor == "blue" then rs2 = srs16 end
  700.     if Bcolor == "brown" then rs3 = srs16 end
  701.     if Bcolor == "green" then rs4 = srs16 end
  702.     if Bcolor == "red" then rs5 = srs16 end
  703.     if Bcolor == "gray" then rs6 = srs16 end
  704.     if Bcolor == "cyan" then rs7 = srs16 end
  705.     if Bcolor == "yellow" then rs8 = srs16 end
  706.     if Bcolor == "magenta" then rs9 = srs16 end
  707.     if Bcolor == "orange" then rs10 = srs16 end
  708.     if Bcolor == "pink" then rs11 = srs16 end
  709.     if Bcolor == "lime" then rs12 = srs16 end
  710.     if Bcolor == "LGray" then rs13 = srs16 end
  711.     if Bcolor == "LBlue" then rs14 = srs16 end
  712.     if Bcolor == "white" then rs15 = srs16 end
  713.    
  714.     saveData()
  715.     OnOff()
  716.     selectedItem = 1
  717.     inOtherMenu = false
  718. end
  719.  
  720. function SetName()
  721. term.setCursorPos(tw/2-5, th/2)
  722.     if Bcolor == "purple" then sPurName = read() end
  723.     if Bcolor == "blue" then sBluName = read() end
  724.     if Bcolor == "brown" then sBroName = read() end
  725.     if Bcolor == "green" then sGreName = read() end
  726.     if Bcolor == "red" then sRedName = read() end
  727.     if Bcolor == "gray" then sGraName = read() end
  728.     if Bcolor == "cyan" then sCyaName = read() end
  729.     if Bcolor == "yellow" then sYelName = read() end
  730.     if Bcolor == "magenta" then sMagName = read() end
  731.     if Bcolor == "orange" then sOraName = read() end
  732.     if Bcolor == "pink" then sPinName = read() end
  733.     if Bcolor == "lime" then sLimName = read() end
  734.     if Bcolor == "LGray" then sLgrName = read() end
  735.     if Bcolor == "LBlue" then sLblName = read() end
  736.     if Bcolor == "white" then sWhiName = read() end
  737.    
  738.     saveData()
  739.     OnOff()
  740.     selectedItem = 1
  741.     inOtherMenu = false
  742. end
  743.  
  744. --[[ Menu Definitions ]]--
  745.  
  746. mainMenu = {
  747.     [1] = { text = "Purple: ", handler = purple },      --Purple
  748.     [2] = { text = "Blue: ", handler = blue },
  749.     [3] = { text = "Brown: ", handler = brown },
  750.     [4] = { text = "Green: ", handler = green },
  751.     [5] = { text = "Red: ", handler = red },
  752.     [6] = { text = "Gray: ", handler = gray },
  753.     [7] = { text = "Cyan: ", handler = cyan },
  754.     [8] = { text = "Yellow: ", handler = yellow },
  755.     [9] = { text = "Magenta: ", handler = magenta },
  756.     [10] = { text = "Orange: ", handler = orange },
  757.     [11] = { text = "Pink: ", handler = pink },
  758.     [12] = { text = "Lime: ", handler = lime },
  759.     [13] = { text = "L_Gray: ", handler = LGray },
  760.     [14] = { text = "L_Blue: ", handler = LBlue },
  761.     [15] = { text = "White: ", handler = white },
  762.     [16] = { text = "All Off", handler = alloff },
  763.     [17] = { text = "All On", handler = allon },
  764.     [18] = { text = "Exit", handler = Exit }
  765. }
  766.  
  767. otherMenu = {
  768.     [1] = { text = "On", handler = On },
  769.     [2] = { text = "Off", handler = Off },
  770.     [3] = { text = "SetName", handler = SetName },
  771.     [4] = { text = "Back", handler = Back }
  772. }
  773.  
  774. --[[ Printing Methods ]]--
  775.  
  776. function printMenu2(menu)
  777.     term.setCursorPos(1,5)
  778.     for i=1,#menu do
  779.         if i == selectedItem then
  780.             PrintC2(">> "..menu[i].text)
  781.         else
  782.             PrintC2("   "..menu[i].text)
  783.         end
  784.     end
  785. end
  786.  
  787. function printMenu(menu)
  788.     for i=1,#menu do
  789.         if i == selectedItem then
  790.             print(">> "..menu[i].text)
  791.         else
  792.             print("   "..menu[i].text)
  793.         end
  794.     end
  795. end
  796.  
  797. --[[ Handler Methods ]]--
  798.  
  799. function onKeyPressed( key, menu )
  800.     if key == keys.enter then
  801.         onItemSelected(menu)
  802.     elseif key == keys.up then
  803.         if selectedItem > 1 then
  804.             selectedItem = selectedItem - 1
  805.         end
  806.     elseif key == keys.down then
  807.         if selectedItem < #menu then
  808.             selectedItem = selectedItem +1
  809.         end
  810.     elseif key == 207 then
  811.         cls()
  812.         term.setCursorPos(tw/2-4, th/2)
  813.         print("Rebooting")
  814.         sleep(2)
  815.         os.reboot()
  816.     elseif key == 23 then
  817.             installFile()
  818.     elseif key == 59 then
  819.         Help()
  820.     end
  821. end
  822.  
  823. function onItemSelected(menu)
  824.     menu[selectedItem].handler()
  825. end
  826.  
  827. --[[ Main Method ]]--
  828.  
  829. function main()
  830.     while inMainMenu do
  831.         term.clear()
  832.         term.setCursorPos(13,1)
  833.         print(sPurName .. ", " .. rs1Set)
  834.         term.setCursorPos(13,2)
  835.         print(sBluName .. ", " .. rs2Set)
  836.         term.setCursorPos(13,3)
  837.         print(sBroName .. ", " .. rs3Set)
  838.         term.setCursorPos(13,4)
  839.         print(sGreName .. ", " .. rs4Set)
  840.         term.setCursorPos(13,5)
  841.         print(sRedName .. ", " .. rs5Set)
  842.         term.setCursorPos(13,6)
  843.         print(sGraName .. ", " .. rs6Set)
  844.         term.setCursorPos(13,7)
  845.         print(sCyaName .. ", " .. rs7Set)
  846.         term.setCursorPos(13,8)
  847.         print(sYelName .. ", " .. rs8Set)
  848.         term.setCursorPos(13,9)
  849.         print(sMagName .. ", " .. rs9Set)
  850.         term.setCursorPos(13,10)
  851.         print(sOraName .. ", " .. rs10Set)
  852.         term.setCursorPos(13,11)
  853.         print(sPinName .. ", " .. rs11Set)
  854.         term.setCursorPos(13,12)
  855.         print(sLimName .. ", " .. rs12Set)
  856.         term.setCursorPos(13,13)
  857.         print(sLgrName .. ", " .. rs13Set)
  858.         term.setCursorPos(13,14)
  859.         print(sLblName .. ", " .. rs14Set)
  860.         term.setCursorPos(13,15)
  861.         print(sWhiName .. ", " .. rs15Set)
  862.        
  863.         term.setCursorPos(1,1)
  864.         printMenu(mainMenu)
  865.        
  866.         event, key = os.pullEvent("key")
  867.         onKeyPressed(key, mainMenu)
  868.     end
  869. end
  870.  
  871. function OnOff()
  872.     loadData()
  873.     if rs1 == "1024" then rs1Set = "On" else rs1Set = "Off" end
  874.     if rs2 == "2048" then rs2Set = "On" else rs2Set = "Off" end
  875.     if rs3 == "4096" then rs3Set = "On" else rs3Set = "Off" end
  876.     if rs4 == "8192" then rs4Set = "On" else rs4Set = "Off" end
  877.     if rs5 == "16384" then rs5Set = "On" else rs5Set = "Off" end
  878.     if rs6 == "128" then rs6Set = "On" else rs6Set = "Off" end
  879.     if rs7 == "512" then rs7Set = "On" else rs7Set = "Off" end
  880.     if rs8 == "16" then rs8Set = "On" else rs8Set = "Off" end
  881.     if rs9 == "4" then rs9Set = "On" else rs9Set = "Off" end
  882.     if rs10 == "2" then rs10Set = "On" else rs10Set = "Off" end
  883.     if rs11 == "64" then rs11Set = "On" else rs11Set = "Off" end
  884.     if rs12 == "32" then rs12Set = "On" else rs12Set = "Off" end
  885.     if rs13 == "256" then rs13Set = "On" else rs13Set = "Off" end
  886.     if rs14 == "8" then rs14Set = "On" else rs14Set = "Off" end
  887.     if rs15 == "1" then rs15Set = "On" else rs15Set = "Off" end
  888. end
  889.  
  890. -----[[ MainProgram ]]-----
  891.  
  892. fileInstall()
  893. OnOff()
  894. main()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement