OpenComputer ButtonAPI

local API = {}
local button={}
local bar={}
local greenBar={}
local redBar={}


local component = require("component")
local colors = require("colors")
local term = require("term")
local mon = component.gpu
local w, h = mon.getResolution()
local Green = 0x00AA00
local Red = 0xAA0000
local Black = 0x000000

buttonStatus = nil

function API.clear()
  mon.setBackground(Black)
  mon.fill(1, 1, w, h, " ")
end

function API.clearTable()
  button = {}
  API.clear()
end

function API.setTable(name, func, xmin, xmax, ymin, ymax)
  button[name] = {}
  button[name]["func"] = func
  button[name]["active"] = false
  button[name]["xmin"] = xmin
  button[name]["ymin"] = ymin
  button[name]["xmax"] = xmax
  button[name]["ymax"] = ymax
end

function API.fillBar(name, percent)
  if percent == 0 then

    redBar[name]["xmin"] = bar[name]["xmin"]
    redBar[name]["xmax"] = bar[name]["xmax"]
    redBar[name]["ymin"] = bar[name]["ymin"]
    redBar[name]["ymax"] = bar[name]["ymax"]
    API.fill(" ", Red, redBar[name])

  elseif percent == 100 then

    greenBar[name]["xmin"] = bar[name]["xmin"]
    greenBar[name]["xmax"] = bar[name]["xmax"]
    greenBar[name]["ymin"] = bar[name]["ymin"]
    greenBar[name]["ymax"] = bar[name]["ymax"]
    API.fill(" ", Green, greenBar[name])

  else

    local len = bar[name]["xmax"] - bar[name]["xmin"]
    local u = len/100.0
    local gLen = math.floor(u*percent)
    redBar[name] = {}
    greenBar[name] = {}
    greenBar[name]["xmin"] = bar[name]["xmin"]
    greenBar[name]["ymin"] = bar[name]["ymin"]
    greenBar[name]["xmax"] = bar[name]["xmin"] + gLen + 1
    greenBar[name]["ymax"] = bar[name]["ymax"]

    -- print(greenBar[name]["xmin"])
    -- print(greenBar[name]["ymin"])
    -- print(greenBar[name]["xmax"])
    -- print(greenBar[name]["ymax"])
    -- print(gLen)
    -- print(u)
    -- print(len)

    redBar[name]["xmin"] = bar[name]["xmin"] + gLen
    redBar[name]["ymin"] = bar[name]["ymin"]
    redBar[name]["xmax"] = bar[name]["xmax"]
    redBar[name]["ymax"] = bar[name]["ymax"]
    API.fill(" ", Green, greenBar[name])
    API.fill(" ", Red, redBar[name])
  end
end

function API.progressBar(name, xmin, ymin, xmax, ymax)
  bar[name] = {}
  bar[name]["xmin"] = xmin
  bar[name]["xmax"] = xmax
  bar[name]["ymin"] = ymin
  bar[name]["ymax"] = ymax
  API.fillBar(name, 50)
end

function API.fill(text, color, bData)
  local yspot = math.floor((bData["ymin"] + bData["ymax"]) /2)
  local xspot = math.floor((bData["xmax"] + bData["xmin"] - string.len(text)) /2)+1
  local oldColor = mon.setBackground(color)
  mon.fill(bData["xmin"], bData["ymin"], (bData["xmax"]-bData["xmin"]+1), (bData["ymax"]-bData["ymin"]+1), " ")
  mon.set(xspot, yspot, text)  mon.setBackground(oldColor)
end

function API.screen()
  local currColor
  for name,data in pairs(button) do
    local on = data["active"]
    if on == true then currColor = Green else currColor = Red end
    API.fill(name, currColor, data)
  end
end

function API.toggleButton(name)
  button[name]["active"] = not button[name]["active"]
  buttonStatus = button[name]["active"]
  API.screen()
end

function API.flash(name,length)
  API.toggleButton(name)
  API.screen()
  os.sleep(length)
  API.toggleButton(name)
  API.screen()
end

function API.checkxy(x, y)
  for name, data in pairs(button) do
    if y>=data["ymin"] and  y <= data["ymax"] then
      if x>=data["xmin"] and x<= data["xmax"] then
        data["func"]()
          return true
      end
    end
  end
  return false
end

function API.heading(text)
  w, h = mon.getResolution()
  term.setCursor((w-string.len(text))/2+1, 1)
  term.write(text)
end

function API.label(w, h, text)
  term.setCursor(w, h)
  term.write(text)
end

return API





--eof