Olá a todos do Xtibia que sempre me ajudam aqui vai mais um pedido de ajuda =)
Eu tenho algumas magias de m1,m2 etc que não estão fazendo o que deveriam fazer por exemplo, a magia Healarea do Chansey que no meu server é no m5 não heala todos como deveria fazer só heala a si mesmo. Meu Sleep Powder que está no m8 não faz o pokemon dormir só tira um hitzinho e mais nada. E por último o Poison Powder no m10 que tbm só tira um hitzinho não fica com aquele efeito de poison perdendo hp aos poucos. Não sei se é facil ou dificil arrumar isso ou conseguir um script melhor mas peço a ajuda de vcs assim mesmo. Obrigado desde já a quem me ajudar.
Não sei se vai ajudar mas vou colocar os (m1, m2 etc) referente as magias que citei acima pra derrepente vcs possam identificar o que está errado.
Healarea
local thunderwavecondition = createConditionObject(CONDITION_PARALYZE)
setConditionParam(thunderwavecondition, CONDITION_PARAM_TICKS, 9000)
setConditionFormula(thunderwavecondition, -0.75, -0.75, -0.75, -0.75)
------SLEEP POWNDER
local sleepcondition = createConditionObject(CONDITION_PARALYZE)
setConditionParam(sleepcondition, CONDITION_PARAM_TICKS, 10000) -- 5 segundos
setConditionParam(sleepcondition, CONDITION_PARAM_SPEED, -5000) -- paralizado
setConditionFormula(sleepcondition, -0.9, 0, -0.9, 0)
local confusion = createCombatArea{
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}
local waba = createCombatArea{
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 3, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}
local scyther = {lookType = 15}
local swaven = createCombatArea{
{0, 0, 0, 0, 0},
{0, 0, 0, 0, 0},
{0, 0, 3, 0, 0},
{0, 0, 1, 0, 0},
{0, 0, 1, 0, 0}
}
local swaves = createCombatArea{
{0, 0, 0, 0, 0},
{0, 0, 0, 0, 0},
{0, 1, 2, 0, 0},
{0, 1, 0, 0, 0},
{0, 1, 0, 0, 0}
}
local swavee = createCombatArea{
{0, 0, 0, 0, 0},
{0, 0, 0, 0, 0},
{0, 0, 2, 0, 0},
{1, 1, 1, 0, 0},
{0, 0, 0, 0, 0}
}
local swavew = createCombatArea{
{0, 0, 0, 0, 0},
{0, 0, 0, 0, 0},
{0, 0, 3, 1, 1},
{0, 0, 0, 0, 0},
{0, 0, 0, 0, 0}
}
local charge = createCombatArea{
{1, 1, 1},
{1, 2, 1},
{1, 1, 1},
}
local tsn = createCombatArea{
{0, 0, 0, 2, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 1, 1, 1, 1, 0},
}
local tss = createCombatArea{
{0, 1, 1, 1, 1, 1, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 2, 0, 0, 0},
}
local tse = createCombatArea{
{0, 0, 1, 0, 0, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 1, 2},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0},
}
local tsw = createCombatArea{
{0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 1, 1, 1},
{0, 0, 2, 1, 1, 1, 1},
{0, 0, 0, 0, 1, 1, 1},
{0, 0, 0, 0, 0, 0, 1},
}
local iwn = createCombatArea{
{0, 0, 0, 2, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 1, 0, 1, 0},
}
local iws = createCombatArea{
{0, 1, 0, 1, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 2, 0, 0, 0},
}
local iwe = createCombatArea{
{0, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 1, 2},
{0, 0, 0, 1, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0},
}
local iww = createCombatArea{
{0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 1, 1, 0},
{0, 0, 2, 1, 1, 1, 1},
{0, 0, 0, 0, 1, 1, 0},
{0, 0, 0, 0, 0, 0, 1},
}
local bomb = createCombatArea{
{1, 1, 1},
{1, 3, 1},
{1, 1, 1},
}
local thunder = createCombatArea{
{1, 0, 0, 1, 0, 0, 1},
{0, 1, 0, 1, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0},
{1, 1, 1, 2, 1, 1, 1},
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 1, 0, 1, 0},
{1, 0, 0, 1, 0, 0, 1},
}
local gl1 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0},
{0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 2, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local gl2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0},
{0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 2, 1, 0, 1, 0, 0},
{0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0},
{0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local destruct1 = createCombatArea{
{0, 0, 1, 0, 0},
{0, 1, 1, 1, 0},
{1, 1, 3, 1, 1},
{0, 1, 1, 1, 0},
{0, 0, 1, 0, 0}
}
local destruct2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 3, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local destruct3 = createCombatArea{
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0},
{1, 1, 0, 0, 0, 3, 0, 0, 0, 1, 1},
{0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}
}
local stomp = createCombatArea{
{1, 0, 1, 0, 1},
{0, 1, 1, 1, 0},
{1, 1, 2, 1, 1},
{0, 1, 1, 1, 0},
{1, 0, 1, 0, 1}
}
local toxicn = createCombatArea{
{0, 2, 0},
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
}
local toxics = createCombatArea{
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
{0, 2, 0},
}
local toxice = createCombatArea{
{0, 1, 1, 1, 1, 2},
}
local toxicw = createCombatArea{
{2, 1, 1, 1, 1, 0},
}
local sand1 = createCombatArea{
{0, 0, 0},
{0, 3, 0},
{0, 0, 0},
}
local whirl3 = createCombatArea{
{0, 0, 0},
{1, 3, 1},
{0, 0, 0},
}
local whirl5 = createCombatArea{
{0, 0, 0, 0, 0},
{1, 1, 3, 1, 1},
{0, 0, 0, 0, 0},
}
local whirl32 = createCombatArea{
{0, 0, 0},
{1, 3, 1},
{0, 0, 0},
}
local whirl52 = createCombatArea{
{0, 0, 0, 0, 0},
{1, 1, 3, 1, 1},
{0, 0, 0, 0, 0},
}
local flamen = createCombatArea{
{0, 0, 2, 0, 0},
{0, 1, 1, 1, 0},
{0, 1, 1, 1, 0},
{0, 1, 1, 1, 0},
{0, 0, 0, 0, 0}
}
local flames = createCombatArea{
{0, 0, 0, 0, 0},
{0, 1, 1, 1, 0},
{0, 1, 1, 1, 0},
{0, 1, 1, 1, 0},
{0, 0, 2, 0, 0}
}
local flamew = createCombatArea{
{0, 0, 0, 0, 0},
{0, 1, 1, 1, 0},
{2, 1, 1, 1, 0},
{0, 1, 1, 1, 0},
{0, 0, 0, 0, 0}
}
local flamee = createCombatArea{
{0, 0, 0, 0, 0},
{0, 1, 1, 1, 0},
{0, 1, 1, 1, 2},
{0, 1, 1, 1, 0},
{0, 0, 0, 0, 0}
}
local wg1n = createCombatArea{
{0, 0, 0},
{0, 2, 0},
{0, 1, 0},
}
local wg2n = createCombatArea{
{0, 2, 0},
{0, 0, 0},
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
}
local wg3n = createCombatArea{
{0, 2, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 1, 0},
}
local wg1s = createCombatArea{
{0, 1, 0},
{0, 2, 0},
{0, 0, 0},
}
local wg2s = createCombatArea{
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
{0, 0, 0},
{0, 2, 0},
}
local wg3s = createCombatArea{
{0, 1, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 2, 0},
}
local wg1e = createCombatArea{
{0, 0, 0},
{1, 2, 0},
{0, 0, 0},
}
local wg2e = createCombatArea{
{1, 1, 1, 0, 2},
}
local wg3e = createCombatArea{
{1, 0, 0, 0, 0, 2},
}
local wg1w = createCombatArea{
{0, 0, 0},
{0, 2, 1},
{0, 0, 0},
}
local wg2w = createCombatArea{
{2, 0, 1, 1, 1},
}
local wg3w = createCombatArea{
{2, 0, 0, 0, 0, 1},
}
-- WATER GUN END
--WING ATTACK
local wingn = createCombatArea{
{0, 0, 0},
{1, 2, 0},
{0, 0, 0},
}
local wings = createCombatArea{
{1, 0, 0},
{0, 2, 0},
{0, 0, 0},
}
local winge = createCombatArea{
{1, 0, 0},
{0, 2, 0},
{0, 0, 0},
}
local wingw = createCombatArea{
{0, 2, 3},
{0, 2, 2},
{0, 0, 0},
}
local wingds = createCombatArea{
{1, 1, 1},
{0, 2, 0},
{0, 0, 0},
}
local wingdn = createCombatArea{
{0, 0, 0},
{0, 2, 0},
{1, 1, 1},
}
local wingde = createCombatArea{
{1, 0, 0},
{1, 2, 0},
{1, 0, 0},
}
local wingdw = createCombatArea{
{0, 0, 1},
{0, 2, 1},
{0, 0, 1},
}
local pokeis = {'Bulbasaur', 'Ivysaur', 'Venusaur', 'Charmander', 'Charmeleon', 'Charizard', 'Squirtle',
'Wartortle', 'Blastoise', 'Butterfree', 'Beedrill', 'Pidgeotto', 'Pidgeot', 'Spearow', 'Fearow', 'Ekans',
'Arbok', 'Pikachu', 'Raichu', 'Nidoranfe', 'Nidorina', 'Nidoqueen', 'Nidoranma', 'Nidorino', 'Nidoking',
'Clefairy', 'Clefable', 'Vulpix', 'Ninetales', 'Jigglypuff', 'Wigglytuff', 'Zubat', 'Golbat', 'Bellsprout',
'Weepinbell', 'Victreebel', 'Paras', 'Parasect', 'Venonat', 'Venomoth', 'Diglett', 'Dugtrio', 'Persian',
'Golduck', 'Mankey', 'Primeape', 'Growlithe', 'Arcanine', 'Poliwag', 'Poliwhirl', 'Poliwrath', 'Kadabra',
'Alakazam', 'Oddish', 'Gloom', 'Vileplume', 'Machop', 'Machoke', 'Machamp', 'Tentacool', 'Tentacruel',
'Ponyta', 'Rapidash', 'Slowpoke', 'Slowbro', 'Farfetchd', 'Seel', 'Dewgong', 'Shellder', 'Cloyster', 'Gastly',
'Haunter', 'Gengar', 'Onix', 'Drowzee', 'Hypno', 'Krabby', 'Kingler', 'Exeggcute', 'Exeggutor', 'Cubone', 'Marowak',
'Hitmonchan', 'Lickitung', 'Koffing', 'Weezing', 'Rhyhorn', 'Rhydon', 'Chansey', 'Tangela', 'Kangaskhan',
'Horsea', 'Seadra', 'Grimer', 'Muk', 'Doduo', 'Dodrio', 'Magnemite', 'Magneton', 'Voltorb', 'Electrode',
'Geodude', 'Graveler', 'Golem', 'Sandshrew', 'Sandslash', 'Goldeen', 'Seaking', 'Staryu', 'Starmie', 'MrMime',
'Scyther', 'Jynx', 'Electabuzz', 'Magmar', 'Pinsir', 'Tauros', 'Gyarados', 'Lapras', 'Ditto', 'Eevee',
'Vaporeon', 'Jolteon', 'Flareon', 'Porygon', 'Omanyte', 'Omastar', 'Kabuto', 'Kabutops', 'Aerodactyl',
'Snorlax', 'Articuno', 'Zapdos', 'Moltres', 'Dragonair', 'Dragonite', 'Elder Charizard', 'Crystal Onix',
'Ditto', 'Mew', 'Mewtwo'}
local c = {
[25] = {x = {
pok = bulbasaur,
spell = "Leech Seed",
minLv = 22,
ex = 1000005,
base1 = 25,
base2 = 35,
dista = 3,
bonus = 2.5,
type = "grass",
cd = 25
}
},
[24] = {x = {
pok = ivysaur,
spell = "Leech Seed",
minLv = 40,
ex = 2000005,
base1 = 60,
base2 = 75,
dista = 3,
bonus = 3.2,
type = "grass",
cd = 30
}
},
[22] = {x = {
pok = venusaur,
spell = "Leech Seed",
minLv = 85,
ex = 3000005,
base1 = 100,
base2 = 130,
dista = 3,
bonus = 5,
type = "grass",
cd = 30
}
},
[29] = {x = {
pok = charmander,
spell = "Fire Fang",
minLv = 24,
ex = 4000005,
base1 = 40,
base2 = 67,
dista = 1,
bonus = 3.5,
type = "fire",
cd = 24
}
},
[23] = {x = {
pok = charmeleon,
spell = "Fire Fang",
minLv = 40,
ex = 5000005,
base1 = 70,
base2 = 95,
dista = 1,
bonus = 4,
type = "fire",
cd = 22
}
},
[67] = {x = {
pok = charizard,
spell = "Fire Fang",
minLv = 85,
ex = 5000005,
base1 = 178,
base2 = 256,
dista = 1,
bonus = 6,
type = "fire",
cd = 20
}
},
[2] = {x = {
pok = squirtle,
spell = "Aqua Tail",
minLv = 22,
ex = 1090005,
base1 = 58,
base2 = 80,
dista = 1,
bonus = 2,
type = "water",
cd = 14
}
},
[6] = {x = {
pok = wartortle,
spell = "Aqua Tail",
minLv = 40,
ex = 1100005,
base1 = 100,
base2 = 157,
dista = 1,
bonus = 3.5,
type = "water",
cd = 14
}
},
[55] = {x = {
pok = blastoise,
spell = "Aqua Tail",
minLv = 85,
ex = 1100005,
base1 = 190,
base2 = 225,
dista = 1,
bonus = 5,
type = "water",
cd = 18
}
},
[40] = {x = {
pok = butterfree,
spell = "Psybeam",
minLv = 36,
ex = 1300005,
base1 = 120,
base2 = 157,
dista = 4,
target = "no",
bonus = 12.8,
type = "psychic",
cd = 25
}
},
[45] = {x = {
pok = beedrill,
spell = "Rage",
minLv = 25,
ex = 1500005,
base1 = 140,
base2 = 160,
dista = 5,
target = "no",
bonus = 3.3,
type = "dragon",
cd = 35
}
},
[5] = {x = {
pok = pidgeotto,
spell = "Wing Attack",
minLv = 20,
ex = 1700005,
base1 = 220,
base2 = 250,
dista = 1,
bonus = 7,
target = "no",
type = "flying",
cd = 35
}
},
[80] = {x = {
pok = pidgeot,
spell = "Wing Attack",
minLv = 65,
ex = 1800005,
base1 = 220,
base2 = 250,
dista = 1,
bonus = 9,
target = "no",
type = "flying",
cd = 35
}
},
[27] = {x = {
pok = spearow,
spell = "Rage",
minLv = 10,
ex = 2500005,
base1 = 40,
base2 = 60,
dista = 5,
bonus = 2.5,
type = "flying",
cd = 9
}
},
[17] = {x = {
pok = fearow,
spell = "Whirlwind",
minLv = 50,
ex = 2600005,
base1 = 120,
base2 = 170,
dista = 5,
target = "no",
bonus = 3.5,
type = "flying",
cd = 20
}
},
[7] = {x = {
pok = ekans,
spell = "Fear",
minLv = 23,
ex = 2600005,
base1 = 0,
base2 = 0,
dista = 3,
bonus = 2.5,
target = "no",
type = "ghost",
cd = 18
}
},
[39] = {x = {
pok = arbok,
spell = "Acid",
minLv = 3,
ex = 2700005,
base1 = 140,
base2 = 176,
dista = 4,
bonus = 4,
type = "poison",
cd = 15
}
},
[59] = {x = {
pok = pikachu,
spell = "Iron Tail",
minLv = 26,
ex = 2800005,
base1 = 110,
base2 = 120,
dista = 1,
bonus = 3,
type = "normal",
cd = 17
}
},
[50] = {x = {
pok = raichu,
spell = "Thunder Punch",
minLv = 50,
ex = 2900005,
base1 = 140,
base2 = 186,
dista = 1,
bonus = 4.9,
type = "electric",
cd = 19
}
},
[70] = {x = {
pok = nidoranfe,
spell = "Poison Fang",
minLv = 15,
ex = 3000005,
base1 = 40,
base2 = 80,
dista = 1,
bonus = 2,
type = "poison",
cd = 10
}
},
[71] = {x = {
pok = nidorina,
spell = "Poison Fang",
minLv = 30,
ex = 3000005,
base1 = 100,
base2 = 130,
dista = 1,
bonus = 3,
type = "poison",
cd = 9
}
},
[79] = {x = {
pok = nidoqueen,
spell = "Poison Fang",
minLv = 65,
ex = 3100005,
base1 = 140,
base2 = 170,
dista = 1,
bonus = 4.5,
type = "poison",
cd = 10
}
},
[66] = {x = {
pok = nidoranma,
spell = "Poison Fang",
minLv = 15,
ex = 3200005,
base1 = 50,
base2 = 80,
dista = 1,
bonus = 3,
type = "poison",
cd = 15
}
},
[78] = {x = {
pok = nidorino,
spell = "Poison Fang",
minLv = 30,
ex = 3300005,
base1 = 99,
base2 = 116,
dista = 1,
bonus = 4,
type = "poison",
cd = 12
}
},
[35] = {x = {
pok = nidoking,
spell = "Poison Fang",
minLv = 65,
ex = 3400005,
base1 = 170,
base2 = 200,
dista = 1,
bonus = 5,
type = "poison",
cd = 9
}
},
[73] = {x = {
pok = clefairy,
spell = "Multi-Slap",
minLv = 22,
ex = 3500005,
base1 = 30,
base2 = 65,
dista = 5,
bonus = 2,
target = "no",
type = "normal",
cd = 20
}
},
[68] = {x = {
pok = clefable,
spell = "Great Love",
minLv = 52,
ex = 3600005,
base1 = 140,
base2 = 190,
dista = 5,
target = "no",
bonus = 3,
type = "normal",
cd = 50
}
},
[62] = {x = {
pok = vulpix,
spell = "Flame Wheel",
minLv = 25,
ex = 3700005,
base1 = 80,
base2 = 100,
dista = 3,
bonus = 3,
target = "no",
type = "fire",
cd = 22
}
},
[114] = {x = {
pok = Ninetales,
spell = "Flame Wheel",
minLv = 70,
ex = 3800005,
base1 = 136,
base2 = 165,
dista = 1,
bonus = 4,
type = "fire",
cd = 18
}
},
[63] = {x = {
pok = Jigglypuff,
spell = "Hyper Voice",
minLv = 30,
ex = 3900005,
base1 = 80,
base2 = 110,
dista = 5,
bonus = 4,
target = "no",
type = "Normal",
cd = 23
}
},
[64] = {x = {
pok = Wigglytuff,
spell = "Selfheal",
minLv = 50,
ex = 4000005,
base1 = 220,
base2 = 255,
dista = 1,
target = "no",
bonus = 10,
type = "normal",
cd = 75
}
},
[44] = {x = {
pok = zubat,
spell = "Toxic",
minLv = 15,
ex = 4100005,
base1 = 70,
base2 = 120,
dista = 3,
bonus = 2.7,
target = "no",
type = "poison",
cd = 14
}
},
[122] = {x = {
pok = golbat,
spell = "Toxic",
minLv = 35,
ex = 4200005,
base1 = 100,
base2 = 140,
dista = 3,
bonus = 3.5,
target = "no",
type = "poison",
cd = 13
}
},
[250] = {x = {
pok = bellsprout,
spell = "Slash",
minLv = 5,
ex = 6900005,
base1 = 30,
base2 = 50,
dista = 1,
bonus = 2.5,
type = "normal",
cd = 10
}
},
[37] = {x = {
pok = weepinbell,
spell = "Slash",
minLv = 25,
ex = 7000005,
base1 = 80,
base2 = 120,
dista = 1,
bonus = 3.5,
type = "normal",
cd = 11
}
},
[240] = {x = {
pok = victreebel,
spell = "Slash",
minLv = 50,
ex = 7100005,
base1 = 110,
base2 = 170,
dista = 1,
bonus = 5,
type = "normal",
cd = 9
}
},
[81] = {x = {
pok = paras,
spell = "Poison Powder",
minLv = 8,
ex = 4600005,
base1 = 56,
base2 = 66,
dista = 5,
target = "no",
bonus = 2,
type = "poison",
cd = 28
}
},
[95] = {x = {
pok = parasect,
spell = "Poison Bomb",
minLv = 50,
ex = 4700005,
base1 = 110,
base2 = 140,
dista = 3,
bonus = 3,
type = "poison",
cd = 17
}
},
[52] = {x = {
pok = venonat,
spell = "Poison Fang",
minLv = 20,
ex = 4800005,
base1 = 50,
base2 = 90,
dista = 1,
bonus = 3,
type = "poison",
cd = 20
}
},
[49] = {x = {
pok = venomoth,
spell = "Psychic",
minLv = 50,
ex = 4900005,
base1 = 110,
base2 = 125,
dista = 5,
target = "no",
bonus = 4,
type = "psychic",
cd = 43
}
},
[82] = {x = {
pok = diglett,
spell = "Earthshock",
minLv = 15,
ex = 5000005,
base1 = 60,
base2 = 100,
dista = 3,
bonus = 2.9,
target = "no",
type = "ground",
cd = 30
}
},
[83] = {x = {
pok = dugtrio,
spell = "Earthshock",
minLv = 35,
ex = 5100005,
base1 = 110,
base2 = 132,
dista = 3,
bonus = 4.9,
target = "no",
type = "ground",
cd = 43
}
},
[3] = {x = {
pok = persian,
spell = "Fury Cutter",
minLv = 38,
ex = 5300005,
base1 = 110,
base2 = 119,
dista = 1,
bonus = 4,
target = "no",
type = "bug",
cd = 15
}
},
[99] = {x = {
pok = golduck,
spell = "Confusion",
minLv = 55,
ex = 5500005,
base1 = 110,
base2 = 140,
dista = 5,
bonus = 4,
target = "no",
type = "psychic",
cd = 35
}
},
[106] = {x = {
pok = mankey,
spell = "Rage",
minLv = 22,
ex = 5600005,
base1 = 40,
base2 = 55,
dista = 3,
bonus = 3,
target = "no",
type = "dragon",
cd = 20
}
},
[103] = {x = {
pok = primeape,
spell = "Mega Punch",
minLv = 56,
ex = 5700005,
base1 = 110,
base2 = 160,
dista = 1,
bonus = 4,
type = "fighting",
cd = 12
}
},
[109] = {x = {
pok = growlithe,
spell = "Flamethrower",
minLv = 25,
ex = 5800005,
base1 = 60,
base2 = 80,
bonus = 3,
target = "no",
type = "fire",
cd = 12
}
},
[88] = {x = {
pok = arcanine,
spell = "Flamethrower",
minLv = 80,
ex = 5900005,
base1 = 120,
base2 = 170,
bonus = 4.5,
target = "no",
type = "fire",
cd = 11
}
},
[111] = {x = {
pok = poliwag,
spell = "Hypnosis",
minLv = 12,
ex = 6000005,
base1 = 0,
base2 = 0,
dista = 4,
bonus = 3,
type = "psychic",
cd = 10
}
},
[212] = {x = {
pok = poliwhirl,
spell = "Mega Punch",
minLv = 30,
ex = 6100005,
base1 = 80,
base2 = 110,
dista = 1,
bonus = 4,
type = "fighting",
cd = 12
}
},
[104] = {x = {
pok = poliwrath,
spell = "Dizzy Punch",
minLv = 69,
ex = 6200005,
base1 = 170,
base2 = 190,
dista = 1,
bonus = 4.5,
type = "fighting",
cd = 17
}
},
[219] = {x = {
pok = kadabra,
spell = "Psychic",
minLv = 47,
ex = 6400005,
base1 = 120,
base2 = 145,
dista = 5,
target = "no",
bonus = 4,
type = "psychic",
cd = 30
}
},
[218] = {x = {
pok = alakazam,
spell = "Psychic",
minLv = 80,
ex = 6500005,
base1 = 170,
base2 = 210,
dista = 5,
target = "no",
bonus = 5,
type = "psychic",
cd = 30
}
},
[56] = {x = {
pok = oddish,
spell = "Stun Spore",
minLv = 10,
ex = 4300005,
base1 = 0,
base2 = 0,
dista = 5,
target = "no",
bonus = 0,
type = "grass",
cd = 10
}
},
[74] = {x = {
pok = gloom,
spell = "Poison Gas",
minLv = 32,
ex = 4400005,
base1 = 30,
base2 = 60,
dista = 5,
bonus = 3.5,
target = "no",
type = "poison",
cd = 20
}
},
[86] = {x = {
pok = vileplume,
spell = "Poison Gas",
minLv = 50,
ex = 4500005,
base1 = 70,
base2 = 100,
dista = 5,
bonus = 4.5,
target = "no",
type = "poison",
cd = 13
}
},
[118] = {x = {
pok = machop,
spell = "Strafe",
minLv = 30,
ex = 6600005,
base1 = 50,
base2 = 70,
dista = 5,
Target = "No",
bonus = 2.7,
type = "speed",
cd = 25
}
},
[113] = {x = {
pok = machoke,
spell = "Gorund Chop",
minLv = 45,
ex = 6700005,
base1 = 80,
base2 = 110,
dista = 1,
bonus = 3.7,
type = "fighting",
cd = 30
}
},
[121] = {x = {
pok = machamp,
spell = "Ground Chop",
minLv = 70,
ex = 6800005,
base1 = 150,
base2 = 180,
dista = 1,
bonus = 5,
target = "no",
type = "fighting",
cd = 27
}
},
[96] = {x = {
pok = tentacool,
spell = "Mud Shot",
minLv = 19,
ex = 7200005,
base1 = 20,
base2 = 35,
dista = 4,
bonus = 2.5,
type = "ground",
cd = 15
}
},
[108] = {x = {
pok = tentacruel,
spell = "Acid",
minLv = 75,
ex = 7300005,
base1 = 125,
base2 = 130,
dista = 3,
bonus = 3.5,
type = "poison",
cd = 15
}
},
[16] = {x = {
pok = ponyta,
spell = "Stomp",
minLv = 28,
ex = 7700005,
base1 = 60,
base2 = 110,
dista = 5,
bonus = 4,
target = "no",
type = "ground",
cd = 10
}
},
[220] = {x = {
pok = rapidash,
spell = "Horn Attack",
minLv = 55,
ex = 7800005,
base1 = 100,
base2 = 160,
dista = 1,
bonus = 4.5,
type = "normal",
cd = 10
}
},
[75] = {x = {
pok = slowpoke,
spell = "Water Gun",
minLv = 20,
ex = 7900005,
base1 = 50,
base2 = 80,
dista = 4,
target = "no",
bonus = 2.5,
type = "water",
cd = 7
}
},
[41] = {x = {
pok = slowbro,
spell = "Water Gun",
minLv = 45,
ex = 8000005,
base1 = 70,
base2 = 120,
dista = 4,
bonus = 3.9,
target = "no",
type = "water",
cd = 7
}
},
[57] = {x = {
pok = farfetchd,
spell = "Stickslash",
minLv = 42,
ex = 8300005,
base1 = 50,
base2 = 100,
dista = 1,
bonus = 3.5,
type = "flying",
cd = 10
}
},
[101] = {x = {
pok = seel,
spell = "Icy Wind",
minLv = 28,
ex = 8600005,
base1 = 60,
base2 = 100,
dista = 5,
bonus = 2.5,
target = "no",
type = "ice",
cd = 14
}
},
[110] = {x = {
pok = dewgong,
spell = "Icy Wind",
minLv = 65,
ex = 8700005,
base1 = 100,
base2 = 145,
dista = 5,
bonus = 5.5,
target = "no",
type = "ice",
cd = 25
}
},
[54] = {x = {
pok = shellder,
spell = "Ice Beam",
minLv = 22,
ex = 9000005,
base1 = 40,
base2 = 80,
dista = 4,
bonus = 5,
target = "no",
type = "ice",
cd = 14
}
},
[72] = {x = {
pok = cloyster,
spell = "Ice Beam",
minLv = 60,
ex = 9100005,
base1 = 100,
base2 = 136,
dista = 4,
bonus = 10,
target = "no",
type = "ice",
cd = 14
}
},
[48] = {x = {
pok = gastly,
spell = "Hypnosis",
minLv = 28,
ex = 9200005,
base1 = 0,
base2 = 0,
dista = 3,
bonus = 2.9,
type = "psychic",
cd = 5
}
},
[244] = {x = {
pok = gengar,
spell = "Shadow Storm",
minLv = 86,
ex = 9400005,
base1 = 270,
base2 = 350,
dista = 5,
target = "no",
bonus = 4.5,
type = "ghost",
cd = 40
}
},
[248] = {x = {
pok = onix,
spell = "Earthshock",
minLv = 50,
ex = 9500005,
base1 = 100,
base2 = 133,
dista = 1,
bonus = 4,
target = "no",
type = "ground",
cd = 25
}
},
[94] = {x = {
pok = drowzee,
spell = "Fear",
minLv = 32,
ex = 9600005,
base1 = 0,
base2 = 0,
dista = 4,
bonus = 0,
type = "normal",
cd = 35
}
},
[119] = {x = {
pok = hypno,
spell = "Psychic",
minLv = 58,
ex = 9700005,
base1 = 121,
base2 = 133,
target = "no",
dista = 5,
bonus = 4.8,
type = "psychic",
cd = 20
}
},
[112] = {x = {
pok = krabby,
spell = "Harden",
minLv = 13,
ex = 9800004,
lpl = 32,
life = 850,
base1 = 0,
target = "no",
base2 = 0,
dista = 100,
bonus = 0,
type = "normal",
cd = 17
}
},
[245] = {x = {
pok = kingler,
spell = "Fury Cutter",
minLv = 45,
ex = 9900005,
base1 = 70,
base2 = 96,
dista = 1,
bonus = 3,
target = "no",
type = "bug",
cd = 19
}
},
[46] = {x = {
pok = exeggutor,
spell = "Psybeam",
minLv = 55,
ex = 1030005,
base1 = 120,
base2 = 157,
dista = 4,
target = "no",
bonus = 13,
type = "psychic",
cd = 25
}
},
[124] = {x = {
pok = cubone,
spell = "Rage",
minLv = 32,
ex = 1040005,
base1 = 60,
base2 = 80,
dista = 4,
bonus = 1.7,
type = "dragon",
cd = 19
}
},
[197] = {x = {
pok = marowak,
spell = "Mud Shot",
minLv = 55,
ex = 1050005,
base1 = 10,
base2 = 30,
dista = 3,
bonus = 4.5,
type = "ground",
cd = 12
}
},
[38] = {x = {
pok = hitmonchan,
spell = "Thunder Punch",
minLv = 60,
ex = 1070005,
base1 = 113,
base2 = 128,
dista = 1,
bonus = 4.5,
type = "electric",
cd = 15
}
},
[11] = {x = {
pok = lickitung,
spell = "Iron Tail",
minLv = 55,
ex = 1080005,
base1 = 100,
base2 = 140,
dista = 1,
bonus = 3.5,
type = "normal",
cd = 25
}
},
[228] = {x = {
pok = koffing,
spell = "Poison Bomb",
minLv = 20,
ex = 1090005,
base1 = 50,
base2 = 70,
dista = 4,
bonus = 2,
type = "poison",
cd = 20
}
},
[231] = {x = {
pok = weezing,
spell = "Poison Bomb",
minLv = 40,
ex = 1100005,
base1 = 90,
base2 = 100,
dista = 4,
bonus = 3.5,
type = "poison",
cd = 13
}
},
[77] = {x = {
pok = rhyhorn,
spell = "Shockwave",
minLv = 37,
ex = 1110005,
base1 = 50,
base2 = 75,
dista = 5,
bonus = 1.9,
target = "no",
type = "ground",
cd = 26
}
},
[200] = {x = {
pok = rhydon,
spell = "Horn Drill",
minLv = 75,
ex = 1120005,
base1 = 110,
base2 = 135,
dista = 1,
bonus = 4.5,
type = "normal",
cd = 15
}
},
[28] = {x = {
pok = ditto,
spell = "Transform",
minLv = 40,
ex = 140001,
base1 = 0,
base2 = 0,
dista = 7,
bonus = 0,
type = "normal",
cd = 15
}
},
[4] = {x = {
pok = chansey,
spell = "Healarea",
minLv = 60,
ex = 1130005,
base1 = 270,
base2 = 340,
dista = 5,
target = "no",
bonus = 4,
type = "normal",
cd = 50
}
},
[18] = {x = {
pok = tangela,
spell = "Poison Powder",
minLv = 50,
ex = 1140005,
base1 = 30,
base2 = 60,
dista = 5,
target = "no",
bonus = 3.5,
type = "poison",
cd = 15
}
},
[198] = {x = {
pok = kangaskhan,
spell = "Shockwave",
minLv = 80,
ex = 1150005,
base1 = 136,
base2 = 149,
dista = 5,
target = "no",
bonus = 4,
type = "ground",
cd = 25
}
},
[33] = {x = {
pok = horsea,
spell = "Waterball",
minLv = 10,
ex = 1160005,
base1 = 30,
base2 = 70,
dista = 4,
bonus = 2.7,
type = "water",
cd = 10
}
},
[276] = {x = {
pok = seadra,
spell = "Bubblebeam",
minLv = 45,
ex = 1170005,
base1 = 150,
base2 = 225,
dista = 4,
bonus = 7,
target = "no",
type = "water",
cd = 13
}
},
[214] = {x = {
pok = grimer,
spell = "Poison Bomb",
minLv = 22,
ex = 8800005,
base1 = 70,
base2 = 80,
dista = 4,
bonus = 2.5,
type = "poison",
cd = 15
}
},
[47] = {x = {
pok = muk,
spell = "Poison Bomb",
minLv = 40,
ex = 8900005,
base1 = 115,
base2 = 126,
dista = 4,
bonus = 3.5,
type = "poison",
cd = 14
}
},
[26] = {x = {
pok = doduo,
spell = "Strafe",
minLv = 20,
ex = 8400005,
base1 = 80,
base2 = 90,
Target = "no",
dista = 5,
bonus = 2.5,
type = "normal",
cd = 20
}
},
[120] = {x = {
pok = dodrio,
spell = "Rage",
minLv = 50,
ex = 8500005,
base1 = 90,
base2 = 110,
dista = 3,
bonus = 3.5,
type = "normal",
cd = 21
}
},
[217] = {x = {
pok = magnemite,
spell = "Sonicboom",
minLv = 20,
ex = 8100005,
base1 = 60,
base2 = 79,
dista = 3,
bonus = 3,
type = "normal",
cd = 15
}
},
[223] = {x = {
pok = magneton,
spell = "Thunder",
minLv = 48,
ex = 8200005,
base1 = 112,
base2 = 123,
dista = 7,
bonus = 3.5,
target = "no",
type = "electric",
cd = 25
}
},
[123] = {x = {
pok = voltorb,
spell = "Selfdestruct",
minLv = 20,
ex = 1000005,
base1 = 350,
base2 = 600,
dista = 5,
target = "no",
bonus = 10,
type = "normal",
cd = 3
}
},
[287] = {x = {
pok = voltorbroll,
spell = "Selfdestruct",
minLv = 20,
ex = 1000005,
base1 = 350,
base2 = 600,
dista = 5,
target = "no",
bonus = 10,
type = "normal",
cd = 3
}
},
[125] = {x = {
pok = electrode,
spell = "Discharge",
minLv = 40,
ex = 1010005,
base1 = 220,
base2 = 250,
dista = 5,
target = "no",
bonus = 4,
type = "electric",
cd = 19
}
},
[286] = {x = {
pok = electroderoll,
spell = "Discharge",
minLv = 40,
ex = 1010005,
base1 = 160,
base2 = 170,
dista = 5,
target = "no",
bonus = 2,
type = "electric",
cd = 19
}
},
[196] = {x = {
pok = geodude,
spell = "Harden",
minLv = 20,
ex = 7400005,
lpl = 32,
life = 700,
base1 = 0,
base2 = 0,
dista = 100,
target = "no",
bonus = 0,
type = "normal",
cd = 20
}
},
[247] = {x = {
pok = graveler,
spell = "Falling Rocks",
minLv = 50,
ex = 7500003,
base1 = 115,
base2 = 126,
dista = 5,
target = "no",
bonus = 3.5,
type = "rock",
cd = 20
}
},
[116] = {x = {
pok = golem,
spell = "Falling Rocks",
minLv = 75,
ex = 7600005,
base1 = 200,
base2 = 300,
dista = 5,
target = "no",
bonus = 6,
type = "rock",
cd = 45
}
},
[288] = {x = {
pok = golemroll,
spell = "Falling Rocks",
minLv = 75,
ex = 7600005,
base1 = 200,
base2 = 300,
dista = 5,
target = "no",
bonus = 6,
type = "rock",
cd = 45
}
},
[288] = {x = {
pok = golemroll,
spell = "Falling Rocks",
minLv = 75,
ex = 7600005,
base1 = 200,
base2 = 300,
dista = 5,
target = "no",
bonus = 6,
type = "rock",
cd = 45
}
},
[43] = {x = {
pok = sandshrew,
spell = "Shockwave",
minLv = 30,
ex = 2700005,
base1 = 95,
base2 = 110,
dista = 3,
target = "no",
bonus = 1,
type = "ground",
cd = 30
}
},
[115] = {x = {
pok = sandslash,
spell = "Eartshock",
minLv = 55,
ex = 2800005,
base1 = 150,
base2 = 180,
dista = 3,
target = "no",
bonus = 1.6,
type = "ground",
cd = 25
}
},
[274] = {x = {
pok = goldeen,
spell = "Aqua Tail",
minLv = 12,
ex = 1190005,
base1 = 40,
base2 = 60,
dista = 1,
bonus = 2.5,
type = "water",
cd = 12
}
},
[272] = {x = {
pok = seaking,
spell = "Aqua Tail",
minLv = 35,
ex = 1190005,
base1 = 110,
base2 = 130,
dista = 1,
bonus = 3.5,
type = "water",
cd = 11
}
},
[42] = {x = {
pok = staryu,
spell = "Waterball",
minLv = 22,
ex = 1200005,
base1 = 50,
base2 = 70,
dista = 4,
bonus = 2.3,
type = "water",
cd = 11
}
},
[282] = {x = {
pok = starmie,
spell = "Waterball",
minLv = 35,
ex = 1210005,
base1 = 95,
base2 = 120,
dista = 4,
bonus = 2.9,
type = "water",
cd = 10
}
},
[246] = {x = {
pok = MrMime,
spell = "Reflect",
minLv = 60,
ex = 1220005,
base1 = 180,
base2 = 220,
dista = 5,
bonus = 3,
target = "no",
type = "psychic",
cd = 20
}
},
[15] = {x = {
pok = scyther,
spell = "Shredder Team",
minLv = 95,
ex = 1230005,
base1 = 190,
base2 = 290,
dista = 4,
bonus = 3.5,
target = "no",
type = "bug",
cd = 180
}
},
[15] = {x = {
pok = scytherteam,
spell = "Shredder Team",
minLv = 95,
ex = 1230005,
base1 = 190,
base2 = 290,
dista = 4,
bonus = 3.5,
target = "no",
type = "bug",
cd = 180
}
},
[282] = {x = {
pok = jynx,
spell = "Icy Wind",
minLv = 75,
ex = 1240005,
base1 = 145,
base2 = 165,
dista = 5,
target = "no",
bonus = 6.2,
type = "ice",
cd = 25
}
},
[281] = {x = {
pok = electabuzz,
spell = "Thunder Wave",
minLv = 80,
ex = 1250005,
base1 = 110,
base2 = 140,
dista = 5,
bonus = 5,
target = "no",
type = "electric",
cd = 12
}
},
[76] = {x = {
pok = magmar,
spell = "Fireball",
minLv = 80,
ex = 1260005,
base1 = 120,
base2 = 180,
dista = 4,
bonus = 3.5,
type = "fire",
cd = 12
}
},
[53] = {x = {
pok = pinsir,
spell = "Fury Cutter",
minLv = 53,
ex = 1270005,
base1 = 110,
base2 = 130,
dista = 1,
bonus = 3.5,
target = "no",
type = "bug",
cd = 17
}
},
[93] = {x = {
pok = tauros,
spell = "Stomp",
minLv = 51,
ex = 1280005,
base1 = 150,
base2 = 213,
dista = 1,
bonus = 5,
target = "no",
type = "normal",
cd = 25
}
},
[117] = {x = {
pok = gyarados,
spell = "Hydro Cannon",
minLv = 85,
ex = 1300005,
base1 = 270,
base2 = 340,
dista = 5,
target = "no",
bonus = 3.5,
type = "water",
cd = 23
}
},
[193] = {x = {
pok = lapras,
spell = "Waterball",
minLv = 80,
ex = 1310005,
base1 = 123,
base2 = 145,
dista = 4,
bonus = 4,
type = "water",
cd = 12
}
},
[28] = {x = {
pok = ditto,
spell = "",
minLv = 40,
ex = 1320005,
base1 = 125,
base2 = 130,
dista = 5,
bonus = 3,
target = "no",
type = "normal",
cd = 20
}
},
[202] = {x = {
pok = eevee,
spell = "Iron Tail",
minLv = 28,
ex = 1330005,
base1 = 55,
base2 = 75,
dista = 1,
bonus = 2.5,
type = "normal",
cd = 15
}
},
[215] = {x = {
pok = vaporeon,
spell = "Water Pulse",
minLv = 55,
ex = 1340005,
base1 = 109,
base2 = 120,
dista = 3,
bonus = 2.9,
target = "no",
type = "water",
cd = 20
}
},
[195] = {x = {
pok = jolteon,
spell = "Thunder Wave",
minLv = 55,
ex = 1350005,
base1 = 110,
base2 = 140,
dista = 5,
target = "no",
bonus = 2.9,
type = "electric",
cd = 13
}
},
[14] = {x = {
pok = flareon,
spell = "Blaze Kick",
minLv = 55,
ex = 1360005,
base1 = 110,
base2 = 140,
dista = 5,
bonus = 2.9,
type = "fire",
cd = 20
}
},
[97] = {x = {
pok = porygon,
spell = "Zap Cannon",
minLv = 44,
ex = 1370005,
base1 = 230,
base2 = 270,
dista = 4,
bonus = 3.5,
target = "no",
type = "electric",
cd = 30
}
},
[92] = {x = {
pok = omanyte,
spell = "Mud Shot",
minLv = 26,
ex = 1380003,
base1 = 75,
base2 = 85,
dista = 3,
bonus = 2.5,
type = "ground",
cd = 12
}
},
[192] = {x = {
pok = omastar,
spell = "Bubble Blast",
minLv = 85,
ex = 1390005,
base1 = 190,
base2 = 230,
dista = 4,
bonus = 5,
type = "water",
cd = 34
}
},
[98] = {x = {
pok = kabuto,
spell = "Harden",
minLv = 30,
lpl = 32,
life = 1300,
ex = 1400005,
base1 = 0,
base2 = 0,
dista = 100,
target = "no",
bonus = 0,
type = "normal",
cd = 15
}
},
[13] = {x = {
pok = kabutops,
spell = "Mud Shot",
minLv = 80,
ex = 1410005,
base1 = 30,
base2 = 100,
dista = 3,
bonus = 6,
type = "ground",
cd = 13
}
},
[10] = {x = {
pok = aerodactyl,
spell = "Rock Throw",
minLv = 100,
ex = 1420005,
base1 = 150,
base2 = 185,
dista = 3,
bonus = 6.5,
type = "rock",
cd = 12
}
},
[51] = {x = {
pok = snorlax,
spell = "Headbutt",
minLv = 85,
ex = 1430005,
base1 = 220,
base2 = 250,
dista = 1,
bonus = 6.5,
type = "normal",
cd = 14
}
},
[283] = {x = {
pok = articuno,
spell = "Twister",
minLv = 100,
ex = 1440005,
base1 = 460,
base2 = 580,
dista = 5,
Target = "no",
bonus = 8.5,
type = "ice",
cd = 25
}
},
[199] = {x = {
pok = Zapdos,
spell = "Thunder Bolt",
minLv = 100,
ex = 1450005,
base1 = 390,
base2 = 406,
dista = 5,
bonus = 8.5,
type = "electric",
cd = 11
}
},
[265] = {x = {
pok = moltres,
spell = "Fireball",
minLv = 100,
ex = 1460005,
base1 = 390,
base2 = 410,
dista = 4,
bonus = 8.5,
type = "fire",
cd = 10
}
},
[61] = {x = {
pok = dragonair,
spell = "Twister",
minLv = 61,
ex = 1480005,
base1 = 172,
base2 = 200,
dista = 5,
bonus = 4.5,
type = "dragon",
cd = 23
}
},
[210] = {x = {
pok = dragonite,
spell = "Fire Punch",
minLv = 100,
ex = 1490005,
base1 = 278,
base2 = 300,
dista = 1,
bonus = 6.5,
type = "fire",
cd = 20
}
},
[294] = {x = {
pok = eldercharizard,
spell = "Fire Fang",
minLv = 100,
ex = 1530005,
base1 = 390,
base2 = 410,
dista = 1,
bonus = 6.8,
type = "fire",
cd = 17
}
},
[292] = {x = {
pok = crystalOnix,
spell = "Earthshock",
minLv = 100,
ex = 1520005,
base1 = 370,
base2 = 400,
dista = 1,
bonus = 6.5,
target = "no",
type = "ground",
cd = 25
}
},
[34] = {x = {
pok = Mewtwo,
spell = "Psycho Shift",
minLv = 100,
ex = 1500005,
base1 = 335,
base2 = 345,
dista = 10,
bonus = 10,
type = "psychic",
cd = 24
}
},
[9] = {x = {
pok = Mew,
spell = "Psycho Shift",
minLv = 100,
ex = 1510005,
base1 = 335,
base2 = 345,
dista = 10,
bonus = 10,
type = "psychic",
cd = 24
}
},
}
function onSay(cid)
if #getCreatureSummons(cid) == 0 then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to use moves.")
return 0
end
if getTilePzInfo(getPlayerPosition(cid)) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Can't use Moves on protect zone.")
return true
end
pokemon = c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType]
if not isInArray(pokeis, getCreatureName(getCreatureSummons(cid)[1])) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn\'t recognize this move.")
return 0
end
if getPlayerLevel(cid) < c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.minLv then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have enough level to use this move.")
return 0
end
if exhaustion.get(cid, pokemon.x.ex) then
seconds = math.floor(((exhaustion.get(cid, pokemon.x.ex)) + 1))
doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Sorry, you have to wait "..seconds.." seconds to cast "..pokemon.x.spell..".")
return 0
end
if getPlayerStorageValue(getCreatureSummons(cid)[1], 3) >= 1 then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "MISS", 215)
setPlayerStorageValue(getCreatureSummons(cid)[1], 3, -1)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return true
end
if getPlayerStorageValue(getCreatureSummons(cid)[1], 5) >= 1 then
if math.random(1,100) <= 33 then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "SELF HIT", 180)
local levels = getPlayerLevel(cid)
doTargetCombatHealth(cid, getCreatureSummons(cid)[1], COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
return true
end
end
if pokemon.x.target ~= "no" then
if not isMonster(getCreatureTarget(cid)) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")
return 0
end
if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > pokemon.x.dista then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to use this move.")
return 0
end
if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then
return 0
end
end
if pokemon.x.type == "flying" then
elementa = FLYDAMAGE
elseif pokemon.x.type == "ground" then
elementa = GROUNDDAMAGE
elseif pokemon.x.type == "electric" then
elementa = ELECTRICDAMAGE
elseif pokemon.x.type == "ghost" then
elementa = GHOSTDAMAGE
elseif pokemon.x.type == "normal" then
elementa = NORMALDAMAGE
elseif pokemon.x.type == "fighting" then
elementa = FIGHTINGDAMAGE
elseif pokemon.x.type == "poison" then
elementa = POISONDAMAGE
elseif pokemon.x.type == "rock" then
elementa = ROCKDAMAGE
elseif pokemon.x.type == "bug" then
elementa = BUGDAMAGE
elseif pokemon.x.type == "fire" then
elementa = FIREDAMAGE
elseif pokemon.x.type == "water" then
elementa = WATERDAMAGE
elseif pokemon.x.type == "grass" then
elementa = GRASSDAMAGE
elseif pokemon.x.type == "psychic" then
elementa = PSYCHICDAMAGE
elseif pokemon.x.type == "ice" then
elementa = ICEDAMAGE
elseif pokemon.x.type == "dragon" then
elementa = DRAGONDAMAGE
end
local element = elementa
local num1 = (pokemon.x.base1)
local num2 = (pokemon.x.base2)
local num3 = (pokemon.x.bonus)
setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3))))
if pokemon.x.spell == "Wing Attack" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 128)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), winge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 129)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingde, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wings, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 131)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingds, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 130)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
end
return 0
elseif pokemon.x.spell == "Hyper Voice" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 19)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 19)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 19)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 19)
end
return 0
elseif pokemon.x.spell == "Poisonous Wing" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 128)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), winge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 129)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingde, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wings, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 131)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingds, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 130)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
end
elseif pokemon.x.spell == "Poison Bomb" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 14)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), bomb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
return 0
elseif pokemon.x.spell == "Multi-Slap" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), charge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 148)
return 0
elseif pokemon.x.spell == "Mud Bomb" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 38)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), bomb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 116)
doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureTarget(cid)), bomb, 0, 0, 34)
return 0
elseif pokemon.x.spell == "Sonicboom" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 33)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 1)
return 0
elseif pokemon.x.spell == "Mega Punch" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 112)
return 0
elseif pokemon.x.spell == "Selfdestruct" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
addEvent(doCreatureAddHealth, 250, getCreatureSummons(cid)[1], -getCreatureHealth(getCreatureSummons(cid)[1]))
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), destruct1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 5)
addEvent(doAreaCombatHealth, 150, getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), destruct2, -(((num1)+(getPlayerLevel(cid)*(num3)))*0.7), -(((num2)+(getPlayerLevel(cid)*(num3)))*0.8), 5)
addEvent(doAreaCombatHealth, 250, getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), destruct3, -(((num1)+(getPlayerLevel(cid)*(num3)))*0.4), -(((num2)+(getPlayerLevel(cid)*(num3)))*0.5), 5)
setPlayerStorageValue(getCreatureSummons(cid)[1], 33, 1)
return 0
elseif pokemon.x.spell == "Whirlwind" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, params.br, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, br = whirl3})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, br = whirl5})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}, br = whirl5})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, br = whirl3})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, br = whirl5})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}, br = whirl5})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, br = whirl32})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, br = whirl52})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}, br = whirl52})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, br = whirl32})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, br = whirl52})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}, br = whirl52})
end
return 0
elseif pokemon.x.spell == "Drill Peck" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 110)
local hitalvo = getCreatureTarget(cid)
local function hit(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(getCreatureTarget(params.cid)) then
if getCreatureTarget(params.cid) == params.hitalvo then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], FLYDAMAGE, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 110)
end
end
end
end
addEvent(hit, 480, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 880, {cid = cid, hitalvo = hitalvo})
return 0
-----------------------------------------------------ADICIONADAS-------------------------------------------------------------------
------------------------- ------------------------- ------------------------- ------------------------- -------------------------
elseif pokemon.x.spell == "Rage" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 110)
local hitalvo = getCreatureTarget(cid)
local function hit(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(getCreatureTarget(params.cid)) then
if getCreatureTarget(params.cid) == params.hitalvo then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], FLYDAMAGE, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 110)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), CONST_ME_MAGIC_RED)
end
end
end
end
addEvent(hit, 1000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 2000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 3000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 4000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 5000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 6000, {cid = cid, hitalvo = hitalvo})
return 0
elseif pokemon.x.spell == "Psycho Shift" then
local pos = getThingPos(getCreatureTarget(cid))
local pos2 = getThingPos(getCreatureTarget(cid))
pos.x = pos.x + math.random(-4,4)
pos.y = pos.y + math.random(-4,4)
if hasSqm(pos) and isSightClear(getThingPos(getCreatureSummons(cid)[1]), pos, false) then
if getTileThingByPos(pos) and getTileThingByPos(pos).itemid >= 1 and not isInArray({919, 460, 4820, 4821, 4822, 4823, 4824, 4825}, getTileThingByPos(pos).itemid) and isWalkable(pos) then
pos = getClosestFreeTile(getCreatureTarget(cid), pos)
doSendDistanceShoot(pos2, pos, 39)
doTeleportThing(getCreatureTarget(cid), pos, false)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(pos2, 12)
else
local newpos = getClosestFreeTile(getCreatureTarget(cid), pos)
doSendDistanceShoot(pos2, newpos, 39)
doTeleportThing(getCreatureTarget(cid), newpos, false)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(pos2, 12)
end
else
doSendDistanceShoot(pos2, getThingPos(getCreatureTarget(cid)), 39)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(pos2, 12)
end
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)
return 0
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), 3, 1)
local alvo = getCreatureTarget(cid)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 24)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 136)
local function string(params)
if isCreature(params.alvo) then
if getPlayerStorageValue(params.alvo, 3) >= 1 then
doSendMagicEffect(getThingPos(params.alvo), 136)
end
end
end
local function normalstr(params)
if isCreature(params.alvo) then
if getPlayerStorageValue(params.alvo, 3) >= 1 then
setPlayerStorageValue(params.alvo, 3, -1)
end
end
end
addEvent(string, 250, {alvo = alvo})
addEvent(string, 500, {alvo = alvo})
addEvent(string, 750, {alvo = alvo})
addEvent(string, 1000, {alvo = alvo})
addEvent(string, 1250, {alvo = alvo})
addEvent(string, 1500, {alvo = alvo})
addEvent(string, 1750, {alvo = alvo})
addEvent(string, 2000, {alvo = alvo})
addEvent(string, 2250, {alvo = alvo})
addEvent(string, 2500, {alvo = alvo})
addEvent(string, 2750, {alvo = alvo})
addEvent(string, 3000, {alvo = alvo})
addEvent(normalstr, 3050, {alvo = alvo})
return 0
------------------------- ------------------------- ------------------------- -------------------------
------------------------- ------------------------- ------------------------- ------------------------- -------------------------
------------------------- ------------------------- ------------------------- -------------------------
elseif pokemon.x.spell == "Flame Wheel" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), charge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 6)
return 0
elseif pokemon.x.spell == "Poison Powder" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, condition2, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 27)
return 0
elseif pokemon.x.spell == "Horn Attack" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 15)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 9)
return 0
elseif pokemon.x.spell == "Stun Spore" 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)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
end
return 0
elseif pokemon.x.spell == "Icy Wind" 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)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), iwn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 41)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), iwe, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 41)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), iws, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 41)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), iww, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 41)
end
return 0
elseif pokemon.x.spell == "Poison Fang" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 138)
return 0
elseif pokemon.x.spell == "Fear" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local t = getCreatureTarget(cid)
setPlayerStorageValue(t, 5, 1)
local function confused(params)
if isCreature(params.t) then
local spdc = getCreatureSpeed(params.t)
if getCreatureLookDir(params.t) == 0 then
confs = math.random(1,3)
elseif getCreatureLookDir(params.t) == 1 then
confurandom = math.random(1,99)
if confurandom <= 33 then
confs = 0
elseif confurandom >= 67 then
confs = 2
else
confs = 3
end
elseif getCreatureLookDir(params.t) == 2 then
confurandom = math.random(1,99)
if confurandom <= 33 then
confs = 3
elseif confurandom >= 67 then
confs = 0
else
confs = 1
end
elseif getCreatureLookDir(params.t) == 3 then
confs = math.random(0,2)
end
doPushCreature(params.t, confs, 1, 0)
doSendMagicEffect(getThingPos(params.t), 214)
end
end
local function nonc(params)
if isCreature(params.t) then
doChangeSpeed(params.t, -getCreatureSpeed(params.t))
doChangeSpeed(params.t, getCreatureBaseSpeed(params.t))
setPlayerStorageValue(params.t, 5, -1)
end
end
doChangeSpeed(t, -( getCreatureSpeed(t)/3))
doSendMagicEffect(getThingPos(t), 214)
for i = 1, math.random(6,7) do
addEvent(confused, 1000*i, {cid = cid, t = t})
end
addEvent(nonc, 7100, {cid - cid, t = t})
return 0
elseif pokemon.x.spell == "Aqua Tail" 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)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
return 0
elseif pokemon.x.spell == "Hydro Cannon" 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)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.eee)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, whirl3, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.arr, whirl3, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-1, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-2, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-3, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-5, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-6, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+1, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+2, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+3, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+5, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+4, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+6, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, eee = 67, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 67, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+1, y=posicao.y, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 67, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+2, y=posicao.y, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 67, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 67, ar = {x=posicao.x+5, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 67, ar = {x=posicao.x+6, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+5, y=posicao.y, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, eee = 65, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 65, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-1, y=posicao.y, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 65, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-2, y=posicao.y, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 65, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 65, ar = {x=posicao.x-5, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 65, ar = {x=posicao.x-6, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-5, y=posicao.y, z=posicao.z}})
end
return 0
elseif pokemon.x.spell == "Ice Beam" then
alvo = getCreatureName(getCreatureTarget(cid))
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 99)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 105)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 103)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 98)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 105)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 102)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 96)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 104)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 100)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 97)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 104)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 101)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Zap Cannon" then
alvo = getCreatureName(getCreatureTarget(cid))
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 94)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 93)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 95)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 91)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 93)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 92)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 86)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 88)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 87)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 89)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 88)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 90)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Slash" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 142)
return 0
elseif pokemon.x.spell == "Shockwave" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function sandattack(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.ar, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, params.wave, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-1, z=posicao.z}, ef = 126, wave = swaven})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-2, z=posicao.z}, ef = 126, wave = swaven})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-3, z=posicao.z}, ef = 126, wave = swaven})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-4, z=posicao.z}, ef = 126, wave = swaven})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-5, z=posicao.z}, ef = 126, wave = swaven})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+2, z=posicao.z}, ef = 125, wave = swaves})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+3, z=posicao.z}, ef = 125, wave = swaves})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+4, z=posicao.z}, ef = 125, wave = swaves})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+5, z=posicao.z}, ef = 125, wave = swaves})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+6, z=posicao.z}, ef = 125, wave = swaves})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+2, y=posicao.y+1, z=posicao.z}, ef = 124, wave = swavee})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+3, y=posicao.y+1, z=posicao.z}, ef = 124, wave = swavee})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+4, y=posicao.y+1, z=posicao.z}, ef = 124, wave = swavee})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+5, y=posicao.y+1, z=posicao.z}, ef = 124, wave = swavee})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+6, y=posicao.y+1, z=posicao.z}, ef = 124, wave = swavee})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+1, z=posicao.z}, ef = 123, wave = swavew})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y+1, z=posicao.z}, ef = 123, wave = swavew})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y+1, z=posicao.z}, ef = 123, wave = swavew})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x-4, y=posicao.y+1, z=posicao.z}, ef = 123, wave = swavew})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x-5, y=posicao.y+1, z=posicao.z}, ef = 123, wave = swavew})
end
return 0
elseif pokemon.x.spell == "Healarea" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), healarea, ((num1)+(getPlayerLevel(cid)*(num3))), ((num2)+(getPlayerLevel(cid)*(num3))), 12)
doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 12)
return 0
elseif pokemon.x.spell == "Dizzy Punch" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)
local t = getCreatureTarget(cid)
setPlayerStorageValue(t, 5, 1)
local function confused(params)
if isCreature(params.t) then
local spdc = getCreatureSpeed(params.t)
if getCreatureLookDir(params.t) == 0 then
confs = math.random(1,3)
elseif getCreatureLookDir(params.t) == 1 then
confurandom = math.random(1,99)
if confurandom <= 33 then
confs = 0
elseif confurandom >= 67 then
confs = 2
else
confs = 3
end
elseif getCreatureLookDir(params.t) == 2 then
confurandom = math.random(1,99)
if confurandom <= 33 then
confs = 3
elseif confurandom >= 67 then
confs = 0
else
confs = 1
end
elseif getCreatureLookDir(params.t) == 3 then
confs = math.random(0,2)
end
doPushCreature(params.t, confs, 1, 0)
doSendMagicEffect(getThingPos(params.t), 31)
end
end
local function nonc(params)
if isCreature(params.t) then
doChangeSpeed(params.t, -getCreatureSpeed(params.t))
doChangeSpeed(params.t, getCreatureBaseSpeed(params.t))
setPlayerStorageValue(params.t, 5, -1)
end
end
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 26)
doChangeSpeed(t, -( getCreatureSpeed(t)/3))
doSendMagicEffect(getThingPos(t), 31)
for i = 1, math.random(6,7) do
addEvent(confused, 1000*i, {cid = cid, t = t})
end
addEvent(nonc, 7100, {cid - cid, t = t})
return 0
elseif pokemon.x.spell == "Psychic" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
return 0
elseif pokemon.x.spell == "Thunder" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), thunder, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
return 0
elseif pokemon.x.spell == "Poison Fang" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 138)
return 0
elseif pokemon.x.spell == "Poison Bomb" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
addEvent(doAreaCombatHealth, 100, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), bomb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 14)
return 0
elseif pokemon.x.spell == "Shredder Team" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureName(getCreatureSummons(cid)[1]) == "Scyther" then
doSetCreatureOutfit(getCreatureSummons(cid)[1], scyther, 8300)
doChangeSpeed(getCreatureSummons(cid)[1], 145)
end
setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1)
local function team(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
if getCreatureCondition(getCreatureSummons(params.cid)[1], CONDITION_OUTFIT) == true then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 15)
end
end
end
end
for r = 1, 8 do
addEvent(team, 1000*r, {cid = cid})
end
local function stopteam(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
doChangeSpeed(getCreatureSummons(params.cid)[1], -145)
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then
setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, 0)
end
end
end
end
addEvent(stopteam, 8300, {cid = cid})
return 0
elseif pokemon.x.spell == "Poison Powder" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 84)
return 0
elseif pokemon.x.spell == "Selfheal" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 132)
doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 132)
return 0
elseif pokemon.x.spell == "Rock Throw" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 11)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)
return 0
elseif pokemon.x.spell == "Bubble Blast" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 2)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
else
end
end
addEvent(throw, 0, {cid = cid})
addEvent(damage, 0, {cid = cid})
addEvent(throw, 400, {cid = cid})
addEvent(damage, 400, {cid = cid})
addEvent(throw, 800, {cid = cid})
addEvent(damage, 800, {cid = cid})
addEvent(throw, 1200, {cid = cid})
addEvent(damage, 1200, {cid = cid})
return 0
elseif pokemon.x.spell == "Headbutt" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)
return 0
elseif pokemon.x.spell == "Thunder Punch" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
else
end
end
addEvent(damage, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Reflect" 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)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 135)
setPlayerStorageValue(getCreatureSummons(cid)[1], 34, 1)
return 0
elseif pokemon.x.spell == "Fury Cutter" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function attaque(params)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 128)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), winge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 129)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingde, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wings, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 131)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingds, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 130)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
end
end
addEvent(attaque, 0, {cid = cid})
addEvent(attaque, 500, {cid = cid})
return 0
elseif pokemon.x.spell == "Confusion" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 136)
return 0
elseif pokemon.x.spell == "Acid" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 14)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 20)
return 0
elseif pokemon.x.spell == "Fire Fang" 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)
doSendMagicEffect(getThingPos(getCreatureTarget(cid)), 146)
local function damage(params)
if isCreature(params.cid) then
if isCreature(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 5)
end
end
end
addEvent(damage, 200, {cid = cid})
return 0
elseif pokemon.x.spell == "Stomp" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), stomp, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 118)
return 0
elseif pokemon.x.spell == "Thunder Punch" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
else
end
end
addEvent(damage, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Bubblebeam" then
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 25)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Water Pulse" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}})
end
return 0
elseif pokemon.x.spell == "Mud Shot" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
setPlayerStorageValue(getCreatureTarget(cid), 3, 1)
local mudalvo = getCreatureTarget(cid)
local function ver(params)
if isCreature(params.mudalvo) then
if getPlayerStorageValue(params.mudalvo, 3) >= 1 then
setPlayerStorageValue(params.mudalvo, 3, -1)
end
end
end
local function muds(params)
if isCreature(params.alvo) then
if getPlayerStorageValue(params.alvo, 3) >= 1 then
doSendMagicEffect(getThingPos(params.alvo), 34)
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)), 1)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 34)
return 0
elseif pokemon.x.spell == "Poison Gas" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function gas(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
end
end
addEvent(gas, 000, {cid = cid, cb = cb})
addEvent(gas, 500, {cid = cid, cb = cb})
addEvent(gas, 1000, {cid = cid, cb = cb})
addEvent(gas, 1500, {cid = cid, cb = cb})
addEvent(gas, 2200, {cid = cid, cb = cb})
addEvent(gas, 2700, {cid = cid, cb = cb})
addEvent(gas, 3200, {cid = cid, cb = cb})
addEvent(gas, 3900, {cid = cid, cb = cb})
addEvent(gas, 4400, {cid = cid, cb = cb})
addEvent(gas, 4900, {cid = cid, cb = cb})
return 0
elseif pokemon.x.spell == "Horn Drill" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 25)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 9)
else
end
end
addEvent(damage, 0, {cid = cid})
addEvent(throw, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Iron Tail" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 160)
else
end
end
addEvent(damage, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Thunder Bolt" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local posalvo = getThingPos(getCreatureTarget(cid))
local boltalvo = getCreatureTarget(cid)
posalvo.x = posalvo.x-2
posalvo.y = posalvo.y-6
doSendDistanceShoot(posalvo, getThingPos(getCreatureTarget(cid)), 41)
local function bolt(params)
if isCreature(params.cid) then
if isCreature(getCreatureTarget(cid)) then
if getCreatureTarget(params.cid) == params.boltalvo then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
end
end
end
end
addEvent(bolt, 200, {cid = cid, boltalvo = boltalvo})
return 0
elseif pokemon.x.spell == "Waterball" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 2)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
else
end
end
addEvent(damage, 100, {cid = cid})
addEvent(throw, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Fire Punch" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 3)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 15)
else
end
end
addEvent(throw, 0, {cid = cid})
addEvent(damage, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Falling Rocks" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function fall(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
local pos = getThingPos(getCreatureSummons(cid)[1])
pos.x = pos.x + math.random(-4,4)
pos.y = pos.y + math.random(-4,4)
local frompos = getThingPos(getCreatureSummons(cid)[1])
frompos.x = pos.x - 7
frompos.y = pos.y - 6
doSendDistanceShoot(frompos, pos, 11)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, pos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 44)
end
end
end
for rocks = 1, 72 do
addEvent(fall, rocks*35, {cid = cid})
end
return 0
elseif pokemon.x.spell == "Thunder Wave" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
end
return 0
elseif pokemon.x.spell == "Leech Seed" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 5)
local alvo = getCreatureTarget(cid)
local leecher = getCreatureSummons(cid)[1]
local function suck(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(params.alvo) then
if getCreatureSummons(cid)[1] == leecher then
doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 14)
local life = getCreatureHealth(alvo)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(params.alvo), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 45)
local newlife = life - getCreatureHealth(alvo)
if newlife >= 1 then
doCreatureAddHealth(getCreatureSummons(params.cid)[1], newlife)
doSendAnimatedText(getThingPos(getCreatureSummons(params.cid)[1]), "+"..newlife.."", 35)
end
end
end
end
end
addEvent(suck, 2000, {cid = cid, alvo = alvo})
addEvent(suck, 4000, {cid = cid, alvo = alvo})
addEvent(suck, 6000, {cid = cid, alvo = alvo})
addEvent(suck, 8000, {cid = cid, alvo = alvo})
addEvent(suck, 10000, {cid = cid, alvo = alvo})
return 0
elseif pokemon.x.spell == "Twister" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 36)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
return 0
elseif pokemon.x.spell == "Water Gun" then
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Fireball" 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)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 3)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 15)
else
end
end
addEvent(damage, 100, {cid = cid})
addEvent(throw, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Rock Tomb" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
rock1 = {x=getThingPos(getCreatureSummons(cid)[1]).x+1, y=getThingPos(getCreatureSummons(cid)[1]).y-1, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock2 = {x=getThingPos(getCreatureSummons(cid)[1]).x+0, y=getThingPos(getCreatureSummons(cid)[1]).y-1, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock3 = {x=getThingPos(getCreatureSummons(cid)[1]).x-1, y=getThingPos(getCreatureSummons(cid)[1]).y-1, z=getThingPos(getCreatureSummons(cid)[1]).z}
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tombn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 118)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
rock1 = {x=getThingPos(getCreatureSummons(cid)[1]).x+1, y=getThingPos(getCreatureSummons(cid)[1]).y+1, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock2 = {x=getThingPos(getCreatureSummons(cid)[1]).x+0, y=getThingPos(getCreatureSummons(cid)[1]).y+1, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock3 = {x=getThingPos(getCreatureSummons(cid)[1]).x-1, y=getThingPos(getCreatureSummons(cid)[1]).y+1, z=getThingPos(getCreatureSummons(cid)[1]).z}
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tombs, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 118)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
rock1 = {x=getThingPos(getCreatureSummons(cid)[1]).x-1, y=getThingPos(getCreatureSummons(cid)[1]).y+1, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock2 = {x=getThingPos(getCreatureSummons(cid)[1]).x-1, y=getThingPos(getCreatureSummons(cid)[1]).y+0, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock3 = {x=getThingPos(getCreatureSummons(cid)[1]).x-1, y=getThingPos(getCreatureSummons(cid)[1]).y-1, z=getThingPos(getCreatureSummons(cid)[1]).z}
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tombw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 118)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
rock1 = {x=getThingPos(getCreatureSummons(cid)[1]).x+1, y=getThingPos(getCreatureSummons(cid)[1]).y+1, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock2 = {x=getThingPos(getCreatureSummons(cid)[1]).x+1, y=getThingPos(getCreatureSummons(cid)[1]).y+0, z=getThingPos(getCreatureSummons(cid)[1]).z}
rock3 = {x=getThingPos(getCreatureSummons(cid)[1]).x+1, y=getThingPos(getCreatureSummons(cid)[1]).y-1, z=getThingPos(getCreatureSummons(cid)[1]).z}
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tombe, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 118)
end
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), rock1, 11)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), rock2, 11)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), rock3, 11)
return 0
elseif pokemon.x.spell == "Ground Chop" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 111)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
addEvent(gust, 2000, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}})
addEvent(gust, 2000, {cid = cid, ar = {x=posicao.x, y=posicao.y+5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}})
addEvent(gust, 2000, {cid = cid, ar = {x=posicao.x+5, y=posicao.y, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-5, y=posicao.y, z=posicao.z}})
end
return 0
elseif pokemon.x.spell == "Psybeam" then
alvo = getCreatureName(getCreatureTarget(cid))
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 109)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 108)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 109)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 108)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 109)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 108)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 106)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 107)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 106)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 107)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 106)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 107)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Earthshock" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], GROUNDDAMAGE, getThingPos(getCreatureSummons(cid)[1]), charge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
local sps = getThingPos(getCreatureSummons(cid)[1])
sps.x = sps.x+1
sps.y = sps.y+1
doSendMagicEffect(sps, 127)
return 0
elseif pokemon.x.spell == "Discharge" then
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
setPlayerStorageValue(getCreatureSummons(cid)[1], 15, 0)
local chac = getCreatureSummons(cid)[1]
local function discharge(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
if getCreatureSummons(params.cid)[1] == chac then
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 15) >= 1 then
return true
end
if math.random(1,100) >= 75 then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(params.cid)[1]), charge, -(((num1)+(getPlayerLevel(cid)*(num3)))*(params.charges)), -(((num2)+(getPlayerLevel(cid)*(num3)))*(params.charges)), 48)
setPlayerStorageValue(getCreatureSummons(params.cid)[1], 15, 1)
else
if params.charges == 5 then
doSendAnimatedText(getThingPos(getCreatureSummons(params.cid)[1]), "FAIL", 215)
else
doSendAnimatedText(getThingPos(getCreatureSummons(params.cid)[1]), "CHARGING", 210)
doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 48)
end
end
end
end
end
end
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 48)
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "CHARGING", 210)
for charges = 1, 5 do
addEvent(discharge, charges*1000, {cid = cid, charges = charges})
end
return 0
elseif pokemon.x.spell == "Mega Punch" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 112)
return 0
elseif pokemon.x.spell == "Flamethrower" 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)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x+1
flamepos.y = flamepos.y-1
doSendMagicEffect(flamepos, 55)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), flamen, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x+3
flamepos.y = flamepos.y+1
doSendMagicEffect(flamepos, 58)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), flamee, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x+1
flamepos.y = flamepos.y+3
doSendMagicEffect(flamepos, 56)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), flames, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x-1
flamepos.y = flamepos.y+1
doSendMagicEffect(flamepos, 57)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), flamew, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
end
return 0
elseif pokemon.x.spell == "Toxic" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
area = toxicn
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
area = toxice
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
area = toxics
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
area = toxicw
end
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
return 0
elseif pokemon.x.spell == "Harden" 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)
local hardname = getCreatureName(getCreatureSummons(cid)[1])
setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1)
local oldpos = getThingPos(getCreatureSummons(cid)[1])
local function efect(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then
doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 144)
end
end
end
local function chard(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then
setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, -1)
end
end
end
addEvent(efect, 100, {cid = cid, hardname = hardname})
addEvent(efect, 1600, {cid = cid, hardname = hardname})
addEvent(efect, 3100, {cid = cid, hardname = hardname})
addEvent(efect, 4600, {cid = cid, hardname = hardname})
addEvent(efect, 6100, {cid = cid, hardname = hardname})
addEvent(efect, 7600, {cid = cid, hardname = hardname})
addEvent(efect, 9100, {cid = cid, hardname = hardname})
addEvent(efect, 10600, {cid = cid, hardname = hardname})
addEvent(chard, 11000, {cid = cid})
return 0
elseif pokemon.x.spell == "Gunk Shot" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local alvinho = getCreatureTarget(cid)
local function rocksup(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(getCreatureTarget(params.cid)) then
if getCreatureTarget(params.cid) ~= params.alvinho then
return true
end
jus = getThingPos(getCreatureSummons(params.cid)[1])
jusa = getThingPos(getCreatureTarget(params.cid))
if jusa.x > jus.x then
xx = 0
elseif jusa.x < jus.x then
xx = -1
else
xx = 0
end
local newpos = {x = getThingPos(getCreatureSummons(params.cid)[1]).x+(xx), y = jusa.y - 3, z = getThingPos(getCreatureSummons(params.cid)[1]).z}
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), newpos, 6)
end
end
end
local function rocksdown(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(getCreatureTarget(params.cid)) then
if getCreatureTarget(params.cid) ~= params.alvinho then
return true
end
jus = getThingPos(getCreatureSummons(params.cid)[1])
jusa = getThingPos(getCreatureTarget(params.cid))
if jusa.x > jus.x then
xx = 0
elseif jusa.x < jus.x then
xx = -1
else
xx = 0
end
local newpos = {x = getThingPos(getCreatureSummons(params.cid)[1]).x+(xx), y = jusa.y - 3, z = getThingPos(getCreatureSummons(params.cid)[1]).z}
doSendDistanceShoot(newpos, getThingPos(getCreatureTarget(params.cid)), 6)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), bomb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 116)
end
end
end
addEvent(rocksup, 0, {cid = cid, alvinho = alvinho})
addEvent(rocksdown, 300, {cid = cid, alvinho = alvinho})
return 0
elseif pokemon.x.spell == "Fire Fang" 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)
doSendMagicEffect(getThingPos(getCreatureTarget(cid)), 146)
local function damage(params)
if isCreature(params.cid) then
if isCreature(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 5)
end
end
end
addEvent(damage, 200, {cid = cid})
return 0
elseif pokemon.x.spell == "Shadow Storm" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function fall(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
local pos = getThingPos(getCreatureSummons(cid)[1])
pos.x = pos.x + math.random(-4,4)
pos.y = pos.y + math.random(-4,4)
local frompos = getThingPos(getCreatureSummons(cid)[1])
frompos.x = pos.x - 7
frompos.y = pos.y - 6
doSendDistanceShoot(frompos, pos, 18)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, pos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 140)
end
end
end
for rocks = 1, 72 do
addEvent(fall, rocks*35, {cid = cid})
end
return 0
elseif pokemon.x.spell == "Great Love" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function storm(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(storm, 0, {cid = cid, el = element, ar = gl1, ef = 147})
addEvent(storm, 500, {cid = cid, el = element, ar = gl2, ef = 147})
return 0
elseif pokemon.x.spell == "Mega Prick" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 25)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)
return 0
elseif pokemon.x.spell == "Transform" 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)
doSetCreatureOutfit(getCreatureSummons(cid)[1], getCreatureOutfit(getCreatureTarget(cid)), 13000)
return 0
end
return 0
end
Sleep Powder
local thunderwavecondition = createConditionObject(CONDITION_PARALYZE)
setConditionParam(thunderwavecondition, CONDITION_PARAM_TICKS, 9000)
setConditionFormula(thunderwavecondition, -0.75, -0.75, -0.75, -0.75)
local waba = createCombatArea{
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 3, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0},
}
local snorlax = {lookType = 258}
local skullb = createCombatArea{
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}
local ap1 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 2, 1, 0, 0, 0, 0}
}
local ap2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0}
}
local ap3 = createCombatArea{
{0, 0, 0, 0, 1, 2, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ap4 = createCombatArea{
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ap5 = createCombatArea{
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ap6 = createCombatArea{
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ap7 = createCombatArea{
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ap8 = createCombatArea{
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local twn = createCombatArea{
{0, 0, 0, 2, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
}
local tws = createCombatArea{
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 2, 0, 0, 0},
}
local tww = createCombatArea{
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 0},
{2, 1, 0, 1, 0, 1, 0},
{0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
}
local twe = createCombatArea{
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0},
{0, 1, 0, 1, 0, 1, 2},
{0, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0},
}
local thunder = createCombatArea{
{1, 0, 0, 1, 0, 0, 1},
{0, 1, 0, 1, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0},
{1, 1, 1, 2, 1, 1, 1},
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 1, 0, 1, 0},
{1, 0, 0, 1, 0, 0, 1},
}
local destruct1 = createCombatArea{
{0, 0, 1, 0, 0},
{0, 1, 1, 1, 0},
{1, 1, 3, 1, 1},
{0, 1, 1, 1, 0},
{0, 0, 1, 0, 0}
}
local destruct2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 3, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local destruct3 = createCombatArea{
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0},
{1, 1, 0, 0, 0, 3, 0, 0, 0, 1, 1},
{0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}
}
local confusion = createCombatArea{
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0},
}
local stomp = createCombatArea{
{1, 0, 1, 0, 1},
{0, 1, 1, 1, 0},
{1, 1, 2, 1, 1},
{0, 1, 1, 1, 0},
{1, 0, 1, 0, 1}
}
-- WATER GUN
local bomb = createCombatArea{
{0, 1, 0},
{1, 3, 1},
{0, 1, 0},
}
local wg1n = createCombatArea{
{0, 0, 0},
{0, 2, 0},
{0, 1, 0},
}
local wg2n = createCombatArea{
{0, 2, 0},
{0, 0, 0},
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
}
local wg3n = createCombatArea{
{0, 2, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 1, 0},
}
local wg1s = createCombatArea{
{0, 1, 0},
{0, 2, 0},
{0, 0, 0},
}
local wg2s = createCombatArea{
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
{0, 0, 0},
{0, 2, 0},
}
local wg3s = createCombatArea{
{0, 1, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 2, 0},
}
local wg1e = createCombatArea{
{0, 0, 0},
{1, 2, 0},
{0, 0, 0},
}
local wg2e = createCombatArea{
{1, 1, 1, 0, 2},
}
local wg3e = createCombatArea{
{1, 0, 0, 0, 0, 2},
}
local wg1w = createCombatArea{
{0, 0, 0},
{0, 2, 1},
{0, 0, 0},
}
local wg2w = createCombatArea{
{2, 0, 1, 1, 1},
}
local wg3w = createCombatArea{
{2, 0, 0, 0, 0, 1},
}
-- WATER GUN END
local pump1 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 1, 3, 1, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local pump2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 3, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}
local tor1 = createCombatArea{
{0, 1, 0},
{1, 2, 1},
{0, 1, 0},
}
local tor2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 2, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local tor3 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 2, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local earthquake = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 2, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local sand1 = createCombatArea{
{0, 0, 0},
{0, 3, 0},
{0, 0, 0},
}
local whirl3 = createCombatArea{
{0, 0, 0},
{1, 3, 1},
{0, 0, 0},
}
local whirl5 = createCombatArea{
{0, 0, 0, 0, 0},
{1, 1, 3, 1, 1},
{0, 0, 0, 0, 0},
}
local whirl32 = createCombatArea{
{0, 0, 0},
{1, 3, 1},
{0, 0, 0},
}
local whirl52 = createCombatArea{
{0, 0, 0, 0, 0},
{1, 1, 3, 1, 1},
{0, 0, 0, 0, 0},
}
--WING ATTACK
local wingn = createCombatArea{
{0, 0, 0},
{1, 2, 0},
{0, 0, 0},
}
local wings = createCombatArea{
{1, 0, 0},
{0, 2, 0},
{0, 0, 0},
}
local winge = createCombatArea{
{1, 0, 0},
{0, 2, 0},
{0, 0, 0},
}
local wingw = createCombatArea{
{0, 2, 3},
{0, 2, 2},
{0, 0, 0},
}
local wingds = createCombatArea{
{1, 1, 1},
{0, 2, 0},
{0, 0, 0},
}
local wingdn = createCombatArea{
{0, 0, 0},
{0, 2, 0},
{1, 1, 1},
}
local wingde = createCombatArea{
{1, 0, 0},
{1, 2, 0},
{1, 0, 0},
}
local wingdw = createCombatArea{
{0, 0, 1},
{0, 2, 1},
{0, 0, 1},
}
local tsn = createCombatArea{
{0, 0, 0, 2, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 1, 1, 1, 1, 0},
}
local tss = createCombatArea{
{0, 1, 1, 1, 1, 1, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 2, 0, 0, 0},
}
local tse = createCombatArea{
{0, 0, 1, 0, 0, 0, 0},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 1, 2},
{0, 0, 1, 1, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0},
}
local tsw = createCombatArea{
{0, 0, 0, 0, 0, 0, 1},
{0, 0, 0, 0, 1, 1, 1},
{0, 0, 2, 1, 1, 1, 1},
{0, 0, 0, 0, 1, 1, 1},
{0, 0, 0, 0, 0, 0, 1},
}
local pokeis = {'Bulbasaur', 'Ivysaur', 'Venusaur', 'Charmeleon', 'Charizard', 'Wartortle', 'Blastoise',
'Butterfree', 'Fearow', 'Arbok', 'Raichu', 'Nidoqueen', 'Nidoking', 'Clefable', 'Ninetales', 'Wigglytuff',
'Vileplume', 'Parasect', 'Venonat', 'Venomoth', 'Dugtrio', 'Golduck', 'Primeape', 'Arcanine', 'Poliwrath',
'Kadabra', 'Alakazam', 'Machamp', 'Victreebel', 'Tentacruel', 'Slowbro', 'Dewgong', 'Cloyster', 'Haunter',
'Gengar', 'Onix', 'Hypno', 'Exeggutor', 'Marowak', 'Hitmonchan', 'Lickitung', 'Weezing', 'Rhydon',
'Kangaskhan', 'Seadra', 'Golem', 'Sandslash', 'Starmie', 'Jinx', 'Pinsir', 'Gyarados', 'Lapras', 'Ditto',
'Vaporeon', 'Jolteon', 'Flareon', 'Porygon', 'Omastar', 'Aerodactyl', 'Snorlax', 'Zapdos', 'Dragonite',
'Elder Charizard', 'Crystal Onix', 'Jynx', 'Electrode'}
local c = {
[25] = {x = {
pok = bulbasaur,
spell = "Stun Spore",
minLv = 28,
ex = 1000008,
base1 = 0,
base2 = 0,
dista = 5,
target = "no",
bonus = 0,
type = "grass",
cd = 25
}
},
[24] = {x = {
pok = ivysaur,
spell = "Sleep Powder",
minLv = 44,
ex = 2000008,
base1 = 0,
base2 = 0,
dista = 5,
target = "no",
bonus = 0,
type = "grass",
cd = 30
}
},
[22] = {x = {
pok = venusaur,
spell = "Sleep Powder",
minLv = 85,
ex = 3000008,
base1 = 0,
base2 = 0,
dista = 5,
target = "no",
bonus = 0,
type = "grass",
cd = 30
}
},
[23] = {x = {
pok = charmeleon,
spell = "Rage",
minLv = 40,
ex = 5000008,
base1 = 100,
base2 = 110,
dista = 3,
target = "no",
bonus = 4,
type = "dragon",
cd = 22
}
},
[67] = {x = {
pok = charizard,
spell = "Wing Attack",
minLv = 90,
ex = 5000008,
base1 = 150,
base2 = 200,
dista = 1,
bonus = 6,
target = "no",
type = "flying",
cd = 20
}
},
[6] = {x = {
pok = wartortle,
spell = "Harden",
minLv = 40,
ex = 1100008,
lpl = 93,
life = 2800,
base1 = 0,
base2 = 0,
dista = 1,
target = "no",
bonus = 0,
type = "normal",
cd = 14
}
},
[55] = {x = {
pok = blastoise,
spell = "Skull Bash",
minLv = 90,
ex = 1100008,
base1 = 190,
base2 = 225,
dista = 5,
target = "no",
bonus = 10,
type = "normal",
cd = 18
}
},
[40] = {x = {
pok = butterfree,
spell = "Stun Spore",
minLv = 30,
ex = 1300008,
base1 = 0,
base2 = 0,
dista = 5,
target = "no",
bonus = 0,
type = "grass",
cd = 25
}
},
[17] = {x = {
pok = fearow,
spell = "Rage",
minLv = 55,
ex = 2600005,
base1 = 120,
base2 = 130,
dista = 4,
target = "no",
bonus = 3.5,
type = "dragon",
cd = 20
}
},
[39] = {x = {
pok = arbok,
spell = "Rage",
minLv = 40,
ex = 2700008,
base1 = 140,
base2 = 176,
dista = 5,
target = "no",
bonus = 4,
type = "dragon",
cd = 15
}
},
[50] = {x = {
pok = raichu,
spell = "Electric Storm",
minLv = 65,
ex = 2900008,
base1 = 100,
base2 = 200,
dista = 5,
target = "no",
bonus = 5,
type = "electric",
cd = 19
}
},
[79] = {x = {
pok = nidoqueen,
spell = "Stomp",
minLv = 69,
ex = 3100008,
base1 = 110,
base2 = 170,
dista = 1,
bonus = 4.5,
target = "no",
type = "ground",
cd = 10
}
},
[35] = {x = {
pok = nidoking,
spell = "Stomp",
minLv = 69,
ex = 3400008,
base1 = 170,
base2 = 200,
dista = 1,
bonus = 5,
target = "no",
type = "ground",
cd = 9
}
},
[68] = {x = {
pok = clefable,
spell = "Focus",
minLv = 52,
ex = 3600008,
base1 = 0,
base2 = 0,
dista = 5,
Target = "no",
bonus = 3,
type = "normal",
cd = 50
}
},
[114] = {x = {
pok = Ninetales,
spell = "Magma Storm",
minLv = 85,
ex = 3800008,
base1 = 240,
base2 = 390,
dista = 5,
target = "no",
bonus = 4,
type = "fire",
cd = 18
}
},
[64] = {x = {
pok = Wigglytuff,
spell = "Melody",
minLv = 50,
ex = 4000008,
base1 = 200,
base2 = 300,
dista = 5,
target = "no",
bonus = 8.5,
type = "Normal",
cd = 60
}
},
[86] = {x = {
pok = vileplume,
spell = "Sleep Powder",
minLv = 50,
ex = 4500008,
base1 = 0,
base2 = 0,
dista = 4,
target = "no",
bonus = 0,
type = "grass",
cd = 46
}
},
[95] = {x = {
pok = parasect,
spell = "Sleep Powder",
minLv = 50,
ex = 4700008,
base1 = 20,
base2 = 40,
dista = 4,
target = "no",
bonus = 3,
target = "no",
type = "grass",
cd = 17
}
},
[52] = {x = {
pok = venonat,
spell = "Stun Spore",
minLv = 20,
ex = 4800008,
base1 = 0,
base2 = 0,
dista = 1,
bonus = 0,
target = "no",
type = "grass",
cd = 20
}
},
[49] = {x = {
pok = venomoth,
spell = "Poison Powder",
minLv = 50,
ex = 4900008,
base1 = 50,
base2 = 80,
dista = 5,
target = "no",
bonus = 4,
type = "poison",
cd = 43
}
},
[83] = {x = {
pok = dugtrio,
spell = "Rage",
minLv = 45,
ex = 5100008,
base1 = 110,
base2 = 132,
dista = 3,
bonus = 4.9,
type = "dragon",
cd = 43
}
},
[99] = {x = {
pok = golduck,
spell = "Mega Kick",
minLv = 55,
ex = 5500008,
base1 = 110,
base2 = 140,
dista = 1,
bonus = 4,
type = "fighting",
cd = 35
}
},
[103] = {x = {
pok = primeape,
spell = "Fear",
minLv = 60,
ex = 5700008,
base1 = 110,
base2 = 160,
dista = 3,
target = "no",
bonus = 4,
type = "ghost",
cd = 12
}
},
[88] = {x = {
pok = arcanine,
spell = "Fire Blast",
minLv = 82,
ex = 5900008,
base1 = 120,
base2 = 210,
dista = 5,
target = "no",
bonus = 8,
type = "fire",
cd = 19
}
},
[104] = {x = {
pok = poliwrath,
spell = "Ice Beam",
minLv = 73,
ex = 6200008,
base1 = 100,
base2 = 187,
dista = 5,
target = "no",
bonus = 10,
type = "ice",
cd = 17
}
},
[219] = {x = {
pok = kadabra,
spell = "Reflect",
minLv = 60,
ex = 6400008,
base1 = 190,
base2 = 225,
dista = 5,
target = "no",
bonus = 4,
type = "psychic",
cd = 30
}
},
[218] = {x = {
pok = alakazam,
spell = "Hypnosis",
minLv = 80,
ex = 6500008,
base1 = 0,
base2 = 0,
dista = 3,
bonus = 5,
type = "psychic",
cd = 30
}
},
[121] = {x = {
pok = machamp,
spell = "Strafe",
minLv = 70,
ex = 6800008,
base1 = 120,
base2 = 180,
dista = 4,
target = "no",
bonus = 5,
type = "normal",
cd = 27
}
},
[240] = {x = {
pok = victreebel,
spell = "Sleep Powder",
minLv = 55,
ex = 7100008,
base1 = 0,
base2 = 0,
dista = 1,
bonus = 0,
type = "grass",
cd = 20
}
},
[108] = {x = {
pok = tentacruel,
spell = "Psywave",
minLv = 80,
ex = 7300008,
base1 = 125,
base2 = 150,
dista = 5,
target = "no",
bonus = 3.5,
type = "psychic",
cd = 15
}
},
[41] = {x = {
pok = slowbro,
spell = "Psychic",
minLv = 55,
ex = 8000008,
base1 = 70,
base2 = 120,
dista = 5,
target = "no",
bonus = 4,
type = "psychic",
cd = 7
}
},
[110] = {x = {
pok = dewgong,
spell = "Rest",
minLv = 71,
ex = 8700008,
base1 = 560,
base2 = 1180,
dista = 5,
target = "no",
bonus = 4.1,
type = "normal",
cd = 122
}
},
[72] = {x = {
pok = cloyster,
spell = "Harden",
minLv = 62,
ex = 9100008,
lpl = 155,
life = 5000,
base1 = 0,
base2 = 0,
dista = 5,
bonus = 0,
target = "no",
type = "normal",
cd = 8
}
},
[65] = {x = {
pok = haunter,
spell = "Fear",
minLv = 45,
ex = 9300008,
base1 = 0,
base2 = 0,
dista = 3,
Target = "no",
bonus = 3.5,
type = "ghost",
cd = 16
}
},
[244] = {x = {
pok = gengar,
spell = "Hypnosis",
minLv = 80,
ex = 9400008,
base1 = 0,
base2 = 0,
dista = 3,
bonus = 4.5,
type = "ghost",
cd = 40
}
},
[248] = {x = {
pok = onix,
spell = "Harden",
minLv = 50,
ex = 9500008,
lpl = 150,
life = 5300,
base1 = 0,
base2 = 0,
dista = 4,
target = "no",
bonus = 0,
type = "normal",
cd = 25
}
},
[119] = {x = {
pok = hypno,
spell = "Focus",
minLv = 70,
ex = 9700008,
base1 = 0,
base2 = 0,
Target = "no",
dista = 5,
bonus = 4.8,
type = "normal",
cd = 20
}
},
[46] = {x = {
pok = exeggutor,
spell = "Poison Powder",
minLv = 55,
ex = 1030008,
base1 = 30,
base2 = 50,
dista = 5,
target = "no",
bonus = 4,
type = "poison",
cd = 32
}
},
[197] = {x = {
pok = marowak,
spell = "Rage",
minLv = 65,
ex = 1050008,
base1 = 100,
base2 = 130,
dista = 3,
bonus = 4.5,
type = "dragon",
cd = 12
}
},
[38] = {x = {
pok = hitmonchan,
spell = "Fist Machine",
minLv = 60,
ex = 1070008,
base1 = 196,
base2 = 219,
target = "no",
bonus = 7,
type = "fighting",
cd = 35
}
},
[11] = {x = {
pok = lickitung,
spell = "Strafe",
minLv = 55,
ex = 1080008,
base1 = 100,
base2 = 140,
dista = 1,
bonus = 3.5,
type = "normal",
cd = 25
}
},
[231] = {x = {
pok = weezing,
spell = "Selfdestruct",
minLv = 50,
ex = 1100008,
base1 = 350,
base2 = 580,
dista = 5,
target = "no",
bonus = 3.5,
type = "normal",
cd = 13
}
},
[200] = {x = {
pok = rhydon,
spell = "Mega Horn",
minLv = 82,
ex = 1120008,
base1 = 110,
base2 = 300,
dista = 3,
bonus = 9,
type = "rock",
cd = 15
}
},
[198] = {x = {
pok = kangaskhan,
spell = "Rage",
minLv = 80,
ex = 1150008,
base1 = 136,
base2 = 149,
dista = 1,
target = "no",
bonus = 4,
type = "dragon",
cd = 25
}
},
[276] = {x = {
pok = seadra,
spell = "Hydro Cannon",
minLv = 55,
ex = 1170008,
base1 = 190,
base2 = 245,
dista = 1,
bonus = 13,
target = "no",
type = "water",
cd = 30
}
},
[116] = {x = {
pok = golem,
spell = "Selfdestruct",
minLv = 75,
ex = 7600008,
base1 = 480,
base2 = 790,
dista = 5,
target = "no",
bonus = 6,
type = "normal",
cd = 100
}
},
[288] = {x = {
pok = golemroll,
spell = "Selfdestruct",
minLv = 75,
ex = 7600008,
base1 = 480,
base2 = 790,
dista = 5,
target = "no",
bonus = 6,
type = "normal",
cd = 100
}
},
[115] = {x = {
pok = sandslash,
spell = "Earthquake",
minLv = 70,
ex = 2800008,
base1 = 150,
base2 = 180,
dista = 3,
target = "no",
bonus = 1.6,
type = "ground",
cd = 45
}
},
[249] = {x = {
pok = starmie,
spell = "Restore",
minLv = 35,
ex = 1210008,
base1 = 180,
base2 = 240,
dista = 5,
target = "no",
bonus = 2.9,
type = "psychic",
cd = 10
}
},
[282] = {x = {
pok = jynx,
spell = "Blizzard",
minLv = 81,
ex = 1240008,
base1 = 115,
base2 = 150,
dista = 5,
target = "no",
bonus = 10,
type = "ice",
cd = 30
}
},
[53] = {x = {
pok = pinsir,
spell = "Rage",
minLv = 60,
ex = 1270008,
base1 = 110,
base2 = 130,
dista = 1,
bonus = 3.5,
type = "dragon",
cd = 17
}
},
[117] = {x = {
pok = gyarados,
spell = "Hydropump",
minLv = 93,
ex = 1300005,
base1 = 160,
base2 = 320,
dista = 5,
target = "no",
bonus = 3.5,
type = "water",
cd = 23
}
},
[193] = {x = {
pok = lapras,
spell = "Hydropump",
minLv = 90,
ex = 1310008,
base1 = 123,
base2 = 287,
dista = 5,
target = "no",
bonus = 4,
type = "water",
cd = 12
}
},
[28] = {x = {
pok = ditto,
spell = "",
minLv = 40,
ex = 1320008,
base1 = 125,
base2 = 130,
dista = 5,
bonus = 3,
target = "no",
type = "normal",
cd = 20
}
},
[215] = {x = {
pok = vaporeon,
spell = "Hydro Cannon",
minLv = 65,
ex = 1340008,
base1 = 109,
base2 = 189,
dista = 1,
bonus = 3,
target = "no",
type = "water",
cd = 20
}
},
[195] = {x = {
pok = jolteon,
spell = "Thunder",
minLv = 65,
ex = 1350008,
base1 = 110,
base2 = 189,
dista = 5,
target = "no",
bonus = 3,
type = "electric",
cd = 13
}
},
[14] = {x = {
pok = flareon,
spell = "Fire Blast",
minLv = 65,
ex = 1360008,
base1 = 110,
base2 = 189,
dista = 1,
target = "no",
bonus = 3,
type = "fire",
cd = 20
}
},
[97] = {x = {
pok = porygon,
spell = "Restore",
minLv = 40,
ex = 1370008,
base1 = 165,
base2 = 215,
dista = 5,
bonus = 3.5,
target = "no",
type = "psychic",
cd = 30
}
},
[192] = {x = {
pok = omastar,
spell = "Ancient Power",
minLv = 95,
ex = 1390008,
base1 = 240,
base2 = 380,
dista = 5,
target = "no",
bonus = 5,
type = "rock",
cd = 34
}
},
[10] = {x = {
pok = aerodactyl,
spell = "Wing Attack",
minLv = 100,
ex = 1420008,
base1 = 150,
base2 = 345,
dista = 1,
bonus = 6.5,
target = "no",
type = "flying",
cd = 12
}
},
[51] = {x = {
pok = snorlax,
spell = "Rest",
minLv = 85,
ex = 1430008,
base1 = 1500,
base2 = 2000,
dista = 5,
target = "no",
bonus = 6,
type = "normal",
cd = 64
}
},
[258] = {x = {
pok = snorlaxrest,
spell = "Rest",
minLv = 85,
ex = 1430008,
base1 = 1500,
base2 = 2000,
dista = 5,
target = "no",
bonus = 6,
type = "normal",
cd = 64
}
},
[199] = {x = {
pok = Zapdos,
spell = "Tornado",
minLv = 100,
ex = 1450008,
base1 = 390,
base2 = 678,
dista = 5,
target = "no",
bonus = 9,
type = "flying",
cd = 11
}
},
[210] = {x = {
pok = dragonite,
spell = "Twister",
minLv = 104,
ex = 1490008,
base1 = 278,
base2 = 300,
dista = 1,
bonus = 6.5,
target = "no",
type = "dragon",
cd = 20
}
},
[294] = {x = {
pok = eldercharizard,
spell = "Wing Attack",
minLv = 100,
ex = 1500008,
base1 = 390,
base2 = 410,
dista = 1,
bonus = 6.8,
target = "no",
type = "flying",
cd = 17
}
},
[292] = {x = {
pok = crystalOnix,
spell = "Harden",
minLv = 100,
ex = 1510008,
lpl = 155,
life = 5000,
base1 = 0,
base2 = 0,
dista = 1,
bonus = 0,
type = "normal",
cd = 25
}
},
[125] = {x = {
pok = electrode,
spell = "Charge Beam",
minLv = 40,
ex = 1010008,
base1 = 100,
base2 = 187,
dista = 5,
target = "no",
bonus = 10,
type = "electric",
cd = 19
}
},
[286] = {x = {
pok = electroderoll,
spell = "Charge Beam",
minLv = 40,
ex = 1010008,
base1 = 100,
base2 = 187,
dista = 5,
target = "no",
bonus = 10,
type = "electric",
cd = 19
}
},
}
function onSay(cid)
if #getCreatureSummons(cid) == 0 then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to use moves.")
return 0
end
if getTilePzInfo(getPlayerPosition(cid)) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Can't use Moves on protect zone.")
return true
end
if not isInArray(pokeis, getCreatureName(getCreatureSummons(cid)[1])) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn\'t recognize this move.")
return 0
end
pokemon = c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType]
if getPlayerLevel(cid) < c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.minLv then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have enough level to use this move.")
return 0
end
if exhaustion.get(cid, pokemon.x.ex) then
seconds = math.floor(((exhaustion.get(cid, pokemon.x.ex)) + 1))
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..seconds.." seconds to use this move again.")
return 0
end
if getPlayerStorageValue(getCreatureSummons(cid)[1], 3) >= 1 then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "MISS", 215)
setPlayerStorageValue(getCreatureSummons(cid)[1], 3, -1)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return true
end
if getPlayerStorageValue(getCreatureSummons(cid)[1], 5) >= 1 then
if math.random(1,100) <= 33 then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "SELF HIT", 180)
local levels = getPlayerLevel(cid)
doTargetCombatHealth(cid, getCreatureSummons(cid)[1], COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
return true
end
end
if pokemon.x.target ~= "no" then
if not isMonster(getCreatureTarget(cid)) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")
return 0
end
if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > pokemon.x.dista then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to use this move.")
return 0
end
if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then
return 0
end
end
if pokemon.x.type == "flying" then
elementa = FLYDAMAGE
elseif pokemon.x.type == "ground" then
elementa = GROUNDDAMAGE
elseif pokemon.x.type == "electric" then
elementa = ELECTRICDAMAGE
elseif pokemon.x.type == "ghost" then
elementa = GHOSTDAMAGE
elseif pokemon.x.type == "normal" then
elementa = NORMALDAMAGE
elseif pokemon.x.type == "fighting" then
elementa = FIGHTINGDAMAGE
elseif pokemon.x.type == "poison" then
elementa = POISONDAMAGE
elseif pokemon.x.type == "rock" then
elementa = ROCKDAMAGE
elseif pokemon.x.type == "bug" then
elementa = BUGDAMAGE
elseif pokemon.x.type == "fire" then
elementa = FIREDAMAGE
elseif pokemon.x.type == "water" then
elementa = WATERDAMAGE
elseif pokemon.x.type == "grass" then
elementa = GRASSDAMAGE
elseif pokemon.x.type == "psychic" then
elementa = PSYCHICDAMAGE
elseif pokemon.x.type == "ice" then
elementa = ICEDAMAGE
elseif pokemon.x.type == "dragon" then
elementa = DRAGONDAMAGE
end
local element = elementa
local num1 = (pokemon.x.base1)
local num2 = (pokemon.x.base2)
local num3 = (pokemon.x.bonus)
setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3))))
if pokemon.x.spell == "Water Gun" then
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Gust" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}})
end
return 0
---------------------ADICIONADAS---------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------
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), 3, 1)
local alvo = getCreatureTarget(cid)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 24)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 136)
local function string(params)
if isCreature(params.alvo) then
if getPlayerStorageValue(params.alvo, 3) >= 1 then
doSendMagicEffect(getThingPos(params.alvo), 136)
end
end
end
local function normalstr(params)
if isCreature(params.alvo) then
if getPlayerStorageValue(params.alvo, 3) >= 1 then
setPlayerStorageValue(params.alvo, 3, -1)
end
end
end
addEvent(string, 250, {alvo = alvo})
addEvent(string, 500, {alvo = alvo})
addEvent(string, 750, {alvo = alvo})
addEvent(string, 1000, {alvo = alvo})
addEvent(string, 1250, {alvo = alvo})
addEvent(string, 1500, {alvo = alvo})
addEvent(string, 1750, {alvo = alvo})
addEvent(string, 2000, {alvo = alvo})
addEvent(string, 2250, {alvo = alvo})
addEvent(string, 2500, {alvo = alvo})
addEvent(string, 2750, {alvo = alvo})
addEvent(string, 3000, {alvo = alvo})
addEvent(normalstr, 3050, {alvo = alvo})
return 0
---------------------ADICIONADAS---------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------------------
elseif pokemon.x.spell == "Rage" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 110)
local hitalvo = getCreatureTarget(cid)
local function hit(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(getCreatureTarget(params.cid)) then
if getCreatureTarget(params.cid) == params.hitalvo then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], FLYDAMAGE, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 110)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), CONST_ME_MAGIC_RED)
end
end
end
end
addEvent(hit, 1000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 2000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 3000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 4000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 5000, {cid = cid, hitalvo = hitalvo})
addEvent(hit, 6000, {cid = cid, hitalvo = hitalvo})
return 0
elseif pokemon.x.spell == "Charge Beam" then
alvo = getCreatureName(getCreatureTarget(cid))
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 94)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 93)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 95)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 91)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 93)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 92)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 86)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 88)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 87)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 89)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 88)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 90)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Melody" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function storm(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), earthquake, thunderwavecondition, 255)
else
end
end
addEvent(storm, 0, {cid = cid, el = element, ar = earthquake, ef = 19})
addEvent(storm, 1000, {cid = cid, el = element, ar = earthquake, ef = 19})
addEvent(storm, 2000, {cid = cid, el = element, ar = earthquake, ef = 19})
addEvent(storm, 3000, {cid = cid, el = element, ar = earthquake, ef = 19})
addEvent(storm, 4000, {cid = cid, el = element, ar = earthquake, ef = 19})
addEvent(storm, 5000, {cid = cid, el = element, ar = earthquake, ef = 19})
return 0
elseif pokemon.x.spell == "Fist Machine" 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)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x+0
flamepos.y = flamepos.y-1
doSendMagicEffect(flamepos, 217)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x+2
flamepos.y = flamepos.y+0
doSendMagicEffect(flamepos, 215)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingde, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x-0
flamepos.y = flamepos.y+2
doSendMagicEffect(flamepos, 218)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingds, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
local flamepos = getThingPos(getCreatureSummons(cid)[1])
flamepos.x = flamepos.x-1
flamepos.y = flamepos.y+0
doSendMagicEffect(flamepos, 216)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
end
return 0
elseif pokemon.x.spell == "Mega Horn" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 25)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 15)
else
end
end
addEvent(damage, 0, {cid = cid})
addEvent(throw, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Skull Bash" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), skullb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 208)
return 0
elseif pokemon.x.spell == "Whirlwind" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, params.br, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, br = whirl3})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, br = whirl5})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}, br = whirl5})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, br = whirl3})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, br = whirl5})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}, br = whirl5})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, br = whirl32})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, br = whirl52})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}, br = whirl52})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, br = sand1})
addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, br = whirl32})
addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, br = whirl52})
addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}, br = whirl52})
end
return 0
elseif pokemon.x.spell == "Sleep Powder" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 27)
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
return 0
elseif pokemon.x.spell == "Twister" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), twn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), twe, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tws, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tww, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42)
end
return 0
elseif pokemon.x.spell == "Stun Spore" 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)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), confusion, thunderwavecondition, 255)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 85)
end
return 0
elseif pokemon.x.spell == "Hyper Fang" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 159)
return 0
elseif pokemon.x.spell == "Tornado" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function tornado(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(tornado, 0, {cid = cid, ef = 42, ar = tor1, el = element})
addEvent(tornado, 500, {cid = cid, ef = 42, ar = tor2, el = element})
addEvent(tornado, 1000, {cid = cid, ef = 42, ar = tor3, el = element})
addEvent(tornado, 500, {cid = cid, ef = CONST_ME_POFF, ar = tor1, el = null})
addEvent(tornado, 1200, {cid = cid, ef = CONST_ME_POFF, ar = tor2, el = null})
addEvent(tornado, 1900, {cid = cid, ef = CONST_ME_POFF, ar = tor2, el = null})
addEvent(tornado, 1900, {cid = cid, ef = CONST_ME_POFF, ar = tor3, el = null})
return 0
elseif pokemon.x.spell == "Hydropump" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function tornado(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(tornado, 0, {cid = cid, ef = 53, ar = pump1, el = element})
addEvent(tornado, 500, {cid = cid, ef = 53, ar = pump2, el = element})
return 0
elseif pokemon.x.spell == "Rest" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureName(getCreatureSummons(cid)[1]) == "Snorlax" then
doSetCreatureOutfit(getCreatureSummons(cid)[1], snorlax, 5000)
doChangeSpeed(getCreatureSummons(cid)[1], 145)
end
setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1)
local function rest(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
if getCreatureCondition(getCreatureSummons(params.cid)[1], CONDITION_OUTFIT) == true then
doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 32)
end
end
end
end
for r = 1, 4 do
addEvent(rest, 1000*r, {cid = cid})
end
local function stoprest(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
doChangeSpeed(getCreatureSummons(params.cid)[1], -145)
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then
setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, 0)
end
end
end
end
addEvent(stoprest, 4300, {cid = cid})
return 0
elseif pokemon.x.spell == "Poison Powder" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 84)
return 0
elseif pokemon.x.spell == "Psychic" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
return 0
elseif pokemon.x.spell == "Water Gun" then
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Reflect" 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)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 135)
setPlayerStorageValue(getCreatureSummons(cid)[1], 34, 1)
return 0
elseif pokemon.x.spell == "Fire Blast" 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)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.eee)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, whirl3, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 35)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.arr, whirl3, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 35)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, eee = 60, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 60, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-1, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 60, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-2, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 60, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-3, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 60, ar = {x=posicao.x, y=posicao.y-5, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 60, ar = {x=posicao.x, y=posicao.y-6, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, eee = 62, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 62, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+1, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 62, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+2, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 62, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+3, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 62, ar = {x=posicao.x, y=posicao.y+5, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+4, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 62, ar = {x=posicao.x, y=posicao.y+6, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, eee = 61, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 61, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+1, y=posicao.y, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 61, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+2, y=posicao.y, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 61, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 61, ar = {x=posicao.x+5, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 61, ar = {x=posicao.x+6, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+5, y=posicao.y, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, eee = 63, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 63, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-1, y=posicao.y, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 63, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-2, y=posicao.y, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 63, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 63, ar = {x=posicao.x-5, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 63, ar = {x=posicao.x-6, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-5, y=posicao.y, z=posicao.z}})
end
return 0
elseif pokemon.x.spell == "Ice Beam" then
alvo = getCreatureName(getCreatureTarget(cid))
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 99)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 105)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 103)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 98)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 105)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 102)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 96)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 104)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 100)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 97)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 104)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 101)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Selfdestruct" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
addEvent(doCreatureAddHealth, 250, getCreatureSummons(cid)[1], -getCreatureHealth(getCreatureSummons(cid)[1]))
doAreaCombatHealth(getCreatureSummons(cid)[1], NORMALDAMAGE, getThingPos(getCreatureSummons(cid)[1]), destruct1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 5)
addEvent(doAreaCombatHealth, 150, getCreatureSummons(cid)[1], NORMALDAMAGE, getThingPos(getCreatureSummons(cid)[1]), destruct2, -(((num1)+(getPlayerLevel(cid)*(num3)))*0.7), -(((num2)+(getPlayerLevel(cid)*(num3)))*0.8), 5)
addEvent(doAreaCombatHealth, 250, getCreatureSummons(cid)[1], NORMALDAMAGE, getThingPos(getCreatureSummons(cid)[1]), destruct3, -(((num1)+(getPlayerLevel(cid)*(num3)))*0.4), -(((num2)+(getPlayerLevel(cid)*(num3)))*0.5), 5)
setPlayerStorageValue(getCreatureSummons(cid)[1], 33, 1)
return 0
elseif pokemon.x.spell == "Psycho Shift" then
targetpos = getThingPos(getCreatureTarget(cid))
targetposss = getThingPos(getCreatureTarget(cid))
if math.random(1,100) >= 51 then
targetpos.x = targetpos.x+2
else
targetpos.x = targetpos.x-2
end
if math.random(1,100) >= 51 then
targetpos.y = targetpos.y-2
else
targetpos.y = targetpos.y+2
end
tile = getTileItemByType(targetpos, ground).itemid
if getThingPos(cid).z > 7 then
if isWalkable(targetpos, cid, 0, 0) then
doTeleportThing(getCreatureTarget(cid), targetpos)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, targetpos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(targetpos, 12)
else
doAreaCombatHealth(getCreatureSummons(cid)[1], element, targetposss, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(targetposss, 12)
end
else
if not isInArray(imp, tile) then
if not isInArray(imp, getTileThingByPos(targetpos).itemid) then
doTeleportThing(getCreatureTarget(cid), targetpos)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, targetpos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(targetpos, 12)
else
doAreaCombatHealth(getCreatureSummons(cid)[1], element, targetposss, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(targetposss, 12)
end
else
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134)
doSendMagicEffect(targetposss, 12)
end
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Restore" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 14)
doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 35)
return 0
elseif pokemon.x.spell == "Psywave" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
end
return 0
elseif pokemon.x.spell == "Poison Bomb" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
addEvent(doAreaCombatHealth, 100, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), bomb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 14)
return 0
elseif pokemon.x.spell == "Psywave" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), tsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)
end
return 0
elseif pokemon.x.spell == "Blizzard" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function fall(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
local pos = getThingPos(getCreatureSummons(cid)[1])
pos.x = pos.x + math.random(-4,4)
pos.y = pos.y + math.random(-4,4)
local frompos = getThingPos(getCreatureSummons(cid)[1])
frompos.x = pos.x - 7
frompos.y = pos.y - 6
doSendDistanceShoot(frompos, pos, 35)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, pos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 52)
end
end
end
for rocks = 1, 72 do
addEvent(fall, rocks*35, {cid = cid})
end
return 0
elseif pokemon.x.spell == "Ancient Power" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function sandattack(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.ar, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, params.wave, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-2, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-3, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-4, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+1, y=posicao.y-5, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-2, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-3, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-4, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-5, z=posicao.z}, ef = 137, wave = ap1})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+0, y=posicao.y-1, z=posicao.z}, ef = 18, wave = ap2})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+0, y=posicao.y-2, z=posicao.z}, ef = 18, wave = ap2})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+0, y=posicao.y-3, z=posicao.z}, ef = 18, wave = ap2})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+0, y=posicao.y-4, z=posicao.z}, ef = 18, wave = ap2})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+0, y=posicao.y-5, z=posicao.z}, ef = 18, wave = ap2})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+2, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+3, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+4, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+1, y=posicao.y+5, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+2, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+3, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+4, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+5, z=posicao.z}, ef = 137, wave = ap3})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+0, y=posicao.y+1, z=posicao.z}, ef = 18, wave = ap4})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+0, y=posicao.y+2, z=posicao.z}, ef = 18, wave = ap4})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+0, y=posicao.y+3, z=posicao.z}, ef = 18, wave = ap4})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+0, y=posicao.y+4, z=posicao.z}, ef = 18, wave = ap4})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+0, y=posicao.y+5, z=posicao.z}, ef = 18, wave = ap4})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+2, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+3, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+4, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+5, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+6, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+2, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+3, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+4, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+5, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+6, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap5})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+2, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap6})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+3, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap6})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+4, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap6})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x+5, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap6})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x+6, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap6})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x-4, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x-5, y=posicao.y+1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x-4, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x-5, y=posicao.y-1, z=posicao.z}, ef = 137, wave = ap7})
addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap8})
addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap8})
addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap8})
addEvent(sandattack, 1200, {cid = cid, ar = {x=posicao.x-4, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap8})
addEvent(sandattack, 1600, {cid = cid, ar = {x=posicao.x-5, y=posicao.y-0, z=posicao.z}, ef = 18, wave = ap8})
end
return 0
elseif pokemon.x.spell == "Magma Storm" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function fall(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
local pos = getThingPos(getCreatureSummons(cid)[1])
pos.x = pos.x + math.random(-4,4)
pos.y = pos.y + math.random(-4,4)
local frompos = getThingPos(getCreatureSummons(cid)[1])
frompos.x = pos.x - 7
frompos.y = pos.y - 6
doSendDistanceShoot(frompos, pos, 6)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, pos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 15)
end
end
end
for rocks = 1, 72 do
addEvent(fall, rocks*35, {cid = cid})
end
return 0
elseif pokemon.x.spell == "Hydro Cannon" 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)
posit = getThingPos(getCreatureSummons(cid)[1])
local function gust(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.eee)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, whirl3, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
doAreaCombatHealth(getCreatureSummons(params.cid)[1], null, params.arr, whirl3, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
else
end
end
local posicao = getThingPos(getCreatureSummons(cid)[1])
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
addEvent(gust, 0, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-1, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-2, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-3, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-5, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-4, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 66, ar = {x=posicao.x, y=posicao.y-6, z=posicao.z}, arr = {x=posicao.x, y=posicao.y-5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
addEvent(gust, 0, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+1, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+2, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+3, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+5, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+4, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 64, ar = {x=posicao.x, y=posicao.y+6, z=posicao.z}, arr = {x=posicao.x, y=posicao.y+5, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
addEvent(gust, 0, {cid = cid, eee = 67, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 67, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+1, y=posicao.y, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 67, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+2, y=posicao.y, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 67, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 67, ar = {x=posicao.x+5, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 67, ar = {x=posicao.x+6, y=posicao.y, z=posicao.z}, arr = {x=posicao.x+5, y=posicao.y, z=posicao.z}})
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
addEvent(gust, 0, {cid = cid, eee = 65, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, arr = posicao})
addEvent(gust, 300, {cid = cid, eee = 65, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-1, y=posicao.y, z=posicao.z}})
addEvent(gust, 600, {cid = cid, eee = 65, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-2, y=posicao.y, z=posicao.z}})
addEvent(gust, 900, {cid = cid, eee = 65, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-3, y=posicao.y, z=posicao.z}})
addEvent(gust, 1200, {cid = cid, eee = 65, ar = {x=posicao.x-5, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-4, y=posicao.y, z=posicao.z}})
addEvent(gust, 1500, {cid = cid, eee = 65, ar = {x=posicao.x-6, y=posicao.y, z=posicao.z}, arr = {x=posicao.x-5, y=posicao.y, z=posicao.z}})
end
return 0
elseif pokemon.x.spell == "Waterball" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function throw(params)
if isMonster(getCreatureTarget(params.cid)) then
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 2)
else
end
end
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)
else
end
end
addEvent(damage, 100, {cid = cid})
addEvent(throw, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Earthquake" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function storm(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(storm, 0, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 1000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 1500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 2000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 2500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 3000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 3500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 4000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 4500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 5000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 5500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 6000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 6500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 7000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 7500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 8000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 8500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 9000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 9500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 10000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 10500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 11000, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 11500, {cid = cid, el = element, ar = earthquake, ef = 118})
addEvent(storm, 12000, {cid = cid, el = element, ar = earthquake, ef = 118})
return 0
elseif pokemon.x.spell == "Wing Attack" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 128)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), winge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 129)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingde, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wings, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 131)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingds, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 130)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
end
return 0
elseif pokemon.x.spell == "Mega Kick" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 113)
return 0
elseif pokemon.x.spell == "Harden" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local hardname = getCreatureName(getCreatureSummons(cid)[1])
setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1)
local oldpos = getThingPos(getCreatureSummons(cid)[1])
local function efect(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then
doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 144)
end
end
end
local function chard(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then
setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, -1)
end
end
end
addEvent(efect, 100, {cid = cid, hardname = hardname})
addEvent(efect, 1600, {cid = cid, hardname = hardname})
addEvent(efect, 3100, {cid = cid, hardname = hardname})
addEvent(efect, 4600, {cid = cid, hardname = hardname})
addEvent(efect, 6100, {cid = cid, hardname = hardname})
addEvent(efect, 7600, {cid = cid, hardname = hardname})
addEvent(efect, 9100, {cid = cid, hardname = hardname})
addEvent(efect, 10600, {cid = cid, hardname = hardname})
addEvent(chard, 11000, {cid = cid})
return 0
elseif pokemon.x.spell == "Electric Storm" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function fall(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)[1]) then
local pos = getThingPos(getCreatureSummons(cid)[1])
pos.x = pos.x + math.random(-4,4)
pos.y = pos.y + math.random(-4,4)
local frompos = getThingPos(getCreatureSummons(cid)[1])
frompos.x = pos.x - 7
frompos.y = pos.y - 6
doSendDistanceShoot(frompos, pos, 41)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, pos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
end
end
end
for rocks = 1, 72 do
addEvent(fall, rocks*35, {cid = cid})
end
return 0
elseif pokemon.x.spell == "Stomp" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), stomp, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 118)
return 0
elseif pokemon.x.spell == "Mind Blast" 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)
if math.random(1,3) == 1 then
random = 133
else
if math.random(1,2) == 2 then
random = 134
else
random = 136
end
end
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), random)
if math.random(1,3) == 1 then
random = 133
else
if math.random(1,2) == 2 then
random = 134
else
random = 136
end
end
local function go(params)
if isCreature(getCreatureSummons(params.cid)[1]) then
if isCreature(getCreatureTarget(cid)) then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), psy2, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), random)
end
end
end
addEvent(go, 150, {cid = cid})
if math.random(1,3) == 1 then
random = 133
else
if math.random(1,2) == 2 then
random = 134
else
random = 136
end
end
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), psy1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), random)
return 0
elseif pokemon.x.spell == "Toxic Needle" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 15)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 8)
return 0
elseif pokemon.x.spell == "Thunderbolt" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local posalvo = getThingPos(getCreatureTarget(cid))
local boltalvo = getCreatureTarget(cid)
posalvo.x = posalvo.x-2
posalvo.y = posalvo.y-6
doSendDistanceShoot(posalvo, getThingPos(getCreatureTarget(cid)), 41)
local function bolt(params)
if isCreature(params.cid) then
if isCreature(getCreatureTarget(cid)) then
if getCreatureTarget(params.cid) == params.boltalvo then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
end
end
end
end
addEvent(bolt, 200, {cid = cid, boltalvo = boltalvo})
return 0
elseif pokemon.x.spell == "Thunder" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), thunder, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)
return 0
elseif pokemon.x.spell == "Super Sonic" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local t = getCreatureTarget(cid)
setPlayerStorageValue(t, 5, 1)
local function confused(params)
if isCreature(params.t) then
local spdc = getCreatureSpeed(params.t)
if getCreatureLookDir(params.t) == 0 then
confs = math.random(1,3)
elseif getCreatureLookDir(params.t) == 1 then
confurandom = math.random(1,99)
if confurandom <= 33 then
confs = 0
elseif confurandom >= 67 then
confs = 2
else
confs = 3
end
elseif getCreatureLookDir(params.t) == 2 then
confurandom = math.random(1,99)
if confurandom <= 33 then
confs = 3
elseif confurandom >= 67 then
confs = 0
else
confs = 1
end
elseif getCreatureLookDir(params.t) == 3 then
confs = math.random(0,2)
end
doPushCreature(params.t, confs, 1, 0)
doSendMagicEffect(getThingPos(params.t), 31)
end
end
local function nonc(params)
if isCreature(params.t) then
doChangeSpeed(params.t, -getCreatureSpeed(params.t))
doChangeSpeed(params.t, getCreatureBaseSpeed(params.t))
setPlayerStorageValue(params.t, 5, -1)
end
end
doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 32)
doChangeSpeed(t, -( getCreatureSpeed(t)/3))
doSendMagicEffect(getThingPos(t), 31)
for i = 1, math.random(6,7) do
addEvent(confused, 1000*i, {cid = cid, t = t})
end
addEvent(nonc, 7100, {cid - cid, t = t})
return 0
end
return 0
end
Poison Powder
local ps1 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 1, 2, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ws1 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0},
{0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 2, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ws2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0},
{0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 2, 1, 0, 1, 0, 0},
{0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0},
{0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ws3 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0},
{0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0},
{0, 1, 0, 1, 0, 2, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0},
{0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ws4 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0},
{0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 2, 0, 1, 0, 1, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0},
{0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0},
{0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local tor1 = createCombatArea{
{0, 1, 0},
{1, 2, 1},
{0, 1, 0},
}
local tor2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 2, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local tor3 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 2, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local ps2 = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 2, 1, 1, 1, 0, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}
local wingn = createCombatArea{
{0, 0, 0},
{1, 2, 0},
{0, 0, 0},
}
local wings = createCombatArea{
{1, 0, 0},
{0, 2, 0},
{0, 0, 0},
}
local winge = createCombatArea{
{1, 0, 0},
{0, 2, 0},
{0, 0, 0},
}
local wingw = createCombatArea{
{0, 2, 3},
{0, 2, 2},
{0, 0, 0},
}
local wingds = createCombatArea{
{1, 1, 1},
{0, 2, 0},
{0, 0, 0},
}
local wingdn = createCombatArea{
{0, 0, 0},
{0, 2, 0},
{1, 1, 1},
}
local wingde = createCombatArea{
{1, 0, 0},
{1, 2, 0},
{1, 0, 0},
}
local wingdw = createCombatArea{
{0, 0, 1},
{0, 2, 1},
{0, 0, 1},
}
-- WING ATTACK END
local grassarea = createCombatArea{
{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0},
{1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1},
{0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0}
}
-- WATER GUN
local wg1n = createCombatArea{
{0, 0, 0},
{0, 2, 0},
{0, 1, 0},
}
local wg2n = createCombatArea{
{0, 2, 0},
{0, 0, 0},
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
}
local wg3n = createCombatArea{
{0, 2, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 1, 0},
}
local wg1s = createCombatArea{
{0, 1, 0},
{0, 2, 0},
{0, 0, 0},
}
local wg2s = createCombatArea{
{0, 1, 0},
{0, 1, 0},
{0, 1, 0},
{0, 0, 0},
{0, 2, 0},
}
local wg3s = createCombatArea{
{0, 1, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 0, 0},
{0, 2, 0},
}
local wg1e = createCombatArea{
{0, 0, 0},
{1, 2, 0},
{0, 0, 0},
}
local wg2e = createCombatArea{
{1, 1, 1, 0, 2},
}
local wg3e = createCombatArea{
{1, 0, 0, 0, 0, 2},
}
local wg1w = createCombatArea{
{0, 0, 0},
{0, 2, 1},
{0, 0, 0},
}
local wg2w = createCombatArea{
{2, 0, 1, 1, 1},
}
local wg3w = createCombatArea{
{2, 0, 0, 0, 0, 1},
}
-- WATER GUN END
local pokeis = {'Golem', 'Alakazam', 'Mew', 'Mewtwo', 'Venusaur', 'Arcanine', 'Aerodactyl', 'Alakazan',
'Parasect', 'Venomoth'}
local c = {
[22] = {x = {
pok = venusaur,
spell = "Leaf Storm",
minLv = 85,
ex = 3000010,
base1 = 400,
base2 = 500,
dista = 5,
target = "no",
bonus = 6.5,
type = "grass",
cd = 55
}
},
[95] = {x = {
pok = Parasect,
spell = "X-Scissor",
minLv = 90,
ex = 4700010,
base1 = 245,
base2 = 253,
dista = 3,
target = "no",
bonus = 3,
type = "bug",
cd = 45
}
},
[49] = {x = {
pok = venomoth,
spell = "Tornado",
minLv = 50,
ex = 4900005,
base1 = 280,
base2 = 300,
dista = 5,
target = "no",
bonus = 9,
type = "flying",
cd = 60
}
},
[218] = {x = {
pok = alakazan,
spell = "Restore",
minLv = 1,
ex = 6500002,
base1 = 135,
base2 = 145,
dista = 5,
bonus = 15,
type = "psychic",
target = "no",
cd = 26
}
},
[10] = {x = {
pok = aerodactyl,
spell = "Hyper Beam",
minLv = 105,
ex = 1420010,
base1 = 285,
base2 = 450,
dista = 5,
bonus = 14,
target = "no",
type = "normal",
cd = 25
}
},
[34] = {x = {
pok = Mewtwo,
spell = "Psychicmewtwo",
minLv = 112,
ex = 1500010,
base1 = 135,
base2 = 145,
dista = 5,
bonus = 15,
type = "psychic",
target = "no",
cd = 26
}
},
[9] = {x = {
pok = Mew,
spell = "Psychicmew",
minLv = 112,
ex = 1510010,
base1 = 135,
base2 = 145,
dista = 5,
bonus = 15,
type = "psychic",
target = "no",
cd = 26
}
},
[88] = {x = {
pok = arcanine,
spell = "Wardog",
minLv = 84,
ex = 5900010,
base1 = 130,
base2 = 200,
dista = 3,
target = "no",
bonus = 8,
type = "normal",
cd = 30
}
},
}
function onSay(cid)
if #getCreatureSummons(cid) == 0 then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to moves.")
return 0
end
pokemon = c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType]
if not isInArray(pokeis, getCreatureName(getCreatureSummons(cid)[1])) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn\'t recognize this move.")
return 0
end
if getPlayerLevel(cid) < c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.minLv then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have enough level to this move.")
return 0
end
if exhaustion.get(cid, pokemon.x.ex) then
seconds = math.floor(((exhaustion.get(cid, pokemon.x.ex)) + 1))
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..seconds.." seconds to this move again.")
return 0
end
if getPlayerStorageValue(getCreatureSummons(cid)[1], 3) >= 1 then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "MISS", 215)
setPlayerStorageValue(getCreatureSummons(cid)[1], 3, -1)
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)
return true
end
if getPlayerStorageValue(getCreatureSummons(cid)[1], 5) >= 1 then
if math.random(1,100) <= 33 then
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "SELF HIT", 180)
local levels = getPlayerLevel(cid)
doTargetCombatHealth(cid, getCreatureSummons(cid)[1], COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3)
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)
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
return true
end
end
if pokemon.x.target ~= "no" then
if not isMonster(getCreatureTarget(cid)) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")
return 0
end
if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > pokemon.x.dista then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to this move.")
return 0
end
if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then
return 0
end
end
if pokemon.x.type == "flying" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 1)
elementa = FLYDAMAGE
elseif pokemon.x.type == "ground" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 2)
elementa = GROUNDDAMAGE
elseif pokemon.x.type == "electric" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 3)
elementa = ELECTRICDAMAGE
elseif pokemon.x.type == "ghost" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 4)
elementa = GHOSTDAMAGE
elseif pokemon.x.type == "normal" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 5)
elementa = NORMALDAMAGE
elseif pokemon.x.type == "fighting" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 6)
elementa = FIGHTINGDAMAGE
elseif pokemon.x.type == "poison" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 7)
elementa = POISONDAMAGE
elseif pokemon.x.type == "rock" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 8)
elementa = ROCKDAMAGE
elseif pokemon.x.type == "bug" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 9)
elementa = BUGDAMAGE
elseif pokemon.x.type == "fire" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 10)
elementa = FIREDAMAGE
elseif pokemon.x.type == "water" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 11)
elementa = WATERDAMAGE
elseif pokemon.x.type == "grass" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 12)
elementa = GRASSDAMAGE
elseif pokemon.x.type == "psychic" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 13)
elementa = PSYCHICDAMAGE
elseif pokemon.x.type == "ice" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 14)
elementa = ICEDAMAGE
elseif pokemon.x.type == "dragon" then
setPlayerStorageValue(getCreatureSummons(cid)[1], 1700, 15)
elementa = DRAGONDAMAGE
end
local element = elementa
local num1 = (pokemon.x.base1)
local num2 = (pokemon.x.base2)
local num3 = (pokemon.x.bonus)
setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3))))
if pokemon.x.spell == "Windstorm" 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)
posit = getThingPos(getCreatureSummons(cid)[1])
local function storm(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(storm, 0, {cid = cid, el = element, ar = ws1, ef = 42})
addEvent(storm, 500, {cid = cid, el = element, ar = ws2, ef = 42})
addEvent(storm, 1000, {cid = cid, el = element, ar = ws3, ef = 42})
addEvent(storm, 1500, {cid = cid, el = element, ar = ws4, ef = 42})
addEvent(storm, 700, {cid = cid, el = null, ar = ws4, ef = CONST_ME_POFF})
addEvent(storm, 1200, {cid = cid, el = null, ar = ws1, ef = CONST_ME_POFF})
addEvent(storm, 1800, {cid = cid, el = null, ar = ws3, ef = CONST_ME_POFF})
return 0
elseif pokemon.x.spell == "Selfdestruct" 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)
local function death(params)
if isCreature(params.cid) then
doCreatureAddHealth(getCreatureSummons(params.cid)[1], -getCreatureHealth(getCreatureSummons(cid)[1]))
end
end
addEvent(death, 250, {cid = cid})
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), destruct1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 5)
addEvent(doAreaCombatHealth, 150, getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), destruct2, -(((num1)+(getPlayerLevel(cid)*(num3)))*0.7), -(((num2)+(getPlayerLevel(cid)*(num3)))*0.8), 5)
addEvent(doAreaCombatHealth, 250, getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), destruct3, -(((num1)+(getPlayerLevel(cid)*(num3)))*0.4), -(((num2)+(getPlayerLevel(cid)*(num3)))*0.5), 5)
setPlayerStorageValue(getCreatureSummons(cid)[1], 33, 1)
return 0
elseif pokemon.x.spell == "Future Sight" 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)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 132)
local seusummon = getCreatureSummons(cid)[1]
local function normal(params)
if isCreature(params.cid) then
if isCreature(getCreatureSummons(params.cid)) then
if getPlayerStorageValue(getCreatureSummons(cid)[1], 35) >= 1 and getCreatureSummons(cid)[1] == seusummon then
setPlayerStorageValue(getCreatureSummons(cid)[1], 35, 0)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 3)
end
end
end
end
setPlayerStorageValue(getCreatureSummons(cid)[1], 35, 1)
addEvent(normal, 8000, {cid = cid})
return 0
-------------------------------------------------------------ADICIONADAS-----------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------------------------
elseif pokemon.x.spell == "Restore" 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)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 14)
doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 35)
return 0
elseif pokemon.x.spell == "Wardog" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function damage(params)
if isMonster(getCreatureTarget(params.cid)) then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 146)
else
end
end
addEvent(damage, 0, {cid = cid})
addEvent(damage, 400, {cid = cid})
addEvent(damage, 800, {cid = cid})
addEvent(damage, 1200, {cid = cid})
addEvent(damage, 1500, {cid = cid})
return 0
elseif pokemon.x.spell == "Leaf Storm" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
addEvent(doAreaCombatHealth, 0, getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), grassarea, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
local function shoot(params)
lugar = getThingPos(getCreatureSummons(params.cid)[1])
for x= -7,7 do
for y= -6,6 do
topos = {x=lugar.x+x, y=lugar.y+y, z=lugar.z}
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), topos, 8)
end
end
end
addEvent(shoot, 0, {cid = cid})
return 0
elseif pokemon.x.spell == "Restore" 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)
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 14)
doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))
doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 35)
return 0
elseif pokemon.x.spell == "Psychicmew" 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)
posit = getThingPos(getCreatureSummons(cid)[1])
local function storm(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(storm, 0, {cid = cid, el = element, ar = ps1, ef = 133})
addEvent(storm, 500, {cid = cid, el = element, ar = ps2, ef = 133})
addEvent(storm, 700, {cid = cid, el = null, ar = ps2, ef = CONST_ME_POFF})
addEvent(storm, 1000, {cid = cid, el = element, ar = ps1, ef = 133})
addEvent(storm, 1200, {cid = cid, el = element, ar = ps1, ef = CONST_ME_POFF})
return 0
elseif pokemon.x.spell == "Psychicmewtwo" 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)
posit = getThingPos(getCreatureSummons(cid)[1])
local function storm(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(storm, 0, {cid = cid, el = element, ar = ps1, ef = 136})
addEvent(storm, 500, {cid = cid, el = element, ar = ps2, ef = 136})
addEvent(storm, 700, {cid = cid, el = null, ar = ps1, ef = CONST_ME_POFF})
addEvent(storm, 1000, {cid = cid, el = element, ar = ps1, ef = 136})
addEvent(storm, 1200, {cid = cid, el = element, ar = ps2, ef = 136})
addEvent(storm, 1500, {cid = cid, el = null, ar = ps2, ef = CONST_ME_POFF})
addEvent(storm, 0, {cid = cid, el = null, ar = self, ef = 208})
addEvent(storm, 300, {cid = cid, el = null, ar = self, ef = 208})
addEvent(storm, 600, {cid = cid, el = null, ar = self, ef = 208})
addEvent(storm, 900, {cid = cid, el = null, ar = self, ef = 208})
addEvent(storm, 1200, {cid = cid, el = null, ar = self, ef = 208})
addEvent(storm, 1500, {cid = cid, el = null, ar = self, ef = 208})
return 0
----------------------------------------------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------------------------
-------------------------------------------------------------ADICIONADAS-----------------------------------------------------------------------
elseif pokemon.x.spell == "Tornado" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
posit = getThingPos(getCreatureSummons(cid)[1])
local function tornado(params)
if #getCreatureSummons(params.cid) >= 1 then
doAreaCombatHealth(getCreatureSummons(params.cid)[1], params.el, posit, params.ar, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)
else
end
end
addEvent(tornado, 0, {cid = cid, ef = 42, ar = tor1, el = element})
addEvent(tornado, 500, {cid = cid, ef = 42, ar = tor2, el = element})
addEvent(tornado, 1000, {cid = cid, ef = 42, ar = tor3, el = element})
addEvent(tornado, 500, {cid = cid, ef = CONST_ME_POFF, ar = tor1, el = null})
addEvent(tornado, 1200, {cid = cid, ef = CONST_ME_POFF, ar = tor2, el = null})
addEvent(tornado, 1900, {cid = cid, ef = CONST_ME_POFF, ar = tor2, el = null})
addEvent(tornado, 1900, {cid = cid, ef = CONST_ME_POFF, ar = tor3, el = null})
return 0
elseif pokemon.x.spell == "X-Scissor" then
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
local function attaque(params)
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 128)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), winge, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 129)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingde, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wings, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 131)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingds, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_PDAMAGE, getThingPos(getCreatureSummons(cid)[1]), wingw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 130)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wingdw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_NONE)
end
addEvent(attaque, 0, {cid = cid})
addEvent(attaque, 500, {cid = cid})
return 0
elseif pokemon.x.spell == "Hyper Beam" then
if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 152)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 158)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 156)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 151)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 158)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 155)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 149)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 157)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 153)
elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 150)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 157)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 154)
end
doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER)
doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", use "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)
exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd)
return 0
elseif pokemon.x.spell == "Leaf Blade" 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)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 54)
return 0
elseif pokemon.x.spell == "Earthshock" 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)
doAreaCombatHealth(getCreatureSummons(cid)[1], GROUNDDAMAGE, getThingPos(getCreatureSummons(cid)[1]), eshock, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
local sps = getThingPos(getCreatureSummons(cid)[1])
sps.x = sps.x+1
sps.y = sps.y+1
doSendMagicEffect(sps, 127)
return 0
elseif pokemon.x.spell == "Gastro Acid" 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)
target = getCreatureTarget(cid)
pos1 = getThingPos(target)
posa = getThingPos(target)
pos2 = getThingPos(target)
pos3 = getThingPos(target)
posb = getThingPos(target)
pos1.x = pos1.x-2
pos2.x = pos2.x+2
pos1.y = pos1.y-4
pos2.y = pos2.y-4
pos3.y = pos3.y-4
posa.x = posa.x-1
posb.x = posb.x+1
doSendDistanceShoot(pos1, posa, 14)
doSendDistanceShoot(pos3, getThingPos(target), 14)
doSendDistanceShoot(pos2, posb, 14)
doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), acid, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 143)
return 0
elseif pokemon.x.spell == "Water Oath" 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)
addEvent(doAreaCombatHealth, 0, getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), oatharea, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 255)
local function shoot(params)
lugar = getThingPos(getCreatureSummons(params.cid)[1])
for x= -3,3 do
for y= -3,3 do
topos = {x=lugar.x+x, y=lugar.y+y, z=lugar.z}
doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), topos, 2)
end
end
end
addEvent(shoot, 0, {cid = cid})
return 0
end
return 0
end
..