function promotePlayer(plr,cmd,name)
    if getPlayerAdditionalRank(plr,"Elite") then
        local target = getPlayerFromPartialName(name)
        if target then
        if getElementData(target,"temp:playing") and getElementData(target,"data:armyrank") then
            local rank = getElementData(target,"data:armyrank")
            if ( rank + 1 ) < 23 then
            setElementData(target,"data:armyrank",rank + 1)
            outputChatBox("*Awansowa?es ?o?nierza: "..getPlayerName(target).." na rang?: "..armyranksFullName[rank+1],plr,255,255,255,true)
            outputChatBox("*Awansowa?es na rang?: "..armyranksFullName[rank+1],target,255,255,255,true)
        end
    end
end