local polaczenie = dbConnect ( "sqlite", "db.db" ) 
dbExec ( polaczenie, "CREATE TABLE IF NOT EXISTS Zapis ( ID INTEGER, Paliwo INTEGER, Przebieg INTEGER, Tuning VARCHAR, Model INTEGER, Owner VARCHAR )" )


local marker=createMarker(-273.65625, 1177.74316, 18.59375,"cylinder",5,255,0,255,100)--- Marker chowania pojazdu
local odb=createMarker(-265.20197, 1185.64063, 18.74219,"cylinder",3,255,0,0,100)--- Marker odbioru pojazdu





addEventHandler("onMarkerHit",root,function(e)
    if source==marker then
        if getElementType(e)=="vehicle" then
            local id=getElementData(e,"car_id")
            if id then
                local paliwo=getElementData(e,"pojazd_paliwo") or 0
                tabela = {}
                for _,v in ipairs ( getVehicleUpgrades ( e ) ) do
                    table.insert ( tabela, v )
                end
                local tuning = table.concat ( tabela, "," )
                local owner=getElementData(e,"pojazd_przebieg") or 0
                local model=getElementModel(e)
                dbExec(polaczenie,"INSERT INTO `Zapis` (ID, Paliwo, Przebieg,Tuning,Owner,Model) VALUES (?,?,?,?,?,?)",id,paliwo,przebieg,tuning,owner,model)
                destroyElement(e)
            end
        end
    elseif source==odb then
        if getElementType(e)=="player" then
            local q=dbQuery(polaczenie,"SELECT * FROM `Zapis` WHERE `Owner`=?",getPlayerName(e))
            local w=dbPoll(q,-1)
            dbFree(q)
            for _,v in ipairs(w)do
                outputChatBox("Pojazd : "..getVehicleNameFromModel(v.Model),e,255,255,255)
            end
        end
    end
end)


addCommandHandler("wyciagnij",function(plr,cmd,id)
    if id then
        if isElementWithinMarker(plr,odb) then
            local q=dbQuery(polaczenie,"SELECT * FROM `Zapis` WHERE `ID`=?",id)
            local w=dbPoll(q,-1)
            dbFree(q)
            if w[1].Owner==getPlayerName(plr) then
                local auto=createVehicle(w[1].Model,-232.96330, 1202.87109, 19.59375)
                setElementData(auto,"car_id",w[1].ID)
                setElementData(auto,"pojazd_paliwo",w[1].Paliwo)
                for _,v in ipairs(split(w[1].Tuning,","))do
                    addVehicleUpgrade(auto,v)
                end
                setElementData(auto,"pojazd_przebieg",w[1].Przebieg)
                setElementData(auto,"car_owner",w[1].Owner)
                dbExec(polaczenie,"DELETE FROM `Zapis` WHERE `ID`=?",id)
            end
        end
    end
end)

createBlip ( -273.65625, 1177.74316, 18.59375, 43 )

dbExec(polaczenie,"DELETE FROM `Zapis` WHERE `ID`=?",id)