Ae galera to morrendo de raiva dessa po##.. O player quando compra um item no shop, o item não para de ir pra ele, e no executavel do ot ta assim.

[26/05/2012 17:47:12] [Error - GlobalEvent Interface]

[26/05/2012 17:47:12] data/globalevents/scripts/shop.lua:onThink

[26/05/2012 17:47:12] Description:

[26/05/2012 17:47:12] data/globalevents/scripts/shop.lua:56: attempt to call field 'executeQuery' (a nil value)

[26/05/2012 17:47:12] stack traceback:

[26/05/2012 17:47:12]	 data/globalevents/scripts/shop.lua:56: in function <data/globalevents/scripts/shop.lua:7>

[26/05/2012 17:47:12] [Error - GlobalEvents::think] Couldn't execute event: shop

Agora aqui meu shop.lua

### CONFIG ###

-- message send to player by script "type" (types you can check in "global.lua")

SHOP_MSG_TYPE = 19

-- time (in seconds) between connections to SQL database by shop script

SQL_interval = 30

-- ### END OF CONFIG ###

function onThink(interval, lastExecution)

local result_plr = db.getResult("SELECT * FROM z_ots_comunication WHERE `type` = 'login';")

if(result_plr:getID() ~= -1) then

while(true) do

id = tonumber(result_plr:getDataInt("id"))

action = tostring(result_plr:getDataString("action"))

delete = tonumber(result_plr:getDataInt("delete_it"))

cid = getCreatureByName(tostring(result_plr:getDataString("name")))

if isPlayer(cid) == TRUE then

local itemtogive_id = tonumber(result_plr:getDataInt("param1"))

local itemtogive_count = tonumber(result_plr:getDataInt("param2"))

local container_id = tonumber(result_plr:getDataInt("param3"))

local container_count = tonumber(result_plr:getDataInt("param4"))

local add_item_type = tostring(result_plr:getDataString("param5"))

local add_item_name = tostring(result_plr:getDataString("param6"))

local received_item = 0

local full_weight = 0

if add_item_type == 'container' then

container_weight = getItemWeightById(container_id, 1)

if isItemRune(itemtogive_id) == TRUE then

items_weight = container_count * getItemWeightById(itemtogive_id, 1)

else

items_weight = container_count * getItemWeightById(itemtogive_id, itemtogive_count)

end

full_weight = items_weight + container_weight

else

full_weight = getItemWeightById(itemtogive_id, itemtogive_count)

if isItemRune(itemtogive_id) == TRUE then

full_weight = getItemWeightById(itemtogive_id, 1)

else

full_weight = getItemWeightById(itemtogive_id, itemtogive_count)

end

end

local free_cap = getPlayerFreeCap(cid)

if full_weight <= free_cap then

if add_item_type == 'container' then

local new_container = doCreateItemEx(container_id, 1)

local iter = 0

while iter ~= container_count do

doAddContainerItem(new_container, itemtogive_id, itemtogive_count)

iter = iter + 1

end

received_item = doPlayerAddItemEx(cid, new_container)

else

local new_item = doCreateItemEx(itemtogive_id, itemtogive_count)

received_item = doPlayerAddItemEx(cid, new_item)

end

if received_item == RETURNVALUE_NOERROR then

doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, 'You received >> '.. add_item_name ..' << from OTS shop.')

db.executeQuery("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";")

db.executeQuery("UPDATE `z_shop_history_item` SET `trans_state`='realized', `trans_real`=" .. os.time() .. " WHERE id = " .. id .. ";")

else

doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. Please make place for this item in your backpack/hands and wait about '.. SQL_interval ..' seconds to get it.')

end

else

doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. It weight is '.. full_weight ..' oz., you have only '.. free_cap ..' oz. free capacity. Put some items in depot and wait about '.. SQL_interval ..' seconds to get it.')

end

end

if not(result_plr:next()) then

break

end

end

result_plr:free()

end

return TRUE

end

Aqui meu GlobalEvents:

<?xml version="1.0" encoding="UTF-8"?>

<globalevents>


<globalevent name="save" interval="5600" event="script" value="save.lua"/>

   			   <globalevent name="clean" interval="3500" event="script" value="clean.lua"/>

				  <globalevent name="info" interval="500" event="script" value="info.lua"/>

				  <globalevent name="lottery" interval="800" event="script" value="lottery.lua"/>

   			   <globalevent name="serverstart" type="start" event="script" value="start.lua"/>

   			   <globalevent name="playersrecord" type="record" event="script" value="record.lua"/>

				  <globalevent name="Tp's" interval="2" script="texto.lua" />

				  <globalevent name="Tp'" interval="2" script="textol.lua" />

				  <globalevent name="Tp'ss" interval="2" script="texto2.lua" />

				  <globalevent name="Tp'" interval="2" script="effect.lua" />

				  <globalevent name="m1" interval="300" script="m1.lua"/>

				  <globalevent name="shop" interval="30" script="shop.lua"/>


	<!-- <globalevent name="timer_example" time="21:35" event="script" value="my_script.lua"/> -->

</globalevents>

Um rl meu me passo uns textos eu executei la no phpmyadmin, mais nada resolveu . Ajudem pls!

Usa esse:

-- ### CONFIG ###

-- message send to player by script "type" (types you can check in "global.lua")

SHOP_MSG_TYPE = 19

-- time (in seconds) between connections to SQL database by shop script

SQL_interval = 30

-- ### END OF CONFIG ###

function onThink(interval, lastExecution)

    local result_plr = db.getResult("SELECT * FROM z_ots_comunication WHERE `type` = 'login';")

    if(result_plr:getID() ~= -1) then

        while(true) do

	        id = tonumber(result_plr:getDataInt("id"))

	        action = tostring(result_plr:getDataString("action"))

	        delete = tonumber(result_plr:getDataInt("delete_it"))

	        cid = getCreatureByName(tostring(result_plr:getDataString("name")))

	        if isPlayer(cid) == TRUE then

		        local itemtogive_id = tonumber(result_plr:getDataInt("param1"))

		        local itemtogive_count = tonumber(result_plr:getDataInt("param2"))

		        local container_id = tonumber(result_plr:getDataInt("param3"))

		        local container_count = tonumber(result_plr:getDataInt("param4"))

		        local add_item_type = tostring(result_plr:getDataString("param5"))

		        local add_item_name = tostring(result_plr:getDataString("param6"))

		        local received_item = 0

		        local full_weight = 0

		        if add_item_type == 'container' then

			        container_weight = getItemWeightById(container_id, 1)

			        if isItemRune(itemtogive_id) == TRUE then

				        items_weight = container_count * getItemWeightById(itemtogive_id, 1)

			        else

				        items_weight = container_count * getItemWeightById(itemtogive_id, itemtogive_count)

			        end

			        full_weight = items_weight + container_weight

		        else

			        full_weight = getItemWeightById(itemtogive_id, itemtogive_count)

			        if isItemRune(itemtogive_id) == TRUE then

				        full_weight = getItemWeightById(itemtogive_id, 1)

			        else

				        full_weight = getItemWeightById(itemtogive_id, itemtogive_count)

			        end

		        end

		        local free_cap = getPlayerFreeCap(cid)

		        if full_weight <= free_cap then

			        if add_item_type == 'container' then

				        local new_container = doCreateItemEx(container_id, 1)

      doItemSetAttribute(new_container, "description", 'Bought by ' .. getCreatureName(cid) .. ' [ID:' .. id .. '].')

				        local iter = 0

				        while iter ~= container_count do

       local new_item = doCreateItemEx(itemtogive_id, itemtogive_count)

       doItemSetAttribute(new_item, "description", 'Bought by ' .. getCreatureName(cid) .. ' [ID:' .. id .. '].')

       doAddContainerItemEx(new_container, new_item)

					        iter = iter + 1

				        end

				        received_item = doPlayerAddItemEx(cid, new_container)

			        else

				        local new_item = doCreateItemEx(itemtogive_id, itemtogive_count)

      doItemSetAttribute(new_item, "description", 'Bought by ' .. getCreatureName(cid) .. ' [ID:' .. id .. '].')

				        received_item = doPlayerAddItemEx(cid, new_item)

			        end

			        if received_item == RETURNVALUE_NOERROR then

				        doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, 'You received >> '.. add_item_name ..' << from OTS shop.')

      doPlayerSave(cid)

				        db.executeQuery("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";")

				        db.executeQuery("UPDATE `z_shop_history_item` SET `trans_state`='realized', `trans_real`=" .. os.time() .. " WHERE id = " .. id .. ";")

			        else

				        doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. Please make place for this item in your backpack/hands and wait about '.. SQL_interval ..' seconds to get it.')

			        end

		        else

			        doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. It weight is '.. full_weight ..' oz., you have only '.. free_cap ..' oz. free capacity. Put some items in depot and wait about '.. SQL_interval ..' seconds to get it.')

		        end

	        end

	        if not(result_plr:next()) then

		        break

	        end

        end

        result_plr:free()

    end

    return TRUE

end

Agora adiciona a query no phpmyadmin..

Espero que eu tenha lhe ajudado!

1 =

CREATE TABLE IF NOT EXISTS `z_shop_history_item` (

  `id` int(11) NOT NULL AUTO_INCREMENT,

  `to_name` varchar(255) NOT NULL DEFAULT '0',

  `to_account` int(11) NOT NULL DEFAULT '0',

  `from_nick` varchar(255) NOT NULL,

  `from_account` int(11) NOT NULL DEFAULT '0',

  `price` int(11) NOT NULL DEFAULT '0',

  `offer_id` int(11) NOT NULL DEFAULT '0',

  `trans_state` varchar(255) NOT NULL,

  `trans_start` int(11) NOT NULL DEFAULT '0',

  `trans_real` int(11) NOT NULL DEFAULT '0',

  PRIMARY KEY (`id`)

) ENGINE=MyISAM DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;

2 =

CREATE TABLE IF NOT EXISTS `z_shop_history_pacc` (

  `id` int(11) NOT NULL AUTO_INCREMENT,

  `to_name` varchar(255) NOT NULL DEFAULT '0',

  `to_account` int(11) NOT NULL DEFAULT '0',

  `from_nick` varchar(255) NOT NULL,

  `from_account` int(11) NOT NULL DEFAULT '0',

  `price` int(11) NOT NULL DEFAULT '0',

  `pacc_days` int(11) NOT NULL DEFAULT '0',

  `trans_state` varchar(255) NOT NULL,

  `trans_start` int(11) NOT NULL DEFAULT '0',

  `trans_real` int(11) NOT NULL DEFAULT '0',

  PRIMARY KEY (`id`)

) ENGINE=MyISAM  DEFAULT CHARSET=latin1 AUTO_INCREMENT=4 ;

3 =

CREATE TABLE IF NOT EXISTS `z_shop_offer` (

  `id` int(11) NOT NULL AUTO_INCREMENT,

  `points` int(11) NOT NULL DEFAULT '0',

  `itemid1` int(11) NOT NULL DEFAULT '0',

  `count1` int(11) NOT NULL DEFAULT '0',

  `itemid2` int(11) NOT NULL DEFAULT '0',

  `count2` int(11) NOT NULL DEFAULT '0',

  `offer_type` varchar(255) DEFAULT NULL,

  `offer_description` text NOT NULL,

  `offer_name` varchar(255) NOT NULL,

  `pid` int(11) NOT NULL DEFAULT '0',

  `category` int(11) NOT NULL DEFAULT '1',

  PRIMARY KEY (`id`)

) ENGINE=MyISAM  DEFAULT CHARSET=latin1 AUTO_INCREMENT=4 ;

não funcionou, continua recebendo e o erro ainda permance no executavél:

[26/05/2012 18:09:28] data/globalevents/scripts/shop.lua:61: in function <data/globalevents/scripts/shop.lua:7>

[26/05/2012 18:09:28] [Error - GlobalEvents::think] Couldn't execute event: shop

18:11 You received >> Blade Staff << from OTS shop.

18:11 You received >> Blade Staff << from OTS shop.

Faz o seguinte, troque o shopsystem.php e shopadmin.php...

Como o arquivo é muito grande para postar aqui, anexei ele...

shopadmin.php

shopsystem.php

Continua recebendo, nada da certo, omg --' ...