Nuclear control

API = require("buttonAPI")
local event = require("event")
local computer = require("computer")
local term = require("term")
local component = require("component")
local gpu = component.gpu

local rs = component.redstone
local colors = require("colors")
local sides = require("sides")

function API.fillTable()
  API.setTable("Gen 1", test1, 10,20,3,5)
  API.setTable("Gen 2", test2, 22,32,3,5)
  API.setTable("Gen 3", test3, 10,20,8,10)
  API.setTable("Gen 4", test4, 22,32,8,10)
  API.setTable("Exit", test5, 10,32,13,15)
  API.setTable("Emergency stop", test6, 34,50,3,15)
  API.setTable("Lights", test7, 52,62,3,5)
  API.screen()
end

function getClick()
  local _, _, x, y = event.pull(1,touch)
  if x == nil or y == nil then
    local h, w = gpu.getResolution()
    gpu.set(h, w, ".")
    gpu.set(h, w, " ")
  else
    API.checkxy(x,y)
  end
end

function test1()
  API.toggleButton("Gen 1")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Working...                         ")
    rs.setOutput(sides.right,15)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                         ")
  else
    term.setCursor(1,25)
    term.write("Working...                        ")
    rs.setOutput(sides.right,0)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                        ")
  end
end

function test2()
  API.toggleButton("Gen 2")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Working...                         ")
    rs.setOutput(sides.left,15)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                         ")
  else
    term.setCursor(1,25)
    term.write("Working...                        ")
    rs.setOutput(sides.left,0)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                        ")
  end
end

function test3()
  API.toggleButton("Gen 3")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Working...                         ")
    rs.setOutput(sides.front,15)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                         ")
  else
    term.setCursor(1,25)
    term.write("Working...                        ")
    rs.setOutput(sides.front,0)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                        ")
  end
end

function test4()
  API.toggleButton("Gen 4")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Working...                         ")
    rs.setOutput(sides.back,15)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                         ")
  else
    term.setCursor(1,25)
    term.write("Working...                        ")
    rs.setOutput(sides.back,0)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("System ready                        ")
  end
end

function test5()
  term.clear()
  os.exit()
end

function test6()
  term.setCursor(1,25)
  term.write("Working...                        ")
  API.flash("Emergency stop",0.25)
  os.sleep(2)
  rs.setOutput(sides.front,0)
  rs.setOutput(sides.back,0)
  rs.setOutput(sides.right,0)
  rs.setOutput(sides.left,0)
  term.setCursor(1,25)
  term.write("Reactors emergency shutdown!         ")
  os.sleep(1)
  term.setCursor(1,25)
  term.write("System ready                           ")
  os.exit()
end

function test7()
  API.toggleButton("Lights")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Working...                         ")
    os.sleep(3)
    rs.setOutput(sides.up,15)
    term.setCursor(1,25)
    term.write("System ready                         ")
  else
    term.setCursor(1,25)
    term.write("Working...                        ")
    os.sleep(3)
    rs.setOutput(sides.up,0)
    term.setCursor(1,25)
    term.write("System ready                        ")
  end
end

term.setCursorBlink(false)
gpu.setResolution(80, 25)
API.clear()
API.fillTable()
API.heading("McProton. System control module")
API.label(1,24,"McPrime 2017. maumagro")

while true do
  getClick()
end



--eof