[function getVehicleHandlingProperty ( element, property )
    if isElement ( element ) and getElementType ( element ) == "vehicle" and type ( property ) == "string" then
        local handlingTable = getVehicleHandling ( element )
        local value = handlingTable[property]
 
        if value then
            return value
        end
    end
 
    return false
end
 
local colspheres = { }
 
local sara_dft = { 
{-1874, -861.39, 32.75, 359.9, 360.0, 89.5, 578},
{-1874, -856.25, 32.75, 359.9, 0.1, 89.5, 578},
{-1874, -849.81, 32.75, 359.9, 0.0, 89.5, 578},
{-1874, -843.41, 32.75, 359.9, 360.0, 89.5, 578},
{-1874, -867.81, 32.75, 358.7, 0.0, 89.5, 578},
{-1874, -874.17, 32.75, 359.9, 0.0, 89.5, 578},
{-1874, -880.71, 32.75, 359.9, 0.1, 89.5, 578},
{-1874, -837.11, 32.75, 359.9, 0.0, 89.5, 578},
}
 
 
local sara_premier = {
{-1897.86, -840.20, 31.77, 0.0, 0.0, 89.4, 552},
{-1897.86, -836.96, 31.77, 0.0, 0.0, 89.4, 552},
{-1897.86, -877.64, 31.77, 0.0, 0.0, 89.4, 552},
{-1897.86, -880.85, 31.77, 0.0, 360.0, 89.4, 552},
}
 
local sara_sultan = {
{-1897.74, -849.87, 31.73, 359.9, 360.0, 89.0, 560},
{-1897.74, -846.63, 31.73, 359.9, 360.0, 89.0, 560},
{-1897.74, -843.43, 31.73, 359.9, 360.0, 89.0, 560},      
{-1897.74, -871.10, 31.73, 359.9, 360.0, 89.0 , 560},
{-1897.74, -867.76, 31.73, 359.9, 360.0, 89.0, 560},
{-1897.74, -874.36, 31.73, 359.9, 360.0, 89.0, 560},
}
 
 
 
local sara_policemaverick = {
}


local sara_liderka = {
{-1897.87, -853.21, 31.73, 359.5, 360.0, 89.7, 451},
{-1897.87, -864.65, 31.73, 359.5, 360.0, 89.7, 451},
}

local sara_busy = {
    {-1910.02, -849.07, 32.23, 359.1, 358.5, 180, 431},
  --  {-1925.79, -868.65, 32.20, 359.6, 4.2, 0, 431},
    }

local sara_holowniki = {
    {-1887.01, -853.11, 31.90, 358.1, 360.0, 269.8, 525},
    {-1887.01, -849.83, 31.90, 358.1, 0.0, 269.8, 525},
    {-1887.01, -864.57, 31.90, 358.1, 0.0, 269.8, 525},
    {-1887.01, -867.85, 31.90, 358.1, 0.0, 269.8, 525}, 
    {-1887.01, -871.18, 31.90, 358.2, 0.0, 269.3, 525},
    {-1887.01, -846.68, 31.91, 358.2, 0.0, 269.8, 525},
    }


 
 
for i,v in pairs(sara_premier) do
    local vehicle=createVehicle(v[7], v[1], v[2], v[3])
    setVehicleColor(vehicle,247, 127, 0,255)
    setElementRotation(vehicle, v[4], v[5], v[6])
    setVehicleEngineState(vehicle, false)
    setElementFrozen(vehicle, true)
    removeVehicleSirens(vehicle)
    setElementData(vehicle,"vehicle:SARA", true)
    setVehicleColor(vehicle, 247, 127, 0)
    setElementFrozen(vehicle,true)
    setVehicleDamageProof(vehicle, true)
    local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
    local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
    local masa = getVehicleHandlingProperty(vehicle,"mass")
    local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
    local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
    local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
    local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
    setVehicleHandling(vehicle,"engineAcceleration",fast+8)
    setVehicleHandling(vehicle,"maxVelocity",maxfast+20)
    setVehicleHandling(vehicle,"tractionMultiplier",xd+0.4)
    setVehicleHandling(vehicle,"mass",masa-285)
    setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
    setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
    setVehicleHandling(vehicle,"driveType", "awd")
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(vehicle,"vehicle:paliwo", "benzyna")
    setElementData(vehicle,"vehicle:desc","PatrolĂłwka - SARA - "..i+001)
    setElementData(vehicle, "vehicle:ogranicznik",1)
    addVehicleUpgrade(vehicle, 1025)
end

for i,v in pairs(sara_holowniki) do
    local vehicle=createVehicle(v[7], v[1], v[2], v[3])
    setVehicleColor(vehicle,247, 127, 0,255)
    setElementRotation(vehicle, v[4], v[5], v[6])
    setVehicleEngineState(vehicle, false)
    setElementFrozen(vehicle, true)
    removeVehicleSirens(vehicle)
    setElementData(vehicle,"vehicle:SARA", true)
    setVehicleColor(vehicle, 247, 127, 0)
    setElementFrozen(vehicle,true)
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(vehicle,"vehicle:paliwo", "benzyna")
    setVehicleDamageProof(vehicle, true)
    local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
    local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
    local masa = getVehicleHandlingProperty(vehicle,"mass")
    local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
    local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
    local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
    local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
    setVehicleHandling(vehicle,"engineAcceleration",fast+10)
    setVehicleHandling(vehicle,"maxVelocity",maxfast+20)
    setVehicleHandling(vehicle,"tractionMultiplier",xd+0.4)
    setVehicleHandling(vehicle,"mass",masa+285)
    setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
    setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
    setVehicleHandling(vehicle,"driveType", "awd")
    setElementData(vehicle, "vehicle:ogranicznik",1)
    setElementData(vehicle,"vehicle:desc","Holownik - SARA - "..i+001)
    addVehicleUpgrade(vehicle, 1025)
end
 
for i,v in pairs(sara_sultan) do
    local vehicle=createVehicle(v[7], v[1], v[2], v[3])
    setVehicleColor(vehicle,247, 127, 0,255)
    setElementRotation(vehicle, v[4], v[5], v[6])
    setVehicleEngineState(vehicle, false)
    setElementFrozen(vehicle, true)
    removeVehicleSirens(vehicle)
    setElementData(vehicle,"vehicle:SARA", true)
    setElementData(vehicle,"SARA:EMC", true)
    setVehicleColor(vehicle, 247, 127, 0)
    setElementData(vehicle,"vehicle:rank",90)
    setElementFrozen(vehicle,true)
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(vehicle,"vehicle:paliwo", "benzyna")
    setVehicleDamageProof(vehicle, true)
    local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
    local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
    local masa = getVehicleHandlingProperty(vehicle,"mass")
    local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
    local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
    local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
    local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
    setVehicleHandling(vehicle,"engineAcceleration",fast+20)
    setVehicleHandling(vehicle,"maxVelocity",maxfast+100)
    setVehicleHandling(vehicle,"tractionMultiplier",xd+0.4)
    setVehicleHandling(vehicle,"mass",masa+285)
    setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
    setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
    setVehicleHandling(vehicle,"driveType", "awd")
        setElementData(vehicle, "vehicle:ogranicznik",1)
    setElementData(vehicle,"vehicle:desc","Sultan - SARA - "..i+001)
    addVehicleUpgrade(vehicle, 1025)
end

for i,v in pairs(sara_liderka) do
    local vehicle=createVehicle(v[7], v[1], v[2], v[3])
    setVehicleColor(vehicle,247, 127, 0,255)
    setElementRotation(vehicle, v[4], v[5], v[6])
    setVehicleEngineState(vehicle, false)
    setElementFrozen(vehicle, true)
    removeVehicleSirens(vehicle)
    setElementData(vehicle,"vehicle:SARA", true)
    setElementData(vehicle,"SARA:EMC", true)
    setVehicleColor(vehicle, 247, 127, 0)
    setElementData(vehicle,"vehicle:rank",98)
    setElementFrozen(vehicle,true)
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(vehicle,"vehicle:paliwo", "benzyna")
    setVehicleDamageProof(vehicle, true)
    local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
    local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
    local masa = getVehicleHandlingProperty(vehicle,"mass")
    local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
    local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
    local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
    local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
    setVehicleHandling(vehicle,"engineAcceleration",fast+20)
    setVehicleHandling(vehicle,"maxVelocity",maxfast+100)
    setVehicleHandling(vehicle,"tractionMultiplier",xd+0.4)
    setVehicleHandling(vehicle,"mass",masa+285)
    setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
    setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
    setVehicleHandling(vehicle,"driveType", "awd")
    setElementData(vehicle, "vehicle:ogranicznik",1)
    setElementData(vehicle,"vehicle:desc","Zarz?…d - Turismo - SARA - "..i+001)
    addVehicleUpgrade(vehicle, 1025)
end

for i,v in pairs(sara_busy) do
    local vehicle=createVehicle(v[7], v[1], v[2], v[3])
    setVehicleColor(vehicle,247, 127, 0,255)
    setElementRotation(vehicle, v[4], v[5], v[6])
    setVehicleEngineState(vehicle, false)
    setElementFrozen(vehicle, true)
    removeVehicleSirens(vehicle)
    setElementData(vehicle,"vehicle:SARA", true)
    setElementData(vehicle,"SARA:EMC", true)
    setVehicleColor(vehicle, 0, 0, 0, 247, 127, 0, 247, 127, 0, 247, 127, 0)
    setElementData(vehicle,"vehicle:rank",98)
    setElementFrozen(vehicle,true)
    setVehicleDamageProof(vehicle, true)
    local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
    local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
    local masa = getVehicleHandlingProperty(vehicle,"mass")
    local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
    local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
    local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
    local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
    setVehicleHandling(vehicle,"engineAcceleration",fast+20)
    setVehicleHandling(vehicle,"maxVelocity",maxfast+10)
    setVehicleHandling(vehicle,"tractionMultiplier",xd+0.4)
    setVehicleHandling(vehicle,"mass",masa+285)
    setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
    setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
    setVehicleHandling(vehicle,"driveType", "awd")
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(vehicle,"vehicle:paliwo", "benzyna")
    setElementData(vehicle, "vehicle:ogranicznik",1)
    setElementData(vehicle,"vehicle:desc","Szkolenia - Bus - SARA - "..i+001)
    addVehicleUpgrade(vehicle, 1025)
end

for i,v in pairs(sara_policemaverick) do
    local vehicle=createVehicle(v[7], v[1], v[2], v[3])
    setElementRotation(vehicle, v[4], v[5], v[6])
    setVehicleEngineState(vehicle, false)
    setElementFrozen(vehicle, true)
    removeVehicleSirens(vehicle)
    setElementData(vehicle,"vehicle:SARA", true)
    setElementFrozen(vehicle,true)
    setVehicleDamageProof(vehicle, true)
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(vehicle,"vehicle:paliwo", "benzyna")
end
 
for i,v in pairs(sara_dft) do
    local sara_dft=createVehicle(v[7], v[1], v[2], v[3])
    setVehicleColor(sara_dft, 247, 127, 0,255)
    setElementRotation(sara_dft, v[4], v[5], v[6])
    setVehicleEngineState(sara_dft, false)
    setElementFrozen(sara_dft, true)
    setVehicleColor(sara_dft, 247, 127, 0)
    setElementFrozen(sara_dft,true)
    setVehicleDamageProof(sara_dft, true)
    setVehicleVariant(sara_dft, 0, 0)
    addVehicleUpgrade(sara_dft, 1025)
    setElementData(sara_dft, "zaladowane", false)
    setElementData(sara_dft, "laweta", true)
    local x,y,z = getElementPosition(sara_dft)
    colspheres[sara_dft] = createColSphere(x,y,z, 4)
    attachElements(colspheres[sara_dft], sara_dft, 0, -8, -0.605)
    setElementData(vehicle,"vehicle:fuel", 220)
    setElementData(vehicle,"bak", 220)
    setElementData(sara_dft,"vehicle:desc","Laweta - SARA - "..i+001)
    setElementData(sara_dft, "vehicle:paliwo", "benzyna")

end
 
addCommandHandler("sara-zaladuj", function(player, command)
    if isPedInVehicle(player) then
        local veh = getPedOccupiedVehicle(player)
        if getElementModel(veh) == 578 and not getElementData(veh, "zaladowane") and getElementData(veh, "laweta") then
            local pojazd = getElementsWithinColShape(colspheres[veh], "vehicle")
            if getElementModel(pojazd[1]) ~= 578 then
                attachElements(pojazd[1], veh, 0, -1.2, 0.5)
                setElementData(veh, "zaladowane", pojazd[1])
                setElementFrozen(pojazd[1], true)
            end
        else
            --exports["np-notyfikacje"]:noti("TwĂłj pojazd jest juĹĽ za?‚adowany", player, "error")
        end
    end
end)
 
addCommandHandler("rozladuj", function(player, command)
    if isPedInVehicle(player) then
        local veh = getPedOccupiedVehicle(player)
        if getElementModel(veh) == 578 and getElementData(veh, "zaladowane") then
            local zaladunek = getElementData(veh, "zaladowane")
            if zaladunek and getElementType(zaladunek) == "vehicle" then
                local x,y,z = getElementPosition(zaladunek)
                attachElements(zaladunek, veh, 0, -9, 0)
                detachElements(zaladunek, veh)
                setElementFrozen(zaladunek, false)
                setElementData(veh, "zaladowane", false)
                --exports["np-rnotyfikacje"]:noti("Pojazd zjecha?‚ z lawety", player)
            else
                --exports["np-notyfikacje"]:noti("Brak za?‚adunku b?…dĹş za?‚adunek to nie pojazd", player, "error")
            end
        end
    end
end)
 
setTimer(function()
    for i,vehicle in pairs(getElementsByType("vehicle", resourceRoot)) do
        local x,y,z = getElementPosition(vehicle)
        local r1,r2,r3 = getElementRotation(vehicle)
        setVehicleRespawnPosition(vehicle,x,y,z,r1,r2,r3)
        toggleVehicleRespawn(vehicle,true)
        setVehicleIdleRespawnDelay(vehicle,3600000)
        setVehicleHandling(vehicle, "driveType", "awd")
                --blip = createBlipAttachedTo(vehicle, 0, 1, 255, 175, 0, 255, 0, 275.0, root)
        setElementData(vehicle,"vehicle:duty","SARA")
            setElementData(vehicle,"vehicle:faction","SARA")
    end
end,1000,1)
 
-- Zsynchronizowana do licznika
function setElementSpeed(element, speed)
    if (speed == nil) then speed = 0 end
    speed = tonumber(speed)
    local vx,vy,vz = getElementVelocity(element)
    local acSpeed = ((vx^2+vy^2+vz^2)^(0.5))*180
    local diff = speed/acSpeed
    if diff ~= diff then return end -- if the number is a 'NaN' return end.
    local x,y,z = getElementVelocity(element)
    setElementVelocity(element,x*diff,y*diff,z*diff)
    return true
end
 
-- odmraĹĽamy pojazdy pociagniete holownikiem!
function detachTrailer(theTruck)
    setElementFrozen(source, false)
 end
addEventHandler("onTrailerAttach", getRootElement(), detachTrailer)

    setElementData(sara_dft,"vehicle:fuel", 220)
    setElementData(sara_dft, "bak", 220)