GTAONLINE.PL :: Bug systemu aut

skrypt na zapisz

Kod:

--[[ 

Ten plik zawiera: 

* tworzenie aut przy uruchomieniu skryptu 

* laczenie sie z baza SQL Lite 

* zapis danych aut co 15 min i przy wylaczeniu skryptu 

* komende dla administratora sluzaca zapisowi aut 

* funkcje blokujaca wejscie do auta jesli nie jestesmy jego wlascicieleme 

--]] 

handler = dbConnect("sqlite", "pojazdy.db") 

--pojazdy 

dbExec(handler, "CREATE TABLE IF NOT EXISTS pojazdy (id INTEGER PRIMARY KEY AUTOINCREMENT, wlasciciel TEXT, model INTEGER, x FLOAT, y FLOAT, z FLOAT, rot FLOAT, ca INTEGER, cb INTEGER, cc INTEGER, przebieg FLOAT, paliwo FLOAT)") 

dbExec(handler, "CREATE UNIQUE INDEX IF NOT EXISTS IDX_id on pojazdy(id)") 

--tuning 

dbExec(handler, "CREATE TABLE IF NOT EXISTS tuning (id INTEGER, t0 INTEGER, t1 INTEGER, t2 INTEGER, t3 INTEGER, t4 INTEGER, t5 INTEGER, t6 INTEGER, t7 INTEGER, t8 INTEGER, t9 INTEGER, t10 INTEGER, t11 INTEGER, t12 INTEGER, t13 INTEGER, t14 INTEGER, t15 INTEGER, t16 INTEGER, paintjob INTEGER, hr INTEGER, hg INTEGER, hb INTEGER)") 

dbExec(handler, "CREATE UNIQUE INDEX IF NOT EXISTS IDX_id on tuning(id)") 

function onStartLoadVehicles() 

local query = dbQuery(handler, "SELECT * FROM pojazdy") 

local result, num_rows, errormsg = dbPoll (query, -1) 

for i,v in pairs(result) do 

local veh = createVehicle(v["model"], v["x"], v["y"], v["z"]) 

setElementRotation(veh, 0, 0, v["rot"]) 

setVehicleColor(veh, v["ca"], v["cb"], v["cc"]) 

ustawDanePojazdu(veh, v["id"], v["wlasciciel"]) 

--ustawiam paliwo i przebieg 

setElementData(veh, "pojazd_paliwo", v["paliwo"] or 50) 

setElementData(veh, "pojazd_przebieg", v["przebieg"] or 0) 

--<< na koncu -->> 

local query = dbQuery(handler, "SELECT * FROM tuning WHERE id='"..v["id"].."'") 

local result, num_rows, errormsg = dbPoll (query, -1) 

setVehiclePaintjob(veh, result[1].paintjob) 

setVehicleHeadLightColor(veh, result[1].hr, result[1].hg, result[1].hb) 

for i,v in pairs(result) do 

for ii, vv in pairs(v) do 

if (ii ~= "id" and ii ~= "paintjob" and ii ~= "hr" and ii ~= "hg" and ii ~= "hb") then 

local vv = tonumber(vv) 

if vv ~= 0 then 

addVehicleUpgrade(veh, vv) 

end 

end 

end 

end 

end 

end 

addEventHandler("onResourceStart", getResourceRootElement(getThisResource()), onStartLoadVehicles) 

function ustawDanePojazdu(veh, id, wlasciciel) --id = INT, wlasciciel = STRING 

setElementData(veh, "car_id", id) 

setElementData(veh, "car_owner", wlasciciel) 

end 

function onVehicleStartEnter(player, seat, jacked) 

if seat == 0 then 

local car_owner = getElementData(source, "car_owner") 

if car_owner then 

local account = getPlayerAccount(player) 

if account then 

local name = getAccountName(account) 

if car_owner == name then 

--mamy prawo wejscia do auta 

prawo_ = true 

end 

end 

if prawo_ then 

--wchodzim 

prawo_ = false 

else 

--sio 

outputChatBox("Nie masz kluczyk?w do tego pojazdu.", player, 255, 255, 255, true) 

cancelEvent() 

end 

end 

end 

end 

addEventHandler ("onVehicleStartEnter", resourceRoot, onVehicleStartEnter) 

--<<ZAPIS POJAZDU-->> 

function zapiszPojazdy() 

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

local id = getElementData(v, "car_id") 

if id then 

local owner = getElementData(v, "car_owner") 

local x, y, z = getElementPosition(v) 

local _, _, rot = getElementRotation(v) 

local color1, color2, color3, color4 = getVehicleColor(v, true) 

local paliwo = getElementData(v, "pojazd_paliwo") 

local przebieg = getElementData(v, "pojazd_przebieg") 

dbExec(handler, "UPDATE pojazdy SET x='"..x.."', y='"..y.."', z='"..z.."', rot='"..rot.."', ca='"..color1.."', cb='"..color2.."', cc='"..color3.."', przebieg='"..przebieg.."', paliwo='"..paliwo.."' WHERE id='"..id.."'") 

local paintjob = getVehiclePaintjob(v) 

local r, g, b = getVehicleHeadLightColor(v) 

sav = {} 

for i=0, 16 do 

local upgrade = getVehicleUpgradeOnSlot(v, i) 

sav[i] = upgrade or 0 

end 

dbExec(handler, "UPDATE tuning SET t0='"..sav[0].."', t1='"..sav[1].."', t2='"..sav[2].."', t3='"..sav[3].."', t4='"..sav[4].."', t5='"..sav[5].."', t6='"..sav[6].."', t7='"..sav[7].."', t8='"..sav[8].."', t9='"..sav[9].."', t10='"..sav[10].."', t11='"..sav[11].."', t12='"..sav[12].."', t13='"..sav[13].."', t14='"..sav[14].."', t15='"..sav[15].."', t16='"..sav[16].."', paintjob='"..paintjob.."', hr='"..r.."', hg='"..g.."', hb='"..b.."' WHERE id="..id.."") 

sav = nil 

end 

end 

end 

setTimer(zapiszPojazdy, 900000, 0) 

function zapiszKomenda(player) 

local acc = getAccountName (getPlayerAccount(player)) 

if isObjectInACLGroup ("user."..acc, aclGetGroup ("Admin")) then 

zapiszPojazdy() 

outputChatBox("** Zapisano pojazdy.", player, 255, 255, 255, true) 

end 

end 

addCommandHandler("zapiszpojazdy", zapiszKomenda) 

-- mapa, f11 

addEvent("pobierzPojazdyGracza", true) 

addEventHandler("pobierzPojazdyGracza", getRootElement(), 

function() 

local account = getPlayerAccount(source) 

if account then 

local name = getAccountName(account) 

local vehs = getVehiclesByOwner(name) 

triggerClientEvent(source, "zwrocPojazdyGracza", root, vehs) 

end 

end) 

-- 

--zwraca pojazd o danym ID 

function getVehicleByID(poszukiwane_id) 

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

local id = getElementData(v, "car_id") 

if id then 

local id = tonumber(id) 

local poszukiwane_id = tonumber(poszukiwane_id) 

if id == poszukiwane_id then 

return v 

end 

end 

end 

return false 

end 

--zwraca pojazdy ktore posiada dany login 

function getVehiclesByOwner(szukany) 

tab = {} 

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

local owner = getElementData(v, "car_owner") 

if owner then 

if owner == szukany then 

table.insert(tab, v) 

end 

end 

end 

return tab 

end 

--zwraca liczbe pojazdow jaka ma dany login 

function getYourVehicleCount(login) 

local vehs = getVehiclesByOwner(login) 

return #vehs 

end

dodaje sc http://scr.hu/9vti/sl38n

[ Dodano: 2016-02-16, 14:08 ]
plik sq

Kod:

SQLite format 3   @    {                                                              { -?)

   D ?‰D                                                                                                                                                                                                                ‚B„_tabletuningtuningCREATE TABLE tuning (id INTEGER, t0 INTEGER, t1 INTEGER, t2 INTEGER, t3 INTEGER, t4 INTEGER, t5 INTEGER, t6 INTEGER, t7 INTEGER, t8 INTEGER, t9 INTEGER, t10 INTEGER, t11 INTEGER, t12 INTEGER, t13 INTEGER, t14 INTEGER, t15 INTEGER, t16 INTEGER, paintjob INTEGER, hr INTEGER, hg INTEGER, hb INTEGER)B_indexIDX_idpojazdyCREATE UNIQUE INDEX IDX_id on pojazdy(id)P++Ytablesqlite_sequencesqlite_sequenceCREATE TABLE sqlite_sequence(name,seq)?^?tablepojazdypojazdyCREATE TABLE pojazdy (id INTEGER PRIMARY KEY AUTOINCREMENT, wlasciciel TEXT, model INTEGER, x FLOAT, y FLOAT, z FLOAT, rot FLOAT, ca INTEGER, cb INTEGER, cc INTEGER, przebieg FLOAT, paliwo FLOAT)

  ???®J‚?s ??U?                                                                                                                                                                                =	

 Markosol?????€   @€Cf    @Ai??  (@W?0     € ?2 0D@miX???

?

=p?@qB?G®{@Anz?G®2

 D@miX???

?    @qB?    @A`h????XYZ27

 ejer???%?    @?™?    @Am????@d9?????&792I7

 AkossPL”??

µ    @o?P    @Aw??  9@p?0???23

 mel”???a    @v-?    @A,????@ry{€  ,2   9Czeku???j    @p,X    @Al-????@p?Q€  , ?27

 Czeku???b    @p,P    @Ame_???@p?;   X ?28

 Czeku???)    @o@    @An8@  B@py?   X] 2B

 'YoutuberAidis????     @zÍś    @AjM   @p"k€  , ? ?2<

 jjziom987”??	?    @p?    @Aw_???@p?w   XbD(26

 ZEUSxd????    @nW?    @Akq???@p?,????29

 mel???Q    @ff?    @;T‚?  @7?????s ? ? ?2A

 'YoutuberAidis›??›[    @?el    @E??`  @p?M€  ,Yn ‡2

   ? ?                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         pojazdy

   ? ????????????                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          

				

   Y ?L+µ”m???zY