pok302010

ei gaelera eu to com um problema no meu server tem veses que ele da um erro no surf.lua e fica dando direto... quando ele esta dando fica muito lag no server e não da pra jogar!ajuda ae galera. ta ae o erro: [01/03/2011 22:18:40] [Error - MoveEvents Interface] [01/03/2011 22:18:40] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:18:40] Description: [01/03/2011 22:18:40] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:19:35] > Broadcasted message: "Full server salvando dentro de 120 segundos, por favor tente ficar parado!". [01/03/2011 22:19:46] > Broadcasted message: "Full server salvando dentro de 30 segundos, por favor tente ficar parado!". [01/03/2011 22:19:50] > Saving server... [01/03/2011 22:19:50] > SAVE: Complete in 0.234 seconds using relational house storage. [01/03/2011 22:20:05] [Error - MoveEvents Interface] [01/03/2011 22:20:05] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:20:05] Description: [01/03/2011 22:20:05] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:20:06] [Error - MoveEvents Interface] [01/03/2011 22:20:06] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:20:06] Description: [01/03/2011 22:20:06] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:20:07] [Error - MoveEvents Interface] [01/03/2011 22:20:07] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:20:07] Description: [01/03/2011 22:20:07] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:20:08] [Error - MoveEvents Interface] [01/03/2011 22:20:08] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:20:08] Description: [01/03/2011 22:20:08] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:20:09] [Error - MoveEvents Interface] [01/03/2011 22:20:09] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:20:09] Description: [01/03/2011 22:20:09] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:21:50] [Error - MoveEvents Interface] [01/03/2011 22:21:50] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:21:50] Description: [01/03/2011 22:21:50] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:02] [Error - MoveEvents Interface] [01/03/2011 22:22:02] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:02] Description: [01/03/2011 22:22:02] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:03] [Error - MoveEvents Interface] [01/03/2011 22:22:03] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:03] Description: [01/03/2011 22:22:03] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:05] [Error - MoveEvents Interface] [01/03/2011 22:22:05] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:05] Description: [01/03/2011 22:22:05] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:06] [Error - MoveEvents Interface] [01/03/2011 22:22:06] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:06] Description: [01/03/2011 22:22:06] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:06] [Error - MoveEvents Interface] [01/03/2011 22:22:06] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:06] Description: [01/03/2011 22:22:06] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:07] [Error - MoveEvents Interface] [01/03/2011 22:22:07] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:07] Description: [01/03/2011 22:22:07] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:07] [Error - MoveEvents Interface] [01/03/2011 22:22:07] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:07] Description: [01/03/2011 22:22:07] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:08] [Error - MoveEvents Interface] [01/03/2011 22:22:08] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:08] Description: [01/03/2011 22:22:08] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:11] [Error - MoveEvents Interface] [01/03/2011 22:22:11] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:11] Description: [01/03/2011 22:22:11] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:14] [Error - MoveEvents Interface] [01/03/2011 22:22:14] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:14] Description: [01/03/2011 22:22:14] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:17] [Error - MoveEvents Interface] [01/03/2011 22:22:17] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:17] Description: [01/03/2011 22:22:17] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:20] [Error - MoveEvents Interface] [01/03/2011 22:22:20] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:20] Description: [01/03/2011 22:22:20] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:30] [Error - MoveEvents Interface] [01/03/2011 22:22:30] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:30] Description: [01/03/2011 22:22:30] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:31] [Error - MoveEvents Interface] [01/03/2011 22:22:31] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:31] Description: [01/03/2011 22:22:31] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:32] [Error - MoveEvents Interface] [01/03/2011 22:22:32] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:32] Description: [01/03/2011 22:22:32] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:33] [Error - MoveEvents Interface] [01/03/2011 22:22:33] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:33] Description: [01/03/2011 22:22:33] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:52] [Error - MoveEvents Interface] [01/03/2011 22:22:52] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:52] Description: [01/03/2011 22:22:52] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:52] [Error - MoveEvents Interface] [01/03/2011 22:22:52] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:52] Description: [01/03/2011 22:22:52] (luaDoPlayerSendCancel) Player not found [01/03/2011 22:22:53] [Error - MoveEvents Interface] [01/03/2011 22:22:53] data/movements/scripts/surf.lua:onStepIn [01/03/2011 22:22:53] Description: [01/03/2011 22:22:53] (luaDoPlayerSendCancel) Player not found

desculpa aee galera! mais alguem pode me ajudar?

Ae galera eu queria saber se algum ai pode postar como fazer um NPC que pinta as pokebolas porque eu queria colocar no meu server alguem pode me dar? VLWW

aee galera alguem ai sabe por que o O order não esta pegando no meu serve?quando vc usa com qualquer pokemon ele da a segunte mensangen:"Please wait a few seconds before using order again!". sempre, eu já tentei fazer de tudo que eu sei tipo:perdir para o player reiniciar o PC,eu reiniciar o server... E não é so na ksa dele não... eu loggei com a acc dele na minha ksa e tbm não pegou alguem pode me ajudar? Obrigado ! ------------------------------------------- galera num precisa mai não ^^ resouvi sosinho

ok vlw galera ^^

O host já vem com internet propria ou tenque pagar a net por fora?

e como eu vejo essa "area de trabalho remota"? é algum progama,ou é pelo navegador da internet?

Bom gente eu tenho um server de poke-tibia e vou assinar um serviço de semi-dedicado para deixar meu server 24hrs. Minha duvida é de como eu vou administar meu server... Tipo:Mudar o mapa,se ocorrer o descobrimento de um bug eu consertar...Essas coisas. E o site?Como vai ficar?O atual site do meu server é pelo xampp tem o ":8090" no final tambem vou poder fazer o mesmo tipo de site quando eu assinar host?Posso deixar o server com o mesmo site so que sendo ele ".com"? E as accounts?Vão ficar?ou irão ser apagadas? PorFavor me tirem essas duvidas! VLWWWW

vlw funfo sertin^^ Rep++

e como faz isso? ajuda ae vei

os meus playes so vão ter direito a Lost account se for da Gmail?

vlw vei*-* REP++

galera so meu server de poke-tibia o atake dos podemos pisquicos abra,kadabra e alacazam estão bugados! o player pode usar quantas veses quiser! alguem me ajuda? vlw script: local nao = {'4820', '4821', '4822', '4823', '4824', '4825', '1395', '1389', '1391', '1393', '460'} local imp = {'919', '4468', '4469', '4470', '4471', '4472', '4473', '4474', '4475', '4476', '4477', '4478', '4479', '4480', '4481', '4482', '4483', '4484', '4485', '4486', '4487', '4488', '4489', '4490', '4491', '4492', '4493', '4494', '4495', '4496', '4497', '4498', '4499', '4500', '4501', '4502', '4503', '4504', '4505', '4506', '4507', '4508', '4509', '4510', '4511', '4512', '4513', '4826', '4827', '873', '874', '875', '876', '877', '878', '903', '904', '905', '906', '907', '908', '909', '910', '911', '912', '913'} 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 rollout = createCombatArea{ {1, 1, 1}, {1, 2, 1}, {1, 1, 1}, } local golem = {lookType = 288} local sandslash = {lookType = 285} local sandshrew = {lookType = 284} local electrode = {lookType = 286} local voltorb = {lookType = 287} -- 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 vinen = createCombatArea{ {0, 0, 0}, {0, 0, 0}, {0, 2, 0}, {1, 0, 0} } local vines = createCombatArea{ {0, 0, 0}, {1, 0, 0}, {0, 0, 0}, {0, 2, 0} } local vinee = createCombatArea{ {0, 0, 0}, {1, 0, 0}, {0, 0, 2}, {0, 0, 0} } local vinew = createCombatArea{ {0, 0, 0}, {0, 0, 3}, {0, 2, 0}, {0, 0, 0} } local whipn = createCombatArea{ {0, 0, 0}, {0, 2, 0}, {1, 1, 1}, {1, 1, 1} } local whips = createCombatArea{ {1, 1, 1}, {1, 1, 1}, {0, 2, 0}, {0, 0, 0} } local whipe = createCombatArea{ {1, 1, 0}, {1, 1, 2}, {1, 1, 0}, {0, 0, 0} } local whipw = createCombatArea{ {0, 1, 1}, {2, 1, 1}, {0, 1, 1}, {0, 0, 0} } local 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 pokeis = {'Pidgey', 'Pidgeotto', 'Pidgeot', 'Rattata', 'Raticate', 'Golbat', 'Bellsprout', 'Weepinbell', 'Victreebel', 'Poliwag', 'Poliwhirl', 'Poliwrath', 'Abra', 'Gloom', 'Vileplume', 'Horsea', 'Seadra', 'Grimer', 'Muk', 'Kakuna', 'Beedrill', 'Zubat', 'Magnemite', 'Magneton', 'Voltorb', 'Electrode', 'Geodude', 'Graveler', 'Golem', 'Sandshrew', 'Sandslash', 'Charmander', 'Charmeleon', 'Charizard', 'Kadabra', 'Alakazam'} local c = { [30] = {x = { pok = pidgey, spell = "Gust", minLv = 12, ex = 1600004, base1 = 40, base2 = 50, dista = 50, bonus = 4, target = "no", type = "flying", cd = 15 } }, [5] = {x = { pok = pidgeotto, spell = "Whirlwind", minLv = 22, ex = 1700004, base1 = 100, base2 = 101, dista = 50, bonus = 4, target = "no", type = "flying", cd = 17 } }, [80] = {x = { pok = pidgeot, spell = "Whirlwind", minLv = 65, ex = 1800004, base1 = 200, base2 = 210, dista = 4, target = "no", bonus = 5.5, type = "flying", cd = 17 } }, [36] = {x = { pok = rattata, spell = "Hyper Fang", minLv = 11, ex = 1900004, base1 = 40, base2 = 50, dista = 1, bonus = 4, type = "normal", cd = 19 } }, [69] = {x = { pok = raticate, spell = "Hyper Fang", minLv = 23, ex = 2000004, base1 = 150, base2 = 160, dista = 1, bonus = 5, type = "normal", cd = 19 } }, [122] = {x = { pok = golbat, spell = "Whirlwind", minLv = 32, ex = 4200004, base1 = 200, base2 = 220, dista = 4, target = "no", bonus = 50, type = "flying", cd = 20 } }, [250] = {x = { pok = bellsprout, spell = "Vine Whip", minLv = 12, ex = 6900004, base1 = 50, base2 = 60, dista = 2, target = "no", bonus = 3.5, type = "grass", cd = 19 } }, [37] = {x = { pok = weepinbell, spell = "Vine Whip", minLv = 20, ex = 7000004, base1 = 120, base2 = 150, target = "no", dista = 2, bonus = 4.5, type = "grass", cd = 19 } }, [240] = {x = { pok = bictreebel, spell = "Vine Whip", minLv = 50, ex = 7100004, base1 = 230, base2 = 280, dista = 2, target = "no", bonus = 6.5, type = "grass", cd = 19 } }, [111] = {x = { pok = poliwag, spell = "Water Gun", minLv = 13, ex = 6000004, base1 = 45, base2 = 50, target = "no", dista = 2, bonus = 4, type = "water", cd = 19 } }, [212] = {x = { pok = poliwhirl, spell = "Water Gun", minLv = 25, ex = 6100004, base1 = 185, target = "no", base2 = 200, dista = 2, bonus = 5, type = "water", cd = 19 } }, [104] = {x = { pok = poliwrath, spell = "Water Gun", minLv = 25, ex = 6200004, base1 = 685, base2 = 700, dista = 2, bonus = 6, target = "no", type = "water", cd = 19 } }, [262] = {x = { pok = abra, spell = "Psycho Shift", minLv = 24, ex = 6300004, base1 = 115, base2 = 120, dista = 10, bonus = 5, type = "psychic", cd = 24 } }, [219] = {x = { pok = kadaabra, spell = "Psycho Shift", minLv = 1, ex = 6400004, base1 = 235, base2 = 245, dista = 10, bonus = 7, type = "psychic", cd = 24 } }, [218] = {x = { pok = alakazam, spell = "Psycho Shift", minLv = 1, ex = 6500004, base1 = 335, base2 = 345, dista = 10, bonus = 10, type = "psychic", cd = 24 } }, [74] = {x = { pk = gloom, spell = "Poison Bomb", minLv = 22, ex = 4400004, base1 = 101, base2 = 103, dista = 4, bonus = 5, type = "poison", cd = 25 } }, [86] = {x = { pok = vileplume, spell = "Poison Bomb", minLv = 50, ex = 4500004, base1 = 200, base2 = 201, dista = 4, bonus = 6, type = "poison", cd = 25 } }, [33] = {x = { pok = horsea, spell = "Waterball", minLv = 16, ex = 1160004, base1 = 50, base2 = 60, dista = 4, bonus = 4.7, type = "water", cd = 17 } }, [276] = {x = { pok = seadra, spell = "Waterball", minLv = 46, ex = 1170004, base1 = 190, base2 = 200, dista = 4, bonus = 5.7, type = "water", cd = 17 } }, [214] = {x = { pok = grimer, spell = "Poison Bomb", minLv = 16, ex = 8800004, base1 = 85, base2 = 92, dista = 4, bonus = 6, type = "poison", cd = 17 } }, [47] = {x = { pok = muk, spell = "Poison Bomb", minLv = 32, ex = 8900004, base1 = 285, base2 = 292, dista = 4, bonus = 6, type = "poison", cd = 17 } }, [60] = {x = { pok = kakuna, spell = "Harden", minLv = 10, ex = 1400004, lpl = 32, life = 900, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [45] = {x = { pok = beedrill, spell = "Toxic Needle", minLv = 32, ex = 1500004, base1 = 100, base2 = 110, dista = 4, bonus = 5, type = "poison", cd = 16 } }, [44] = {x = { pok = zubat, spell = "Super Sonic", minLv = 11, ex = 4100004, base1 = 0, base2 = 0, dista = 4, bonus = 0, type = "normal", cd = 16 } }, [217] = {x = { pok = magnemite, spell = "Thunderbolt", minLv = 17, ex = 8100004, base1 = 65, base2 = 85, dista = 5, bonus = 5.4, type = "electric", cd = 18 } }, [223] = {x = { pok = magneton, spell = "Thunderbolt", minLv = 1, ex = 8200004, base1 = 160, base2 = 180, dista = 5, bonus = 7, type = "electric", cd = 18 } }, [123] = {x = { pok = voltorb, spell = "Rollout", minLv = 17, ex = 1000004, base1 = 30, base2 = 31, dista = 2, target = "no", bonus = 0.4, type = "ground", cd = 33 } }, [287] = {x = { pok = voltorb, spell = "Rollout", minLv = 17, ex = 1000004, base1 = 20, base2 = 21, dista = 2, target = "no", bonus = 0.5, type = "ground", cd = 33 } }, [125] = {x = { pok = electrode, spell = "Rollout", minLv = 39, ex = 1010004, base1 = 45, base2 = 46, dista = 2, target = "no", bonus = 1, type = "ground", cd = 33 } }, [286] = {x = { pok = electroderoll, spell = "Rollout", minLv = 39, ex = 1010004, base1 = 45, base2 = 46, dista = 2, target = "no", bonus = 1, type = "ground", cd = 33 } }, [196] = {x = { pok = Geodude, spell = "Harden", minLv = 17, ex = 7400004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [247] = {x = { pok = Graveler, spell = "Harden", minLv = 17, ex = 7500004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [116] = {x = { pok = Golem, spell = "Harden", minLv = 17, ex = 7600004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [288] = {x = { pok = Golem, spell = "Harden", minLv = 17, ex = 7600004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [43] = {x = { pok = sandshrew, spell = "Rollout", minLv = 1, ex = 2700004, base1 = 40, base2 = 41, dista = 1, target = "no", bonus = 0.6, type = "ground", cd = 28 } }, [284] = {x = { pok = sandshrew, spell = "Rollout", minLv = 1, ex = 2700004, base1 = 40, base2 = 41, dista = 1, target = "no", bonus = 0.6, type = "ground", cd = 28 } }, [115] = {x = { pok = sandslash, spell = "Rollout", minLv = 57, ex = 2800004, base1 = 60, base2 = 61, dista = 1, target = "no", bonus = 1.6, type = "ground", cd = 28 } }, [285] = {x = { pok = sandslash, spell = "Rollout", minLv = 57, ex = 2800004, base1 = 60, base2 = 61, dista = 1, target = "no", bonus = 1.6, type = "ground", cd = 28 } }, [29] = {x = { pok = charmander, spell = "Fireball", minLv = 22, ex = 400004, base1 = 100, base2 = 101, dista = 4, bonus = 4.6, type = "fire", cd = 22 } }, [23] = {x = { pok = charmeleon, spell = "Fireball", minLv = 22, ex = 500004, base1 = 150, base2 = 151, dista = 4, bonus = 5.4, type = "fire", cd = 22 } }, [67] = {x = { pok = charizard, spell = "Fireball", minLv = 22, ex = 600004, base1 = 250, base2 = 251, dista = 4, bonus = 7.4, type = "fire", cd = 22 } }, } function onSay(cid) if #getCreatureSummons(cid) == 0 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to moves.") return 0 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 this move.") return 0 end if exhaustion.get(cid, pokemon.x.ex) then seconds = math.floor(((exhaustion.get(cid, pokemon.x.ex)) + 1)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..seconds.." seconds to this move again.") return 0 end if getPlayerStorageValue(getCreatureSummons(cid)[1], 3) >= 1 then doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "MISS", 215) setPlayerStorageValue(getCreatureSummons(cid)[1], 3, -1) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) return true end if getPlayerStorageValue(getCreatureSummons(cid)[1], 5) >= 1 then if math.random(1,100) <= 33 then doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "SELF HIT", 180) local levels = getPlayerLevel(cid) doTargetCombatHealth(cid, getCreatureSummons(cid)[1], COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) return true end end if pokemon.x.target ~= "no" then if not isMonster(getCreatureTarget(cid)) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.") return 0 end if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > pokemon.x.dista then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to this move.") return 0 end if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then return 0 end end if pokemon.x.type == "flying" then elementa = FLYDAMAGE elseif pokemon.x.type == "ground" then elementa = GROUNDDAMAGE elseif pokemon.x.type == "electric" then elementa = ELECTRICDAMAGE elseif pokemon.x.type == "ghost" then elementa = GHOSTDAMAGE elseif pokemon.x.type == "normal" then elementa = NORMALDAMAGE elseif pokemon.x.type == "fighting" then elementa = FIGHTINGDAMAGE elseif pokemon.x.type == "poison" then elementa = POISONDAMAGE elseif pokemon.x.type == "rock" then elementa = ROCKDAMAGE elseif pokemon.x.type == "bug" then elementa = BUGDAMAGE elseif pokemon.x.type == "fire" then elementa = FIREDAMAGE elseif pokemon.x.type == "water" then elementa = WATERDAMAGE elseif pokemon.x.type == "grass" then elementa = GRASSDAMAGE elseif pokemon.x.type == "psychic" then elementa = PSYCHICDAMAGE elseif pokemon.x.type == "ice" then elementa = ICEDAMAGE elseif pokemon.x.type == "dragon" then elementa = DRAGONDAMAGE end local element = elementa local num1 = (pokemon.x.base1) local num2 = (pokemon.x.base2) local num3 = (pokemon.x.bonus) if getPlayerStorageValue(getCreatureSummons(cid)[1], 254) >= 1 then num3 = num3 * 1.8 setPlayerStorageValue(getCreatureSummons(cid)[1], 254, 0) end setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3)))) if pokemon.x.spell == "Water Gun" then if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73) end doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) return 0 elseif pokemon.x.spell == "Gust" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) posit = getThingPos(getCreatureSummons(cid)[1]) local function gust(params) if #getCreatureSummons(params.cid) >= 1 then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42) else end end local posicao = getThingPos(getCreatureSummons(cid)[1]) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}}) end return 0 elseif pokemon.x.spell == "Whirlwind" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) posit = getThingPos(getCreatureSummons(cid)[1]) local function gust(params) if #getCreatureSummons(params.cid) >= 1 then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, 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 == "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])..", "..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 == "Rollout" 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 getCreatureName(getCreatureSummons(cid)[1]) == "Voltorb" then doSetCreatureOutfit(getCreatureSummons(cid)[1], voltorb, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 85) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Electrode" then doSetCreatureOutfit(getCreatureSummons(cid)[1], electrode, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 101) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Sandshrew" then doSetCreatureOutfit(getCreatureSummons(cid)[1], sandshrew, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 93) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Sandslash" then doSetCreatureOutfit(getCreatureSummons(cid)[1], sandslash, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 143) end setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1) local function roll(params) if isCreature(params.cid) then if isCreature(getCreatureSummons(params.cid)[1]) then if getCreatureCondition(getCreatureSummons(params.cid)[1], CONDITION_OUTFIT) == true then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), rollout, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255) end end end end for r = 1, 8 do addEvent(roll, 1000*r, {cid = cid}) end local function stoproll(params) if isCreature(params.cid) then if isCreature(getCreatureSummons(params.cid)[1]) then doChangeSpeed(getCreatureSummons(params.cid)[1], -101) if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, 0) end end end end addEvent(stoproll, 8300, {cid = cid}) return 0 elseif pokemon.x.spell == "Vine Whip" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then area = vinen dano = whipn effect = 80 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then area = vinee dano = whipe effect = 83 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then area = vines dano = whips effect = 81 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then area = vinew dano = whipw effect = 82 end doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), effect) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), dano, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255) return 0 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])..", "..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 == "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 == "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])..", "..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 == "Waterball" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) local function throw(params) if isMonster(getCreatureTarget(params.cid)) then doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 2) else end end local function damage(params) if isMonster(getCreatureTarget(params.cid)) then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68) else end end addEvent(damage, 100, {cid = cid}) addEvent(throw, 0, {cid = cid}) return 0 elseif pokemon.x.spell == "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))), 5) else end end addEvent(damage, 100, {cid = cid}) addEvent(throw, 0, {cid = cid}) 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 == "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])..", "..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])..", "..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 == "Super Sonic" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) local t = getCreatureTarget(cid) setPlayerStorageValue(t, 5, 1) local function confd(params) if isCreature(params.t) then local spdc = getCreatureSpeed(params.t) if getCreatureLookDir(params.t) == 0 then confs = math.random(1,3) elseif getCreatureLookDir(params.t) == 1 then confurandom = math.random(1,99) if confurandom <= 33 then confs = 0 elseif confurandom >= 67 then confs = 2 else confs = 3 end elseif getCreatureLookDir(params.t) == 2 then confurandom = math.random(1,99) if confurandom <= 33 then confs = 3 elseif confurandom >= 67 then confs = 0 else confs = 1 end elseif getCreatureLookDir(params.t) == 3 then confs = math.random(0,2) end doPushCreature(params.t, confs, 1, 0) doSendMagicEffect(getThingPos(params.t), 31) end end local function nonc(params) if isCreature(params.t) then doChangeSpeed(params.t, -getCreatureSpeed(params.t)) doChangeSpeed(params.t, getCreatureBaseSpeed(params.t)) setPlayerStorageValue(params.t, 5, -1) end end doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 32) doChangeSpeed(t, -( getCreatureSpeed(t)/3)) doSendMagicEffect(getThingPos(t), 31) for i = 1, math.random(6,7) do addEvent(confd, 1000*i, {cid = cid, t = t}) end addEvent(nonc, 7100, {cid - cid, t = t}) return 0 end return 0 end

ae galera eu tenho um server de poke-tibia e eu vou vender pokemons e lvl e squil de fishing ai eu vou fazer assim: as pessoas compram points pelo pag seguro e se quiserem comprar 10lvl(= 10points=10reis)ai eu fasso oq a pesso quer e pede e depois retiro os points da acc dele e pronto^^ tudo serto alguem pode me ajudaR?

vlw ^^ funfo sertin:D REP++ ------------------------------------- edit: depois do lvl 25 num pesca mais nenhum pokemon --' nem da kra ajuda aee

desculpe eu me esquece >P ta aee: function onUse(cid, item, fromPos, itemEx, toPos) d1 = { [0] = {pokemon = 'Magikarp s'}, } d2 = { [0] = {pokemon = 'Magikarp s'}, [1] = {pokemon = 'Poliwag s'}, } d3 = { [0] = {pokemon = 'Magikarp s'}, [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, } d4 = { [0] = {pokemon = 'Magikarp s'}, [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Krabby s'}, } d5 = { [0] = {pokemon = 'Magikarp s'}, [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, } d6 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, } d7 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, } d8 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, } d9 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, [8] = {pokemon = 'Staryu s'}, } d10 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, [8] = {pokemon = 'Staryu s'}, [9] = {pokemon = 'Kingler s'}, } d11 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, [8] = {pokemon = 'Staryu s'}, [9] = {pokemon = 'Kingler s'}, [10] = {pokemon = 'Seadra s'}, } d12 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, [8] = {pokemon = 'Staryu s'}, [9] = {pokemon = 'Kingler s'}, [10] = {pokemon = 'Seadra s'}, [11] = {pokemon = 'Starmie s'}, } d13 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, [8] = {pokemon = 'Staryu s'}, [9] = {pokemon = 'Kingler s'}, [10] = {pokemon = 'Seadra s'}, [11] = {pokemon = 'Starmie s'}, [12] = {pokemon = 'Squirtle s'}, } d14 = { [1] = {pokemon = 'Horsea s'}, [2] = {pokemon = 'Poliwag s'}, [3] = {pokemon = 'Goldeen s'}, [4] = {pokemon = 'Krabby s'}, [5] = {pokemon = 'Tentacool s'}, [6] = {pokemon = 'Poliwhirl s'}, [7] = {pokemon = 'Seaking s'}, [8] = {pokemon = 'Staryu s'}, [9] = {pokemon = 'Kingler s'}, [10] = {pokemon = 'Seadra s'}, [11] = {pokemon = 'Starmie s'}, [12] = {pokemon = 'Squirtle s'}, [13] = {pokemon = 'Gyarados s'}, } local config = { waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}, } local water = {'4820', '4821', '4822', '4823', '4824', '4825'} local skill = getPlayerSkillLevel(cid, 6) local removed = doCreateItem(1285, 1, getThingPos(cid)) local playerpos = getClosestFreeTile(cid, getThingPos(cid)) doRemoveItem(removed, 1) if isInArray(water, getTileInfo(getThingPos(cid)).itemid) then doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.") return true end if getPlayerSkillLevel(cid, 6) <= 11 then doPlayerAddSkillTry(cid, 6, 1) end if(isInArray(config.waters, itemEx.itemid)) then doSendMagicEffect(toPos, CONST_ME_LOSEENERGY) if skill == 23 then local random = math.random(1, 100) if random <= 45 then doSummonCreature(d14[math.random(0,13)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 22 then local random = math.random(1, 100) if random <= 45 then doSummonCreature(d13[math.random(0,12)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 21 then local random = math.random(1, 100) if random <= 45 then doSummonCreature(d12[math.random(0,11)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 20 then local random = math.random(1, 100) if random <= 45 then doSummonCreature(d11[math.random(0,10)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 19 then local random = math.random(1, 100) if random <= 45 then doSummonCreature(d10[math.random(0,9)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 18 then local random = math.random(1, 100) if random <= 45 then doSummonCreature(d9[math.random(0,8)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 17 then local random = math.random(1, 100) if random <= 35 then doSummonCreature(d8[math.random(0,7)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 16 then local random = math.random(1, 100) if random <= 35 then doSummonCreature(d7[math.random(0,6)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 15 then local random = math.random(1, 100) if random <= 35 then doSummonCreature(d6[math.random(0,5)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 14 then local random = math.random(1, 100) if random <= 35 then doSummonCreature(d5[math.random(0,4)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 13 then local random = math.random(1, 100) if random <= 35 then doSummonCreature(d4[math.random(0,3)].pokemon, playerpos) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) end return true end else if skill == 12 then local random = math.random(1, 100) if random <= 35 then local peixe = doSummonCreature(d3[math.random(0,2)].pokemon, playerpos) if not isCreature(peixe) then return true end if #getCreatureSummons(cid) >= 1 then doChallengeCreature(getCreatureSummons(cid)[1], peixe) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) doChallengeCreature(cid, peixe) end return true end else if skill == 11 then local random = math.random(1, 100) if random <= 35 then local peixe = doSummonCreature(d2[math.random(0,1)].pokemon, playerpos) if not isCreature(peixe) then return true end if #getCreatureSummons(cid) >= 1 then doChallengeCreature(getCreatureSummons(cid)[1], peixe) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) doChallengeCreature(cid, peixe) end return true end else if skill == 10 then local random = math.random(1, 100) if random <= 35 then local peixe = doSummonCreature(d1[0].pokemon, playerpos) if not isCreature(peixe) then return true end if #getCreatureSummons(cid) >= 1 then doChallengeCreature(getCreatureSummons(cid)[1], peixe) doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) else doSendMagicEffect(getThingPos(cid), 173) doChallengeCreature(cid, peixe) end return true end return true end return true end return true end end end end end end end end end end end end end return true end vou testar se funfar dou REP++ ------------------------------------------------ Edit. nem funfo vei

aee galer como dizo título do topico a skil fishing do meu server so vai até o lvl 12... porque? tem como ageitar? me ajuda aee galera ^^

kra muito boa é muito legal ^^ eu escuto todo dia ^^

eiii é para colocar o: CREATE TABLE `retorno_automatico` ( `TransacaoID` varchar(36) NOT NULL, `VendedorEmail` varchar(200) NOT NULL, `Referencia` varchar(200) default NULL, `TipoFrete` char(2) default NULL, `ValorFrete` decimal(10,2) default NULL, `Extras` decimal(10,2) default NULL, `Anotacao` text, `TipoPagamento` varchar(50) NOT NULL, `StatusTransacao` varchar(50) NOT NULL, `CliNome` varchar(200) NOT NULL, `CliEmail` varchar(200) NOT NULL, `CliEndereco` varchar(200) NOT NULL, `CliNumero` varchar(10) default NULL, `CliComplemento` varchar(100) default NULL, `CliBairro` varchar(100) NOT NULL, `CliCidade` varchar(100) NOT NULL, `CliEstado` char(2) NOT NULL, `CliCEP` varchar(9) NOT NULL, `CliTelefone` varchar(14) default NULL, `NumItens` int(11) NOT NULL, `Data` datetime NOT NULL, `status` tinyint(1) unsigned NOT NULL default '0', UNIQUE KEY `TransacaoID` (`TransacaoID`,`StatusTransacao`), KEY `Referencia` (`Referencia`), KEY `status` (`status`) ) ENGINE=MyISAM DEFAULT CHARSET=latin1; e o: CREATE TABLE `PagSeguroTransacoes` ( `TransacaoID` varchar(36) NOT NULL, `VendedorEmail` varchar(200) NOT NULL, `Referencia` varchar(200) default NULL, `TipoFrete` char(2) default NULL, `ValorFrete` decimal(10,2) default NULL, `Extras` decimal(10,2) default NULL, `Anotacao` text, `TipoPagamento` varchar(50) NOT NULL, `StatusTransacao` varchar(50) NOT NULL, `CliNome` varchar(200) NOT NULL, `CliEmail` varchar(200) NOT NULL, `CliEndereco` varchar(200) NOT NULL, `CliNumero` varchar(10) default NULL, `CliComplemento` varchar(100) default NULL, `CliBairro` varchar(100) NOT NULL, `CliCidade` varchar(100) NOT NULL, `CliEstado` char(2) NOT NULL, `CliCEP` varchar(9) NOT NULL, `CliTelefone` varchar(14) default NULL, `NumItens` int(11) NOT NULL, `Data` datetime NOT NULL, `status` tinyint(1) unsigned NOT NULL default '0', UNIQUE KEY `TransacaoID` (`TransacaoID`,`StatusTransacao`), KEY `Referencia` (`Referencia`), KEY `status` (`status`) ) ENGINE=MyISAM DEFAULT CHARSET=latin1; no SQL de quando agente do PhPaDIMIN ou de quando agente entra e depois clica na data base do nosso servidor pra depois clicar em SQL?? Duvida cruel :S

aee galera eu me cadastrei no pag seguro para ter ele como sistema de pagamente de points... mais no script que eu vou usar( http://www.xtibia.com/forum/topic/147461-gesior-acc-pagseguro-entregando-pontos-automaticamente/ ) ta falando que presisa do token. eu me cadastrei mais ele num apareceu... como ter ele?sera pq na minha conta tem dizendo isso? Conta vendedor - não verificada quando eu clico em "não verificada" vai para uma pag que fala que a titularidade ta tudo certo mais o endereço esta com um xis(X) vermelho,do lado do xis(X) tem "pendicia" e em baixo tem "Enviar cópia do comprovante de endereço". minha duvido é:se eu enviar uma copia do meu conprovante de endereço o meu token vai aparecer? me ajuda galeraaaa :S

Vlww é bom mesmo. mais qual eu contrato so para o inicio? semi-dedicado? ou o dedicado normal?

aee galera eu queria saber se vcs sabem algum lugar bom e barato para hostar o server eu tava pensando nesse: http://www.tecla.com.br/cloud-computing/cloud-computing.asp alguem pode me dizer algum? de preferencia alguem que tenha experiencia!

uhmmm okk vlw^^

vc mudou algo?

acho que é esse: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, PSYCHICDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 134) function onCastSpell(cid, var) doCreatureSay(cid, "PSY PULSE!", TALKTYPE_MONSTER) if getPlayerStorageValue(cid, 3) >= 1 then doSendAnimatedText(getThingPos(cid), "MISS", 215) setPlayerStorageValue(cid, 3, -1) return true end if getPlayerStorageValue(cid, 5) >= 1 then if math.random(1,100) <= 33 then doSendAnimatedText(getThingPos(cid), "SELF HIT", 180) if isPlayer(getCreatureTarget(cid)) then huah = getPlayerLevel(getCreatureTarget(cid)) else huah = getPlayerLevel(getCreatureMaster(getCreatureTarget(cid))) end local levels = huah doTargetCombatHealth(getCreatureTarget(cid), cid, COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3) return true end end doSendMagicEffect(getThingPos(getCreatureTarget(cid)), 12) return doCombat(cid, combat, var) end mais tbm tem esse: local nao = {'4820', '4821', '4822', '4823', '4824', '4825', '1395', '1389', '1391', '1393', '460'} local imp = {'919', '4468', '4469', '4470', '4471', '4472', '4473', '4474', '4475', '4476', '4477', '4478', '4479', '4480', '4481', '4482', '4483', '4484', '4485', '4486', '4487', '4488', '4489', '4490', '4491', '4492', '4493', '4494', '4495', '4496', '4497', '4498', '4499', '4500', '4501', '4502', '4503', '4504', '4505', '4506', '4507', '4508', '4509', '4510', '4511', '4512', '4513', '4826', '4827', '873', '874', '875', '876', '877', '878', '903', '904', '905', '906', '907', '908', '909', '910', '911', '912', '913'} 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 rollout = createCombatArea{ {1, 1, 1}, {1, 2, 1}, {1, 1, 1}, } local golem = {lookType = 288} local sandslash = {lookType = 285} local sandshrew = {lookType = 284} local electrode = {lookType = 286} local voltorb = {lookType = 287} -- 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 vinen = createCombatArea{ {0, 0, 0}, {0, 0, 0}, {0, 2, 0}, {1, 0, 0} } local vines = createCombatArea{ {0, 0, 0}, {1, 0, 0}, {0, 0, 0}, {0, 2, 0} } local vinee = createCombatArea{ {0, 0, 0}, {1, 0, 0}, {0, 0, 2}, {0, 0, 0} } local vinew = createCombatArea{ {0, 0, 0}, {0, 0, 3}, {0, 2, 0}, {0, 0, 0} } local whipn = createCombatArea{ {0, 0, 0}, {0, 2, 0}, {1, 1, 1}, {1, 1, 1} } local whips = createCombatArea{ {1, 1, 1}, {1, 1, 1}, {0, 2, 0}, {0, 0, 0} } local whipe = createCombatArea{ {1, 1, 0}, {1, 1, 2}, {1, 1, 0}, {0, 0, 0} } local whipw = createCombatArea{ {0, 1, 1}, {2, 1, 1}, {0, 1, 1}, {0, 0, 0} } local 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 pokeis = {'Pidgey', 'Pidgeotto', 'Pidgeot', 'Rattata', 'Raticate', 'Golbat', 'Bellsprout', 'Weepinbell', 'Victreebel', 'Poliwag', 'Poliwhirl', 'Poliwrath', 'Abra', 'Gloom', 'Vileplume', 'Horsea', 'Seadra', 'Grimer', 'Muk', 'Kakuna', 'Beedrill', 'Zubat', 'Magnemite', 'Magneton', 'Voltorb', 'Electrode', 'Geodude', 'Graveler', 'Golem', 'Sandshrew', 'Sandslash', 'Charmander', 'Charmeleon', 'Charizard', 'Kadabra', 'Alakazam'} local c = { [30] = {x = { pok = pidgey, spell = "Gust", minLv = 12, ex = 1600004, base1 = 40, base2 = 50, dista = 50, bonus = 4, target = "no", type = "flying", cd = 15 } }, [5] = {x = { pok = pidgeotto, spell = "Whirlwind", minLv = 22, ex = 1700004, base1 = 100, base2 = 101, dista = 50, bonus = 4, target = "no", type = "flying", cd = 17 } }, [80] = {x = { pok = pidgeot, spell = "Whirlwind", minLv = 65, ex = 1800004, base1 = 200, base2 = 210, dista = 4, target = "no", bonus = 5.5, type = "flying", cd = 17 } }, [36] = {x = { pok = rattata, spell = "Hyper Fang", minLv = 11, ex = 1900004, base1 = 40, base2 = 50, dista = 1, bonus = 4, type = "normal", cd = 19 } }, [69] = {x = { pok = raticate, spell = "Hyper Fang", minLv = 23, ex = 2000004, base1 = 150, base2 = 160, dista = 1, bonus = 5, type = "normal", cd = 19 } }, [122] = {x = { pok = golbat, spell = "Whirlwind", minLv = 32, ex = 4200004, base1 = 200, base2 = 220, dista = 4, target = "no", bonus = 50, type = "flying", cd = 20 } }, [250] = {x = { pok = bellsprout, spell = "Vine Whip", minLv = 12, ex = 6900004, base1 = 50, base2 = 60, dista = 2, target = "no", bonus = 3.5, type = "grass", cd = 19 } }, [37] = {x = { pok = weepinbell, spell = "Vine Whip", minLv = 20, ex = 7000004, base1 = 120, base2 = 150, target = "no", dista = 2, bonus = 4.5, type = "grass", cd = 19 } }, [240] = {x = { pok = bictreebel, spell = "Vine Whip", minLv = 50, ex = 7100004, base1 = 230, base2 = 280, dista = 2, target = "no", bonus = 6.5, type = "grass", cd = 19 } }, [111] = {x = { pok = poliwag, spell = "Water Gun", minLv = 13, ex = 6000004, base1 = 45, base2 = 50, target = "no", dista = 2, bonus = 4, type = "water", cd = 19 } }, [212] = {x = { pok = poliwhirl, spell = "Water Gun", minLv = 25, ex = 6100004, base1 = 185, target = "no", base2 = 200, dista = 2, bonus = 5, type = "water", cd = 19 } }, [104] = {x = { pok = poliwrath, spell = "Water Gun", minLv = 25, ex = 6200004, base1 = 685, base2 = 700, dista = 2, bonus = 6, target = "no", type = "water", cd = 19 } }, [262] = {x = { pok = abra, spell = "Psycho Shift", minLv = 24, ex = 6300004, base1 = 115, base2 = 120, dista = 10, bonus = 5, type = "psychic", cd = 24 } }, [219] = {x = { pok = kadaabra, spell = "Psycho Shift", minLv = 1, ex = 6400004, base1 = 235, base2 = 245, dista = 10, bonus = 7, type = "psychic", cd = 24 } }, [218] = {x = { pok = alaka, spell = "Psycho Shift", minLv = 1, ex = 6500004, base1 = 335, base2 = 345, dista = 10, bonus = 10, type = "psychic", cd = 24 } }, [74] = {x = { pk = gloom, spell = "Poison Bomb", minLv = 22, ex = 4400004, base1 = 101, base2 = 103, dista = 4, bonus = 5, type = "poison", cd = 25 } }, [86] = {x = { pok = vileplume, spell = "Poison Bomb", minLv = 50, ex = 4500004, base1 = 200, base2 = 201, dista = 4, bonus = 6, type = "poison", cd = 25 } }, [33] = {x = { pok = horsea, spell = "Waterball", minLv = 16, ex = 1160004, base1 = 50, base2 = 60, dista = 4, bonus = 4.7, type = "water", cd = 17 } }, [276] = {x = { pok = seadra, spell = "Waterball", minLv = 46, ex = 1170004, base1 = 190, base2 = 200, dista = 4, bonus = 5.7, type = "water", cd = 17 } }, [214] = {x = { pok = grimer, spell = "Poison Bomb", minLv = 16, ex = 8800004, base1 = 85, base2 = 92, dista = 4, bonus = 6, type = "poison", cd = 17 } }, [47] = {x = { pok = muk, spell = "Poison Bomb", minLv = 32, ex = 8900004, base1 = 285, base2 = 292, dista = 4, bonus = 6, type = "poison", cd = 17 } }, [60] = {x = { pok = kakuna, spell = "Harden", minLv = 10, ex = 1400004, lpl = 32, life = 900, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [45] = {x = { pok = beedrill, spell = "Toxic Needle", minLv = 32, ex = 1500004, base1 = 100, base2 = 110, dista = 4, bonus = 5, type = "poison", cd = 16 } }, [44] = {x = { pok = zubat, spell = "Super Sonic", minLv = 11, ex = 4100004, base1 = 0, base2 = 0, dista = 4, bonus = 0, type = "normal", cd = 16 } }, [217] = {x = { pok = magnemite, spell = "Thunderbolt", minLv = 17, ex = 8100004, base1 = 65, base2 = 85, dista = 5, bonus = 5.4, type = "electric", cd = 18 } }, [223] = {x = { pok = magneton, spell = "Thunderbolt", minLv = 1, ex = 8200004, base1 = 160, base2 = 180, dista = 5, bonus = 7, type = "electric", cd = 18 } }, [123] = {x = { pok = voltorb, spell = "Rollout", minLv = 17, ex = 1000004, base1 = 30, base2 = 31, dista = 2, target = "no", bonus = 0.4, type = "ground", cd = 33 } }, [287] = {x = { pok = voltorb, spell = "Rollout", minLv = 17, ex = 1000004, base1 = 20, base2 = 21, dista = 2, target = "no", bonus = 0.5, type = "ground", cd = 33 } }, [125] = {x = { pok = electrode, spell = "Rollout", minLv = 39, ex = 1010004, base1 = 45, base2 = 46, dista = 2, target = "no", bonus = 1, type = "ground", cd = 33 } }, [286] = {x = { pok = electroderoll, spell = "Rollout", minLv = 39, ex = 1010004, base1 = 45, base2 = 46, dista = 2, target = "no", bonus = 1, type = "ground", cd = 33 } }, [196] = {x = { pok = Geodude, spell = "Harden", minLv = 17, ex = 7400004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [247] = {x = { pok = Graveler, spell = "Harden", minLv = 17, ex = 7500004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [116] = {x = { pok = Golem, spell = "Harden", minLv = 17, ex = 7600004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [288] = {x = { pok = Golem, spell = "Harden", minLv = 17, ex = 7600004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [43] = {x = { pok = sandshrew, spell = "Rollout", minLv = 1, ex = 2700004, base1 = 40, base2 = 41, dista = 1, target = "no", bonus = 0.6, type = "ground", cd = 28 } }, [284] = {x = { pok = sandshrew, spell = "Rollout", minLv = 1, ex = 2700004, base1 = 40, base2 = 41, dista = 1, target = "no", bonus = 0.6, type = "ground", cd = 28 } }, [115] = {x = { pok = sandslash, spell = "Rollout", minLv = 57, ex = 2800004, base1 = 60, base2 = 61, dista = 1, target = "no", bonus = 1.6, type = "ground", cd = 28 } }, [285] = {x = { pok = sandslash, spell = "Rollout", minLv = 57, ex = 2800004, base1 = 60, base2 = 61, dista = 1, target = "no", bonus = 1.6, type = "ground", cd = 28 } }, [29] = {x = { pok = charmander, spell = "Fireball", minLv = 22, ex = 400004, base1 = 100, base2 = 101, dista = 4, bonus = 4.6, type = "fire", cd = 22 } }, [23] = {x = { pok = charmeleon, spell = "Fireball", minLv = 22, ex = 500004, base1 = 150, base2 = 151, dista = 4, bonus = 5.4, type = "fire", cd = 22 } }, [67] = {x = { pok = charizard, spell = "Fireball", minLv = 22, ex = 600004, base1 = 250, base2 = 251, dista = 4, bonus = 7.4, type = "fire", cd = 22 } }, } function onSay(cid) if #getCreatureSummons(cid) == 0 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to moves.") return 0 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 this move.") return 0 end if exhaustion.get(cid, pokemon.x.ex) then seconds = math.floor(((exhaustion.get(cid, pokemon.x.ex)) + 1)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..seconds.." seconds to this move again.") return 0 end if getPlayerStorageValue(getCreatureSummons(cid)[1], 3) >= 1 then doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "MISS", 215) setPlayerStorageValue(getCreatureSummons(cid)[1], 3, -1) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) return true end if getPlayerStorageValue(getCreatureSummons(cid)[1], 5) >= 1 then if math.random(1,100) <= 33 then doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "SELF HIT", 180) local levels = getPlayerLevel(cid) doTargetCombatHealth(cid, getCreatureSummons(cid)[1], COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) return true end end if pokemon.x.target ~= "no" then if not isMonster(getCreatureTarget(cid)) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.") return 0 end if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > pokemon.x.dista then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to this move.") return 0 end if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then return 0 end end if pokemon.x.type == "flying" then elementa = FLYDAMAGE elseif pokemon.x.type == "ground" then elementa = GROUNDDAMAGE elseif pokemon.x.type == "electric" then elementa = ELECTRICDAMAGE elseif pokemon.x.type == "ghost" then elementa = GHOSTDAMAGE elseif pokemon.x.type == "normal" then elementa = NORMALDAMAGE elseif pokemon.x.type == "fighting" then elementa = FIGHTINGDAMAGE elseif pokemon.x.type == "poison" then elementa = POISONDAMAGE elseif pokemon.x.type == "rock" then elementa = ROCKDAMAGE elseif pokemon.x.type == "bug" then elementa = BUGDAMAGE elseif pokemon.x.type == "fire" then elementa = FIREDAMAGE elseif pokemon.x.type == "water" then elementa = WATERDAMAGE elseif pokemon.x.type == "grass" then elementa = GRASSDAMAGE elseif pokemon.x.type == "psychic" then elementa = PSYCHICDAMAGE elseif pokemon.x.type == "ice" then elementa = ICEDAMAGE elseif pokemon.x.type == "dragon" then elementa = DRAGONDAMAGE end local element = elementa local num1 = (pokemon.x.base1) local num2 = (pokemon.x.base2) local num3 = (pokemon.x.bonus) if getPlayerStorageValue(getCreatureSummons(cid)[1], 254) >= 1 then num3 = num3 * 1.8 setPlayerStorageValue(getCreatureSummons(cid)[1], 254, 0) end setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3)))) if pokemon.x.spell == "Water Gun" then if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73) end doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) return 0 elseif pokemon.x.spell == "Gust" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) posit = getThingPos(getCreatureSummons(cid)[1]) local function gust(params) if #getCreatureSummons(params.cid) >= 1 then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42) else end end local posicao = getThingPos(getCreatureSummons(cid)[1]) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}}) end return 0 elseif pokemon.x.spell == "Whirlwind" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) posit = getThingPos(getCreatureSummons(cid)[1]) local function gust(params) if #getCreatureSummons(params.cid) >= 1 then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, 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 == "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])..", "..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 == "Rollout" 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 getCreatureName(getCreatureSummons(cid)[1]) == "Voltorb" then doSetCreatureOutfit(getCreatureSummons(cid)[1], voltorb, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 85) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Electrode" then doSetCreatureOutfit(getCreatureSummons(cid)[1], electrode, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 101) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Sandshrew" then doSetCreatureOutfit(getCreatureSummons(cid)[1], sandshrew, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 93) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Sandslash" then doSetCreatureOutfit(getCreatureSummons(cid)[1], sandslash, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 143) end setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1) local function roll(params) if isCreature(params.cid) then if isCreature(getCreatureSummons(params.cid)[1]) then if getCreatureCondition(getCreatureSummons(params.cid)[1], CONDITION_OUTFIT) == true then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), rollout, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255) end end end end for r = 1, 8 do addEvent(roll, 1000*r, {cid = cid}) end local function stoproll(params) if isCreature(params.cid) then if isCreature(getCreatureSummons(params.cid)[1]) then doChangeSpeed(getCreatureSummons(params.cid)[1], -101) if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, 0) end end end end addEvent(stoproll, 8300, {cid = cid}) return 0 elseif pokemon.x.spell == "Vine Whip" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then area = vinen dano = whipn effect = 80 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then area = vinee dano = whipe effect = 83 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then area = vines dano = whips effect = 81 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then area = vinew dano = whipw effect = 82 end doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), effect) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), dano, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255) return 0 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])..", "..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 == "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 == "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])..", "..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 == "Waterball" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) local function throw(params) if isMonster(getCreatureTarget(params.cid)) then doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 2) else end end local function damage(params) if isMonster(getCreatureTarget(params.cid)) then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68) else end end addEvent(damage, 100, {cid = cid}) addEvent(throw, 0, {cid = cid}) return 0 elseif pokemon.x.spell == "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))), 5) else end end addEvent(damage, 100, {cid = cid}) addEvent(throw, 0, {cid = cid}) 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 == "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])..", "..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])..", "..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 == "Super Sonic" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) local t = getCreatureTarget(cid) setPlayerStorageValue(t, 5, 1) local function confd(params) if isCreature(params.t) then local spdc = getCreatureSpeed(params.t) if getCreatureLookDir(params.t) == 0 then confs = math.random(1,3) elseif getCreatureLookDir(params.t) == 1 then confurandom = math.random(1,99) if confurandom <= 33 then confs = 0 elseif confurandom >= 67 then confs = 2 else confs = 3 end elseif getCreatureLookDir(params.t) == 2 then confurandom = math.random(1,99) if confurandom <= 33 then confs = 3 elseif confurandom >= 67 then confs = 0 else confs = 1 end elseif getCreatureLookDir(params.t) == 3 then confs = math.random(0,2) end doPushCreature(params.t, confs, 1, 0) doSendMagicEffect(getThingPos(params.t), 31) end end local function nonc(params) if isCreature(params.t) then doChangeSpeed(params.t, -getCreatureSpeed(params.t)) doChangeSpeed(params.t, getCreatureBaseSpeed(params.t)) setPlayerStorageValue(params.t, 5, -1) end end doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 32) doChangeSpeed(t, -( getCreatureSpeed(t)/3)) doSendMagicEffect(getThingPos(t), 31) for i = 1, math.random(6,7) do addEvent(confd, 1000*i, {cid = cid, t = t}) end addEvent(nonc, 7100, {cid - cid, t = t}) return 0 end return 0 end num sei qual dos dois é nem oq é para mudar... alguem pode me ajudar?