Ir para conteúdo
TK News
  • Cadastre-se

Erro pokeexp.lua

Wolf Admin

Por ,
em Suporte Tibia OTServer

 Share Seguidores 0

Posts Recomendados

Wolf Admin

Wolf Admin 250

Postado
Postado

Alguem pode me ajudar a concertar esse erro, está causando muito lag no meu servidor :(

 

Erro:

 
[15/09/2014 14:28:30] [Error - CreatureScript Interface] 
[15/09/2014 14:28:30] data/creaturescripts/scripts/pokeexp.lua:onDeath
[15/09/2014 14:28:30] Description: 
[15/09/2014 14:28:30] (luaGetCreatureMaxHealth) Creature not found
 
Script:
 

 
local balls = {11826, 11828, 11829, 11831, 11832, 11834, 11835, 11837,
      11737, 11739, 11740, 11742, 11743, 11745, 11746, 11748}
                                                                                  
local function playerAddExp(cid, exp)
doPlayerAddExp(cid, exp)
doSendAnimatedText(getThingPos(cid), exp, 215)
end
 
local Exps = {
{minL = 1, maxL = 99, multipler = 1.6},
{minL = 100, maxL = 149, multipler = 1.4},
{minL = 150, maxL = 199, multipler = 1.2},
{minL = 200, maxL = 249, multipler = 1.0},
{minL = 250, maxL = 299, multipler = 0.9},
}
 
local function calculaExp(cid, expTotal)
if not isPlayer(cid) then return 0 end
   local expFinal = expTotal
   local flag = false
   for _, TABLE in pairs(Exps) do
          if getPlayerLevel(cid) >= TABLE.minL and getPlayerLevel(cid) <= TABLE.maxL then
                 flag = true
                 expFinal = expFinal * TABLE.multipler
                 break
          end
   end
   if not flag then expFinal = expFinal * 0.1 end --lvl 300+
return math.floor(expFinal)
end
 
local function giveExpToPlayer(pk, expTotal, givenexp, expstring)      --alterado v2.7
playerAddExp(pk, expTotal)    
 
local firstball = getPlayerSlotItem(pk, 8)
 
if not isInParty(pk) and firstball and getItemAttribute(firstball.uid,  expstring) and getItemAttribute(firstball.uid,  expstring) > 0 then
   local percent = getItemAttribute(firstball.uid, expstring) <= 1 and getItemAttribute(firstball.uid, expstring) or 1
   local gainexp = math.ceil(percent * givenexp)
   doItemSetAttribute(firstball.uid, expstring, 0)
   givePokemonExp(pk, firstball, expTotal)  --alterado v2.7
elseif isInParty(pk) and firstball.uid ~= 0 then
   givePokemonExp(pk, firstball, expTotal*3)    --alterado v2.7
end
 
for b = 1, #balls do
    local pokes = getItemsInContainerById(getPlayerSlotItem(pk, 3).uid, balls)
    if #pokes >= 1 then
       for _, uid in pairs (pokes) do
           if not isInParty(pk) and getItemAttribute(uid,  expstring) and getItemAttribute(uid,  expstring) > 0 then
              local percent = getItemAttribute(uid, expstring) <= 1 and getItemAttribute(uid, expstring) or 1
              local gainexp = math.ceil(percent * givenexp)
              doItemSetAttribute(uid, expstring, 0)
              givePokemonExpInBp(pk, uid, gainexp, balls)                  --alterado v2.7
           elseif isInParty(pk) and getItemAttribute(uid,  expstring) and getItemAttribute(uid,  expstring) > 0 then
              givePokemonExpInBp(pk, uid, expTotal*3, balls)
           end
       end
    end
end
end
 
 
 
function onDeath(cid, corpse, deathList)
        
if isSummon(cid) or not deathList or getCreatureName(cid) == "Evolution" then return true end --alterado v2.8
 
    -------------Edited Golden Arena-------------------------   --alterado v2.7 \/\/
    if getPlayerStorageValue(cid, 22546) == 1 then
       setGlobalStorageValue(22548, getGlobalStorageValue(22548)-1)
       if corpse.itemid ~= 0 then doItemSetAttribute(corpse.uid, "golden", 1) end  --alterado v2.8     
    end   
    if getPlayerStorageValue(cid, 22546) == 1 and getGlobalStorageValue(22548) <= 0 then
       local wave = getGlobalStorageValue(22547)
       for _, sid in ipairs(getPlayersOnline()) do
           if isPlayer(sid) and getPlayerStorageValue(sid, 22545) == 1 then
              if getGlobalStorageValue(22547) < #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 21, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")   
                 doPlayerSendTextMessage(sid, 28, "Wave "..wave.." will begin in "..timeToWaves.."seconds!") 
                 addEvent(creaturesInGolden, 100, GoldenUpper, GoldenLower, false, true, true)
                 addEvent(doWave, timeToWaves*1000)
              elseif getGlobalStorageValue(22547) == #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "You have win the golden arena! Take your reward!")
                 doPlayerAddItem(sid, 2152, getPlayerStorageValue(sid, 22551)*2)    --premio
                 setPlayerStorageValue(sid, 22545, -1)
                 doTeleportThing(sid, getClosestFreeTile(sid, posBackGolden), false) 
                 setPlayerRecordWaves(sid)
              end
           end
       end
       if getGlobalStorageValue(22547) == #wavesGolden+1 then
          endGoldenArena()
       end
    end   
    ---------------------------------------------------   /\/\
    
local givenexp = getWildPokemonExp(cid)
local expstring = ""..cid.."expEx"  
 
if givenexp > 0 then
   for a = 1, #deathList do             
       local pk = deathList[a]
  if isCreature(pk) then
     local list = getSpectators(getThingPosWithDebug(pk), 30, 30, false) 
     local expTotal = math.floor(playerExperienceRate * givenexp * getDamageMapPercent(pk, cid))
     local party = getPartyMembers(pk)
          
          if isInParty(pk) and getPlayerStorageValue(pk, 4875498) <= -1 then
             expTotal = math.floor(expTotal/#party)         --alterado v2.6.1
             for i = 1, #party do
                 if isInArray(list, party) and getDamageMapPercent(party, cid) > 0 then  --alterado v2.8
                    giveExpToPlayer(party, expTotal, givenexp, expstring)--alterado v2.7
                 end
             end
          else
             giveExpToPlayer(pk, expTotal, givenexp, expstring)   --alterado v2.7
          end
          
  end
   end
end
 
if isNpcSummon(cid) then
local master = getCreatureMaster(cid)
doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000))
doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1)
doRemoveCreature(cid)
return false
end
 
if corpse.itemid ~= 0 then   --alterado v2.8
doItemSetAttribute(corpse.uid, "offense", getPlayerStorageValue(cid, 1011))
doItemSetAttribute(corpse.uid, "defense", getPlayerStorageValue(cid, 1012))
doItemSetAttribute(corpse.uid, "speed", getPlayerStorageValue(cid, 1013))
doItemSetAttribute(corpse.uid, "vitality", getPlayerStorageValue(cid, 1014))
doItemSetAttribute(corpse.uid, "spattack", getPlayerStorageValue(cid, 1015))
doItemSetAttribute(corpse.uid, "level", getLevel(cid))
doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid))
end
return true
end
 

 
Ajuda ai por favor

 

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites
Wolf Admin

Wolf Admin 250

Postado
  • Autor
Postado

Sim

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites
Wolf Admin

Wolf Admin 250

Postado
  • Autor
Postado

Sim, Slicer 2.9

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites
Wend

Wend 976

Postado
Postado

Sim, Slicer 2.9

Tente assim. mais creio que irar dá BUG!

local function playerAddExp(cid, exp)
doPlayerAddExp(cid, exp)
doSendAnimatedText(getThingPos(cid), exp, 215)
end
 
function onDeath(cid, corpse, deathList)
        
if isSummon(cid) or not deathList or getCreatureName(cid) == "Evolution" then return true end --alterado v1.8
 
    -------------Edited Golden Arena-------------------------   
    if getPlayerStorageValue(cid, 22546) == 1 then
       setGlobalStorageValue(22548, getGlobalStorageValue(22548)-1)
       if corpse.itemid ~= 0 then doItemSetAttribute(corpse.uid, "golden", 1) end  --alterado v1.8    
    end   
    if getPlayerStorageValue(cid, 22546) == 1 and getGlobalStorageValue(22548) == 0 then
       local wave = getGlobalStorageValue(22547)
       for _, sid in ipairs(getPlayersOnline()) do
           if isPlayer(sid) and getPlayerStorageValue(sid, 22545) == 1 then
              if getGlobalStorageValue(22547) < #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")   
                 doPlayerSendTextMessage(sid, 28, "Wave "..wave.." will begin in "..timeToWaves.."seconds!") 
                 addEvent(creaturesInGolden, 100, GoldenUpper, GoldenLower, false, true, true)
                 addEvent(doWave, timeToWaves*1000)
              elseif getGlobalStorageValue(22547) == #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "You have win the golden arena! Take your reward!")
                 doPlayerAddItem(sid, 2152, getPlayerStorageValue(sid, 22551)*2)    --premio
                 setPlayerStorageValue(sid, 22545, -1)
                 doTeleportThing(sid, getClosestFreeTile(sid, posBackGolden), false) 
                 setPlayerRecordWaves(sid)
              end
           end
       end
       if getGlobalStorageValue(22547) == #wavesGolden+1 then
          endGoldenArena()
       end
    end   
    ---------------------------------------------------   /\/\
local givenexp = getWildPokemonExp(cid)  
 
if givenexp > 0 then
for a = 1, #deathList do
local pk = deathList[a]
---
local list = getSpectators(getThingPosWithDebug(pk), 30, 30, false)
if isCreature(pk) then 
   local expTotal = math.floor(playerExperienceRate * givenexp * getDamageMapPercent(pk, cid))
   local party = getPartyMembers(pk)
   if isInParty(pk) and getPlayerStorageValue(pk, 4875498) <= -1 then
      expTotal = math.floor(expTotal/#party)         
      for i = 1, #party do
          if isInArray(list, party[i]) then
             playerAddExp(party[i], expTotal)
          end
      end
   else
      playerAddExp(pk, expTotal)  
   end       
end
end
end
 
if isNpcSummon(cid) then
local master = getCreatureMaster(cid)
doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000))
doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1)
doRemoveCreature(cid)
return false
end
 
if corpse.itemid ~= 0 then   --alterado v1.8
   doItemSetAttribute(corpse.uid, "level", getPokemonLevel(cid))
   doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid))  
end
return true
end

Link para o post
Compartilhar em outros sites
Wolf Admin

Wolf Admin 250

Postado
  • Autor
Postado (editado)

Daqui a pouco irei testar, obrigado por ajudar ;)

---Edit

Acabei de testar e agora não ta dando pra capturar nenhum pokemon :(

[15/09/2014 16:46:02] [Error - Action Interface]

[15/09/2014 16:46:02] In a timer event called from:

[15/09/2014 16:46:02] data/actions/scripts/catch.lua:onUse

[15/09/2014 16:46:02] Description:

[15/09/2014 16:46:02] data/lib/catch system.lua:109: attempt to perform arithmetic on local 'cexp' (a nil value)

[15/09/2014 16:46:02] stack traceback:

[15/09/2014 16:46:02] data/lib/catch system.lua:109: in function <data/lib/catch system.lua:67>

Editado por Wolf Admin (veja o histórico de edições)

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites
Wend

Wend 976

Postado
Postado

Daqui a pouco irei testar, obrigado por ajudar ;)

---Edit

Acabei de testar e agora não ta dando pra capturar nenhum pokemon :(

[15/09/2014 16:46:02] [Error - Action Interface]

[15/09/2014 16:46:02] In a timer event called from:

[15/09/2014 16:46:02] data/actions/scripts/catch.lua:onUse

[15/09/2014 16:46:02] Description:

[15/09/2014 16:46:02] data/lib/catch system.lua:109: attempt to perform arithmetic on local 'cexp' (a nil value)

[15/09/2014 16:46:02] stack traceback:

[15/09/2014 16:46:02] data/lib/catch system.lua:109: in function <data/lib/catch system.lua:67>

troca o pokeexp por esse;

local balls = {11826, 11828, 11829, 11831, 11832, 11834, 11835, 11837,
      11737, 11739, 11740, 11742, 11743, 11745, 11746, 11748}
 
local function playerAddExp(cid, exp)
doPlayerAddExp(cid, exp)
doSendAnimatedText(getThingPos(cid), exp, 215)
end
 
 
function onDeath(cid, corpse, deathList)
 
if not isCreature(cid) then return true end
if isSummon(cid) or not deathList or corpse.itemid == 0 or getCreatureName(cid) == "Evolution" then return true end
 
local givenexp = getWildPokemonExp(cid)
local expstring = ""..cid.."expEx"
local killer = getItemAttribute(corpse.uid, "corpseowner")
 
if givenexp > 0 then
for a = 1, #deathList do
local pk = deathList[a]
if isCreature(pk) then
playerAddExp(pk, math.floor(playerExperienceRate * givenexp * getDamageMapPercent(pk, cid)))
local firstball = getPlayerSlotItem(pk, 8)
 
if firstball and getItemAttribute(firstball.uid,  expstring) and getItemAttribute(firstball.uid,  expstring) > 0 then
local percent = getItemAttribute(firstball.uid, expstring) <= 1 and getItemAttribute(firstball.uid, expstring) or 1
local gainexp = math.ceil(percent * givenexp)
doItemSetAttribute(firstball.uid, expstring, 0)
givePokemonExp(pk, firstball, gainexp)
end
 
for b = 1, #balls do
local pokes = getItemsInContainerById(getPlayerSlotItem(pk, 3).uid, balls[b])
if #pokes >= 1 then
for _, uid in pairs (pokes) do
if getItemAttribute(uid,  expstring) and getItemAttribute(uid,  expstring) > 0 then
local percent = getItemAttribute(uid, expstring) <= 1 and getItemAttribute(uid, expstring) or 1
local gainexp = math.ceil(percent * givenexp)
doItemSetAttribute(uid, expstring, 0)
givePokemonExpInBp(pk, uid, gainexp, balls[b])
end
end
end
end
end
end
end
 
if isNpcSummon(cid) then
local master = getCreatureMaster(cid)
doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000))
doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1)
doRemoveCreature(cid)
return false
end
 
doItemSetAttribute(corpse.uid, "offense", getPlayerStorageValue(cid, 1011))
doItemSetAttribute(corpse.uid, "defense", getPlayerStorageValue(cid, 1012))
doItemSetAttribute(corpse.uid, "speed", getPlayerStorageValue(cid, 1013))
doItemSetAttribute(corpse.uid, "vitality", getPlayerStorageValue(cid, 1014))
doItemSetAttribute(corpse.uid, "spattack", getPlayerStorageValue(cid, 1015))
doItemSetAttribute(corpse.uid, "level", getLevel(cid))
doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid))
return true
end
 

Link para o post
Compartilhar em outros sites
kttallan

kttallan 2

Postado
Postado

Anna explique o erro é como corrigir a pessoal que tenha, Futuramente pode ter o mesmo problema é corrigil-o só :).

 

O problema é o seguinte a função estar tentando checar a quantidade maxima do hp ''GetCreatureMaxHealth" porem essa creatura não foi encontrada como pode ver "Creature not found" bom tentei achar essa função no scripter porem não tem, Poderar ser em outro arquivo aonde essa função pode estar sendo mal-executada tente usar um patch da v2.9 poderar ter esse erro consertado.

Link para o post
Compartilhar em outros sites
Wend

Wend 976

Postado
Postado

Anna explique o erro é como corrigir a pessoal que tenha, Futuramente pode ter o mesmo problema é corrigil-o só :).

 

O problema é o seguinte a função estar tentando checar a quantidade maxima do hp ''GetCreatureMaxHealth" porem essa creatura não foi encontrada como pode ver "Creature not found" bom tentei achar essa função no scripter porem não tem, Poderar ser em outro arquivo aonde essa função pode estar sendo mal-executada tente usar um patch da v2.9 poderar ter esse erro consertado.

Kttallan a quanto tempo ^^

Link para o post
Compartilhar em outros sites
kttallan

kttallan 2

Postado
Postado

É psé tchu tchu bons tempo tibiaking mais agr é tibiaking pra matar a sdds, Wolf Admin caso o erro persista me add no facebook: Allan Harlen o mrm da girafinha /**/

Link para o post
Compartilhar em outros sites
Wolf Admin

Wolf Admin 250

Postado
  • Autor
Postado

AnnaFeeh, pokémon nao estao ganhando Exp mais nem players :(

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites
Wend

Wend 976

Postado
Postado

AnnaFeeh, pokémon nao estao ganhando Exp mais nem players :(

Então como o Ktallan falou pegue o patch da v2.9 que pode ter esse erro corrigido (--

Link para o post
Compartilhar em outros sites
Wolf Admin

Wolf Admin 250

Postado
  • Autor
Postado (editado)

Creio que o erro seja ao pokemon Subir de level, sua hp seja completada... Poderiamos editar algo para que eles quando upassem nao completasse sua hp, creio q assim poderemos concertar esse erro! E não tem correção do pokeexp no patch 2.9

Editado por Wolf Admin (veja o histórico de edições)

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites
Wend

Wend 976

Postado
Postado

Creio que o erro seja ao pokemon Subir de level, sua hp seja completada... Poderiamos editar algo para que eles quando upassem nao completasse sua hp, creio q assim poderemos concertar esse erro! E não tem correção do pokeexp no patch 2.9

Pode manda o arquivo correspondente ao pokemon avançar de level?

Link para o post
Compartilhar em outros sites
Wolf Admin

Wolf Admin 250

Postado
  • Autor
Postado

Não sei em qual arquivo está :/

Ajudei ?? Clique em Gostei  ^^

 

↓ Meus Trabalhos

 

PokeZot

Galaxy PokeOT

Bau que dá Pokémon

 

3rkmt.jpg2mxpw2h.jpgw1fxpk.jpg

Página no Facebook: facebook.com/pokerush1

 

Link para o post
Compartilhar em outros sites

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

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito