M1 a M3 Completo

[*~'Slayder'~* 0]

Ola vim trazer a vocês m1 a m3 completo com todos 151 pokemons todo dia vou ta adicionando um M1 novo então olhem o topico sempre

 

Move 1

 

-- HEALERA----

local hl = 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, 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, 1, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 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 tsn = createCombatArea{

{0, 0, 0, 2, 0, 0, 0},

{0, 0, 0, 1, 0, 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, 0, 1, 0, 0, 0},

{0, 0, 0, 2, 0, 0, 0},

}

 

local tse = createCombatArea{

{0, 0, 0, 1, 0, 0, 0},

{0, 0, 0, 1, 1, 0, 0},

{0, 0, 0, 1, 1, 1, 2},

{0, 0, 0, 1, 1, 0, 0},

{0, 0, 0, 1, 0, 0, 0},

}

 

local tsw = createCombatArea{

{0, 0, 0, 0, 0, 1, 0},

{0, 0, 0, 0, 1, 1, 0},

{0, 0, 2, 1, 1, 1, 0},

{0, 0, 0, 0, 1, 1, 0},

{0, 0, 0, 0, 0, 1, 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 dynpun1 = createCombatArea{

{1, 0, 0},

{0, 2, 0},

{0, 0, 0},

}

 

local dynpun2 = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{0, 0, 1},

}

 

 

local dynpun3 = createCombatArea{

{0, 0, 0},

{1, 2, 0},

{0, 0, 0},

}

 

 

local dynpun4 = createCombatArea{

{0, 0, 1},

{0, 2, 0},

{0, 0, 0},

}

 

 

local dynpun5 = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{0, 1, 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 psychic = createCombatArea{

{0, 0, 0, 1, 1, 1, 0, 0, 0},

{0, 0, 1, 1, 1, 1, 1, 0, 0},

{0, 1, 1, 1, 1, 1, 1, 1, 0},

{1, 1, 1, 1, 1, 1, 1, 1, 1},

{1, 1, 1, 1, 2, 1, 1, 1, 1},

{1, 1, 1, 1, 1, 1, 1, 1, 1},

{0, 1, 1, 1, 1, 1, 1, 1, 0},

{0, 0, 1, 1, 1, 1, 1, 0, 0},

{0, 0, 0, 1, 1, 1, 0, 0, 0}

}

 

local waterspout = createCombatArea{

{1, 1, 1, 1, 1},

{1, 1, 1, 1, 1},

{1, 1, 3, 1, 1},

{1, 1, 1, 1, 1},

{1, 1, 1, 1, 1}

}

-- SAND ATTACK

local sa1n = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{0, 1, 0},

}

local sa2n = createCombatArea{

{0, 2, 0},

{0, 0, 0},

{0, 1, 0},

}

local sa3n = createCombatArea{

{0, 2, 0},

{0, 0, 0},

{0, 0, 0},

{0, 1, 0},

}

local sa4n = createCombatArea{

{0, 2, 0},

{0, 0, 0},

{0, 0, 0},

{0, 0, 0},

{0, 1, 0},

}

 

local sa1s = createCombatArea{

{0, 1, 0},

{0, 2, 0},

{0, 0, 0},

}

local sa2s = createCombatArea{

{0, 1, 0},

{0, 0, 0},

{0, 2, 0},

}

local sa3s = createCombatArea{

{0, 1, 0},

{0, 0, 0},

{0, 0, 0},

{0, 2, 0},

}

local sa4s = createCombatArea{

{0, 1, 0},

{0, 0, 0},

{0, 0, 0},

{0, 0, 0},

{0, 2, 0},

}

 

local sa1w = createCombatArea{

{2, 1, 0, 0, 0, 0},

}

local sa2w = createCombatArea{

{2, 0, 1, 0, 0, 0},

}

local sa3w = createCombatArea{

{2, 0, 0, 1, 0, 0},

}

local sa4w = createCombatArea{

{2, 0, 0, 0, 1, 0},

}

 

local sa1e = createCombatArea{

{0, 0, 0, 0, 1, 2},

}

local sa2e = createCombatArea{

{0, 0, 0, 1, 0, 2},

}

local sa3e = createCombatArea{

{0, 0, 1, 0, 0, 2},

}

local sa4e = createCombatArea{

{0, 1, 0, 0, 0, 2},

}

-- SAND ATTACK END

 

 

local c = {

[28] = {x = {

pok = ditto,

spell = "Transform",

minLv = 40,

ex = 1320004,

base1 = 125,

base2 = 130,

dista = 5,

bonus = 3,

target = "no",

type = "normal",

cd = 20

}

},

[25] = {x = {

pok = bulbasaur,

spell = "Quick Attack",

minLv = 20,

ex = 1000001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[24] = {x = {

pok = ivysaur,

spell = "Quick Attack",

minLv = 40,

ex = 2000001,

base1 = 40,

base2 = 50,

dista = 1,

bonus = 4,

type = "normal",

cd = 6

}

},

[22] = {x = {

pok = venusaur,

spell = "Quick Attack",

minLv = 85,

ex = 3000001,

base1 = 85,

base2 = 100,

dista = 1,

bonus = 8.5,

type = "normal",

cd = 6

}

},

 

[29] = {x = {

pok = charmander,

spell = "Scratch",

minLv = 20,

ex = 4000001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 10

}

},

[23] = {x = {

pok = charmeleon,

spell = "Scratch",

minLv = 20,

ex = 5000001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 10

}

},

[67] = {x = {

pok = charizard,

spell = "Scratch",

minLv = 85,

ex = 6000001,

base1 = 85,

base2 = 100,

dista = 1,

bonus = 8.5,

type = "normal",

cd = 10

}

},

 

[2] = {x = {

nome = Squirtle,

spell = "Headbutt",

minLv = 20,

ex = 700001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 9

}

},

[6] = {x = {

nome = wartortle,

spell = "Headbutt",

minLv = 40,

ex = 800001,

base1 = 40,

base2 = 50,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[55] = {x = {

nome = Blastoise,

spell = "Headbutt",

minLv = 85,

ex = 900001,

base1 = 85,

base2 = 100,

dista = 1,

bonus = 8.5,

type = "normal",

cd = 8

}

},

[32] = {x = {

pok = caterpie,

spell = "Headbutt",

minLv = 1,

ex = 1000001,

base1 = 1,

base2 = 11,

dista = 1,

bonus = 1,

type = "normal",

cd = 9

}

},

[31] = {x = {

pok = metapod,

spell = "String Shot",

minLv = 15,

ex = 1100001,

base1 = 15,

base2 = 25,

dista = 3,

bonus = 1.5,

type = "bug",

cd = 4

}

},

[40] = {x = {

pok = Butterfree,

spell = "String Shot",

minLv = 30,

ex = 1100001,

base1 = 30,

base2 = 40,

dista = 4,

bonus = 3,

type = "bug",

cd = 4

}

},

[21] = {x = {

pok = weedle,

spell = "Horn Attack",

minLv = 1,

ex = 1300001,

base1 = 1,

base2 = 11,

dista = 1,

bonus = 1,

type = "normal",

cd = 9

}

},

[60] = {x = {

nome = Kakuna,

spell = "String Shot",

minLv = 15,

ex = 1400001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "bug",

cd = 9

}

},

[45] = {x = {

pok = beedrill,

spell = "String Shot",

minLv = 25,

ex = 1500001,

base1 = 25,

base2 = 35,

dista = 3,

bonus = 2.5,

type = "bug",

cd = 11

}

},

[30] = {x = {

pok = pidgey,

spell = "Quick Attack",

minLv = 5,

ex = 1600001,

base1 = 5,

base2 = 15,

dista = 1,

bonus = 1,

type = "normal",

cd = 7

}

},

[5] = {x = {

pok = pidgeotto,

spell = "Quick Attack",

minLv = 20,

ex = 1700001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[80] = {x = {

pok = pidgeot,

spell = "Quick Attack",

minLv = 65,

ex = 1800001,

base1 = 70,

base2 = 80,

dista = 1,

bonus = 6.5,

type = "normal",

cd = 7

}

},

[36] = {x = {

pok = rattata,

spell = "Quick Attack",

minLv = 1,

ex = 1900001,

base1 = 20,

base2 = 21,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[69] = {x = {

pok = raticate,

spell = "Quick Attack",

minLv = 25,

ex = 2000001,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 7

}

},

[27] = {x = {

pok = spearow,

spell = "Quick Attack",

minLv = 10,

ex = 2100001,

base1 = 10,

base2 = 20,

dista = 1,

bonus = 1,

type = "normal",

cd = 7

}

},

[17] = {x = {

pok = fearow,

spell = "Quick Attack",

minLv = 50,

ex = 2200001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[7] = {x = {

pok = ekans,

spell = "Bite",

minLv = 15,

ex = 2300001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "normal",

cd = 11

}

},

[39] = {x = {

pok = arbok,

spell = "Bite",

minLv = 30,

ex = 2400001,

base1 = 30,

base2 = 40,

dista = 1,

bonus = 3,

type = "normal",

cd = 10

}

},

[59] = {x = {

pok = pikachu,

spell = "Quick Attack",

minLv = 20,

ex = 2500001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[50] = {x = {

pok = raichu,

spell = "Mega Punch",

minLv = 50,

ex = 2600001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[43] = {x = {

pok = sandshrew,

spell = "Scratch",

minLv = 20,

ex = 2700001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "earth",

cd = 12

}

},

[115] = {x = {

pok = sandslash,

spell = "Scratch",

minLv = 55,

ex = 2800001,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 3.5,

type = "earth",

cd = 8

}

},

[70] = {x = {

pok = 'nidoran female',

spell = "Quick Attack",

minLv = 10,

ex = 2900001,

base1 = 30,

base2 = 41,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[71] = {x = {

pok = nidorina,

spell = "Quick Attack",

minLv = 25,

ex = 3000001,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[79] = {x = {

pok = nidoqueen,

spell = "Quick Attack",

minLv = 65,

ex = 3100001,

base1 = 191,

base2 = 210,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[66] = {x = {

pok = 'nidoran male',

spell = "Quick Attack",

minLv = 10,

ex = 3200001,

base1 = 30,

base2 = 41,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[78] = {x = {

pok = nidorino,

spell = "Quick Attack",

minLv = 25,

ex = 3300001,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[35] = {x = {

pok = nidoking,

spell = "Quick Attack",

minLv = 65,

ex = 3400001,

base1 = 191,

base2 = 210,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[73] = {x = {

pok = clefairy,

spell = "Doubleslap",

minLv = 1,

ex = 3500001,

base1 = 48,

base2 = 53,

dista = 1,

bonus = 2.2,

type = "normal",

cd = 7

}

},

[68] = {x = {

pok = clefable,

spell = "Doubleslap",

minLv = 1,

ex = 3600001,

base1 = 148,

base2 = 153,

dista = 1,

bonus = 4,

type = "normal",

cd = 7

}

},

[62] = {x = {

pok = vulpix,

spell = "Quick Attack",

minLv = 15,

ex = 3700001,

base1 = 90,

base2 = 100,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[114] = {x = {

pok = ninetails,

spell = "Quick Attack",

minLv = 65,

ex = 3800001,

base1 = 190,

base2 = 240,

dista = 1,

bonus = 4.5,

type = "normal",

cd = 7

}

},

[63] = {x = {

pok = Jigglypuff,

spell = "Doubleslap",

minLv = 20,

ex = 3900001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[64] = {x = {

pok = Wigglytuff,

spell = "Doubleslap",

minLv = 45,

ex = 4000001,

base1 = 45,

base2 = 55,

dista = 1,

bonus = 5,

type = "normal",

cd = 8

}

},

[44] = {x = {

pok = zubat,

spell = "Super Sonic",

minLv = 1,

ex = 4100001,

base1 = 20,

base2 = 21,

dista = 1,

bonus = 1.7,

type = "normal",

cd = 11

}

},

[122] = {x = {

pok = golbat,

spell = "Super Sonic",

minLv = 1,

ex = 4200001,

base1 = 0,

base2 = 0,

dista = 5,

bonus = 5,

type = "normal",

cd = 16

}

},

[56] = {x = {

pok = oddish,

spell = "Absorb",

minLv = 1,

ex = 4300001,

base1 = 25,

base2 = 30,

dista = 1,

bonus = 2,

type = "grass",

cd = 10

}

},

[74] = {x = {

pok = gloom,

spell = "Absorb",

minLv = 1,

ex = 4400001,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3.5,

type = "grass",

cd = 10

}

},

[86] = {x = {

pok = vileplume,

spell = "Absorb",

minLv = 1,

ex = 4500001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5,

type = "grass",

cd = 10

}

},

[81] = {x = {

pok = Paras,

spell = "Scratch",

minLv = 5,

ex = 4600001,

base1 = 5,

base2 = 15,

dista = 1,

bonus = 1,

type = "normal",

cd = 9

}

},

[95] = {x = {

pok = Parasect,

spell = "Absorb",

minLv = 50,

ex = 4700001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 9

}

},

[52] = {x = {

pok = Venonat,

spell = "Absorb",

minLv = 20,

ex = 4800001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 9

}

},

[49] = {x = {

pok = Venomoth,

spell = "Absorb",

minLv = 50,

ex = 4900001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5,

type = "grass",

cd = 9

}

},

[82] = {x = {

pok = diglett,

spell = "Sand Attack",

minLv = 10,

ex = 5000001,

base1 = 10,

base2 = 20,

dista = 1,

bonus = 1,

type = "earth",

cd = 9

}

},

[83] = {x = {

pok = dugtrio,

spell = "Sand Attack",

minLv = 35,

ex = 5100001,

base1 = 40,

base2 = 50,

dista = 1,

bonus = 3.5,

type = "earth",

cd = 9

}

},

[105] = {x = {

pok = meowth,

spell = "Slash",

minLv = 15,

ex = 5200001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[3] = {x = {

pok = persian,

spell = "Slash",

minLv = 30,

ex = 5300001,

base1 = 50,

base2 = 70,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[100] = {x = {

pok = psyduck,

spell = "Water Gun",

minLv = 24,

ex = 5400001,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 2.4,

type = "water",

cd = 9

}

},

[99] = {x = {

pok = golduck,

spell = "Doubleslap",

minLv = 55,

ex = 5500001,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 5.5,

type = "normal",

cd = 9

}

},

[106] = {x = {

pok = mankey,

spell = "Scratch",

minLv = 15,

ex = 5600001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "normal",

cd = 9

}

},

[103] = {x = {

pok = primeape,

spell = "Scratch",

minLv = 50,

ex = 5700001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 9

}

},

[109] = {x = {

pok = growlithe,

spell = "Bite",

minLv = 25,

ex = 5800001,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 9

}

},

[88] = {x = {

pok = arcanine,

spell = "Bite",

minLv = 1,

ex = 5900001,

base1 = 100,

base2 = 151,

dista = 1,

bonus = 6,

type = "normal",

cd = 11

}

},

[111] = {x = {

pok = poliwag,

spell = "Doubleslap",

minLv = 5,

ex = 6000001,

base1 = 5,

base2 = 15,

dista = 1,

bonus = 1,

type = "normal",

cd = 7

}

},

[212] = {x = {

pok = poliwhirl,

spell = "Mud Shot",

minLv = 25,

ex = 6100001,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 2.5,

type = "earth",

cd = 7

}

},

[104] = {x = {

pok = poliwrath,

spell = "Mud Shot",

minLv = 65,

ex = 6200001,

base1 = 65,

base2 = 75,

dista = 1,

bonus = 6.5,

type = "earth",

cd = 12

}

},

[262] = {x = {

pok = abra,

spell = "Confusion",

minLv = 20,

ex = 6300001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "psychic",

target = "no",

cd = 12

}

},

[219] = {x = {

pok = kadaabra,

spell = "Psychic",

minLv = 47,

ex = 6400001,

base1 = 50,

base2 = 60,

dista = 5,

bonus = 4.7,

type = "psychic",

target = "no",

cd = 23

}

},

[218] = {x = {

pok = alakazan,

spell = "Psychic",

minLv = 80,

ex = 6500001,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 8,

type = "psychic",

target = "no",

cd = 23

}

},

[118] = {x = {

pok = machop,

spell = "Doubleslap",

minLv = 5,

ex = 6600001,

base1 = 5,

base2 = 15,

dista = 1,

bonus = 1,

type = "normal",

cd = 7

}

},

[113] = {x = {

pok = machoke,

spell = "Doubleslap",

minLv = 25,

ex = 6700001,

base1 = 25,

base2 = 105,

dista = 1,

bonus = 3,

type = "fighting",

cd = 7

}

},

[121] = {x = {

pok = machamp,

spell = "Doubleslap",

minLv = 65,

ex = 6800001,

base1 = 165,

base2 = 175,

dista = 1,

bonus = 6.5,

type = "fighting",

cd = 7

}

},

[250] = {x = {

pok = bellsprout,

spell = "Razor Leaf",

minLv = 10,

ex = 6900001,

base1 = 10,

base2 = 21,

dista = 1,

bonus = 1,

type = "grass",

cd = 11

}

},

[37] = {x = {

pok = weepinbell,

spell = "Razor Leaf",

minLv = 25,

ex = 7000001,

base1 = 30,

base2 = 40, -- 150

dista = 1, -- 3

bonus = 2.5, -- 3

type = "grass",

cd = 11 -- 11

}

},

[240] = {x = {

pok = victreebel,

spell = "Razor Leaf",

minLv = 50,

ex = 7100001,

base1 = 50,

base2 = 60,

dista = 4,

bonus = 6,

type = "grass",

cd = 11

}

},

[96] = {x = {

pok = tentacool,

spell = "Acid",

minLv = 25,

ex = 7200001,

base1 = 30,

base2 = 40, -- 150

dista = 1, -- 3

bonus = 2.5, -- 3

type = "poison",

cd = 12 -- 11

}

},

[108] = {x = {

pok = tentacruell,

spell = "Acid",

minLv = 50,

ex = 7300001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5.8,

type = "poison",

cd = 11

}

},

[196] = {x = {

pok = geodude,

spell = "Rock Throw",

minLv = 15,

ex = 7400001,

base1 = 15,

base2 = 25,

dista = 5,

bonus = 1.5,

type = "rock",

cd = 14

}

},

[247] = {x = {

pok = graveler,

spell = "Rock Throw",

minLv = 40,

ex = 7500001,

base1 = 40,

base2 = 50,

dista = 5,

bonus = 4,

type = "rock",

cd = 14

}

},

[116] = {x = {

pok = golem,

spell = "Rock Throw",

minLv = 70,

ex = 7600001,

base1 = 70,

base2 = 80,

dista = 5,

bonus = 7,

type = "rock",

cd = 14

}

},

[288] = {x = {

pok = golemroll,

spell = "Rock Throw",

minLv = 70,

ex = 7600001,

base1 = 70,

base2 = 80,

dista = 5,

bonus = 7,

type = "rock",

cd = 14

}

},

[16] = {x = {

pok = ponyta,

spell = "Quick Attack",

minLv = 20,

ex = 7700001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[220] = {x = {

pok = rapidash,

spell = "Quick Attack",

minLv = 50,

ex = 7800001,

base1 = 50,

base2 = 120,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[75] = {x = {

pok = slowpoke,

spell = "Aqua Tail",

minLv = 20,

ex = 7900001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "water",

cd = 10

}

},

[41] = {x = {

pok = slowbro,

spell = "Aqua Tail",

minLv = 20,

ex = 8000001,

base1 = 50,

base2 = 120,

dista = 1,

bonus = 5,

type = "water",

cd = 10

}

},

[217] = {x = {

pok = magnemite,

spell = "Super Sonic",

minLv = 15,

ex = 8100001,

base1 = 15,

base2 = 25,

dista = 5,

bonus = 1.5,

type = "normal",

cd = 15

}

},

[223] = {x = {

pok = magneton,

spell = "Super Sonic",

minLv = 40,

ex = 8200001,

base1 = 40,

base2 = 50,

dista = 5,

bonus = 4,

type = "normal",

cd = 15

}

},

[57] = {x = {

pok = farfetchd,

spell = "Sand Attack",

minLv = 10,

ex = 8300001,

base1 = 70,

base2 = 90,

dista = 1,

bonus = 7,

type = "normal",

cd = 10

}

},

[26] = {x = {

pok = doduo,

spell = "Sand Attack",

minLv = 15,

ex = 8400001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "earth",

cd = 8

}

},

[120] = {x = {

pok = dodrio,

spell = "Sand Attack",

minLv = 45,

ex = 8500001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 4.5,

type = "earth",

cd = 6

}

},

[101] = {x = {

pok = seel,

spell = "Aqua Tail",

minLv = 1,

ex = 8600001,

base1 = 91,

base2 = 98,

dista = 1,

bonus = 3,

type = "water",

cd = 10

}

},

[110] = {x = {

pok = dewgong,

spell = "Aqua Tail",

minLv = 1,

ex = 8700001,

base1 = 191,

base2 = 218,

dista = 1,

bonus = 5,

type = "water",

cd = 10

}

},

[214] = {x = {

pok = grimer,

spell = "Mud Shot",

minLv = 15,

ex = 8800001,

base1 = 15,

base2 = 25,

dista = 5,

bonus = 1.5,

type = "earth",

cd = 10

}

},

[47] = {x = {

pok = muk,

spell = "Mud Shot",

minLv = 35,

ex = 8900001,

base1 = 35,

base2 = 45,

dista = 5,

bonus = 3.5,

type = "earth",

cd = 10

}

},

[54] = {x = {

pok = Shellder,

spell = "Lick",

minLv = 15,

ex = 9000001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 2,

type = "normal",

cd = 10

}

},

[72] = {x = {

pok = Cloyster,

spell = "Lick",

minLv = 35,

ex = 9100001,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3.5,

type = "normal",

cd = 10

}

},

[48] = {x = {

pok = gastly,

spell = "Lick",

minLv = 20,

ex = 9200001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 8

}

},

[65] = {x = {

pok = haunter,

spell = "Lick",

minLv = 47,

ex = 9300001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 4.7,

type = "normal",

cd = 8

}

},

[244] = {x = {

pok = gengar,

spell = "Lick",

minLv = 80,

ex = 9400001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 8

}

},

[248] = {x = {

pok = onix,

spell = "Sand Attack",

minLv = 40,

ex = 9500001,

base1 = 40,

base2 = 50,

dista = 5,

bonus = 4,

type = "earth",

cd = 11

}

},

[94] = {x = {

nome = drowzee,

spell = "Headbutt",

minLv = 20,

ex = 960001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[119] = {x = {

nome = hypno,

spell = "Headbutt",

minLv = 20,

ex = 970001,

base1 = 85,

base2 = 100,

dista = 1,

bonus = 6.5,

type = "normal",

cd = 7

}

},

[112] = {x = {

pok = krabby,

spell = "Bubbles",

minLv = 20,

ex = 980001,

base1 = 60,

base2 = 75,

dista = 4,

bonus = 3,

type = "water",

cd = 8

}

},

[245] = {x = {

pok = kingler,

spell = "Bubbles",

minLv = 20,

ex = 990001,

base1 = 120,

base2 = 135,

dista = 4,

bonus = 5.6,

type = "water",

cd = 8

}

},

[123] = {x = {

pok = voltorb,

spell = "******* Shock",

minLv = 10,

ex = 1000001,

base1 = 10,

base2 = 20,

dista = 5,

bonus = 1,

type = "electric",

cd = 16

}

},

[287] = {x = {

pok = voltorbroll,

spell = "******* Shock",

minLv = 10,

ex = 1000001,

base1 = 10,

base2 = 20,

dista = 5,

bonus = 1,

type = "electric",

cd = 16

}

},

[125] = {x = {

pok = electrode,

spell = "******* Shock",

minLv = 35,

ex = 1010001,

base1 = 40,

base2 = 50,

dista = 5,

bonus = 3.5,

type = "electric",

cd = 16

}

},

[286] = {x = {

pok = electroderoll,

spell = "******* Shock",

minLv = 35,

ex = 1010001,

base1 = 40,

base2 = 50,

dista = 5,

bonus = 3.5,

type = "electric",

cd = 16

}

},

[213] = {x = {

pok = Exeggcute,

spell = "Confusion",

minLv = 20,

ex = 1020001,

base1 = 20,

base2 = 30,

dista = 5,

bonus = 3,

type = "psychic",

target = "no",

cd = 12

}

},

[46] = {x = {

pok = Exeggutor,

spell = "Psychic",

minLv = 80,

ex = 1030001,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 8,

type = "psychic",

target = "no",

cd = 23

}

},

[198] = {x = {

pok = cubone,

spell = "Headbutt",

minLv = 55,

ex = 1040001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 7

}

},

[197] = {x = {

pok = Marowak,

spell = "Headbutt",

minLv = 55,

ex = 1050001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[20] = {x = {

pok = Hitmonlee,

spell = "Triple Kick",

minLv = 60,

ex = 1060001,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "fighting",

cd = 7

}

},

[38] = {x = {

pok = Hitmonchan,

spell = "Triple Punch",

minLv = 60,

ex = 1070001,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "fighting",

cd = 7

}

},

[11] = {x = {

pok = Lickitung,

spell = "Lick",

minLv = 55,

ex = 1080001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5.5,

type = "normal",

cd = 7

}

},

[228] = {x = {

pok = Koffing,

spell = "Mud Shot",

minLv = 15,

ex = 1090001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "earth",

cd = 7

}

},

[231] = {x = {

pok = Weezing,

spell = "Mud Shot",

minLv = 35,

ex = 1100001,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3.5,

type = "earth",

cd = 7

}

},

[77] = {x = {

pok = Rhyhorn,

spell = "Iron Tail",

minLv = 30,

ex = 1110001,

base1 = 30,

base2 = 40,

dista = 1,

bonus = 3,

type = "normal",

cd = 9

}

},

[200] = {x = {

pok = Rhydon,

spell = "Iron Tail",

minLv = 75,

ex = 1120001,

base1 = 75,

base2 = 80,

dista = 1,

bonus = 7,

type = "normal",

cd = 9

}

},

[4] = {x = {

pok = Chansey,

spell = "Doubleslap",

minLv = 60,

ex = 1130001,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[18] = {x = {

pok = Tangela,

spell = "Absorb",

minLv = 50,

ex = 1140001,

base1 = 50,

base2 = 60,

dista = 1,

bonus = 5,

type = "grass",

cd = 7

}

},

[198] = {x = {

pok = Kangaskhan,

spell = "Bite",

minLv = 80,

ex = 1150001,

base1 = 80,

base2 = 95,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[33] = {x = {

pok = horsea,

spell = "Mud Shot",

minLv = 10,

ex = 1160001,

base1 = 10,

base2 = 21,

dista = 4,

bonus = 1,

type = "earth",

cd = 10

}

},

[276] = {x = {

pok = seadra,

spell = "Mud Shot",

minLv = 45,

ex = 1170001,

base1 = 50,

base2 = 60,

dista = 5,

bonus = 4.5,

type = "earth",

cd = 14

}

},

[274] = {x = {

pok = Goldeen,

spell = "Poison Sting",

minLv = 10,

ex = 1180001,

base1 = 10,

base2 = 15,

dista = 1,

bonus = 1.5,

type = "poison",

cd = 7

}

},

[272] = {x = {

pok = Seaking,

spell = "Poison Sting",

minLv = 35,

ex = 1190001,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3.5,

type = "poison",

cd = 7

}

},

[42] = {x = {

pok = Staryu,

spell = "Swift",

minLv = 15,

ex = 1200001,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 3,

type = "normal",

cd = 8

}

},

[249] = {x = {

pok = Starmie,

spell = "Swift",

minLv = 35,

ex = 1210001,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 7,

type = "normal",

cd = 8

}

},

[246] = {x = {

pok = MrMime,

spell = "Lovely Kiss",

minLv = 1,

ex = 1220001,

base1 = 180,

base2 = 190,

dista = 1,

bonus = 6,

type = "normal",

cd = 10

}

},

[15] = {x = {

pok = Scyther,

spell = "Quick Attack",

minLv = 80,

ex = 1230001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[282] = {x = {

pok = Jynx,

spell = "Slash",

minLv = 75,

ex = 1240001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 7.5,

type = "normal",

cd = 7

}

},

[281] = {x = {

pok = Electabuzz,

spell = "Quick Attack",

minLv = 80,

ex = 1250001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[76] = {x = {

pok = Magmar,

spell = "Scratch",

minLv = 80,

ex = 1260001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[53] = {x = {

pok = Pinsir,

spell = "Scratch",

minLv = 45,

ex = 1270001,

base1 = 45,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[93] = {x = {

pok = Tauros,

spell = "Headbutt",

minLv = 45,

ex = 1280001,

base1 = 45,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[19] = {x = {

pok = magikarp,

spell = "Splash",

minLv = 5,

ex = 1290001,

base1 = 280,

base2 = 300,

dista = 1,

bonus = 4,

type = "normal",

target = "no",

cd = 6

}

},

[117] = {x = {

pok = Gyarados,

spell = "Roar",

minLv = 95,

ex = 1300001,

base1 = 65,

base2 = 91,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[193] = {x = {

pok = Lapras,

spell = "Horn Attack",

minLv = 80,

ex = 1310001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 11

}

},

 

[102] = {x = {

pok = eevee,

spell = "Sand Attack",

minLv = 20,

ex = 1330002,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "earth",

cd = 7

}

},

[215] = {x = {

pok = Vaporeon,

spell = "Quick Attack",

minLv = 55,

ex = 1340001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[195] = {x = {

pok = Jolteon,

spell = "Quick Attack",

minLv = 55,

ex = 1350001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[14] = {x = {

pok = Flareon,

spell = "Quick Attack",

minLv = 55,

ex = 1360001,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[97] = {x = {

pok = Porygon,

spell = "Super Sonic",

minLv = 40,

ex = 1370001,

base1 = 40,

base2 = 50,

dista = 5,

bonus = 4,

type = "normal",

cd = 12

}

},

[92] = {x = {

pok = Omanyte,

spell = "Bite",

minLv = 20,

ex = 1380001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[192] = {x = {

pok = Omastar,

spell = "Bite",

minLv = 80,

ex = 1390001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[98] = {x = {

pok = Kabuto,

spell = "Scratch",

minLv = 20,

ex = 1400001,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[13] = {x = {

pok = Kabutops,

spell = "Scratch",

minLv = 80,

ex = 1410001,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[10] = {x = {

pok = Aerodactyl,

spell = "Scratch",

minLv = 110,

ex = 1420001,

base1 = 110,

base2 = 120,

dista = 1,

bonus = 11,

type = "normal",

cd = 7

}

},

[51] = {x = {

pok = Snorlax,

spell = "Scratch",

minLv = 85,

ex = 1430001,

base1 = 90,

base2 = 100,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[283] = {x = {

pok = Articuno,

spell = "Scratch",

minLv = 110,

ex = 1440001,

base1 = 110,

base2 = 120,

dista = 1,

bonus = 11,

type = "normal",

cd = 7

}

},

[199] = {x = {

pok = Zapdos,

spell = "Scratch",

minLv = 110,

ex = 1450001,

base1 = 110,

base2 = 120,

dista = 1,

bonus = 11,

type = "normal",

cd = 7

}

},

[265] = {x = {

pok = Moltres,

spell = "Scratch",

minLv = 110,

ex = 1460001,

base1 = 110,

base2 = 120,

dista = 1,

bonus = 11,

type = "normal",

cd = 7

}

},

[58] = {x = {

pok = Dratini,

spell = "Aqua Tail",

minLv = 20,

ex = 1470001,

base1 = 20,

base2 = 30,

dista = 4,

bonus = 2,

type = "water",

cd = 7

}

},

[61] = {x = {

pok = Dragonair,

spell = "Headbutt",

minLv = 60,

ex = 1480001,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[210] = {x = {

pok = Dragonite,

spell = "Headbutt",

minLv = 100,

ex = 1490001,

base1 = 100,

base2 = 110,

dista = 1,

bonus = 10,

type = "normal",

cd = 7

}

},

[34] = {x = {

pok = Mewtwo,

spell = "Slash",

minLv = 75,

ex = 1500001,

base1 = 105,

base2 = 155,

dista = 7,

bonus = 8.5,

type = "normal",

cd = 7

}

},

[9] = {x = {

pok = Mew,

spell = "Agility",

minLv = 75,

ex = 1510001,

base1 = 200,

base2 = 210,

dista = 3,

bonus = 9,

type = "normal",

cd = 15

}

},

}

 

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 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

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)

if getPlayerStorageValue(getCreatureSummons(cid)[1], 254) >= 1 then

num3 = num3 * 1.8

setPlayerStorageValue(getCreatureSummons(cid)[1], 254, 0)

end

setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3))))

if pokemon.x.spell == "Dynamic Punch" then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 112)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), dynpun1, 0, 0, 17)

addEvent(doAreaCombatHealth, 105, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), dynpun1, 0, 0, 17)

addEvent(doAreaCombatHealth, 250, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), dynpun2, 0, 0, 17)

addEvent(doAreaCombatHealth, 400, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), dynpun3, 0, 0, 17)

addEvent(doAreaCombatHealth, 555, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), dynpun4, 0, 0, 17)

addEvent(doAreaCombatHealth, 700, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), dynpun5, 0, 0, 17)

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 == "Quick Attack" 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))), 3)

return 0

-------------------------------------------------------------ADICIONADOS------------------------------------------------------------------

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

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

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

----------------------HEALERA

elseif pokemon.x.spell == "Healera" 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)

doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3))))

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), hl, ((num1)+(getPlayerLevel(cid)*(num3))), ((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_MAGIC_BLUE)

doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 35)

return 0

 

 

--------------------COMPLEXAS

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

local pos = getThingPos(getCreatureTarget(cid))

local pos2 = getThingPos(getCreatureTarget(cid))

local pos3 = getThingPos(getCreatureSummons(cid)[1])

pos.x = pos.x + math.random(-1,1)

pos.y = pos.y + math.random(-1,1)

if hasSqm(pos) 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)

doSendMagicEffect(pos3, 211)

doTeleportThing(getCreatureSummons(cid)[1], pos, false)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 159)

else

local newpos = getClosestFreeTile(getCreatureTarget(cid), pos)

doSendMagicEffect(pos3, 211)

doTeleportThing(getCreatureSummons(cid)[1], newpos, false)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 159)

end

else

doSendMagicEffect(pos3, 211)

doTeleportThing(getCreatureSummons(cid)[1], pos3, false)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 159)

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)

 

return 0

elseif pokemon.x.spell == "String Shot" 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)), 23)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 137)

local function string(params)

if isCreature(params.alvo) then

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

doSendMagicEffect(getThingPos(params.alvo), 137)

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

else 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])..", "..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 == "Slam" 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))), 3)

return 0

elseif pokemon.x.spell == "Rapid Hit" 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))), 3)

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], NORMALDAMAGE, getThingPos(getCreatureTarget(params.cid)), 0, -0, -0, 3)

end

end

end

end

addEvent(hit, 80, {cid = cid, hitalvo = hitalvo})

addEvent(hit, 280, {cid = cid, hitalvo = hitalvo})

addEvent(hit, 480, {cid = cid, hitalvo = hitalvo})

addEvent(hit, 680, {cid = cid, hitalvo = hitalvo})

return 0

--------------------NORMAL

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 == "Lovely Kiss" 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))), 147)

return 0

elseif pokemon.x.spell == "Lick" 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))), 145)

return 0

elseif pokemon.x.spell == "Roar" 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))), 2)

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])..", "..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))), 160)

return 0

elseif pokemon.x.spell == "Triple Kick" 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))), 3)

return 0

elseif pokemon.x.spell == "Triple Punch" 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))), 113)

return 0

------------------DISTANCE

elseif pokemon.x.spell == "Shadow Ball" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 140)

return 0

elseif pokemon.x.spell == "Swift" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 148)

return 0

-------------------------------------------------------------ADICIONADOS------------------------------------------------------------------

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

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

elseif pokemon.x.spell == "******* Shock" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)

return 0

elseif pokemon.x.spell == "Razor Leaf" 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)), 8)

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))), 79)

else

end

end

addEvent(damage, 100, {cid = cid})

addEvent(damage, 600, {cid = cid})

addEvent(throw, 0, {cid = cid})

addEvent(throw, 550, {cid = cid})

return 0

elseif pokemon.x.spell == "Sand Attack" 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 sandattack(params)

if #getCreatureSummons(params.cid) >= 1 then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)

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, y=posicao.y-1, z=posicao.z}, ef = 120})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, ef = 120})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, ef = 120})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, ef = 122})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, ef = 122})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, ef = 122})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, ef = 121})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, ef = 121})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, ef = 121})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, ef = 119})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, ef = 119})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, ef = 119})

end

 

elseif pokemon.x.spell == "Bite" 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))), 146)

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])..", "..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))), 160)

return 0

elseif pokemon.x.spell == "Splash" 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]), 53)

return 0

elseif pokemon.x.spell == "Doubleslap" 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 slap(params)

if isMonster(getCreatureTarget(params.cid)) then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)

else

end

end

addEvent(slap, 0, {cid = cid})

addEvent(slap, 600, {cid = cid})

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])..", "..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 == "Scratch" 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))), 142)

return 0

elseif pokemon.x.spell == "Scratch" 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))), 142)

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])..", "..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 == "Psychic" 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(getCreatureSummons(cid)[1]), psychic, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 136)

return 0

elseif pokemon.x.spell == "Absorb" 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 life = getCreatureHealth(getCreatureTarget(cid))

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 14)

local newlife = life - getCreatureHealth(getCreatureTarget(cid))

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 14)

doCreatureAddHealth(getCreatureSummons(cid)[1], newlife)

doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..newlife.."", 35)

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])..", "..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

addEvent(ver, 4500, {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 == "Bubbles" 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)), 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))), 25)

else

end

end

addEvent(throw, 0, {cid = cid})

addEvent(damage, 0, {cid = cid})

return 0

elseif pokemon.x.spell == "Water Spout" 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)

doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), {x=getThingPos(getCreatureSummons(cid)[1]).x, y=getThingPos(getCreatureSummons(cid)[1]).y-5, z=getThingPos(getCreatureSummons(cid)[1]).z}, 2)

local function spout(params)

if isCreature(getCreatureSummons(params.cid)[1]) then

for x = -2,2 do

for y = -2,2 do

local newpos = getThingPos(getCreatureSummons(params.cid)[1])

newpos.x = newpos.x+x

newpos.y = newpos.y+y

doSendDistanceShoot({x=getThingPos(getCreatureSummons(params.cid)[1]).x, y=getThingPos(getCreatureSummons(params.cid)[1]).y-5, z=getThingPos(getCreatureSummons(params.cid)[1]).z}, newpos, 2)

end

end

end

end

 

local function spdmg(params)

if isCreature(getCreatureSummons(params.cid)[1]) then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureSummons(params.cid)[1]), waterspout, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)

end

end

 

addEvent(spout, 300, {cid = cid})

addEvent(spdmg, 450, {cid = cid})

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])..", "..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))), 3)

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])..", "..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 == "Headbutt" 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))), 3)

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])..", "..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 confd(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(confd, 1000*i, {cid = cid, t = t})

end

addEvent(nonc, 7100, {cid - cid, t = t})

return 0

elseif pokemon.x.spell == "Fury Attack" 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 namezito = getCreatureName(getCreatureSummons(cid)[1])

local namezin = getCreatureName(getCreatureTarget(cid))

local function pee(params)

if isCreature(getCreatureSummons(params.cid)[1]) then

if isCreature(getCreatureTarget(params.cid)) then

if getCreatureName(getCreatureSummons(params.cid)[1]) == namezito then

if getCreatureName(getCreatureTarget(params.cid)) == namezin then

doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 15)

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(params.cid)*(num3))), -((num2)+(getPlayerLevel(params.cid)*(num3))), 3)

end

end

end

end

end

end

local delay = 200

randnee = math.random(1,100)

if randnee >= 1 and randnee <= 37 then

a = 2

elseif randnee >= 38 and randnee <= 74 then

a = 3

elseif randnee >= 75 and randnee <= 88 then

a = 4

else

a = 5

end

local times = a

for i = 1,a do

addEvent(pee, delay, {cid = cid})

delay = delay + 600

end

local function msg(params)

if #getCreatureSummons(params.cid) >= 1 then

doSendAnimatedText(getThingPos(getCreatureSummons(params.cid)[1]), ""..times.." HITS", 35)

end

end

addEvent(msg, 580*a, {cid = cid})

return 0

end

return 0

end

 

Move 2

 

---ADICIONADO------

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

local *******wavecondition = createConditionObject(CONDITION_PARALYZE)

setConditionParam(*******wavecondition, CONDITION_PARAM_TICKS, 8000)

setConditionFormula(*******wavecondition, -0.45, -0.45, -0.45, -0.45)

----VINE WHIP

local whipn = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{1, 1, 1},

{1, 1, 1}

}

local whips = createCombatArea{

{1, 1, 1},

{1, 1, 1},

{0, 2, 0},

{0, 0, 0}

}

local whipe = createCombatArea{

{1, 1, 0},

{1, 1, 2},

{1, 1, 0},

{0, 0, 0}

}

local whipw = createCombatArea{

{0, 1, 1},

{2, 1, 1},

{0, 1, 1},

{0, 0, 0}

}

local vinen = createCombatArea{

{0, 0, 0},

{0, 0, 0},

{0, 2, 0},

{1, 0, 0}

}

local vines = createCombatArea{

{0, 0, 0},

{1, 0, 0},

{0, 0, 0},

{0, 2, 0}

}

local vinee = createCombatArea{

{0, 0, 0},

{1, 0, 0},

{0, 0, 2},

{0, 0, 0}

}

local vinew = createCombatArea{

{0, 0, 0},

{0, 0, 3},

{0, 2, 0},

{0, 0, 0}

}

 

local psychic = createCombatArea{

{0, 0, 0, 1, 1, 1, 0, 0, 0},

{0, 0, 1, 1, 1, 1, 1, 0, 0},

{0, 1, 1, 1, 1, 1, 1, 1, 0},

{1, 1, 1, 1, 1, 1, 1, 1, 1},

{1, 1, 1, 1, 2, 1, 1, 1, 1},

{1, 1, 1, 1, 1, 1, 1, 1, 1},

{0, 1, 1, 1, 1, 1, 1, 1, 0},

{0, 0, 1, 1, 1, 1, 1, 0, 0},

{0, 0, 0, 1, 1, 1, 0, 0, 0}

}

 

 

local bms = createCombatArea{

{0, 0, 0, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 2, 0, 0},

}

 

local bmn = createCombatArea{

{0, 0, 2, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 1, 0, 0},

{0, 0, 0, 0, 0},

}

 

local bme = createCombatArea{

{0, 1, 1, 1, 1, 1, 2},

}

 

local bmw = createCombatArea{

{2, 1, 1, 1, 1, 1, 0},

}

local bomb = createCombatArea{

{0, 1, 0},

{1, 3, 1},

{0, 1, 0},

}

 

local tresportres = createCombatArea{

{1, 1, 1},

{1, 3, 1},

{1, 1, 1},

}

 

local charge = createCombatArea{

{1, 1, 1},

{1, 2, 1},

{1, 1, 1},

}

 

local bomb2 = 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 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 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 tombn = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{1, 1, 1},

}

local tombe = createCombatArea{

{1, 0, 0},

{1, 2, 0},

{1, 0, 0},

}

local tombw = createCombatArea{

{0, 0, 1},

{0, 2, 1},

{0, 0, 1},

}

local tombs = createCombatArea{

{1, 1, 1},

{0, 2, 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},

}

---ADICIONADO------

 

 

 

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 pluck = createCombatArea{

{0, 0, 0, 0, 0},

{0, 1, 0, 1, 0},

{0, 0, 3, 0, 0},

{0, 1, 0, 1, 0},

{0, 0, 0, 0, 0}

}

 

local spark = createCombatArea{

{0, 0, 0, 0, 0},

{0, 1, 1, 1, 0},

{0, 1, 2, 1, 0},

{0, 1, 1, 1, 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

 

-- SAND ATTACK

local sa1n = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{0, 1, 0},

}

local sa2n = createCombatArea{

{0, 2, 0},

{0, 0, 0},

{0, 1, 0},

}

local sa3n = createCombatArea{

{0, 2, 0},

{0, 0, 0},

{0, 0, 0},

{0, 1, 0},

}

local sa4n = createCombatArea{

{0, 2, 0},

{0, 0, 0},

{0, 0, 0},

{0, 0, 0},

{0, 1, 0},

}

 

local sa1s = createCombatArea{

{0, 1, 0},

{0, 2, 0},

{0, 0, 0},

}

local sa2s = createCombatArea{

{0, 1, 0},

{0, 0, 0},

{0, 2, 0},

}

local sa3s = createCombatArea{

{0, 1, 0},

{0, 0, 0},

{0, 0, 0},

{0, 2, 0},

}

local sa4s = createCombatArea{

{0, 1, 0},

{0, 0, 0},

{0, 0, 0},

{0, 0, 0},

{0, 2, 0},

}

 

local sa1w = createCombatArea{

{2, 1, 0, 0, 0, 0},

}

local sa2w = createCombatArea{

{2, 0, 1, 0, 0, 0},

}

local sa3w = createCombatArea{

{2, 0, 0, 1, 0, 0},

}

local sa4w = createCombatArea{

{2, 0, 0, 0, 1, 0},

}

 

local sa1e = createCombatArea{

{0, 0, 0, 0, 1, 2},

}

local sa2e = createCombatArea{

{0, 0, 0, 1, 0, 2},

}

local sa3e = createCombatArea{

{0, 0, 1, 0, 0, 2},

}

local sa4e = createCombatArea{

{0, 1, 0, 0, 0, 2},

}

-- SAND ATTACK END

 

local pokeis = {'bulbasaur','ivysaur','venusaur','Squirtle','wartortle','Blastoise','Pidgey', 'Pidgeotto', 'Pidgeot', 'Rattata',

'Bellsprout', 'Weepinbell', 'Victreebel', 'Poliwag', 'Poliwhirl', 'Poliwrath', 'Abra', 'Oddish',

'Gloom', 'Vileplume', 'Horsea', 'Seadra', 'Grimer', 'Muk', 'Weedle', 'Kakuna', 'Beedrill', 'Raticate', 'Zubat', 'Golbat',

'Doduo', 'Dodrio', 'Magnemite', 'Magneton', 'Voltorb', 'Electrode', 'Geodude', 'Graveler', 'Golem', 'Sandshrew',

'Sandslash', 'Charmander', 'Charmeleon', 'Charizard', 'Kadabra', 'Alakazam', 'caterpie', 'metapod', 'Butterfree',

'spearow', 'fearow', 'ekans', 'arbok', 'pikachu', 'raichu', 'nidoran female', 'nidorina', 'nidoqueen', 'nidoran male',

'nidorino', 'nidoking', 'clefairy', 'clefable', 'vulpix', 'Ninetales', 'Jigglypuff', 'Wigglytuff', 'zubat', 'golbat',

'Paras', 'Parasect', 'Venonat', 'Venomoth', 'Diglett', 'Dugtrio', 'Meowth', 'Psyduck', 'Golduck', 'Mankey', 'Primeape',

'Growlithe', 'arcanine', 'machop', 'machoke', 'machamp', 'tentacool', 'tentacruell', 'Ponyta', 'Rapidash', 'Slowpoke',

'Slowbro', 'Farfetchd', 'seel', 'dewgong', 'Shellder', 'Cloyster', 'gastly', 'haunter', 'gengar', 'onix', 'drowzee',

'hypno', 'krabby', 'kingler', 'Exeggcute', 'Exeggutor', 'Marowak', 'Hitmonlee', 'cubone','Hitmonchan', 'Lickitung', 'Koffing',

'Weezing', 'Rhyhorn', 'Rhydon', 'Chansey', 'Tangela', 'Kangaskhan', 'Goldeen', 'Seaking', 'Staryu', 'Starmie', 'MrMime',

'Scyther', 'Jynx', 'Electabuzz', 'Magmar', 'Pinsir', 'Tauros', 'Lapras', 'Ditto', 'eevee', 'Vaporeon', 'Jolteon', 'Flareon',

'Porygon', 'Omanyte', 'Omastar', 'Kabuto', 'Kabutops', 'Aerodactyl', 'Snorlax', 'Articuno', 'Zapdos', 'Moltres', 'Dratini',

'Dragonair', 'Dragonite', 'Mew', 'Mewtwo', 'Gyarados'}

local c = {

[28] = {x = {

pok = ditto,

spell = "Transform",

minLv = 40,

ex = 140001,

base1 = 0,

base2 = 0,

dista = 7,

bonus = 0,

type = "normal",

cd = 15

}

},

[25] = {x = {

pok = bulbasaur,

spell = "Razor Leaf",

minLv = 20,

ex = 1000002,

base1 = 60,

base2 = 75,

dista = 4,

bonus = 3.8,

type = "grass",

cd = 12

}

},

[24] = {x = {

pok = ivysaur,

spell = "Razor Leaf",

minLv = 40,

ex = 2000002,

base1 = 40,

base2 = 50,

dista = 1,

bonus = 4,

type = "grass",

cd = 12

}

},

[22] = {x = {

pok = venusaur,

spell = "Razor Leaf",

minLv = 85,

ex = 3000002,

base1 = 220,

base2 = 235,

dista = 4,

bonus = 5.9,

type = "grass",

cd = 12

}

},

[29] = {x = {

pok = charmander,

spell = "Ember",

minLv = 1,

ex = 400002,

base1 = 60,

base2 = 75,

dista = 4,

bonus = 3.8,

type = "fire",

cd = 14

}

},

[23] = {x = {

pok = charmeleon,

spell = "Ember",

minLv = 1,

ex = 500002,

base1 = 120,

base2 = 135,

dista = 4,

bonus = 4.5,

type = "fire",

cd = 14

}

},

[67] = {x = {

pok = charizard,

spell = "Ember",

minLv = 1,

ex = 600002,

base1 = 220,

base2 = 235,

dista = 4,

bonus = 5.9,

type = "fire",

cd = 14

}

},

[2] = {x = {

pok = Squirtle,

spell = "Bubbles",

minLv = 20,

ex = 700002,

base1 = 60,

base2 = 75,

dista = 4,

bonus = 3.5,

type = "water",

cd = 8

}

},

[6] = {x = {

pok = wartortle,

spell = "Bubbles",

minLv = 20,

ex = 8000002,

base1 = 120,

base2 = 135,

dista = 4,

bonus = 4.2,

type = "water",

cd = 8

}

},

[55] = {x = {

pok = Blastoise,

spell = "Bubbles",

minLv = 20,

ex = 9000002,

base1 = 220,

base2 = 235,

dista = 4,

bonus = 5.6,

type = "water",

cd = 8

}

},

[32] = {x = {

pok = caterpie,

spell = "String Shot",

minLv = 1,

ex = 1000002,

base1 = 45,

base2 = 50,

dista = 3,

bonus = 3,

type = "bug",

cd = 2

}

},

[31] = {x = {

pok = metapod,

spell = "Headbutt",

minLv = 1,

ex = 1100002,

base1 = 85,

base2 = 90,

dista = 1,

bonus = 3.5,

type = "normal",

cd = 5

}

},

[40] = {x = {

pok = Butterfree,

spell = "Super Sonic",

minLv = 1,

ex = 1200002,

base1 = 0,

base2 = 0,

dista = 4,

bonus = 0,

type = "normal",

cd = 16

}

},

 

[21] = {x = {

pok = weedle,

spell = "String Shot",

minLv = 1,

ex = 1300002,

base1 = 45,

base2 = 50,

dista = 3,

bonus = 3,

type = "bug",

cd = 9

}

},

[60] = {x = {

pok = kakuna,

spell = "String Shot",

minLv = 1,

ex = 1400002,

base1 = 85,

base2 = 90,

dista = 3,

bonus = 4,

type = "bug",

cd = 9

}

},

[45] = {x = {

pok = beedrill,

spell = "String Shot",

minLv = 1,

ex = 1500002,

base1 = 165,

base2 = 170,

dista = 3,

bonus = 5,

type = "bug",

cd = 10

}

},

[30] = {x = {

pok = pidgey,

spell = "Peck",

minLv = 1,

ex = 1600002,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3,

type = "flying",

cd = 9

}

},

[5] = {x = {

pok = pidgeotto,

spell = "Peck",

minLv = 1,

ex = 1700002,

base1 = 100,

base2 = 140,

dista = 1,

bonus = 3,

type = "flying",

cd = 9

}

},

[80] = {x = {

pok = pidgeot,

spell = "Sand Attack",

minLv = 1,

ex = 1800002,

base1 = 75,

base2 = 150,

dista = 1,

bonus = 5,

type = "earth",

cd = 11

}

},

[36] = {x = {

pok = rattata,

spell = "Scratch",

minLv = 1,

ex = 1900002,

base1 = 40,

base2 = 50,

dista = 1,

bonus = 2,

type = "normal",

cd = 9

}

},

[69] = {x = {

pok = raticate,

spell = "Scratch",

minLv = 1,

ex = 2000002,

base1 = 140,

base2 = 150,

dista = 1,

bonus = 3,

type = "normal",

cd = 9

}

},

[27] = {x = {

pok = spearow,

spell = "Gust",

minLv = 10,

ex = 2100002,

base1 = 40,

base2 = 50,

dista = 50,

bonus = 4,

target = "no",

type = "flying",

cd = 15

}

},

[17] = {x = {

pok = fearow,

spell = "Sand Attack",

minLv = 50,

ex = 2200002,

base1 = 75,

base2 = 150,

dista = 1,

bonus = 5,

type = "earth",

cd = 11

}

},

[7] = {x = {

pok = ekans,

spell = "Poison Fang",

minLv = 15,

ex = 2300002,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "poison",

cd = 10

}

},

[39] = {x = {

pok = arbok,

spell = "Poison Fang",

minLv = 30,

ex = 2400002,

base1 = 30,

base2 = 40,

dista = 2,

bonus = 6,

type = "poison",

cd = 10

}

},

[59] = {x = {

pok = pikachu,

spell = "*******shock",

minLv = 1,

ex = 2500002,

base1 = 49,

base2 = 62,

dista = 5,

bonus = 3.4,

type = "electric",

cd = 12

}

},

[50] = {x = {

pok = raichu,

spell = "*******shock",

minLv = 1,

ex = 2600002,

base1 = 80,

base2 = 120,

dista = 5,

bonus = 6,

type = "electric",

cd = 12

}

},

[43] = {x = {

pok = sandshrew,

spell = "Sand Attack",

minLv = 1,

ex = 2700002,

base1 = 45,

base2 = 55,

dista = 1,

bonus = 3,

target = "no",

type = "ground",

cd = 16

}

},

[284] = {x = {

pok = sandshrew,

spell = "Sand Attack",

minLv = 1,

ex = 2700002,

base1 = 75,

base2 = 85,

dista = 1,

bonus = 4,

target = "no",

type = "ground",

cd = 16

}

},

[115] = {x = {

pok = sandslash,

spell = "Sand Attack",

minLv = 1,

ex = 2800002,

base1 = 155,

base2 = 205,

dista = 1,

target = "no",

bonus = 6.2,

type = "ground",

cd = 16

}

},

[285] = {x = {

pok = sandslash,

spell = "Slash",

minLv = 1,

ex = 2800002,

base1 = 100,

target = "no",

base2 = 105,

dista = 1,

bonus = 3,

type = "ground",

cd = 16

}

},

[70] = {x = {

pok = 'nidoran female',

spell = "Bite",

minLv = 10,

ex = 2900002,

base1 = 30,

base2 = 41,

dista = 1,

bonus = 2,

type = "normal",

cd = 8

}

},

[71] = {x = {

pok = nidorina,

spell = "Bite",

minLv = 25,

ex = 3000002,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 3,

type = "normal",

cd = 8

}

},

[79] = {x = {

pok = nidoqueen,

spell = "Bite",

minLv = 65,

ex = 3100002,

base1 = 191,

base2 = 210,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[66] = {x = {

pok = 'nidoran male',

spell = "Bite",

minLv = 10,

ex = 3200002,

base1 = 30,

base2 = 41,

dista = 1,

bonus = 2,

type = "normal",

cd = 8

}

},

[78] = {x = {

pok = nidorino,

spell = "Bite",

minLv = 25,

ex = 3300002,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 3,

type = "normal",

cd = 8

}

},

[35] = {x = {

pok = nidoking,

spell = "Bite",

minLv = 65,

ex = 3400002,

base1 = 191,

base2 = 210,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[73] = {x = {

pok = clefairy,

spell = "Lovely Kiss",

minLv = 1,

ex = 3500002,

base1 = 48,

base2 = 53,

dista = 1,

bonus = 4,

type = "normal",

cd = 10

}

},

[68] = {x = {

pok = clefable,

spell = "Lovely Kiss",

minLv = 1,

ex = 3600002,

base1 = 180,

base2 = 190,

dista = 1,

bonus = 7,

type = "normal",

cd = 10

}

},

[62] = {x = {

pok = vulpix,

spell = "Iron Tail",

minLv = 15,

ex = 3700002,

base1 = 90,

base2 = 100,

dista = 1,

bonus = 3,

type = "normal",

cd = 9

}

},

[114] = {x = {

pok = Ninetales,

spell = "Iron Tail",

minLv = 65,

ex = 3800002,

base1 = 190,

base2 = 240,

dista = 1,

bonus = 5,

type = "normal",

cd = 9

}

},

[63] = {x = {

pok = Jigglypuff,

spell = "Lovely Kiss",

minLv = 20,

ex = 3900002,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 4,

type = "normal",

cd = 10

}

},

[64] = {x = {

pok = Wigglytuff,

spell = "Lovely Kiss",

minLv = 45,

ex = 4000002,

base1 = 45,

base2 = 185,

dista = 1,

bonus = 6,

type = "normal",

cd = 10

}

},

[44] = {x = {

pok = zubat,

spell = "Bite",

minLv = 7,

ex = 4100002,

base1 = 20,

base2 = 25,

dista = 1,

bonus = 2,

type = "grass",

cd = 14

}

},

[122] = {x = {

pok = golbat,

spell = "Bite",

minLv = 30,

ex = 4200002,

base1 = 150,

base2 = 180,

dista = 1,

bonus = 4,

type = "normal",

cd = 14

}

},

[56] = {x = {

pok = oddish,

spell = "Acid",

minLv = 7,

ex = 4300002,

base1 = 54,

base2 = 64,

dista = 4,

bonus = 2.7,

type = "poison",

cd = 14

}

},

[74] = {x = {

pok = gloom,

spell = "Acid",

minLv = 7,

ex = 4400002,

base1 = 114,

base2 = 134,

dista = 4,

bonus = 3.8,

type = "poison",

cd = 14

}

},

[86] = {x = {

pok = vileplume,

spell = "Leech Seed",

minLv = 7,

ex = 4500002,

base1 = 15,

base2 = 15,

dista = 5,

bonus = 2.5,

type = "grass",

cd = 20

}

},

[81] = {x = {

pok = Paras,

spell = "Poison sting",

minLv = 5,

ex = 4600002,

base1 = 5,

base2 = 35,

dista = 4,

bonus = 3,

type = "poison",

cd = 12

}

},

[95] = {x = {

pok = Parasect,

spell = "Scratch",

minLv = 50,

ex = 4700002,

base1 = 50,

base2 = 90,

dista = 4,

bonus = 5,

type = "poison",

cd = 12

}

},

[52] = {x = {

pok = Venonat,

spell = "Headbutt",

minLv = 20,

ex = 4800002,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 9

}

},

[49] = {x = {

pok = Venomoth,

spell = "Headbutt",

minLv = 50,

ex = 4900002,

base1 = 50,

base2 = 80,

dista = 1,

bonus = 4,

type = "normal",

cd = 9

}

},

[82] = {x = {

pok = Diglett,

spell = "Slash",

minLv = 10,

ex = 5000002,

base1 = 10,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 8

}

},

[83] = {x = {

pok = Dugtrio,

spell = "Slash",

minLv = 35,

ex = 5100002,

base1 = 50,

base2 = 75,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[105] = {x = {

pok = Meowth,

spell = "Scratch",

minLv = 15,

ex = 5200002,

base1 = 15,

base2 = 35,

dista = 1,

bonus = 1.5,

type = "normal",

cd = 5

}

},

[3] = {x = {

pok = Persian,

spell = "Scratch",

minLv = 30,

ex = 5300002,

base1 = 20,

base2 = 50,

dista = 1,

bonus = 3,

type = "normal",

cd = 5

}

},

[100] = {x = {

pok = Psyduck,

spell = "Aqua Tail",

minLv = 20,

ex = 5400002,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 3,

type = "water",

cd = 8

}

},

[99] = {x = {

pok = Golduck,

spell = "Water Gun",

minLv = 55,

ex = 5500002,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "water",

cd = 13

}

},

[106] = {x = {

pok = Mankey,

spell = "Triple Kick",

minLv = 15,

ex = 5600002,

base1 = 15,

base2 = 35,

dista = 1,

bonus = 1.5,

type = "fighting",

cd = 10

}

},

[103] = {x = {

pok = Primeape,

spell = "Triple Kick",

minLv = 50,

ex = 5700002,

base1 = 50,

base2 = 90,

dista = 1,

bonus = 5,

type = "fighting",

cd = 10

}

},

[109] = {x = {

pok = Growlithe,

spell = "Roar",

minLv = 25,

ex = 5800002,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 14

}

},

[88] = {x = {

pok = arcanine,

spell = "Roar",

minLv = 1,

ex = 5900002,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 5,

type = "normal",

cd = 14

}

},

[111] = {x = {

pok = poliwag,

spell = "Bubbles",

minLv = 6,

ex = 6000002,

base1 = 20,

base2 = 30,

dista = 4,

bonus = 2,

type = "water",

cd = 8

}

},

[212] = {x = {

pok = poliwhirl,

spell = "Bubbles",

minLv = 20,

ex = 6100002,

base1 = 80,

base2 = 90,

dista = 4,

bonus = 3,

type = "water",

cd = 8

}

},

[104] = {x = {

pok = poliwrath,

spell = "Waterball",

minLv = 20,

ex = 6200002,

base1 = 200,

base2 = 201,

dista = 4,

bonus = 5,

type = "water",

cd = 16

}

},

[262] = {x = {

pok = abra,

spell = "Restore",

minLv = 13,

ex = 6300002,

base1 = 70,

base2 = 140,

dista = 100,

bonus = 5,

target = "no",

type = "normal",

cd = 26

}

},

[219] = {x = {

pok = kadaabra,

spell = "Restore",

minLv = 1,

ex = 6400002,

base1 = 135,

base2 = 145,

dista = 5,

bonus = 10,

type = "psychic",

target = "no",

cd = 26

}

},

[218] = {x = {

pok = alakaza,

spell = "Psybeam",

minLv = 1,

ex = 6500002,

base1 = 435,

base2 = 445,

dista = 5,

bonus = 14,

type = "psychic",

target = "no",

cd = 32

}

},

[118] = {x = {

pok = machop,

spell = "Mega Punch",

minLv = 5,

ex = 6600002,

base1 = 5,

base2 = 15,

dista = 1,

bonus = 1,

type = "fighting",

cd = 9

}

},

[113] = {x = {

pok = machoke,

spell = "Mega Punch",

minLv = 25,

ex = 6700002,

base1 = 25,

base2 = 105,

dista = 1,

bonus = 3,

type = "fighting",

cd = 9

}

},

[121] = {x = {

pok = machamp,

spell = "Mega Punch",

minLv = 65,

ex = 6800002,

base1 = 165,

base2 = 175,

dista = 1,

bonus = 6,

type = "fighting",

cd = 9

}

},

[250] = {x = {

pok = bellsprout,

spell = "Vine Whip",

minLv = 7,

ex = 6900002,

base1 = 50,

base2 = 60,

dista = 2,

target = "no",

bonus = 3,

type = "grass",

cd = 19

}

},

[37] = {x = {

pok = weepinbell,

spell = "Vine Whip",

minLv = 20,

ex = 7000002,

base1 = 120,

base2 = 150,

target = "no",

dista = 2,

bonus = 4,

type = "grass",

cd = 19

}

},

[240] = {x = {

pok = victreebel,

spell = "Vine Whip",

minLv = 20,

ex = 7100002,

base1 = 230,

base2 = 280,

dista = 2,

target = "no",

bonus = 4.5,

type = "grass",

cd = 19

}

},

[108] = {x = {

pok = tentacool,

spell = "Bubbles",

minLv = 50,

ex = 7200002,

base1 = 20,

base2 = 40,

dista = 1,

bonus = 3,

type = "water",

cd = 8

}

},

[108] = {x = {

pok = tentacruell,

spell = "Bubbles",

minLv = 50,

ex = 7300002,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 7,

type = "water",

cd = 8

}

},

[196] = {x = {

pok = geodude,

spell = "Sand Attack",

minLv = 1,

ex = 7400002,

base1 = 55,

base2 = 62,

dista = 10,

bonus = 3,

target = "no",

type = "ground",

cd = 16

}

},

[247] = {x = {

pok = graveler,

spell = "Sand Attack",

minLv = 1,

ex = 7500002,

base1 = 115,

base2 = 122,

dista = 1,

bonus = 4,

type = "ground",

cd = 16

}

},

[116] = {x = {

pok = golem,

spell = "Sand Attack",

minLv = 1,

ex = 7600002,

base1 = 215,

base2 = 222,

dista = 1,

bonus = 5,

target = "no",

type = "ground",

cd = 16

}

},

[288] = {x = {

pok = golemroll,

spell = "Sand Attack",

minLv = 1,

ex = 7600002,

base1 = 115,

base2 = 122,

dista = 1,

bonus = 4,

target = "no",

type = "ground",

cd = 16

}

},

[16] = {x = {

pok = Ponyta,

spell = "Ember",

minLv = 20,

ex = 7700002,

base1 = 60,

base2 = 75,

dista = 5,

bonus = 3.8,

type = "fire",

cd = 12

}

},

[220] = {x = {

pok = Rapidash,

spell = "Ember",

minLv = 50,

ex = 7800002,

base1 = 220,

base2 = 235,

dista = 5,

bonus = 5,

type = "fire",

cd = 12

}

},

[75] = {x = {

pok = Slowpoke,

spell = "Headbutt",

minLv = 20,

ex = 7900002,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 8

}

},

[41] = {x = {

pok = Slowbro,

spell = "Headbutt",

minLv = 20,

ex = 8000002,

base1 = 50,

base2 = 120,

dista = 1,

bonus = 5,

type = "normal",

cd = 8

}

},

[217] = {x = {

pok = magnemite,

spell = "*******shock",

minLv = 1,

ex = 8100002,

base1 = 49,

base2 = 62,

dista = 5,

bonus = 3.4,

type = "electric",

cd = 14

}

},

[223] = {x = {

pok = magneton,

spell = "*******shock",

minLv = 1,

ex = 8200002,

base1 = 100,

base2 = 118,

dista = 5,

bonus = 4.8,

type = "electric",

cd = 14

}

},

[57] = {x = {

pok = Farfetchd,

spell = "Drill Peck",

minLv = 10,

ex = 8300002,

base1 = 70,

base2 = 90,

dista = 1,

bonus = 7,

type = "normal",

cd = 10

}

},

[26] = {x = {

pok = doduo,

spell = "Pluck",

minLv = 1,

ex = 8400002,

base1 = 91,

base2 = 98,

dista = 1,

bonus = 4,

type = "flying",

cd = 13

}

},

[120] = {x = {

pok = dodrio,

spell = "Quick Attack",

minLv = 1,

ex = 8500002,

base1 = 151,

base2 = 168,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[101] = {x = {

pok = seel,

spell = "Headbutt",

minLv = 1,

ex = 8600002,

base1 = 91,

base2 = 98,

dista = 1,

bonus = 4,

type = "ice",

cd = 9

}

},

[110] = {x = {

pok = dewgong,

spell = "Headbutt",

minLv = 1,

ex = 8700002,

base1 = 191,

base2 = 218,

dista = 1,

bonus = 4,

type = "ice",

cd = 9

}

},

[214] = {x = {

pok = grimer,

spell = "Acid",

minLv = 6,

ex = 8800002,

base1 = 60,

base2 = 70,

dista = 5,

bonus = 5,

type = "poison",

cd = 14

}

},

[47] = {x = {

pok = muk,

spell = "Acid",

minLv = 6,

ex = 8900002,

base1 = 110,

base2 = 120,

dista = 5,

bonus = 5.5,

type = "poison",

cd = 14

}

},

[54] = {x = {

pok = Shellder,

spell = "Super Sonic",

minLv = 15,

ex = 9000002,

base1 = 0,

base2 = 0,

dista = 4,

bonus = 0,

type = "normal",

cd = 16

}

},

[72] = {x = {

pok = Cloyster,

spell = "Super Sonic",

minLv = 35,

ex = 9100002,

base1 = 0,

base2 = 0,

dista = 4,

bonus = 0,

type = "normal",

cd = 16

}

},

[48] = {x = {

pok = gastly,

spell = "Shadow Ball",

minLv = 20,

ex = 9200002,

base1 = 20,

base2 = 30,

dista = 5,

bonus = 2,

type = "ghost",

cd = 11

}

},

[65] = {x = {

pok = haunter,

spell = "Shadow Ball",

minLv = 47,

ex = 9300002,

base1 = 50,

base2 = 60,

dista = 5,

bonus = 4.7,

type = "ghost",

cd = 11

}

},

[244] = {x = {

pok = gengar,

spell = "Shadow Ball",

minLv = 80,

ex = 9400002,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 8,

type = "ghost",

cd = 11

}

},

[248] = {x = {

pok = onix,

spell = "Iron Tail",

minLv = 40,

ex = 9500002,

base1 = 75,

base2 = 90,

dista = 5,

bonus = 5,

type = "normal",

cd = 7

}

},

[94] = {x = {

nome = drowzee,

spell = "Psybeam",

minLv = 30,

ex = 960002,

base1 = 335,

base2 = 345,

dista = 5,

bonus = 11,

type = "psychic",

target = "no",

cd = 32

}

},

[119] = {x = {

nome = hypno,

spell = "Psybeam",

minLv = 50,

ex = 970002,

base1 = 435,

base2 = 445,

dista = 5,

bonus = 14,

type = "psychic",

target = "no",

cd = 32

}

},

[112] = {x = {

pok = krabby,

spell = "Mud Shot",

minLv = 20,

ex = 980002,

base1 = 60,

base2 = 75,

dista = 4,

bonus = 3,

type = "earth",

cd = 8

}

},

[245] = {x = {

pok = kingler,

spell = "Mud Shot",

minLv = 20,

ex = 990002,

base1 = 120,

base2 = 135,

dista = 4,

bonus = 6,

type = "earth",

cd = 8

}

},

[123] = {x = {

pok = voltorb,

spell = "Spark",

minLv = 1,

ex = 1000002,

base1 = 95,

base2 = 112,

target = "no",

dista = 5,

bonus = 4,

type = "electric",

cd = 16

}

},

 

[287] = {x = {

pok = voltorbroll,

spell = "Spark",

minLv = 1,

ex = 1000002,

base1 = 45,

base2 = 52,

dista = 5,

target = "no",

bonus = 2,

type = "electric",

cd = 16

}

},

[125] = {x = {

pok = electrode,

spell = "Spark",

minLv = 1,

ex = 1010002,

base1 = 105,

base2 = 152,

dista = 5,

target = "no",

bonus = 6,

type = "electric",

cd = 16

}

},

[286] = {x = {

pok = electroderoll,

spell = "Spark",

minLv = 1,

ex = 1010002,

base1 = 45,

base2 = 52,

dista = 5,

target = "no",

bonus = 3,

type = "electric",

cd = 16

}

},

[213] = {x = {

pok = Exeggcute,

spell = "Leech Seed",

minLv = 20,

ex = 1020002,

base1 = 15,

base2 = 15,

dista = 5,

bonus = 1.5,

type = "grass",

cd = 20

}

},

[46] = {x = {

pok = Exeggutor,

spell = "Razor Leaf",

minLv = 50,

ex = 1030002,

base1 = 220,

base2 = 235,

dista = 4,

bonus = 5.5,

type = "grass",

cd = 12

}

},

[198] = {x = {

pok = cubone,

spell = "Headbutt",

minLv = 55,

ex = 1040002,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 7

}

},

[197] = {x = {

pok = Marowak,

spell = "Slash",

minLv = 55,

ex = 1050002,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[20] = {x = {

pok = Hitmonlee,

spell = "Mega Kick",

minLv = 60,

ex = 1060002,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "fighting",

cd = 7

}

},

[38] = {x = {

pok = Hitmonchan,

spell = "Mega Punch",

minLv = 60,

ex = 1070002,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "fighting",

cd = 7

}

},

[11] = {x = {

pok = Lickitung,

spell = "Scratch",

minLv = 55,

ex = 1080002,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5.5,

type = "normal",

cd = 7

}

},

[228] = {x = {

pok = Koffing,

spell = "Mud Shot",

minLv = 15,

ex = 1090002,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "earth",

cd = 7

}

},

[231] = {x = {

pok = Weezing,

spell = "Mud Shot",

minLv = 35,

ex = 1100002,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3.5,

type = "earth",

cd = 7

}

},

[77] = {x = {

pok = Rhyhorn,

spell = "Horn Attack",

minLv = 30,

ex = 1110002,

base1 = 30,

base2 = 40,

dista = 1,

bonus = 4,

type = "normal",

cd = 11

}

},

[200] = {x = {

pok = Rhydon,

spell = "Horn Attack",

minLv = 75,

ex = 1120002,

base1 = 75,

base2 = 100,

dista = 1,

bonus = 9,

type = "normal",

cd = 11

}

},

[4] = {x = {

pok = Chansey,

spell = "Doubleslap",

minLv = 60,

ex = 1130002,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[18] = {x = {

pok = Tangela,

spell = "Leech Seed",

minLv = 50,

ex = 1140002,

base1 = 15,

base2 = 25,

dista = 5,

bonus = 1.5,

type = "grass",

cd = 20

}

},

[198] = {x = {

pok = Kangaskhan,

spell = "Dizzy Punch",

minLv = 80,

ex = 1150002,

base1 = 200,

base2 = 210,

dista = 1,

bonus = 6,

type = "fighting",

cd = 22

}

},

[33] = {x = {

pok = horsea,

spell = "Water Pulse",

minLv = 10,

ex = 1160002,

base1 = 50,

base2 = 55,

dista = 4,

bonus = 3.5,

type = "water",

cd = 13

}

},

[276] = {x = {

pok = seadra,

spell = "Water Pulse",

minLv = 6,

ex = 1170002,

base1 = 210,

base2 = 215,

dista = 4,

bonus = 5,

type = "water",

cd = 13

}

},

[274] = {x = {

pok = Goldeen,

spell = "Poison Sting",

minLv = 10,

ex = 1180002,

base1 = 25,

base2 = 65,

dista = 4,

bonus = 4,

type = "poison",

cd = 12

}

},

[272] = {x = {

pok = Seaking,

spell = "Poison Sting",

minLv = 35,

ex = 1190002,

base1 = 50,

base2 = 90,

dista = 4,

bonus = 9,

type = "poison",

cd = 12

}

},

[42] = {x = {

pok = Staryu,

spell = "Slash",

minLv = 15,

ex = 1200002,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "normal",

cd = 7

}

},

[249] = {x = {

pok = Starmie,

spell = "Slash",

minLv = 35,

ex = 1210002,

base1 = 35,

base2 = 45,

dista = 1,

bonus = 3.5,

type = "normal",

cd = 7

}

},

[246] = {x = {

pok = MrMime,

spell = "Psychic",

minLv = 1,

ex = 1220002,

base1 = 180,

base2 = 190,

dista = 5,

bonus = 8,

type = "psychic",

target = "no",

cd = 23

}

},

[15] = {x = {

pok = Scyther,

spell = "Slash",

minLv = 80,

ex = 1230002,

base1 = 35,

base2 = 95,

dista = 1,

bonus = 5.5,

type = "normal",

cd = 7

}

},

[282] = {x = {

pok = Jynx,

spell = "Doubleslap",

minLv = 75,

ex = 1240002,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 7,

type = "normal",

cd = 6

}

},

[281] = {x = {

pok = Electabuzz,

spell = "******* Punch",

minLv = 80,

ex = 1250002,

base1 = 80,

base2 = 110,

dista = 1,

bonus = 9,

type = "electric",

cd = 12

}

},

[76] = {x = {

pok = Magmar,

spell = "Fire Punch",

minLv = 80,

ex = 1260002,

base1 = 80,

base2 = 110,

dista = 1,

bonus = 9,

type = "fire",

cd = 12

}

},

[53] = {x = {

pok = Pinsir,

spell = "Bug Bite",

minLv = 45,

ex = 1270002,

base1 = 45,

base2 = 80,

dista = 1,

bonus = 7,

type = "bug",

cd = 7

}

},

[93] = {x = {

pok = Tauros,

spell = "Quick Attack",

minLv = 45,

ex = 1280002,

base1 = 45,

base2 = 60,

dista = 1,

bonus = 5,

type = "normal",

cd = 6

}

},

[117] = {x = {

pok = Gyarados,

spell = "Bite",

minLv = 95,

ex = 1300002,

base1 = 65,

base2 = 101,

dista = 1,

bonus = 8,

type = "normal",

cd = 9

}

},

[193] = {x = {

pok = Lapras,

spell = "Ice Beam",

minLv = 80,

ex = 1310002,

base1 = 80,

base2 = 120,

dista = 5,

bonus = 8,

target = "no",

type = "ice",

cd = 16

}

},

 

[102] = {x = {

pok = eevee,

spell = "Quick Attack",

minLv = 20,

ex = 1330002,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[215] = {x = {

pok = Vaporeon,

spell = "Bite",

minLv = 55,

ex = 1340002,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 7,

type = "normal",

cd = 9

}

},

[195] = {x = {

pok = Jolteon,

spell = "Bite",

minLv = 55,

ex = 1350002,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 7,

type = "normal",

cd = 9

}

},

[14] = {x = {

pok = Flareon,

spell = "Bite",

minLv = 55,

ex = 1360002,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 7,

type = "normal",

cd = 9

}

},

[97] = {x = {

pok = Porygon,

spell = "Psybeam",

minLv = 40,

ex = 1370002,

base1 = 435,

base2 = 445,

dista = 5,

bonus = 14,

type = "psychic",

target = "no",

cd = 32

}

},

[92] = {x = {

pok = Omanyte,

spell = "Rock Throw",

minLv = 20,

ex = 1380002,

base1 = 40,

base2 = 60,

dista = 5,

bonus = 4,

type = "rock",

cd = 14

}

},

[192] = {x = {

pok = Omastar,

spell = "Rock Throw",

minLv = 80,

ex = 1390002,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 9,

type = "rock",

cd = 14

}

},

[98] = {x = {

pok = Kabuto,

spell = "Bubbles",

minLv = 20,

ex = 1400002,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 6,

type = "water",

cd = 8

}

},

[13] = {x = {

pok = Kabutops,

spell = "Bubbles",

minLv = 80,

ex = 1410002,

base1 = 120,

base2 = 135,

dista = 4,

bonus = 8,

type = "water",

cd = 8

}

},

[10] = {x = {

pok = Aerodactyl,

spell = "Super Sonic",

minLv = 100,

ex = 1420002,

base1 = 0,

base2 = 0,

dista = 4,

bonus = 0,

type = "normal",

cd = 16

}

},

[51] = {x = {

pok = Snorlax,

spell = "Bite",

minLv = 85,

ex = 1430002,

base1 = 50,

base2 = 100,

dista = 1,

bonus = 8,

type = "normal",

cd = 11

}

},

[283] = {x = {

pok = Articuno,

spell = "Drill Peck",

minLv = 110,

ex = 1440002,

base1 = 80,

base2 = 100,

dista = 3,

bonus = 9,

type = "flying",

cd = 16

}

},

[199] = {x = {

pok = Zapdos,

spell = "Drill Peck",

minLv = 110,

ex = 1450002,

base1 = 80,

base2 = 100,

dista = 3,

bonus = 9,

type = "flying",

cd = 16

}

},

[265] = {x = {

pok = Moltres,

spell = "Drill Peck",

minLv = 110,

ex = 1460002,

base1 = 80,

base2 = 100,

dista = 3,

bonus = 9,

type = "flying",

cd = 16

}

},

 

[58] = {x = {

pok = Dratini,

spell = "******* Wave",

minLv = 20,

ex = 1470002,

base1 = 48,

base2 = 51,

dista = 5,

bonus = 6,

target = "no",

type = "electric",

cd = 15

}

},

[61] = {x = {

pok = Dragonair,

spell = "Aqua Tail",

minLv = 60,

ex = 1480002,

base1 = 80,

base2 = 100,

dista = 2,

bonus = 7,

type = "water",

cd = 9

}

},

[210] = {x = {

pok = Dragonite,

spell = "Aqua Tail",

minLv = 100,

ex = 1490002,

base1 = 100,

base2 = 110,

dista = 2,

bonus = 10,

type = "water",

cd = 9

}

},

[34] = {x = {

pok = Mewtwo,

spell = "Shadow Ball",

minLv = 80,

ex = 1500002,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 10,

type = "ghost",

cd = 10

}

},

[9] = {x = {

pok = Mew,

spell = "Shadow Ball",

minLv = 80,

ex = 1510002,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 10,

type = "ghost",

cd = 10

}

},

}

 

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

 

pokemon = c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType]

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

else

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)

if getPlayerStorageValue(getCreatureSummons(cid)[1], 254) >= 1 then

num3 = num3 * 1.8

setPlayerStorageValue(getCreatureSummons(cid)[1], 254, 0)

end

setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3))))

if pokemon.x.spell == "Water Gun" 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))), 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])..", "..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 == "Peck" 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))), 3)

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])..", "..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))), 160)

return 0

-------------------------------------------------------------ADICIONADOS------------------------------------------------------------------

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

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

 

-----------------1AREA

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])..", "..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]), psychic, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 136)

return 0

-----------------OUTRAS

elseif pokemon.x.spell == "Vine Whip" 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

area = vinen

dano = whipn

effect = 80

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

area = vinee

dano = whipe

effect = 83

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

area = vines

dano = whips

effect = 81

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

area = vinew

dano = whipw

effect = 82

end

doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), effect)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), dano, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255)

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])..", "..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 confd(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(confd, 1000*i, {cid = cid, t = t})

end

addEvent(nonc, 7100, {cid - cid, t = t})

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])..", "..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 == "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])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)

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

local function slap(params)

if isMonster(getCreatureTarget(params.cid)) then

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))), 3)

else

end

end

addEvent(slap, 0, {cid = cid})

addEvent(slap, 300, {cid = cid})

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])..", "..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

addEvent(ver, 4500, {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 == "Psy Pulse" 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)

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)

return 0

elseif pokemon.x.spell == "******* Wave" 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]), tsn, *******wavecondition, 255)

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

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tse, *******wavecondition, 255)

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

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tss, *******wavecondition, 255)

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

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tsw, *******wavecondition, 255)

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 == "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])..", "..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 confd(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(confd, 1000*i, {cid = cid, t = t})

end

addEvent(nonc, 7100, {cid - cid, t = t})

return 0

----------------BEAM

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

if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bmn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 108)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bms, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 109)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bme, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 107)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bmw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 106)

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 == "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])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY)

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

return 0

----------------DISTANCE

elseif pokemon.x.spell == "Shadow Ball" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 140)

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])..", "..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 == "******* Punch" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 112)

return 0

----------------NORMAL

elseif pokemon.x.spell == "Lovely Kiss" 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))), 147)

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])..", "..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))), 5)

return 0

elseif pokemon.x.spell == "Bug Bite" 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))), 20)

return 0

elseif pokemon.x.spell == "Roar" 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))), 2)

return 0

elseif pokemon.x.spell == "Triple Kick" 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))), 3)

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])..", "..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))), 160)

return 0

elseif pokemon.x.spell == "Quick Attack" 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))), 3)

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])..", "..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 == "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])..", "..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))), 159)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114)

return 0

elseif pokemon.x.spell == "Doubleslap" 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 slap(params)

if isMonster(getCreatureTarget(params.cid)) then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)

else

end

end

addEvent(slap, 0, {cid = cid})

addEvent(slap, 600, {cid = cid})

return 0

-------------------------------------------------------------ADICIONADOS------------------------------------------------------------------

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

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

elseif pokemon.x.spell == "Scratch" 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))), 142)

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 == "Headbutt" 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))), 142)

return 0

elseif pokemon.x.spell == "Bite" 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))), 146)

return 0

elseif pokemon.x.spell == "Pluck" 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)), pluck, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 2)

return 0

elseif pokemon.x.spell == "Sand Attack" 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 sandattack(params)

if #getCreatureSummons(params.cid) >= 1 then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)

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, y=posicao.y-1, z=posicao.z}, ef = 120})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, ef = 120})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, ef = 120})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, ef = 122})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, ef = 122})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, ef = 122})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, ef = 121})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, ef = 121})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, ef = 121})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, ef = 119})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, ef = 119})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, ef = 119})

end

elseif pokemon.x.spell == "Spark" 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 spark(params)

if isCreature(params.cid) then

if isCreature(getCreatureSummons(params.cid)[1]) then

doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), params.cidpos, 40)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, params.cidpos, 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)

end

end

end

for a = -1, 1 do

for b = -1, 1 do

cidpos = getThingPos(getCreatureSummons(cid)[1])

cidpos.x = cidpos.x+a

cidpos.y = cidpos.y+b

addEvent(spark, math.abs(a)*350 + math.abs(b)*650, {cid = cid, cidpos = cidpos})

end

end

return 0

elseif pokemon.x.spell == "Absorb" 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 life = getCreatureHealth(getCreatureTarget(cid))

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 14)

local newlife = life - getCreatureHealth(getCreatureTarget(cid))

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 14)

doCreatureAddHealth(getCreatureSummons(cid)[1], newlife)

doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..newlife.."", 35)

return 0

elseif pokemon.x.spell == "Razor Leaf" 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)), 8)

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))), 79)

else

end

end

addEvent(damage, 100, {cid = cid})

addEvent(damage, 600, {cid = cid})

addEvent(throw, 0, {cid = cid})

addEvent(throw, 550, {cid = cid})

return 0

elseif pokemon.x.spell == "Bubbles" 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)), 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))), 25)

else

end

end

addEvent(throw, 0, {cid = cid})

addEvent(damage, 0, {cid = cid})

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])..", "..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 == "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 == "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)

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 == "Poison Sting" 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)

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 == "Ember" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 15)

return 0

elseif pokemon.x.spell == "*******shock" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)

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])..", "..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

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])..", "..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)), 33)

else

end

end

local function damage(params)

if isMonster(getCreatureTarget(params.cid)) then

doAreaCombatHealth(getCreatureSummons(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})

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])..", "..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 == "String Shot" 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)), 23)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 137)

local function string(params)

if isCreature(params.alvo) then

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

doSendMagicEffect(getThingPos(params.alvo), 137)

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

end

return 0

end

 

Move 3

 

local *******wavecondition = createConditionObject(CONDITION_PARALYZE)

setConditionParam(*******wavecondition, CONDITION_PARAM_TICKS, 8000)

setConditionFormula(*******wavecondition, -0.45, -0.45, -0.45, -0.45)

------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)

 

 

 

-------------ADICIONADAS---------------

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

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 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 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 glv = createCombatArea{

{0, 0, 0, 0, 1, 0, 0, 0, 0},

{0, 0, 0, 1, 1, 1, 0, 0, 0},

{0, 0, 1, 1, 1, 1, 1, 0, 0},

{0, 1, 1, 1, 1, 1, 1, 1, 0},

{1, 1, 1, 1, 1, 1, 1, 1, 1},

{1, 1, 1, 1, 2, 1, 1, 1, 1},

{1, 1, 1, 1, 1, 1, 1, 1, 1},

{0, 1, 1, 1, 1, 1, 1, 1, 0},

{0, 0, 1, 1, 1, 1, 1, 0, 0},

{0, 0, 0, 1, 1, 1, 0, 0, 0},

{0, 0, 0, 0, 1, 0, 0, 0, 0},

}

local stomp = createCombatArea{

{1, 0, 0, 0, 1,},

{0, 1, 0, 1, 0,},

{0, 0, 2, 0, 0,},

{0, 1, 0, 1, 0,},

{1, 0, 0, 0, 1,},

}

local whipn = createCombatArea{

{0, 0, 0},

{0, 2, 0},

{1, 1, 1},

{1, 1, 1}

}

local whips = createCombatArea{

{1, 1, 1},

{1, 1, 1},

{0, 2, 0},

{0, 0, 0}

}

local whipe = createCombatArea{

{1, 1, 0},

{1, 1, 2},

{1, 1, 0},

{0, 0, 0}

}

local whipw = createCombatArea{

{0, 1, 1},

{2, 1, 1},

{0, 1, 1},

{0, 0, 0}

}

local vinen = createCombatArea{

{0, 0, 0},

{0, 0, 0},

{0, 2, 0},

{1, 0, 0}

}

local vines = createCombatArea{

{0, 0, 0},

{1, 0, 0},

{0, 0, 0},

{0, 2, 0}

}

local vinee = createCombatArea{

{0, 0, 0},

{1, 0, 0},

{0, 0, 2},

{0, 0, 0}

}

local vinew = createCombatArea{

{0, 0, 0},

{0, 0, 3},

{0, 2, 0},

{0, 0, 0}

}

local ns = createCombatArea{

{1, 1, 1},

{1, 2, 1},

{1, 1, 1},

}

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 is = createCombatArea{

{0, 0, 1, 0, 0},

{0, 1, 1, 1, 0},

{1, 1, 1, 1, 1},

{1, 1, 3, 1, 1},

{0, 1, 1, 1, 0},

{0, 0, 1, 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}

}

--------NOVAS WAVES------

local wsn = 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 wss = 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 wse = 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 wsw = 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 bbn = createCombatArea{

{0, 0, 0, 2, 0, 0, 0},

{0, 0, 0, 1, 0, 0, 0},

{0, 0, 1, 0, 1, 0, 0},

{0, 0, 1, 1, 1, 0, 0},

{0, 1, 0, 1, 0, 1, 0},

}

 

local bbs = createCombatArea{

{0, 1, 0, 1, 0, 1, 0},

{0, 0, 1, 0, 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 bbe = createCombatArea{

{0, 0, 1, 0, 0, 0, 0},

{0, 0, 0, 1, 1, 0, 0},

{0, 0, 1, 1, 0, 1, 2},

{0, 0, 0, 1, 1, 0, 0},

{0, 0, 1, 0, 0, 0, 0},

}

 

local bbw = createCombatArea{

{0, 0, 0, 0, 0, 0, 1},

{0, 0, 0, 0, 1, 1, 0},

{0, 0, 2, 1, 0, 1, 1},

{0, 0, 0, 0, 1, 1, 0},

{0, 0, 0, 0, 0, 0, 1},

}

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}

}

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

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

-------------ADICIONADAS---------------

 

-- 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 tsn = createCombatArea{

{0, 0, 0, 2, 0, 0, 0},

{0, 0, 0, 1, 0, 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, 0, 1, 0, 0, 0},

{0, 0, 0, 2, 0, 0, 0},

}

 

local tse = createCombatArea{

{0, 0, 0, 1, 0, 0, 0},

{0, 0, 0, 1, 1, 0, 0},

{0, 0, 0, 1, 1, 1, 2},

{0, 0, 0, 1, 1, 0, 0},

{0, 0, 0, 1, 0, 0, 0},

}

 

local tsw = createCombatArea{

{0, 0, 0, 0, 0, 1, 0},

{0, 0, 0, 0, 1, 1, 0},

{0, 0, 2, 1, 1, 1, 0},

{0, 0, 0, 0, 1, 1, 0},

{0, 0, 0, 0, 0, 1, 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

 

-- SAND ATTACK

local sand1 = createCombatArea{

{0, 0, 0},

{0, 3, 0},

{0, 0, 0},

}

 

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 pokeis = {'bulbasaur','ivysaur','venusaur','Squirtle','wartortle','Blastoise','Pidgey', 'Pidgeotto', 'Pidgeot', 'Rattata',

'Bellsprout', 'Weepinbell', 'Victreebel', 'Poliwag', 'Poliwhirl', 'Poliwrath', 'Abra', 'Oddish',

'Gloom', 'Vileplume', 'Horsea', 'Seadra', 'Grimer', 'Muk', 'Weedle', 'Kakuna', 'Beedrill', 'Raticate', 'Zubat', 'Golbat',

'Doduo', 'Dodrio', 'Magnemite', 'Magneton', 'Voltorb', 'Electrode', 'Geodude', 'Graveler', 'Golem', 'Sandshrew',

'Sandslash', 'Charmander', 'Charmeleon', 'Charizard', 'Kadabra', 'Alakazam', 'caterpie', 'metapod', 'Butterfree',

'spearow', 'fearow', 'ekans', 'arbok', 'pikachu', 'raichu', 'nidoran female', 'nidorina', 'nidoqueen', 'nidoran male',

'nidorino', 'nidoking', 'clefairy', 'clefable', 'vulpix', 'Ninetales', 'Jigglypuff', 'Wigglytuff', 'zubat', 'golbat',

'Paras', 'Parasect', 'Venonat', 'Venomoth', 'Diglett', 'Dugtrio', 'Meowth', 'Psyduck', 'Golduck', 'Mankey', 'Primeape',

'Growlithe', 'arcanine', 'machop', 'machoke', 'machamp', 'tentacool', 'tentacruell', 'Ponyta', 'Rapidash', 'Slowpoke',

'Slowbro', 'Farfetchd', 'seel', 'dewgong', 'Shellder', 'Cloyster', 'gastly', 'haunter', 'gengar', 'onix', 'drowzee',

'hypno', 'krabby', 'kingler', 'Exeggcute', 'Exeggutor', 'Marowak', 'Hitmonlee', 'cubone','Hitmonchan', 'Lickitung', 'Koffing',

'Weezing', 'Rhyhorn', 'Rhydon', 'Chansey', 'Tangela', 'Kangaskhan', 'Goldeen', 'Seaking', 'Staryu', 'Starmie', 'MrMime',

'Scyther', 'Jynx', 'Electabuzz', 'Magmar', 'Pinsir', 'Tauros', 'Lapras', 'Ditto', 'eevee', 'Vaporeon', 'Jolteon', 'Flareon',

'Porygon', 'Omanyte', 'Omastar', 'Kabuto', 'Kabutops', 'Aerodactyl', 'Snorlax', 'Articuno', 'Zapdos', 'Moltres', 'Dratini',

'Dragonair', 'Dragonite', 'Mew', 'Mewtwo', 'Gyarados'}

local c = {

 

[28] = {x = {

pok = ditto,

spell = "Transform",

minLv = 40,

ex = 140001,

base1 = 0,

base2 = 0,

dista = 7,

bonus = 0,

type = "normal",

cd = 15

}

},

[25] = {x = {

pok = bulbasaur,

spell = "Vine Whip",

minLv = 20,

ex = 1000003,

base1 = 50,

base2 = 60,

dista = 2,

target = "no",

bonus = 4,

type = "grass",

cd = 19

}

},

[24] = {x = {

pok = ivysaur,

spell = "Vine Whip",

minLv = 40,

ex = 2000003,

base1 = 120,

base2 = 150,

target = "no",

dista = 2,

bonus = 5,

type = "grass",

cd = 19

}

},

[22] = {x = {

pok = venusaur,

spell = "Vine Whip",

minLv = 85,

ex = 3000003,

base1 = 230,

base2 = 280,

dista = 2,

target = "no",

bonus = 6.5,

type = "grass",

cd = 19

}

},

[29] = {x = {

pok = charmander,

spell = "Fire Fang",

minLv = 1,

ex = 400003,

base1 = 75,

base2 = 78,

dista = 1,

bonus = 4.7,

type = "fire",

cd = 18

}

},

[23] = {x = {

pok = charmeleon,

spell = "Flamethrower",

minLv = 1,

ex = 500003,

base1 = 170,

base2 = 181,

target = "no",

bonus = 5,

type = "fire",

cd = 18

}

},

[67] = {x = {

pok = charizard,

spell = "Flamethrower",

minLv = 1,

ex = 600003,

base1 = 245,

base2 = 258,

dista = 1,

bonus = 7.1,

type = "fire",

cd = 18

}

},

[2] = {x = {

pok = Squirtle,

spell = "Water Gun",

minLv = 20,

ex = 700003,

base1 = 75,

base2 = 80,

dista = 5,

bonus = 5,

target = "no",

type = "water",

cd = 18

}

},

[6] = {x = {

pok = wartortle,

spell = "Water Gun",

minLv = 20,

ex = 8000003,

base1 = 120,

base2 = 135,

dista = 5,

bonus = 5,

type = "water",

cd = 18

}

},

[55] = {x = {

pok = Blastoise,

spell = "Water Gun",

minLv = 20,

ex = 9000003,

base1 = 220,

base2 = 235,

dista = 5,

bonus = 7.5,

target = "no",

type = "water",

cd = 18

}

},

[32] = {x = {

pok = caterpie,

spell = "Bug Bite",

minLv = 1,

ex = 1000003,

base1 = 95,

base2 = 100,

dista = 1,

bonus = 4,

type = "bug",

cd = 16

}

},

[31] = {x = {

pok = metapod,

spell = "Harden",

minLv = 1,

ex = 1100003,

base1 = 0,

target = "no",

base2 = 0,

dista = 100,

bonus = 0,

type = "normal",

cd = 17

}

},

[40] = {x = {

pok = Butterfree,

spell = "Headbutt",

minLv = 1,

ex = 1200003,

base1 = 65,

base2 = 70,

dista = 1,

bonus = 5,

type = "normal",

cd = 4

}

},

 

[21] = {x = {

spell = "Poison Sting",

minLv = 1,

ex = 1300003,

base1 = 45,

base2 = 50,

dista = 3,

bonus = 4,

type = "poison",

cd = 13

}

},

[60] = {x = {

spell = "Bug Bite",

minLv = 1,

ex = 1400003,

base1 = 95,

base2 = 100,

dista = 1,

bonus = 4,

type = "bug",

cd = 16

}

},

[45] = {x = {

spell = "Pin Missile",

minLv = 1,

ex = 1500003,

base1 = 225,

base2 = 230,

dista = 1,

bonus = 5,

type = "normal",

cd = 16

}

},

[30] = {x = {

spell = "Sand Attack",

minLv = 8,

ex = 1600003,

base1 = 40,

base2 = 50,

dista = 50,

bonus = 3,

type = "ground",

target = "no",

cd = 12

}

},

[5] = {x = {

spell = "Whirlwind",

minLv = 20,

ex = 1700003,

base1 = 100,

base2 = 120,

dista = 50,

bonus = 5,

target = "no",

type = "flying",

cd = 25

}

},

[80] = {x = {

spell = "Whirlwind",

minLv = 65,

ex = 1800003,

base1 = 200,

base2 = 240,

dista = 50,

bonus = 8,

target = "no",

type = "flying",

cd = 25

}

},

[36] = {x = {

spell = "Bite",

minLv = 7,

ex = 1900003,

base1 = 40,

base2 = 50,

dista = 1,

bonus = 3,

type = "normal",

cd = 11

}

},

[69] = {x = {

spell = "Bite",

minLv = 1,

ex = 2000003,

base1 = 150,

base2 = 200,

dista = 1,

bonus = 5,

type = "normal",

cd = 11

}

},

[27] = {x = {

pok = spearow,

spell = "Sand Attack",

minLv = 10,

ex = 2100003,

base1 = 20,

base2 = 40,

dista = 1,

bonus = 3,

type = "earth",

cd = 11

}

},

[17] = {x = {

pok = fearow,

spell = "Drill Peck",

minLv = 50,

ex = 2200003,

base1 = 80,

base2 = 100,

dista = 1,

bonus = 3,

type = "flying",

cd = 16

}

},

[7] = {x = {

pok = ekans,

spell = "Poison Sting",

minLv = 15,

ex = 2300003,

base1 = 25,

base2 = 65,

dista = 4,

bonus = 4,

type = "poison",

cd = 12

}

},

[39] = {x = {

pok = arbok,

spell = "Poison Sting",

minLv = 30,

ex = 2400003,

base1 = 50,

base2 = 90,

dista = 4,

bonus = 10,

type = "poison",

cd = 12

}

},

[59] = {x = {

pok = pikachu,

spell = "******* Wave",

minLv = 1,

ex = 2500003,

base1 = 48,

base2 = 51,

dista = 5,

bonus = 4,

target = "no",

type = "electric",

cd = 15

}

},

[50] = {x = {

pok = raichu,

spell = "******* Wave",

minLv = 1,

ex = 2600003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 6,

target = "no",

type = "electric",

cd = 15

}

},

[43] = {x = {

pok = sandshrew,

spell = "Mud Shot",

minLv = 1,

ex = 2700003,

base1 = 45,

base2 = 55,

dista = 4,

bonus = 3,

type = "ground",

cd = 14

}

},

[284] = {x = {

pok = sandshrew,

spell = "Mud Shot",

minLv = 1,

ex = 2700003,

base1 = 15,

base2 = 25,

dista = 4,

bonus = 1.5,

type = "ground",

cd = 14

}

},

[115] = {x = {

pok = sandslash,

spell = "Mud Shot",

minLv = 1,

ex = 2800003,

base1 = 145,

base2 = 155,

dista = 4,

bonus = 5,

type = "ground",

cd = 14

}

},

[285] = {x = {

pok = sandslash,

spell = "Mud Shot",

minLv = 1,

ex = 2800003,

base1 = 75,

base2 = 78,

dista = 4,

bonus = 3,

type = "ground",

cd = 14

}

},

[70] = {x = {

pok = 'nidoran female',

spell = "Horn Attack",

minLv = 10,

ex = 2900003,

base1 = 15,

base2 = 45,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[71] = {x = {

pok = nidorina,

spell = "Horn Attack",

minLv = 25,

ex = 3000003,

base1 = 35,

base2 = 65,

dista = 1,

bonus = 4.5,

type = "normal",

cd = 7

}

},

[79] = {x = {

pok = nidoqueen,

spell = "Horn Attack",

minLv = 65,

ex = 3100003,

base1 = 135,

base2 = 165,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[66] = {x = {

pok = 'nidoran male',

spell = "Horn Attack",

minLv = 10,

ex = 3200003,

base1 = 15,

base2 = 45,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[78] = {x = {

pok = nidorino,

spell = "Horn Attack",

minLv = 25,

ex = 3300003,

base1 = 35,

base2 = 65,

dista = 1,

bonus = 4.5,

type = "normal",

cd = 7

}

},

[35] = {x = {

pok = nidoking,

spell = "Horn Attack",

minLv = 65,

ex = 3400003,

base1 = 135,

base2 = 165,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[73] = {x = {

pok = clefairy,

spell = "Doubleslap",

minLv = 1,

ex = 3500003,

base1 = 48,

base2 = 53,

dista = 1,

bonus = 2.2,

type = "normal",

cd = 7

}

},

[73] = {x = {

pok = clefable,

spell = "Doubleslap",

minLv = 1,

ex = 3600003,

base1 = 180,

base2 = 190,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[62] = {x = {

pok = vulpix,

spell = "Ember",

minLv = 15,

ex = 3700003,

base1 = 90,

base2 = 105,

dista = 4,

bonus = 4,

type = "fire",

cd = 14

}

},

[114] = {x = {

pok = Ninetales,

spell = "Ember",

minLv = 65,

ex = 3800003,

base1 = 220,

base2 = 235,

dista = 4,

bonus = 6,

type = "fire",

cd = 14

}

},

[63] = {x = {

pok = Jigglypuff,

spell = "Doubleslap",

minLv = 20,

ex = 3900003,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 2,

type = "normal",

cd = 7

}

},

[64] = {x = {

pok = Wigglytuff,

spell = "Sing",

minLv = 45,

ex = 4000003,

base1 = 145,

base2 = 155,

dista = 3,

bonus = 7,

type = "normal",

cd = 15

}

},

[44] = {x = {

spell = "Poison Fang",

minLv = 15,

ex = 4100003,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 1.5,

type = "poison",

cd = 10

}

},

[122] = {x = {

spell = "Poison Fang",

minLv = 30,

ex = 4200002,

base1 = 30,

base2 = 40,

dista = 2,

bonus = 7,

type = "poison",

cd = 10

}

},

[56] = {x = {

spell = "Leech Seed",

minLv = 11,

ex = 4300003,

base1 = 6,

base2 = 6,

dista = 5,

bonus = 0.5,

type = "grass",

cd = 20

}

},

[74] = {x = {

spell = "Leech Seed",

minLv = 20,

ex = 4400003,

base1 = 15,

base2 = 15,

dista = 5,

bonus = 1.5,

type = "grass",

cd = 20

}

},

[86] = {x = {

spell = "Acid",

minLv = 20,

ex = 4500003,

base1 = 114,

base2 = 134,

dista = 4,

bonus = 3.8,

type = "poison",

cd = 14

}

},

[81] = {x = {

pok = Paras,

spell = "Slash",

minLv = 5,

ex = 4600003,

base1 = 15,

base2 = 25,

dista = 1,

bonus = 2,

type = "normal",

}

},

[95] = {x = {

pok = Parasect,

spell = "Poison Sting",

minLv = 50,

ex = 4700003,

base1 = 50,

base2 = 80,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[52] = {x = {

pok = Venonat,

spell = "Super Sonic",

minLv = 20,

ex = 4800003,

base1 = 0,

base2 = 0,

dista = 4,

bonus = 0,

type = "normal",

cd = 16

}

},

[49] = {x = {

pok = Venomoth,

spell = "Super Sonic",

minLv = 50,

ex = 4900003,

base1 = 0,

base2 = 0,

dista = 4,

bonus = 0,

type = "normal",

cd = 16

}

},

[82] = {x = {

pok = Diglett,

spell = "Mud Shot",

minLv = 10,

ex = 5000003,

base1 = 45,

base2 = 55,

dista = 4,

bonus = 3,

type = "ground",

cd = 14

}

},

[83] = {x = {

pok = Dugtrio,

spell = "Mud Shot",

minLv = 35,

ex = 5100003,

base1 = 100,

base2 = 140,

dista = 4,

bonus = 5.5,

type = "ground",

cd = 14

}

},

[105] = {x = {

pok = Meowth,

spell = "Bite",

minLv = 15,

ex = 5200003,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 3,

type = "normal",

cd = 8

}

},

[3] = {x = {

pok = Persian,

spell = "Bite",

minLv = 30,

ex = 5300003,

base1 = 191,

base2 = 210,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[100] = {x = {

pok = Psyduck,

spell = "Confusion",

minLv = 20,

ex = 5400003,

base1 = 30,

base2 = 50,

dista = 1,

bonus = 3,

type = "psychic",

target = "no",

cd = 12

}

},

[99] = {x = {

pok = Golduck,

spell = "Aqua Tail",

minLv = 55,

ex = 5500003,

base1 = 191,

base2 = 218,

dista = 1,

bonus = 5,

type = "water",

cd = 10

}

},

[106] = {x = {

pok = Mankey,

spell = "Karate Chop",

minLv = 15,

ex = 5600002,

base1 = 55,

base2 = 85,

dista = 1,

bonus = 2,

type = "fighting",

cd = 13

}

},

[103] = {x = {

pok = Primeape,

spell = "Karate Chop",

minLv = 50,

ex = 5700002,

base1 = 150,

base2 = 190,

dista = 1,

bonus = 5,

type = "fighting",

cd = 13

}

},

[109] = {x = {

pok = Growlithe,

spell = "Quick Attack",

minLv = 25,

ex = 5800002,

base1 = 25,

base2 = 35,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 7

}

},

[88] = {x = {

pok = arcanine,

spell = "Quick Attack",

minLv = 1,

ex = 5900002,

base1 = 100,

base2 = 111,

dista = 1,

bonus = 5,

type = "normal",

cd = 7

}

},

[111] = {x = {

spell = "Aqua Tail",

minLv = 8,

ex = 6000003,

base1 = 20,

base2 = 30,

dista = 4,

bonus = 3,

type = "water",

cd = 10

}

},

[212] = {x = {

pok = poliwhirl,

spell = "Mud Shot",

minLv = 22,

ex = 6100003,

base1 = 90,

base2 = 100,

dista = 4,

bonus = 3,

type = "ground",

cd = 14

}

},

[104] = {x = {

pok = poliwrath,

spell = "Bubbles",

minLv = 22,

ex = 6200003,

base1 = 160,

base2 = 170,

dista = 4,

bonus = 3.5,

type = "water",

cd = 8

}

},

[262] = {x = {

spell = "Psy Pulse",

minLv = 17,

ex = 6300003,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 4.8,

type = "psychic",

cd = 18

}

},

[219] = {x = {

pok = kadaabra,

spell = "Psy Pulse",

minLv = 1,

ex = 6400003,

base1 = 175,

base2 = 185,

dista = 5,

bonus = 6,

type = "psychic",

cd = 18

}

},

[218] = {x = {

pok = alaka,

spell = "Psy Pulse",

minLv = 1,

ex = 6500003,

base1 = 275,

base2 = 385,

dista = 5,

bonus = 9,

type = "psychic",

cd = 18

}

},

[118] = {x = {

pok = machop,

spell = "Karate Chop",

minLv = 5,

ex = 6600003,

base1 = 25,

base2 = 45,

dista = 1,

bonus = 3,

type = "fighting",

cd = 13

}

},

[113] = {x = {

pok = machoke,

spell = "Mega Kick",

minLv = 25,

ex = 6700003,

base1 = 25,

base2 = 105,

dista = 1,

bonus = 3,

type = "fighting",

cd = 10

}

},

[121] = {x = {

pok = machamp,

spell = "Mega Kick",

minLv = 65,

ex = 6800003,

base1 = 165,

base2 = 175,

dista = 1,

bonus = 5.5,

type = "fighting",

cd = 10

}

},

[250] = {x = {

spell = "Acid",

minLv = 10,

ex = 6900003,

base1 = 34,

base2 = 44,

dista = 4,

bonus = 2,

type = "poison",

cd = 14

}

},

[37] = {x = {

spell = "Acid",

minLv = 10,

ex = 7000003,

base1 = 94,

base2 = 124,

dista = 4,

bonus = 3,

type = "poison",

cd = 14

}

},

[240] = {x = {

spell = "Acid",

minLv = 10,

ex = 7100003,

base1 = 234,

base2 = 344,

dista = 4,

bonus = 4,

type = "poison",

cd = 14

}

},

[108] = {x = {

pok = tentacool,

spell = "Poison sting",

minLv = 50,

ex = 7200003,

base1 = 55,

base2 = 65,

dista = 4,

bonus = 3,

type = "poison",

cd = 14

}

},

[108] = {x = {

pok = tentacruell,

spell = "Poison sting",

minLv = 50,

ex = 7300003,

base1 = 150,

base2 = 190,

dista = 4,

bonus = 7,

type = "poison",

cd = 13

}

},

[196] = {x = {

pok = geodude,

spell = "Rock Slide",

minLv = 16,

ex = 7400003,

base1 = 85,

base2 = 100,

dista = 5,

bonus = 3.9,

type = "rock",

cd = 20

}

},

[247] = {x = {

pok = graveler,

spell = "Rock Slide",

minLv = 16,

ex = 7500003,

base1 = 205,

base2 = 206,

dista = 4,

bonus = 4.8,

type = "rock",

cd = 20

}

},

[116] = {x = {

pok = golem,

spell = "Rock Slide",

minLv = 16,

ex = 7600003,

base1 = 385,

base2 = 400,

dista = 4,

bonus = 5.8,

type = "rock",

cd = 20

}

},

[288] = {x = {

pok = golemrol,

spell = "Rock Slide",

minLv = 16,

ex = 7600003,

base1 = 185,

base2 = 200,

dista = 4,

bonus = 3.7,

type = "rock",

cd = 20

}

},

[288] = {x = {

pok = golemroll,

spell = "Rock Slide",

minLv = 16,

ex = 7600003,

base1 = 185,

base2 = 200,

dista = 4,

bonus = 3.7,

type = "rock",

cd = 20

}

},

[16] = {x = {

pok = Ponyta,

spell = "Flamethrower",

minLv = 20,

ex = 7700003,

base1 = 170,

base2 = 181,

target = "no",

bonus = 5,

type = "fire",

cd = 30

}

},

[220] = {x = {

pok = Rapidash,

spell = "Flamethrower",

minLv = 50,

ex = 7800003,

base1 = 370,

base2 = 381,

target = "no",

bonus = 8,

type = "fire",

cd = 30

}

},

[75] = {x = {

pok = Slowpoke,

spell = "Iron Tail",

minLv = 20,

ex = 7900003,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 5,

type = "normal",

cd = 8

}

},

[41] = {x = {

pok = Slowbro,

spell = "Iron Tail",

minLv = 20,

ex = 8000003,

base1 = 75,

base2 = 80,

dista = 1,

bonus = 9,

type = "normal",

cd = 7

}

},

[217] = {x = {

pok = magnemite,

spell = "******* Wave",

minLv = 1,

ex = 8100003,

base1 = 48,

base2 = 51,

dista = 5,

bonus = 3,

target = "no",

type = "electric",

cd = 15

}

},

[223] = {x = {

pok = magneton,

spell = "******* Wave",

minLv = 1,

ex = 8200003,

base1 = 152,

base2 = 163,

dista = 5,

bonus = 4.5,

target = "no",

type = "electric",

cd = 15

}

},

[57] = {x = {

pok = Farfetchd,

spell = "Slash",

minLv = 10,

ex = 8300003,

base1 = 50,

base2 = 75,

dista = 1,

bonus = 4,

type = "normal",

cd = 8

}

},

[26] = {x = {

pok = doduo,

spell = "Fury Attack",

minLv = 13,

ex = 8400003,

base1 = 25,

base2 = 28,

dista = 3,

bonus = 1,

type = "normal",

cd = 11

}

},

[120] = {x = {

pok = dodrio,

spell = "Fury Attack",

minLv = 13,

ex = 8500003,

base1 = 49,

base2 = 53,

dista = 3,

bonus = 1,

type = "normal",

cd = 11

}

},

[101] = {x = {

pok = seel,

spell = "Ice Shards",

minLv = 1,

ex = 8600003,

base1 = 150,

base2 = 151,

dista = 4,

bonus = 5.4,

type = "ice",

cd = 22

}

},

[110] = {x = {

pok = dewgong,

spell = "Ice Shards",

minLv = 1,

ex = 8700003,

base1 = 250,

base2 = 251,

dista = 4,

bonus = 7.4,

type = "ice",

cd = 22

}

},

[214] = {x = {

spell = "Sludge",

minLv = 14,

ex = 8800003,

base1 = 60,

base2 = 70,

dista = 5,

bonus = 5,

type = "poison",

cd = 18

}

},

[47] = {x = {

spell = "Sludge",

minLv = 14,

ex = 8900003,

base1 = 150,

base2 = 160,

dista = 5,

bonus = 6,

type = "poison",

cd = 18

}

},

[54] = {x = {

pok = Shellder,

spell = "Clamp",

minLv = 15,

ex = 9000003,

base1 = 20,

base2 = 30,

dista = 1,

bonus = 3,

type = "normal",

cd = 6

}

},

[72] = {x = {

pok = Cloyster,

spell = "Clamp",

minLv = 35,

ex = 9100003,

base1 = 50,

base2 = 100,

dista = 1,

bonus = 6,

type = "normal",

cd = 6

}

},

[48] = {x = {

pok = gastly,

spell = "Night Shade",

minLv = 20,

ex = 9200003,

base1 = 100,

base2 = 101,

dista = 4,

bonus = 5,

type = "ghost",

cd = 25

}

},

[65] = {x = {

pok = haunter,

spell = "Night Shade",

minLv = 47,

ex = 9300003,

base1 = 150,

base2 = 151,

dista = 4,

bonus = 6,

type = "ghost",

cd = 25

}

},

[244] = {x = {

pok = gengar,

spell = "Shadow Punch",

minLv = 80,

ex = 9400003,

base1 = 80,

base2 = 110,

dista = 1,

bonus = 9,

type = "ghost",

cd = 15

}

},

[248] = {x = {

pok = onix,

spell = "Rock Throw",

minLv = 40,

ex = 9500003,

base1 = 70,

base2 = 80,

dista = 5,

bonus = 7,

type = "rock",

cd = 14

}

},

[94] = {x = {

nome = drowzee,

spell = "Confusion",

minLv = 20,

ex = 960003,

base1 = 40,

base2 = 80,

dista = 1,

bonus = 2,

type = "psychic",

target = "no",

cd = 12

}

},

[119] = {x = {

nome = hypno,

spell = "Psy Wave",

minLv = 20,

ex = 970003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 6,

target = "no",

type = "psychic",

cd = 15

}

},

[112] = {x = {

pok = krabby,

spell = "Bubble Beam",

minLv = 20,

ex = 980003,

base1 = 75,

base2 = 80,

dista = 5,

bonus = 5,

target = "no",

type = "water",

cd = 18

}

},

[245] = {x = {

pok = kingler,

spell = "Bubble Beam",

minLv = 20,

ex = 990003,

base1 = 200,

base2 = 210,

dista = 5,

bonus = 7,

target = "no",

type = "water",

cd = 18

}

},

[123] = {x = {

pok = voltorb,

spell = "******* Wave",

minLv = 1,

ex = 1010003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "*******",

cd = 15

}

},

[287] = {x = {

pok = voltorbroll,

spell = "******* Wave",

minLv = 1,

ex = 1010003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "*******",

cd = 15

}

},

[125] = {x = {

pok = electrode,

spell = "******* Wave",

minLv = 1,

ex = 1010003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "*******",

cd = 15

}

},

[286] = {x = {

pok = electroderoll,

spell = "******* Wave",

minLv = 1,

ex = 1010003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "*******",

cd = 15

}

},

[213] = {x = {

pok = Exeggcute,

spell = "Leech Seed",

minLv = 20,

ex = 1020003,

base1 = 20,

base2 = 30,

dista = 5,

bonus = 2,

type = "grass",

target = "no",

cd = 20

}

},

[46] = {x = {

pok = Exeggutor,

spell = "Leech Seed",

minLv = 80,

ex = 1030003,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 4,

type = "grass",

target = "no",

cd = 20

}

},

[198] = {x = {

pok = cubone,

spell = "Headbutt",

minLv = 55,

ex = 1040003,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 7

}

},

[197] = {x = {

pok = Marowak,

spell = "Bone Club",

minLv = 55,

ex = 1050003,

base1 = 155,

base2 = 165,

dista = 4,

bonus = 8,

type = "ground",

cd = 17

}

},

[20] = {x = {

pok = Hitmonlee,

spell = "Mega Kick",

minLv = 60,

ex = 1060003,

base1 = 60,

base2 = 70,

dista = 1,

bonus = 6,

type = "fighting",

cd = 7

}

},

[38] = {x = {

pok = Hitmonchan,

spell = "Fire Punch",

minLv = 60,

ex = 1070003,

base1 = 113,

base2 = 128,

dista = 1,

bonus = 5,

type = "fire",

cd = 20

}

},

[11] = {x = {

pok = Lickitung,

spell = "Doubleslap",

minLv = 55,

ex = 1080003,

base1 = 80,

base2 = 90,

dista = 1,

bonus = 7,

type = "normal",

cd = 6

}

},

[228] = {x = {

pok = Koffing,

spell = "Headbutt",

minLv = 15,

ex = 1090003,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 2.5,

type = "normal",

cd = 7

}

},

[231] = {x = {

pok = Weezing,

spell = "Headbutt",

minLv = 35,

ex = 1100003,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 6,

type = "normal",

cd = 7

}

},

[77] = {x = {

pok = Rhyhorn,

spell = "Stomp",

minLv = 30,

ex = 1110003,

base1 = 100,

base2 = 101,

dista = 50,

bonus = 4,

target = "no",

type = "earth",

cd = 17

}

},

[200] = {x = {

pok = Rhydon,

spell = "Rock Throw",

minLv = 75,

ex = 1120003,

base1 = 120,

base2 = 160,

dista = 5,

bonus = 7,

type = "rock",

cd = 14

}

},

[4] = {x = {

pok = Chansey,

spell = "Great Love",

minLv = 60,

ex = 1130003,

base1 = 110,

base2 = 190,

dista = 5,

bonus = 9,

type = "normal",

target = "no",

cd = 24

}

},

[18] = {x = {

pok = Tangela,

spell = "Vine Whip",

minLv = 50,

ex = 1140003,

base1 = 120,

base2 = 150,

target = "no",

dista = 2,

bonus = 7,

type = "grass",

cd = 19

}

},

[198] = {x = {

pok = Kangaskhan,

spell = "Headbutt",

minLv = 80,

ex = 1150003,

base1 = 80,

base2 = 95,

dista = 1,

bonus = 8,

type = "normal",

cd = 7

}

},

[33] = {x = {

spell = "Bubble Beam",

minLv = 12,

ex = 1160003,

base1 = 75,

base2 = 80,

dista = 5,

bonus = 5,

target = "no",

type = "water",

cd = 18

}

},

[276] = {x = {

spell = "Quick Attack",

minLv = 45,

ex = 1170003,

base1 = 191,

base2 = 210,

dista = 1,

bonus = 3,

type = "normal",

cd = 7

}

},

[274] = {x = {

pok = Goldeen,

spell = "Water gun",

minLv = 10,

ex = 1180003,

base1 = 45,

base2 = 50,

target = "no",

dista = 2,

bonus = 4,

type = "water",

cd = 19

}

},

[272] = {x = {

pok = Seaking,

spell = "Water Gun",

minLv = 35,

ex = 1190003,

base1 = 45,

base2 = 60,

target = "no",

dista = 2,

bonus = 7,

type = "water",

cd = 19

}

},

[42] = {x = {

pok = Staryu,

spell = "Bubbles",

minLv = 15,

ex = 1200003,

base1 = 60,

base2 = 75,

dista = 4,

bonus = 4,

type = "water",

cd = 8

}

},

[249] = {x = {

pok = Starmie,

spell = "Bubbles",

minLv = 35,

ex = 1210003,

base1 = 120,

base2 = 135,

dista = 4,

bonus = 6,

type = "water",

cd = 8

}

},

[246] = {x = {

pok = MrMime,

spell = "Psychic",

minLv = 1,

ex = 1220003,

base1 = 80,

base2 = 90,

dista = 5,

bonus = 8,

type = "psychic",

target = "no",

cd = 12

}

},

[15] = {x = {

pok = Scyther,

spell = "Wing Attack",

minLv = 60,

ex = 1230003,

base1 = 280,

base2 = 290,

dista = 1,

target = "no",

bonus = 8,

type = "flying",

cd = 22

}

},

[282] = {x = {

pok = Jynx,

spell = "Psy Wave",

minLv = 75,

ex = 1240003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "Psychic",

cd = 15

}

},

[281] = {x = {

pok = Electabuzz,

spell = "******* Shock",

minLv = 80,

ex = 1250003,

base1 = 80,

base2 = 120,

dista = 5,

bonus = 7,

type = "electric",

cd = 13

}

},

[76] = {x = {

pok = Magmar,

spell = "Ember",

minLv = 80,

ex = 1260003,

base1 = 220,

base2 = 235,

dista = 4,

bonus = 6,

type = "fire",

cd = 13

}

},

[53] = {x = {

pok = Pinsir,

spell = "Slash",

minLv = 45,

ex = 1270003,

base1 = 100,

base2 = 105,

dista = 1,

bonus = 7,

type = "ground",

cd = 13

}

},

[93] = {x = {

pok = Tauros,

spell = "Horn Attack",

minLv = 45,

ex = 1280003,

base1 = 75,

base2 = 100,

dista = 1,

bonus = 7,

type = "normal",

cd = 11

}

},

[117] = {x = {

pok = Gyarados,

spell = "Aqua Tail",

minLv = 95,

ex = 1300003,

base1 = 190,

base2 = 200,

dista = 4,

bonus = 6,

type = "water",

cd = 12

}

},

[193] = {x = {

pok = Lapras,

spell = "Ice Shards",

minLv = 80,

base1 = 250,

base2 = 251,

dista = 4,

bonus = 7.2,

type = "ice",

cd = 22

}

},

 

[102] = {x = {

pok = eevee,

spell = "Bite",

minLv = 20,

ex = 1330003,

base1 = 55,

base2 = 65,

dista = 1,

bonus = 5,

type = "normal",

cd = 9

}

},

[215] = {x = {

pok = Vaporeon,

spell = "Water Gun",

minLv = 55,

ex = 1340003,

base1 = 145,

base2 = 160,

target = "no",

dista = 2,

bonus = 10,

type = "water",

cd = 19

}

},

[195] = {x = {

pok = Jolteon,

spell = "*******bolt",

minLv = 55,

ex = 1350003,

base1 = 170,

base2 = 180,

target = "no",

dista = 2,

bonus = 10,

type = "electric",

cd = 19

}

},

[14] = {x = {

pok = Flareon,

spell = "Flamethrower",

minLv = 55,

ex = 1360003,

base1 = 270,

base2 = 281,

target = "no",

bonus = 10,

type = "fire",

cd = 30

}

},

[97] = {x = {

pok = Porygon,

spell = "Cyber Pulse",

minLv = 40,

ex = 1370002,

base1 = 435,

base2 = 445,

dista = 5,

bonus = 14,

type = "psychic",

target = "no",

cd = 32

}

},

[92] = {x = {

pok = Omanyte,

spell = "Waterball",

minLv = 20,

ex = 1380003,

base1 = 190,

base2 = 200,

dista = 4,

bonus = 5,

type = "water",

cd = 17

}

},

[192] = {x = {

pok = Omastar,

spell = "Waterball",

minLv = 80,

ex = 1390003,

base1 = 190,

base2 = 200,

dista = 4,

bonus = 7.5,

type = "water",

cd = 17

}

},

[98] = {x = {

pok = Kabuto,

spell = "Slash",

minLv = 20,

ex = 1400003,

base1 = 20,

base2 = 30,

dista = 2,

bonus = 4,

type = "normal",

cd = 7

}

},

[13] = {x = {

pok = Kabutops,

spell = "Slash",

minLv = 80,

ex = 1410003,

base1 = 120,

base2 = 135,

dista = 2,

bonus = 8,

type = "normal",

cd = 7

}

},

[10] = {x = {

pok = Aerodactyl,

spell = "Bite",

minLv = 110,

ex = 1410003,

base1 = 120,

base2 = 135,

dista = 2,

bonus = 7.5,

type = "normal",

cd = 8

}

},

[51] = {x = {

pok = Snorlax,

spell = "Dizzy Punch",

minLv = 85,

ex = 1430003,

base1 = 200,

base2 = 210,

dista = 1,

bonus = 8,

type = "fighting",

cd = 22

}

},

[283] = {x = {

pok = Articuno,

spell = "Ice Wave",

minLv = 110,

ex = 1440003,

base1 = 112,

base2 = 143,

dista = 5,

bonus = 8,

target = "no",

type = "ice",

cd = 15

}

},

[199] = {x = {

pok = Zapdos,

spell = "******* Wave",

minLv = 110,

ex = 1450003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8.5,

target = "no",

type = "*******",

cd = 15

}

},

[265] = {x = {

pok = Moltres,

spell = "Fire Wave",

minLv = 110,

ex = 1460003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 9,

target = "no",

type = "fire",

cd = 15

}

},

 

[58] = {x = {

pok = Dratini,

spell = "Hyper Beam",

minLv = 20,

ex = 1470003,

base1 = 45,

base2 = 60,

target = "no",

dista = 2,

bonus = 8,

type = "normal",

cd = 19

}

},

[61] = {x = {

pok = Dragonair,

spell = "******* Wave",

minLv = 60,

ex = 1480003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 5,

target = "no",

type = "*******",

cd = 15

}

},

[210] = {x = {

pok = Dragonite,

spell = "******* Wave",

minLv = 100,

ex = 1490003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "*******",

cd = 15

}

},

[34] = {x = {

pok = Mewtwo,

spell = "Fire Wave",

minLv = 85,

ex = 1500003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "fire",

cd = 15

}

},

[9] = {x = {

pok = Mew,

spell = "Ice Wave",

minLv = 85,

ex = 1510003,

base1 = 112,

base2 = 123,

dista = 5,

bonus = 8,

target = "no",

type = "ice",

cd = 15

}

},

}

 

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

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)

if getPlayerStorageValue(getCreatureSummons(cid)[1], 254) >= 1 then

num3 = num3 * 1.8

setPlayerStorageValue(getCreatureSummons(cid)[1], 254, 0)

end

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])..", "..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 == "Sand Attack" 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 sandattack(params)

if #getCreatureSummons(params.cid) >= 1 then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), params.ef)

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, y=posicao.y-1, z=posicao.z}, ef = 120})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, ef = 120})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, ef = 120})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, ef = 122})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, ef = 122})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, ef = 122})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, ef = 121})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, ef = 121})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, ef = 121})

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

addEvent(sandattack, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, ef = 119})

addEvent(sandattack, 400, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, ef = 119})

addEvent(sandattack, 800, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, ef = 119})

end

elseif pokemon.x.spell == "Bite" 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))), 146)

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])..", "..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 == "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)

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 == "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 == "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

-------------------------------------------------------------ADICIONADAS-----------------------------------------------------------------------

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

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)), 62)

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

---------------- 1AREA

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])..", "..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 == "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])..", "..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 == "Confusion" 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(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)

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])..", "..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]), glv, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 147)

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])..", "..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 == "Confusion" 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(getCreatureSummons(cid)[1]), confusion, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)

return 0

elseif pokemon.x.spell == "Night Shade" 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(getCreatureSummons(cid)[1]), ns, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 208)

return 0

-------2WAVES/BEAMS

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])..", "..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 == "Cyber Pulse" then

if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bmn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 108)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bms, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 109)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bme, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 107)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bmw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 106)

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 == "Shadow Punch" 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

area = vinen

dano = whipn

effect = 217

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

area = vinee

dano = whipe

effect = 215

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

area = vines

dano = whips

effect = 218

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

area = vinew

dano = whipw

effect = 216

end

doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), effect)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), dano, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255)

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 == "Ice Wave" 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]), tsn, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 43)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tse, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 43)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tss, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 43)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tsw, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 43)

end

return 0

elseif pokemon.x.spell == "Fire Wave" 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]), tsn, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 6)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tse, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 6)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tss, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 6)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tsw, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 6)

end

return 0

elseif pokemon.x.spell == "Bubble Beam" 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]), tsn, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bbn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tse, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bbe, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tss, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bbs, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tsw, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), bbw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68)

end

return 0

elseif pokemon.x.spell == "Psy Wave" 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]), tsn, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wsn, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tse, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wse, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tss, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wss, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tsw, *******wavecondition, 255)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wsw, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 133)

end

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])..", "..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

elseif pokemon.x.spell == "Vine Whip" 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

area = vinen

dano = whipn

effect = 80

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then

area = vinee

dano = whipe

effect = 83

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then

area = vines

dano = whips

effect = 81

elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then

area = vinew

dano = whipw

effect = 82

end

doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), effect)

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), dano, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255)

return 0

--------3SUPORTE

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

---------4NORMAL

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])..", "..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 confd(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(confd, 1000*i, {cid = cid, t = t})

end

addEvent(nonc, 7100, {cid - cid, t = t})

return 0

elseif pokemon.x.spell == "Doubleslap" 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 slap(params)

if isMonster(getCreatureTarget(params.cid)) then

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)

else

end

end

addEvent(slap, 0, {cid = cid})

addEvent(slap, 600, {cid = cid})

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])..", "..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 == "Shadow Punch" 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))), 48)

return 0

elseif pokemon.x.spell == "Clamp" 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))), 3)

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])..", "..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))), 160)

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])..", "..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))), 160)

return 0

elseif pokemon.x.spell == "Quick Attack" 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))), 3)

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])..", "..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))), 160)

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])..", "..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 == "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])..", "..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

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])..", "..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 == "Ice Shards" 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(getCreatureSummons(cid)[1]), is, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 52)

return 0

---------5DISTANCE

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])..", "..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

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

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))), 15)

return 0

elseif pokemon.x.spell == "Sing" 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 mudalvo = getCreatureTarget(cid)

local function ver(params)

if isCreature(params.mudalvo) then

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

setPlayerStorageValue(params.mudalvo, 3, -1)

doChangeSpeed(mudalvo, -(getCreatureSpeed(mudalvo)/3))

doSendMagicEffect(getThingPos(mudalvo), 31)

end

end

end

local function voltar(params)

if isCreature(params.mudalvo) then

doChangeSpeed(params.mudalvo, -getCreatureSpeed(params.mudalvo))

doChangeSpeed(params.mudalvo, getCreatureBaseSpeed(params.mudalvo))

end

end

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

addEvent(voltar, 10000, {mudalvo = mudalvo})

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 19)

return 0

elseif pokemon.x.spell == "******* Shock" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)

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 == "*******bolt" 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 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 == "Bubbles" 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)), 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))), 25)

else

end

end

addEvent(throw, 0, {cid = cid})

addEvent(damage, 0, {cid = cid})

return 0

elseif pokemon.x.spell == "Poison Sting" 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)

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 == "Karate Chop" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 112)

return 0

elseif pokemon.x.spell == "Poison Sting" 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)

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 == "Ember" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 15)

return 0

-------6EFEITOS

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])..", "..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 confd(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(confd, 1000*i, {cid = cid, t = t})

end

addEvent(nonc, 7100, {cid - cid, t = t})

return 0

 

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

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

-------------------------------------------------------------ADICIONADAS-----------------------------------------------------------------------

elseif pokemon.x.spell == "Bone Club" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 117)

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 == "*******shock" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48)

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])..", "..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 == "Psy Pulse" 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)

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)

return 0

elseif pokemon.x.spell == "******* Wave" 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]), tsn, *******wavecondition, 255)

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

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tse, *******wavecondition, 255)

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

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tss, *******wavecondition, 255)

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

doAreaCombatCondition(getCreatureSummons(cid)[1], getThingPos(getCreatureSummons(cid)[1]), tsw, *******wavecondition, 255)

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])..", "..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 == "Sludge" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 116)

return 0

elseif pokemon.x.spell == "Poison Sting" 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)

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 == "Bug Bite" 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))), 3)

return 0

elseif pokemon.x.spell == "Pin Missile" 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)

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

doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 3)

return 0

elseif pokemon.x.spell == "Rock Slide" 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 posalvo = getThingPos(getCreatureTarget(cid))

local boltalvo = getCreatureTarget(cid)

posalvo.x = posalvo.x-2

posalvo.y = posalvo.y-6

doSendDistanceShoot(posalvo, getThingPos(getCreatureTarget(cid)), 11)

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))), 44)

end

end

end

end

addEvent(bolt, 200, {cid = cid, boltalvo = boltalvo})

return 0

elseif pokemon.x.spell == "Fury Attack" 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 namezito = getCreatureName(getCreatureSummons(cid)[1])

local namezin = getCreatureName(getCreatureTarget(cid))

local function pee(params)

if isCreature(getCreatureSummons(params.cid)[1]) then

if isCreature(getCreatureTarget(params.cid)) then

if getCreatureName(getCreatureSummons(params.cid)[1]) == namezito then

if getCreatureName(getCreatureTarget(params.cid)) == namezin then

doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 15)

doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(params.cid)), 0, -((num1)+(getPlayerLevel(params.cid)*(num3))), -((num2)+(getPlayerLevel(params.cid)*(num3))), 3)

end

end

end

end

end

local delay = 200

randnee = math.random(1,100)

if randnee >= 1 and randnee <= 37 then

a = 2

elseif randnee >= 38 and randnee <= 74 then

a = 3

elseif randnee >= 75 and randnee <= 88 then

a = 4

else

a = 5

end

local times = a

for i = 1,a do

addEvent(pee, delay, {cid = cid})

delay = delay + 600

end

local function msg(params)

if #getCreatureSummons(params.cid) >= 1 then

doSendAnimatedText(getThingPos(getCreatureSummons(params.cid)[1]), ""..times.." HITS", 35)

end

end

addEvent(msg, 580*a, {cid = cid})

return 0

end

return 0

end