local conn = dbConnect("sqlite","vehicles.db")




dbExec(conn, "CREATE TABLE IF NOT EXISTS veh (model INTEGER, posx FLOAT, posy FLOAT, posz FLOAT, rotx FLOAT, roty  FLOAT, rotz FLOAT, red INTEGER, green INTEGER, blue INTEGER, player TEXT)")

function namePart(name)
    local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil
    if name then
        for _, player in ipairs(getElementsByType("player")) do
            local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower()
            if name_:find(name, 1, true) then
                return player
            end
        end
    end
end

function resp()
outputChatBox("start1")
        local q = dbQuery(conn, "SELECT * FROM veh")
        outputChatBox("asd1")
        local res, _, rowid = dbPoll(q, -1, true)
        outputChatBox("asd2")
        outputChatBox("asd3")
            for k, v in ipairs(res) do
        outputChatBox("asd4")
                local veh = createVehicle(v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"])
        outputChatBox("resp pojazduf")
        setVehicleColor(veh, v["red"], v["green"], v["blue"])
        outputChatBox("asd5")
                setElementData(veh,"id",v["rowid"])
        outputChatBox("asd6")
                setElementData(veh,"own",v["player"])
        outputChatBox("asd7")
            end
        outputChatBox("asd7")
end
addEventHandler("onResourceStart",getRootElement(), resp)

addCommandHandler("veh",function(plr,cmd,id,plejer)
if tonumber(id) then
    if namePart(plejer) then
    local x,y,z = getElementPosition(namePart(plejer))
    local veh = createVehicle(id,x,y,z)
        setElementData(veh, "own", namePart(plejer))
        warpPedIntoVehicle(namePart(plejer), veh)
        local q = dbQuery(conn, "SELECT * FROM veh")
                   local result = dbPoll(q, -1)
        for _,row in pairs(result) do
        setElementData(veh,"id",row["rowid"])
        end
            local id = getElementData(veh,"id")
              local x,y,z = getElementPosition(veh)
             local rx,ry,rz = getElementRotation(veh)
          local r, g, b, color4 = getVehicleColor(veh)
        outputChatBox("stworzyles pojazdd pedale")
              dbExec(conn,"UPDATE veh SET posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=?, red='"..r.."', green='"..g.."', blue='"..b.."' WHERE rowid=?",x,y,z,rx,ry,rz,r,g,b,id) 
    end
end
end)


    function zapis(_,seat)
    for i,v in pairs(getElementsByType("vehicle")) do
        if seat == 0 then
            local id = getElementData(v,"id")
            local x,y,z = getElementPosition(v)
            local rx,ry,rz = getElementRotation(v)
        local r, g, b, color4 = getVehicleColor(v)
            dbExec(conn,"UPDATE veh SET posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=?, red='"..r.."', green='"..g.."', blue='"..b.."' WHERE rowid=?",x,y,z,rx,ry,rz,r,g,b,id) 
    end
    end
    end
setTimer(zapis, 60000, 0)


    function zapiscmd()
    for i,v in pairs(getElementsByType("vehicle")) do
            local id = getElementData(v,"id")
            local x,y,z = getElementPosition(v)
            local rx,ry,rz = getElementRotation(v)
        local r, g, b, color4 = getVehicleColor(v)
        if id then else end
        outputChatBox("save pojazduf")
            dbExec(conn,"UPDATE veh SET posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=?, red='"..r.."', green='"..g.."', blue='"..b.."' WHERE rowid=?",x,y,z,rx,ry,rz,r,g,b,id) 
    end
    end
addCommandHandler("save", zapiscmd)


addEventHandler("onVehicleStartExit", root, 
    function(_,seat)
        if seat == 0 then
            local id = getElementData(source,"id")
            local x,y,z = getElementPosition(source)
            local rx,ry,rz = getElementRotation(source)
            local r,g,b = getVehicleColor(source)
            dbExec(conn,"UPDATE veh SET posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=?, red=?, green=?, blue=? WHERE rowid=?",x,y,z,rx,ry,rz,r,g,b,id) 
        end
    end
)

function odczytaj_pojazdy()
local q = dbQuery ( conn, "SELECT * FROM veh" )
        local result = dbPoll ( q, -1 )
        if result then
            for _,v in pairs ( result ) do
                local auto = createVehicle ( v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor ( auto, v["red"], v["green"], v["blue"] )
                setElementData(auto, "own", v["player"])
                setElementData(auto, "id", v["rowid"])
            end
        end
end
addEventHandler("onResourceStart",resourceRoot, odczytaj_pojazdy)

addEventHandler("onVehicleStartExit", root, 
    function(_,seat)
        if seat == 0 then
            local id = getElementData(source,"id")
            local x,y,z = getElementPosition(source)
            local rx,ry,rz = getElementRotation(source)
            local r,g,b = getVehicleColor(source)
            local asd = dbQuery(conn, "UPDATE veh SET posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=? WHERE rowid=?", x,y,z,rx,ry,rz,r,g,b,id)
        if asd then
        outputChatBox("uptade")
        end
        end
    end
)