betterwork

os.loadAPI("touchpoint","monitor1","monitor2")

--Resets Outputs
rs.setBundledOutput("bottom", 0)
rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.magenta)) --Lights ON!!

--Set Up Pages
local page1 = touchpoint.new("monitor_21")
local page2 = touchpoint.new("monitor_21")
local page3 = touchpoint.new("monitor_21")
local page4 = touchpoint.new("monitor_21")
local page5 = touchpoint.new("monitor_20")
local page6 = touchpoint.new("monitor_20")
local page7 = touchpoint.new("monitor_20")
local page8 = touchpoint.new("monitor_20")

--Functions
--Ignores Input
function doNothing()
   sleep(0.5)
end

--Lights On
function ltOn()
   page2:flash("On")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.magenta))
end

--Lights Off
function ltOff()
   page2:flash("Off")
   rs.setBundledOutput("bottom", colors.subtract(rs.getBundledOutput("bottom"), colors.magenta))
end

--Power On
function pwOn()
   page3:flash("On")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.orange))
end

function pwOff()
   page3:flash("Off")
   rs.setBundledOutput("bottom", colors.subtract(rs.getBundledOutput("bottom"), colors.orange))
end

--Door Open
function drOpen()
   page4:flash("Open")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.white))
end

--Door Close
function drClose()
   page4:flash("Close")
   rs.setBundledOutput("bottom", colors.subtract(rs.getBundledOutput("bottom"), colors.white))
end

--Door Timed
function drTime()
   page4:toggle("Timed")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.white))
   sleep(5)
   page4:toggle("Timed")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.white))
end

--Redstone On
function rsOn()
   page2:flash("On")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.lightBlue))
end

--Redstone Off
function rsOff()
   page2:flash("Off")
   rs.setBundledOutput("bottom", colors.subtract(rs.getBundledOutput("bottom"), colors.lightBlue))
end

--Ender On
function enOn()
   page3:flash("On")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.lime))
end

--Ender Off

function enOff()
   page3:flash("Off")
   rs.setBundledOutput("bottom", colors.subtract(rs.getBundledOutput("bottom"), colors.lime))
end

--Lava On
function lavaOn()
   page4:flash("On")
   rs.setBundledOutput("bottom", colors.combine(rs.getBundledOutput("bottom"), colors.yellow))
end

--Lava Off
function lavaOff()
   page4:flash("Off")
   rs.setBundledOutput("bottom", colors.subtract(rs.getBundledOutput("bottom"), colors.yellow))
end

--Menus
function mainTable()
   t = page1
   t = page5
end

function lightTable()
   t = page2
end

function powerTable()
   t = page3
end

function doorTable()
   t = page4
end

function redstoneTable()
   t = page6
end

function enderTable()
   t = page7
end

function lavaTable()
   t = page8
end



--Layout Buttons
do
   page1:add("Home Menu", doNothing, 4, 1, 36, 2, colors.purple, colors.purple, colors.white, colors.white)
   page1:add("Lights", lightTable, 4, 5, 12, 9, colors.purple, colors.lime, colors.black, colors.black)
   page1:add("Power", powerTable, 16, 5, 24, 9, colors.purple, colors.lime, colors.black, colors.black)
   page1:add("Door", doorTable, 28, 5, 36, 9, colors.purple, colors.lime, colors.black, colors.black)

   page2:add("Lights Menu", doNothing, 4, 1, 36, 2, colors.orange, colors.orange, colors.black, colors.black)
   page2:add("On", ltOn, 4, 5, 12, 9, colors.orange, colors.lime, colors.black, colors.black)
   page2:add("Off", ltOff, 16, 5, 24, 9, colors.orange, colors.lime, colors.black, colors.black)
   page2:add("Back", mainTable, 28, 13, 36, 17, colors.orange, colors.lime, colors.black, colors.black)

   page3:add("Power Menu", doNothing, 4, 1, 36, 2, colors.red, colors.lime, colors.black, colors.black)
   page3:add("On", pwOn, 4, 5, 12, 9, colors.red, colors.lime, colors.black, colors.black)
   page3:add("Off", pwOff, 16, 5, 24, 9, colors.red, colors.lime, colors.black, colors.black)
   page3:add("Back", mainTable, 28, 13, 36, 17, colors.red, colors.lime, colors.black, colors.black)

   page4:add("Door Menu", doNothing, 4, 1, 36, 2, colors.cyan, colors.cyan, colors.black, colors.black)
   page4:add("Open", drOpen, 4, 5, 12, 9, colors.cyan, colors.lime, colors.black, colors.black)
   page4:add("Close", drClose, 16, 5, 24, 9, colors.cyan, colors.lime, colors.black, colors.black)
   page4:add("Timed", drTime, 28, 5, 36, 9, colors.cyan, colors.lime, colors.black, colors.black)
   page4:add("Back", mainTable, 28, 13, 36, 17, colors.cyan, colors.lime, colors.black, colors.black)

   page5:add("Liquids Menu", doNothing, 4, 1, 36, 2, colors.purple, colors.purple, colors.white, colors.white)
   page5:add("Redstone", redstoneTable, 4, 5, 12, 9, colors.purple, colors.lime, colors.black, colors.black)
   page5:add("Ender", enderTable, 16, 5, 24, 9, colors.purple, colors.lime, colors.black, colors.black)
   page5:add("Lava", lavaTable, 28, 5, 36, 9, colors.purple, colors.lime, colors.black, colors.black)

   page6:add("Redstone Menu", doNothing, 4, 1, 36, 2, colors.red, colors.orange, colors.black, colors.black)
   page6:add("On", rsOn, 4, 5, 12, 9, colors.red, colors.lime, colors.black, colors.black)
   page6:add("Off", rsOff, 16, 5, 24, 9, colors.red, colors.lime, colors.black, colors.black)
   page6:add("Back", mainTable, 28, 13, 36, 17, colors.red, colors.lime, colors.black, colors.black)

   page7:add("Ender Menu", doNothing, 5, 1, 36, 2, colors.lightBlue, colors.lightBlue, colors.black, colors.black)
   page7:add("On", enOn, 4, 5, 12, 9, colors.lightBlue, colors.lime, colors.black, colors.black)
   page7:add("Off", enOff, 16, 5, 24, 9, colors.lightBlue, colors.lime, colors.black, colors.black)
   page7:add("Back", mainTable, 28, 13, 36, 17, colors.lightBlue, colors.lime, colors.black, colors.black)

   page8:add("Lava Menu", doNothing, 4, 1, 36, 2, colors.orange, colors.orange, colors.black, colors.black)
   page8:add("On", lavaOpen, 4, 5, 12, 9, colors.orange, colors.lime, colors.black, colors.black)
   page8:add("Off", lavaClose, 16, 5, 24, 9, colors.orange, colors.lime, colors.black, colors.black)
   page8:add("Back", mainTable, 28, 13, 36, 17, colors.orange, colors.lime, colors.black, colors.black)

end

--Begin Program
mainTable()

while true do
   t:draw()
   local event, p1 = t:handleEvents(os.pullEvent())
   if event == "button_click" then
      t.buttonList[p1].func()
   end
end