local cs_wydawanie=createColCuboid(2870.7,-1820.3,10,7.2,6,3)

local function pojazdNaParkingu(vid)
local query=string.format("SELECT 1 FROM lss_vehicles WHERE id=%d AND przechowalnia=1", vid)
local wynik=exports.DB:pobierzWyniki(query)
return (wynik and true or false)
end

local function czyStrefaWydawaniaWolna()
local p=getElementsWithinColShape(cs_wydawanie, "vehicle")
for i,v in ipairs(p) do
setElementFrozen(v,false)
end
if #p>0 then return false end
return true
end

-- triggerServerEvent("doOdbiorPojazdu", resourceRoot, localPlayer, kid)
addEvent("doOdbiorPojazdu", true)
addEventHandler("doOdbiorPojazdu", resourceRoot, function(plr, vid)

if not vid or not tonumber(vid) then
outputChatBox("* Na wy?wietlaczu urz?dzenia pojawia si? napis ERROR", plr)
return
end

if not pojazdNaParkingu(vid) then
outputChatBox("* Na wy?wietlaczu pojawia si? informacja: tego pojazdu nie ma na parkingu." ,plr)
return
end

if not czyStrefaWydawaniaWolna() then
outputChatBox("* Na wy?wietlaczu pojawia si? informacja: brak miejsca przed bram?. Nie mo?na wyda? pojazdu." ,plr)
return
end

takePlayerMoney(plr, 500)

-- no to jedziemy z koksem!
local query=string.format("UPDATE lss_vehicles SET przechowalnia=0,frozen=0,loc='2874.10,-1817.74,13.08',rot='0,0,90' WHERE id=%d LIMIT 1", vid)
exports.DB:zapytanie(query)

exports["lss-vehicles"]:veh_load(tonumber(vid))
outputChatBox("* Na wy?wietlaczu pojawia si? napis: pojazd wydany!", plr)
triggerClientEvent(plr, "doHideWindows", resourceRoot)
end)

local function czyGraczMozeZostawicPojazd(plr, vid, veh)
-- 1 nie przyjmujemy pojazdow frakcyjnych
if (getElementData(veh,"owning_faction")) then
return false
end

-- 2 policja/sm moze oddac kazdy pojazd
local fid=getElementData(plr, "faction:id")
if fid then
if tonumber(fid)==2 or tonumber(fid)==4 then
return true
end
end

-- 3. tylko wlasciciel moze oddac pojazd
local c=getElementData(plr,"character")
if not c then return false end
local cid=tonumber(c.id)
if not cid then return false end
local query=string.format("SELECT 1 FROM lss_vehicles WHERE id=%d AND owning_player=%d", vid, cid)
local wynik=exports.DB:pobierzWyniki(query)
if wynik then return true else return false end
end

local function znajdzPojazd(id)
for i,v in ipairs(getElementsByType("vehicle")) do
local dbid=getElementData(v,"dbid")
if dbid and tonumber(dbid)==tonumber(id) then
return v
end
end
return nil
end

-- triggerServerEvent("doZostawieniePojazdu", resourceRoot, localPlayer, kid)
addEvent("doZostawieniePojazdu", true)
addEventHandler("doZostawieniePojazdu", resourceRoot, function(plr, vid)
vid=tonumber(vid)
local veh=znajdzPojazd(vid)
if not veh then
outputChatBox("* Na wy?wietlaczu pojawia si? napis: ERROR.", plr)
return
end
if not czyGraczMozeZostawicPojazd(plr,vid, veh) then
outputChatBox("* Na wy?wietlaczu pojawia si? napis: pojazd moze oddac tylko wlasciciel lub sm/policja", plr)
return
end
-- zostawiamy
destroyElement(veh)
local query=string.format("UPDATE lss_vehicles SET przechowalnia=1 WHERE id=%d", vid)
exports.DB:zapytanie(query)
outputChatBox("* Na wy?wietlaczu pojawia si? napis: pojazd zosta? przyj?ty.", plr)
triggerClientEvent(plr, "doHideWindows", resourceRoot)
end)