poketibia [Encerrado] Trade Poketibia

atakashi · Agosto 17, 2015

Pessoal, eu tenho um servidor com base PDA, e o trade desse servidor possui um bug e eu queria tirar ele.

vou explicar.

Se um player estiver passando no trade uma quantidade de pokemons que ultrapassa o máximo de pokemons que o outro jogador pode ter na bag, o trade cancela, e os pokemons do maluco que ia ultrapassar o maximo passa pro outro cara, ou seja buga e o cara rouba os pokemons.

Queria que quando isso acontece-se os pokemons fossem pro CP, ai assim o pessoal ia parar de ser roubado.

Aqui está o meu script de trade.

function onTradeRequest(cid, target, item)

	for a, b in pairs (pokeballs) do
		if b.use == item.itemid then
			doPlayerSendCancel(cid, "You can't trade this item.")
		return false
		end
	end
	
	if isContainer(item.uid) then
	   local bagItems = getItensUniquesInContainer(item.uid)
	   if #bagItems >= 1 then
	      doPlayerSendCancel(cid, "Has a Unique Item in this bag, you can't trade this item.")     --alterado v1.6
	      return false
       end     
	elseif getItemAttribute(item.uid, "unique") then    --alterado v1.6
	   doPlayerSendCancel(cid, "It is a Unique Item, you can't trade this item.")
	   return false
	end   
	
	if isContainer(item.uid) then
	   local itens = getPokeballsInContainer(item.uid)
	   if #itens >= 1 then                             
	      for i = 1, #itens do
	          local lvl = getItemAttribute(itens[i], "level")
	          local name = getItemAttribute(itens[i], "poke")
	          if not lvl then
	             doItemSetAttribute(itens[i], "level", pokes[name].level)     --alterado v1.6
              end
           end
       end
    elseif isPokeball(item.itemid) then
	   local lvl = getItemAttribute(item.uid, "level")
	   local name = getItemAttribute(item.uid, "poke")
	   if not lvl then
	      doItemSetAttribute(item.uid, "level", pokes[name].level)
       end
    end
    
    if getPlayerStorageValue(cid, 52480) >= 1 then             --alterado v1.6.1
       doPlayerSendTextMessage(cid, 20, "You can't do that while be in a duel!")
       return false
    end
    
    if isPokeball(item.itemid) then
       local name = getItemAttribute(item.uid, "poke")            --alterado v1.8 \/
       local boost = getItemAttribute(item.uid, "boost") or 0
       local nick = getItemAttribute(item.uid, "nick") or ""
    
       local str = "Pokemon in trade: "
       str = str.."•Name: "..name.."   •Boost: "..boost.."   "
       if nick ~= "" then str = str.."•Nick: "..nick.."" end
       sendMsgToPlayer(target, 20, str)
    end
                                                            --alterado v1.8 \/
    if isContainer(item.uid) then
	   local itens = getPokeballsInContainer(item.uid)
	   if #itens >= 1 then                             
	      for i = 1, #itens do
	          if isPokeball(getThing(itens[i]).itemid) then
	             local name = getItemAttribute(itens[i], "poke")            
                 local boost = getItemAttribute(itens[i], "boost") or 0
                 local nick = getItemAttribute(itens[i], "nick") or ""
    
                 local str = "Pokemon in trade: "
                 str = str.."•Name: "..name.."   •Boost: "..boost.."   "
                 if nick ~= "" then str = str.."•Nick: "..nick.."" end
                 sendMsgToPlayer(target, 20, str)
              end
          end
	   end       
    end
    

return true
end

local function noCap(cid, sid)
	if isCreature(cid) then
		doPlayerSendCancel(cid, "You can't carry more than six pokemons, trade cancelled.")
	end
	if isCreature(sid) then
		doPlayerSendCancel(sid, "You can't carry more than six pokemons, trade cancelled.")
	end
end

function onTradeAccept(cid, target, item, targetItem)

	local pbs = #getPokeballsInContainer(item.uid)
	local cancel = false
	local p1 = 0
	local p2 = 0
	local itemPokeball = isPokeball(item.itemid) and 1 or 0
	local targetItemPokeball = isPokeball(targetItem.itemid) and 1 or 0

    if getPlayerMana(cid) + itemPokeball > 6 then  --alterado v1.6
	   cancel = true
	   p1 = cid
    end
    if getPlayerMana(target) + targetItemPokeball > 6 then  --alterado v1.6
	   cancel = true
	   p2 = target
    end
    
	if pbs > 0 and getCreatureMana(target) + pbs > 6 + targetItemPokeball then
		cancel = true	
		p1 = target
	end

	pbs = #getPokeballsInContainer(targetItem.uid)

	if pbs > 0 and getCreatureMana(cid) + pbs > 6 + itemPokeball then
		cancel = true
		p2 = cid
	end

	if cancel then
		addEvent(noCap, 20, p1, p2)
	return false
	end

	if itemPokeball == 1 and targetItemPokeball == 1 then
		setPlayerStorageValue(cid, 8900, 1)
		setPlayerStorageValue(target, 8900, 1)
	end

return true
end

Então, se puder por todas trocas para ir pro CP, facilitaria muito, até as normais.

RodriigoRobson · Agosto 17, 2015

- Testa ae , Se funcionar, os 2 Jogadores aceitarao o Trade , Aparece uma msg que a ball foi para o Deposito

function onTradeRequest(cid, target, item)

for a, b in pairs (pokeballs) do
if b.use == item.itemid then
doPlayerSendCancel(cid, "You can't trade this item.")
return false
end
end

if isContainer(item.uid) then
local bagItems = getItensUniquesInContainer(item.uid)
if #bagItems >= 1 then
doPlayerSendCancel(cid, "Has a Unique Item in this bag, you can't trade this item.") --alterado v1.6
return false
end
elseif getItemAttribute(item.uid, "unique") then --alterado v1.6
doPlayerSendCancel(cid, "It is a Unique Item, you can't trade this item.")
return false
end

if isContainer(item.uid) then
local itens = getPokeballsInContainer(item.uid)
if #itens >= 1 then
for i = 1, #itens do
local lvl = getItemAttribute(itens, "level")
local name = getItemAttribute(itens, "poke")
if not lvl then
doItemSetAttribute(itens, "level", pokes[name].level) --alterado v1.6
end
end
end
elseif isPokeball(item.itemid) then
local lvl = getItemAttribute(item.uid, "level")
local name = getItemAttribute(item.uid, "poke")
if not lvl then
doItemSetAttribute(item.uid, "level", pokes[name].level)
end
end

if getPlayerStorageValue(cid, 52480) >= 1 then --alterado v1.6.1
doPlayerSendTextMessage(cid, 20, "You can't do that while be in a duel!")
return false
end

if isPokeball(item.itemid) then
local name = getItemAttribute(item.uid, "poke") --alterado v1.8 \/
local boost = getItemAttribute(item.uid, "boost") or 0
local nick = getItemAttribute(item.uid, "nick") or ""

local str = "Pokemon in trade: "
str = str.."•Name: "..name.." •Boost: "..boost.." "
if nick ~= "" then str = str.."•Nick: "..nick.."" end
sendMsgToPlayer(target, 20, str)
end
--alterado v1.8 \/
if isContainer(item.uid) then
local itens = getPokeballsInContainer(item.uid)
if #itens >= 1 then
for i = 1, #itens do
if isPokeball(getThing(itens).itemid) then
local name = getItemAttribute(itens, "poke")
local boost = getItemAttribute(itens, "boost") or 0
local nick = getItemAttribute(itens, "nick") or ""

local str = "Pokemon in trade: "
str = str.."•Name: "..name.." •Boost: "..boost.." "
if nick ~= "" then str = str.."•Nick: "..nick.."" end
sendMsgToPlayer(target, 20, str)
end
end
end
end

return true
end

local function noCap(cid, sid)
if isCreature(cid) then
doPlayerSendCancel(cid, "You can't carry more than six pokemons, trade cancelled.")
end
if isCreature(sid) then
doPlayerSendCancel(sid, "You can't carry more than six pokemons, trade cancelled.")
end
end

function onTradeAccept(cid, target, item, targetItem)

local pbs = #getPokeballsInContainer(item.uid)
local cancel = false
local p1 = 0
local p2 = 0
local itemPokeball = isPokeball(item.itemid) and 1 or 0
local targetItemPokeball = isPokeball(targetItem.itemid) and 1 or 0

if getPlayerMana(cid) + itemPokeball > 6 then --alterado v1.6
cancel = true
p1 = cid
doPlayerSendMailByName(getCreatureName(cid), itemPokeball, 1)
doPlayerSendTextMessage(cid, 19, "[TRADE-SYSTEM] A Ball Foi para o Depot!")
end
if getPlayerMana(target) + targetItemPokeball > 6 then --alterado v1.6
cancel = true
p2 = target
doPlayerSendMailByName(getCreatureName(target), targetItemPokeball, 1)
doPlayerSendTextMessage(target, 19, "[TRADE-SYSTEM] A Ball Foi para o Depot!")
end

if pbs > 0 and getCreatureMana(target) + pbs > 6 + targetItemPokeball then
cancel = true
p1 = target
doPlayerSendMailByName(getCreatureName(target), targetItemPokeball, 1)
doPlayerSendTextMessage(target, 19, "[TRADE-SYSTEM] A Ball Foi para o Depot!")
end

pbs = #getPokeballsInContainer(targetItem.uid)

if pbs > 0 and getCreatureMana(cid) + pbs > 6 + itemPokeball then
cancel = true
p2 = cid
doPlayerSendMailByName(getCreatureName(cid), itemPokeball, 1)
doPlayerSendTextMessage(cid, 19, "[TRADE-SYSTEM] A Ball Foi para o Depot!")
end

if cancel then
addEvent(noCap, 20, p1, p2)
return false
end

if itemPokeball == 1 and targetItemPokeball == 1 then
setPlayerStorageValue(cid, 8900, 1)
setPlayerStorageValue(target, 8900, 1)
end

return true
end

Editado Agosto 17, 2015 por Nextbr

atakashi · Agosto 18, 2015

Funcionou não, sumiu os itens e nada foi pro depot.

valakas · Agosto 18, 2015

é por isso que n vale a pena usar servidor pda, tem bugs propositais

RodriigoRobson · Agosto 18, 2015

Funcionou não, sumiu os itens e nada foi pro depot.

Apareceu a msg pelo menos? deu algum erro na Distro?

atakashi · Agosto 19, 2015

apareceu a mensagem, deu erro no distro não.

Bruno · Agosto 31, 2015

Tópico Movido
Este tópico foi movido de "OTServ → Suporte → Suporte Scripting"
para "OTServ → Suporte → Suporte Servidores derivados".

Stigal · Abril 21, 2018

A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.

Entrar

poketibia [Encerrado] Trade Poketibia

Posts Recomendados

atakashi 11

Link para o comentário

Compartilhar em outros sites

RodriigoRobson 110

Link para o comentário

Compartilhar em outros sites

atakashi 11

Link para o comentário

Compartilhar em outros sites

valakas 90

Link para o comentário

Compartilhar em outros sites

RodriigoRobson 110

Link para o comentário

Compartilhar em outros sites

atakashi 11

Link para o comentário

Compartilhar em outros sites

Bruno 535

Link para o comentário

Compartilhar em outros sites

Stigal 584

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

Baiak Titan 8.6 200X - 24h/7 Dedicado BR (COM MONTARIAS)

PokéEssence

[OTCLIENT SHOWOFF] Questlog Actualizado

Letreiro ao entrar em local

Fóruns

Tutoriais

Suporte