GTAONLINE.PL :: lss-domy zapisują się w bazie, ale się nie pokazują.

Mam taki problem, ot?? przerabiam sobie domki, dok?adnie lss-domy z IYW i wszystko dobrze podpi??em, w debugu nie ma nic innego pr?cz ?adowania domk?w, w?a?nie gdzie zawsze pisz? za?adowanych domk?w 0, a w bazie danych mam dodane 3 domki:
Strona serwera:
Kod:
--[[

Domy do wynajecia

@author Lukasz Biegaj <wielebny@bestplay.pl>

@copyright 2010-2013 Lukasz Biegaj <wielebny@bestplay.pl>

@license Dual GPLv2/MIT

]]--

--[[

setTimer ( function()

		local time = getRealTime()

		local hours = time.hour

		local minute = time.minute

		if tonumber(hours) == 23 and tonumber(minute) == 59 then

			outputDebugString("* Zresetowano domki *")

			restartResource(getThisResource())

		end

end, 999*60, 0 )

--]]

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

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["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_users WHERE id=?", v.ownerid)

	if result and #result > 0 then

		local r=result[1]

		if r.login2 == false then

		v.owner_nick = r.login

		else

		v.owner_nick = r.login2

		end

	else

		if v.ownerid ~= false then

		outputDebugString("B?ad domu ID domu#"..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, 2903.09,-32.64,-24.62)

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

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

	end

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

	if v.lokator1 ~= "false" then

	local lokator1db=exports["ogrpg-db"]:dbSet("select login,login2,id from ogrpg_users where id=?", v.lokator1)

	if #lokator1db > 0 then

		lokator1db=lokator1db[1]

		if lokator1db.login2 then

		lokator1=lokator1db.login2

		else

		lokator1=lokator1db.login

		end

		lokator1uid=lokator1db.id

		else

		lokator1=false

		lokator1uid=false

	end

	end

	if v.lokator2 ~= "false" then

	local lokator2db=exports["ogrpg-db"]:dbSet("select login,login2,id from ogrpg_users where id=?", v.lokator2)

	if #lokator2db > 0 then

		lokator2db=lokator2db[1]

		if lokator2db.login2 then

		lokator2=lokator2db.login2

		else

		lokator2=lokator2db.login

		end

		lokator2uid=lokator2db.id

		else

		lokator2=false

		lokator2uid=false

	end

	end

	if v.lokator3 ~= "false" then

	local lokator3db=exports["ogrpg-db"]:dbSet("select login,login2,id from ogrpg_users where id=?", v.lokator3)

	if #lokator3db > 0 then

		lokator3db=lokator3db[1]

		if lokator3db.login2 then

		lokator3=lokator3db.login2

		else

		lokator3=lokator3db.login

		end

		lokator3uid=lokator3db.id

		else

		lokator3=false

		lokator3uid=false

	end	

	end

	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,

		["lokator1"]=lokator1,

		["lokator1uid"]=lokator1uid,

		["lokator2"]=lokator2,

		["lokator2uid"]=lokator2uid,

		["lokator3"]=lokator3,

		["lokator3uid"]=lokator3uid,

--		["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["ogrpg-db"]:dbSet("UPDATE lss_domy SET paidTo=NULL,ownerid=NULL,lokator1=NULL,lokator2=NULL,lokator3=NULL where paidTo<NOW() or paidTo IS NULL")

	local dbdomy

	if fast then

		dbdomy=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_users c ON c.id=d.ownerid AND d.ownerid IS NOT NULL;")

	else

		dbdomy=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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, 0)

function domReload(id)

	local dbdom=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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 and d.id=?", id)

	if dbdom then

	for i,v in ipairs(dbdom) do

		return dodajDom(v)

	end

	end

	return false

end

-- Add a new event called onSpecialEvent

addEvent ( "SprawdzDom", true )

-- Define our handler function

function SprawdzDom ( gracz )

	local q=exports["ogrpg-db"]:dbGet("select id,house from ogrpg_users where id=? and house IS NOT NULL",getElementData(gracz,"player:uid"))

	if #q < 1 then

	local dbdomy=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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)

		tak=({v.drzwi[1],v.drzwi[2],v.drzwi[3]})

		setElementData(gracz,"player:spawn",tak)

		--		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)

		--tak[#tak+1]={v.drzwi[1],v.drzwi[2],v.drzwi[3]})

	--	setElementData(gracz,"player:house:list",tak)

		--end end

		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

		elseif #q > 0 then

		local qr=exports["ogrpg-db"]:dbGet("select ownerid,drzwi,id from lss_domy where id=?", q[1].house)

		for i,v in ipairs(qr) do

		local uid=tonumber(getElementData(gracz,"player:uid"))

		v.drzwi=split(v.drzwi,",")

		for ii,vv in ipairs(v.drzwi) do		v.drzwi[ii]=tonumber(vv)	end

		setElementData(gracz,"player:house",true)

		tak=({v.drzwi[1],v.drzwi[2],v.drzwi[3]})

		setElementData(gracz,"player:spawn",tak)

		end

	end

end

-- Add the event handler

addEventHandler ( "SprawdzDom", root, SprawdzDom )

function kupdom(czas,domid)

local kasa=client:getMoney()

q=exports["ogrpg-db"]:dbSet("select ownerid,koszt,id from lss_domy where id=?", domid)

if #q < 1 then

	client:outputChat("Wyst?pi? b??d, nie znaleziono takiego domu!", 255, 0, 0)

	return

end

q=q[1]

if q.ownerid then

	client:outputChat("Ten dom ma ju? w?a?ciciela!", 255, 0, 0)

	return

end

koszt=q.koszt*czas

if kasa < koszt then

	client:outputChat("Nie sta? Ci? na kupno tego domu! ("..koszt.." PLN)", 255, 0, 0)

	return

end

takePlayerMoney(client, koszt)

exports["ogrpg-db"]:dbSet("update lss_domy set ownerid=?, paidTo=NOW()+INTERVAL ? DAY, lokator1=NULL, lokator2=NULL, lokator3=NULL where id=?", client:getData("player:uid"), czas, domid)

domReload(domid)

client:outputChat("Pomy?lnie zakupi?e? dom, pobrano z konta "..koszt.." PLN!", 0, 255, 0) 

end

addEvent("DOMY:kup", true)

addEventHandler("DOMY:kup", root, kupdom)

function oplacdom(czas,domid)

local kasa=client:getMoney()

q=exports["ogrpg-db"]:dbSet("select ownerid,koszt,id from lss_domy where id=?", domid)

if #q < 1 then

	client:outputChat("Wyst?pi? b??d, nie znaleziono takiego domu!", 255, 0, 0)

	return

end

q=q[1]

if q.ownerid ~= client:getData("player:uid") then

	client:outputChat("To nie jest tw?j dom!", 255, 0, 0)

	return

end

koszt=q.koszt*czas

if kasa < koszt then

	client:outputChat("Nie sta? Ci? na op?acenie tego domu! ("..koszt.." PLN)", 255, 0, 0)

	return

end

takePlayerMoney(client, koszt)

exports["ogrpg-db"]:dbSet("update lss_domy set paidTo=paidTo+INTERVAL ? DAY where id=?", czas, domid)

domReload(domid)

client:outputChat("Pomy?lnie op?aci?e? dom na "..czas.." dni, pobrano z konta "..koszt.." PLN!", 0, 255, 0) 

end

addEvent("DOMY:oplac", true)

addEventHandler("DOMY:oplac", root, oplacdom)

function dodajlokator(uid,domid)

local q2=exports["ogrpg-db"]:dbSet("select id from ogrpg_users where id=?", uid)

if #q2> 0 then

q=exports["ogrpg-db"]:dbSet("select lokator1,lokator2,lokator3 from lss_domy where id=?", domid)

if #q < 1 then client:outputChat("Wyst?pi? b??d, nie znaleziono takiego domu!", 255, 0, 0) return end

q=q[1]

	if q.lokator1 and q.lokator2 and q.lokator3 then client:outputChat("Osi?gni?to limit 3 lokator?w na dom!", 255, 0, 0) return end

	if not q.lokator1 then

		exports["ogrpg-db"]:dbSet("update lss_domy set lokator1=? where id=?", uid, domid)

		domReload(domid)

		client:outputChat("Dodano nowego lokatora do domu.", 0, 255, 0)

		return

	end

	if not q.lokator2 then

		exports["ogrpg-db"]:dbSet("update lss_domy set lokator2=? where id=?", uid, domid)

		domReload(domid)

		client:outputChat("Dodano nowego lokatora do domu.", 0, 255, 0)

		return

	end

	if not q.lokator3 then

		exports["ogrpg-db"]:dbSet("update lss_domy set lokator3=? where id=?", uid, domid)

		domReload(domid)

		client:outputChat("Dodano nowego lokatora do domu.", 0, 255, 0)

		return

	end

else

client:outputChat("Nie ma konta z takim UID!", 255, 0, 0)

end

end

addEvent("DOM:lokator+", true)

addEventHandler("DOM:lokator+", root, dodajlokator)

function usunlokator(id,domid)

if id == 1 then

exports["ogrpg-db"]:dbSet("update lss_domy set lokator1=NULL where id=?", domid)

client:outputChat("Pomy?lnie usuni?to lokatora.", 0, 255, 0)

local dbdom=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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 and d.id=?", domid)

for i,v in ipairs(dbdom) do

dodajDom(v)

end

elseif id == 2 then

exports["ogrpg-db"]:dbSet("update lss_domy set lokator2=NULL where id=?", domid)

client:outputChat("Pomy?lnie usuni?to lokatora.", 0, 255, 0)

local dbdom=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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 and d.id=?", domid)

for i,v in ipairs(dbdom) do

dodajDom(v)

end

elseif id == 3 then

exports["ogrpg-db"]:dbSet("update lss_domy set lokator3=NULL where id=?", domid)

client:outputChat("Pomy?lnie usuni?to lokatora.", 0, 255, 0)

local dbdom=exports["ogrpg-db"]:dbGet("SELECT d.id,d.lokator1,d.lokator2,d.lokator3,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 ogrpg_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 and d.id=?", domid)

for i,v in ipairs(dbdom) do

dodajDom(v)

end

end

end

addEvent("DOM:lokator-", true)

addEventHandler("DOM:lokator-", root, usunlokator)

function zwolnijdom(domid)

exports["ogrpg-db"]:dbSet("update lss_domy set paidTo='2000-01-01 00:00:00' where id=?", domid)

exports["ogrpg-db"]:dbSet("UPDATE lss_domy SET paidTo=NULL,ownerid=NULL,lokator1=NULL,lokator2=NULL,lokator3=NULL where paidTo<NOW() or paidTo IS NULL")

domReload(domid)

client:outputChat("Pomy?lnie zwolniono dom.", 0, 255, 0)

end

addEvent("DOM:zwolnij", true)

addEventHandler("DOM:zwolnij", root, zwolnijdom)

addCommandHandler("mieszkanie",function(plr,cmd)

if exports['dutyadmin']: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("Mieszkanie", 0,0,("%.2f,%.2f,%.2f"):format(x,y,z),("%.2f,%.2f,%.2f"):format(x,y,z),8,170,1)

local q,_,id=exports["ogrpg-db"]:dbSet(stringe)

domReload(id)

end

end)

addCommandHandler("dom",function(plr,cmd)

if exports['dutyadmin']: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,250,1)

local q,_,id=exports["ogrpg-db"]:dbSet(stringe)

domReload(id)

end

end)

addCommandHandler("willa",function(plr,cmd)

if exports['dutyadmin']: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("Willa", 0,0,("%.2f,%.2f,%.2f"):format(x,y,z),("%.2f,%.2f,%.2f"):format(x,y,z),27,600,1)

local q,_,id=exports["ogrpg-db"]:dbSet(stringe)

domReload(id)

end

end)