test door

os.loadAPI("touchpoint")

--Set Up Pages
local page1 = touchpoint.new("monitor_2")

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

function openCover()

   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.white))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.white))
   sleep(1)

end

function closeCover()

   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.orange))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.orange))
   sleep(1)

end

function raisePlatform()

   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.magenta))
   sleep(1)

end

function lowerPlatform()

   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.combine(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)
   rs.setBundledOutput("back", colors.subtract(rs.getBundledOutput("back"), colors.lightBlue))
   sleep(1)

end

function quitProgram()
   shell.run("shell")
end

--Menus
function nasaTable()
   t = page1
end

--Layout Buttons
do
   page1:add("NASA Controls", doNothing, 4, 1, 36, 1, colors.black, colors.black, colors.lightBlue)
   page1:add("Open", openCover, 4, 5, 12, 6, colors.black. colors.black, colors.lightBlue)
   page1:add("Raise", raisePlatform, 16, 5, 24, 6, colors.black. colors.black, colors.lightBlue)
   page1:add("Close", closeCover, 4, 8, 12, 9, colors.black. colors.black, colors.lightBlue)
   page1:add("Lower", lowerPlatform, 16, 8, 24, 9, colors.black. colors.black, colors.lightBlue)
   page1:add("Exit", quitProgram, 1, 3, 36, 3, colors.black, colors.black, colors.black, colors.black)
end

--Begin Program
nasaTable()

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