Name Collector

--Note to self check spelling before use
local mon = peripheral.wrap("right")
local NameCollection = {} -- Table for names

mon.clear()
mon.setCursorPos(1,1)
mon.write("Touch detector to input name.")
local offset = 1
local width, height = mon.getSize()

while true do
event, playerName = os.pullEvent() -- get event
  if event == "player" then
  table.insert(NameCollection, playerName) -- insert names into table
  mon.setCursorPos(1, #NameCollection + 1)
for i = 1, math.min(#NameCollection, height - offset) do
  mon.setCursorPos(1, i + offset)
  mon.clearLine()
  mon.write("Added " ..NameCollection[i + math.max(#NameCollection - height + offset, 0)]) -- print names in table
end
end
end