pokecrystal-board/maps/MahoganyGym.asm

401 lines
7.8 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const MAHOGANYGYM_PRYCE
const MAHOGANYGYM_BUENA1
const MAHOGANYGYM_ROCKER1
const MAHOGANYGYM_BUENA2
const MAHOGANYGYM_ROCKER2
const MAHOGANYGYM_ROCKER3
const MAHOGANYGYM_GYM_GUY
2015-07-10 00:00:27 -07:00
MahoganyGym_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 0
2015-07-10 00:00:27 -07:00
PryceScript_0x199a9e:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2013-09-24 00:48:58 -07:00
checkevent EVENT_BEAT_PRYCE
2015-07-10 00:00:27 -07:00
iftrue .FightDone
2017-10-25 22:22:20 -07:00
writetext PryceText_Intro
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2017-10-25 22:22:20 -07:00
winlosstext PryceText_Impressed, 0
loadtrainer PRYCE, 1
startbattle
reloadmapafterbattle
2013-09-24 00:48:58 -07:00
setevent EVENT_BEAT_PRYCE
2015-12-09 15:25:44 -08:00
opentext
2017-10-25 22:22:20 -07:00
writetext Text_ReceivedGlacierBadge
playsound SFX_GET_BADGE
2015-11-25 07:16:29 -08:00
waitsfx
2015-07-10 00:00:27 -07:00
setflag ENGINE_GLACIERBADGE
checkcode VAR_BADGES
scall MahoganyGymActivateRockets
.FightDone:
2013-09-24 00:48:58 -07:00
checkevent EVENT_GOT_TM16_ICY_WIND
2017-10-25 22:22:20 -07:00
iftrue PryceScript_Defeat
2013-09-24 00:48:58 -07:00
setevent EVENT_BEAT_SKIER_ROXANNE
setevent EVENT_BEAT_SKIER_CLARISSA
setevent EVENT_BEAT_BOARDER_RONALD
setevent EVENT_BEAT_BOARDER_BRAD
setevent EVENT_BEAT_BOARDER_DOUGLAS
2017-10-25 22:22:20 -07:00
writetext PryceText_GlacierBadgeSpeech
2015-11-29 19:29:45 -08:00
buttonsound
2015-11-04 17:20:14 -08:00
verbosegiveitem TM_ICY_WIND
2017-10-25 22:22:20 -07:00
iffalse MahoganyGym_NoRoomForIcyWind
2013-09-24 00:48:58 -07:00
setevent EVENT_GOT_TM16_ICY_WIND
2017-10-25 22:22:20 -07:00
writetext PryceText_IcyWindSpeech
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2017-10-25 22:22:20 -07:00
PryceScript_Defeat:
writetext PryceText_CherishYourPokemon
2015-11-25 07:16:29 -08:00
waitbutton
2017-10-25 22:22:20 -07:00
MahoganyGym_NoRoomForIcyWind:
2015-11-25 07:16:29 -08:00
closetext
end
MahoganyGymActivateRockets:
2015-07-10 00:00:27 -07:00
if_equal 7, .RadioTowerRockets
if_equal 6, .GoldenrodRockets
end
.GoldenrodRockets:
2015-06-24 18:26:24 -07:00
jumpstd goldenrodrockets
.RadioTowerRockets:
2015-06-24 18:26:24 -07:00
jumpstd radiotowerrockets
2015-07-10 00:00:27 -07:00
TrainerSkierRoxanne:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_SKIER_ROXANNE, SKIER, ROXANNE, SkierRoxanneSeenText, SkierRoxanneBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext SkierRoxanneAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
TrainerSkierClarissa:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_SKIER_CLARISSA, SKIER, CLARISSA, SkierClarissaSeenText, SkierClarissaBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext SkierClarissaAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
TrainerBoarderRonald:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_BOARDER_RONALD, BOARDER, RONALD, BoarderRonaldSeenText, BoarderRonaldBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext BoarderRonaldAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
TrainerBoarderBrad:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_BOARDER_BRAD, BOARDER, BRAD, BoarderBradSeenText, BoarderBradBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext BoarderBradAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
TrainerBoarderDouglas:
2017-12-17 17:45:04 -08:00
trainer EVENT_BEAT_BOARDER_DOUGLAS, BOARDER, DOUGLAS, BoarderDouglasSeenText, BoarderDouglasBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext BoarderDouglasAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 00:00:27 -07:00
MahoganyGymGuyScript:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2013-09-24 00:48:58 -07:00
checkevent EVENT_BEAT_PRYCE
iftrue .MahoganyGymGuyWinScript
2015-01-20 00:01:23 -08:00
writetext MahoganyGymGuyText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.MahoganyGymGuyWinScript:
2015-01-20 00:01:23 -08:00
writetext MahoganyGymGuyWinText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-06-24 20:51:36 -07:00
MahoganyGymStatue:
checkflag ENGINE_GLACIERBADGE
iftrue .Beaten
2015-06-24 18:26:24 -07:00
jumpstd gymstatue1
.Beaten:
trainertotext PRYCE, 1, $1
2015-06-24 18:26:24 -07:00
jumpstd gymstatue2
2017-10-25 22:22:20 -07:00
PryceText_Intro:
text "#MON have many"
line "experiences in"
para "their lives, just "
line "like we do. "
para "I, too, have seen"
line "and suffered much"
cont "in my life."
para "Since I am your"
line "elder, let me show"
cont "you what I mean."
para "I have been with"
line "#MON since"
para "before you were"
line "born."
para "I do not lose"
line "easily."
para "I, PRYCE--the"
line "winter trainer--"
para "shall demonstrate"
line "my power!"
done
2017-10-25 22:22:20 -07:00
PryceText_Impressed:
text "Ah, I am impressed"
line "by your prowess."
para "With your strong"
line "will, I know you"
para "will overcome all"
line "life's obstacles."
para "You are worthy of"
line "this BADGE!"
done
2017-10-25 22:22:20 -07:00
Text_ReceivedGlacierBadge:
text "<PLAYER> received"
line "GLACIERBADGE."
done
2017-10-25 22:22:20 -07:00
PryceText_GlacierBadgeSpeech:
text "That BADGE will"
line "raise the SPECIAL"
cont "stats of #MON."
para "It also lets your"
line "#MON use WHIRL-"
cont "POOL to get across"
cont "real whirlpools."
para "And this… This is"
line "a gift from me!"
done
2017-10-25 22:22:20 -07:00
PryceText_IcyWindSpeech:
text "That TM contains"
line "ICY WIND."
para "It inflicts damage"
line "and lowers speed."
para "It demonstrates"
line "the harshness of"
cont "winter."
done
2017-10-25 22:22:20 -07:00
PryceText_CherishYourPokemon:
text "When the ice and"
line "snow melt, spring"
cont "arrives."
para "You and your #-"
line "MON will be to-"
para "gether for many"
line "years to come."
para "Cherish your time"
line "together!"
done
2015-07-10 00:00:27 -07:00
BoarderRonaldSeenText:
text "I'll freeze your"
line "#MON, so you"
cont "can't do a thing!"
done
2015-07-10 00:00:27 -07:00
BoarderRonaldBeatenText:
text "Darn. I couldn't"
line "do a thing."
done
2017-12-10 12:36:58 -08:00
BoarderRonaldAfterBattleText:
text "I think there's a"
line "move a #MON"
para "can use while it's"
line "frozen."
done
2015-07-10 00:00:27 -07:00
BoarderBradSeenText:
text "This GYM has a"
line "slippery floor."
para "It's fun, isn't"
line "it?"
para "But hey--we're"
line "not playing games"
cont "here!"
done
2015-07-10 00:00:27 -07:00
BoarderBradBeatenText:
text "Do you see how"
line "serious we are?"
done
2017-12-10 12:36:58 -08:00
BoarderBradAfterBattleText:
text "This GYM is great."
line "I love boarding"
cont "with my #MON!"
done
2015-07-10 00:00:27 -07:00
BoarderDouglasSeenText:
text "I know PRYCE's"
line "secret."
done
2015-07-10 00:00:27 -07:00
BoarderDouglasBeatenText:
text "OK. I'll tell you"
line "PRYCE's secret."
done
2017-12-10 12:36:58 -08:00
BoarderDouglasAfterBattleText:
text "The secret behind"
line "PRYCE's power…"
para "He meditates under"
line "a waterfall daily"
para "to strengthen his"
line "mind and body."
done
2015-07-10 00:00:27 -07:00
SkierRoxanneSeenText:
text "To get to PRYCE,"
line "our GYM LEADER,"
para "you need to think"
line "before you skate."
done
2015-07-10 00:00:27 -07:00
SkierRoxanneBeatenText:
text "I wouldn't lose to"
line "you in skiing!"
done
2017-12-10 12:36:58 -08:00
SkierRoxanneAfterBattleText:
text "If you don't skate"
line "with precision,"
para "you won't get far"
line "in this GYM."
done
2015-07-10 00:00:27 -07:00
SkierClarissaSeenText:
text "Check out my"
line "parallel turn!"
done
2015-07-10 00:00:27 -07:00
SkierClarissaBeatenText:
text "No! You made me"
line "wipe out!"
done
2017-12-10 12:36:58 -08:00
SkierClarissaAfterBattleText:
text "I shouldn't have"
line "been bragging"
cont "about my skiing…"
done
2015-07-10 00:00:27 -07:00
MahoganyGymGuyText:
text "PRYCE is a veteran"
line "who has trained"
para "#MON for some"
line "50 years."
para "He's said to be"
line "good at freezing"
para "opponents with"
line "ice-type moves."
para "That means you"
line "should melt him"
para "with your burning"
line "ambition!"
done
2015-07-10 00:00:27 -07:00
MahoganyGymGuyWinText:
text "PRYCE is some-"
line "thing, but you're"
cont "something else!"
para "That was a hot"
line "battle that"
para "bridged the gen-"
line "eration gap!"
done
2015-07-10 00:00:27 -07:00
MahoganyGym_MapEventHeader:
; filler
db 0, 0
.Warps:
db 2
warp_def 4, 17, 3, MAHOGANY_TOWN
warp_def 5, 17, 3, MAHOGANY_TOWN
.CoordEvents:
db 0
.BGEvents:
db 2
bg_event 3, 15, BGEVENT_READ, MahoganyGymStatue
bg_event 6, 15, BGEVENT_READ, MahoganyGymStatue
.ObjectEvents:
db 7
object_event 5, 3, SPRITE_PRYCE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, PryceScript_0x199a9e, -1
object_event 4, 6, SPRITE_BUENA, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerSkierRoxanne, -1
object_event 0, 17, SPRITE_ROCKER, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerBoarderRonald, -1
object_event 9, 17, SPRITE_BUENA, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerSkierClarissa, -1
object_event 5, 9, SPRITE_ROCKER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerBoarderBrad, -1
object_event 2, 4, SPRITE_ROCKER, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerBoarderDouglas, -1
object_event 7, 15, SPRITE_GYM_GUY, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, MahoganyGymGuyScript, -1