The Random Club!

Status
Not open for further replies.
Here you go... *Tosses a giant bottle of mustard down the cliff into the cheeze pool* o.o
 
Oo! Oo! Me wants to joinnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn! Bananas taste like qqwwqqwwMILK.
 
Ok then, welcome to the club! *Gives a random Pipo helmet* o.o
 
Sure! Welcome to the club! *Gives a Pikabloo plushie* o.o
 
Rrrrrrraaaaaannnnndddddddddooooooommmmmmmm is as random random random random random dddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddoes
 
omg @ this topic... lol, just the place for me... haha, and it took me this long to find the random club... lemme join. :P
 
*thrashes his refrigerator looking for milk*
Yay! Found it! ^_^
*pours it all over his face and waits for it to turn to cheese*
 
Welcome to the club! *Pours molten hot lava on everyone's head* o.o
 
OH! Nice!! ^_^ Us Dragons love lava. ^_^ *licks it off his head* *pours lava on his Charizard*
Now this should get interesting... ^_^
 
*Head is on fire* This is fun... I love being on fire o.o
 
Wheeee! ^_^ *posts a piece of his pkmn game's code*

SUB WQATTK
WQATTACK = 0: WQATTACK1 = 0: WQATTACK2 = 0: WQATTACK3 = 0: WQATTACK4 = 0: WQATTACK5 = 0: WQATTACK6 = 0: WQATTACK7 = 0: WQATTACK8 = 0: WQATTACK9 = 0: WSATTACK = 0: WSATTACK1 = 0: WSATTACK2 = 0: WSATTACK3 = 0: WSLPATTACK = 0: WSLPATTACK1 = 0
IF (WSPEC$ <> "" AND WSPEC$ <> "FOCUS PUNCH") OR WTRUANT = 1 OR WRECHARGE = 1 OR WCOUNTDOWN > 0 OR WRAGE = 1 OR US5M > 0 OR ENPP = 0 THEN EXIT SUB
MARK1 = 0: MARK2 = 0: MARK3 = 0: MARK4 = 0: SMARK1 = 0: SMARK2 = 0: SMARK3 = 0: SMARK4 = 0: SLPMARK1 = 0: SLPMARK2 = 0: SLPMARK3 = 0: SLPMARK4 = 0
RUNAWAYPKMN = 0
ATRAP = 0
IF WABILITY("MAGNET PULL") AND (WTYPEA$ = "STEEL" OR WTYPEB$ = "STEEL") THEN ATRAP = 1
IF WABILITY("ARENA TRAP") AND WPKABILITY$ <> "WINGS" AND WPKABILITY$ <> "LEVITATE" AND WTYPEA$ <> "FLYING" AND WTYPEB$ <> "FLYING" THEN ATRAP = 1
IF WABILITY("SHADOW TAG") THEN ATRAP = 1
IF FLEE <> 0 THEN RUNAWAYPKMN = INT(RND * FLEE) + 1
IF US5M > 0 THEN RUNAWAYPKMN = 0
IF TRAINER = 1 OR ATRAP = 1 OR WCNTR = 1 THEN RUNAWAYPKMN = 0
IF RUNAWAYPKMN <> 0 THEN RUNAWAYPKMN = 1: EXIT SUB

...'nebody here know QBASIC? o.0 ... XD
 
Status
Not open for further replies.
Back
Top