IO

m = peripheral.wrap("back")
m.clear()
sleep(1)

---Tabels---
S = {
 Seen = "Storage",
 Stwee = "Stairs" ,
 Sdrie = "none" ,
 Svier = "none" ,
 Svijf = "none" ,
 Szes = "none" ,
 Szeven = "none" ,
 Sacht = "none" ,
 Snegen = "none" ,
 Stien = "none" ,
 Self = "none" ,
 Stwaalf = "none" ,
 Sdertien = "none" ,
 Sviertien = "none" ,
 Svijftien = "none" ,
 Szestien = "none"}

---Functions---
function start()
 redstone.setOutput("left", true)
 sleep(4)
end

function run()
 Ioready = redstone.getInput("left")
 print(Ioready)
 if Ioready == true
 then
  m.setCursorPos(14,19)
  m.write("Bizzy")
  turtle.dropUp()
  redstone.setOutput("top", true)
  sleep(0.5)
  redstone.setOutput("top", false)
  turtle.suckUp()
  m.setCursorPos(14,19)
  m.write("Done!")
 else
  m.setCursorPos(14,19)
  m.write("Bizzy")
  start()
  turtle.dropUp()
  redstone.setOutput("top", true)
  sleep(0.5)
  redstone.setOutput("top", false)
  turtle.suckUp()
  m.setCursorPos(14,19)
  m.write("Done!")
 end
end

function stop()
 redstone.setOutput("left", false)
end

function change(slot)
 turtle.select(slot)
end

function screen()
 m.setTextColor(16)
 m.setBackgroundColor(256)
 m.clear()
 sleep(1)
 m.setCursorPos(1,1)
 m.write("Num: | Name:")
 m.setCursorPos(1,2)
 m.write("1    | ")
 m.setCursorPos(8,2)
 m.write(S.Seen)
 m.setCursorPos(1,3)
 m.write("2    | ")
 m.setCursorPos(8,3)
 m.write(S.Stwee)
 m.setCursorPos(1,4)
 m.write("3    | ")
 m.setCursorPos(8,4)
 m.write(S.Sdrie)
 m.setCursorPos(1,5)
 m.write("4    | ")
 m.setCursorPos(8,5)
 m.write(S.Svier)
 m.setCursorPos(1,6)
 m.write("5    | ")
 m.setCursorPos(8,6)
 m.write(S.Svijf)
 m.setCursorPos(1,7)
 m.write("6    | ")
 m.setCursorPos(8,7)
 m.write(S.Szes)
 m.setCursorPos(1,8)
 m.write("7    | ")
 m.setCursorPos(8,8)
 m.write(S.Szeven)
 m.setCursorPos(1,9)
 m.write("8    | ")
 m.setCursorPos(8,9)
 m.write(S.Sacht)
 m.setCursorPos(1,10)
 m.write("9    | ")
 m.setCursorPos(8,10)
 m.write(S.Snegen)
 m.setCursorPos(1,11)
 m.write("10   | ")
 m.setCursorPos(8,11)
 m.write(S.Stien)
 m.setCursorPos(1,12)
 m.write("11   | ")
 m.setCursorPos(8,12)
 m.write(S.Self)
 m.setCursorPos(1,13)
 m.write("12   | ")
 m.setCursorPos(8,13)
 m.write(S.Stwaalf)
 m.setCursorPos(1,14)
 m.write("13   | ")
 m.setCursorPos(8,14)
 m.write(S.Sdertien)
 m.setCursorPos(1,15)
 m.write("14   | ")
 m.setCursorPos(8,15)
 m.write(S.Sviertien)
 m.setCursorPos(1,16)
 m.write("15   | ")
 m.setCursorPos(8,16)
 m.write(S.Svijftien)
 m.setCursorPos(1,17)
 m.write("16   | ")
 m.setCursorPos(8,17)
 m.write(S.Szestien)
 m.setCursorPos(1,18)
 m.write("Start")
 m.setCursorPos(1,19)
 m.write("Stop")
end

---Program---
start()
screen()

while true do
 a, b, c, d = os.pullEvent()
 if a == "monitor_touch"
 then
  d = d - 1
  if d == 18
  then
   stop()
  elseif d == 17
  then
   start()
  else
   change(d)
   run()
   sleep(1)
  end
 else
  print("Nope")
 end
end