test

rednet.open("back")
os.loadAPI("button")
local m = term
local isOn = false
local menuType = "mainMenu"
local previousMenu = ""
local slotn = 0

function mainMenu()
  m.clear()
  button.heading("Main Menu")
  button.clearTable()
  button.setTable("Turn On", turnOn, "", 1, 9, 2, 2)
  button.setTable("Debug", test, "", 1, 9, 4, 4)
  button.setTable("Remote Control", remoteControl, "", 1, 16, 6, 6)
  button.setTable("Slot Menu", slot, "", 1, 9, 8, 8)
  if isOn == true then
    button.toggleButton("Turn On")
  end
  button.screen()
end

function remoteControlMenu()
  m.clear()
  button.heading("Remote Control Menu")
  button.clearTable()
  button.setTable("Slot Menu", slot, "", 18, 26, 2, 2)
  button.setTable("Go Up", goUp, "", 1, 9, 2, 2)
  button.setTable("Go Down", goDown, "", 1, 9, 3, 3)
  button.setTable("^", forward, "", 11, 15, 11, 11)
  button.setTable("l", forward, "", 11, 15, 12, 12)
  button.setTable("<-", left, "", 8, 10, 13, 15)
  button.setTable("O", mineBlock, "", 11, 15, 13, 15)
  button.setTable("->", right, "", 16, 18, 13, 15)
  button.setTable("|", backward, "", 11, 15, 16, 16)
  button.setTable("V", backward, "", 11, 15, 17, 17)
  button.setTable("Back", back, "", 1, 26, 19, 20)
  button.screen()
end

function slotMenu()
  m.clear()
  button.heading("Slot Menu")
  button.clearTable()
  sendMessage("slots")
  for i = 1,16 do
    slotn = i+1
    id,message = rednet.receive()
    button.label(1,slotn,i)
    button.label(4,slotn,message)
  end
  button.setTable("Back", back, "", 22, 26, 20, 20)
  button.setTable("1", slot1, "", 1, 2, 18, 18)
  button.setTable("2", slot2, "", 4, 5, 18, 18)
  button.setTable("3", slot3, "", 7, 8, 18, 18)
  button.setTable("4", slot4, "", 10, 11, 18, 18)
  button.setTable("5", slot5, "", 13, 14, 18, 18)
  button.setTable("6", slot6, "", 16, 17, 18, 18)
  button.setTable("7", slot7, "", 19, 20, 18, 18)
  button.setTable("8", slot8, "", 22, 23, 18, 18)
  button.setTable("9", slot9, "", 25, 26, 18, 18)
  button.setTable("10", slot10, "", 1, 2, 20, 20)
  button.setTable("11", slot11, "", 4, 5, 20, 20)
  button.setTable("12", slot12, "", 7, 8, 20, 20)
  button.setTable("13", slot13, "", 10, 11, 20, 20)
  button.setTable("14", slot14, "", 13, 14, 20, 20)
  button.setTable("15", slot15, "", 16, 17, 20, 20)
  button.setTable("16", slot16, "", 19, 20, 20, 20)
  button.screen()
end


function sendMessage(message)
  rednet.send(14, message)
end

function slot1()
  sendMessage("1")
end

function slot2()
  sendMessage("2")
end

function slot3()
  sendMessage("3")
end

function slot4()
  sendMessage("4")
end

function slot5()
  sendMessage("5")
end

function slot6()
  sendMessage("6")
end

function slot7()
  sendMessage("7")
end

function slot8()
  sendMessage("8")
end

function slot9()
  sendMessage("9")
end

function slot10()
  sendMessage("10")
end

function slot11()
  sendMessage("11")
end

function slot12()
  sendMessage("12")
end

function slot13()
  sendMessage("13")
end

function slot14()
  sendMessage("14")
end

function slot15()
  sendMessage("15")
end

function slot16()
  sendMessage("16")
end


function turnOn()
  button.toggleButton("Turn On")
  isOn = not isOn
end

function test()
  print(isOn)
  sleep(5)
  mainMenu()
end

function back()
  if menuType == previousMenu then
    menuType = "mainMenu"
  else
    menuType=previousMenu
  end
  sleep()
  displayScreen()
end

function slot()
  previousMenu=menuType
  menuType="slotMenu"
  sleep()
  displayScreen()
end

function remoteControl()
  previousMenu=menuType
  menuType="remoteControlMenu"
  sleep()
  displayScreen()
end

function forward()
  sendMessage("forward")
end

function left()
  sendMessage("left")
end

function right()
  sendMessage("right")
end

function backward()
  sendMessage("backward")
end

function mineBlock()
  sendMessage("mineBlock")
end

function goUp()
  sendMessage("goUp")
end

function goDown()
  sendMessage("goDown")
end

function displayScreen()
  if menuType == "mainMenu" then
    mainMenu()
  elseif menuType == "remoteControlMenu" then
    remoteControlMenu()
  elseif menuType == "slotMenu" then
    slotMenu()
  else
    --Nothing
  end
end

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

displayScreen()
--slotMenu()

while true do
  getClick()
end