wireless player DP log #2

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

function checkForTargets
 targets = s.getTargets()

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

function sendPlayerName
 rednet.broadcast(v)

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