Pokemon Catching Snippet

By Musawir Ahmed Kehar on Apr 01, 2010

It's Pokemon catching snippet, with 486 Pokemon...
7 Pokemon are missing.. :p
I hope you will like it. Thanks.

on *:text: !Pokemon:#:{
/set %T $rand(1,486)
if (%T == 1) msg $chan Bulbasaur is caught. Congratulations.
if (%T == 2) msg $chan Ivysaur is caught. Congratulations.
if (%T == 3) msg $chan Venasaur is caught. Congratulations.
if (%T == 4) msg $chan Charmander is caught. Congratulations.
if (%T == 5) msg $chan Charmeleon is caught. Congratulations.
if (%T == 6) msg $chan Charzard is caught. Congratulations.
if (%T == 7) msg $chan Squirtle is caught. Congratulations.
if (%T == 8) msg $chan Wartortle is caught. Congratulations.
if (%T == 9) msg $chan Blastoise is caught. Congratulations.
if (%T == 10) msg $chan Caterpie is caught. Congratulations.
if (%T == 11) msg $chan Metapod is caught. Congratulations.
if (%T == 12) msg $chan Butterfree is caught. Congratulations.
if (%T == 13) msg $chan Weedle is caught. Congratulations.
if (%T == 14) msg $chan Kakuna is caught. Congratulations.
if (%T == 15) msg $chan Beedrill is caught. Congratulations.
if (%T == 16) msg $chan Pidgey is caught. Congratulations.
if (%T == 17) msg $chan Pidgeotto is caught. Congratulations.
if (%T == 18) msg $chan Pidgeot is caught. Congratulations.
if (%T == 19) msg $chan Rattata is caught. Congratulations.
if (%T == 20) msg $chan Raticate is caught. Congratulations.
if (%T == 21) msg $chan Spearow is caught. Congratulations.
if (%T == 22) msg $chan Fearow is caught. Congratulations.
if (%T == 23) msg $chan Ekans is caught. Congratulations.
if (%T == 24) msg $chan Arbok is caught. Congratulations.
if (%T == 25) msg $chan Pikachu is caught. Congratulations.
if (%T == 26) msg $chan Raichu is caught. Congratulations.
if (%T == 27) msg $chan Sandshrew is caught. Congratulations.
if (%T == 28) msg $chan Sandslash is caught. Congratulations.
if (%T == 29) msg $chan Nidoran is caught. Congratulations.
if (%T == 30) msg $chan Nidorina is caught. Congratulations.
if (%T == 31) msg $chan Nidoqueen is caught. Congratulations.
if (%T == 32) msg $chan Nidorino is caught. Congratulations.
if (%T == 33) msg $chan Nidoking is caught. Congratulations.
if (%T == 34) msg $chan Clefairy is caught. Congratulations.
if (%T == 35) msg $chan Clefable is caught. Congratulations.
if (%T == 36) msg $chan Vulpix is caught. Congratulations.
if (%T == 37) msg $chan Ninetales is caught. Congratulations.
if (%T == 38) msg $chan Jigglypuff is caught. Congratulations.
if (%T == 39) msg $chan Wigglytuff is caught. Congratulations.
if (%T == 40) msg $chan Zubat is caught. Congratulations.
if (%T == 41) msg $chan Golbat is caught. Congratulations.
if (%T == 42) msg $chan Oddish is caught. Congratulations.
if (%T == 43) msg $chan Gloom is caught. Congratulations.
if (%T == 44) msg $chan Vileplume is caught. Congratulations.
if (%T == 45) msg $chan Paras is caught. Congratulations.
if (%T == 46) msg $chan Parasect is caught. Congratulations.
if (%T == 47) msg $chan Venonat is caught. Congratulations.
if (%T == 48) msg $chan Venomoth is caught. Congratulations.
if (%T == 49) msg $chan Diglett is caught. Congratulations.
if (%T == 50) msg $chan Dugtrio is caught. Congratulations.
if (%T == 51) msg $chan Meowth is caught. Congratulations.
if (%T == 52) msg $chan Persian is caught. Congratulations.
if (%T == 53) msg $chan Psyduck is caught. Congratulations.
if (%T == 54) msg $chan Golduck is caught. Congratulations.
if (%T == 55) msg $chan Mankey is caught. Congratulations.
if (%T == 56) msg $chan Primeape is caught. Congratulations.
if (%T == 57) msg $chan Growlithe is caught. Congratulations.
if (%T == 58) msg $chan Arcanine is caught. Congratulations.
if (%T == 59) msg $chan Poliwag is caught. Congratulations.
if (%T == 60) msg $chan Poliwhirl is caught. Congratulations.
if (%T == 61) msg $chan Poliwrath is caught. Congratulations.
if (%T == 62) msg $chan Abra is caught. Congratulations.
if (%T == 63) msg $chan Kadabra is caught. Congratulations.
if (%T == 64) msg $chan Alakazam is caught. Congratulations.
if (%T == 65) msg $chan Machop is caught. Congratulations.
if (%T == 66) msg $chan Machoke is caught. Congratulations.
if (%T == 67) msg $chan Machamp is caught. Congratulations.
if (%T == 68) msg $chan Bellsprout is caught. Congratulations.
if (%T == 69) msg $chan Weepinbell is caught. Congratulations.
if (%T == 70) msg $chan Victreebell is caught. Congratulations.
if (%T == 71) msg $chan Tentacool is caught. Congratulations.
if (%T == 72) msg $chan Tentacruel is caught. Congratulations.
if (%T == 73) msg $chan Geodude is caught. Congratulations.
if (%T == 74) msg $chan Graveler is caught. Congratulations.
if (%T == 75) msg $chan Golem is caught. Congratulations.
if (%T == 76) msg $chan Ponyta is caught. Congratulations.
if (%T == 77) msg $chan Rapidash is caught. Congratulations.
if (%T == 78) msg $chan Slowpoke is caught. Congratulations.
if (%T == 79) msg $chan Slowbro is caught. Congratulations.
if (%T == 80) msg $chan Magnemite is caught. Congratulations.
if (%T == 81) msg $chan Magneton is caught. Congratulations.
if (%T == 82) msg $chan Farfetch'd is caught. Congratulations.
if (%T == 83) msg $chan Doduo is caught. Congratulations.
if (%T == 84) msg $chan Dodrio is caught. Congratulations.
if (%T == 85) msg $chan Seel is caught. Congratulations.
if (%T == 86) msg $chan Dewgong is caught. Congratulations.
if (%T == 87) msg $chan Grimer is caught. Congratulations.
if (%T == 88) msg $chan Muk is caught. Congratulations.
if (%T == 89) msg $chan Shellder is caught. Congratulations.
if (%T == 90) msg $chan Cloyster is caught. Congratulations.
if (%T == 91) msg $chan Gastly is caught. Congratulations.
if (%T == 92) msg $chan Haunter is caught. Congratulations.
if (%T == 93) msg $chan Gengar is caught. Congratulations.
if (%T == 94) msg $chan Onix is caught. Congratulations.
if (%T == 95) msg $chan Drowzee is caught. Congratulations.
if (%T == 96) msg $chan Hypno is caught. Congratulations.
if (%T == 97) msg $chan Krabby is caught. Congratulations.
if (%T == 98) msg $chan Kingler is caught. Congratulations.
if (%T == 99) msg $chan Voltorb is caught. Congratulations.
if (%T == 100) msg $chan Electrode is caught. Congratulations.
if (%T == 101) msg $chan Exeggcute is caught. Congratulations.
if (%T == 102) msg $chan Exeggutor is caught. Congratulations.
if (%T == 103) msg $chan Cubone is caught. Congratulations.
if (%T == 104) msg $chan Marowak is caught. Congratulations.
if (%T == 105) msg $chan Hitmonlee is caught. Congratulations.
if (%T == 106) msg $chan Hitmonchan is caught. Congratulations.
if (%T == 107) msg $chan Lickitung is caught. Congratulations.
if (%T == 108) msg $chan Koffing is caught. Congratulations.
if (%T == 109) msg $chan Weezing is caught. Congratulations.
if (%T == 110) msg $chan Rhyhorn is caught. Congratulations.
if (%T == 111) msg $chan Rhydon is caught. Congratulations.
if (%T == 112) msg $chan Chansey is caught. Congratulations.
if (%T == 113) msg $chan Tangela is caught. Congratulations.
if (%T == 114) msg $chan Kangaskhan is caught. Congratulations.
if (%T == 115) msg $chan Horsea is caught. Congratulations.
if (%T == 116) msg $chan Seadra is caught. Congratulations.
if (%T == 117) msg $chan Goldeen is caught. Congratulations.
if (%T == 118) msg $chan Seaking is caught. Congratulations.
if (%T == 119) msg $chan Staryu is caught. Congratulations.
if (%T == 120) msg $chan Starmie is caught. Congratulations.
if (%T == 121) msg $chan Mr. Mime is caught. Congratulations.
if (%T == 122) msg $chan Scyther is caught. Congratulations.
if (%T == 123) msg $chan Jynx is caught. Congratulations.
if (%T == 124) msg $chan Electabuzz is caught. Congratulations.
if (%T == 125) msg $chan Magmar is caught. Congratulations.
if (%T == 126) msg $chan Pinsar is caught. Congratulations.
if (%T == 127) msg $chan Tauros is caught. Congratulations.
if (%T == 128) msg $chan Magikarp is caught. Congratulations.
if (%T == 129) msg $chan Gyrados is caught. Congratulations.
if (%T == 130) msg $chan Lapras is caught. Congratulations.
if (%T == 131) msg $chan Ditto is caught. Congratulations.
if (%T == 132) msg $chan Eevee is caught. Congratulations.
if (%T == 133) msg $chan Vaporeaon is caught. Congratulations.
if (%T == 134) msg $chan Flareon is caught. Congratulations.
if (%T == 135) msg $chan Porygon is caught. Congratulations.
if (%T == 136) msg $chan Omanyte is caught. Congratulations.
if (%T == 137) msg $chan Omastar is caught. Congratulations.
if (%T == 138) msg $chan Kabuto is caught. Congratulations.
if (%T == 139) msg $chan Kabutops is caught. Congratulations.
if (%T == 140) msg $chan Aerodactyl is caught. Congratulations.
if (%T == 141) msg $chan Snorlax is caught. Congratulations.
if (%T == 142) msg $chan Articuno is caught. Congratulations.
if (%T == 143) msg $chan Zapdos is caught. Congratulations.
if (%T == 144) msg $chan Moltres is caught. Congratulations.
if (%T == 145) msg $chan Dratini is caught. Congratulations.
if (%T == 146) msg $chan Dragonair is caught. Congratulations.
if (%T == 147) msg $chan Dragonite is caught. Congratulations.
if (%T == 148) msg $chan Mewtwo is caught. Congratulations.
if (%T == 149) msg $chan Mew is caught. Congratulations.
if (%T == 150) msg $chan Togetpi is caught. Congratulations.
if (%T == 151) msg $chan Chikorita is caught. Congratulations.
if (%T == 152) msg $chan Bayleef is caught. Congratulations.
if (%T == 153) msg $chan Meganium is caught. Congratulations.
if (%T == 154) msg $chan Cyndaquil is caught. Congratulations.
if (%T == 155) msg $chan Quilava is caught. Congratulations.
if (%T == 156) msg $chan Typhlosion is caught. Congratulations.
if (%T == 157) msg $chan Totodile is caught. Congratulations.
if (%T == 158) msg $chan Croconaw is caught. Congratulations.
if (%T == 159) msg $chan Feraligatr is caught. Congratulations.
if (%T == 160) msg $chan Sentret is caught. Congratulations.
if (%T == 161) msg $chan Furret is caught. Congratulations.
if (%T == 162) msg $chan Hoothoot is caught. Congratulations.
if (%T == 163) msg $chan Noctowl is caught. Congratulations.
if (%T == 164) msg $chan Ledyba is caught. Congratulations.
if (%T == 165) msg $chan Ledian is caught. Congratulations.
if (%T == 166) msg $chan Spinarak is caught. Congratulations.
if (%T == 167) msg $chan Ariados is caught. Congratulations.
if (%T == 168) msg $chan Crobat is caught. Congratulations.
if (%T == 169) msg $chan Chinchou is caught. Congratulations.
if (%T == 170) msg $chan Lanturn is caught. Congratulations.
if (%T == 171) msg $chan Pichu is caught. Congratulations.
if (%T == 172) msg $chan Cleffa is caught. Congratulations.
if (%T == 173) msg $chan Igglybuff is caught. Congratulations.
if (%T == 174) msg $chan Togetic is caught. Congratulations.
if (%T == 175) msg $chan Natu is caught. Congratulations.
if (%T == 176) msg $chan Xatu is caught. Congratulations.
if (%T == 177) msg $chan Mareep is caught. Congratulations.
if (%T == 178) msg $chan Flaffy is caught. Congratulations.
if (%T == 179) msg $chan Ampharos is caught. Congratulations.
if (%T == 180) msg $chan Bellossom is caught. Congratulations.
if (%T == 181) msg $chan Marill is caught. Congratulations.
if (%T == 182) msg $chan Azumarill is caught. Congratulations.
if (%T == 183) msg $chan Sudowoodo is caught. Congratulations.
if (%T == 184) msg $chan Politoed is caught. Congratulations.
if (%T == 185) msg $chan Hoppip is caught. Congratulations.
if (%T == 186) msg $chan Skiploom is caught. Congratulations.
if (%T == 187) msg $chan Jumpluff is caught. Congratulations.
if (%T == 188) msg $chan Aipom is caught. Congratulations.
if (%T == 189) msg $chan Sunkern is caught. Congratulations.
if (%T == 190) msg $chan Sunflora is caught. Congratulations.
if (%T == 191) msg $chan Yanma is caught. Congratulations.
if (%T == 192) msg $chan Wooper is caught. Congratulations.
if (%T == 193) msg $chan Quagsire is caught. Congratulations.
if (%T == 194) msg $chan Espeon is caught. Congratulations.
if (%T == 195) msg $chan Umbreon is caught. Congratulations.
if (%T == 196) msg $chan Murkrow is caught. Congratulations.
if (%T == 197) msg $chan Slowking is caught. Congratulations.
if (%T == 198) msg $chan Misdreavus is caught. Congratulations.
if (%T == 199) msg $chan Uknown is caught. Congratulations.
if (%T == 200) msg $chan Wobbuffet is caught. Congratulations.
if (%T == 201) msg $chan Girafrig is caught. Congratulations.
if (%T == 202) msg $chan Pinceo is caught. Congratulations.
if (%T == 203) msg $chan Forretress is caught. Congratulations.
if (%T == 204) msg $chan Dunsparce is caught. Congratulations.
if (%T == 205) msg $chan Gligar is caught. Congratulations.
if (%T == 206) msg $chan Steelix is caught. Congratulations.
if (%T == 207) msg $chan Snabull is caught. Congratulations.
if (%T == 208) msg $chan Granbull is caught. Congratulations.
if (%T == 209) msg $chan Qwilfish is caught. Congratulations.
if (%T == 210) msg $chan Scizor is caught. Congratulations.
if (%T == 211) msg $chan Shuckle is caught. Congratulations.
if (%T == 212) msg $chan Heracross is caught. Congratulations.
if (%T == 213) msg $chan Sneasel is caught. Congratulations.
if (%T == 214) msg $chan Teddiursa is caught. Congratulations.
if (%T == 215) msg $chan Ursaring is caught. Congratulations.
if (%T == 216) msg $chan Slugma is caught. Congratulations.
if (%T == 217) msg $chan magcargo is caught. Congratulations.
if (%T == 218) msg $chan Swinub is caught. Congratulations.
if (%T == 219) msg $chan Piloswine is caught. Congratulations.
if (%T == 220) msg $chan Corsola is caught. Congratulations.
if (%T == 221) msg $chan Remoraid is caught. Congratulations.
if (%T == 222) msg $chan Octillery is caught. Congratulations.
if (%T == 223) msg $chan Delibird is caught. Congratulations.
if (%T == 224) msg $chan Mantine is caught. Congratulations.
if (%T == 225) msg $chan Skarmory is caught. Congratulations.
if (%T == 226) msg $chan Houndour is caught. Congratulations.
if (%T == 227) msg $chan Houndoom is caught. Congratulations.
if (%T == 228) msg $chan Kingdra is caught. Congratulations.
if (%T == 229) msg $chan Phanpy is caught. Congratulations.
if (%T == 230) msg $chan Donphan is caught. Congratulations.
if (%T == 231) msg $chan Porygon2 is caught. Congratulations.
if (%T == 232) msg $chan Stantler is caught. Congratulations.
if (%T == 233) msg $chan Smeargle is caught. Congratulations.
if (%T == 234) msg $chan Tyrogue is caught. Congratulations.
if (%T == 235) msg $chan Hitmontop is caught. Congratulations.
if (%T == 236) msg $chan Smoochum is caught. Congratulations.
if (%T == 237) msg $chan Elekid is caught. Congratulations.
if (%T == 238) msg $chan Magby is caught. Congratulations.
if (%T == 239) msg $chan Miltank is caught. Congratulations.
if (%T == 240) msg $chan Blissey is caught. Congratulations.
if (%T == 241) msg $chan Raikou is caught. Congratulations.
if (%T == 242) msg $chan Entei is caught. Congratulations.
if (%T == 243) msg $chan Suicune is caught. Congratulations.
if (%T == 244) msg $chan Larvitar is caught. Congratulations.
if (%T == 245) msg $chan Pupitar is caught. Congratulations.
if (%T == 246) msg $chan Tyranitar is caught. Congratulations.
if (%T == 247) msg $chan Lugia is caught. Congratulations.
if (%T == 248) msg $chan Ho-Oh is caught. Congratulations.
if (%T == 249) msg $chan Celebi is caught. Congratulations.
if (%T == 250) msg $chan Treecko is caught. Congratulations.
if (%T == 251) msg $chan Grovyle is caught. Congratulations.
if (%T == 252) msg $chan Sceptile is caught. Congratulations.
if (%T == 253) msg $chan torchic is caught. Congratulations.
if (%T == 254) msg $chan Combustion is caught. Congratulations.
if (%T == 255) msg $chan Blaziken is caught. Congratulations.
if (%T == 256) msg $chan Mudkip is caught. Congratulations.
if (%T == 257) msg $chan Marshtomp is caught. Congratulations.
if (%T == 258) msg $chan Swampert is caught. Congratulations.
if (%T == 259) msg $chan Poochyena is caught. Congratulations.
if (%T == 260) msg $chan Mightyena is caught. Congratulations.
if (%T == 261) msg $chan Zigzagoon is caught. Congratulations.
if (%T == 262) msg $chan Linoon is caught. Congratulations.
if (%T == 263) msg $chan Wurmple is caught. Congratulations.
if (%T == 264) msg $chan Silcoon is caught. Congratulations.
if (%T == 265) msg $chan Beautifly is caught. Congratulations.
if (%T == 266) msg $chan Cascoon is caught. Congratulations.
if (%T == 267) msg $chan Dustox is caught. Congratulations.
if (%T == 268) msg $chan Lotad is caught. Congratulations.
if (%T == 269) msg $chan Lombre is caught. Congratulations.
if (%T == 270) msg $chan Ludicolo is caught. Congratulations.
if (%T == 271) msg $chan Seedot is caught. Congratulations.
if (%T == 272) msg $chan Nuzleef is caught. Congratulations.
if (%T == 273) msg $chan Shiftry is caught. Congratulations.
if (%T == 274) msg $chan Taillow is caught. Congratulations.
if (%T == 275) msg $chan Swellow is caught. Congratulations.
if (%T == 276) msg $chan Wingull is caught. Congratulations.
if (%T == 277) msg $chan Pelipper is caught. Congratulations.
if (%T == 278) msg $chan Ralts is caught. Congratulations.
if (%T == 279) msg $chan Kirlia is caught. Congratulations.
if (%T == 280) msg $chan Gardevoir is caught. Congratulations.
if (%T == 281) msg $chan Surskit is caught. Congratulations.
if (%T == 282) msg $chan Masquerain is caught. Congratulations.
if (%T == 283) msg $chan Shroomish is caught. Congratulations.
if (%T == 284) msg $chan Breloom is caught. Congratulations.
if (%T == 285) msg $chan Slakoth is caught. Congratulations.
if (%T == 286) msg $chan Vigorath is caught. Congratulations.
if (%T == 287) msg $chan Slaking is caught. Congratulations.
if (%T == 288) msg $chan Ninkada is caught. Congratulations.
if (%T == 289) msg $chan Ninjask is caught. Congratulations.
if (%T == 290) msg $chan Shedinja is caught. Congratulations.
if (%T == 291) msg $chan Whismur is caught. Congratulations.
if (%T == 292) msg $chan Loudred is caught. Congratulations.
if (%T == 293) msg $chan Exploud is caught. Congratulations.
if (%T == 294) msg $chan makuhita is caught. Congratulations.
if (%T == 295) msg $chan Hariyama is caught. Congratulations.
if (%T == 296) msg $chan Azurill is caught. Congratulations.
if (%T == 297) msg $chan Nosepass is caught. Congratulations.
if (%T == 298) msg $chan Skitty is caught. Congratulations.
if (%T == 299) msg $chan Delcatty is caught. Congratulations.
if (%T == 300) msg $chan Sableye is caught. Congratulations.
if (%T == 301) msg $chan Mawile is caught. Congratulations.
if (%T == 302) msg $chan Aron is caught. Congratulations.
if (%T == 303) msg $chan Lairon is caught. Congratulations.
if (%T == 304) msg $chan Aggron is caught. Congratulations.
if (%T == 305) msg $chan Meditite is caught. Congratulations.
if (%T == 306) msg $chan Medichamp is caught. Congratulations.
if (%T == 307) msg $chan Elektrike is caught. Congratulations.
if (%T == 308) msg $chan Manetric is caught. Congratulations.
if (%T == 309) msg $chan Plusle is caught. Congratulations.
if (%T == 310) msg $chan Minun is caught. Congratulations.
if (%T == 311) msg $chan Volbeat is caught. Congratulations.
if (%T == 312) msg $chan Illumise is caught. Congratulations.
if (%T == 313) msg $chan Roselia is caught. Congratulations.
if (%T == 314) msg $chan Gulpin is caught. Congratulations.
if (%T == 315) msg $chan Swalot is caught. Congratulations.
if (%T == 316) msg $chan Carvanah is caught. Congratulations.
if (%T == 317) msg $chan Sharpedo is caught. Congratulations.
if (%T == 318) msg $chan Wailmer is caught. Congratulations.
if (%T == 319) msg $chan Wailord is caught. Congratulations.
if (%T == 320) msg $chan Numel is caught. Congratulations.
if (%T == 321) msg $chan Camerupt is caught. Congratulations.
if (%T == 322) msg $chan Torkoal is caught. Congratulations.
if (%T == 323) msg $chan Spoink is caught. Congratulations.
if (%T == 324) msg $chan Trapinch is caught. Congratulations.
if (%T == 325) msg $chan Vibrava is caught. Congratulations.
if (%T == 326) msg $chan Flygon is caught. Congratulations.
if (%T == 327) msg $chan Cacnea is caught. Congratulations.
if (%T == 328) msg $chan Cacturne is caught. Congratulations.
if (%T == 329) msg $chan Swablu is caught. Congratulations.
if (%T == 330  msg $chan Altaria is caught. Congratulations.
if (%T == 331) msg $chan Zangoose is caught. Congratulations.
if (%T == 332) msg $chan Seviper is caught. Congratulations.
if (%T == 333) msg $chan Lunatone is caught. Congratulations.
if (%T == 334) msg $chan Solrock is caught. Congratulations.
if (%T == 335) msg $chan Barboach is caught. Congratulations.
if (%T == 336) msg $chan Wiscash is caught. Congratulations.
if (%T == 337) msg $chan Corphish is caught. Congratulations.
if (%T == 338) msg $chan Crawdaunt is caught. Congratulations.
if (%T == 339) msg $chan Baltoy is caught. Congratulations.
if (%T == 340) msg $chan Claydol is caught. Congratulations.
if (%T == 341) msg $chan Lileep is caught. Congratulations.
if (%T == 342) msg $chan Cradily is caught. Congratulations.
if (%T == 343) msg $chan Anorith is caught. Congratulations.
if (%T == 344) msg $chan Armaldo is caught. Congratulations.
if (%T == 345) msg $chan Feebas is caught. Congratulations.
if (%T == 346) msg $chan Milotic is caught. Congratulations.
if (%T == 347) msg $chan Castform is caught. Congratulations.
if (%T == 348) msg $chan Kecleon is caught. Congratulations.
if (%T == 349) msg $chan Shuppet is caught. Congratulations.
if (%T == 350) msg $chan Banett is caught. Congratulations.
if (%T == 351) msg $chan Duskull is caught. Congratulations.
if (%T == 352) msg $chan Dusclops is caught. Congratulations.
if (%T == 353) msg $chan Tropius is caught. Congratulations.
if (%T == 354) msg $chan Chimecho is caught. Congratulations.
if (%T == 355) msg $chan Absol is caught. Congratulations.
if (%T == 356) msg $chan Wynaut is caught. Congratulations.
if (%T == 357) msg $chan Snorunt is caught. Congratulations.
if (%T == 358) msg $chan Glalie is caught. Congratulations.
if (%T == 359) msg $chan Spheal is caught. Congratulations.
if (%T == 360) msg $chan Sealeo is caught. Congratulations.
if (%T == 361) msg $chan Walrein is caught. Congratulations.
if (%T == 362) msg $chan Clamperl is caught. Congratulations.
if (%T == 363) msg $chan Huntail is caught. Congratulations.
if (%T == 364) msg $chan gorebyss is caught. Congratulations.
if (%T == 365) msg $chan relicanth is caught. Congratulations.
if (%T == 366) msg $chan Luvdisk is caught. Congratulations.
if (%T == 367) msg $chan Bagon is caught. Congratulations.
if (%T == 368) msg $chan Shelgon is caught. Congratulations.
if (%T == 369) msg $chan Salamence is caught. Congratulations.
if (%T == 370) msg $chan Beldum is caught. Congratulations.
if (%T == 371) msg $chan Metang is caught. Congratulations.
if (%T == 372) msg $chan Metagross is caught. Congratulations.
if (%T == 373) msg $chan Regirock is caught. Congratulations.
if (%T == 374) msg $chan Regice is caught. Congratulations.
if (%T == 375) msg $chan Registeel is caught. Congratulations.
if (%T == 376) msg $chan Latias is caught. Congratulations.
if (%T == 377) msg $chan Latios is caught. Congratulations.
if (%T == 378) msg $chan Kyogre is caught. Congratulations.
if (%T == 379) msg $chan Groudon is caught. Congratulations.
if (%T == 380) msg $chan Rauquaza is caught. Congratulations.
if (%T == 381) msg $chan Jirachi is caught. Congratulations.
if (%T == 382) msg $chan Deoxys is caught. Congratulations.
if (%T == 383) msg $chan Turtwig is caught. Congratulations.
if (%T == 384) msg $chan Grotle is caught. Congratulations.
if (%T == 385) msg $chan Torterra is caught. Congratulations.
if (%T == 386) msg $chan Chimchar is caught. Congratulations.
if (%T == 387) msg $chan Monferno is caught. Congratulations.
if (%T == 388) msg $chan Infernape is caught. Congratulations.
if (%T == 389) msg $chan Piplup is caught. Congratulations.
if (%T == 390) msg $chan Prinplup is caught. Congratulations.
if (%T == 391) msg $chan Empleon is caught. Congratulations.
if (%T == 392) msg $chan Starly is caught. Congratulations.
if (%T == 393) msg $chan Starvia is caught. Congratulations.
if (%T == 394) msg $chan Starporter is caught. Congratulations.
if (%T == 395) msg $chan Bidoof is caught. Congratulations.
if (%T == 396) msg $chan Bibarel is caught. Congratulations.
if (%T == 397) msg $chan Krcketot is caught. Congratulations.
if (%T == 398) msg $chan Kricketune is caught. Congratulations.
if (%T == 399) msg $chan Shinx is caught. Congratulations.
if (%T == 400) msg $chan Luxio is caught. Congratulations.
if (%T == 401) msg $chan Luxray is caught. Congratulations.
if (%T == 402) msg $chan Budew is caught. Congratulations.
if (%T == 403) msg $chan Roserade is caught. Congratulations.
if (%T == 404) msg $chan Carniados is caught. Congratulations.
if (%T == 405) msg $chan Rampardos is caught. Congratulations.
if (%T == 406) msg $chan Burmy is caught. Congratulations.
if (%T == 407) msg $chan Wormadam is caught. Congratulations.
if (%T == 408) msg $chan Mothim is caught. Congratulations.
if (%T == 409) msg $chan Combee is caught. Congratulations.
if (%T == 410) msg $chan Vespiqueen is caught. Congratulations.
if (%T == 411) msg $chan Pachirisu is caught. Congratulations.
if (%T == 412) msg $chan Buizel is caught. Congratulations.
if (%T == 413) msg $chan Floatzel is caught. Congratulations.
if (%T == 414) msg $chan Cherubi is caught. Congratulations.
if (%T == 415) msg $chan Cherrim is caught. Congratulations.
if (%T == 416) msg $chan Shellos is caught. Congratulations.
if (%T == 417) msg $chan Gastroodon is caught. Congratulations.
if (%T == 418) msg $chan Ambipom is caught. Congratulations.
if (%T == 419) msg $chan Drifloon is caught. Congratulations.
if (%T == 420) msg $chan Drifblim is caught. Congratulations.
if (%T == 421) msg $chan Buneary is caught. Congratulations.
if (%T == 422) msg $chan Lopunny is caught. Congratulations.
if (%T == 423) msg $chan Mismagus is caught. Congratulations.
if (%T == 424) msg $chan Honchkrow is caught. Congratulations.
if (%T == 425) msg $chan Glameow is caught. Congratulations.
if (%T == 426) msg $chan Purugly is caught. Congratulations.
if (%T == 427) msg $chan Chingling is caught. Congratulations.
if (%T == 428) msg $chan Stunky is caught. Congratulations.
if (%T == 429) msg $chan Skuntank is caught. Congratulations.
if (%T == 430) msg $chan Bronzor is caught. Congratulations.
if (%T == 431) msg $chan Bronzong is caught. Congratulations.
if (%T == 432) msg $chan Bonsly is caught. Congratulations.
if (%T == 433) msg $chan Mime.Jr is caught. Congratulations.
if (%T == 434) msg $chan happiny is caught. Congratulations.
if (%T == 435) msg $chan Chatoto is caught. Congratulations.
if (%T == 436) msg $chan Spiritomb is caught. Congratulations.
if (%T == 437) msg $chan Gible is caught. Congratulations.
if (%T == 438) msg $chan Gabite is caught. Congratulations.
if (%T == 438) msg $chan Garchomp is caught. Congratulations.
if (%T == 440) msg $chan Munchlax is caught. Congratulations.
if (%T == 441) msg $chan Riolu is caught. Congratulations.
if (%T == 442) msg $chan Lucario is caught. Congratulations.
if (%T == 443) msg $chan Hippopotas is caught. Congratulations.
if (%T == 444) msg $chan Hippowdon is caught. Congratulations.
if (%T == 445) msg $chan Skorupi is caught. Congratulations.
if (%T == 446) msg $chan Drapion is caught. Congratulations.
if (%T == 447) msg $chan Crogunk is caught. Congratulations.
if (%T == 448) msg $chan Toxicroak is caught. Congratulations.
if (%T == 449) msg $chan Carnivine is caught. Congratulations.
if (%T == 450) msg $chan Finneon is caught. Congratulations.
if (%T == 451) msg $chan Lumineon is caught. Congratulations.
if (%T == 452) msg $chan Mantyke is caught. Congratulations.
if (%T == 453) msg $chan Snover is caught. Congratulations.
if (%T == 454) msg $chan Abomasnow is caught. Congratulations.
if (%T == 455) msg $chan Weavile is caught. Congratulations.
if (%T == 456) msg $chan Magnezone is caught. Congratulations.
if (%T == 457) msg $chan Licklicky is caught. Congratulations.
if (%T == 458) msg $chan Rhyperior is caught. Congratulations.
if (%T == 459) msg $chan Tangrwth is caught. Congratulations.
if (%T == 460) msg $chan Electivire is caught. Congratulations.
if (%T == 461) msg $chan Magmortaor is caught. Congratulations.
if (%T == 462) msg $chan Togekiss is caught. Congratulations.
if (%T == 463) msg $chan Yanmega is caught. Congratulations.
if (%T == 464) msg $chan Leafeon is caught. Congratulations.
if (%T == 465) msg $chan Glaceon is caught. Congratulations.
if (%T == 466) msg $chan Gliscor is caught. Congratulations.
if (%T == 467) msg $chan Mamoswine is caught. Congratulations.
if (%T == 468) msg $chan Porygon-Z is caught. Congratulations.
if (%T == 469) msg $chan Gallade is caught. Congratulations.
if (%T == 470) msg $chan Probopass is caught. Congratulations.
if (%T == 471) msg $chan Dusknoir is caught. Congratulations.
if (%T == 472) msg $chan Froloss is caught. Congratulations.
if (%T == 473) msg $chan Rotom is caught. Congratulations.
if (%T == 474) msg $chan Uxie is caught. Congratulations.
if (%T == 475) msg $chan Mesprit is caught. Congratulations.
if (%T == 476) msg $chan Azelf is caught. Congratulations.
if (%T == 477) msg $chan Dialga is caught. Congratulations.
if (%T == 478) msg $chan Palkia is caught. Congratulations.
if (%T == 479) msg $chan Regigigas is caught. Congratulations.
if (%T == 480) msg $chan Giratina is caught. Congratulations.
if (%T == 481) msg $chan Cresselia is caught. Congratulations.
if (%T == 482) msg $chan Phione is caught. Congratulations.
if (%T == 483) msg $chan Manaphy is caught. Congratulations.
if (%T == 484) msg $chan Darkrai is caught. Congratulations.
if (%T == 485) msg $chan Shaymin is caught. Congratulations.
if (%T == 486) msg $chan Arceus is caught. Congratulations.
}

on *:text:!Credits:#: msg $chan 4Made by: 7Musawir Ahmed Kehar

Musawir Ahmed Kehar

Like Page Follow Author

Comments

Sign in to comment.
Jethro   -  Apr 05, 2010

This is exactly why it's better to use socket when dealing with a randomized script like this:

on $*:text:/^[!.]pokemon$/iS:#: {
  if !%PKTimer. [ $+ [ $nick ] ] { set -u3 %c #
    set -z [ %PKTimer. [ $+ [ $nick ] ] ] $r(60,300) | pokemon
  }
  else { 
    notice $nick You may use the command $1 again in $&
      $duration( %PKTimer. [ $+ [ $nick ] ] ) $+ .
  }
}
alias pokemon sock $+ $iif($sock(p),close p,open p www.pokemonzone.com 80)
on *:sockopen:p: { 
  var %pokemon sockwrite -nt p | %pokemon get /fullpokedex.html http/1.1
  %pokemon host: www.pokemonzone.com $str($crlf,2) | sockmark p msg %c
}
on *:sockread:p: {
  var %p $r(001,493), %r /( $+ %p $+ )\s(.+?)\s/, %s | sockread %s
  if ($regex(%s,%r)) { $sock(p).mark $nick has caught a Pokémon named: $&
      $regml(2) $+ ! Congratz! | sockclose p 
  }
}

GuitarMasterx7, you don't place a OR pipe inside the regex [] bracket. [!@] will either match ! or @ as is. By placing it in the [] bracket, you will match for > |pokemon If you choose to use the pipe, then this is another way:

/^(!|@)pokemon$/

The dollar sign $ will ensure that the command ends with the letter n and nothing more. For mirc though, those two symbols don't need to be escaped...and will work.

 Respond  
slub77   -  Apr 05, 2010

@GuitarMasterx7 lol then use $lines(poke.txt)

$rand(1,$lines(poke.txt)) there so when he add's the lines increase so the second value increases :P

 Respond  
GuitarMasterx7   -  Apr 02, 2010
  1. Put all the message in a text file and either use /play command with the -r switch or simply use the $read(file.txt) to send a random message.

what Jethro_ suggested there is a great idea seeing as how the -r switch creates a timer
between triggers

[learned dat from Jethro_ =D]

i learned a way u can do this script using an alias
and a var

on $*:text:/^[!|.]pokemon/:#:{
  if %PKTimer. [ $+ [ $nick ] ] {
    notice $nick You must wait $duration( %PKTimer. [ $+ [ $nick ] ] ) before you can do that again.
    halt
  }
      msg # $nick has caught a $PKEvent $+ !  Congratz!
}
    set -z [ %PKTimer. [ $+ [ $nick ] ] ] $r(60,300)
    notice $nick You may use this again in $duration( %PKTimer. [ $+ [ $nick ] ] ) $+ .
  }
}

alias -l PKEvent {
  var %x = $r(1,3)
  if %x = 1 { return something | halt }
  if %x = 2 { return Jethro_ | halt }
  if %x = 3 { return GuitarMasterx7 | halt }
}
ECT.

(02:25:34) <@GuitarMasterx7> .pokemon
(02:25:34) <@Kindfer> GuitarMasterx7 has caught a GuitarMasterx7! Congratz!
(02:25:35) -Kindfer- You may use this again in 4mins 15secs.
(02:25:42) <@GuitarMasterx7> .pokemon
(02:25:43) -Kindfer- You must wait 4mins 7secs before you can do that again.

ftw

but then again mine still abuses if statements
damn...fail lolz

any pokemon after 297 will never be caught because of this line

/set %T $rand(1,297)

das cuz he copied this script from JSG55's link
xD

 Respond  
jsg55   -  Apr 01, 2010
slub77   -  Apr 01, 2010

uhh just looking for a site u could get the details from, here's 1 http://www.dragonflycave.com/names.aspx

Or because i am nice, u can get it from here:
https://docs.google.com/leaf?id=0B7Cj8D_ZMGV3YjUzNTJhOTYtMDYzMy00Mjc4LTk4MzctMTUzOTZhNWY3MWFh&hl=en

if you do use that file then remember to save it in to your mirc folder

Also here is a sample of what you could do 

on *:TEXT:*:#:{
  if $1 == !poke {
    var %a $iif($len($2) == 1,$+(00,$2)) $iif($len($2) == 2,$+(0,$2)) $iif($len($2) == 3,$2)
    if !$readini(poke.ini, Names, %a) { notice $nick Number %a is not valid }
  else { notice $nick   $+($me,'s) Pokedex  1,4 $+(:,%a,:) $readini(poke.ini, Names, %a) } }
  if $1 == !rpoke { var %a $ini(poke.ini,names,0) | var %b $rand(1,%a) | var %c $iif($len(%b) == 1,$+(00,%b)) $iif($len(%b) == 2,$+(0,%b)) $iif($len(%b) == 3,%b) | notice $nick  $+($me,'s) Pokedex 1,4 $+(:,%c,:) $readini(poke.ini, Names, %c) } 
}

!poke or !rpoke for a random selection

 Respond  
Jethro   -  Apr 01, 2010

This is what I call "mass if statements abuse." You can do it this way:

on *:text:$($strip(!pokemon)):#: {
  if (!%f) { inc -u4 %f no_flood
    var %p = Bulbasaur|Ivysaur|Venasaur|Charmander|Charzard|Squirtle|Wartortle|$&
      $+ Pidgeotto|Rattata|Raticate|Spearow|Fearow|Ekans|Arbok|Pikachu|Raichu|Sandshrew|$&
      $+ Caterpie|Metapod|Butterfree|Weedle|Kakuna|Beedrill|Pidgey|Pidgeotto|Pidgeot
    ;rest of nicknames here (3rd line)
    ;rest of nicknames here (4th line)
    ;rest of nicknames here (5th line)
    ;so on and so forth
    msg # $gettok(%p,$r(1,$numtok(%p,124)),124) is caught. Congratulations.
  }
}

A trigger flood control is recommended, or else some people may abuse it by flooding the client running the code. My example shows it that people can only command the script trigger every 4 seconds.

There are also a couple of other ways you can go about a randomized script like this:

  1. Put all the message in a text file and either use /play command with the -r switch or simply use the $read(file.txt) to send a random message.

  2. Find a website that lists various pokemon nicknames and make a socket script to fetch and output them in the channel randomly.
 Respond  
Musawir Ahmed Kehar   -  Apr 01, 2010

Now it's okay.. XD

 Respond  
PuNkTuReD   -  Apr 01, 2010

any pokemon after 297 will never be caught because of this line

/set %T $rand(1,297)

also instead of setting the variable you can do

var %T = $r(1,486)

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.