Charizard_Fire_God
Banned
- 5,552
- Posts
- 20
- Years
- Age 37
- To the Stars...
- Seen Dec 25, 2005
*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!"
"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!"