GTAONLINE.PL :: Tagi • rozwalanie



local function pojazdPusty(veh)

if not veh then return end

    local occupants = getVehicleOccupants(veh)

    local seats = getVehicleMaxPassengers(veh)

    if (not seats) then return true end

    for i=0,seats do

    local occupant = occupants[seat]

    if occupant and (getElementType(occupant)=="player" or getElementType(occupant)=="ped") and getPedOccupiedVehicleSeat(occupant) == i then

        return false

    end

    end

    return true

end





for i,v in ipairs(getElementsByType("vehicle")) do

    if (pojazdPusty(v)) then

        setVehicleDamageProof(v,true)

    else

    if getElementData(v,"damageproof") then setVehicleDamageProof(v, true) return end

    setVehicleDamageProof(v,false)

    end

end



addEventHandler ( "onVehicleEnter", root, function()

if source then

    if getElementData(source,"damageproof") then setVehicleDamageProof(source, true) return end

    setVehicleDamageProof(source, false)

    end

end)



addEventHandler ( "onVehicleExit", root, function()

    if source then

    if (pojazdPusty(source)) then

        setVehicleDamageProof(source, true)

    else

        if getElementData(source,"damageproof") then setVehicleDamageProof(source, true) return end

        setVehicleDamageProof(source, false)

    end

    end

end)

for _,v in pairs(getElementsByType("vehicle")) do
    if getElementData(v, "damageproof")==1 then
        setVehicleDamageProof(source, true)
    else
        setVehicleDamageProof(source, false)
    end
end

addEventHandler("onVehicleExit", root,
function(plr, s)
    if s==0 then
        setVehicleDamageProof(source, true)
        setElementData(source, "damageproof", 1)
    end
end)

addEventHandler("onVehicleEnter", root,
function(plr, s)
    if s==0 then
        setVehicleDamageProof(source, false)
        setElementData(source, "damageproof", 0)
    end
end)