Ajuda Com Pokedex Box

[ZeNit91 11]

Tipo do script: LUA

Protocolo (versão do Tibia): 5.54

Servidor utilizado: tfs 0.3.6

Nível de experiência: medio

Adicionais/Informações: Altera o modo de visualizacao da pokedex.

 

Galera estou sofrendo aki, Gostaria de mudar o estilo que as informascoes aparecem quando voce dar dex em um pokemon de:

 

 

Para:

 

 

Os codigos da minha poke dex

 

Pokedex (action)

local rate = 4
function onUse(cid, item, fromPos, item2, toPos)

if not isCreature(item2.uid) then
return true
end
local poke = getCreatureName(item2.uid)
if isMonster(item2.uid) then
local this = newpokedex[getCreatureName(item2.uid)]
local leveltable = getPokemonExperienceTable(getCreatureName(item2.uid))
local myball = 0
 if isSummon(item2.uid) then
 myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
 end
 if not getPlayerInfoAboutPokemon(cid, poke).dex then
  local exp = this.level * rate
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked "..getCreatureName(item2.uid).." in your pokedex!")
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")
  doSendMagicEffect(getThingPos(cid), 210)
  doPlayerAddExperience(cid, exp)
  doAddPokemonInDexList(cid, poke)
 else
  doShowPokedexRegistration(cid, item2, myball, leveltable)
 end
return true
end
if not isPlayer(item2.uid) then return true end
local unlock = 0
for i = 1, #oldpokedex do
 if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[i][1]).dex then
 unlock = unlock + 1
 end
end
local str = ""
local lnl = 0
local poks = ""
local player = getRecorderPlayer(toPos, cid)

for x = 1001, 1251 do
 local y = tonumber(x - 1000)
 if getPlayerInfoAboutPokemon(player, oldpokedex[y][1]).dex then
  if isPokemonInOwnList(player, oldpokedex[y][1]) then
str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1].."   (•)"
lnl = lnl + 1
  else
str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1]..""
  end
 else
  str = str.."\n["..threeNumbers(y).."] -  ?"
 end
end
if cid == player then
 doPlayerSendTextMessage(cid, 27, "You can open a pokedex entry by typing \"/dex <name>\". Example: \"/dex Pikachu\".")
 str = "Pokédex Information:\n\n- Unlocked pokémon species: "..unlock.."\n- Pokémon species that you own: "..lnl.."\n\n(•) means that you have already used that pokémon species.\n\nPokémon Database:\n"..str..""
  if string.len(str) <= 8192 then
doShowTextDialog(cid, 2382, str)
  end
else
 doPlayerSendTextMessage(cid, 27, getPlayerName(player).." has unlocked "..unlock.."/251 pokémons already, and has captured "..lnl.." pokemons until now.")
end
return true
end

 

Pokedex System (lib)

local skills = specialabilities
function doAddPokemonInDexList(cid, poke)
if getPlayerInfoAboutPokemon(cid, poke).dex then return true end
local a = newpokedex[poke]
local b = getPlayerStorageValue(cid, a.storage)
setPlayerStorageValue(cid, a.storage, b.." dex,")
end
function getPokemonEvolutionDescription(name, blank)
local kev = poevo[name]
local stt = ""
local sss = "  "--blank and "	  " or "  "
if isInArray(specialevo, name) then
 if name == "Poliwhirl" then
  stt = stt.."\n"..sss.."~ Evolves to Poliwrath starting at\n	"..sss.."level 36."
  stt = stt.."\n"..sss.."~ Evolves to Politoed using\n	"..sss.."a water stone and a king's rock."
 elseif name == "Gloom" then
  stt = stt.."\n"..sss.."~ Evolves to Vileplume using\n	"..sss.."a leaf stone and a venom stone."
  stt = stt.."\n"..sss.."~ Evolves to Bellosom using\n	"..sss.."a leaf stone and a sun stone."
 elseif name == "Slowpoke" then
  stt = stt.."\n"..sss.."~ Evolves to Slowbro starting at\n	"..sss.."level 28."
  stt = stt.."\n"..sss.."~ Evolves to Slowking using\n	"..sss.."a king's rock."
 elseif name == "Tyrogue" then
  stt = stt.."\n"..sss.."• Evolves starting at level 20 to:"
  stt = stt.."\n"..sss.."	 ~ Hitmonlee if offense is higher\n"..sss.."		 than defense."
  stt = stt.."\n"..sss.."	 ~ Hitmonchan if defense is higher\n"..sss.."		 than offense."
  stt = stt.."\n"..sss.."	 ~ Hitmontop if defense is equal to\n"..sss.."		 offense."
 elseif name == "Eevee" then
  stt = stt.."\n"..sss.."~ Evolves to Flareon using\n	"..sss.."a fire stone."
  stt = stt.."\n"..sss.."~ Evolves to Vaporeon using\n	"..sss.."a water stone."
  stt = stt.."\n"..sss.."~ Evolves to Jolteon using\n	"..sss.."a thunder stone."
  stt = stt.."\n"..sss.."~ Evolves to Espeon when\n	"..sss.."leveled up very happy during\n	"..sss.."daytime."
  stt = stt.."\n"..sss.."~ Evolves to Umbreon when\n	"..sss.."leveled up very happy during\n	"..sss.."nighttime."
 end
elseif kev then
 stt = stt.."\n"..sss.."• Evolves to "..kev.evolution..""
 if kev.level >= 7 then
  stt = stt.." starting at\n   "..sss.."level "..kev.level.."."
 elseif kev.count >= 1 then
  stt = stt.." using\n"
  local id = tonumber(kev.stoneid)
  local id2 = tonumber(kev.stoneid2)
  if id > 1 then
local info = getItemInfo(id)
local a = kev.count == 1 and info.article or kev.count
local s = kev.count == 1 and "" or "s"
stt = stt.."   "..sss..""..a.." "..info.name..""..s..""
  end
  if id2 > 1 then
local info2 = getItemInfo(id2)
local b = kev.count == 1 and info2.article or kev.count
stt = stt.." and "..b.." "..info2.name..""
  end
  stt = stt.."."
 else
  stt = stt.." when it\n   "..sss.."levels up very happy."
 end
 stt = stt..""..getPokemonEvolutionDescription(kev.evolution, true)..""
elseif not blank then
 stt = stt.."\n   It doesn't evolve."
end
return stt
end
local skillcheck = {"fly", "ride", "surf", "teleport", "rock smash", "cut", "dig", "light", "blink", "ghostwalk"}
local skilldescr = {
["fly"] = "   • Fly:\n	 #You can mount this pokemon and fly with it to reach other places through the sky (use order on yourself)",
["ghostwalk"] = "   • Ghost Walk:\n	 #This pokemon can walk through walls and unpassable terrain. This pokemon is also invulnerable to physical attacks.",
["ride"] = "   • Ride:\n	 #You can mount this pokemon to move faster on land (use order on yourself)",
["rock smash"] = "   • Rock Smash:\n	 #This pokemon is able to break smashable rocks (use order on the rock)",
["cut"] = "   • Cut:\n	 #This pokemon is able to cut cuttable bushes (use order on the bush)",
["dig"] = "   • Dig:\n	 #This pokemon is able to dig holes and make them exploitable (use order on a closed hole)",
["light"] = "   • Flash:\n	 #This pokemon is able to illuminate a place (use order on the pokemon)",
["blink"] = "   • Blink:\n	 #This pokemon can teleport itself to another place (use order on the desired place)",
["teleport"] = "   • Teleport:\n	 #This pokemon can teleport itself and it's trainer to another city (type either h\" or /h)",
["surf"] = "   • Surf:\n	 #You can mount this pokemon and swim with it (just walk on the water)",
}
local function doCheckMoveTarget(table)
if not table then return true end
if table.target == 1 then
 return "Yes ("..table.dist.. " max. range)."
else
 return "No."
end
end
local function getMoveDexDescr(name, number)
local x = movestable[name]
local y = {}
local z = "\n"
if number == 1 and x.move1 then
 y = x.move1
 z = ""
elseif number == 2 and x.move2 then
 y = x.move2
elseif number == 3 and x.move3 then
 y = x.move3
elseif number == 4 and x.move4 then
 y = x.move4
elseif number == 5 and x.move5 then
 y = x.move5
elseif number == 6 and x.move6 then
 y = x.move6
elseif number == 7 and x.move7 then
 y = x.move7
elseif number == 8 and x.move8 then
 y = x.move8
elseif number == 9 and x.move9 then
 y = x.move9
elseif number == 10 and x.move10 then
 y = x.move10
elseif number == 11 and x.move11 then
 y = x.move11
elseif number == 12 and x.move12 then
 y = x.move12
elseif number == 13 and x.move13 then
 y = x.move13
elseif number == 14 and x.move14 then
 y = x.move14
elseif number == 15 and x.move15 then
 y = x.move15
else
 return ""
end
if not movesinfo[y.name] then
print(""..y.name.." faltando")
return "unknown error"
end
local txt = ""..z.."\n  • "..y.name.." (move "..number.." / m"..number.."):\n #Required level: "..y.level.."\n	 #Type: "..movesinfo[y.name].t.."\n	  #Cooldown: "..y.cd.." seconds.\n	  #Needs target: "..doCheckMoveTarget(y)..""
return txt
end
--#Required level: "..y.level.."\n	
function doShowPokedexRegistration(cid, pokemon, ball, table)
 local item2 = pokemon
 local virtual = false
  if type(pokemon) == "string" then
virtual = true
  end
 local myball = ball
 local name = virtual and pokemon or getCreatureName(item2.uid)
 local leveltable = table
  local v = fotos[name]
  local stt = ""
  stt = "-General:\n  It's named "..name.." "
  if pokes[name].type2 and pokes[name].type2 ~= "no type" then
stt = stt.."("..pokes[name].type.."/"..pokes[name].type2..")."
  else
stt = stt.."("..pokes[name].type..")."
  end
  if virtual then
stt = stt.."\n"
  else
if isSummon(item2.uid) then
 stt = stt.."\n  It belongs to "..getCreatureName(getCreatureMaster(item2.uid)).."."
 if getItemAttribute(myball.uid, "nick") then
  stt = stt.."\n  It's nickname is: "..getItemAttribute(myball.uid, "nick").."."
 end
end
stt = stt.."\n\n-Status:\n"
stt = stt.."  • Level: "..getLevel(item2.uid)..""
if isSummon(item2.uid) then
 local boost = getItemAttribute(myball.uid, "boost")
 if boost then
  stt = stt.." +"..boost.."\n"
 else
  stt = stt.."\n"
 end
 local boff = getItemAttribute(myball.uid, "boffense") and " + "..math.floor(getItemAttribute(myball.uid, "boffense")).." trans. bonus" or ""
 local bdef = getItemAttribute(myball.uid, "bdefense") and " + "..math.floor(getItemAttribute(myball.uid, "bdefense")).." trans. bonus" or ""
 local bagi = getItemAttribute(myball.uid, "bagility") and " + "..math.floor(getItemAttribute(myball.uid, "bagility")).." trans. bonus" or ""
 local bspa = getItemAttribute(myball.uid, "bsattack") and " + "..math.floor(getItemAttribute(myball.uid, "bsattack")).." trans. bonus" or ""
 stt = stt.."  • Vitality: "..math.floor(getItemAttribute(myball.uid, "vitality")).."\n"
 stt = stt.."  • Offense: "..math.floor(getItemAttribute(myball.uid, "offense"))..""..boff.."\n"
 stt = stt.."  • Defense: "..math.floor(getItemAttribute(myball.uid, "defense"))..""..bdef.."\n"
 stt = stt.."  • Spc. Atk.: "..math.floor(getItemAttribute(myball.uid, "specialattack"))..""..bspa.."\n"
 stt = stt.."  • Agility: "..math.floor(getItemAttribute(myball.uid, "speed"))..""..bagi.."\n"
 stt = stt.." • Critical: "..doMathDecimal(getPokemonCritical(item2.uid)).."%\n"

else
 stt = stt.."\n"
 stt = stt.."  • Vitality: "..getVitality(item2.uid).."\n"
 stt = stt.."  • Offense: "..getOffense(item2.uid).."\n"
 stt = stt.."  • Defense: "..getDefense(item2.uid).."\n"
 stt = stt.."  • Spc. Atk.: "..getSpecialAttack(item2.uid).."\n"
 stt = stt.."  • Agility: "..getSpeed(item2.uid).."\n"
end
if isSummon(item2.uid) then
 local myexp = getItemAttribute(myball.uid, "exp")
 local nlexp = getItemAttribute(myball.uid, "nextlevelexp")
 local expdesselevel = myexp - leveltable[getLevel(item2.uid)]
 local faltadesselevel = myexp + nlexp - leveltable[getItemAttribute(myball.uid, "level")]
 local percent = math.floor(expdesselevel / faltadesselevel * 100)
 if getPokemonLevel(item2.uid) == 100 then
  stt = stt.."  • Experience: "..leveltable[100].." (max)\n"
 else
  local exptext = ""..myexp.." / "..(myexp + nlexp).." ("..percent.."%)"
  local art = "Experience"
  if string.len(exptext) > 22 then
   art = "Exp."
  end
  stt = stt.."  • "..art..": "..exptext.."\n"
  stt = stt.."  • Exp. to level up: "..getItemAttribute(getPlayerSlotItem(getCreatureMaster(item2.uid), 8).uid, "nextlevelexp").."\n"
 end
end
  end
  stt = stt.."\n-Evolutions:"
stt = stt..""..getPokemonEvolutionDescription(name).."\n"
  stt = stt.."\n-Moves and attacks:"
  if name == "Ditto" then
if virtual then
 stt = stt.."\n   It doesn't use any moves until\n   transformed."
elseif getPlayerStorageValue(item2.uid, 1010) == "Ditto" then
 stt = stt.."\n   It doesn't use any moves until\n   transformed."
else
 for a = 1, 15 do
  stt = stt..""..getMoveDexDescr(getPlayerStorageValue(item2.uid, 1010), a)..""
  end
end
  else
for a = 1, 15 do
 stt = stt..""..getMoveDexDescr(name, a)..""
 end
  end
  local totalab = 0
  local abtexts = ""
  local skipline = ""
  for b = 1, #skillcheck do
if isInArray(skills[skillcheck[b]], name) then
 abtexts = abtexts..""..skipline..""..skilldescr[skillcheck[b]]..""
 totalab = totalab + 1
 skipline = "\n \n"
end
  end
  if totalab == 0 then
if name == "Ditto" then
 stt = stt.."\n\n-Special abilities:\n   • Transform:\n	 #Ditto can transform into any other species of pokémon for 2 minutes with 40 seconds cooldown (use order on any pokemon)"
else
 stt = stt.."\n\n-Special abilities:\n	none."
end
  else
stt = stt.."\n\n-Special abilities:\n"..abtexts..""
  end

 if string.len(stt) > 8192 then
  print("Error while making pokedex info with pokemon named "..name..".\n   Pokedex registration has more than 8192 letters (it has "..string.len(stt).." letters), it has been blocked to prevent fatal error.")
  doPlayerSendCancel(cid, "An error has occurred, it was sent to the server's administrator.")
 return true
 end
 doShowTextDialog(cid, v, stt)
end

 

Darei 1 semana de REP

[lailton 0]

Modo antigo melhor xD

[ZeNit91 11]

@Lailton

vc sabe como mudar ?

[lailton 0]

Sim,

 

Você tera que alterar o pokedex.lua ( ou arquivo da sua dex no meu caso é esse fica dentro da pasta data/actions/script).

 

( Caso vc nao seja pokedex.lua, vc pode verificar o arquivo da seguinte forma, abra o arquivo data/actions/actions.xml e verifique isso:

<action itemid="2376" event="script" value="pokedex.lua" allowfaruse="1" blockwalls="1"/> )

 

e na linha que tem:

doShowTextDialog(cid, 100, cDex )

 

vc tera que altera para:

doPlayerPopupFYI( cid, cDex )

 

Onde cDex é a variavel com as informacoes do poke.

 

Basicamente seria isso, você tera que mexer em algo mais claro, mais o esquema é esse.

 

Espero ter ajudado.

Boa sorte.

[ZeNit91 11]

@Laiton

Estou com o seguinte erro no console.

 

[20/03/2012 12:26:30] [Error - Action Interface]

[20/03/2012 12:26:30] data/actions/scripts/pokedex.lua:onUse

[20/03/2012 12:26:30] Description:

[20/03/2012 12:26:30] (luaDoPlayerPopupFYI) Player not found

 

isso corre quando dou dex no pokemon rsrs

[lailton 0]

Poste seu pokedex.lua aqui para poder analisar xD

[ZeNit91 11]

Ta ae esse e minha pokedex

local rate = 4
function onUse(cid, item, fromPos, item2, toPos)

if not isCreature(item2.uid) then
return true
end
local poke = getCreatureName(item2.uid)
if isMonster(item2.uid) then
local this = newpokedex[getCreatureName(item2.uid)]
local leveltable = getPokemonExperienceTable(getCreatureName(item2.uid))
local myball = 0
 if isSummon(item2.uid) then
 myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
 end
 if not getPlayerInfoAboutPokemon(cid, poke).dex then
  local exp = this.level * rate
		    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked "..getCreatureName(item2.uid).." in your pokedex!")
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")
  doSendMagicEffect(getThingPos(cid), 210)
  doPlayerAddExperience(cid, exp)
  doAddPokemonInDexList(cid, poke)
 else
  doShowPokedexRegistration(cid, item2, myball, leveltable)
 end
return true
end
if not isPlayer(item2.uid) then return true end
local unlock = 0
for i = 1, #oldpokedex do
 if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[i][1]).dex then
 unlock = unlock + 1
 end
end
local str = ""
local lnl = 0
local poks = ""
local player = getRecorderPlayer(toPos, cid)

for x = 1001, 1251 do
 local y = tonumber(x - 1000)
 if getPlayerInfoAboutPokemon(player, oldpokedex[y][1]).dex then
  if isPokemonInOwnList(player, oldpokedex[y][1]) then
   str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1].."   (•)"
   lnl = lnl + 1
  else
   str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1]..""
  end
 else
  str = str.."\n["..threeNumbers(y).."] -  ?"
 end
end
if cid == player then
 doPlayerSendTextMessage(cid, 27, "You can open a pokedex entry by typing \"/dex <name>\". Example: \"/dex Pikachu\".")
 str = "Pokédex Information:\n\n- Unlocked pokémon species: "..unlock.."\n- Pokémon species that you own: "..lnl.."\n\n(•) means that you have already used that pokémon species.\n\nPokémon Database:\n"..str..""
  if string.len(str) <= 8192 then
   doShowTextDialog(cid, 2382, str)
  end
else
 doPlayerSendTextMessage(cid, 27, getPlayerName(player).." has unlocked "..unlock.."/251 pokémons already, and has captured "..lnl.." pokemons until now.")
end
return true
end

[lailton 0]

Tente assim:

local rate = 4
function onUse(cid, item, fromPos, item2, toPos)
if not isCreature(item2.uid) then
return true
end
local poke = getCreatureName(item2.uid)
if isMonster(item2.uid) then
local this = newpokedex[getCreatureName(item2.uid)]
local leveltable = getPokemonExperienceTable(getCreatureName(item2.uid))
local myball = 0
 if isSummon(item2.uid) then
 myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
 end
 if not getPlayerInfoAboutPokemon(cid, poke).dex then
  local exp = this.level * rate
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked "..getCreatureName(item2.uid).." in your pokedex!")
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")
  doSendMagicEffect(getThingPos(cid), 210)
  doPlayerAddExperience(cid, exp)
  doAddPokemonInDexList(cid, poke)
 else
  doShowPokedexRegistration(cid, item2, myball, leveltable)
 end
return true
end
if not isPlayer(item2.uid) then return true end
local unlock = 0
for i = 1, #oldpokedex do
 if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[i][1]).dex then
 unlock = unlock + 1
 end
end
local str = ""
local lnl = 0
local poks = ""
local player = getRecorderPlayer(toPos, cid)
for x = 1001, 1251 do
 local y = tonumber(x - 1000)
 if getPlayerInfoAboutPokemon(player, oldpokedex[y][1]).dex then
  if isPokemonInOwnList(player, oldpokedex[y][1]) then
   str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1].."   (•)"
   lnl = lnl + 1
  else
   str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1]..""
  end
 else
  str = str.."\n["..threeNumbers(y).."] -  ?"
 end
end
if cid == player then
 doPlayerSendTextMessage(cid, 27, "You can open a pokedex entry by typing \"/dex <name>\". Example: \"/dex Pikachu\".")
 str = "Pokédex Information:\n\n- Unlocked pokémon species: "..unlock.."\n- Pokémon species that you own: "..lnl.."\n\n(•) means that you have already used that pokémon species.\n\nPokémon Database:\n"..str..""
  if string.len(str) <= 8192 then
--    doShowTextDialog(cid, 2382, str)
   doPlayerPopupFYI(cid, str)
  end
else
 doPlayerSendTextMessage(cid, 27, getPlayerName(player).." has unlocked "..unlock.."/251 pokémons already, and has captured "..lnl.." pokemons until now.")
end
return true
end

[ZeNit91 11]

Tente assim:

local rate = 4
function onUse(cid, item, fromPos, item2, toPos)
if not isCreature(item2.uid) then
return true
end
local poke = getCreatureName(item2.uid)
if isMonster(item2.uid) then
local this = newpokedex[getCreatureName(item2.uid)]
local leveltable = getPokemonExperienceTable(getCreatureName(item2.uid))
local myball = 0
 if isSummon(item2.uid) then
 myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
 end
 if not getPlayerInfoAboutPokemon(cid, poke).dex then
  local exp = this.level * rate
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have unlocked "..getCreatureName(item2.uid).." in your pokedex!")
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have gained "..exp.." experience points.")
  doSendMagicEffect(getThingPos(cid), 210)
  doPlayerAddExperience(cid, exp)
  doAddPokemonInDexList(cid, poke)
 else
  doShowPokedexRegistration(cid, item2, myball, leveltable)
 end
return true
end
if not isPlayer(item2.uid) then return true end
local unlock = 0
for i = 1, #oldpokedex do
 if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[i][1]).dex then
 unlock = unlock + 1
 end
end
local str = ""
local lnl = 0
local poks = ""
local player = getRecorderPlayer(toPos, cid)
for x = 1001, 1251 do
 local y = tonumber(x - 1000)
 if getPlayerInfoAboutPokemon(player, oldpokedex[y][1]).dex then
  if isPokemonInOwnList(player, oldpokedex[y][1]) then
str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1].."   (•)"
lnl = lnl + 1
  else
str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1]..""
  end
 else
  str = str.."\n["..threeNumbers(y).."] -  ?"
 end
end
if cid == player then
 doPlayerSendTextMessage(cid, 27, "You can open a pokedex entry by typing \"/dex <name>\". Example: \"/dex Pikachu\".")
 str = "Pokédex Information:\n\n- Unlocked pokémon species: "..unlock.."\n- Pokémon species that you own: "..lnl.."\n\n(•) means that you have already used that pokémon species.\n\nPokémon Database:\n"..str..""
  if string.len(str) <= 8192 then
--	doShowTextDialog(cid, 2382, str)
doPlayerPopupFYI(cid, str)
  end
else
 doPlayerSendTextMessage(cid, 27, getPlayerName(player).." has unlocked "..unlock.."/251 pokémons already, and has captured "..lnl.." pokemons until now.")
end
return true
end

 

Cara nao mudo nada =(. literalmente nada,