Buttontest

local mon = peripheral.find("monitor")
local button = {}

function setButton(name, title, func, xstart, ystart, xend, yend, color)
    button[name] = {}
    button[name][title] = title
    button[name]["func"] = func
    button[name]["active"] = false
    button[name]["xstart"] = xstart
    button[name]["ystart"] = ystart
    button[name]["xend"] = xend
    button[name]["yend"] = yend
    button[name]["color"] = color
end

data = button[name]

function checkxy()
event, side, xpos, ypos = os.pullEvent("monitor_touch")

if xpos >= data["xstart"] and xpos =< data["xend"] then
    if ypos >= data["ystart"] and ypos =< data["yend"] then
    return true
    end
else
    return false
end

local bData = button[name]

function fill(text, color, bData)
   mon.setBackgroundColor(color)
   mon.setTextColor(colors.white)
   local yspot = math.floor((bData["ymin"] + bData["ymax"]) /2)
   local xspot = math.floor((bData["xmax"] - bData["xmin"] - string.len(bData["title"])) /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(bData["title"]) +1 do
            if k == xspot then
               mon.write(bData["title"])
            else
               mon.write(" ")
            end
         end
      else
         for i = bData["xmin"], bData["xmax"] do
            mon.write(" ")
         end
      end
   end
   mon.setBackgroundColor(colors.black)
end