Entrega De itens Altomaticamente

[iErrorzz 18]

Ola Pessoal estou com um Problema Serio os Meus itens do Shop nao estao entregando Eu uso o Shop.lua no globalevents mas nao ta entregando nada

[tetheuscunha 68]

Poste o seu script.

[iErrorzz 18]

Shop.lua

SHOP_MSG_TYPE = MESSAGE_STATUS_CONSOLE_BLUE
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 .. '].')
						doItemSetAttribute(new_container, "tid", 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 .. '].')
							doItemSetAttribute(new_item, "tid", 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 .. '].')
						doItemSetAttribute(new_item, "tid", 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.query("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";")
                        db.query("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

Editado Julho 20, 2014 por iErrorzz (veja o histórico de edições)

[TsplayerT 83]

Vc está falando de entrega de itens no jogo mas comprado no shop do site?

[iErrorzz 18]

Sim Compro no shop Do site e ele entrega altomaticamente no jogo

up

up

[L3K0T 1024]

Sim Compro no shop Do site e ele entrega altomaticamente no jogo

up

up

 

usa o meu

function onThink(interval, lastExecution, thinkInterval)

local result = db.getResult("SELECT * FROM shop_history WHERE `processed` = 0;")

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

   while(true) do

    cid = getCreatureByName(tostring(result:getDataString("player")))

    product = tonumber(result:getDataInt("product"))

    itemr = db.getResult("SELECT * FROM shop_offer WHERE `id` = "..product..";")

     if isPlayer(cid) then

      local id = tonumber(itemr:getDataInt("item"))

      local tid = tonumber(result:getDataInt("id"))

      local count = tonumber(itemr:getDataInt("count"))

      local tipe = tonumber(itemr:getDataInt("type"))

      local productn = tostring(itemr:getDataString("name"))

       if isInArray({5,8},tipe) then

        if getPlayerFreeCap(cid) >= getItemWeightById(id, count) then

         if isContainer(getPlayerSlotItem(cid, 3).uid) then

          received = doAddContainerItem(getPlayerSlotItem(cid, 3).uid, id,count)

          if received then

           doPlayerSendTextMessage(cid,19, "You have received >> "..productn.." << from our shop HPO")

           db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";")

          else

           doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough space on container to receive >> "..productn.." <<")

          end

         else

          doPlayerSendTextMessage(cid,19, "Sorry, you don't have a container to receive >> "..productn.." <<")

         end

        else

         doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough capacity to receive >> "..productn.." << (You need: "..getItemWeightById(id, count).." Capacity)")

        end

       elseif isInArray({6,7},tipe) then

         if tipe == 6 then

          bcap = 8

          bid = 1987

         elseif tipe == 7 then

          bcap = 20

          bid = 1988

         end

         if isItemRune(id) then

          count = 1

         end

         if getPlayerFreeCap(cid) >= (getItemWeightById(1987, 1) + getItemWeightById(id,count * bcap)) then

          local bag = doCreateItemEx(bid, 1)

           for i = 1,bcap do

            doAddContainerItem(bag, id, count)

           end

          received = doPlayerAddItemEx(getPlayerSlotItem(cid, 3).uid, bag)

          if received == RETURNVALUE_NOERROR then

           doPlayerSendTextMessage(cid,19, "You have received >> "..productn.." << from our shop HPO")

           db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";")

          else

           doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough space to receive >> "..productn.." <<")

          end

         else

          doPlayerSendTextMessage(cid,19, "Sorry, you don't have enough capacity to receive >> "..productn.." << (You need: "..getItemWeightById(id, count).." Capacity)")

         end

       end

     end

    itemr:free()

    if not(result:next()) then

     break

    end

   end

   result:free()

  end

return true

end

 

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

[iErrorzz 18]

Nao funcionou 

[L3K0T 1024]

que erro mostra no seu distro ? altera essa linha  <globalevent name="shop" interval="1000" script="shop.lua"/ > agora mostra o erro se caso tiver!

Editado Julho 20, 2014 por alexxxxxxx (veja o histórico de edições)

[iErrorzz 18]

Nao mostra nenhum erro na distro simplesmente nao entre os itens vo testar esse ai

e Pra por essa ultima linha tamben ? 

 

-- Volcar la base de datos para la tabla `shop_donation_history`

[L3K0T 1024]

de um /reload globalevents   rsrs pra que vc n precise reiniciar o servidor! vc usa modern acc ou gesior ?

Editado Julho 20, 2014 por alexxxxxxx (veja o histórico de edições)

[iErrorzz 18]

de um /reload globalevents   rsrs pra que vc n precise reiniciar o servidor! vc usa modern acc ou gesior ?

 

Uso gesior tem algum problema ?

[L3K0T 1024]

executa isso

 

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,
PRIMARY KEY (`id`)
);

 

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

 

 

testa esse aqui 

 

coloca lá em globalevents/scripts/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

 

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

[iErrorzz 18]

Minha salvação Chegou Aki, Rep+ 

A Aproveitando vc sabe Se tem Como saber se os points comprados pelo pagseguro ta chegando na conta?

e se os points ta viindo em dobro ? obg 

[L3K0T 1024]

só olhar lá no config.php é tudo lá as coisas do site "maioria"

[iErrorzz 18]

Eu ja botei la os meus dados etc.. mas to com duvida se ta chegando os points

[L3K0T 1024]

faça uma compra vc mesmo '-'

[iErrorzz 18]

Sem money rsrs se vc tivesse 1 real ai eu devolveria so pra testar msm mas susse vlw pela ajuda ae