clebao666

[07/08/2016 10:53:19] [Error - Npc interface] [07/08/2016 10:53:19] In a timer event called from: [07/08/2016 10:53:19] data/npc/scripts/.aDicipleloreley.lua:onThink [07/08/2016 10:53:19] Description: [07/08/2016 10:53:19] (luaDoCreateNpc) Npc with name '.aDiciplelorelay' not found agora mudou o erro quando o npc vai da resp da esse erro ae segue as scripts .Diciplelorelay.xml .aDiciplelorelay.lua .Diciplelorelay.xml .aDiciplelorelay.lua

se eu tiro o ponto como vc mencionou para fazer apenas no script.lua da esses erros esse ponto esta do mesmo jeito no npc ja existente no meu cliente by senhor. so que o nome dele e .hunter e esse funciona normal. segue os erros. [06/08/2016 15:03:45] Pokemon Dash Advanced (1.0), last compiled at Jan 11 2012. [06/08/2016 15:03:45] Credits to all TFS team (Elf, slawkens, Talaturen, Lithium, KaczooH, Kiper, Kornholijo). [06/08/2016 15:03:45] PokemonDistro made by mastercraft/brun123. [06/08/2016 15:03:45] >> Loading config (config.lua) [06/08/2016 15:03:45] > Using plaintext encryption [06/08/2016 15:03:45] >> Checking software version... failed checking - malformed file. [06/08/2016 15:03:47] >> Fetching blacklist [06/08/2016 15:03:47] >> Loading RSA key [06/08/2016 15:03:47] >> Starting SQL connection [06/08/2016 15:03:47] >> Running Database Manager [06/08/2016 15:03:49] > Optimized database. [06/08/2016 15:03:49] >> Loading items [06/08/2016 15:03:50] >> Loading groups [06/08/2016 15:03:50] >> Loading vocations [06/08/2016 15:03:50] >> Loading script systems [06/08/2016 15:03:52] >> Loading chat channels [06/08/2016 15:03:52] >> Loading outfits [06/08/2016 15:03:52] >> Loading experience stages [06/08/2016 15:03:52] >> Loading monsters [06/08/2016 15:03:53] >> Loading mods... [06/08/2016 15:03:53] > Loading classic_changender.xml... done. [06/08/2016 15:03:53] > Loading firstitems.xml... done. [06/08/2016 15:03:53] > Loading highscorebook.xml... done. [06/08/2016 15:03:53] > 3 mods were loaded. [06/08/2016 15:03:53] >> Loading map and spawns... [06/08/2016 15:03:57] > Map size: 2800x2000. [06/08/2016 15:03:57] > Map descriptions: [06/08/2016 15:03:57] "Saved with Remere's Map Editor 2.2" [06/08/2016 15:03:57] "Map Dash Editadu Por TiIoO" [06/08/2016 15:04:03] Duplicate uniqueId 3515 [06/08/2016 15:04:22] > Map loading time: 28.67 seconds. [06/08/2016 15:04:24] [Error - LuaScriptInterface::loadFile] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/.aDicipleloreley.lua [06/08/2016 15:04:24] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Error - LuaScriptInterface::loadFile] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/.aDicipleloreley.lua [06/08/2016 15:04:24] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Error - LuaScriptInterface::loadFile] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/.aDicipleloreley.lua [06/08/2016 15:04:24] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Error - LuaScriptInterface::loadFile] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/.aDicipleloreley.lua [06/08/2016 15:04:24] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Error - LuaScriptInterface::loadFile] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/.aDicipleloreley.lua [06/08/2016 15:04:24] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Error - LuaScriptInterface::loadFile] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory [06/08/2016 15:04:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/.aDicipleloreley.lua [06/08/2016 15:04:24] cannot open data/npc/scripts/.aDicipleloreley.lua: No such file or directory

cara eu crio sprites qquer uma sem copiar pego as imagens static nos forum japoneses e chineses e recrio com base nessas imagens as spr que eu quero. essa spr tem no pxg fiz o mais proximo deles possivel. e nao preciso provar nada pra vc. quando meu ot tive on se confere o mewtwo Y e x mega pinsir e todos que ja fiz aq so nao fico repassando pra ninguem. abraço.

ola galera. gostaria de uma ajuda para criar uma magia para ursaring pokemon. sera assim quando usada a magia. o pokemon no caso ursarin mudara de outfit para uma em que ela fica em 4 patas que criei . a partir dae ela entra em estado de berseker em que ela dobra o dano de suas magias porem seram usadas aleatoriamente pelo proprio pokemon como se fosse um selvagem. se nao tiver como fazer assim pode ser apenas ela trocar de outfit para a de 4 patas e isso faria ela tipo usar um focus so que manteria a outfit trocada por um tempo podendo usar as outras magias com dobro de força enquanto estiver nessa forma. segue foto da forma de 4 patas. agradeço desde ja. uso cyan 8.54 by senhor.

ola galera. gostaria de pedir ajuda na criançao de uma magia para mega blaziken. ele inicia a magia trocando para outfit que estarei postando a imagem aq que criei. ae entao começam a cair raios e fogo em uma area ao redor do pokemon as areas dos efects de raio e fogo no sqm em que o efeito estiver dara dano no alvo que estiver la podem ser tipo uns 10 raios e 10 fogos um em cada sqm aleatorio. vo madar a spr da outfit inicial da magia ela deve ficar ativa ate o fim da magia e o pokemon no caso mega blaziquem ficara inalvejavel em quanto durar a magia. qquer duvida quanto a magia por favor me avisem ou aq ou por skype . clebermoreno1 uso base cyan 8.54 by senhor

ola galera. gostaria de pedir se alguem pode me ajudar a criar uma magia que usa outfit ao inves de effect porq os effects do cyan so cabem 156 ja outfits pode usar quantas quiser. a magia sera . o poke troca para a outfit da magia e ira atraz do pokemon inimigo dando dano em linha a 3 sqm do poke inimigo. pra quem conhece e a magia de duplas chamas do magmortar. ele anda e solta chamas na direçao do poke atacado dando dano no 1 ,2 ,3 sqm na frente dele a outfit eu ja criei e ela vai pra todas as direçoes <>^\/. segue foto da minha sprite da magia. desde ja agradeço dmaiss a ajuda. vlw uso base cyan 8.54 by senhor

ola galera.] preciso de ajuda com meu npc. peguei um npc de battle que quando o player aparece na range do npc o npc começa a invocar os pokes e detonar o player. porem eu modifiquei a script e agora o npc que antes era meowth e agora passou a ser diciple lorelay nao volta mais no resp. a ideia e que esse npc batalha se na liga pokemon so que eu criei os npc certinho dos dicipulos e do elit four. quem puder me ajudar a fazer com que o npc volte no resp porq se alguem mata ele o npc so volta relogando o server. e tbm quando o player mata o poke do npc a corpse do poke que o npc usa cai no chao e o cara pode taca ball oq nao e legau porq sao todos shinys. desde ja agradeço a ajuda. segue erros e script do npc. preciso de uma ajuda para arrumar meu npc ele duela legau e a corpse some quando derrota todos os pokes, porem a corpse dos pokes derrotados ficam no chao para tacar ball. e o npc nao retorna mais no spaw. seguem os erros. [01/08/2016 22:15:24] [Error - Npc interface] [01/08/2016 22:15:24] data/npc/scripts/.aDicipleloreley.lua:onThink [01/08/2016 22:15:24] Description: [01/08/2016 22:15:24] (luaDoCreateMonster) Monster with name 'aDiciplelorelay' not found [01/08/2016 22:20:24] [Error - Npc interface] [01/08/2016 22:20:24] In a timer event called from: [01/08/2016 22:20:24] data/npc/scripts/.aDicipleloreley.lua:onThink [01/08/2016 22:20:24] Description: [01/08/2016 22:20:24] (luaDoCreateNpc) Npc with name '.aDiciplelorelay' not found [01/08/2016 22:20:30] [Warning - Npc::loadFromXml] Cannot load npc file (data/npc/.aDiciplelorelay.xml). [01/08/2016 22:20:30] Info: failed to load external entity "data/npc/.aDiciplelorelay.xml" .aDiciplelorelay.lua .aDiciple Lorelay.xml .aDiciplelorelay.lua .aDiciple Lorelay.xml

esquece man se troca os itens pelo poke direto ta otimo dmaissssss como sempre tu se supera manja dmaissss. se puder da uma olhada nas magias que pensei em fazer la se puder me ajudar agradeço vc dmaisss e tu mesmo que ajuda o povo do forum na minha opiniao se devia ser dono do forum e ganha donates de geral . fica dica ae de criar talves o seu proprio vlw reputado sempre. vo testa aq a script ve se nao da erro. resolvido como sempre tu ajudando , meu amigo a script ta perfeita como eu queria e tenho certeza que variossssss vao usala so espero que todos deem rep+ pra vc zipter obrigado a todos que tentaram ajudar ae. brigado mesmo.

eaw zipter blz man. tipo nao entendi a script sua porq onde fica pra por o id dos itens que o npc pede e onde fica o id da box que o npc vai dar em troca do item. seria um npc so que trocaria itens por shiny box especificas uma pra cada shiny exemplo. se me der 50 pot of fire te dou uma shiny box de charizard se me der 50 ice clow te dou uma box de jynx tendeu se essa scrript que tu posto ae estiver assim ja peço desculpas pela minha falta de exp em script. senao ajuda eu ae man por favor vlw. s2 como sempre reputado por ajudar.

desse jeito ae se o cara tem apenas 50 de um item o npc ja da todas as box de uma ves que tao na parte de baixo no caso testei apenas duas do zard e toise e so tiro 50 das escences e ja foi dando as 2 box tem que mudar a script ae so nao sei como

tipo man se nao entendeu . as box e de boas criar mais umas 200 o foda e enfia um npc pra cada troca de itens por box tendeu. eu queria um npc que o cara fala hi help yes se ele tive o item escence zard ele ganha uma box de shiny zard , ja se ele tiver por exenplo um escence toise ae o proprio npc da pra ele uma box de shiny toise. tendeu senao vo ter que criar um npc e uma box pra cada shiny que eu va por pra trocar e pretendo por todos do server. se souber me ajudar agradeço dmaissss vlw ae man.

testado e aprovado. script sem erro e funfando legau apenas teria que ser refeita pra o mesmo npc poder trocar mais itens diferentes por pokes diferentes. se puder me ajudar agradeço muito vlww ja dei rep++

acho que esse da certo sim vo testar aq vlw jaja posto se funciono. so como pedi la sera varios pokes mesmo que eu crie uma box pra cada shiny que eu quero trocar tem como esse npc trocar todas as box. tipo 50 ecence zard > 1 box zard 50 escence toise > 1 box toise tendeu o mesmo npc trocar varios itens por varias box. agradeço dmais a ajuda de vcs ae vlw galera. ola amigo. pode ser por box sim amis como falei ae teria que o mesmo npc tipo pedir me de 50 escence zard e te do > uma box shiny charizard se me der 50 escence toise te do > uma box toise e assim por diante. tera uns 30 shiny ou mais pra ele fazer. desde ja agradeço a qquer ajuda vlw.

ola galera! gostaria de uma ajuda na criação de um npc que troca x item por 1 pokemon exemplo: escence zard x 50 >shiny charizard escence toise x 50 >shiny blastoise estarei colocando uns 40 pokes nesse npc . agradeço dmais a ajuda dos companheiros ae do forum. vlw uso base cyan by senhor

fala galera do xtibia. to com mais um pedido aos amigos de uma magia. e um hyper beam pra quem nao conhece e um raio que inicia no poke e vai ate o fim da tela. mais essa magia sera um hyper beam pra frente tras baixo e cima ao mesmo tempo sera 4 raios saindo do pokemon ao mesmo tempo e indo do centro onde o pokemon esta e indo ate uns 10 sqm pra frente. desde ja agradeço a qquer ajuda vlw.

ola galera do x tibia. gostaria de uma magia para (pda by senhor) ele seria como se fosse testar um efeito com /x ela sai do pokemon e vai ate o fim da tela por 5 veses. desde ja agradeço dmaiss a ajuda.

ola galera do x tibia. gostaria de pedir uma magia essa vai ser foda zipter kkkk. lembrando que ela nao existe entao nao posso mostrar em video ou imagens. o pokemons inicia um ataque no target ele desaparece e se transforma em 4 nos quatro cantos da tela cada um solta um efeito de magia e reaparecem do lado do pokemon que estao atacando e fazem outro efeito no alvo batendo nele com os 4 hit de dano. se precisar de mais dados e so pergunta ae to on dia e noite . e desde ja agradeço dmais a quem puder ajuda vlww

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.

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.

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.

ola galera do x tibia. peço a quem tiver ou puder me ajudar a criar uma script para fishing para pda by senhor. systema tipo pxg ate achei algumas mais no teste tao bugadas talves so no meu server mais tao bugadas varios erros. aq no meu ot tem systema de pesca por iscas dependendo da isca se pesca um pokemon mais forte. e as iscas so podem ser usadar no lv de pesca certo dela. desde ja agradeço dmais a quem puder me ajudar vlwwww.

ola galera do xtibia. gostaria da ajuda do pessoal ae pra criar uma golden arena ja testei algumas que achei no forum mais nenhuma dels funfo aq no meu pda by senhor. a script e o seguinte uma alavanca e puxada e rolaa 15 rodadas de pokes em uma invasao a cada rodada cai uns 30 pokes ou mais pode ir aumentando. e quanto amis rodadas o player aguenta maior e o numero de premios que ele ganha ate o fim que seria na 15 rodada. teria tbm um quadro que diz o rank de quem foi mais longe na goldem arena. desde ja agradeço dmaisss. e qquer duvida sobre oq preciso e so me falar aq que mando amis dados . vlww

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.