GTAONLINE.PL :: Jak dodac aucie id po zakupie

liczba = math.random ( 1, 1000 )
liczba = tonumber ( liczba )

function isPlayerInACL ( player, acl )
    local account = getPlayerAccount ( player )
    if ( isGuestAccount ( account ) ) then
        return false
    end
        return isObjectInACLGroup ( "user."..getAccountName ( account ), aclGetGroup ( acl ) )
end


function give(playerSource,pcar,car,cost,km)
    car = getVehicleModelFromName(car)
    if isPlayerInACL(playerSource,"Admin")
    then x, y, z = getElementPosition(playerSource)
    if ( car ) then 
        local theCar = createVehicle(car,x,y,z+0.15)
        setElementPosition(playerSource,x,y,z+1.5)
        local xr,yr,zr = getElementRotation(playerSource)
        setElementRotation(theCar,xr,yr,zr)
        setElementData(theCar,"vehicle:cost",tonumber(cost))
        setElementData(theCar,"vehicle:owner",0)
        setElementData ( zakupione_auta, "id", liczba )
        setElementFrozen(theCar,true)
        outputChatBox("#63DBFF*Stworzy?e? pojazd #B9F46C"..getVehicleNameFromModel(car).." #63DBFFkt?ry kosztuje #B9F46C"..cost.."$#63DBFF.",playerSource,0,0,0,true)
        if km then
        setElementData(theCar,"vehicle:travel",tonumber(km))
        end
        else
        outputChatBox("#63DBFF*Wpisa?e? z?? nazw? auta.",playerSource,0,0,0,true)
        end else outputChatBox("#63DBFF*Nie masz prawa do u?ywania tej komendy.",playerSource,0,0,0,true)
end
end

addCommandHandler("stworz.pojazd",give)

function onBuyCar(sPlayer)
  if getPlayerAccount(sPlayer) then
    if isPedInVehicle(sPlayer) then
        if getElementData(getPedOccupiedVehicle(sPlayer),"vehicle:owner")==0 then
        if getPlayerMoney(sPlayer)>=tonumber(getElementData(getPedOccupiedVehicle(sPlayer),"vehicle:cost")) then
            setElementData(getPedOccupiedVehicle(sPlayer),"vehicle:owner",getPlayerAccount(sPlayer))
                setElementData(getPedOccupiedVehicle(sPlayer),"ownername",getPlayerName(sPlayer))
                takePlayerMoney(sPlayer,getElementData(getPedOccupiedVehicle(sPlayer),"vehicle:cost"))
                setVehicleEngineState(getPedOccupiedVehicle(sPlayer),true)
                setElementFrozen(getPedOccupiedVehicle(sPlayer),false)
                setElementData(getPedOccupiedVehicle(sPlayer),"ownername",getPlayerName(sPlayer))
                outputChatBox("#63DBFF*Kupi?e? pojazd #B9F46C"..getVehicleName(getPedOccupiedVehicle(sPlayer)).."#63DBFF za #B9F46C"..getElementData(getPedOccupiedVehicle(sPlayer),"vehicle:cost").."$#63DBFF.",sPlayer,0,0,0,true)
                outputChatBox("#63DBFF*Aby sprzeda? pojazd wpisz komende #FF0000/sprzedaj.pojazd <cena> a ?eby zaparkowa? auto /zaparkuj.",playerSource,0,0,0,true)
                local x, y, z = getElementPosition(getPedOccupiedVehicle(sPlayer))
                local blip = createBlip(x,y,z,0,1,0,0,255,255,0,65535,sPlayer) setElementData(blip,"blip:vehicle",getPedOccupiedVehicle(sPlayer))
                else outputChatBox("#63DBFF*Niemasz wystarczaj?co du?o pieni?dzy ?eby kupi? ten #B9F46C"..getVehicleName(getPedOccupiedVehicle(sPlayer)).."#63DBFF.",sPlayer,0,0,0,true)
            end
        end
        else outputChatBox("#63DBFF*Musisz by? zalogowany.",sPlayer,0,0,0,true)
end
  end
end

addCommandHandler("kuppojazd",onBuyCar)
                

function onEnterCar(thePlayer,seat,jacked)
if seat == 0 then
    if getElementData(source,"vehicle:owner")==0
    then setVehicleEngineState(source,false)
    outputChatBox("#63DBFF*Ten #B9F46C"..getVehicleName(source).." #63DBFFkosztuje#B9F46C "..getElementData(source,"vehicle:cost").."$#63DBFF.",thePlayer,0,0,0,true)
    outputChatBox("#63DBFF*Je?eli chcesz kupi? ten pojazd wpisz#B9F46C /kuppojazd".."#63DBFF.",thePlayer,0,0,0,true)
        else if seat == 0 then if getElementData(source,"vehicle:owner") then if getElementData(source,"vehicle:owner")~=getPlayerAccount(thePlayer)then
        removePedFromVehicle(thePlayer) outputChatBox("#63DBFF*Ten #B9F46C"..getVehicleName(source).." #63DBFFnie nale?y do ciebie.",thePlayer,0,0,0,true)
    end
end
end
end
end
end

addEventHandler("onVehicleStartEnter",getRootElement(),function (thePlayer,seat,jacked)
if seat == 0 then
if jacked == true or false then
if getElementData(source,"vehicle:owner")== not getPlayerAccount(source) or 0 then
outputChatBox("#63DBFF*Ten #B9F46C"..getVehicleName(source).." #63DBFFnie nale?y do ciebie.",thePlayer,0,0,0,true)
end
end
end
end)

addEventHandler("onVehicleEnter",getRootElement(),onEnterCar)

function blipsit()
for key, value in ipairs(getElementsByType("player")) do
if getPlayerAccount(value) then
for k, v in ipairs(getElementsByType("vehicle")) do
for k1, v1 in ipairs(getElementsByType("blip")) do
if getElementData(v1,"blip:vehicle") then
if getElementType(getElementData(v1,"blip:vehicle"))=="vehicle" then
if getElementData(v,"vehicle:owner")==getPlayerAccount(value) then
setElementVisibleTo(v1,value,true)
else setElementVisibleTo(v1,value,false)
end
else if getElementData(v1,"blip:vehicle") then destroyElement(v1)
end
end
else if getElementData(v1,"blip:vehicle") then destroyElement(v1)
end
end
end
end
end
end
end

function timerek()
setTimer( blipsit, 1000, 0 )
end

timerek()


function sellCar(pps,command,koszt)
if isPedInVehicle(pps) then
if getElementData(getPedOccupiedVehicle(pps),"vehicle:owner")==getPlayerAccount(pps) then
if koszt then
if getElementData(getPedOccupiedVehicle(pps),"vehicle:cost")>=tonumber(koszt) then
setElementData(getPedOccupiedVehicle(pps),"vehicle:cost",tonumber(koszt))
carx = getPedOccupiedVehicle(pps)
setElementFrozen(carx,true)
setVehicleEngineState(carx,false)
setVehicleDamageProof(carx,true)
setElementData(carx,"vehicle:owner",0)
setElementData(carx,"vehicle:used",true)
setElementData(carx,"vehicle:cost",tonumber(koszt))
givePlayerMoney(pps,tonumber(koszt))
outputChatBox("#63DBFF*Wystawi?e? pojazd #B9F46C"..getVehicleName(carx).." #63DBFFza #B9F46C"..tostring(koszt).."$#63DBFF.",pps,0,0,0,true)
removePedFromVehicle(pps)
else carx = getPedOccupiedVehicle(pps) outputChatBox("#63DBFF*Nie mo?esz wystawi? pojazdu za #B9F46C"..tostring(koszt).."$ #63DBFFponiewa? jest to wi?cej ni? jego poprzednia cena #B9F46C"..tostring(getElementData(carx,"vehicle:cost")).."$#63DBFF.",pps,0,0,0,true)
end
else outputChatBox("#63DBFF*?le wpisana komenda powinno by? #B9F46C/sprzedaj.pojazd <cena>#63DBFF.",pps,0,0,0,true)
end
else outputChatBox("#63DBFF*Ten pojazd nie nale?y do ciebie.",pps,0,0,0,true)
end
else outputChatBox("#63DBFF*Musisz by? w poje?dzie.",pps,0,0,0,true)
end
end

addCommandHandler("sprzedaj.pojazd",sellCar)

addEventHandler("onElementDestroy",getRootElement(),function ()
if getElementType(source)=="vehicle" then
setElementData(source,"vehicle:owner",nil)
setElementData(source,"vehicle:cost",nil)
setElementData(source,"vehicle:used",nil)
setElementData(source,"vehicle:travel",nil)
if getElementData(source,"vehicle:blip")~=nil or getElementData(source,"vehicle:blip")~=false then
destroyElement(getElementData(source,"vehicle:blip"))
end
end
end)



setTimer(function () 
for k, v in ipairs(getElementsByType("player")) do
for key, value in ipairs(getElementsByType("blip")) do
if getElementData(value,"blip:vehicle") then
if isElement(getElementData(value,"blip:vehicle")) then
if getElementType(getElementData(value,"blip:vehicle"))=="vehicle" then
local vehicle = getElementData(value,"blip:vehicle")
if getElementData(vehicle,"vehicle:owner")~=0 then
if getElementData(vehicle,"vehicle:owner")==getPlayerAccount(v) then
setElementVisibleTo(value,v,true)
else
setElementVisibleTo(value,v,false)
end
end
end
end
end
end
end
end,1000,0)



function saveallvehicles()
    executeSQLDropTable ( "vehiclesaver" )
    executeSQLCreateTable ( "vehiclesaver", "VehicleID INTEGER, px REAL, py REAL, pz REAL, rx REAL, ry REAL, rz REAL, Color1 INTEGER, Color2 INTEGER, Health REAL, upgrades TEXT, paintjob INTEGER, idd, wlasciciel, xx, yy, zz, rr1, rr2, rr3, paliwo,r,g,b" )
    for i, vehicle in pairs (getElementsByType("vehicle")) do
    if not getElementData(vehicle, "private") then
    destroyElement ( vehicle )

end


        local px, py, pz = getElementPosition(vehicle)
        local rx, ry, rz = getElementRotation(vehicle)
        local color1, color2, color3, color4 = getVehicleColor(vehicle)
        local model = getElementModel(vehicle)
        local health = getElementHealth (vehicle)
        local tableUpgrades = getVehicleUpgrades(vehicle)
        local upgrades = table.concat(tableUpgrades, ",")
        local paintjob = getVehiclePaintjob(vehicle)
        local idd = getElementData ( vehicle, "liczba" )
        local wlasciciel = getElementData(vehicle, "owner")
         local paliwo = getElementData ( vehicle, "fuel" )       
        local xx = getElementData ( vehicle, "x" )
        local yy = getElementData ( vehicle, "y" )
        local zz = getElementData ( vehicle, "z" )
        local rr1 = getElementData ( vehicle, "r1" )
        local rr2 = getElementData ( vehicle, "r2" )
        local rr3 = getElementData ( vehicle, "r3" )
    local r,g,b = getVehicleColor(vehicle, true )
        executeSQLInsert ( "vehiclesaver", "'"..model.."','"..px.."','"..py.."','"..pz.."','"..rx.."','"..ry.."','"..rz.."','"..color1.."','"..color2.."','"..health.."','"..upgrades.."','"..paintjob.."','"..idd.."','"..wlasciciel.."','"..xx.."','"..yy.."','"..zz.."','"..rr1.."','"..rr2.."','"..rr3.."','"..paliwo.."','"..r.."','"..g.."','"..b.."'" )
    end
end

addEventHandler("onResourceStop", getResourceRootElement(getThisResource()), saveallvehicles)

function createDatabase()
    executeSQLCreateTable ( "vehiclesaver", "VehicleID INTEGER, px REAL, py REAL, pz REAL, rx REAL, ry REAL, rz REAL, Color1 INTEGER, Color2 INTEGER, Color3 INTEGER, Color4 INTEGER, Health REAL, upgrades TEXT, paintjob INTEGER, idd, wlasciciel, xx, yy, zz, rr1, rr2, rr3, paliwo,r,g,b" )
   
    local vehicles = executeSQLQuery("SELECT * FROM vehiclesaver")
    

    for i, v in pairs (vehicles) do
        local vehicle = createVehicle( v.VehicleID, v.px, v.py, v.pz, v.rx, v.ry, v.rz )
        setElementHealth ( vehicle, v.Health )
        setVehicleColor ( vehicle, v.Color1, v.Color2, 0, 0 )
        setVehicleColor(vehicle, v.r,v.g,v.b )
        if ( v.paintjob ) then
            setVehiclePaintjob( vehicle, v.paintjob )
            setElementData ( vehicle, "liczba", v.idd )
            
            setElementData ( vehicle, "r1", v.rr1) 
setElementData ( vehicle, "r2", v.rr2)
setElementData ( vehicle, "r3", v.rr3) 
setElementData ( vehicle, "zapisany", true )
setElementData ( vehicle, "x", v.xx) 
setElementData ( vehicle, "y", v.yy) 
setElementData ( vehicle, "z", v.zz)


            


            
            
                        setElementData(vehicle, "private", true)
            setElementData(vehicle, "owner", v.wlasciciel )
            setElementData ( vehicle, "fuel", v.paliwo)
        end
        local upgrades = split( v.upgrades, 44 )
        for index, upgrade in pairs (upgrades) do
            addVehicleUpgrade( vehicle, upgrade )
     

            
        end
    end
    outputChatBox( #vehicles.." - wczytane pojazdy", getRootElement(), 0, 255, 0 )
    outputDebugString ( #vehicles.." - wczytane pojazdy" )
end
addEventHandler("onResourceStart", getResourceRootElement(getThisResource()), createDatabase)