FTB - Portal

local mon = peripheral.wrap("back")
mon.setTextScale(1)
mon.setTextColor(colors.white)
local button={}
mon.setBackgroundColor(colors.black)
os.loadAPI ("bundleAPI")

function 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 funcName()
   print("You clicked",text)
end

function Refinery()
   bundleAPI.toggle("left","white")
   end

function Liquids()
   bundleAPI.toggle("left","blue")
   end

 function Processing()
   bundleAPI.toggle("left","lightBlue")
   end

 function Power()
   bundleAPI.toggle("left","orange")
   end


function fillTable()
   setTable("Refinery", Refinery, 2, 13, 3, 5)
   setTable("Liquids", Liquids, 15, 26, 3, 5)
   setTable("Processing", Processing, 1, 12, 11, 13)
   setTable("Power", Power, 1, 12, 15, 17)
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.green else currColor = colors.gray end
      fill(name, currColor, data)
   end
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"]()
            data["active"] = not data["active"]
            print(name)
         end
      end
   end
end

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

timeout = os.startTimer(1)
fillTable()

while true do
   mon.clear()
   heading(" ")
   screen()
   local event = {os.pullEvent()}
   if event[1] == "monitor_touch" then
   checkxy(event[3], event[4])
   print(event[4]..":"..event[3])
   elseif event[1] == "timer" and event[2] == timeout then
   timeout = os.startTimer(1)
   end
end