Não tem como te ajudar sem o arquivo pokedex.lua, de data/actions/scripts. Se possível, poste-o aqui concluirmos qual é, exatamente, o motivo do erro.

local function checkDex(cid)

local unlock = 0

for i = 1, #oldpokedex do

if getPlayerInfoAboutPokemon(cid, oldpokedex[1]).dex then

  unlock = unlock + 1

end

end

return unlock

end

 

local rate = 50

local rewards = {

[10] = {{2160, 1}, {11638, 1}, {12344, 5}},

[20] = {{2160, 1}, {11638, 1}, {12344, 5}},

[30] = {{2160, 1}, {11638, 1}, {12344, 5}},

[40] = {{2160, 1}, {11639, 1}, {12344, 10}},

[50] = {{2160, 2}, {11639, 1}, {12344, 10}},

[60] = {{2160, 2}, {11639, 1}, {12344, 15}},

[70] = {{2160, 2}, {11640, 1}, {12344, 15}},

[80] = {{2160, 2}, {11640, 1}, {12344, 20}},

[90] = {{2160, 3}, {11640, 1}, {12344, 20}},

[100] = {{2160, 3}, {11640, 1}, {12344, 25}},

[120] = {{2160, 3}, {11640, 1}, {12344, 30}},

[150] = {{2160, 3}, {11641, 1}, {12344, 30}},

[180] = {{2160, 3}, {11641, 1}, {12344, 30}},

[210] = {{2160, 5}, {11641, 1}, {12344, 30}},

[250] = {{2160, 5}, {11641, 1}, {12344, 30}},

}

local sto = 63999

 

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

       end

       local list = checkDex(cid)

       local r = rewards

      -- print("List: "..list)

  --sendMsgToPlayer(cid, 27, "Parabéns, você tem "..list.." pokeDex!")

       if r and getPlayerStorageValue(cid, sto) < list then

       for _, TABLE in ipairs® do

         doPlayerAddItem(cid, TABLE[1], TABLE[2])

       sendMsgToPlayer(cid, 27, "Voce ganhou "..TABLE[2].." ".. getItemNameById(TABLE[1]).."!")

          end

          setPlayerStorageValue(cid, sto, list)

 

       end

return true

end

 

if not isPlayer(item2.uid) then return true end

 

local kanto = 0

local johto = 0

                                    --alterado v1.7 \/\/

for i = 1, #oldpokedex do

if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[1]).dex then

  if i <= 151 then

              kanto = kanto+1

           elseif i >= 209 then

              johto = johto+1

           end

end

end                                                      --alterado v1.6

 

local player = getRecorderPlayer(toPos, cid)

 

if cid == player then

   doPlayerSendTextMessage(cid, 27, "You has unlocked "..kanto.." kanto's and "..johto.." johto's pokémons until now.") 

        doPlayerSetVocation(cid, 9) --alterado v1.6

        openChannelDialog(cid)

end

 

return true

end

Este erro ocorre com todos os pokémons?

Troque:

    for i = 1, #oldpokedex do
        if getPlayerInfoAboutPokemon(cid, oldpokedex[i][1]).dex then
            unlock = unlock + 1
        end
    end

por:

    for i = 1, #oldpokedex do
        if oldpokedex[i] and oldpokedex[i][1] and getPlayerInfoAboutPokemon(cid, oldpokedex[i][1]) and getPlayerInfoAboutPokemon(cid, oldpokedex[i][1]).dex then
            unlock = unlock + 1
        end
    end

e veja se o erro na distro persiste.

Editado Fevereiro 21, 2015 10 anos por zipter98 (veja o histórico de edições)

 

Este erro ocorre com todos os pokémons?

Troque:

    for i = 1, #oldpokedex do
        if getPlayerInfoAboutPokemon(cid, oldpokedex[i][1]).dex then
            unlock = unlock + 1
        end
    end

por:

    for i = 1, #oldpokedex do
        if oldpokedex[i] and oldpokedex[i][1] and getPlayerInfoAboutPokemon(cid, oldpokedex[i][1]) and getPlayerInfoAboutPokemon(cid, oldpokedex[i][1]).dex then
            unlock = unlock + 1
        end
    end

e veja se o erro na distro persiste.

 

Sim, continua. Mais houve melhora em alguns pokes. Não são em todos, apenas o da 3º geração e os Furious Pokemon

 

[21/02/2015 02:05:26] Error while executing function "getPlayerInfoAboutPokemon("GOD Trick, Seviper)", Seviper doesn't exist.

 

[21/02/2015 02:05:26] [Error - Action Interface] 

[21/02/2015 02:05:26] data/actions/scripts/pokedex.lua:onUse

[21/02/2015 02:05:26] Description: 

[21/02/2015 02:05:26] data/actions/scripts/pokedex.lua:45: attempt to index a boolean value

[21/02/2015 02:05:26] stack traceback:

[21/02/2015 02:05:26] data/actions/scripts/pokedex.lua:45: in function <data/actions/scripts/pokedex.lua:31>

Você provavelmente não configurou estes pokémons na tabela newpokedex, de configuration.lua. Esta é a causa do erro.

Valeu, REP+