The Random Club!

Status
Not open for further replies.
*Neo in a pkmn battle arena*
"I can see it now. I can see the Pkmn Matrix"
CASE "PSYWAVE": DAMAGE = -(INT(RND * MACLV) + INT(MACLV * .5)): MISSCHANCES = 90
CASE "COUNTER"
IF WATK = 0 THEN DAMAGE = -MLASTDAMG: MLASTDAMG = 0 ELSE DAMAGE = -WLASTDAMG: WLASTDAMG = 0
IF DAMAGE = 0 THEN FAILNOTE: DAMAGE = 0
CASE "REVENGE"
MISSCHANCES = 100
DAMAGE = 60
IF WATK = 0 AND MLASTDAMG3 > 0 THEN MLASTDAMG3 = 0: DAMAGE = DAMAGE * 2
IF WATK = 1 AND WLASTDAMG3 > 0 THEN WLASTDAMG3 = 0: DAMAGE = DAMAGE * 2
CASE "MIRROR COAT": IF WATK = 0 THEN DAMAGE = -MLASTDAMG2: MLASTDAMG2 = 0 ELSE DAMAGE = -WLASTDAMG2: WLASTDAMG2 = 0
IF DAMAGE = 0 THEN FAILNOTE
CASE "SPLASH": DAMAGE = 0: MISSCHANCES = NEVER: TX$ = "No effect!": TXM
CASE "CONVERSION2": DAMAGE = 0: MISSCHANCES = NEVER
IF WATK = 0 AND MLSTYPE$ = "" THEN FAILNOTE: GOTO 91
IF WATK = 1 AND WLSTYPE$ = "" THEN FAILNOTE: GOTO 91
IF WATK = 0 THEN MACTYPEA$ = MLSTYPE$: MACTYPEB$ = MLSTYPE$: TX$ = "Converted to " + MLSTYPE$ + "-type!": TXM
IF WATK = 1 THEN WTYPEA$ = WLSTYPE$: WTYPEB$ = WLSTYPE$: TX$ = "Converted to " + WLSTYPE$ + "-type!": TXM
CASE "CONVERSION": DAMAGE = 0: MISSCHANCES = NEVER
IF WATK = 0 THEN MACTYPEA$ = WTYPEA$: MACTYPEB$ = WTYPEB$: TX$ = "Converted into " + WENM$ + WPKMN$ + "'s type!": TXM
IF WATK = 1 THEN WTYPEA$ = MACTYPEA$: WTYPEB$ = MACTYPEB$: TX$ = "Converted into " + WENM$ + WPKMN$ + "'s type!": TXM
CASE "DREAM EATER": DAMAGE = 0: MISSCHANCES = NEVER
IF WATK = 0 AND WSP = 0 THEN FAILNOTE: GOTO 91
IF WATK = 1 AND MACSP = 0 THEN FAILNOTE: GOTO 91
DAMAGE = 100: SLEEPATK = 1
CASE "MIRROR MOVE": DAMAGE = 0: MISSCHANCES = NEVER
RELINE
IF WATK = 0 THEN
IF WAAB$ = "" THEN ATTACK$ = WAAA$: RANDOMATK = 1
IF WAAB$ <> "" AND WAAC$ = "" THEN RANDOMATK = 2
IF WAAC$ <> "" AND WAAD$ = "" THEN RANDOMATK = 3
IF WAAD$ <> "" THEN RANDOMATK = 4
IF RANDOMATK <> 1 THEN RANDOMUSE = INT(RND * RANDOMATK) + 1
IF RANDOMUSE = 1 THEN ATTACK$ = WAAA$
IF RANDOMUSE = 2 THEN ATTACK$ = WAAB$
IF RANDOMUSE = 3 THEN ATTACK$ = WAAC$
IF RANDOMUSE = 4 THEN ATTACK$ = WAAD$
IF ATTACK$ = "MIRROR MOVE" OR ATTACK$ = "SKETCH" THEN TX$ = "The MIRROR MOVE failed!": TXM: ATTACK$ = "MIRROR MOVE": GOTO 91
ONLYONELOSE = 1
END IF
IF WATK = 1 THEN
USEAK = 1
IF ACKB$ <> "" THEN USEAK = USEAK + 1
IF ACKC$ <> "" THEN USEAK = USEAK + 1
IF ACKD$ <> "" THEN USEAK = USEAK + 1
IUTA = INT(RND * USEAK) + 1
IF IUTA = 1 THEN ATTACK$ = ACKA$
IF IUTA = 2 THEN ATTACK$ = ACKB$
IF IUTA = 3 THEN ATTACK$ = ACKC$
IF IUTA = 4 THEN ATTACK$ = ACKD$
IF ATTACK$ = "MIRROR MOVE" OR ATTACK$ = "SKETCH" THEN TX$ = "The MIRROR MOVE failed!": TXM: ATTACK$ = "MIRROR MOVE": GOTO 91
END IF
GONOTCOM = 1
METRONUSEPROT = 1

*gets hit by a flying toaster and faints*
Arbiter: "Metapod wins!"
 
*bashes a loaf of bread with a sledge hammer until it melts* o.0
 
*Throws cannonballs everywhere*
Beach party! o.o
 
*Pokes herself*
I'm possesed by an evil monkey spirit!
 
Eeeep! Monkey! *Mega Flares monkey who was playing with the PC server* That oughtta teach 'im ta lag PC! *net crashes* o.0
 
*eats the trashcan* Well it tastes better than SPAM... o.0
 
*Starts to dance around like cheese*
Lookie! I'm doing the cheese dance!
 
tarararara*HEY!!*tararara...taradadada*HEY!!*tararara
 
*Pokes Manectric_chief with a spork*
Can YOU do the cheese dance?
 
I can do something better *does the spring "GResogte" dance*
 
*sings the GetMaxRes() song and watches everyone in the concert hall go dillerious*
Who's yar programmer? Who's yar programmer????
*ctrl+break*
*dies* X_X
 
Ooooh! I do! *eats soap cake and spits out bubbles* Bubblebeam!!!! Wheeee! Aquatic Charizard! o.0
 
*dreeses up like a pirate and rides around on a tricycle*
 
Foooooooooore!
*whacks the microwave oven out the window with his tail* o.0
 
Status
Not open for further replies.
Back
Top