ComputerCraft - Monitor

page = 0
os.loadAPI("button")
function load(name)
	local file = fs.open(name,"r")
	local data = file.readAll()
	file.close()
	return textutils.unserialize(data)
end
function save(table,name)
	local file = fs.open(name,"w")
	file.write(textutils.serialize(table))
	file.close()
end
--save(0, "saves/recycler")
--save(0, "saves/engine1")
--save(0, "saves/engine2")
--save(0, "saves/engine3")
--save(0, "saves/steam")
if fs.exists("saves") == false then
	fs.makeDir("saves")
end
m = peripheral.wrap("top")
m.clear()

rednet.open("front")
function fillTable(page)
   if page == 0 then
	term.clear()
	term.setCursorPos(1,1)
   	button.setTable("Recycler", recycler, 10,20,3,5)
   	button.setTable("Engine 1", engine1, 22,32,3,5)
   	button.setTable("Engine 2", engine2, 10,20,8,10)
   	button.setTable("Engine 3", engine3, 22,32,8,10)
   	button.setTable("Steam", steam, 10, 20, 13, 15)
   	button.setTable("Next Page", next, 22, 32, 13, 15)
   elseif page == 1 then
 	term.clear()
	term.setCursorPos(1,1)
	button.setTable("Back", back, 22, 32, 13, 15)
   end
   button.screen()
end

function getClick()
   event,side,x,y = os.pullEvent("monitor_touch")
   button.checkxy(x,y)
end
function setToggledButton(counter, name, computer, preposition)
   if counter == 1 then
      button.toggleButton(name)
      rednet.send(computer, preposition)
    end
end
function startup()
   recyclercounter = load("saves/recycler")
   engine1counter = load("saves/engine1")
   engine2counter = load("saves/engine2")
   engine3counter = load("saves/engine3")
   steamcounter = load("saves/steam")
   setToggledButton(recyclercounter, "Recycler", 80, "front")
   setToggledButton(engine1counter, "Engine 1", 80, "right")
   setToggledButton(engine2counter, "Engine 2", 80, "back")
   setToggledButton(engine3counter, "Engine 3", 80, "left")
   setToggledButton(steamcounter, "Steam", 85, "front")
end
function addAndCheck(counter1)
	counter1 = counter1 + 1
	if counter1 > 1 then
        	counter1 = 0
	end
return counter1
end
function recycler()
   recyclercounter = addAndCheck(recyclercounter)
   save(recyclercounter, "saves/recycler")
   button.toggleButton("Recycler")
   rednet.send(80, "front")
   print("Recycler")
end

function engine1()
   engine1counter = addAndCheck(engine1counter)
   save(engine1counter, "saves/engine1")
   button.toggleButton("Engine 1")
   rednet.send(80,"right")
   print("Engine 1")
end

function engine2()
   engine2counter = addAndCheck(engine2counter)
   save(engine2counter, "saves/engine2")
   button.toggleButton("Engine 2")
   rednet.send(80,"back")
   print("Engine 2")
end

function engine3()
   engine3counter = addAndCheck(engine3counter)
   save(engine3counter, "saves/engine3")
   button.toggleButton("Engine 3")
   rednet.send(80,"left")
   print("Engine 3")
end
function steam()
  steam = addAndCheck(steamcounter)
  save(steamcounter, "saves/steam")
  button.toggleButton("Steam")
  rednet.send(85, "front")
  print("Steam Engine")
end
function next()
  button.toggleButton("Next Page")
  sleep(0.5)
  print("Next Page")
  page = page + 1
  term.clear()
  term.setCursorPos(1,1)
  fillTable(page)
end
function back()
  button.toggleButton("Back")
  sleep(0.5)
  print("Back Page")
  page = page - 1
  term.clear()
  term.setCursorPos(1,1)
  fillTable(page)
end
fillTable(page)
startup()
button.heading("Control System")
while true do
   getClick()
end