By LikeSeoul on Dec 08, 2008This is my first snippet and I hope you like it! Made by me.
on *:text: !Pokemon:#:{
/set %T $rand(1,297)
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 == 21) msg $chan Ekans is caught. Congratulations.
if (%T == 23) msg $chan Arbok is caught. Congratulations.
if (%T == 24) msg $chan Pikachu is caught. Congratulations.
if (%T == 25) msg $chan Raichu is caught. Congratulations.
if (%T == 26) msg $chan Sandshrew is caught. Congratulations.
if (%T == 27) msg $chan Sandslash is caught. Congratulations.
if (%T == 28) msg $chan Nidoran is caught. Congratulations.
if (%T == 29) msg $chan Nidorina is caught. Congratulations.
if (%T == 30) msg $chan Nidoqueen is caught. Congratulations.
if (%T == 31) msg $chan Nidorino is caught. Congratulations.
if (%T == 32) msg $chan Nidoking is caught. Congratulations.
if (%T == 33) msg $chan Clefairy is caught. Congratulations.
if (%T == 34) msg $chan Clefable is caught. Congratulations.
if (%T == 35) msg $chan Vulpix is caught. Congratulations.
if (%T == 36) msg $chan Ninetales is caught. Congratulations.
if (%T == 37) msg $chan Jigglypuff is caught. Congratulations.
if (%T == 38) msg $chan Wigglytuff is caught. Congratulations.
if (%T == 39) msg $chan Zubat is caught. Congratulations.
if (%T == 40) msg $chan Golbat is caught. Congratulations.
if (%T == 41) msg $chan Oddish is caught. Congratulations.
if (%T == 42) msg $chan Gloom is caught. Congratulations.
if (%T == 43) msg $chan Vileplume is caught. Congratulations.
if (%T == 44) msg $chan Paras is caught. Congratulations.
if (%T == 45) msg $chan Parasect is caught. Congratulations.
if (%T == 45) msg $chan Venonat is caught. Congratulations.
if (%T == 46) msg $chan Venomoth is caught. Congratulations.
if (%T == 47) msg $chan Diglett is caught. Congratulations.
if (%T == 48) msg $chan Dugtrio is caught. Congratulations.
if (%T == 49) msg $chan Meowth is caught. Congratulations.
if (%T == 50) msg $chan Persian is caught. Congratulations.
if (%T == 51) msg $chan Psyduck is caught. Congratulations.
if (%T == 52) msg $chan Golduck is caught. Congratulations.
if (%T == 53) msg $chan Mankey is caught. Congratulations.
if (%T == 54) msg $chan Primeape is caught. Congratulations.
if (%T == 55) msg $chan Growlithe is caught. Congratulations.
if (%T == 56) msg $chan Arcanine is caught. Congratulations.
if (%T == 57) msg $chan Poliwag is caught. Congratulations.
if (%T == 58) msg $chan Poliwhirl is caught. Congratulations.
if (%T == 59) msg $chan Poliwrath is caught. Congratulations.
if (%T == 60) msg $chan Abra is caught. Congratulations.
if (%T == 61) msg $chan Kadabra is caught. Congratulations.
if (%T == 62) msg $chan Alakazam is caught. Congratulations.
if (%T == 63) msg $chan Machop is caught. Congratulations.
if (%T == 64) msg $chan Machoke is caught. Congratulations.
if (%T == 65) msg $chan Machamp is caught. Congratulations.
if (%T == 66) msg $chan Bellsprout is caught. Congratulations.
if (%T == 67) msg $chan Weepinbell is caught. Congratulations.
if (%T == 68) msg $chan Victreebell is caught. Congratulations.
if (%T == 69) msg $chan Tentacool is caught. Congratulations.
if (%T == 70) msg $chan Tentacruel is caught. Congratulations.
if (%T == 71) msg $chan Geodude is caught. Congratulations.
if (%T == 72) msg $chan Graveler is caught. Congratulations.
if (%T == 73) msg $chan Golem is caught. Congratulations.
if (%T == 74) msg $chan Ponyta is caught. Congratulations.
if (%T == 75) msg $chan Rapidash is caught. Congratulations.
if (%T == 76) msg $chan Slowpoke is caught. Congratulations.
if (%T == 77) msg $chan Slowbro is caught. Congratulations.
if (%T == 78) msg $chan Magnemite is caught. Congratulations.
if (%T == 79) msg $chan Magneton is caught. Congratulations.
if (%T == 80) msg $chan Farfetch'd is caught. Congratulations.
if (%T == 81) msg $chan Doduo is caught. Congratulations.
if (%T == 82) msg $chan Dodrio is caught. Congratulations.
if (%T == 83) msg $chan Seel is caught. Congratulations.
if (%T == 84) msg $chan Dewgong is caught. Congratulations.
if (%T == 85) msg $chan Grimer is caught. Congratulations.
if (%T == 86) msg $chan Muk is caught. Congratulations.
if (%T == 87) msg $chan Shellder is caught. Congratulations.
if (%T == 88) msg $chan Cloyster is caught. Congratulations.
if (%T == 89) msg $chan Gastly is caught. Congratulations.
if (%T == 90) msg $chan Haunter is caught. Congratulations.
if (%T == 91) msg $chan Gengar is caught. Congratulations.
if (%T == 92) msg $chan Onix is caught. Congratulations.
if (%T == 93) msg $chan Drowzee is caught. Congratulations.
if (%T == 94) msg $chan Hypno is caught. Congratulations.
if (%T == 95) msg $chan Krabby is caught. Congratulations.
if (%T == 96) msg $chan Kingler is caught. Congratulations.
if (%T == 97) msg $chan Voltorb is caught. Congratulations.
if (%T == 98) msg $chan Electrode is caught. Congratulations.
if (%T == 99) msg $chan Exeggcute is caught. Congratulations.
if (%T == 100) msg $chan Exeggutor is caught. Congratulations.
if (%T == 101) msg $chan Cubone is caught. Congratulations.
if (%T == 102) msg $chan Marowak is caught. Congratulations.
if (%T == 103) msg $chan Hitmonlee is caught. Congratulations.
if (%T == 104) msg $chan Hitmonchan is caught. Congratulations.
if (%T == 105) msg $chan Lickitung is caught. Congratulations.
if (%T == 106) msg $chan Koffing is caught. Congratulations.
if (%T == 107) msg $chan Weezing is caught. Congratulations.
if (%T == 108) msg $chan Rhyhorn is caught. Congratulations.
if (%T == 109) msg $chan Rhydon is caught. Congratulations.
if (%T == 110) msg $chan Chansey is caught. Congratulations.
if (%T == 111) msg $chan Tangela is caught. Congratulations.
if (%T == 112) msg $chan Kangaskhan is caught. Congratulations.
if (%T == 113) msg $chan Horsea is caught. Congratulations.
if (%T == 114) msg $chan Seadra is caught. Congratulations.
if (%T == 115) msg $chan Goldeen is caught. Congratulations.
if (%T == 116) msg $chan Seaking is caught. Congratulations.
if (%T == 117) msg $chan Staryu is caught. Congratulations.
if (%T == 118) msg $chan Starmie is caught. Congratulations.
if (%T == 119) msg $chan Mr. Mime is caught. Congratulations.
if (%T == 120) msg $chan Scyther is caught. Congratulations.
if (%T == 121) msg $chan Jynx is caught. Congratulations.
if (%T == 122) msg $chan Electabuzz is caught. Congratulations.
if (%T == 123) msg $chan Magmar is caught. Congratulations.
if (%T == 124) msg $chan Pinsar is caught. Congratulations.
if (%T == 125) msg $chan Tauros is caught. Congratulations.
if (%T == 126) msg $chan Magikarp is caught. Congratulations.
if (%T == 126) msg $chan Gyrados is caught. Congratulations.
if (%T == 126) msg $chan Lapras is caught. Congratulations.
if (%T == 126) msg $chan Ditto is caught. Congratulations.
if (%T == 127) msg $chan Eevee is caught. Congratulations.
if (%T == 128) msg $chan Vaporeaon is caught. Congratulations.
if (%T == 129) msg $chan Flareon is caught. Congratulations.
if (%T == 130) msg $chan Porygon is caught. Congratulations.
if (%T == 131) msg $chan Omanyte is caught. Congratulations.
if (%T == 132) msg $chan Omastar is caught. Congratulations.
if (%T == 133) msg $chan Kabuto is caught. Congratulations.
if (%T == 134) msg $chan Kabutops is caught. Congratulations.
if (%T == 135) msg $chan Aerodactyl is caught. Congratulations.
if (%T == 136) msg $chan Snorlax is caught. Congratulations.
if (%T == 137) msg $chan Articuno is caught. Congratulations.
if (%T == 138) msg $chan Zapdos is caught. Congratulations.
if (%T == 139) msg $chan Moltres is caught. Congratulations.
if (%T == 140) msg $chan Dratini is caught. Congratulations.
if (%T == 141) msg $chan Dragonair is caught. Congratulations.
if (%T == 142) msg $chan Dragonite is caught. Congratulations.
if (%T == 143) msg $chan Mewtwo is caught. Congratulations.
if (%T == 144) msg $chan Mew is caught. Congratulations.
if (%T == 145) msg $chan Togetpi is caught. Congratulations.
if (%T == 146) msg $chan Bulbasaur escaped from the pokeball. Darn it!
if (%T == 147) msg $chan Ivysaur escaped from the pokeball. Darn it!
if (%T == 148) msg $chan Venasaur escaped from the pokeball. Darn it!
if (%T == 149) msg $chan Charmander escaped from the pokeball. Darn it!
if (%T == 150) msg $chan Charmeleon escaped from the pokeball. Darn it!
if (%T == 151) msg $chan Charzard escaped from the pokeball. Darn it!
if (%T == 152) msg $chan Squirtle escaped from the pokeball. Darn it!
if (%T == 153) msg $chan Wartortle escaped from the pokeball. Darn it!
if (%T == 154) msg $chan Blastoise escaped from the pokeball. Darn it!
if (%T == 155) msg $chan Caterpie escaped from the pokeball. Darn it!
if (%T == 156) msg $chan Metapod escaped from the pokeball. Darn it!
if (%T == 157) msg $chan Butterfree escaped from the pokeball. Darn it!
if (%T == 158) msg $chan Weedle escaped from the pokeball. Darn it!
if (%T == 159) msg $chan Kakuna escaped from the pokeball. Darn it!
if (%T == 160) msg $chan Beedrill escaped from the pokeball. Darn it!
if (%T == 161) msg $chan Pidgey escaped from the pokeball. Darn it!
if (%T == 162) msg $chan Pidgeotto escaped from the pokeball. Darn it!
if (%T == 163) msg $chan Pidgeot escaped from the pokeball. Darn it!
if (%T == 164) msg $chan Rattata escaped from the pokeball. Darn it!
if (%T == 165) msg $chan Raticate escaped from the pokeball. Darn it!
if (%T == 166) msg $chan Spearow escaped from the pokeball. Darn it!
if (%T == 167) msg $chan Fearow escaped from the pokeball. Darn it!
if (%T == 168) msg $chan Ekans escaped from the pokeball. Darn it!
if (%T == 169) msg $chan Arbok escaped from the pokeball. Darn it!
if (%T == 170) msg $chan Pikachu escaped from the pokeball. Darn it!
if (%T == 171) msg $chan Raichu escaped from the pokeball. Darn it!
if (%T == 172) msg $chan Sandshrew escaped from the pokeball. Darn it!
if (%T == 173) msg $chan Sandslash escaped from the pokeball. Darn it!
if (%T == 174) msg $chan Nidoran escaped from the pokeball. Darn it!
if (%T == 175) msg $chan Nidorina escaped from the pokeball. Darn it!
if (%T == 176) msg $chan Nidoqueen escaped from the pokeball. Darn it!
if (%T == 177) msg $chan Nidorino escaped from the pokeball. Darn it!
if (%T == 178) msg $chan Nidoking escaped from the pokeball. Darn it!
if (%T == 179) msg $chan Clefairy escaped from the pokeball. Darn it!
if (%T == 180) msg $chan Clefable escaped from the pokeball. Darn it!
if (%T == 181) msg $chan Vulpix escaped from the pokeball. Darn it!
if (%T == 182) msg $chan Ninetales escaped from the pokeball. Darn it!
if (%T == 183) msg $chan Jigglypuff escaped from the pokeball. Darn it!
if (%T == 184) msg $chan Wigglytuff escaped from the pokeball. Darn it!
if (%T == 185) msg $chan Zubat escaped from the pokeball. Darn it!
if (%T == 186) msg $chan Golbat escaped from the pokeball. Darn it!
if (%T == 187) msg $chan Oddish escaped from the pokeball. Darn it!
if (%T == 188) msg $chan Gloom escaped from the pokeball. Darn it!
if (%T == 189) msg $chan Vileplume escaped from the pokeball. Darn it!
if (%T == 190) msg $chan Paras escaped from the pokeball. Darn it!
if (%T == 191) msg $chan Parasect escaped from the pokeball. Darn it!
if (%T == 192) msg $chan Venonat escaped from the pokeball. Darn it!
if (%T == 193) msg $chan Venomoth escaped from the pokeball. Darn it!
if (%T == 194) msg $chan Diglett escaped from the pokeball. Darn it!
if (%T == 195) msg $chan Dugtrio escaped from the pokeball. Darn it!
if (%T == 196) msg $chan Meowth escaped from the pokeball. Darn it!
if (%T == 197) msg $chan Persian escaped from the pokeball. Darn it!
if (%T == 198) msg $chan Psyduck escaped from the pokeball. Darn it!
if (%T == 199) msg $chan Golduck escaped from the pokeball. Darn it!
if (%T == 200) msg $chan Mankey escaped from the pokeball. Darn it!
if (%T == 201) msg $chan Primeape escaped from the pokeball. Darn it!
if (%T == 202) msg $chan Growlithe escaped from the pokeball. Darn it!
if (%T == 203) msg $chan Arcanine escaped from the pokeball. Darn it!
if (%T == 204) msg $chan Poliwag escaped from the pokeball. Darn it!
if (%T == 205) msg $chan Poliwhirl escaped from the pokeball. Darn it!
if (%T == 206) msg $chan Poliwrath escaped from the pokeball. Darn it!
if (%T == 207) msg $chan Abra escaped from the pokeball. Darn it!
if (%T == 208) msg $chan Kadabra escaped from the pokeball. Darn it!
if (%T == 209) msg $chan Alakazam escaped from the pokeball. Darn it!
if (%T == 210) msg $chan Machop escaped from the pokeball. Darn it!
if (%T == 211) msg $chan Machoke escaped from the pokeball. Darn it!
if (%T == 212) msg $chan Machamp escaped from the pokeball. Darn it!
if (%T == 213) msg $chan Bellsprout escaped from the pokeball. Darn it!
if (%T == 214) msg $chan Weepinbell escaped from the pokeball. Darn it!
if (%T == 215) msg $chan Victreebell escaped from the pokeball. Darn it!
if (%T == 216) msg $chan Tentacool escaped from the pokeball. Darn it!
if (%T == 217) msg $chan Tentacruel escaped from the pokeball. Darn it!
if (%T == 218) msg $chan Geodude escaped from the pokeball. Darn it!
if (%T == 219) msg $chan Graveler escaped from the pokeball. Darn it!
if (%T == 220) msg $chan Golem escaped from the pokeball. Darn it!
if (%T == 221) msg $chan Ponyta escaped from the pokeball. Darn it!
if (%T == 222) msg $chan Rapidash escaped from the pokeball. Darn it!
if (%T == 223) msg $chan Slowpoke escaped from the pokeball. Darn it!
if (%T == 224) msg $chan Slowbro escaped from the pokeball. Darn it!
if (%T == 225) msg $chan Magnemite escaped from the pokeball. Darn it!
if (%T == 226) msg $chan Magneton escaped from the pokeball. Darn it!
if (%T == 227) msg $chan Farfetch'd escaped from the pokeball. Darn it!
if (%T == 228) msg $chan Doduo escaped from the pokeball. Darn it!
if (%T == 229) msg $chan Dodrio escaped from the pokeball. Darn it!
if (%T == 230) msg $chan Seel escaped from the pokeball. Darn it!
if (%T == 231) msg $chan Dewgong escaped from the pokeball. Darn it!
if (%T == 232) msg $chan Grimer escaped from the pokeball. Darn it!
if (%T == 233) msg $chan Muk escaped from the pokeball. Darn it!
if (%T == 234) msg $chan Shellder escaped from the pokeball. Darn it!
if (%T == 235) msg $chan Cloyster escaped from the pokeball. Darn it!
if (%T == 236) msg $chan Gastly escaped from the pokeball. Darn it!
if (%T == 237) msg $chan Haunter escaped from the pokeball. Darn it!
if (%T == 238) msg $chan Gengar escaped from the pokeball. Darn it!
if (%T == 239) msg $chan Onix escaped from the pokeball. Darn it!
if (%T == 240) msg $chan Drowzee escaped from the pokeball. Darn it!
if (%T == 241) msg $chan Hypno escaped from the pokeball. Darn it!
if (%T == 242) msg $chan Krabby escaped from the pokeball. Darn it!
if (%T == 243) msg $chan Kingler escaped from the pokeball. Darn it!
if (%T == 244) msg $chan Voltorb escaped from the pokeball. Darn it!
if (%T == 245) msg $chan Electrode escaped from the pokeball. Darn it!
if (%T == 246) msg $chan Exeggcute escaped from the pokeball. Darn it!
if (%T == 247) msg $chan Exeggutor escaped from the pokeball. Darn it!
if (%T == 248) msg $chan Cubone escaped from the pokeball. Darn it!
if (%T == 249) msg $chan Marowak escaped from the pokeball. Darn it!
if (%T == 250) msg $chan Hitmonlee escaped from the pokeball. Darn it!
if (%T == 251) msg $chan Hitmonchan escaped from the pokeball. Darn it!
if (%T == 252) msg $chan Lickitung escaped from the pokeball. Darn it!
if (%T == 253) msg $chan Koffing escaped from the pokeball. Darn it!
if (%T == 254) msg $chan Weezing escaped from the pokeball. Darn it!
if (%T == 255) msg $chan Rhyhorn escaped from the pokeball. Darn it!
if (%T == 256) msg $chan Rhydon escaped from the pokeball. Darn it!
if (%T == 257) msg $chan Chansey escaped from the pokeball. Darn it!
if (%T == 258) msg $chan Tangela escaped from the pokeball. Darn it!
if (%T == 259) msg $chan Kangaskhan escaped from the pokeball. Darn it!
if (%T == 260) msg $chan Horsea escaped from the pokeball. Darn it!
if (%T == 261) msg $chan Seadra escaped from the pokeball. Darn it!
if (%T == 262) msg $chan Goldeen escaped from the pokeball. Darn it!
if (%T == 263) msg $chan Seaking escaped from the pokeball. Darn it!
if (%T == 264) msg $chan Staryu escaped from the pokeball. Darn it!
if (%T == 265) msg $chan Starmie escaped from the pokeball. Darn it!
if (%T == 266) msg $chan Mr. Mime escaped from the pokeball. Darn it!
if (%T == 267) msg $chan Scyther escaped from the pokeball. Darn it!
if (%T == 268) msg $chan Jynx escaped from the pokeball. Darn it!
if (%T == 269) msg $chan Electabuzz escaped from the pokeball. Darn it
if (%T == 270) msg $chan Magmar escaped from the pokeball. Darn it!
if (%T == 271) msg $chan Pinsar escaped from the pokeball. Darn it!
if (%T == 272) msg $chan Tauros escaped from the pokeball. Darn it!
if (%T == 273) msg $chan Magikarp escaped from the pokeball. Darn it!
if (%T == 274) msg $chan Gyrados escaped from the pokeball. Darn it!
if (%T == 275) msg $chan Lapras escaped from the pokeball. Darn it!
if (%T == 276) msg $chan Ditto escaped from the pokeball. Darn it!
if (%T == 277) msg $chan Eevee escaped from the pokeball. Darn it!
if (%T == 278) msg $chan Vaporeon escaped from the pokeball. Darn it!
if (%T == 279) msg $chan Jolteon escaped from the pokeball. Darn it!
if (%T == 280) msg $chan Flareon escaped from the pokeball. Darn it!
if (%T == 281) msg $chan Porygon escaped from the pokeball. Darn it!
if (%T == 282) msg $chan Omanyte escaped from the pokeball. Darn it!
if (%T == 283) msg $chan Omastar escaped from the pokeball. Darn it!
if (%T == 284) msg $chan Kabuto escaped from the pokeball. Darn it!
if (%T == 285) msg $chan Kabutops escaped from the pokeball. Darn it!
if (%T == 286) msg $chan Aerodactyl escaped from the pokeball. Darn it!
if (%T == 287) msg $chan Snorlax escaped from the pokeball. Darn it!
if (%T == 288) msg $chan Articuno escaped from the pokeball. Darn it!
if (%T == 289) msg $chan Zapdos escaped from the pokeball. Darn it!
if (%T == 290) msg $chan Moltres escaped from the pokeball. Darn it!
if (%T == 291) msg $chan Dratini escaped from the pokeball. Darn it!
if (%T == 292) msg $chan Dragonair escaped from the pokeball. Darn it!
if (%T == 293) msg $chan Dragonite escaped from the pokeball. Darn it!
if (%T == 294) msg $chan Dragonair escaped from the pokeball. Darn it!
if (%T == 295) msg $chan Mewtwo escaped from the pokeball. Darn it!
if (%T == 296) msg $chan Mew escaped from the pokeball. Darn it!
if (%T == 297) msg $chan Togetpi escaped from the pokeball. Darn it!
}
on *:text: !Credits:#:{
/set %T $rand(1,1)
if (%T == 1) msg $chan Made by LikeSeoul!
}
well for 1 there are way too many names to set to a var
so..
why not have it write all the names to a txt file on load like this
on *:load:{
if (!$isfile(pokenames.txt)) {
write pokenames.txt Bulbasaur
write pokenames.txt Ivysaur
write pokenames.txt Venasaur
write pokenames.txt Charmander
write pokenames.txt Charmeleon
write pokenames.txt Charzard
}
}
then you can just do
on *:text:!Pokemon:#:{ if (!%pokeflood) { set -u3 %pokeflood on | msg # $read(pokenames.txt) $gettok(is caught. Congratulations.|escaped from the pokeball. Darn it!,$r(1,2),124) } }
For starters, using var instead of set is a better method for what you have.
Second, this:
on *:text: !Credits:#:{
/set %T $rand(1,1)
if (%T == 1) msg $chan Made by LikeSeoul!
}
Can turn into:
on *:text:!Credits:#: msg $chan Made by LikeSeoul
I'm not quite sure how (I has forgot how to do this), but you can shorten allll those if (%t == blah) into:
on *:text: !Pokemon:#:{
msg $chan $gettok(%pokemon.list,$rand(1,297),32) $gettok(%pokemon.events,$rand(1,2),32)
}
Where %pokemon.list is the list of pokemon (seperated by a space):
e.g.
%pokemon.list = mew mewtwo
And %pokemon.events is either:
escaped from the pokeball. Darn it!
OR
is caught. Congratulations.
All in all, it's not bad. Seems like a lot of effort though.