Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- Variables
- CMO = 0 -- Counter Metal Input
- CES = 0 -- Counter Empty Smeltery
- CML = 0 -- Counter Metal List
- CAL = 0 -- COunter Alloy List
- CLL = 0 -- Counter Liquid List
- CBL = 0 -- Counter Block List
- mouseWidth = 0 -- Create MouseWidth Variable
- mouseHeight = 0 -- Create MouseHeight Variable
- --------------------------------------------------------
- monitor = peripheral.wrap("right") -- Wrap monitor_0 monitor to "monitor"
- monitor.setBackgroundColour((colors.black)) -- Return to standart color BEFORE clearing the screen
- monitor.clear() -- Clear Monitor
- monitor.setCursorPos(1,1) -- Set Cursor to Pos 1,1
- w,h=monitor.getSize() -- set W to Width of Monitor and H to Height
- -------------------------------------------------------------------------
- print(w) -- Print Width
- print(h) -- Print Height
- -------------------------------------------------------------------------
- monitor.setBackgroundColour((colours.lime)) -- Set monitor Background Color For button creation
- -- What the montior writes here
- monitor.setCursorPos(2,2)
- monitor.write("Metals")
- monitor.setCursorPos(2,4)
- monitor.write("Alloys")
- monitor.setCursorPos(2,6)
- monitor.write("Liquids")
- monitor.setCursorPos(2,8)
- monitor.write("Blocks")
- monitor.setBackgroundColour((colours.black)) -- Set Background color to black
- function checkClickPosition()
- if mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 2 then
- if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- METALS HERE!
- monitor.clear() -- Clear Monitor
- monitor.setBackgroundColour((colours.lime))
- monitor.setCursorPos(2,2)------------------- 1
- monitor.write("Back")
- monitor.setCursorPos(2,4)
- monitor.write("Cobalt")
- monitor.setCursorPos(2,8)
- monitor.write("Glold")
- monitor.setCursorPos(2,10)
- monitor.write("Coal")
- monitor.setCursorPos(2,12)
- monitor.write("Unstable")
- monitor.setCursorPos(2,18)
- monitor.write("Silver")
- monitor.setCursorPos(2,20)
- monitor.write("Yellorium")
- monitor.setCursorPos(15,2)------------------- 2
- monitor.write("Aluminium")
- monitor.setCursorPos(15,4)
- monitor.write("Copper")
- monitor.setCursorPos(15,8)
- monitor.write("Iron")
- monitor.setCursorPos(15,10)
- monitor.write("Emerald")
- monitor.setCursorPos(15,12)
- monitor.write("Nickel")
- monitor.setCursorPos(15,18)
- monitor.write("Steel")
- --monitor.setCursorPos(15,20)
- --monitor.write("")
- monitor.setCursorPos(28,2)------------------ 3
- monitor.write("Ardite")
- monitor.setCursorPos(28,4)
- monitor.write("Dark Iron")
- monitor.setCursorPos(28,8)
- monitor.write("Lead")
- monitor.setCursorPos(28,10)
- monitor.write("Mana Metal")
- monitor.setCursorPos(28,12)
- monitor.write("Res Ender")
- monitor.setCursorPos(28,18)
- monitor.write("Tin")
- --monitor.setCursorPos(28,20)
- --monitor.write("")
- monitor.setCursorPos(41,2)------------------ 4
- monitor.write("Bedrockium")
- monitor.setCursorPos(41,4)
- monitor.write("Des Redstone")
- monitor.setCursorPos(41,8)
- monitor.write("Redstone")
- monitor.setCursorPos(41,10)
- monitor.write("Mithril")
- monitor.setCursorPos(41,12)
- monitor.write("Shiny")
- monitor.setCursorPos(41,18)
- monitor.write("Uranium")
- --monitor.setCursorPos(41,20)
- --monitor.write("")
- monitor.setBackgroundColour((colours.black)) -- Set Background color to black
- CML = 1
- elseif CML == 1 then
- end
- elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 4 then
- if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- ALLOYS HERE!
- monitor.clear() -- Clear Monitor
- monitor.setBackgroundColour((colours.lime))
- monitor.setCursorPos(2,2)------------------- 1
- monitor.write("Back")
- monitor.setCursorPos(2,4)
- monitor.write("Red Alloy")
- monitor.setCursorPos(2,8)
- monitor.write("Lumium")
- --monitor.setCursorPos(2,10)
- --monitor.write("")
- --monitor.setCursorPos(2,12)
- --monitor.write("")
- --monitor.setCursorPos(2,18)
- --monitor.write("")
- --monitor.setCursorPos(2,20)
- --monitor.write("")
- monitor.setCursorPos(15,2)------------------- 2
- monitor.write("Alum Brass")
- monitor.setCursorPos(15,4)
- monitor.write("Electrum")
- monitor.setCursorPos(15,8)
- monitor.write("Manyullyn")
- --monitor.setCursorPos(15,10)
- --monitor.write("")
- --monitor.setCursorPos(15,12)
- --monitor.write("")
- --monitor.setCursorPos(15,18)
- --monitor.write("")
- --monitor.setCursorPos(15,20)
- --monitor.write("")
- monitor.setCursorPos(28,2)------------------ 3
- monitor.write("Alumite")
- monitor.setCursorPos(28,4)
- monitor.write("Enderium")
- monitor.setCursorPos(28,8)
- monitor.write("Pig Iron")
- --monitor.setCursorPos(28,10)
- --monitor.write("")
- --monitor.setCursorPos(28,12)
- --monitor.write("")
- --monitor.setCursorPos(28,18)
- --monitor.write("")
- --monitor.setCursorPos(28,20)
- --monitor.write("")
- monitor.setCursorPos(41,2)------------------ 4
- monitor.write("Bronze")
- monitor.setCursorPos(41,4)
- monitor.write("Invar")
- monitor.setCursorPos(41,8)
- monitor.write("Signalium")
- --monitor.setCursorPos(41,10)
- --monitor.write("")
- --monitor.setCursorPos(41,12)
- --monitor.write("")
- --monitor.setCursorPos(41,18)
- --monitor.write("")
- --monitor.setCursorPos(41,20)
- --monitor.write("")
- monitor.setBackgroundColour((colours.black)) -- Set Background color to black
- CAL = 1
- elseif CAL == 1 then
- end
- elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 8 then
- if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- LIQUIDS HERE!
- monitor.clear() -- Clear Monitor
- monitor.setBackgroundColour((colours.lime))
- monitor.setCursorPos(2,2)------------------- 1
- monitor.write("Back")
- monitor.setCursorPos(2,4)
- monitor.write("Glue")
- --monitor.setCursorPos(2,8)
- --monitor.write("")
- --monitor.setCursorPos(2,10)
- --monitor.write("")
- --monitor.setCursorPos(2,12)
- --monitor.write("")
- --monitor.setCursorPos(2,18)
- --monitor.write("")
- --monitor.setCursorPos(2,20)
- --monitor.write("")
- monitor.setCursorPos(15,2)------------------- 2
- monitor.write("Pyrotheum")
- monitor.setCursorPos(15,4)
- monitor.write("Lava")
- --monitor.setCursorPos(15,8)
- --monitor.write("")
- --monitor.setCursorPos(15,10)
- --monitor.write("")
- --monitor.setCursorPos(15,12)
- --monitor.write("")
- --monitor.setCursorPos(15,18)
- --monitor.write("")
- --monitor.setCursorPos(15,20)
- --monitor.write("")
- monitor.setCursorPos(28,2)------------------ 3
- monitor.write("Blood")
- monitor.setCursorPos(28,4)
- monitor.write("Water")
- --monitor.setCursorPos(28,8)
- --monitor.write("")
- --monitor.setCursorPos(28,10)
- --monitor.write("")
- --monitor.setCursorPos(28,12)
- --monitor.write("")
- --monitor.setCursorPos(28,18)
- --monitor.write("")
- --monitor.setCursorPos(28,20)
- --monitor.write("")
- monitor.setCursorPos(41,2)------------------ 4
- monitor.write("Cryotheum")
- --monitor.setCursorPos(41,4)
- --monitor.write("")
- --monitor.setCursorPos(41,8)
- --monitor.write("")
- --monitor.setCursorPos(41,10)
- --monitor.write("")
- --monitor.setCursorPos(41,12)
- --monitor.write("")
- --monitor.setCursorPos(41,18)
- --monitor.write("")
- --monitor.setCursorPos(41,20)
- --monitor.write("")
- monitor.setBackgroundColour((colours.black)) -- Set Background color to black
- CLL = 1
- elseif CLL == 1 then
- end
- elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 8 then
- if CML == 0 and CAL == 0 and CLL == 0 and CBL == 0 then -- BLOCKS HERE!
- monitor.clear() -- Clear Monitor
- monitor.setBackgroundColour((colours.lime))
- monitor.setCursorPos(2,2)------------------- 1
- monitor.write("Back")
- monitor.setCursorPos(2,4)
- monitor.write("Glass")
- --monitor.setCursorPos(2,8)
- --monitor.write("")
- --monitor.setCursorPos(2,10)
- --monitor.write("")
- --monitor.setCursorPos(2,12)
- --monitor.write("")
- --monitor.setCursorPos(2,18)
- --monitor.write("")
- --monitor.setCursorPos(2,20)
- --monitor.write("")
- monitor.setCursorPos(15,2)------------------- 2
- monitor.write("Obsidian")
- --monitor.setCursorPos(15,4)
- --monitor.write("")
- --monitor.setCursorPos(15,8)
- --monitor.write("")
- --monitor.setCursorPos(15,10)
- --monitor.write("")
- --monitor.setCursorPos(15,12)
- --monitor.write("")
- --monitor.setCursorPos(15,18)
- --monitor.write("")
- --monitor.setCursorPos(15,20)
- --monitor.write("")
- monitor.setCursorPos(28,2)------------------ 3
- monitor.write("Seared Stone")
- --monitor.setCursorPos(28,4)
- --monitor.write("")
- --monitor.setCursorPos(28,8)
- --monitor.write("")
- --monitor.setCursorPos(28,10)
- --monitor.write("")
- --monitor.setCursorPos(28,12)
- --monitor.write("")
- --monitor.setCursorPos(28,18)
- --monitor.write("")
- --monitor.setCursorPos(28,20)
- --monitor.write("")
- --monitor.setCursorPos(41,2)------------------ 4
- --monitor.write("")
- --monitor.setCursorPos(41,4)
- --monitor.write("")
- --monitor.setCursorPos(41,8)
- --monitor.write("")
- --monitor.setCursorPos(41,10)
- --monitor.write("")
- --monitor.setCursorPos(41,12)
- --monitor.write("")
- --monitor.setCursorPos(41,18)
- --monitor.write("")
- --monitor.setCursorPos(41,20)
- --monitor.write("")
- monitor.setBackgroundColour((colours.black)) -- Set Background color to black
- CBL = 1
- elseif CBL == 1 then
- end
- elseif mouseWidth > 1 and mouseWidth < 7 and mouseHeight == 2 then
- if CML == 1 or CAL == 1 or CLL == 1 or CBL == 1 then
- monitor.clear
- monitor.setBackgroundColour((colours.lime))
- monitor.setCursorPos(2,2)
- monitor.write("Metals")
- monitor.setCursorPos(2,4)
- monitor.write("Alloys")
- monitor.setCursorPos(2,6)
- monitor.write("Liquids")
- monitor.setCursorPos(2,8)
- monitor.write("Blocks")
- monitor.setBackgroundColour((colours.black))
- end
- end
- end -- ends the function
- repeat
- event,p1,p2,p3 = os.pullEvent() -- Get Event data. event,p1,p2,p3 from os.pullEvent()
- if event=="monitor_touch" then -- Event Mouse_touch (right click monitor)
- mouseWidth = p2 -- sets mouseWidth -- Set Mouse Width to p2
- mouseHeight = p3 -- and mouseHeight -- Set Mouse Height to p3
- checkClickPosition() -- this runs our function -- Runs the pervious CheckClickPosition Function
- end -- End the IF statement
- 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
Advertisement