CCash Leaderboard

--intended to be used with monitor of 2x blocks width
local json = require("json")
local ip = "ccash.ryzerth.com"
local url = "https://"..ip.."/BankF"
local monitor = peripheral.find("monitor")

assert(http.checkURL(url))

local function comp(a, b)
    return a["balance"] > b["balance"];
end

while true do
    local request = http.get(url.."/allusers")
    if (request ~= nil) then
        local users_data = json.decode(request:readAll())
        request.close()

        local users = users_data["value"]
        if (users ~= nil) then
            print("Request Sent")
            for i=1,#users do
                local request = http.get(url.."/"..users[i].."/bal")
                if (request ~= nil) then
                    local bal_data = json.decode(request:readAll())
                    request.close()

                    local bal = bal_data["value"]
                    if (bal ~= nil) then
                        users[i] = {name = users[i], balance = bal}
                    end
                end
            end

            print("Waiting...")
            os.sleep(1)
            term.setCursorPos(1,1)
            monitor.clear()

            table.sort(users, comp)

            for i=1,#users do
               monitor.setCursorPos(1,i)
               monitor.write(users[i]["name"])
               monitor.setCursorPos(19-#tostring(users[i]["balance"]), i)
               monitor.write(users[i]["balance"])
            end
            term.clear()
        end
    end
end