[PokeTibia] Pequena duvida (URGENTEEE)

[johnbrasil86 0]

Fala galerinha, beleza?

Estou com um pequeno problema no meu pokeserver, nas pokeballs..

As Pokeballs e ultraball estão normais, tudo de boa..

Mas algumas estão com defeito, como a: Super Ball, Great Ball.. Dá para capturar os poke tranquilo, só que depois, os poke não sai dessas pokeballs.. =/ E pior que está configurado errado (pelo o meu saber)

Aqui está a parte dos scripts...

goback.lua

if item.itemid == 2222 or item.itemid == 2223 then

gobackeff = 10

elseif item.itemid == 2220 or item.itemid == 2221 then

gobackeff = 191

elseif item.itemid == 2651 or item.itemid == 2652 then

gobackeff = 189

elseif item.itemid == 2653 or item.itemid == 2654 then

gobackeff = 190

elseif item.itemid == 2655 or item.itemid == 2656 then

gobackeff = 195

end

local effect = gobackeff


if item.itemid == 2223 or item.itemid == 2221 then

catch.lua:

[/size][/font][/color]local description = "Contains a %pokename."


function onUse(cid, item, frompos, item2, topos)

if not item2.itemid then

return

end

local name = getItemNameById(item2.itemid)

if item.itemid == 2147 then		   -- POKEBALL

catchrate = 15

oncatch = 24

onfail = 23

bolabola = 2222

elseif item.itemid == 2642 then	   -- GREATBALL

catchrate = 20

oncatch = 198

onfail = 197

bolabola = 2651

elseif item.itemid == 2645 then	   -- SUPERBALL

catchrate = 25

oncatch = 202

onfail = 201

bolabola = 2653

elseif item.itemid == 2146 then		-- ULTRABALL

catchrate = 30

oncatch = 200

onfail = 199

bolabola = 2220

elseif item.itemid == 0 then		-- MEGABALL

catchrate = 15

oncatch = 0

onfail = 0

bolabola = 0

elseif item.itemid == 2644 then	  -- EXBALL(Saffari)

catchrate = 1000

oncatch = 204

onfail = 203

bolabola = 2655

end

local rate = (catchrate)

local catch = oncatch

local fail = onfail

local newid = bolabola

for i,x in pairs(pokes) do

if getItemNameById(item2.itemid):find(i:lower()) then

if getItemIdByName(name) == pokes[i].corpse then

if cid ~= getItemAttribute(item2.uid, "corpseowner") and isInArray({1,8}, getPlayerGroupId(cid)) then

doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")

return true


end[color=#000000][font=Verdana, Arial, sans-serif][size=3]

O que eu faço? =X

No aguardo, valeu!

Editado Novembro 30, 2011 por johnbrasil86 (veja o histórico de edições)

[joaohd 10]

O problema parece não estar aqui. Pode ser no seu goback. Por medidas de boas práticas de programação, tomei a liberdade de tornar seu código mais legível:

local description = "Contains a %pokename."

local config = {

[2147] = {

   catchrate = 15,

   oncatch = 24,

   onfail = 23,

   bolabola = 2222,

},

[2642] = {

   catchrate = 20,

   oncatch = 198,

   onfail = 197,

   bolabola = 2651,

},

[2645] = {

   catchrate = 25,

   oncatch = 202,

   onfail = 201,

   bolabola = 2653,

},

[2146] = {

   catchrate = 30,

   oncatch = 200,

   onfail = 199,

   bolabola = 2220,

},

[0] = {

   catchrate = 15,

   oncatch = 0,

   onfail = 0,

   bolabola = 0,

},

[2644] = {

   catchrate = 1000,

   oncatch = 204,

   onfail = 203,

   bolabola = 2655,

}

}

function onUse(cid, item, frompos, item2, topos)

if not item2.itemid then

  return

end

local name = getItemNameById(item2.itemid)

local rate = config[item.itemid].catchrate

local catch = config[item.itemid].oncatch

local fail = config[item.itemid].onfail

local newid = config[item.itemid].bolabola


for i,x in pairs(pokes) do

  if getItemNameById(item2.itemid):find(i:lower()) then

   if getItemIdByName(name) == pokes[i].corpse then

	if cid ~= getItemAttribute(item2.uid, "corpseowner") and isInArray({1,8}, getPlayerGroupId(cid)) then

	 doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")

	 return true

	end

   end

  end

end

return true

end

Editado Novembro 30, 2011 por joaohd (veja o histórico de edições)

[johnbrasil86 0]

Agradeço por ter facilitado mais o script, obrigadao mesmo.

Mas poxa, continuo com o mesmo problema, as pokeballs da pra capturar, mas eles não saem das pokeballs =/

Ai ai ai;;.;

[zFuzion 0]

Lembrando que não é apenas esses 2 scripts que tem que editar para o Pokémon sair da PB, a o script do 'Go/Back na pasta Creature Scripts' e o 'PokeLib na pasta Lib' !

[robinhux 0]

Prefiro jogar o original ;x

[luuuck 81]

Não consigo entender PokeTibia =( ja até tentei rsrs