Ir para conteúdo

Bug no ShopSystem Gesior

Por Juliano Bazzi
em Suporte Tibia OTServer

Featured Replies

Postado

Tem sim, e está assim:


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

Ponha 30000 no internal e no seu shop.lua adicione isto

local SHOP_MSG_TYPE = MESSAGE_EVENT_ORANGE

local SQL_interval = 30

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

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

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

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

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

if isPlayer(cid) 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)

doItemSetAttribute(new_item, "description", "This item was purchased at the shop by the player ".. getPlayerName(cid) ..".")

doItemSetAttribute(new_item, "aid", getPlayerGUID(cid)+10000)

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

  • Citar
  • Mention
    • Respostas 10
    • Visualizações 834
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Postado
    • Autor

    Ponha 30000 no internal e no seu shop.lua adicione isto

    local SHOP_MSG_TYPE = MESSAGE_EVENT_ORANGE

    local SQL_interval = 30

    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

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

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

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

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

    if isPlayer(cid) 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)

    doItemSetAttribute(new_item, "description", "This item was purchased at the shop by the player ".. getPlayerName(cid) ..".")

    doItemSetAttribute(new_item, "aid", getPlayerGUID(cid)+10000)

    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

    É pra adicionar ao SHOP.LUA ou pra substituir o que tem nele por isso?

  • Citar
  • Mention
    • Postado
    • Autor

    Ponha 30000 no internal e no seu shop.lua adicione isto

    local SHOP_MSG_TYPE = MESSAGE_EVENT_ORANGE

    local SQL_interval = 30

    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

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

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

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

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

    if isPlayer(cid) 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)

    doItemSetAttribute(new_item, "description", "This item was purchased at the shop by the player ".. getPlayerName(cid) ..".")

    doItemSetAttribute(new_item, "aid", getPlayerGUID(cid)+10000)

    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

    Descobri o problema, é os itens que eu modifiquei, o Shop System não confirma a compra deles..

    Porem dos outros itens normais, sem modificação vai normal..

    Já tentei deletar os itens vips do shop e add dinovo, mais continua o bug.. :S

  • Citar
  • Mention
    • Postado
    • Autor

    Meu website tem a separação entre Itens VIPs e Itens normais..

    Só a aba itens vips que ta bugado..

    Se eu ponho um item vip na aba do item normal, da pra comprar normalmente..

    Alguem sabe como resolver esse problema?

  • Citar
  • Mention

    • Participe da conversa

    Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

    Visitante
    Responder
    Ir para a lista de tópicos

    Quem Está Navegando 0

    • Nenhum usuário registrado visualizando esta página.

    Estatísticas dos Fóruns

    • Tópicos 96.9k
    • Posts 519.6k

    Informação Importante

    Confirmação de Termo

    I accept