button

local mon = peripheral.wrap("top")
mon.setTextScale(1)
mon.setTextColor(colors.white)
local button={}
--local button2={]
mon.setBackgroundColor(colors.black)

function clearTable()
   button = {}
   mon.clear()
end
--function clearTable2()
--  button2 = {}
--  mon.clear()

function setTable(name, func, slot)
   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
   button[name]["slot"] = slot
end

if

function setTable2(name, func, xmin, xmax, ymin, ymax)
   button2[name] = {}
   button2[name]["func"] = func
   button2[name]["active"] = false
   button2[name]["xmin"] = xmin
   button2[name]["ymin"] = ymin
   button2[name]["xmax"] = xmax
   button2[name]["ymax"] = ymax
end

function funcName()
   print("You clicked buttonText")
end

function fillTable()
   setTable("ButtonText", funcName, 5, 25, 4, 8)
end

function fillTable2()
  setTable("ButtonText", funcName, 5, 25, 4, 8)
end
function fill(text, color, bData)
   mon.setBackgroundColor(color)
   local yspot = math.floor((bData["ymin"] + bData["ymax"]) /2)
   local xspot = math.floor((bData["xmax"] - bData["xmin"] - string.len(text)) /2) +1
   for j = bData["ymin"], bData["ymax"] do
      mon.setCursorPos(bData["xmin"], j)
      if j == yspot then
         for k = 0, bData["xmax"] - bData["xmin"] - string.len(text) +1 do
            if k == xspot then
               mon.write(text)
            else
               mon.write(" ")
            end
         end
      else
         for i = bData["xmin"], bData["xmax"] do
            mon.write(" ")
         end
      end
   end
   mon.setBackgroundColor(colors.black)
end

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

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

function flash(name)
   toggleButton(name)
   screen()
   sleep(0.15)
   toggleButton(name)
   screen()
end

function 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
            --data["active"] = not data["active"]
            --print(name)
         end
      end
   end
   return false
end

function heading(text)
   w, h = mon.getSize()
   mon.setCursorPos((w-string.len(text))/2+1, 1)
   mon.write(text)
end

function label(w, h, text)
   mon.setCursorPos(w, h)
   mon.write(text)
end