-- sender
os.loadAPI("ocs/apis/sensor")
local s = sensor.wrap("left") -- sensor
rednet.open("right") --modem on right

function checkForTargets()
 targets = s.getTargets()
end

function getPlayerName()
 for k, v in pairs(targets) do
   if v['Name'] == "Player" then
     playerInfo[k] = k
   end  
 end

function sendPlayerName()
 rednet.broadcast(v)
end
 
while true do
 checkForTargets()
 getPlayerName()
 sendPlayerName()
 sleep(5)
end


-- repeater

rednet.open("back")
while true do
        event, sender, message = os.pullEvent()
        if event = "rednet_message" then
                rednet.broadcast(message)
        sleep(5)
        end
end


-- receiver

local playerInfo = {}
if fs.exists('players') then
  local fh = fs.open('players', 'r')
  playerInfo = textutils.unserialize(fh.readAll())
  fh.close()
end

function displayNames(players)
  local i = 1
  term.clear()
  for k, v in pairs(players) do
    term.setCursorPos(1, i)
    term.write(v)
    i = i + 1
  end
end


while true do
 event, sender, message = os.pullEvent()
  if event = "rednet_message" then
   local v = message
  
   displayNames(playerInfo) 
   fh = fs.open('players', 'w')
   fh.write(textutils.serialize(playerInfo))
   fh.close()
   sleep(5)
  end 
end