LUA BUTTON maumagro

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("Purgar", test1, 10,20,3,5)
  API.setTable("Activar", test2, 22,32,3,5)
  API.setTable("Memoria", test3, 10,20,8,10)
  API.setTable("Reiniciar", test4, 22,32,8,10)
  API.setTable("Salir", test5, 10,32,13,15)
  API.setTable("Autopurga", test6, 34,50,3,15)
  API.setTable("Luces", 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()
  term.setCursor(1,25)
  term.write("Trabajando...                      ")
  rs.setOutput(sides.right,15)
  os.sleep(2)
  API.flash("Purgar",0.25)
  rs.setOutput(sides.right,0)
  term.setCursor(1,25)
  term.write("Estacion 3 purgada                 ")
  os.sleep(1)
  term.setCursor(1,25)
  term.write("Sistema listo                      ")
end

function test2()
  API.toggleButton("Activar")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Trabajando...                         ")
    rs.setOutput(sides.left,15)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("Sistema listo                         ")
  else
    term.setCursor(1,25)
    term.write("Trabajando...                        ")
    rs.setOutput(sides.left,0)
    os.sleep(3)
    term.setCursor(1,25)
    term.write("Sistema listo                        ")
  end
end

function test3()
  term.setCursor(1,25)
  term.write("Memoria libre: "..computer.freeMemory().." bytes")
  os.sleep(3)
  term.setCursor(1,25)
  term.write("Sistema listo                              ")
end

function test4()
  computer.shutdown(true)
end

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

function test6()
  term.setCursor(1,25)
  term.write("Trabajando...                        ")
  API.flash("Autopurga",0.25)
  rs.setOutput(sides.front,15)
  os.sleep(2)
  rs.setOutput(sides.front,0)
  term.setCursor(1,25)
  term.write("Estacion purgada")
  os.sleep(1)
  term.setCursor(1,25)
  term.write("Sistema listo                      ")
end

function test7()
  API.toggleButton("Luces")
  if buttonStatus == true then
    term.setCursor(1,25)
    term.write("Trabajando...                         ")
    os.sleep(3)
    rs.setOutput(sides.back,15)
    term.setCursor(1,25)
    term.write("Sistema listo                         ")
  else
    term.setCursor(1,25)
    term.write("Trabajando...                        ")
    os.sleep(3)
    rs.setOutput(sides.back,0)
    term.setCursor(1,25)
    term.write("Sistema listo                        ")
  end
end

term.setCursorBlink(false)
gpu.setResolution(80, 25)
API.clear()
API.fillTable()
API.heading("Kerberos. Tablero de control de sistemas")
API.label(1,24,"Drizzard 2016. maumagro")

while true do
  getClick()
end



--eof