erro erro server script

[clebao666 6]

ola galera peçom por favor a quem puder me ajudar e sanar esse erro que ja me tirou o sono a alguns dias aq.sao 3 erros.

 

 

 

[05/10/2015 21:52:25] [Error - MoveEvents Interface]

[05/10/2015 21:52:25] data/movements/scripts/portrait.lua:onEquip

[05/10/2015 21:52:25] Description:

[05/10/2015 21:52:25] (luaDoTransformItem) Item not found

 

05/10/2015 21:48:48] [Error - Spell Interface]

[05/10/2015 21:48:48] data/spells/scripts/ps/Absorb.lua:onCastSpell

[05/10/2015 21:48:48] Description:

[05/10/2015 21:48:49] data/lib/pokemon moves.lua:1935: attempt to perform arithmetic on local 'life' (a boolean value)

[05/10/2015 21:48:49] stack traceback:

[05/10/2015 21:48:49] data/lib/pokemon moves.lua:1935: in function 'docastspell'

[05/10/2015 21:48:49] data/spells/scripts/ps/Absorb.lua:5: in function <data/spells/scripts/ps/Absorb.lua:1>

 

[05/10/2015 21:48:47] [Error - Spell Interface]

[05/10/2015 21:48:48] data/spells/scripts/ps/Absorb.lua:onCastSpell

[05/10/2015 21:48:48] Description:

[05/10/2015 21:48:48] (luaGetCreatureHealth) Creature not found

 

 

[05/10/2015 21:58:07] [Error - MoveEvents Interface]

[05/10/2015 21:58:07] data/movements/scripts/portrait.lua:onEquip

[05/10/2015 21:58:07] Description:

[05/10/2015 21:58:07] (luaDoTransformItem) Item not found

 

[05/10/2015 21:58:07] [Error - CreatureScript Interface]

[05/10/2015 21:58:07] In a timer event called from:

[05/10/2015 21:58:07] data/creaturescripts/scripts/exp2.0.lua:onStatsChange

[05/10/2015 21:58:08] Description:

[05/10/2015 21:58:08] (luaDoAddCondition) Creature not found

 

 

.

[dalvorsn 268]

Posta todos os script que tao sendo apontados nos erros, só assim pra te ajudarem.

[clebao666 6]

Posta todos os script que tao sendo apontados nos erros, só assim pra te ajudarem.

magia as linhas da magia dentro do pokemon moves.lua

 

 

elseif spell == "Absorb" then

 

local life = getCreatureHealth(target)

 

doAreaCombatHealth(cid, GRASSDAMAGE, getThingPosWithDebug(target), 0, -min, -max, 14)

 

local newlife = life - getCreatureHealth(target)

 

doSendMagicEffect(getThingPosWithDebug(cid), 14)

if newlife >= 1 then

doCreatureAddHealth(cid, newlife)

doSendAnimatedText(getThingPosWithDebug(cid), "+"..newlife.."", 32)

end

 

_____________________________________________________________________________________

portrait.lua

 

function onEquip (cid, item, slot)

 

if not cid then return true end

if item.uid <= 0 then return true end

 

if not getItemAttribute(item.uid, "poke") then

return true

end

 

for i, x in pairs(fotos) do

if string.lower(getItemAttribute(item.uid, "poke")) == string.lower(i) then

doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos)

return true

end

end

end

 

function onDeEquip(cid, item, slot)

 

if not cid then return true end

if item.uid <= 0 then return true end

 

if not getItemAttribute(item.uid, "poke") then

return true

end

 

doTransformItem(getPlayerSlotItem(cid, CONST_SLOT_LEGS).uid, 2395)

end

______________________________________________________________________________

exp 2.0.lua

 

local combats = { --alterado v1.6 \/

[PSYCHICDAMAGE] = {cor = COLOR_PSYCHIC},

[GRASSDAMAGE] = {cor = COLOR_GRASS},

[POISONEDDAMAGE] = {cor = COLOR_GRASS},

[FIREDAMAGE] = {cor = COLOR_FIRE2},

[bURNEDDAMAGE] = {cor = COLOR_BURN},

[WATERDAMAGE] = {cor = COLOR_WATER},

[iCEDAMAGE] = {cor = COLOR_ICE},

[NORMALDAMAGE] = {cor = COLOR_NORMAL},

[FLYDAMAGE] = {cor = COLOR_FLYING},

[GHOSTDAMAGE] = {cor = COLOR_GHOST},

[GROUNDDAMAGE] = {cor = COLOR_GROUND},

[ELECTRICDAMAGE] = {cor = COLOR_ELECTRIC},

[ROCKDAMAGE] = {cor = COLOR_ROCK},

[bUGDAMAGE] = {cor = COLOR_BUG},

[FIGHTDAMAGE] = {cor = COLOR_FIGHTING},

[DRAGONDAMAGE] = {cor = COLOR_DRAGON},

[POISONDAMAGE] = {cor = COLOR_POISON},

[DARKDAMAGE] = {cor = COLOR_DARK},

[sTEELDAMAGE] = {cor = COLOR_STEEL},

[MIRACLEDAMAGE] = {cor = COLOR_PSYCHIC},

[DARK_EYEDAMAGE] = {cor = COLOR_GHOST},

[sEED_BOMBDAMAGE] = {cor = COLOR_GRASS},

[sACREDDAMAGE] = {cor = COLOR_FIRE2},

[MUDBOMBDAMAGE] = {cor = COLOR_GROUND}

}

 

--alterado v1.5 tabelas agora estao em lib/configuration.lua

local function sendPlayerDmgMsg(cid, text)

if not isCreature(cid) then return true end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, text)

end

 

local races = {

[4] = {cor = COLOR_FIRE2},

[6] = {cor = COLOR_WATER},

[7] = {cor = COLOR_NORMAL},

[8] = {cor = COLOR_FIRE2},

[9] = {cor = COLOR_FIGHTING},

[10] = {cor = COLOR_FLYING},

[11] = {cor = COLOR_GRASS},

[12] = {cor = COLOR_POISON},

[13] = {cor = COLOR_ELECTRIC},

[14] = {cor = COLOR_GROUND},

[15] = {cor = COLOR_PSYCHIC},

[16] = {cor = COLOR_ROCK},

[17] = {cor = COLOR_ICE},

[18] = {cor = COLOR_BUG},

[19] = {cor = COLOR_DRAGON},

[20] = {cor = COLOR_GHOST},

[21] = {cor = COLOR_STEEL},

[22] = {cor = COLOR_DARK},

[1] = {cor = 180},

[2] = {cor = 180},

[3] = {cor = 180},

[5] = {cor = 180},

}

 

local damages = {GROUNDDAMAGE, ELECTRICDAMAGE, ROCKDAMAGE, FLYDAMAGE, BUGDAMAGE, FIGHTINGDAMAGE, DRAGONDAMAGE, POISONDAMAGE, DARKDAMAGE, STEELDAMAGE}

local fixdmgs = {PSYCHICDAMAGE, COMBAT_PHYSICALDAMAGE, GRASSDAMAGE, FIREDAMAGE, WATERDAMAGE, ICEDAMAGE, NORMALDAMAGE, GHOSTDAMAGE}

local ignored = {POISONEDDAMAGE, BURNEDDAMAGE} --alterado v1.6

local cannotkill = {BURNEDDAMAGE, POISONEDDAMAGE}

 

function onStatsChange(cid, attacker, type, combat, value)

 

if combat == FLYSYSTEMDAMAGE then return false end

if isPlayer(cid) and getCreatureOutfit(cid).lookType == 814 then return false end -- TV

 

if not isCreature(attacker) then --alterado v1.5 cid == attacker

if not isInArray(fixdamages, combat) and combats[combat] then

doSendAnimatedText(getThingPos(cid), value, combats[combat].cor)

end

return true

end

 

-----------------------------------------HELDS------------------------------------------

if isSummon(cid) and isPlayer(getCreatureMaster(cid)) then

local master= getCreatureMaster(cid)

local ball = getPlayerSlotItem(master, 8)

local hardenChance = getHeldBonusValue(ball.uid, 'x', 'Harden')

local elementalChance = getHeldBonusValue(ball.uid, 'x', 'Elemental')

if math.random(1,100) <= hardenChance then

docastspell(cid, "Harden")

elseif math.random(1,100) <= elementalChance then

docastspell(cid, 'Elemental', 1000, 2000)

end

end

 

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

local master= getCreatureMaster(attacker)

local ball = getPlayerSlotItem(master, 8)

local ragechance = getHeldBonusValue(ball.uid, 'x', 'Rage')

local strafechance = getHeldBonusValue(ball.uid, 'x', 'Strafe')

local agilitychance = getHeldBonusValue(ball.uid, 'x', 'Agility')

if math.random(1,100) <= ragechance then

docastspell(attacker, 'Rage')

elseif math.random(1,100) <= strafechance then

docastspell(attacker, 'Strafe')

elseif math.random(1,100) <= agilitychance then

docastspell(attacker, 'Agility')

end

end

-----------------------------------------HELDS------------------------------------------

 

local damageCombat = combat

--------------------------------------------------

--alterado v1.6 retirado os combats sleep_powder e poison_powder daki!

--------------------------------------------------

if type == STATSCHANGE_HEALTHGAIN then

if cid == attacker then

return true

end

if isSummon(cid) and isSummon(attacker) and canAttackOther(cid, attacker) == "Cant" then

return false

end

return true

end

--------------------------------------------------

if isMonster(cid) then

local valor = value

if not pokes[getCreatureName(cid)] and damageCombat == COMBAT_PHYSICALDAMAGE then

valor = getOffense(attacker) * playerDamageReduction

doCreatureAddHealth(cid, -math.abs(valor), 3, races[7].cor) --alterado v1.6 dano nos npcs

return false

elseif not pokes[getCreatureName(cid)] and damageCombat ~= COMBAT_PHYSICALDAMAGE then

doCreatureAddHealth(cid, -math.abs(valor), 3, combats[damageCombat].cor)

return false

end

end

--------------------------------------------------

if isPlayer(attacker) then

 

local valor = value

if valor > getCreatureHealth(cid) then

valor = getCreatureHealth(cid)

end

 

if combat == COMBAT_PHYSICALDAMAGE then

return false

end

 

if combat == PHYSICALDAMAGE then

doSendMagicEffect(getThingPos(cid), 3)

doSendAnimatedText(getThingPos(cid), valor, races[getMonsterInfo(getCreatureName(cid)).race].cor)

end

 

if combats[damageCombat] and not isInArray(fixdmgs, damageCombat) then

doSendAnimatedText(getThingPos(cid), valor, combats[damageCombat].cor)

end

 

if #getCreatureSummons(attacker) >= 1 and not isInArray({POISONEDDAMAGE, BURNEDDAMAGE}, combat) then

--doPlayerSendTextMessage(attacker, cid, 20, "Seu "..getPokeName(getCreatureSummons(attacker)[1]).." causou "..valor.." de dano no "..getSomeoneDescription(cid)..".")

end

 

return true

end

--------------------------------------------------

if isPlayer(cid) and #getCreatureSummons(cid) >= 1 and type == STATSCHANGE_HEALTHLOSS then

--if ehMonstro(attacker) and getClosestFreeTile(getCreatureSummons(cid)[1]) >= 1 then

--doSendAnimatedText(getThingPosWithDebug(attacker), "Hmpfg!", 215)

--doMonsterSetTarget(attacker, getCreatureSummons(cid)[1])

--end

return false

end

--if isPlayer(cid) and #getCreatureSummons(cid) >= 1 and type == STATSCHANGE_HEALTHLOSS then

--if ehMonstro(attacker) and getClosestFreeTile(getCreatureSummons(cid)[1]) <= 0 then

--doSendAnimatedText(getThingPosWithDebug(attacker), "Grrr!", 215)

--doMonsterSetTarget(attacker, cid)

--end

--return true

--end

--------------------------------------------------

if isPlayer(cid) and #getCreatureSummons(cid) <= 0 and type == STATSCHANGE_HEALTHLOSS then

 

if isSummon(attacker) or isPlayer(attacker) then

if canAttackOther(cid, attacker) == "Cant" then return false end

end

 

local valor = 0

if combat == COMBAT_PHYSICALDAMAGE then

valor = getOffense(attacker)

else

valor = getSpecialAttack(attacker)

end

 

valor = valor * playerDamageReduction

valor = valor * math.random(83, 117) / 100

 

if valor >= getCreatureHealth(cid) then

valor = getCreatureHealth(cid)

end

 

valor = math.floor(valor)

 

if valor >= getCreatureHealth(cid) then

-- PVP ARENA

if arenaPvp.killPlayer(cid) then

return false

end

-- PVP ARENA

if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then

setPlayerStorageValue(cid, 6598754, -1)

setPlayerStorageValue(cid, 6598755, -1)

doRemoveCondition(cid, CONDITION_OUTFIT)

doTeleportThing(cid, {x = 1001, y = 1026, z = 14}, false)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid))

return false --alterado v1.8

elseif getPlayerStorageValue(cid, 577869) >= 1 then

setPlayerStorageValue(cid, 577869, 0)

doTeleportThing(cid, {x = 1009, y = 1084, z = 14}, false)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid))

return false

elseif getPlayerStorageValue(cid, 20000) >= 1 then

setPlayerStorageValue(cid, 20000, 0)

setPlayerStorageValue(cid,30,0)

doTeleportThing(cid, {x = 1172, y = 1366, z = 7}, false)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid))

doPlayerSendTextMessage(cid, 20, "Você morreu no Saffari por Favor volte mais tarde!")

return false

elseif getPlayerStorageValue(cid, 20001) >= 1 then

setPlayerStorageValue(cid,20001,0)

doTeleportThing(cid, {x = 1371, y = 1240, z = 7}, false)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid))

doRemoveCondition(cid, CONDITION_OUTFIT)

doPlayerSendTextMessage(cid, 20, "You are died in demon room, please come back!")

return false

end

------------------------------------------- ---

if getPlayerStorageValue(cid, 18) >= 1 then

setPlayerStorageValue(cid,18,0)

doRemoveCondition(cid, CONDITION_OUTFIT)

end

------------Saffari----------------------------------

if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 then

doRemoveCondition(cid, CONDITION_OUTFIT)

setPlayerStorageValue(cid, 17000, 0)

setPlayerStorageValue(cid, 17001, 0)

setPlayerStorageValue(cid, 63215, -1)

doChangeSpeed(cid, PlayerSpeed)

local item = getPlayerSlotItem(cid, 8)

local btype = getPokeballType(item.itemid)

if #getCreatureSummons(cid) <= 0 then

if isInArray(pokeballs[btype].all, item.itemid) then

doTransformItem(item.uid, pokeballs[btype].off)

doItemSetAttribute(item.uid, "hp", 0)

end

end

end

------------Edited Golden Arena------------------

if getPlayerStorageValue(cid, 22545) == 1 then

if getGlobalStorageValue(22550) == 1 then

doPlayerSendTextMessage(cid, 20, "Você foi o último sobrevivente da Golden Arena! Tome sua recompensa!")

doPlayerAddItem(cid, 2160, getPlayerStorageValue(cid, 22551)*30/4)

doPlayerAddExperience(cid, 1000, getPlayerStorageValue(cid, 22551)*30)

setPlayerStorageValue(cid, 22545, -1)

doTeleportThing(cid, getClosestFreeTile(cid, getClosestFreeTile(cid, posBackGolden)), false)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid)-getCreatureHealth(cid))

--setPlayerRecordWaves(cid)

endGoldenArena()

return false --alterado v1.8

else

setGlobalStorageValue(22550, getGlobalStorageValue(22550)-1)

setPlayerStorageValue(cid, 22545, -1)

doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)

doPlayerAddItem(cid, 2152, getPlayerStorageValue(cid, 22551)*5)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid)-getCreatureHealth(cid))

--setPlayerRecordWaves(cid)

return true

end

end

----------------------------------

if getPlayerSex(cid) == 1 then

local corpse = doCreateItem(3058, 1, getThingPos(cid))

doDecayItem(corpse)

doItemSetAttribute(corpse, "name", "dead human (Vol:8). You recognize ".. getCreatureName(cid) ..". He was killed by a ".. getCreatureName(attacker) .."")

elseif getPlayerSex(cid) == 0 then

local corpse = doCreateItem(3065, 1, getThingPos(cid))

doDecayItem(corpse)

doItemSetAttribute(corpse, "name", "dead human (Vol:8). You recognize ".. getCreatureName(cid) ..". She was killed by a ".. getCreatureName(attacker) .."")

end

end

doCreatureAddHealth(cid, -valor, 3, 180)

if not isPlayer(cid) then

addEvent(sendPlayerDmgMsg, 5, cid, "Você perdeu "..valor.." em pontos de vida por um attack de "..getSomeoneDescription(attacker)..".")

end

return false

end

--------------------------------------------------

--if isMonster(attacker) and getPlayerStorageValue(attacker, 201) ~= -1 then

-- if isPlayer(cid) then

-- return false

-- end

-- if getPlayerStorageValue(getCreatureMaster(cid), ginasios[getPlayerStorageValue(attacker, 201)].storage) ~= 1 then

-- return false

-- end

--end

---------------------------------------------------

--if isMonster(cid) and getPlayerStorageValue(cid, 201) ~= -1 then

-- if getPlayerStorageValue(getCreatureMaster(attacker), ginasios[getPlayerStorageValue(cid, 201)].storage) ~= 1 then

-- return false

-- end

--end

--------------------------------------------------

if ehMonstro(cid) and ehMonstro(attacker) then

return false --edited monstro nao atacar monstro

end

--------------------------------------------------

--------------------REFLECT-----------------------

if getPlayerStorageValue(cid, 21099) >= 1 and combat ~= COMBAT_PHYSICALDAMAGE then

if not isInArray({"Team Claw", "Team Slice"}, getPlayerStorageValue(attacker, 21102)) then

doSendMagicEffect(getThingPosWithDebug(cid), 135)

doSendAnimatedText(getThingPosWithDebug(cid), "REFLECT", COLOR_GRASS)

addEvent(docastspell, 100, cid, getPlayerStorageValue(attacker, 21102))

if getCreatureName(cid) == "Wobbuffet" then

doRemoveCondition(cid, CONDITION_OUTFIT)

end

setPlayerStorageValue(cid, 21099, -1) --alterado v1.6

setPlayerStorageValue(cid, 21100, 1)

setPlayerStorageValue(cid, 21101, attacker)

setPlayerStorageValue(cid, 21103, getTableMove(attacker, getPlayerStorageValue(attacker, 21102)).f)

setPlayerStorageValue(cid, 21104, getCreatureOutfit(attacker).lookType)

return false

end

end

-------------------------------------------------

 

local multiplier = 1

 

if isCreature(cid) then

poketype1 = pokes[getCreatureName(cid)].type --alterado v1.6

poketype2 = pokes[getCreatureName(cid)].type2

end

if not poketype1 or not poketype2 then return false end --alterado v1.6

 

if getCreatureCondition(cid, CONDITION_INVISIBLE) then

return false

end

if damageCombat ~= COMBAT_PHYSICALDAMAGE and not isInArray(ignored, damageCombat) then

if isInArray(effectiveness[damageCombat].super, poketype1) then

multiplier = multiplier + 0.5

end

if isInArray(effectiveness[damageCombat].super, poketype2) then

multiplier = multiplier + 0.5

end

if isInArray(effectiveness[damageCombat].weak, poketype1) then --Edited effetivenes = pxg... ;p

multiplier = multiplier - 0.25

end

if isInArray(effectiveness[damageCombat].weak, poketype2) then

multiplier = multiplier - 0.25

end

if isInArray(effectiveness[damageCombat].non, poketype1) or isInArray(effectiveness[damageCombat].non, poketype2) then

if isInArray(specialabilities["foresight"], getCreatureName(attacker)) then --alterado v1.5

multiplier = 0.5

end --alterado v1.6

end

-- X-Attack --

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

local TierArray = {8, 9, 10, 11, 12, 13, 14}

local Tiers = {

[8] = {bonus = AtkBonus1},

[9] = {bonus = AtkBonus2},

[10] = {bonus = AtkBonus3},

[11] = {bonus = AtkBonus4},

[12] = {bonus = AtkBonus5},

[13] = {bonus = AtkBonus6},

[14] = {bonus = AtkBonus7},

}

local ball = getPlayerSlotItem(getCreatureMaster(attacker), 8)

local Tier = getItemAttribute(ball.uid, "heldx")

local bonusatk = {}

if isInArray(TierArray, getItemAttribute(ball.uid, "heldx")) then

bonusatk = Tiers[Tier].bonus

else

bonusatk = 1

end

multiplier = multiplier * bonusatk

end

-- X-Attack --

elseif combat == COMBAT_PHYSICALDAMAGE then

if isGhostPokemon(cid) then --alterado v1.3

if not isInArray(specialabilities["foresight"], getCreatureName(attacker)) then --passiva Foresight!!

doSendMagicEffect(getThingPos(cid), 3)

return false

end

end

local cd = getPlayerStorageValue(attacker, conds["Miss"])

local cd2 = getPlayerStorageValue(attacker, conds["Confusion"])

local cd3 = getPlayerStorageValue(attacker, conds["Stun"])

if cd >= 0 or cd2 >= 0 or cd3 >= 0 then

if math.random(1, 100) > 50 then --Edited miss system -- 50% chance de da miss no atk fisico

doSendMagicEffect(getThingPos(cid), 211)

doSendAnimatedText(getThingPos(attacker), "MISS", 215) --alterado v1.5

return false

end

end

end

--------------------------------------------------

local valor = value

--------------------------------------------------

if isSummon(cid) and isSummon(attacker) then

if getCreatureMaster(cid) == getCreatureMaster(attacker) then

return false

end

if canAttackOther(cid, attacker) == "Cant" then

return false

end

end

 

valor = valor * multiplier

 

if isSummon(attacker) then

valor = valor * getHappinessRate(attacker)

else

valor = valor * summonReduction

end

 

valor = math.floor(valor)

 

if combat == COMBAT_PHYSICALDAMAGE then

block = 1 - (getDefense(cid) / (getOffense(attacker) + getDefense(cid)))

valor = getOffense(attacker) * block

 

if isInArray(specialabilities["counter"], getCreatureName(cid)) then

if math.random(1, 100) <= 10 then

doCreatureAddHealth(attacker, -valor, 3, 180)

valor = 0

doSendAnimatedText(getThingPosWithDebug(cid), "COUNTER", 215)

end

end

else

valor = valor / getDefense(cid)

end

 

local criticalHit = 1

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

local master = getCreatureMaster(attacker)

local ball = getPlayerSlotItem(master, 8)

 

local criticalChance = getHeldBonusValue(ball.uid, 'x', 'Critical')

 

if math.random(1,100) <= criticalChance then

criticalHit = 2

end

end

 

-------------------------Edited CLAN SYSTEM-----------------------------------

if isSummon(attacker) and getPlayerStorageValue(getCreatureMaster(attacker), 86228) >= 1 then

valor = valor*getClanPorcent(getCreatureMaster(attacker), combat, "atk") --alterado v1.3

elseif isSummon(cid) and getPlayerStorageValue(getCreatureMaster(cid), 86228) >= 1 then

valor = valor - (valor*getClanPorcent(getCreatureMaster(cid), combat, "def", pokes[getCreatureName(cid)].type, pokes[getCreatureName(cid)].type2))

end

-----------------------------------------------------------------------

---------------------- FEAR / ROAR ------------------------------------

if getPlayerStorageValue(attacker, conds["Fear"]) >= 1 then --alterado!!

return true

end

--------------------------------------------------------------------------

if damageCombat ~= COMBAT_PHYSICALDAMAGE and not isInArray(ignored, damageCombat) then

if isInArray(effectiveness[damageCombat].non, poketype1) or isInArray(effectiveness[damageCombat].non, poketype2) then

if not isInArray(specialabilities["foresight"], getCreatureName(attacker)) then --alterado v1.6

valor = valor * 0 --alterado v1.5

end

end

end

 

if damageCombat == GROUNDDAMAGE then

if isInArray(specialabilities["levitate"], getCreatureName(cid)) then

valor = 0 --alterado v1.5

end

end

-----------------------------------------------------------------------------

local p = getThingPos(cid)

if p.x == 1 and p.y == 1 and p.z == 10 then

return false

end

 

if getPlayerStorageValue(cid, 9658783) == 1 then

return false --imune

end

-----------------------------------------------------------------------------

if valor >= getCreatureHealth(cid) then

if isInArray(cannotKill, combat) and isPlayer(cid) then

valor = getCreatureHealth(cid) - 1

else

valor = getCreatureHealth(cid)

end

end

valor = math.floor(valor) --alterado v1.6

 

------------------ SKILLs Q CURAM O ATTACKER ---------------------------------

local function doHeal(cid, amount)

if (getCreatureHealth(cid) + amount) >= getCreatureMaxHealth(cid) then

amount = math.abs(getCreatureHealth(cid)-getCreatureMaxHealth(cid))

end

if getCreatureHealth(cid) ~= getCreatureMaxHealth(cid) then --alterado v1.6

doCreatureAddHealth(cid, amount)

doSendAnimatedText(getThingPosWithDebug(cid), "+"..amount.."", 65)

end

end

 

if damageCombat == PSYCHICDAMAGE or damageCombat == MIRACLEDAMAGE then

if getPlayerStorageValue(attacker, 95487) >= 1 then

doHeal(attacker, valor)

setPlayerStorageValue(attacker, 95487, -1) --alterado v1.6

end

elseif damageCombat == SEED_BOMBDAMAGE then

doHeal(attacker, valor)

end

--------------------------------------------

----------SACRED FIRE-----------------------

if combat == SACREDDAMAGE and not ehNPC(cid) then --alterado v1.6

local ret = {}

ret.id = cid

ret.cd = 9

ret.check = getPlayerStorageValue(cid, conds["Silence"])

ret.eff = 39

ret.cond = "Silence"

 

doCondition2(ret)

end

---------------------------------------------

 

--------------Passiva Lifesteal Clobat------------

if combat == COMBAT_PHYSICALDAMAGE then

if getCreatureName(attacker) == "Crobat" then --alterado v1.4

doCreatureAddHealth(attacker, math.floor(valor))

doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)

end

end

--------------------------------------------

 

--------------Passiva Lifesteal Clobat------------

if combat == COMBAT_PHYSICALDAMAGE then

if getCreatureName(attacker) == "Golbat" then --alterado v1.4

doCreatureAddHealth(attacker, math.floor(valor))

doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)

end

end

--------------------------------------------

 

--------------Passiva Lifesteal Clobat------------

if combat == COMBAT_PHYSICALDAMAGE then

if getCreatureName(attacker) == "Zubat" then --alterado v1.4

doCreatureAddHealth(attacker, math.floor(valor))

doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)

end

end

--------------------------------------------

 

--------------Passiva Lifesteal Clobat------------

if combat == COMBAT_PHYSICALDAMAGE then

if getCreatureName(attacker) == "Shiny Crobat" then --alterado v1.4

doCreatureAddHealth(attacker, math.floor(valor))

doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)

end

end

--------------------------------------------

 

--------------Passiva Lifesteal Clobat------------

if combat == COMBAT_PHYSICALDAMAGE then

if getCreatureName(attacker) == "Shiny Golbat" then --alterado v1.4

doCreatureAddHealth(attacker, math.floor(valor))

doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)

end

end

--------------------------------------------

 

--------------Passiva Lifesteal Clobat------------

if combat == COMBAT_PHYSICALDAMAGE then

if getCreatureName(attacker) == "Shiny Zubat" then --alterado v1.4

doCreatureAddHealth(attacker, math.floor(valor))

doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)

end

end

--------------------------------------------

valor = math.abs(valor * criticalHit) --alterado v1.9

if isSummon(cid) and valor >= getCreatureHealth(cid) then

onPokeHealthChange(getCreatureMaster(cid), true)

elseif isSummon(cid) then

onPokeHealthChange(getCreatureMaster(cid))

end

if isSummon(attacker) then

if combat == COMBAT_PHYSICALDAMAGE then

doTargetCombatHealth(getCreatureMaster(attacker), cid, PHYSICALDAMAGE, -valor, -valor, 255)

if criticalHit > 1 then

doSendAnimatedText(getThingPos(cid), valor .. " STK", 180)

--[[else

doSendAnimatedText(getThingPos(cid), valor, races[getMonsterInfo(getCreatureName(cid) and getCreatureName(cid) or "Caterpie").race].cor)--]]

end

addEvent(doDoubleHit, 1000, attacker, cid, valor, races) --alterado v1.6

else

doTargetCombatHealth(getCreatureMaster(attacker), cid, damageCombat, -valor, -valor, 255)

if criticalHit > 1 then

doSendAnimatedText(getThingPos(cid), valor .. " STK", 180)

--[[else

doSendAnimatedText(getThingPos(cid), valor, combats[damageCombat].cor)--]]

end

end

-- Return --

if isSummon(cid) and isPlayer(getCreatureMaster(cid)) then

local master = getCreatureMaster(cid)

local ball = getPlayerSlotItem(master, 8)

local returnBonus = getHeldBonusValue(ball.uid, 'x', 'Return')

if returnBonus > 0 then

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

doCreatureAddHealth(attacker, -(valor * returnBonus), 3, 182)

else

doCreatureAddHealth(attacker, -((valor * returnBonus) * 5), 3, 182)

end

end

end

-- Return --

else

if combat ~= COMBAT_PHYSICALDAMAGE then

doCreatureAddHealth(cid, -math.abs(valor), 3, combats[damageCombat].cor)

else

doCreatureAddHealth(cid, -math.abs(valor), 3, races[getMonsterInfo(getCreatureName(cid)).race].cor)

addEvent(doDoubleHit, 1000, attacker, cid, valor, races) --alterado v1.6

end

-- Return --

if isSummon(cid) and isPlayer(getCreatureMaster(cid)) then

local master = getCreatureMaster(cid)

local ball = getPlayerSlotItem(master, 8)

local returnBonus = getHeldBonusValue(ball.uid, 'x', 'Return')

if returnBonus > 0 then

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

doCreatureAddHealth(attacker, -(valor * returnBonus), 3, 182)

else

doCreatureAddHealth(attacker, -((valor * returnBonus) * 5), 3, 182)

end

end

end

-- Return --

if isSummon(cid) and valor ~= 0 then

--addEvent(sendPlayerDmgMsg, 5, getCreatureMaster(cid), "Seu "..getCreatureName(cid).." perdeu "..valor.." de vida pelo attack do "..getSomeoneDescription(attacker)..".")

end

 

end

 

if damageCombat == FIREDAMAGE and not isBurning(cid) then

local antiburnheld = 0

local hellfire = 1

if isSummon(cid) and isPlayer(getCreatureMaster(cid)) then

antiburnheld = getHeldBonusValue(getPlayerSlotItem(getCreatureMaster(cid),8).uid, 'y', 'Antiburn')

end

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

hellfire = getHeldBonusValue(getPlayerSlotItem(getCreatureMaster(attacker),8).uid, 'x', 'Hellfire')

end

hellfire = hellfire > 0 and hellfire or 1

local ret = {}

ret.id = cid

ret.cd = math.random(5, 12)

ret.check = getPlayerStorageValue(cid, conds["Burn"])

ret.damage = isSummon(attacker) and (getMasterLevel(attacker)+getPokemonBoost(attacker)) * hellfire or getPokemonLevel(attacker)

ret.cond = "Burn"

 

doCondition2(ret)

elseif damageCombat == POISONDAMAGE and not isPoisoned(cid) then

local antipoisonheld = 0

local xpoison = 1

if isSummon(cid) and isPlayer(getCreatureMaster(cid)) then

antipoisonheld = getHeldBonusValue(getPlayerSlotItem(getCreatureMaster(cid),8).uid, 'y', 'Poison')

end

if isSummon(attacker) and isPlayer(getCreatureMaster(attacker)) then

xpoison = getHeldBonusValue(getPlayerSlotItem(getCreatureMaster(attacker), 8).uid, 'x', 'Poison')

end

xpoison = xpoison > 0 and xpoison or 1

local ret = {}

ret.id = cid

ret.cd = math.random(6, 15)

ret.check = getPlayerStorageValue(cid, conds["Poison"])

ret.damage = math.floor(((getPokemonLevel(attacker))/2)*xpoison)

ret.cond = "Poison"

 

doCondition2(ret)

end

--[[---------------CD BAR-----------------------

if isSummon(cid) then

doCreatureExecuteTalkAction(getCreatureMaster(cid), "/pokeread")

end ]]

------------------------------------POTIONS-------------------------------------------

if isSummon(cid) and type == STATSCHANGE_HEALTHLOSS then

if getPlayerStorageValue(cid, 173) >= 1 then

if damageCombat ~= BURNEDDAMAGE and damageCombat ~= POISONEDDAMAGE then

setPlayerStorageValue(cid, 173, -1) --alterado v1.6

doSendAnimatedText(getThingPos(cid), "LOST HEAL", 144)

end

end

end

----------------------------------------PASSIVAS------------------------------------- --alterado v1.6 \/ todas as passivas agora estao em lib/pokemon moves.lua

-------------------------------------------Counter Helix------------------------------------

if passivesChances["Helix"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Helix"][getCreatureName(cid)] then

docastspell(cid, "Counter Helix")

end

-------------------------------------------Lava-Counter----------------------------

if passivesChances["Lava"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Lava"][getCreatureName(cid)] then

docastspell(cid, "Lava-Counter")

end

-------------------------------------------ice-Counter----------------------------

if passivesChances["Ice"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Ice"][getCreatureName(cid)] then

docastspell(cid, "Ice-Counter")

end

-------------------------------------------ground-Counter----------------------------

if passivesChances["Ground"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Ground"][getCreatureName(cid)] then

docastspell(cid, "Ground-Counter")

end

-------------------------------------------water-Counter----------------------------

if passivesChances["Water"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Water"][getCreatureName(cid)] then

docastspell(cid, "Water-Counter")

end

-------------------------------------------psy-Counter----------------------------

if passivesChances["Psy"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Psy"][getCreatureName(cid)] then

docastspell(cid, "Psy-Counter")

end

-------------------------------------------dark-Counter----------------------------

if passivesChances["Dark"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Dark"][getCreatureName(cid)] then

docastspell(cid, "Dark-Counter")

end

-------------------------------------------leaf-Counter----------------------------

if passivesChances["Leaf"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Leaf"][getCreatureName(cid)] then

docastspell(cid, "Leaf-Counter")

end

-------------------------------------------Shock-Counter----------------------------

if passivesChances["Shock"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Shock"][getCreatureName(cid)] then

docastspell(cid, "Shock-Counter")

end

-------------------------------------------Bone Spin----------------------------

if passivesChances["Bone"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Bone"][getCreatureName(cid)] then

docastspell(cid, "Bone-Spin")

end

---------------------------------------Stunning Confusion-----------------------------------------

if passivesChances["Stunning"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Stunning"][getCreatureName(cid)] then

docastspell(cid, "Stunning Confusion")

end

--------------------------------------Electric Charge---------------------------------------------

if passivesChances["Electric Charge"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Electric Charge"][getCreatureName(cid)] then

docastspell(cid, "Electric Charge", 0, 0)

end

-------------------------------------Melody------------------------------------

if passivesChances["Melody"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Melody"][getCreatureName(cid)] then

docastspell(cid, "Melody")

end

------------------------------------- Dragon Fury / Fury ---------------------------------------

if passivesChances["Dragon Fury"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Dragon Fury"][getCreatureName(cid)] then

docastspell(cid, "Dragon Fury", 0, 0)

end

------------------------------------- Mega Drain ---------------------------------------

if passivesChances["Mega Drain"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Mega Drain"][getCreatureName(cid)] then

docastspell(cid, "Mega Drain")

end

------------------------------------- Spores Reaction ---------------------------------------

if passivesChances["Spores Reaction"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Spores Reaction"][getCreatureName(cid)] then

docastspell(cid, "Spores Reaction")

end

------------------------------------ Amnesia ----------------------------------------

if passivesChances["Amnesia"][getCreatureName(cid)] and math.random(1, 100) <= passivesChances["Amnesia"][getCreatureName(cid)] then

docastspell(cid, "Amnesia", 0, 0)

end

----------------------------------- Zen Mind -----------------------------------------

if passivesChances["Zen Mind"][getCreatureName(cid)] and isWithCondition(cid) and math.random(1, 100) <= passivesChances["Zen Mind"][getCreatureName(cid)] then

docastspell(cid, "Zen Mind", 0, 0)

end

---------------------------------- Mirror Coat ---------------------------------------

if passivesChances["Mirror Coat"][getCreatureName(cid)] and math.random(1, 80) <= passivesChances["Mirror Coat"][getCreatureName(cid)] then

docastspell(cid, "Mirror Coat", 0, 0)

end

--------------------------------- Illusion -----------------------------------------

return false

end

 

 

segue onde ta dando os erros.

[dalvorsn 268]

 

elseif spell == "Absorb" then
    if isCreature(target) then
        local life = getCreatureHealth(target)
        doAreaCombatHealth(cid, GRASSDAMAGE, getThingPosWithDebug(target), 0, -min, -max, 14)
        local newlife = life - getCreatureHealth(target)
        doSendMagicEffect(getThingPosWithDebug(cid), 14)
        if newlife >= 1 then
            doCreatureAddHealth(cid, newlife)
            doSendAnimatedText(getThingPosWithDebug(cid), "+"..newlife.."", 32)
        end
    end
    
----------------------------------------------------------------------------------------------------------
function onEquip (cid, item, slot)

    if not cid then return true end
    if item.uid <= 0 then return true end

    if not getItemAttribute(item.uid, "poke") then
        return true
    end
    
    for i, x in pairs(fotos) do
        if string.lower(getItemAttribute(item.uid, "poke")) == string.lower(i) then
            doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos[i])
            return true
        end
    end
end

function onDeEquip(cid, item, slot)

    if not cid then return true end
    if item.uid <= 0 then return true end

    if not getItemAttribute(item.uid, "poke") then
        return true
    end
    local feet = getPlayerSlotItem(cid, CONST_SLOT_LEGS)
    if feet.uid > 0 then
        doTransformItem(feet.uid, 2395)
    end
end

Esse outro bagulho gigante vou ler nao, preguiça :3

[clebao666 6]

elseif spell == "Absorb" then
    if isCreature(target) then
        local life = getCreatureHealth(target)
        doAreaCombatHealth(cid, GRASSDAMAGE, getThingPosWithDebug(target), 0, -min, -max, 14)
        local newlife = life - getCreatureHealth(target)
        doSendMagicEffect(getThingPosWithDebug(cid), 14)
        if newlife >= 1 then
            doCreatureAddHealth(cid, newlife)
            doSendAnimatedText(getThingPosWithDebug(cid), "+"..newlife.."", 32)
        end
    end
    
----------------------------------------------------------------------------------------------------------
function onEquip (cid, item, slot)

    if not cid then return true end
    if item.uid <= 0 then return true end

    if not getItemAttribute(item.uid, "poke") then
        return true
    end
    
    for i, x in pairs(fotos) do
        if string.lower(getItemAttribute(item.uid, "poke")) == string.lower(i) then
            doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos[i])
            return true
        end
    end
end

function onDeEquip(cid, item, slot)

    if not cid then return true end
    if item.uid <= 0 then return true end

    if not getItemAttribute(item.uid, "poke") then
        return true
    end
    local feet = getPlayerSlotItem(cid, CONST_SLOT_LEGS)
    if feet.uid > 0 then
        doTransformItem(feet.uid, 2395)
    end
end

Esse outro bagulho gigante vou ler nao, preguiça :3

 

 

corrigi os que vc posto e ainda nao deu mais esses erros so esses dois aq.

 

[06/10/2015 10:08:53] [Error - TalkAction Interface]

[06/10/2015 10:08:53] In a timer event called from:

[06/10/2015 10:08:53] data/talkactions/scripts/move1.lua:onSay

[06/10/2015 10:08:53] Description:

[06/10/2015 10:08:53] (luaGetThingPosition) Thing not found

 

[06/10/2015 10:08:54] [Error - TalkAction Interface]

[06/10/2015 10:08:54] In a timer event called from:

[06/10/2015 10:08:54] data/talkactions/scripts/move1.lua:onSay

[06/10/2015 10:08:54] Description:

[06/10/2015 10:08:54] data/lib/pokemon moves.lua:6388: bad argument #1 to 'random' (interval is empty)

[06/10/2015 10:08:54] stack traceback:

[06/10/2015 10:08:54] [C]: in function 'random'

[06/10/2015 10:08:54] data/lib/pokemon moves.lua:6388: in function <data/lib/pokemon moves.lua:6381>

 

 

vo posta aq as linhas que ta os erros sepuder ajudar.

 

elseif spell == "Flash Fire Kik" then

local config = {

times = 6, --Vezes que o pokémon irá se teleportar.

appearEffect = 101, --Efeito que vai aparecer no pokémon ao aparecer.

effect = 111, --Efeito de corte de garras.

combat = STEELDAMAGE, --Elemento.

disappearInterval = 200, --Tempo para, depois de reaparecer, o pokémon desaparecer novamente. (em milésimos de segundo)

teleportInterval = 800 --Intervalo de tempo entre cada teleporte do pokémon. (em milésimos de segundo)

}

 

local pos = getPosfromArea(cid, spell_area)

local randomPosis = {}

for i = 1, config.times do

randomPosis = pos[math.random(#pos)]

if not isWalkable(randomPosis) or getTileInfo(randomPosis).protection then

while not isWalkable(randomPosis) do

randomPosis = pos[math.random(#pos)]

end

end

end

 

local function doTeleport(cid, time)

if not isCreature(cid) then return true end

if not isCreature(target) or time <= 0 then

doAppear(cid)

doCreatureSetNoMove(cid, false)

doRegainSpeed(cid)

end

local index = math.random(#randomPosis)

doTeleportThing(cid, randomPosis[index])

for i = index, #randomPosis do

randomPosis = randomPosis[i + 1] or nil

end

doAppear(cid)

doSendMagicEffect(getThingPos(cid), config.appearEffect)

doDanoWithProtect(cid, config.combat, getThingPos(target), 0, -min, -max, config.effect)

addEvent(doDisapear, config.disappearInterval, cid)

addEvent(doTeleport, config.teleportInterval, cid, time - 1)

end

 

doDisapear(cid)

doCreatureSetNoMove(cid, true)

doChangeSpeed(cid, -getCreatureSpeed(cid))

addEvent(doTeleport, config.teleportInterval, cid, config.times)

 

 

 

essa e uma magia que o zipter crio pra mim mais ta dando esse erro quando e usada.e tipo quando o poke morre e o poke usando a magia nao acha um target pra hita da erros e a magia continua sendo usada.

se puder ajudar agradeço desde ja. ps. o zipter nao respondeu sobre o erro mandei pm pra ele e nada.

 

obrigado pelas ajuda ae amigo vlw.

Editado Outubro 6, 2015 por clebao666

[dalvorsn 268]

Entao, a linha que ta dando erro é essa aqui:

 

local index = math.random(#randomPosis)

A tabela randomPosis ta chegando vazia, dai a função math.random ta recebendo parametro nil. Dai o erro interval is empty

O que eu posso fazer por hora e impedir o erro de acontecer, mas não sei como isso vai afetar a execução da função em si, da uma testada ai:

 

elseif spell == "Flash Fire Kik" then
    local config = {
        times = 6,                  --Vezes que o pokémon irá se teleportar.
        appearEffect = 101,         --Efeito que vai aparecer no pokémon ao aparecer.
        effect = 111,               --Efeito de corte de garras.
        combat = STEELDAMAGE,       --Elemento.
        disappearInterval = 200,    --Tempo para, depois de reaparecer, o pokémon desaparecer novamente. (em milésimos de segundo)
        teleportInterval = 800     --Intervalo de tempo entre cada teleporte do pokémon. (em milésimos de segundo)
    }
 
    local pos = getPosfromArea(cid, spell_area)
    local randomPosis = {}
    for i = 1, config.times do
        randomPosis[i] = pos[math.random(#pos)]
        if not isWalkable(randomPosis[i]) or getTileInfo(randomPosis[i]).protection then
            while not isWalkable(randomPosis[i]) do
                randomPosis[i] = pos[math.random(#pos)]
            end
        end
    end
 
    local function doTeleport(cid, time, randomPosis)
        if not isCreature(cid) then return true end
        if not isCreature(target) or time <= 0 then
            doAppear(cid)
            doCreatureSetNoMove(cid, false)
            doRegainSpeed(cid)
        end
        if #randomPosis < 1 then return end
        
        local index = math.random(#randomPosis)
        doTeleportThing(cid, randomPosis[index])
        for i = index, #randomPosis do
            randomPosis[i] = randomPosis[i + 1] or nil
        end
        doAppear(cid)
        doSendMagicEffect(getThingPos(cid), config.appearEffect)
        doDanoWithProtect(cid, config.combat, getThingPos(target), 0, -min, -max, config.effect)
        addEvent(doDisapear, config.disappearInterval, cid)
        addEvent(doTeleport, config.teleportInterval, cid, time - 1, randomPosis)
    end
 
    doDisapear(cid)
    doCreatureSetNoMove(cid, true)
    doChangeSpeed(cid, -getCreatureSpeed(cid))
    addEvent(doTeleport, config.teleportInterval, cid, config.times, randomPosis)

[clebao666 6]

 

Entao, a linha que ta dando erro é essa aqui:

local index = math.random(#randomPosis)

A tabela randomPosis ta chegando vazia, dai a função math.random ta recebendo parametro nil. Dai o erro interval is empty

O que eu posso fazer por hora e impedir o erro de acontecer, mas não sei como isso vai afetar a execução da função em si, da uma testada ai:

elseif spell == "Flash Fire Kik" then
    local config = {
        times = 6,                  --Vezes que o pokémon irá se teleportar.
        appearEffect = 101,         --Efeito que vai aparecer no pokémon ao aparecer.
        effect = 111,               --Efeito de corte de garras.
        combat = STEELDAMAGE,       --Elemento.
        disappearInterval = 200,    --Tempo para, depois de reaparecer, o pokémon desaparecer novamente. (em milésimos de segundo)
        teleportInterval = 800     --Intervalo de tempo entre cada teleporte do pokémon. (em milésimos de segundo)
    }
 
    local pos = getPosfromArea(cid, spell_area)
    local randomPosis = {}
    for i = 1, config.times do
        randomPosis[i] = pos[math.random(#pos)]
        if not isWalkable(randomPosis[i]) or getTileInfo(randomPosis[i]).protection then
            while not isWalkable(randomPosis[i]) do
                randomPosis[i] = pos[math.random(#pos)]
            end
        end
    end
 
    local function doTeleport(cid, time, randomPosis)
        if not isCreature(cid) then return true end
        if not isCreature(target) or time <= 0 then
            doAppear(cid)
            doCreatureSetNoMove(cid, false)
            doRegainSpeed(cid)
        end
        if #randomPosis < 1 then return end
        
        local index = math.random(#randomPosis)
        doTeleportThing(cid, randomPosis[index])
        for i = index, #randomPosis do
            randomPosis[i] = randomPosis[i + 1] or nil
        end
        doAppear(cid)
        doSendMagicEffect(getThingPos(cid), config.appearEffect)
        doDanoWithProtect(cid, config.combat, getThingPos(target), 0, -min, -max, config.effect)
        addEvent(doDisapear, config.disappearInterval, cid)
        addEvent(doTeleport, config.teleportInterval, cid, time - 1, randomPosis)
    end
 
    doDisapear(cid)
    doCreatureSetNoMove(cid, true)
    doChangeSpeed(cid, -getCreatureSpeed(cid))
    addEvent(doTeleport, config.teleportInterval, cid, config.times, randomPosis)

 

ae man os eerro do portrait continuam ainda aq mesmo fazendo a correçao que vc me passou. tem como tu me passa o skype ae vemos oq pode ser tentei da goto pra ver se é algum poke especifico que tao usando aq mais nao da sempre que vo nos cara e testos os pokes que tao usando bem como os que tao caçando eles tao normais ae do nada volta a da o maldito erro e trava todo server. peço por favor se puder me passar o skype resolvemos aq vlw.

 

[SkyLigh 453]

Coloque os scripts em code caso contrario fica difícil conseguir ajuda-lo.

[dalvorsn 268]

deve ser algum pokemon que nao ta configurado man

[SkyLigh 453]

Tópico Movido
Este tópico foi movido de "OTServ → Suporte OTServ → Suporte Spriting"
para "OTServ → Suporte OTServ → Suporte Spriting → Pedidos e dúvidas resolvidos - Spriting".