#org $script
jingle
checkgender
compare 0x800D 0x0000
if 0x01 goto $boy
compare 0x800D 0x0001
if 0x01 goto $girl
release
end
#org $boy
clearflag 0x1505
clearflag 0x1506
clearflag 0x1507
showsprite 9
applymovement 9 $GHTHTG
$GHTHTG 1 ; #binary 0x10 0x10 0x10 0x10 0x10 0x10 0x12 0x10 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x62 0xFE
pausemove 0
applymovement 0xFF $move
$move 1 ; #binary 0x03 0x62 0xFE
pausemove 0
message $oak
$oak 1 = Hello \v\h01, Long time \nno see. \pAn old friend of mine named \nAsh Ketchum,who's very much \plike you,gave me his favorite \n pokemon because he's \pquitting being a trainer to \nbecome a pkmn researcher, \plike myself.
boxset 6
showsprite 8
applymovement 8 $garymove
$garymove 1 ; #binary 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x11 0x12 0x12 0x04 0xFE
pausemove 0
showsprite 7
applymovement 7 $brendonmove
$brendonmove 1 ; #binary 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0xFE
pausemove 0
message $oak1
$oak1 1 = Ahhhhh, Brendon, \v\h06, \nyou're here. \p \v\h06: Why are we here? \pBrendon: Yeah, why are we \nhere? \pOAK: You're here because, \nI'm going to give one of you, \p a very special and STRONG \npokemon. \p \v\h01, you,gary or \nbrendon will get this pokemon. \pTo decide who get's it, \nyou'll have a small tourney. \pFirst, Gary and brendon will \nbattle and the winner will \pface you. \pYou're gonna be in the finals \n since \v\h06 and brendon \phave never defeated you in \nbattle. \pThe winner of the tourney \nwill recieve that pokemon \pand two mystery prizes that \ni haven't told you about yet.
boxset 6
applymovement 7 $bmove
$bmove 1 ; #binary 0x12 0x12 0x11 0x03 0xFE
pausemove 0
applymovement 8 $gmove
$gmove 1 ; #binary 0x13 0x13 0x13 0x02 0xFE
pausemove 0
applymovement 9 $omove
$omove 1 ; #binary 0x01 0xFE
applymovement 0xFF $omove
pausemove 0
message $battle
$battle 1 = \v\h06: Ready to lose \nbrendon? \pBrendon:Don't get to cocky. \pOAK:Let the battle ... \pBEGIN!
boxset 6
setflag 0x1505
setflag 0x1506
setflag 0x1507
setvar 0x6003 0x0001
goto $GBbattle90
release
end
#org $GBbattle90
applymovement 8 $gbattle234
$gbattle234 1 ; #binary 0x54 0x54 0xFE
pausemove 0
applymovement 7 $bbattle
$bbattle 1 ; #binary 0x55 0x55 0xFE
pausemove 0
applymovement 8 $gbattle1
$gbattle1 1 ; #binary 0x54 0x54 0x54 0xFE
pausemove 0
applymovement 7 $bbattle1
$bbattle1 1 ; #binary 0x55 0x55 0x55 0xFE
pausemove 0
applymovement 8 $gbattle2
$gbattle2 1 ; #binary 0x54 0xFE
pausemove 0
applymovement 7 $bbattle2
$bbattle2 1 ; #binary 0x55 0xFE
pausemove 0
message $bbb
$bbb 1 = Brendon: GO Rayquaza! \p \v\h06:Noooooooooooooo!
boxset 6
applymovement 8 $gbattle3
$gbattle3 1 ; #binary 0x51 0xFE
pausemove 0
goto $ready
release
end
#org $ready
applymovement 8 $defeat
$defeat 1 ; #binary 0x10 0x12 0x12 0xFE
pausemove 0
message $bsttle
$bsttle 1 = \v\h01: My turn. \pBrendon:I hope you're tougher \n than \v\h06. \p \v\h01:Don't worry. \pI am!
boxset 6
applymovement 0xFF $bsttle2
$bsttle2 1 ; #binary 0x11 0x13 0x13 0x13 0xFE
pausemove 0
goto $back
release
end
#org $back
trainerbattle 0x01 0x47 $see $win $further
$see 1 = Oak: \v\h01, Brendon, \nyou ready? \pO.K., then let this battle \p BEGIN!
$win 1 = Brendon: How is that possible? \p \v\h01, You beat my 6 \nlegendary pokemon! \pI knew you got better, but \nthat's just insane.
message $after
$after 1 = Oak: here you go.
boxset 6
release
end
#org $further
applymovement 9 $poke
$poke 1 ; #binary 0x11 0x13 0xFE
pausemove 0
message $after
boxset 6
givepokemon 25 88 0xCA
fanfare 0x13E
message $poke!
$poke! 1 = \v\h01 received a Pikachu \nfrom Prof. Oak!
boxset 4
waitfanfare
goto $bonus
release
end
#org $bonus
message $bonus1
$bonus1 1 = OAK:Now for your bonus gifts! \pTheir both pokemon.
boxset 6
givepokemon 232 85 0x00
fanfare 0x13E
message $poke!2
$poke!2 1 = \v\h01 received a Donphan \nfrom Prof. Oak!
boxset 4
waitfanfare
givepokemon 279 87 0x00
fanfare 0x13E
message $poke!3
$poke!3 1 = \v\h01 received a Sceptile \nfrom Prof. Oak!
boxset 4
waitfanfare
message $buhbye
$buhbye 1 = Brendon:I got to get back \nto Hoenn . \p \v\h06:I have to get back \nto the Indigo plateau. \p OAK:I need to continue my \nresearch at my lab in Pallet. \pOak, Brendon, and \v\h06: Cya!
boxset 6
goto $end
release
end
#org $end
fadescreen 1
removesprite 8
removesprite 9
removesprite 7
removesprite 10
pause 0x20
fadescreen 0
release
end
#org $girl
clearflag 0x1505
clearflag 0x1506
clearflag 0x1508
showsprite 9
applymovement 9 $oakmove8
$oakmove8 1 ; #binary 0x10 0x10 0x10 0x10 0x10 0x10 0x12 0x10 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x62 0xFE
pausemove 0
applymovement 0xFF $move8
$move8 1 ; #binary 0x03 0x62 0xFE
pausemove 0
message $oak8
$oak8 1 = Hello \v\h01, Long time \nno see. \pAn old friend of mine named \nMisty, gave me her favorite \ppokemon because she's \nquitting being a trainer to \pbecome a pkmn researcher, \nlike myself.
boxset 6
showsprite 8
applymovement 8 $garymove8
$garymove8 1 ; #binary 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x12 0x11 0x12 0x12 0x04 0xFE
pausemove 0
showsprite 10
applymovement 10 $maymove
$maymove 1 ; #binary 0x13 0x11 0x13 0x13 0x13 0x13 0x13 0x13 0xFE
pausemove 0
message $oak18
$oak18 1 = Ahhhhh, May, \v\h06, \nyou're here. \p \v\h06: Why are we here? \pMay: Yeah, why are we here? \pOAK: You're here because, \nI'm going to give one of you, \p a very special and STRONG \npokemon. \p \v\h01, you,gary or May \nwill get this pokemon. \pTo decide who get's it, you'll \nhave a small tourney. \pFirst, Gary and May will \nbattle and the winner will \pface \v\h01. \p\v\h01 is gonna be in the \nfinals since \v\h06 and May \phave never defeated \v\h01 in \nbattle. \pThe winner of the tourney \nwill recieve that pokemon \pand two mystery prizes that \ni haven't told you about yet.
boxset 6
applymovement 10 $mmove
$mmove 1 ; #binary 0x12 0x12 0x11 0x03 0xFE
pausemove 0
applymovement 8 $gmove8
$gmove8 1 ; #binary 0x13 0x13 0x13 0x02 0xFE
pausemove 0
applymovement 9 $omove8
$omove8 1 ; #binary 0x01 0xFE
applymovement 0xFF $omove8
pausemove 0
message $battle8
$battle8 1 = \v\h06: Ready to lose May? \pMay:Don't get to cocky. \pOAK:Let the battle ... \pBEGIN!
boxset 6
setflag 0x1505
setflag 0x1506
setflag 0x1508
setvar 0x6003 0x0001
goto $GMbattlehhh
release
end
#org $GMbattlehhh
applymovement 8 $gbattle8
$gbattle8 1 ; #binary 0x54 0x54 0xFE
pausemove 0
applymovement 10 $mbattle
$mbattle 1 ; #binary 0x55 0x55 0xFE
pausemove 0
applymovement 8 $gbattle18
$gbattle18 1 ; #binary 0x54 0x54 0x54 0xFE
pausemove 0
applymovement 10 $mbattle1
$mbattle1 1 ; #binary 0x55 0x55 0x55 0xFE
pausemove 0
applymovement 8 $gbattle28
$gbattle28 1 ; #binary 0x54 0xFE
pausemove 0
applymovement 10 $mbattle2
$mbattle2 1 ; #binary 0x55 0xFE
pausemove 0
message $bbb8
$bbb8 1 = May: GO Mewtwo! \p \v\h06:Noooooooooooooo!
boxset 6
applymovement 8 $gbattle38
$gbattle38 1 ; #binary 0x51 0xFE
pausemove 0
goto $ready
release
end
#org $ready
applymovement 8 $defeat8
$defeat8 1 ; #binary 0x10 0x12 0x12 0xFE
pausemove 0
message $bsttle8
$bsttle8 1 = \v\h01: My turn. \pBrendon:I hope you're \ntougher than \v\h06. \p \v\h01:Don't worry. \pI am!
boxset 6
applymovement 0xFF $bsttle28
$bsttle28 1 ; #binary 0x11 0x13 0x13 0x13 0xFE
pausemove 0
goto $back
release
end
#org $back
trainerbattle 0x01 0x48 $see8 $win8 $further8
$see8 1 = Oak: \v\h01, May, you ready? \pO.K., then let this battle \p BEGIN!
$win8 1 = How is that possible? \p \v\h01, You beat my 6 \nlegendary pokemon! \pI knew you were good, but \nthat's just insane!
message $after8
$after8 1 = Oak: here you go.
boxset 6
release
end
#org $further8
applymovement 9 $poke
$poke 1 ; #binary 0x11 0x13 0xFE
pausemove 0
message $after
boxset 6
givepokemon 121 88 0xCA
fanfare 0x13E
message $poke!6
$poke!6 1 = \v\h01 received a Starmie \nfrom Prof. Oak!
boxset 4
waitfanfare
goto $bonus8
release
end
#org $bonus8
message $bonus18
$bonus1 1 = OAK:Now for your bonus gifts! \pTheir both pokemon.
boxset 6
givepokemon 186 85 0x00
fanfare 0x13E
message $poke!28
$poke!28 1 = \v\h01 received a Politoed \nfrom Prof. Oak!
boxset 4
waitfanfare
givepokemon 130 87 0x00
fanfare 0x13E
message $poke!3
$poke!3 1 = \v\h01 received a Gyrados \nfrom Prof. Oak!
boxset 4
waitfanfare
message $buhbye8
$buhbye8 1 = May:I got to get back to \nHoenn. \p \v\h06:I have to get back \nto the Indigo plateau. \p OAK:I need to continue my \nresearch at my lab in Pallet. \pOak, May, and \v\h06: Cya!
boxset 6
goto $end
release
end