Ajuda Com Ataque Pokémon

elseif pokemon.x.spell == "Hypnosis" then

doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)

doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)

exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)

setPlayerStorageValue(getCreatureTarget(cid), 90221, 1)

doChangeSpeed(getCreatureTarget(cid), -310)

local mudalvo = getCreatureTarget(cid)

local function ver(params)

if isCreature(params.mudalvo) then

if getPlayerStorageValue(params.mudalvo, 90221) >= 1 then

setPlayerStorageValue(params.mudalvo, 90221, -1)

doChangeSpeed(params.mudalvo, 310)

end

end

end

local function muds(params)

if isCreature(params.alvo) then

if getPlayerStorageValue(params.alvo, 90221) >= 1 then

doSendMagicEffect(getThingPos(params.alvo), 32)

end

end

end

addEvent(muds, 500, {alvo = mudalvo})

addEvent(muds, 1000, {alvo = mudalvo})

addEvent(muds, 1500, {alvo = mudalvo})

addEvent(muds, 2000, {alvo = mudalvo})

addEvent(muds, 2500, {alvo = mudalvo})

addEvent(muds, 3000, {alvo = mudalvo})

addEvent(muds, 3500, {alvo = mudalvo})

addEvent(muds, 4000, {alvo = mudalvo})

addEvent(ver, 4100, {mudalvo = mudalvo})

doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 33)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -(0), -(0), 32)

return 0

No caso adicionaria a Storage 90221 no Target, deixaria ele imovel e fazendo o efeito de sleep.e a spell para o pokemon selvagem ficaria assim

 

 

 

function onCastSpell(cid, var)

if getPlayerStorageValue(cid, 3) >= 1 then

doSendAnimatedText(getThingPos(cid), "MISS", 215)

setPlayerStorageValue(cid, 3, -1)

return true

end

local mudalvo = getCreatureTarget(cid)

local function ver(params)

if isCreature(params.mudalvo) then

if getPlayerStorageValue(params.mudalvo, 90221) >= 1 then

setPlayerStorageValue(params.mudalvo, 90221, -1)

doChangeSpeed(params.mudalvo, 310)

end

end

end

local function muds(params)

if isCreature(params.alvo) then

if getPlayerStorageValue(params.alvo, 90221) >= 1 then

doSendMagicEffect(getThingPos(params.alvo), 32)

end

end

end

addEvent(muds, 500, {alvo = mudalvo})

addEvent(muds, 1000, {alvo = mudalvo})

addEvent(muds, 1500, {alvo = mudalvo})

addEvent(muds, 2000, {alvo = mudalvo})

addEvent(muds, 2500, {alvo = mudalvo})

addEvent(muds, 3000, {alvo = mudalvo})

addEvent(muds, 3500, {alvo = mudalvo})

addEvent(muds, 4000, {alvo = mudalvo})

addEvent(ver, 4100, {mudalvo = mudalvo})

if getPlayerStorageValue(cid, 90221) <= 0 then

setPlayerStorageValue(getCreatureTarget(cid), 90221, 1)

doChangeSpeed(getCreatureTarget(cid), -310)

doSendDistanceShoot(getThingPos(cid), getThingPos(getCreatureTarget(cid)), 33)

doAreaCombatHealth(cid, PSYCHICDAMAGE, getThingPos(getCreatureTarget(cid)), 0, -(0), -(0), 32)

doCreatureSay(cid, "HYPNOSIS!", TALKTYPE_MONSTER)

end

 

return 0

end

 

isso foi postado por DarkAngels, entao nao me de rep, procure algum post dele e de a ele.

http://www.xtibia.com/forum/topic/169460-furious-legs-para-shiny-hitmonlee/ ta ai.

obs: no comeco fala sobre hitmonlee, mais abaixo ele posto.