TrackerGlasses

glassy = 0
    function extract(s)
      local t = {}
      local name, armor, account, health, world, x, y, z
      local a = 0
      local b = 0
      while (true) do
        a, b, name, armor, account, health, z, y, world, x = string.find(s, "\"sort\":0,\"name\":\"([^\"]+)\",\"armor\":(%d+),\"account\":\"([^\"]+)\",\"health\":(%d+),\"type\":\"player\",\"z\":([-0-9.]+),\"y\":([-0-9.]+),\"world\":\"([^\"]+)\",\"x\":([-0-9.]+)", b + 1)
        if (a == nil) then
          break
        end
        t[account] = {}
        t[account].armor = tonumber(armor)
        t[account].name = name
        t[account].health = tonumber(health)
        t[account].world = world
        t[account].loc = vector.new(tonumber(x), tonumber(y), tonumber(z))
        local offset = here - t[account].loc
        t[account].dist = math.floor(math.sqrt(offset.x * offset.x + offset.z * offset.z))
      end
      return t
    end


    fh = http.get("http://tekkit.craftersland.net:25800/up/world/world/111")
    txt = fh.readAll()
    fh.close()
    _,_,ts = string.find(txt, "{\"timestamp\":(%d+).")

    here = vector.new(1125, 88, 1029)
    glass = peripheral.wrap("top")
    players = {}
    while (true) do
      fh = http.get("http://tekkit.craftersland.net:25800/up/world/world/" .. ts)
      if (fh) then
        txt = fh.readAll()
        fh.close()
        _,_,ts = string.find(txt, "{\"timestamp\":(%d+),")
        if (ts) then
          players = extract(txt)
        end
      end
      local i = 1
      st = {}
      for key in pairs(players) do
        st[#st+1] = key
      end
      table.sort(st, function(a, b) return players[a].dist < players[b].dist end)
      glass.clear()
      glassy = 0
      for k = 1, #st do
        account = st[k]
        if (players[account].world == "world") then
        glassy = glassy+9
          glass.addText(5,glassy,account.." - "..math.floor(players[account].loc.x).." "..math.floor(players[account].loc.y).." "..math.floor(players[account].loc.z).." - armor "..players[account].armor.." - health "..players[account].health.." - distance "..players[account].dist.." - "..players[account].world,0x50A550)
          i = i + 1
        end
      end

      os.sleep(5.0)
    end