startup

iface = peripheral.wrap("back")

tPlayers = {"Abelatox","SrGat0","Djnepe","Gtedu","Regaika","Angelcraftero","Sergiqwerty","CHRISPRO23","retewee11"}
tFoundPlayers = {}
linesPerPlayer = 2

for k,v in pairs(peripheral.getNames()) do
 if peripheral.getType(v) == "modem" then
  m = peripheral.wrap(v)
 end
end

canvas = iface.canvas()
canvas.clear()
cx,cy = canvas.getSize()
headersX = 5
headersY = 150
m.open(6)

function getPlayers()
 while true do
  tFoundPlayers = {}
  nearEntities = iface.sense()
  for k,v in pairs(nearEntities) do --Scan
   for tk,tv in pairs(tPlayers) do --Comprueba que sea player
    if v.name == tv then
     meta = iface.getMetaByName(tv)

     if meta then
      data = {n = v.displayName,h = tostring(math.floor(meta.health+0.5)),f = math.floor(meta.food.hunger+0.5),s = tostring(math.floor(meta.food.saturation+0.5))}
      tFoundPlayers[#tFoundPlayers+1] = data
     end
    end
   end
  end

  draw()
  sleep(0.5)
 end
end

function updateData()
 while true do
  e,s,sch,rch,msg,d = os.pullEvent("modem_message")

  if sch == rch and rch == 6 then
   amounts = textutils.unserialize(msg)
   total = amounts[1]+amounts[2]
   total = total / 2
  end
  sleep(0.5)
 end
end

function draw()
 canvas.clear()
 canvas.addRectangle(0,90,100,60,0xFF000066)
 canvas.addRectangle(0,150,154,10+#tFoundPlayers*(10*1),0x00FF0066)

 if amounts ~= nil then
  canvas.addText({x = 5, y = 100},"MFSU 1: "..amounts[1].."%")
  canvas.addText({x = 5, y = 110},"MFSU 2: "..amounts[2].."%")
 -- canvas.addText({x = 5, y = 120},"MFE 1: "..amounts[3].."%")
  canvas.addText({x = 5, y = 135},"TOTAL: "..tostring(math.floor(total+0.5)).."%")
 end

 canvas.addText({x = headersX, y = headersY+1},"Player")
 canvas.addText({x = headersX+60,y = headersY+1},"HP")
 canvas.addText({x = headersX+90,y = headersY+1},"Food")
 canvas.addText({x = headersX+130,y = headersY+1},"Sat")

 for k,v in pairs(tFoundPlayers) do
  canvas.addText({x = headersX, y = headersY+10*k+1},v.n)
  canvas.addText({x = headersX+50, y = headersY+10*k+1},v.h.."/20")
  canvas.addText({x = headersX+90, y = headersY+10*k+1},v.f.."/20")
  canvas.addText({x = headersX+130, y = headersY+10*k+1},v.s.."")

  --canvas.addText({x = 10, y = 151 - 30 + k*40},v.n)
  --canvas.addText({x = 15, y = 151 - 20 + k*40},"Vida: "..v.h.."/20")
  --canvas.addText({x = 15, y = 151 - 10 + k*40},"Comida: "..v.f.."/20")
  --canvas.addText({x = 15, y = 151 + k*40},"Saturación: "..v.s)
 end
end

parallel.waitForAny(getPlayers,updateData)