call(getResourceFromName("scoreboard"), "scoreboardAddColumn", "ID")

addEventHandler("onClientRender", root,
    function ()
        id = getElementData(plr,"id")
        setElementData(plr, "ID", tonumber(id))
    end
)

call(getResourceFromName("scoreboard"), "scoreboardAddColumn", "ID")

addEventHandler("onClientRender", root,
    function ()
        id = getElementData(localPlayer,"id")
        setElementData(localPlayer, "ID", tonumber(id))
    end
)

addEventHandler("onResourceStart", resourceRoot,
    function ()
    for _,v in ipairs(getElementsByType("player")) do
        local punkty = getElementData(v,"ID")
    end
end)

function findPlayer(plr,cel)
    local target=nil
    if (tonumber(cel) ~= nil) then
        target=getElementByID("p"..cel)
    else -- podano fragment nicku
        for _,thePlayer in ipairs(getElementsByType("player")) do
            if string.find(string.gsub(getPlayerName(thePlayer):lower(),"#%x%x%x%x%x%x", ""), cel:lower(), 1, true) then
                if (target) then
                    outputChatBox("> Znaleziono wi?cej ni? jednego gracza o pasuj?cym nicku, podaj wi?cej liter.", plr)
                    return nil
                end
                target=thePlayer
            end
        end
    end
    return target
end

local function findFreeValue(tablica_id)
    table.sort(tablica_id)
    local wolne_id=0
    for i,v in ipairs(tablica_id) do
        if (v==wolne_id) then wolne_id=wolne_id+1 end
        if (v>wolne_id) then return wolne_id end
    end
    return wolne_id
end

function assignPlayerID(plr)
    local gracze=getElementsByType("player")
    local tablica_id = {}
    for i,v in ipairs(gracze) do
        local lid=getElementData(v, "id")
        if (lid) then
            table.insert(tablica_id, tonumber(lid))
        end
    end
    local free_id=findFreeValue(tablica_id)
    
    setElementData(plr,"id", free_id)
    setElementID(plr, "p" .. free_id)
    return free_id
end

function getPlayerID(plr)
    if not plr then return "" end
    local id=getElementData(plr,"id")
    if (id) then
        return id
    else
        return assignPlayerID(plr)
    end
    
end

addEventHandler ("onPlayerJoin", getRootElement(), function()
    assignPlayerID(source)
end)


call(getResourceFromName("scoreboard"), "scoreboardAddColumn", "ID")

addEventHandler("onResourceStart", resourceRoot,
    function ()
    for _,v in ipairs(getElementsByType("player")) do
        local punkty = getElementData(v,"ID")
    end
end)

addEventHandler("onResourceStart", resourceRoot,
    function ()
    call(getResourceFromName("scoreboard"),"addScoreboardColumn","ID")
    for _,v in ipairs(getElementsByType("player")) do
        local id_gracza = getElementData(v,"id")
    end
end)