mobrev

os.loadAPI("button")
local m = peripheral.wrap("left")
local rsOut = {}
local c = peripheral.wrap("iron_1")
local c2 = peripheral.wrap("iron_0")
m.clear()
local mobArray = {}
local mobArray2 = {}
local buttonColors = {}
local page = 1
local pages = 0

function fillMainTable()
   m.clear()
   button.clearTable()
   button.setTable("Lights", lights, "", 4, 17, 2, 4)
   button.setTable("Door", door, "", 20, 33, 2, 4)
   button.setTable("Grinders", grinders, "", 4, 17, 6, 8)
   button.setTable("DrawBridge", drawBridge, "", 20, 33, 6, 8)
   button.setTable("Attractor", attractorToggle, "", 4, 17, 10, 12)
   button.setTable("Exact Select", exactSelect, "", 20, 33, 10, 12)
   button.setTable("Mob Selector", mobSelect, "", 20, 33, 14, 16)
   button.setTable("Spawner", spawner, "", 4, 17, 14, 16)
   ---button.setTable("Refresh", refresh, "", 15, 35, 19, 19)
   print("Filled")
   button.screen()
   for i,j in pairs(buttonColors) do
      if not rsOut[j] then button.toggleButton(i) end
   end
end

function fillTable()
   checkMobs()
   m.clear()
   button.clearTable()
   local totalrows = 0
   local npp = 12 --names per page
   local numNames = 0
   local col = 2
   local row = 12
   local countRow = 1
   local currName = 0
   for i,j in pairs(mobArray) do
      totalrows = totalrows+1
   end
   pages = math.ceil(totalrows/npp)
   print(totalrows)
   for name,slot in pairs(mobArray) do
       currName = currName + 1
       if currName > npp*(page-1) and currName < npp*page+1 then
         row = 4+(countRow)
         button.setTable(string.sub(name, 0, 17), insertMob, slot, col, col+17 , row, row)
         if col == 21 then
           col = 2
           countRow = countRow + 2
         else
           col = col+19
         end
       end
   end
   button.setTable("Next Page", nextPage, "", 27, 38, 1, 1)
   button.setTable("Prev Page", prevPage, "", 2, 13, 1, 1)
   button.setTable("Main Menu", goMainMenu, "", 15, 25, 1, 1)
   button.setTable("Remove Mob", removeMob, "", 2, 19, 18, 19)
   button.screen()
   button.label(15,3, "Page: "..tostring(page).." of "..tostring(pages))
end


function goMainMenu()
   fillMainTable()
--   refresh()
end

function exactSelect()
  print("coming soon")
end

function nextPage()
   if page+1 <= pages then
      page = page+1
   end
   fillTable()
   sleep(0.25)
end

function prevPage()
   if page-1 >= 1 then page = page-1 end
   fillTable()
   sleep(0.25)
end

function getMobs()
   mobArray = {}
   for i = 1,27  do
      if c.getStackInSlot(i) then
         data = c.getStackInSlot(i)
         --print(i..":"..data.captured)
         mobArray[data.captured] = i
      end
   end
end

function getMobs2()
  mobArray = {}
  for i = 1,27 do
    if c2.getStackInSlot(i2) then
       data = c2.getStackInSlot(2)
       mobArray2[data.captured] = 2
    end
  end
end

function findEmptySlot()
   for i = 1,27 do
      if not c.getStackInSlot(i) then
         return(i)
      end
   end
end

function removeMob()
   local slot = findEmptySlot()
   c.pullItem("down", 1, 1, slot)
end

function insertMob(info)
   removeMob()
   c.pushItem("down", info, 1, 1)
   fillTable()
end

function checkMobs()
   getMobs()
   --fillTable()
end

function initRS()
   rsOut[colors.white] = false
   rsOut[colors.orange] = true
   rsOut[colors.magenta] = false
   rsOut[colors.lightBlue] = true
   rsOut[colors.black] = true
   rsOut[colors.lime] = false
   buttonColors["Lights"] = colors.white
   buttonColors["Spawner"] = colors.orange
   buttonColors["Grinders"] = colors.magenta
   buttonColors["DrawBridge"] = colors.lightBlue
   buttonColors["Attractor"] = colors.black
   buttonColors["Door"] = colors.lime
end

function setRS()
   local colorOutput = 0
   for i,j in pairs(rsOut) do
      if j then colorOutput = colorOutput + i end
    end
    rs.setBundledOutput("bottom", colorOutput)
end

function lights()
   button.toggleButton("Lights")
   rsOut[colors.white] = not rsOut[colors.white]
   setRS()
end

function door()
   button.toggleButton("Door")
   rsOut[colors.lime] = not rsOut[colors.lime]
   setRS()
end

function spawner()
   button.toggleButton("Spawner")
   rsOut[colors.orange] = not rsOut[colors.orange]
   setRS()
end

function grinders()
   button.toggleButton("Grinders")
   rsOut[colors.magenta] = not rsOut[colors.magenta]
   setRS()
end

function drawBridge()
   button.toggleButton("DrawBridge")
   rsOut[colors.lightBlue] = not rsOut[colors.lightBlue]
   setRS()
end

function attractorToggle()
   button.toggleButton("Attractor")
   rsOut[colors.black] = not rsOut[colors.black]
   setRS()
end

function mobSelect()
   fillTable()
--   refresh()
--   getClick()
end

function getClick()
   local event,side,x,y = os.pullEvent()
   if event=="monitor_touch" then
     button.checkxy(x,y)
   end
end

function refresh()
   m.clear()
   print("Refreshed")
   button.screen()
end

initRS()
setRS()
fillMainTable()
--refresh()
while true do getClick() end