function findPlayer(plr, cel)
    local target = nil
    if (tonumber(cel) ~= nil) then
        target = getElementByID("p"..cel)
    else
        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 wiecej niz jednego gracza o pasujacym nicku, podaj wiecej liter.", plr)
                    return nil
                end
                target=thePlayer
            end
        end
    end
    return target
end



kaj = {}

function zalozkaj(plr, cmd, target)
    local gracz = findPlayer(plr, target)
    if getElementData(plr, "kajdanki") == false then
            local gracz = getPlayerName(gracz)
            local gracz = getPlayerFromName(gracz)
            local x2,y2,z2 = getElementPosition(gracz)
                local x,y,z = getElementPosition(plr)
                if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20) then
                    toggleControl(gracz, "enter_exit", false)
                    toggleControl(gracz, "enter_passenger", false)
                    attachElements(gracz, plr, 0,0.4,0)
                    setElementPosition(gracz, x,y,z)
                    local graczz = getPlayerName(gracz)
                    kaj[plr] = {}
                    kaj[plr] = {graczz}
                    setElementData(plr,"kajdanki", true)
setPedAnimation ( gracz, "zmeczony", "IDLE_tired", -1, true, false )
                    outputChatBox(""..getPlayerName(plr).." zakuwa ci? w kajdanki.",gracz, 255,255,255,true)
                    outputChatBox("Zak?adasz kajdanki graczowi "..graczz..".",plr,255,255,255,true)
                end
    else
        outputChatBox("Nie mo?esz za?o?y? kajdanek dw?m osobom na raz.",plr,255,255,255, true)
    end
end

addCommandHandler("zakuj",zalozkaj)

addEventHandler("onVehicleEnter",root,
function(plr)
    if getElementData(plr, "kajdanki") then
        local peds = kaj[plr][1]
        local ped = getPlayerFromName(peds)
        local veh = getPedOccupiedVehicle(plr)
        local atta = getAttachedElements(plr)
            for i,v in pairs(atta)do
                detachElements(v, plr)
            end
        warpPedIntoVehicle(ped, veh, 3)
        outputChatBox(""..getPlayerName(plr).." wsadza ci? do radiowozu.",ped, 255,255,255,true)
        outputChatBox("Wsadzasz do radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,true)
    end
end)

addEventHandler("onVehicleStartExit",root,
function(plr)
    if getElementData(plr, "kajdanki") then
        local ped = kaj[plr][1]
        local ped = getPlayerFromName(ped)
        local x,y,z = getElementPosition(plr)
        removePedFromVehicle(ped)
        attachElements(ped, plr, 0,0.4,0)
        outputChatBox(""..getPlayerName(plr).." wyci?ga ci? z radiowozu.",ped, 255,255,255,true)
        outputChatBox("Wyci?gasz z radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,true)
    end
end)

function sciagnijkaj(plr, cmd, target)
    local gracz = findPlayer(plr, target)
    if getElementData(plr, "kajdanki") then
            local gracz = getPlayerName(gracz)
            local gracz = getPlayerFromName(gracz)
            local x2,y2,z2 = getElementPosition(gracz)
                local x,y,z = getElementPosition(plr)
                    if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20) then
                    local atta = getAttachedElements(plr)
                    toggleControl(gracz, "enter_exit", true)
                    toggleControl(gracz, "enter_passenger", true)
                        for i,v in pairs(atta)do
                            detachElements(v, plr)
                        end
                    setElementPosition(gracz, x+2,y,z)
                    setElementData(plr,"kajdanki", false)
                    kaj[plr] = {}
                    outputChatBox(""..getPlayerName(plr).." odkuwa ci?.",gracz, 255,255,255,true)
                    outputChatBox("?ci?gasz kajdanki graczowi "..getPlayerName(gracz)..".",plr,255,255,255,true)
                end
    else
        outputChatBox("Nie za?ozy?e? nikomu kajdanek.",plr,255,255,255, true)
    end
end
addCommandHandler("odkuj",sciagnijkaj)
end