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