API tools faq
paste
Himitsu_Chan

Untitled

Himitsu_Chan
Mar 6th, 2016
91
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 12.38 KB | None | 0 0
raw download clone embed print report diff
  1. -- Variables
  2.  
  3. CMO = 0 -- Counter Metal Input
  4. CES = 0 -- Counter Empty Smeltery
  5. CML = 0 -- Counter Metal List
  6. CAL = 0 -- COunter Alloy List
  7. CLL = 0 -- Counter Liquid List
  8. CBL = 0 -- Counter Block List
  9.  
  10. mouseWidth = 0 -- Create MouseWidth Variable
  11. mouseHeight = 0 -- Create MouseHeight Variable
  12.  
  13. --------------------------------------------------------
  14. monitor = peripheral.wrap("right") -- Wrap monitor_0 monitor to "monitor"
  15.  
  16. monitor.setBackgroundColour((colors.black)) -- Return to standart color BEFORE clearing the screen
  17. monitor.clear() -- Clear Monitor
  18. monitor.setCursorPos(1,1) -- Set Cursor to Pos 1,1
  19.  
  20. w,h=monitor.getSize() -- set W to Width of Monitor and H to Height
  21.  
  22.  
  23. -------------------------------------------------------------------------
  24. print(w) -- Print Width
  25. print(h) -- Print Height
  26. -------------------------------------------------------------------------
  27.  
  28.  
  29. monitor.setBackgroundColour((colours.lime)) -- Set monitor Background Color For button creation
  30.  
  31. -- What the montior writes here
  32.  
  33.  
  34. monitor.setCursorPos(2,2)
  35. monitor.write("Metals")
  36.  
  37. monitor.setCursorPos(2,4)
  38. monitor.write("Alloys")
  39.  
  40. monitor.setCursorPos(2,6)
  41. monitor.write("Liquids")
  42.  
  43. monitor.setCursorPos(2,8)
  44. monitor.write("Blocks")
  45.  
  46. monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53. function checkClickPosition()
  54.  
  55.   if mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 2 and CMO == 0 then
  56.     if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then  -- METALS HERE!
  57.        
  58.         monitor.clear() -- Clear Monitor
  59.        
  60.         monitor.setBackgroundColour((colours.lime))
  61.        
  62.         monitor.setCursorPos(2,2)------------------- 1
  63.         monitor.write("Back")
  64.        
  65.         monitor.setCursorPos(2,4)
  66.         monitor.write("Cobalt")
  67.        
  68.         monitor.setCursorPos(2,6)
  69.         monitor.write("Glold")
  70.  
  71.         monitor.setCursorPos(2,8)
  72.         monitor.write("Coal")
  73.        
  74.         monitor.setCursorPos(2,10)
  75.         monitor.write("Unstable")
  76.  
  77.         monitor.setCursorPos(2,12)
  78.         monitor.write("Silver")
  79.  
  80.         monitor.setCursorPos(2,14)
  81.         monitor.write("Yellorium")
  82.  
  83.         monitor.setCursorPos(15,2)------------------- 2
  84.         monitor.write("Aluminium")
  85.        
  86.         monitor.setCursorPos(15,4)
  87.         monitor.write("Copper")
  88.        
  89.         monitor.setCursorPos(15,6)
  90.         monitor.write("Iron")
  91.  
  92.         monitor.setCursorPos(15,8)
  93.         monitor.write("Emerald")
  94.        
  95.         monitor.setCursorPos(15,10)
  96.         monitor.write("Nickel")
  97.  
  98.         monitor.setCursorPos(15,12)
  99.         monitor.write("Steel")
  100.  
  101.         --monitor.setCursorPos(15,14)
  102.         --monitor.write("")
  103.        
  104.         monitor.setCursorPos(28,2)------------------ 3
  105.         monitor.write("Ardite")
  106.        
  107.         monitor.setCursorPos(28,4)
  108.         monitor.write("Dark Iron")
  109.        
  110.         monitor.setCursorPos(28,6)
  111.         monitor.write("Lead")
  112.  
  113.         monitor.setCursorPos(28,8)
  114.         monitor.write("Mana Metal")
  115.        
  116.         monitor.setCursorPos(28,10)
  117.         monitor.write("Res Ender")
  118.  
  119.         monitor.setCursorPos(28,12)
  120.         monitor.write("Tin")
  121.  
  122.         --monitor.setCursorPos(28,14)
  123.         --monitor.write("")
  124.        
  125.         monitor.setCursorPos(41,2)------------------ 4
  126.         monitor.write("Bedrockium")
  127.        
  128.         monitor.setCursorPos(41,4)
  129.         monitor.write("Des Redstone")
  130.        
  131.         monitor.setCursorPos(41,6)
  132.         monitor.write("Redstone")
  133.  
  134.         monitor.setCursorPos(41,8)
  135.         monitor.write("Mithril")
  136.        
  137.         monitor.setCursorPos(41,10)
  138.         monitor.write("Shiny")
  139.  
  140.         monitor.setCursorPos(41,12)
  141.         monitor.write("Uranium")
  142.  
  143.         --monitor.setCursorPos(41,14)
  144.         --monitor.write("")
  145.        
  146.         monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  147.        
  148.         CML = 1
  149.         elseif CML == 1 then
  150.        
  151.         monitor.clear()
  152.    
  153.         monitor.setBackgroundColour((colours.lime))
  154.    
  155.         monitor.setCursorPos(2,2)
  156.         monitor.write("Metals")
  157.  
  158.         monitor.setCursorPos(2,4)
  159.         monitor.write("Alloys")
  160.  
  161.         monitor.setCursorPos(2,6)
  162.         monitor.write("Liquids")
  163.  
  164.         monitor.setCursorPos(2,8)
  165.         monitor.write("Blocks")
  166.    
  167.         monitor.setBackgroundColour((colours.black))
  168.  
  169.         CML = 0
  170.        
  171.         end
  172.        
  173.     elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 4 CMO == 1 then
  174.    
  175.     if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then  -- ALLOYS HERE!
  176.        
  177.         monitor.clear() -- Clear Monitor
  178.        
  179.         monitor.setBackgroundColour((colours.lime))
  180.        
  181.         monitor.setCursorPos(2,4)------------------- 1
  182.         monitor.write("Back")
  183.        
  184.         monitor.setCursorPos(2,6)
  185.         monitor.write("Red Alloy")
  186.        
  187.         monitor.setCursorPos(2,8)
  188.         monitor.write("Lumium")
  189.  
  190.         --monitor.setCursorPos(2,10)
  191.         --monitor.write("")
  192.        
  193.         --monitor.setCursorPos(2,12)
  194.         --monitor.write("")
  195.  
  196.         --monitor.setCursorPos(2,14)
  197.         --monitor.write("")
  198.  
  199.         --monitor.setCursorPos(2,16)
  200.         --monitor.write("")
  201.  
  202.         monitor.setCursorPos(15,4)------------------- 2
  203.         monitor.write("Alum Brass")
  204.        
  205.         monitor.setCursorPos(15,6)
  206.         monitor.write("Electrum")
  207.        
  208.         monitor.setCursorPos(15,8)
  209.         monitor.write("Manyullyn")
  210.  
  211.         --monitor.setCursorPos(15,10)
  212.         --monitor.write("")
  213.        
  214.         --monitor.setCursorPos(15,12)
  215.         --monitor.write("")
  216.  
  217.         --monitor.setCursorPos(15,14)
  218.         --monitor.write("")
  219.  
  220.         --monitor.setCursorPos(15,16)
  221.         --monitor.write("")
  222.        
  223.         monitor.setCursorPos(28,4)------------------ 3
  224.         monitor.write("Alumite")
  225.        
  226.         monitor.setCursorPos(28,6)
  227.         monitor.write("Enderium")
  228.        
  229.         monitor.setCursorPos(28,8)
  230.         monitor.write("Pig Iron")
  231.  
  232.         --monitor.setCursorPos(28,10)
  233.         --monitor.write("")
  234.        
  235.         --monitor.setCursorPos(28,12)
  236.         --monitor.write("")
  237.  
  238.         --monitor.setCursorPos(28,14)
  239.         --monitor.write("")
  240.  
  241.         --monitor.setCursorPos(28,16)
  242.         --monitor.write("")
  243.        
  244.         monitor.setCursorPos(41,4)------------------ 4
  245.         monitor.write("Bronze")
  246.        
  247.         monitor.setCursorPos(41,6)
  248.         monitor.write("Invar")
  249.        
  250.         monitor.setCursorPos(41,8)
  251.         monitor.write("Signalium")
  252.  
  253.         --monitor.setCursorPos(41,10)
  254.         --monitor.write("")
  255.        
  256.         --monitor.setCursorPos(41,12)
  257.         --monitor.write("")
  258.  
  259.         --monitor.setCursorPos(41,14)
  260.         --monitor.write("")
  261.  
  262.         --monitor.setCursorPos(41,16)
  263.         --monitor.write("")
  264.        
  265.         monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  266.        
  267.         CAL = 1
  268.         elseif CAL == 1 then
  269.        
  270.         monitor.clear()
  271.    
  272.         monitor.setBackgroundColour((colours.lime))
  273.    
  274.         monitor.setCursorPos(2,2)
  275.         monitor.write("Metals")
  276.  
  277.         monitor.setCursorPos(2,4)
  278.         monitor.write("Alloys")
  279.  
  280.         monitor.setCursorPos(2,6)
  281.         monitor.write("Liquids")
  282.  
  283.         monitor.setCursorPos(2,8)
  284.         monitor.write("Blocks")
  285.    
  286.         monitor.setBackgroundColour((colours.black))
  287.  
  288.         CAL = 0
  289.        
  290.         end
  291.        
  292.     elseif mouseWidth > 1 and mouseWidth < 8 and mouseHeight == 4 CMO == 0 then
  293.    
  294.         if CML == 1 and CMO == 0 then                        -- Cobalt
  295.         redstone.setBundledOutput("back", colors.white)
  296.         monitor.setBackgroundColour((colours.red))
  297.         monitor.setCursorPos(2,4)
  298.         monitor.write("Cobalt")
  299.         CMO = 1
  300.     elseif CMO == 1 then
  301.         shell.run("stop")
  302.         monitor.setBackgroundColour((colours.lime))
  303.         monitor.setCursorPos(2,4)
  304.         monitor.write("Cobalt")        
  305.         CMO = 0
  306.     end
  307.    
  308.     elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 6 CMO == 0 then
  309.  
  310.     if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then  -- LIQUIDS HERE!
  311.        
  312.         monitor.clear() -- Clear Monitor
  313.        
  314.         monitor.setBackgroundColour((colours.lime))
  315.        
  316.         monitor.setCursorPos(2,6)------------------- 1
  317.         monitor.write("Back")
  318.        
  319.         monitor.setCursorPos(2,8)
  320.         monitor.write("Glue")
  321.        
  322.         --monitor.setCursorPos(2,10)
  323.         --monitor.write("")
  324.  
  325.         --monitor.setCursorPos(2,12)
  326.         --monitor.write("")
  327.        
  328.         --monitor.setCursorPos(2,14)
  329.         --monitor.write("")
  330.  
  331.         --monitor.setCursorPos(2,16)
  332.         --monitor.write("")
  333.  
  334.         --monitor.setCursorPos(2,18)
  335.         --monitor.write("")
  336.  
  337.         monitor.setCursorPos(15,6)------------------- 2
  338.         monitor.write("Pyrotheum")
  339.        
  340.         monitor.setCursorPos(15,8)
  341.         monitor.write("Lava")
  342.        
  343.         --monitor.setCursorPos(15,10)
  344.         --monitor.write("")
  345.  
  346.         --monitor.setCursorPos(15,12)
  347.         --monitor.write("")
  348.        
  349.         --monitor.setCursorPos(15,14)
  350.         --monitor.write("")
  351.  
  352.         --monitor.setCursorPos(15,16)
  353.         --monitor.write("")
  354.  
  355.         --monitor.setCursorPos(15,18)
  356.         --monitor.write("")
  357.        
  358.         monitor.setCursorPos(28,6)------------------ 3
  359.         monitor.write("Blood")
  360.        
  361.         monitor.setCursorPos(28,8)
  362.         monitor.write("Water")
  363.        
  364.         --monitor.setCursorPos(28,10)
  365.         --monitor.write("")
  366.  
  367.         --monitor.setCursorPos(28,12)
  368.         --monitor.write("")
  369.        
  370.         --monitor.setCursorPos(28,14)
  371.         --monitor.write("")
  372.  
  373.         --monitor.setCursorPos(28,16)
  374.         --monitor.write("")
  375.  
  376.         --monitor.setCursorPos(28,18)
  377.         --monitor.write("")
  378.        
  379.         monitor.setCursorPos(41,6)------------------ 4
  380.         monitor.write("Cryotheum")
  381.        
  382.         --monitor.setCursorPos(41,8)
  383.         --monitor.write("")
  384.        
  385.         --monitor.setCursorPos(41,10)
  386.         --monitor.write("")
  387.  
  388.         --monitor.setCursorPos(41,12)
  389.         --monitor.write("")
  390.        
  391.         --monitor.setCursorPos(41,14)
  392.         --monitor.write("")
  393.  
  394.         --monitor.setCursorPos(41,16)
  395.         --monitor.write("")
  396.  
  397.         --monitor.setCursorPos(41,18)
  398.         --monitor.write("")
  399.        
  400.         monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  401.        
  402.         CLL = 1
  403.         elseif CLL == 1 then
  404.        
  405.         monitor.clear()
  406.    
  407.         monitor.setBackgroundColour((colours.lime))
  408.    
  409.         monitor.setCursorPos(2,2)
  410.         monitor.write("Metals")
  411.  
  412.         monitor.setCursorPos(2,4)
  413.         monitor.write("Alloys")
  414.  
  415.         monitor.setCursorPos(2,6)
  416.         monitor.write("Liquids")
  417.  
  418.         monitor.setCursorPos(2,8)
  419.         monitor.write("Blocks")
  420.    
  421.         monitor.setBackgroundColour((colours.black))
  422.  
  423.         CLL = 0
  424.        
  425.         end
  426.        
  427.     elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 8 CMO == 0 then    
  428.    
  429.     if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then  -- BLOCKS HERE!
  430.        
  431.         monitor.clear() -- Clear Monitor
  432.        
  433.         monitor.setBackgroundColour((colours.lime))
  434.        
  435.         monitor.setCursorPos(2,8)------------------- 1
  436.         monitor.write("Back")
  437.        
  438.         --monitor.setCursorPos(2,10)
  439.         --monitor.write("")
  440.        
  441.         --monitor.setCursorPos(2,12)
  442.         --monitor.write("")
  443.  
  444.         --monitor.setCursorPos(2,14)
  445.         --monitor.write("")
  446.        
  447.         --monitor.setCursorPos(2,16)
  448.         --monitor.write("")
  449.  
  450.         --monitor.setCursorPos(2,18)
  451.         --monitor.write("")
  452.  
  453.         --monitor.setCursorPos(2,20)
  454.         --monitor.write("")
  455.  
  456.         monitor.setCursorPos(15,8)------------------- 2
  457.         monitor.write("Obsidian")
  458.        
  459.         --monitor.setCursorPos(15,10)
  460.         --monitor.write("")
  461.        
  462.         --monitor.setCursorPos(15,12)
  463.         --monitor.write("")
  464.  
  465.         --monitor.setCursorPos(15,14)
  466.         --monitor.write("")
  467.        
  468.         --monitor.setCursorPos(15,16)
  469.         --monitor.write("")
  470.  
  471.         --monitor.setCursorPos(15,18)
  472.         --monitor.write("")
  473.  
  474.         --monitor.setCursorPos(15,20)
  475.         --monitor.write("")
  476.        
  477.         monitor.setCursorPos(28,8)------------------ 3
  478.         monitor.write("Seared Stone")
  479.        
  480.         --monitor.setCursorPos(28,10)
  481.         --monitor.write("")
  482.        
  483.         --monitor.setCursorPos(28,12)
  484.         --monitor.write("")
  485.  
  486.         --monitor.setCursorPos(28,14)
  487.         --monitor.write("")
  488.        
  489.         --monitor.setCursorPos(28,16)
  490.         --monitor.write("")
  491.  
  492.         --monitor.setCursorPos(28,18)
  493.         --monitor.write("")
  494.  
  495.         --monitor.setCursorPos(28,20)
  496.         --monitor.write("")
  497.        
  498.         monitor.setCursorPos(41,8)------------------ 4
  499.         monitor.write("Glass")
  500.        
  501.         --monitor.setCursorPos(41,10)
  502.         --monitor.write("")
  503.        
  504.         --monitor.setCursorPos(41,12)
  505.         --monitor.write("")
  506.  
  507.         --monitor.setCursorPos(41,14)
  508.         --monitor.write("")
  509.        
  510.         --monitor.setCursorPos(41,16)
  511.         --monitor.write("")
  512.  
  513.         --monitor.setCursorPos(41,18)
  514.         --monitor.write("")
  515.  
  516.         --monitor.setCursorPos(41,20)
  517.         --monitor.write("")
  518.        
  519.         monitor.setBackgroundColour((colours.black)) -- Set Background color to black
  520.        
  521.         CBL = 1
  522.         elseif CBL == 1 then
  523.             monitor.clear()
  524.    
  525.         monitor.setBackgroundColour((colours.lime))
  526.    
  527.         monitor.setCursorPos(2,2)
  528.         monitor.write("Metals")
  529.  
  530.         monitor.setCursorPos(2,4)
  531.         monitor.write("Alloys")
  532.  
  533.         monitor.setCursorPos(2,6)
  534.         monitor.write("Liquids")
  535.  
  536.         monitor.setCursorPos(2,8)
  537.         monitor.write("Blocks")
  538.    
  539.         monitor.setBackgroundColour((colours.black))
  540.  
  541.         CBL = 0
  542.    
  543.         end
  544.            
  545.  
  546.    
  547.  
  548.  
  549.   end
  550. end -- ends the function
  551.  
  552.  
  553.  
  554.  
  555.  
  556.  
  557.  
  558. repeat
  559.  
  560.   event,p1,p2,p3 = os.pullEvent() -- Get Event data. event,p1,p2,p3 from os.pullEvent()
  561.  
  562.     if event=="monitor_touch" then -- Event Mouse_touch (right click monitor)
  563.    
  564.     print("CML=", CML)
  565.     print("CAL=", CAL)
  566.     print("CLL=", CLL)
  567.     print("CBL=", CBL)
  568.     print("CMO=", CMO)
  569.    
  570.      mouseWidth = p2 -- sets mouseWidth -- Set Mouse Width to p2
  571.      mouseHeight = p3 -- and mouseHeight -- Set Mouse Height to p3
  572.      checkClickPosition() -- this runs our function -- Runs the pervious CheckClickPosition Function
  573.      
  574.     print(mouseWidth)
  575.     print(mouseHeight)
  576.    end -- End the IF statement
  577.  
  578. until event=="char" and p1==("x") -- Until the event "char" position 1 is X (aka when X is pressed) the programm will loop
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!