addCommandHandler("dodajdomek",function(plr,cmd)
if exports['pystories-admin']:getAdmin(plr,4) then
local x,y,z = getElementPosition(plr)
local stringe = ("INSERT INTO lss_domy (descr,i,vwe,drzwi,punkt_wyjscia,interiorid,koszt,active) VALUES ('%s',%s,%s,'%s','%s',%s,%s,%s)"):format("Dom", 0,0,("%.2f,%.2f,%.2f"):format(x,y,z),("%.2f,%.2f,%.2f"):format(x,y,z),221,150000,1)
--outputChatBox(stringe,plr)
exports["pystories-db"]:dbSet(stringe)
--restartResource(getThisResource())
outputChatBox("Dodano dom",plr)
--restartResource("lss-domy",true)
end
end)
 

addCommandHandler("dodajdomek",function(plr,cmd)
if exports['pystories-admin']:getAdmin(plr,4) then
local x,y,z = getElementPosition(plr)
local stringe = ("INSERT INTO lss_domy (descr,i,vwe,drzwi,punkt_wyjscia,interiorid,koszt,active) VALUES ('%s',%s,%s,'%s','%s',%s,%s,%s)"):format("Dom", 0,0,("%.2f,%.2f,%.2f"):format(x,y,z),("%.2f,%.2f,%.2f"):format(x,y,z),221,150000,1)
--outputChatBox(stringe,plr)
exports["pystories-db"]:dbSet(stringe)
restartResource(getThisResource())
outputChatBox("Dodano dom",plr)
restartResource("lss-domy",true)
end
end)

addCommandHandler("dodajdomek",function(plr,cmd)
if exports['pystories-admin']:getAdmin(plr,4) then
local x,y,z = getElementPosition(plr)
local stringe = ("INSERT INTO lss_domy (descr,i,vwe,drzwi,punkt_wyjscia,interiorid,koszt,active) VALUES ('%s',%s,%s,'%s','%s',%s,%s,%s)"):format("Dom", 0,0,("%.2f,%.2f,%.2f"):format(x,y,z),("%.2f,%.2f,%.2f"):format(x,y,z),221,150000,1)
--outputChatBox(stringe,plr)
exports["pystories-db"]:dbSet(stringe)
restartResource(getThisResource())
outputChatBox("Dodano dom",plr)
--restartResource("lss-domy",true)
end
end)

 --[[
Domy do wynajecia

@author Lukasz Biegaj <wielebny@bestplay.pl>
@copyright 2010-2013 Lukasz Biegaj <wielebny@bestplay.pl>
@license Dual GPLv2/MIT
]]--



domy={}

local function usunDom(id)
    if isElement(domy[id].wyjscie) then destroyElement(domy[id].wyjscie) end
    if isElement(domy[id].wejscie) then destroyElement(domy[id].wejscie) end
    if isElement(domy[id].cs) then destroyElement(domy[id].cs) end
    if isElement(domy[id].text) then destroyElement(domy[id].text) end
    domy[id]=nil
end

local function dodajDom(v,fast)

    if not interiory[v.interiorid] then return false end
--    if tonumber(v.id)==151 then
--        outputChatBox("151")
--    end

    --outputDebugString(tostring(v.ownerid))
    if domy[v.id] then
        usunDom(v.id)
    end
    local result=exports["pystories-db"]:dbGet("SELECT * FROM pystories_users WHERE id=?", v.ownerid)
    if result and #result > 0 then
        local r=result[1]
        v.owner_nick = r.login
    else
        if v.ownerid ~= false then
        outputDebugString("B?ad domku ID DOMKU#"..v.id)
        end
        v.owner_nick = "do wynaj?cia"
    end
--    outputDebugString(v.owner_nick)
    v.drzwi=split(v.drzwi,",")
    for ii,vv in ipairs(v.drzwi) do        v.drzwi[ii]=tonumber(vv)    end
    v.punkt_wyjscia=split(v.punkt_wyjscia,",")
    for ii,vv in ipairs(v.punkt_wyjscia) do        v.punkt_wyjscia[ii]=tonumber(vv)    end
    local pickupid=1272
    if (not v.ownerid) then
        pickupid=1273
    end
    v.wejscie=createPickup ( v.drzwi[1], v.drzwi[2], v.drzwi[3], 3, pickupid, 0)
    v.cs=createColSphere(v.drzwi[1],v.drzwi[2],v.drzwi[3], 1)

    if (not fast and v.ownerid) then
        v.text=createElement("text")
        setElementPosition(v.text, v.drzwi[1],v.drzwi[2],v.drzwi[3]+0.5)
        setElementPosition(v.text, -2054.95,913.03,55.91)

--        setElementData(v.text,"text", "dom")

        setElementData(v.text,"vehicle:desc", (v.descr or "Dom").."\n"..v.owner_nick)

    end
    local interior_dimension=v.vwi or 1000+v.id

    setElementData(v.cs, "dom", { 
        ["zamkniety"]=v.zamkniety>0 and true or false,
        ["id"]=v.id,
        ["koszt"]=v.koszt, 
        ["ownerid"]=v.ownerid, 
        ["owner_nick"]=v.owner_nick,
        ["descr"]=v.descr or "dom", 
        ["dimension"]=interior_dimension,
        ["interior"]=interiory[v.interiorid].interior,
        ["interior_loc"]=interiory[v.interiorid].entrance,
        ["exit_loc"]=v.punkt_wyjscia,
        ["paidTo"]=v.paidTo,
        ["paidTo_dni"]=v.paidTo_dni,
--        ["veha"]=(v.vehicles_allowed and v.vehicles_allowed>0) and true or false
    })



-- dodajemy wyjscie
    v.wyjscie=createMarker(interiory[v.interiorid].exit[1], interiory[v.interiorid].exit[2], interiory[v.interiorid].exit[3], "arrow",1)
    setElementDimension(v.wyjscie, interior_dimension)
    setElementInterior(v.wyjscie, interiory[v.interiorid].interior)
    setElementData(v.wyjscie,"tpto", v.punkt_wyjscia)


    local dbid=v.id
    v.id=nil
    domy[dbid]=v

    return true
end

function domyGetInfo(id)
    return domy[id]
end

local function zaladujCzescDomow(procent,fast)
    local tt=getTickCount()
    i=0
    exports["pystories-db"]:dbSet("UPDATE lss_domy SET paidTo=NULL,ownerid=NULL where paidTo<NOW() or paidTo IS NULL")
    local dbdomy
    if fast then
        dbdomy=exports["pystories-db"]:dbGet("SELECT d.id,d.descr,d.vwi,d.drzwi,d.punkt_wyjscia,d.interiorid,d.ownerid,d.zamkniety,d.koszt,d.paidTo,datediff(d.paidTo,now()) paidTo_dni FROM lss_domy d LEFT JOIN pystories_users c ON c.id=d.ownerid AND d.ownerid IS NOT NULL;")
    else
        dbdomy=exports["pystories-db"]:dbGet("SELECT d.id,d.descr,d.vwi,d.drzwi,d.punkt_wyjscia,d.interiorid,d.ownerid,d.zamkniety,d.koszt,d.paidTo,datediff(d.paidTo,now()) paidTo_dni FROM lss_domy d LEFT JOIN pystories_users c ON c.id=d.ownerid WHERE d.active=1;")
    end
    for __,v in ipairs(dbdomy) do
        if math.random(0,100)<=procent then
--            outputChatBox("Wgrywanie domu " .. v.id)
            if dodajDom(v,fast) then i=i+1 end
        end
    end                             
    outputDebugString("Zaladowano domow: " .. i .. " w " .. (getTickCount()-tt) .. "ms")
end
-- setTimer(zaladujCzescDomow, 10*1000*60, 0, 100)
addEventHandler("onResourceStart", resourceRoot, function()
    zaladujCzescDomow(100,false)
end)

function zaladujZmienioneDomy()
    local i=0
    local dbdomy=exports["pystories-db"]:dbGet("SELECT d.id,d.descr,d.vwi,d.drzwi,d.punkt_wyjscia,d.interiorid,d.ownerid,d.zamkniety,d.koszt,d.paidTo,datediff(d.paidTo,now()) paidTo_dni FROM lss_domy d LEFT JOIN pystories_users c ON c.id=d.ownerid WHERE d.active=1 AND timediff(now(),d.updated)<'00:09:00' AND datediff(now(),d.updated)<1")
    for __,v in ipairs(dbdomy) do

            if dodajDom(v) then i=i+1 end
    end                             
    outputDebugString("Zaladowano zmienionych domow: " .. i)
end

setTimer(zaladujZmienioneDomy, 10*1000*5, 0)


function domReload(id)
    local dbdom=exports["pystories-db"]:dbGet("SELECT d.id,d.descr,d.vwi,d.drzwi,d.punkt_wyjscia,d.interiorid,d.ownerid,d.zamkniety,d.koszt,d.paidTo,datediff(d.paidTo,now()) paidTo_dni FROM lss_domy d LEFT JOIN pystories_users c ON c.id=d.ownerid WHERE d.active=1 and d.id=?;",id)
    if dbdom then
        return dodajDom(dbdom)
    end
    return false
end

-- Add a new event called onSpecialEvent
addEvent ( "SprawdzDom", true )
-- Define our handler function
function SprawdzDom ( gracz )
    local dbdomy=exports["pystories-db"]:dbGet("SELECT d.id,d.descr,d.vwi,d.drzwi,d.punkt_wyjscia,d.interiorid,d.ownerid,d.zamkniety,d.koszt,d.paidTo,datediff(d.paidTo,now()) paidTo_dni FROM lss_domy d LEFT JOIN pystories_users c ON c.id=d.ownerid AND d.ownerid IS NOT NULL;")
    for __,v in ipairs(dbdomy) do
        local uid=tonumber(getElementData(gracz,"player:uid"))
        local r=v.ownerid
        v.drzwi=split(v.drzwi,",")
        for ii,vv in ipairs(v.drzwi) do        v.drzwi[ii]=tonumber(vv)    end
        if r then if r == uid then setElementData(gracz,"player:house",true) setElementData(gracz,"player:spawn",{v.drzwi[1],v.drzwi[2],v.drzwi[3]}) end end
    --    if v.ownerid == getElementData(gracz,"player:uid") then
    --    setElementData(gracz,"player:house",{v.drzwi[1],v.drzwi[2],v.drzwi[3]})
    --    end
    end     
end
-- Add the event handler
addEventHandler ( "SprawdzDom", root, SprawdzDom )