GTAONLINE.PL :: Zapis Pojazdów

Witam mam pytanie jak doda? do tego zapisu przebieg paliwo LPG i tuning z skryptu sa_custom ( http://community.multithe...etails&id=13508 )

DAM PIWO!

ZAPIS.lua


function saveallvehicles(modelID)
    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, Hood INTEGER, Trunk INTEGER, FrontLeft INTEGER, FrontRight INTEGER,RearLeft INEGER, RearRight INEGER, FrontLeftPanel INTEGER, FrontRightPanel Integer, RearLeftPanel Integer, RearRightPanel Integer,Windscreen Integer,FrontBumper Integer, RearBumper Integer,FLL Integer,FRL Integer,RLL Integer, RRL Integer, VehOvL Integer, HR Real,TR Real,FLR Real,FRR Real, RLR Real, RRR Real,WFL Integer, WRL Intger, WFR Integer, WRR Integer, VehSirena Integer, EngineState Integer, XTUR Real, YTUR Real" )
    local vehicles = (getElementsByType("vehicle"))    
    for i, vehicle in pairs (vehicles) do
       local id = (getElementModel(vehicle))    
       if id == 602 or id == 545 or id == 496 or id == 517 or id == 401 or id == 410 or id == 518 or id == 600 or id == 527 or id == 436
        or id == 589 or id == 580 or id == 419 or id == 439 or id == 533 or id == 549 or id == 526 or id == 491 or id == 474 or id == 445
        or id == 467 or id == 604 or id == 426 or id == 507 or id == 547 or id == 585 or id == 405 or id == 587 or id == 409 or id == 466
        or id == 550 or id == 492 or id == 566 or id == 546 or id == 540 or id == 551 or id == 421 or id == 516 or id == 529 or id == 581
        or id == 510 or id == 509 or id == 522 or id == 481 or id == 461 or id == 462 or id == 448 or id == 521 or id == 468 or id == 463
        or id == 586 or id == 459 or id == 543 or id == 422 or id == 583 or id == 482 or id == 478 or id == 605 or id == 554 or id == 530
        or id == 418 or id == 572 or id == 582 or id == 413 or id == 440 or id == 536 or id == 575 or id == 534 or id == 567 or id == 535
        or id == 576 or id == 412 or id == 402 or id == 542 or id == 603 or id == 475 or id == 429 or id == 411 or id == 541 or id == 559
        or id == 415 or id == 561 or id == 480 or id == 560 or id == 562 or id == 506 or id == 565 or id == 451 or id == 434 or id == 558
        or id == 494 or id == 555 or id == 502 or id == 477 or id == 503 or id == 579 or id == 400 or id == 404 or id == 489 or id == 505
        or id == 479 or id == 442 or id == 458 then    
        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 hood = getVehicleDoorState(vehicle,0)
        local trunk = getVehicleDoorState(vehicle,1)
        local frontleft = getVehicleDoorState(vehicle,2)
        local frontright = getVehicleDoorState(vehicle,3)
        local rearleft = getVehicleDoorState(vehicle,4)
        local rearright = getVehicleDoorState(vehicle,5)
        local frontleftpanel = getVehiclePanelState(vehicle,0)
        local frontrightpanel = getVehiclePanelState(vehicle,1)
        local rearleftpanel = getVehiclePanelState(vehicle,2)
        local rearrightpanel = getVehiclePanelState(vehicle,3)
        local windscreen = getVehiclePanelState(vehicle,4)
        local frontbumper = getVehiclePanelState(vehicle,5)
        local rearbumper = getVehiclePanelState(vehicle,6)
        
        local fll = tostring(getVehicleLightState(vehicle, 0))
        local frl = tostring(getVehicleLightState(vehicle, 1))
        local rll = tostring(getVehicleLightState(vehicle, 2))
        local rrl = tostring( getVehicleLightState(vehicle, 3))
        local VehOvL = getVehicleOverrideLights(vehicle)
        local hr = getVehicleDoorOpenRatio(vehicle,0)
        local tr = getVehicleDoorOpenRatio(vehicle,1)
        local flr = getVehicleDoorOpenRatio(vehicle,2)
        local frr = getVehicleDoorOpenRatio(vehicle,3)
        local rlr = getVehicleDoorOpenRatio(vehicle,4)
        local rrr = getVehicleDoorOpenRatio(vehicle,5)
        local wfl, wrl, wfr, wrr = getVehicleWheelStates ( vehicle )
        if getVehicleSirensOn(vehicle)==true then getsirena=1 elseif getVehicleSirensOn(vehicle)==false then getsirena=0 else getsirena=2 end
        local sirena = getsirena
        if getVehicleEngineState ( vehicle )==true then estate=1 else estate=0 end
        local tengine=estate
        local xtur, ytur = getVehicleTurretPosition ( vehicle ) 


        --Insert into SQL Database
        executeSQLInsert ( "vehiclesaver", "'"..model.."','"..px.."','"..py.."','"..pz.."','"..rx.."','"..ry.."','"..rz.."','"..color1.."','"..color2.."','"..health.."','"..upgrades.."','"..paintjob.."','"..hood.."','"..trunk.."','"..frontleft.."','"..frontright.."','"..rearleft.."','"..rearright.."','"..frontleftpanel.."','"..frontrightpanel.."','"..rearleftpanel.."','"..rearrightpanel.."','"..windscreen.."','"..frontbumper.."','"..rearbumper.."','"..fll.."','"..frl.."','"..rll.."','"..rrl.."','"..VehOvL.."','"..hr.."','"..tr.."','"..flr.."','"..frr.."','"..rlr.."','"..rrr.."','"..wfl.."','"..wrl.."','"..wfr.."','"..wrr.."','"..sirena.."','"..tengine.."','"..xtur.."','"..ytur.."'" )
    end
     end

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

period=get("0_vehiclesaver.Period")
if (period > 0) then
setTimer(saveallvehicles,period,0)
end

function createDatabase()
    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, Hood INTEGER, Trunk INTEGER, FrontLeft INTEGER, FrontRight INTEGER,RearLeft INEGER, RearRight INEGER, FrontLeftPanel INTEGER, FrontRightPanel Integer, RearLeftPanel Integer, RearRightPanel Integer,Windscreen Integer,FrontBumper Integer, RearBumper Integer,FLL Integer,FRL Integer,RLL Integer, RRL Integer, VehOvL Integer, HR Real,TR Real,FLR Real,FRR Real, RLR Real, RRR Real,WFL Integer, WRL Intger, WFR Integer, WRR Integer,VehSirena Integer,EngineState Integer, XTUR Real, YTUR Real" )
    
    --Getting datas
    local vehicles = executeSQLQuery("SELECT * FROM vehiclesaver")
    
    --Spawning the vehicles
    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 )
        if ( v.paintjob ) then
            setVehiclePaintjob( vehicle, v.paintjob )
        end
        local upgrades = split( v.upgrades, 44 )
        for index, upgrade in pairs (upgrades) do
            addVehicleUpgrade( vehicle, upgrade )
        end
        setVehicleDoorState ( vehicle, 0, v.Hood )
        setVehicleDoorState ( vehicle, 1, v.Trunk )
        setVehicleDoorState ( vehicle, 2, v.FrontLeft )
        setVehicleDoorState ( vehicle, 3, v.FrontRight )
        setVehicleDoorState ( vehicle, 4, v.RearLeft )
        setVehicleDoorState ( vehicle, 5, v.RearRight )
        
        setVehiclePanelState (vehicle,0,v.FrontLeftPanel)
        setVehiclePanelState (vehicle,1,v.FrontRightPanel)
        setVehiclePanelState (vehicle,2,v.RearLeftPanel)
        setVehiclePanelState (vehicle,3,v.RearRightPanel)
        setVehiclePanelState (vehicle,4,v.Windscreen)
        setVehiclePanelState (vehicle,5,v.FrontBumper)
        setVehiclePanelState (vehicle,6,v.RearBumper)
        
        setVehicleLightState (vehicle,0,v.FLL)
        setVehicleLightState (vehicle,1,v.FRL)
        setVehicleLightState (vehicle,2,v.RLL)
        setVehicleLightState (vehicle,3,v.RRL)
        setVehicleOverrideLights(vehicle, v.VehOvL)
        setVehicleDoorOpenRatio (vehicle,0,v.HR,0)
        setVehicleDoorOpenRatio (vehicle,1,v.TR,0)
        setVehicleDoorOpenRatio (vehicle,2,v.FLR,0)
        setVehicleDoorOpenRatio (vehicle,3,v.FRR,0)
        setVehicleDoorOpenRatio (vehicle,4,v.RLR,0)
        setVehicleDoorOpenRatio (vehicle,5,v.RRR,0)
        setVehicleWheelStates ( vehicle, v.WFL, v.WRL, v.WFR, v.WRR )

        if v.VehSirena==1 then vsirena=true elseif v.VehSirena==0 then  vsirena=false end

        if (v.VehSirena~=2) then
        setVehicleSirensOn(vehicle,vsirena)
        end
        if v.EngineState==1 then setVehicleEngineState(vehicle,true) else setVehicleEngineState(vehicle,false) end
        setVehicleTurretPosition ( vehicle, v.XTUR, v.YTUR )

    end
    outputChatBox( #vehicles.." vehicles were created by vehiclesaver", getRootElement(), 0, 255, 0 )
    outputDebugString ( #vehicles.." vehicles were created by vehiclesaver" )
end
addEventHandler("onResourceStart", getResourceRootElement(getThisResource()), createDatabase)

addCommandHandler("delvehicles", function()
        destroyElement(getResourceRootElement())
        executeSQLDropTable ( "vehiclesaver" )
        end )

local screenW, screenH = guiGetScreenSize() panel = false function PanelLPG() local Alpha, Alpha2 = interpolateBetween(0, 0, 0, 255, 180, 0, ((getTickCount() - tick) / 2500), "Linear") local r,g,b=interpolateBetween(255,255,255,20,250,0,(getTickCount()-tick)/1100,"SineCurve") local r2,g2,b2=interpolateBetween(255,255,255,255,0,0,(getTickCount()-tick)/1100,"SineCurve") dxDrawImage(screenW * 0.2643, screenH * 0.2604, screenW * 0.4700, screenH * 0.5052, "okn.png", 0, 0, 0, tocolor(0, 0, 0, Alpha2), false) if not cursorPosition(screenW * 0.3089, screenH * 0.6289, screenW * 0.1193, screenH * 0.0547) then --zamontuj dxDrawImage(screenW * 0.2716, screenH * 0.5534, screenW * 0.2057, screenH * 0.1992, "przycisk.png", 0, 0, 0, tocolor(255, 255, 255, Alpha), false) dxDrawText("Zamontuj\nLPG", (screenW * 0.3089) + 1, (screenH * 0.6302) + 1, (screenW * 0.4283) + 1, (screenH * 0.6836) + 1, tocolor(0, 0, 0, Alpha), 1.11, "default-bold", "center", "center", false, false, false, false, false) dxDrawText("Zamontuj\nLPG", screenW * 0.3089, screenH * 0.6302, screenW * 0.4283, screenH * 0.6836, tocolor(7, 47, 161, Alpha), 1.11, "default-bold", "center", "center", false, false, false, false, false) else dxDrawImage(screenW * 0.2716, screenH * 0.5534, screenW * 0.2057, screenH * 0.1992, "przycisk.png", 0, 0, 0, tocolor(r,g,b, 255), false) dxDrawText("Zamontuj\nLPG", (screenW * 0.3089) + 1, (screenH * 0.6302) + 1, (screenW * 0.4283) + 1, (screenH * 0.6836) + 1, tocolor(0, 0, 0, 255), 1.05, "default-bold", "center", "center", false, false, false, false, false) dxDrawText("Zamontuj\nLPG", screenW * 0.3089, screenH * 0.6302, screenW * 0.4283, screenH * 0.6836, tocolor(25, 209, 1, 255), 1.05, "default-bold", "center", "center", false, false, false, false, false) end if not cursorPosition(screenW * 0.5695, screenH * 0.6302, screenW * 0.1193, screenH * 0.0547) then --zamknij dxDrawImage(screenW * 0.5315, screenH * 0.5534, screenW * 0.2057, screenH * 0.1992, "przycisk.png", 0, 0, 0, tocolor(255, 255, 255, Alpha), false) dxDrawText("Zamknij okno", (screenW * 0.5695) + 1, (screenH * 0.6302) + 1, (screenW * 0.6889) + 1, (screenH * 0.6836) + 1, tocolor(0, 0, 0, Alpha), 1.11, "default-bold", "center", "center", false, false, false, false, false) dxDrawText("Zamknij okno", screenW * 0.5695, screenH * 0.6302, screenW * 0.6889, screenH * 0.6836, tocolor(7, 47, 161, Alpha), 1.11, "default-bold", "center", "center", false, false, false, false, false) else dxDrawImage(screenW * 0.5315, screenH * 0.5534, screenW * 0.2057, screenH * 0.1992, "przycisk.png", 0, 0, 0, tocolor(r,g,b, 255), false) dxDrawText("Zamknij okno", (screenW * 0.5695) + 1, (screenH * 0.6302) + 1, (screenW * 0.6889) + 1, (screenH * 0.6836) + 1, tocolor(0, 0, 0, 255), 1.05, "default-bold", "center", "center", false, false, false, false, false) dxDrawText("Zamknij okno", screenW * 0.5695, screenH * 0.6302, screenW * 0.6889, screenH * 0.6836, tocolor(25, 209, 1, 255), 1.05, "default-bold", "center", "center", false, false, false, false, false) end dxDrawText("Montowanie LPG!", (screenW * 0.3038) + 1, (screenH * 0.3372) + 1, (screenW * 0.6925) + 1, (screenH * 0.3919) + 1, tocolor(0, 0, 0, Alpha), 1.50, "default", "center", "center", false, false, false, false, false) dxDrawText("Montowanie LPG!", screenW * 0.3038, screenH * 0.3372, screenW * 0.6925, screenH * 0.3919, tocolor(r2,g2,b2, Alpha), 1.50, "default", "center", "center", false, false, false, false, false) dxDrawText("Co daje LPG? - Gdy posiadamy LPG nasz samoch?d ma?o spala paliwa i mamy mo?liwo?? z lewej strony ekranu zmienia? spalanie silnika LPG lub Bezyna (Kursor w??czamy F3).\nMniejszy koszt za LPG na stacjach paliwowych.\n\nKoszt zamontowania LPG: 75000PLN", (screenW * 0.3067) + 1, (screenH * 0.4102) + 1, (screenW * 0.6903) + 1, (screenH * 0.6237) + 1, tocolor(0, 0, 0, Alpha), 1.20, "default", "center", "center", false, true, false, false, false) dxDrawText("Co daje LPG? - Gdy posiadamy LPG nasz samoch?d ma?o spala paliwa i mamy mo?liwo?? z lewej strony ekranu zmienia? spalanie silnika LPG lub Bezyna (Kursor w??czamy F3).\nMniejszy koszt za LPG na stacjach paliwowych.\n\nKoszt zamontowania LPG: 75000PLN", screenW * 0.3067, screenH * 0.4102, screenW * 0.6903, screenH * 0.6237, tocolor(255, 255, 255, Alpha), 1.20, "default", "center", "center", false, true, false, false, false) end addEvent("PokazGuiMontowanieLPG", true) addEventHandler("PokazGuiMontowanieLPG", resourceRoot, function() local pojazd = getPedOccupiedVehicle(localPlayer) if getVehicleController(pojazd) ~= localPlayer then return end if panel == false then addEventHandler("onClientRender",root,PanelLPG) tick = getTickCount() panel = true playSound("Dzwiek/PiP.mp3") showCursor (true) end end) function ZamknijOkno(button, state) if panel and button == "left" and state == "down" then if cursorPosition(screenW * 0.5695, screenH * 0.6302, screenW * 0.1193, screenH * 0.0547) then playSound("Dzwiek/ST.mp3") removeEventHandler("onClientRender",root,PanelLPG) panel = false showCursor (false) end end end addEventHandler("onClientClick", getRootElement(), ZamknijOkno) function ZamontujLPG(button, state) if panel and button == "left" and state == "down" then if cursorPosition(screenW * 0.3089, screenH * 0.6289, screenW * 0.1193, screenH * 0.0547) then local vehicle = getPedOccupiedVehicle(localPlayer) local gazLpg = getElementData(vehicle,"Zamontowane:LPG") if gazLpg == 'Tak' then outputChatBox("✘ Ju? posiadasz zamontowane LPG!", 255, 0, 0) return end playSound("Dzwiek/ST.mp3") triggerServerEvent ("DajLPG", localPlayer) end end end addEventHandler("onClientClick", getRootElement(), ZamontujLPG) function cursorPosition(x, y, w, h) if (not isCursorShowing()) then return false end local mx, my = getCursorPosition() local fullx, fully = guiGetScreenSize() cursorx, cursory = mx*fullx, my*fully if cursorx > x and cursorx < x + w and cursory > y and cursory < y + h then return true else return false end end function filedelet () if fileExists("Montowanie_c.lua") then fileDelete("Montowanie_c.lua") end end addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()), filedelet) addEventHandler("onClientPlayerQuit", getRootElement(), filedelet) addEventHandler("onClientPlayerJoin", getRootElement(), filedelet)

Gaz = 75000 -- Kwota za tuning cz??ci PLN MarkerTuningLPG = createMarker(-50.80,1179.43,18.92, "cylinder", 3.15, 25, 213, 15, 140) Motocykle = { [581] = true, [509] = true, [481] = true, [468] = true, [586] = true, [448] = true, [522] = true, [461] = true, [462] = true, [463] = true, [510] = true, [521] = true, } function TuningMarker(el,md) if not md or getElementType(el) ~= "player" then return end if not getPedOccupiedVehicle(el) then outputChatBox("✘ Wejd? do pojazdu!",el, 255, 0, 0) return end local veh = getPedOccupiedVehicle(el) if Motocykle[getElementModel(veh)] then outputChatBox("✘ Nie mo?esz zamontowa? LPG, do motocyklu!",el, 255, 0, 0) return end triggerClientEvent(el, "PokazGuiMontowanieLPG", resourceRoot) setMarkerColor (MarkerTuningLPG, 255, 0, 0, 145 ) end addEventHandler( "onMarkerHit", MarkerTuningLPG, TuningMarker) addEventHandler("onMarkerLeave", MarkerTuningLPG, function(el, md) if not md or getElementType(el) ~= "player" then return end setMarkerColor (MarkerTuningLPG, 25, 213, 15, 145) end) addEvent("DajLPG", true) addEventHandler("DajLPG", root, function() if getPlayerMoney(source) < Gaz then outputChatBox("✘ Nie posiadasz tyle pieni?dzy!", source, 255, 0, 0) return end takePlayerMoney(source,Gaz) local vehicle = getPedOccupiedVehicle(source) setElementData (vehicle, "Zamontowane:LPG", "Tak") setElementData (vehicle, "vehicle:LPG", 10) setElementData (vehicle, "vehicle:BezynaWloczone", true) outputChatBox("✔ Zamontowa?e? LPG, mo?esz zmieni? spalanie paliwa z lewej strony (Kursor F3).", source, 255, 255, 255) outputChatBox("✔ Za zakup LPG dostajesz od nas 10L za darmo. :)", source, 255, 255, 255) outputChatBox("✔ Wyjdz i wejdz do pojazdu, aby LPG si? wczyta?o.", source, 255, 255, 255) end)

local w,h = guiGetScreenSize() local rowery = {[509]=true,[481]=true,[510]=true,} function hud() local v = getPedOccupiedVehicle(localPlayer) if v then local sx,sy,sz = getElementVelocity(getPedOccupiedVehicle(localPlayer)) local kmhs = math.ceil(((sx^2+sy^2+sz^2)^(0.5))*175) local paliwo = getElementData(v,"vehicle:fuel") or 0 local prz = getElementData(v,"vehicle:mileage") or 0 local przebieg = math.floor(prz) or 0 if #tostring(przebieg)==1 then przebieg="0000000"..przebieg elseif #tostring(przebieg)==2 then przebieg="000000"..przebieg elseif #tostring(przebieg)==3 then przebieg="00000"..przebieg elseif #tostring(przebieg)==4 then przebieg="0000"..przebieg elseif #tostring(przebieg)==5 then przebieg="000"..przebieg elseif #tostring(przebieg)==6 then przebieg="00"..przebieg elseif #tostring(przebieg)==7 then przebieg="0"..przebieg elseif #tostring(przebieg)==8 then przebieg=przebieg end local screenW, screenH = guiGetScreenSize() -- ogolne dxDrawImage(w * 0.8177, h * 0.7685, w * 0.1823, h * 0.2315, "images/spdmeter1.png", 0, 0, 0, tocolor(255, 255, 255, 255), false) dxDrawImage(w * 0.8625, h * 0.8231, w * 0.1448, h * 0.1296, "images/wskaznik.png", kmhs+320, 0, 0, tocolor(255, 255, 255, 255), false) dxDrawImage(w * 0.8250, h * 0.9324, w * 0.0510, h * 0.0454, "images/wskaznik.png", paliwo+30, 0, 0, tocolor(255, 255, 255, 255), false) dxDrawText(przebieg, w * 0.9161, h * 0.9194, w * 0.9542, h * 0.9352, tocolor(255, 255, 255, 255), 1.00, "default-bold", "center", "top", true, true, true, true, true) -- kontrolki if paliwo < 30 then r1,g1,b1 = 254,107,3 else r1,g1,b1 = 255,255,255 end if isElementFrozen(v) then r2,g2,b2 = 255,0,0 else r2,g2,b2 = 255,255,255 end local silnik = getVehicleEngineState(v) if silnik == false then r3,g3,b3 = 255,0,0 else r3,g3,b3 = 255,255,255 end if getVehicleOverrideLights(v) ~= 2 then r4,g4,b4 = 255,255,255 else r4,g4,b4 = 70,184,73 end dxDrawImage(w * 0.8432, h * 0.9630, w * 0.0156, h * 0.0278, "images/paliwo.png", 0, 0, 0, tocolor(r1, g1, b1, 200), false) dxDrawImage(w * 0.9266, h * 0.9630, w * 0.0156, h * 0.0278, "images/reczny.png", 0, 0, 0, tocolor(r2, g2, b2, 200), false) dxDrawImage(w * 0.9057, h * 0.9537, w * 0.0156, h * 0.0278, "images/silnik.png", 0, 0, 0, tocolor(r3, g3, b3, 200), false) dxDrawImage(w * 0.9474, h * 0.9537, w * 0.0156, h * 0.0278, "images/swiatla.png", 0, 0, 0, tocolor(r4, g4, b4, 200), false) end end addEventHandler("onClientVehicleEnter",root,function(plr) if plr ~= localPlayer then return end local v = getPedOccupiedVehicle(localPlayer) if rowery[getElementModel(v)] then return end addEventHandler("onClientRender",root,hud) end) addEventHandler("onClientVehicleExit",root,function(plr,seat) if plr ~= localPlayer then return end if seat ~= 0 then return end removeEventHandler("onClientRender",root,hud) end)