pokecrystal-board/maps/FuchsiaGym.asm
2020-07-24 09:57:16 -04:00

401 lines
8.2 KiB
NASM

object_const_def
const FUCHSIAGYM_JANINE
const FUCHSIAGYM_FUCHSIA_GYM_1
const FUCHSIAGYM_FUCHSIA_GYM_2
const FUCHSIAGYM_FUCHSIA_GYM_3
const FUCHSIAGYM_FUCHSIA_GYM_4
const FUCHSIAGYM_GYM_GUIDE
FuchsiaGym_MapScripts:
def_scene_scripts
def_callbacks
FuchsiaGymJanineScript:
checkflag ENGINE_SOULBADGE
iftrue .FightDone
applymovement FUCHSIAGYM_JANINE, Movement_NinjaSpin
faceplayer
opentext
writetext JanineText_DisappointYou
waitbutton
closetext
winlosstext JanineText_ToughOne, 0
loadtrainer JANINE, JANINE1
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_JANINE
setevent EVENT_BEAT_LASS_ALICE
setevent EVENT_BEAT_LASS_LINDA
setevent EVENT_BEAT_PICNICKER_CINDY
setevent EVENT_BEAT_CAMPER_BARRY
variablesprite SPRITE_FUCHSIA_GYM_1, SPRITE_LASS
variablesprite SPRITE_FUCHSIA_GYM_2, SPRITE_LASS
variablesprite SPRITE_FUCHSIA_GYM_3, SPRITE_LASS
variablesprite SPRITE_FUCHSIA_GYM_4, SPRITE_YOUNGSTER
special LoadUsedSpritesGFX
opentext
writetext Text_ReceivedSoulBadge
playsound SFX_GET_BADGE
waitsfx
setflag ENGINE_SOULBADGE
sjump .AfterBattle
.FightDone:
faceplayer
opentext
.AfterBattle:
checkevent EVENT_GOT_TM06_TOXIC
iftrue .AfterTM
writetext JanineText_ToxicSpeech
promptbutton
verbosegiveitem TM_TOXIC
iffalse .AfterTM
setevent EVENT_GOT_TM06_TOXIC
.AfterTM:
writetext JanineText_ApplyMyself
waitbutton
closetext
end
LassAliceScript:
checkevent EVENT_BEAT_LASS_ALICE
iftrue .AliceUnmasked
applymovement FUCHSIAGYM_FUCHSIA_GYM_1, Movement_NinjaSpin
faceplayer
variablesprite SPRITE_FUCHSIA_GYM_1, SPRITE_LASS
special LoadUsedSpritesGFX
.AliceUnmasked:
faceplayer
opentext
checkevent EVENT_BEAT_LASS_ALICE
iftrue .AliceAfterScript
writetext LassAliceBeforeText
waitbutton
closetext
winlosstext LassAliceBeatenText, 0
loadtrainer LASS, ALICE
startbattle
iftrue .AliceBecomesJanine
reloadmapafterbattle
setevent EVENT_BEAT_LASS_ALICE
end
.AliceBecomesJanine:
variablesprite SPRITE_FUCHSIA_GYM_1, SPRITE_JANINE
reloadmapafterbattle
end
.AliceAfterScript:
writetext LassAliceAfterText
waitbutton
closetext
end
LassLindaScript:
checkevent EVENT_BEAT_LASS_LINDA
iftrue .LindaUnmasked
applymovement FUCHSIAGYM_FUCHSIA_GYM_2, Movement_NinjaSpin
faceplayer
variablesprite SPRITE_FUCHSIA_GYM_2, SPRITE_LASS
special LoadUsedSpritesGFX
.LindaUnmasked:
faceplayer
opentext
checkevent EVENT_BEAT_LASS_LINDA
iftrue .LindaAfterScript
writetext LassLindaBeforeText
waitbutton
closetext
winlosstext LassLindaBeatenText, 0
loadtrainer LASS, LINDA
startbattle
iftrue .LindaBecomesJanine
reloadmapafterbattle
setevent EVENT_BEAT_LASS_LINDA
end
.LindaBecomesJanine:
variablesprite SPRITE_FUCHSIA_GYM_2, SPRITE_JANINE
reloadmapafterbattle
end
.LindaAfterScript:
writetext LassLindaAfterText
waitbutton
closetext
end
PicnickerCindyScript:
checkevent EVENT_BEAT_PICNICKER_CINDY
iftrue .CindyUnmasked
applymovement FUCHSIAGYM_FUCHSIA_GYM_3, Movement_NinjaSpin
faceplayer
variablesprite SPRITE_FUCHSIA_GYM_3, SPRITE_LASS
special LoadUsedSpritesGFX
.CindyUnmasked:
faceplayer
opentext
checkevent EVENT_BEAT_PICNICKER_CINDY
iftrue .CindyAfterScript
writetext PicnickerCindyBeforeText
waitbutton
closetext
winlosstext PicnickerCindyBeatenText, 0
loadtrainer PICNICKER, CINDY
startbattle
iftrue .CindyBecomesJanine
reloadmapafterbattle
setevent EVENT_BEAT_PICNICKER_CINDY
end
.CindyBecomesJanine:
variablesprite SPRITE_FUCHSIA_GYM_3, SPRITE_JANINE
reloadmapafterbattle
end
.CindyAfterScript:
writetext PicnickerCindyAfterText
waitbutton
closetext
end
CamperBarryScript:
checkevent EVENT_BEAT_CAMPER_BARRY
iftrue .BarryUnmasked
applymovement FUCHSIAGYM_FUCHSIA_GYM_4, Movement_NinjaSpin
faceplayer
variablesprite SPRITE_FUCHSIA_GYM_4, SPRITE_YOUNGSTER
special LoadUsedSpritesGFX
.BarryUnmasked:
faceplayer
opentext
checkevent EVENT_BEAT_CAMPER_BARRY
iftrue .BarryAfterScript
writetext CamperBarryBeforeText
waitbutton
closetext
winlosstext CamperBarryBeatenText, 0
loadtrainer CAMPER, BARRY
startbattle
iftrue .BarryBecomesJanine
reloadmapafterbattle
setevent EVENT_BEAT_CAMPER_BARRY
end
.BarryBecomesJanine:
variablesprite SPRITE_FUCHSIA_GYM_4, SPRITE_JANINE
reloadmapafterbattle
end
.BarryAfterScript:
writetext CamperBarryAfterText
waitbutton
closetext
end
FuchsiaGymGuideScript:
faceplayer
opentext
checkevent EVENT_BEAT_JANINE
iftrue .FuchsiaGymGuideWinScript
writetext FuchsiaGymGuideText
waitbutton
closetext
end
.FuchsiaGymGuideWinScript:
writetext FuchsiaGymGuideWinText
waitbutton
closetext
end
FuchsiaGymStatue:
checkflag ENGINE_SOULBADGE
iftrue .Beaten
jumpstd GymStatue1Script
.Beaten:
gettrainername STRING_BUFFER_4, JANINE, JANINE1
jumpstd GymStatue2Script
Movement_NinjaSpin:
turn_head DOWN
turn_head LEFT
turn_head UP
turn_head RIGHT
turn_head DOWN
turn_head LEFT
turn_head UP
turn_head RIGHT
turn_head DOWN
turn_head LEFT
turn_head UP
turn_head RIGHT
turn_head DOWN
step_end
JanineText_DisappointYou:
text "Fufufufu…"
para "I'm sorry to dis-"
line "appoint you…"
para "I'm only joking!"
para "I'm the real deal!"
para "JANINE of FUCHSIA"
line "GYM, that's me!"
done
JanineText_ToughOne:
text "JANINE: You're a"
line "tough one. You"
cont "definitely won…"
para "Here's SOULBADGE."
line "Take it."
done
Text_ReceivedSoulBadge:
text "<PLAYER> received"
line "SOULBADGE."
done
JanineText_ToxicSpeech:
text "JANINE: You're so"
line "tough! I have a"
cont "special gift!"
para "It's TOXIC, a pow-"
line "erful poison that"
para "steadily saps the"
line "victim's HP."
done
JanineText_ApplyMyself:
text "JANINE: I'm going"
line "to really apply"
para "myself and improve"
line "my skills."
para "I want to become"
line "better than both"
cont "Father and you!"
done
LassAliceBeforeText:
text "Fufufu!"
para "I'm JANINE, the"
line "GYM LEADER!"
para "No, I'm not!"
line "Gotcha, sucker!"
done
LassAliceBeatenText:
text "I had you fooled…"
done
LassAliceAfterText:
text "How will you dis-"
line "tinguish our real"
cont "LEADER?"
done
LassLindaBeforeText:
text "Fooled you!"
line "Hahaha!"
done
LassLindaBeatenText:
text "Ooh… I lost…"
line "You're not weak…"
done
LassLindaAfterText:
text "Well? Wasn't my"
line "disguise perfect?"
done
PicnickerCindyBeforeText:
text "I'm JANINE!"
para "How did you know I"
line "was real?"
para "Let's battle!"
done
PicnickerCindyBeatenText:
text "Darn it!"
line "I wanted to win!"
done
PicnickerCindyAfterText:
text "You must be"
line "getting tired."
done
CamperBarryBeforeText:
text "Wahahaha!"
para "You betcha!"
line "I'm JANINE!"
done
CamperBarryBeatenText:
text "My disguise was"
line "right on! Dang!"
done
CamperBarryAfterText:
text "Hey, you. Was my"
line "disguise cute or"
cont "what, huh?"
done
FuchsiaGymGuideText:
text "Yo, CHAMP in"
line "making!"
para "Whoops! Take a"
line "good look around"
para "you. The trainers"
line "all look like the"
cont "LEADER, JANINE."
para "Which of them is"
line "the real JANINE?"
done
FuchsiaGymGuideWinText:
text "That was a great"
line "battle, trainer"
cont "from JOHTO!"
done
FuchsiaGym_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 4, 17, FUCHSIA_CITY, 3
warp_event 5, 17, FUCHSIA_CITY, 3
def_coord_events
def_bg_events
bg_event 3, 15, BGEVENT_READ, FuchsiaGymStatue
bg_event 6, 15, BGEVENT_READ, FuchsiaGymStatue
def_object_events
object_event 1, 10, SPRITE_JANINE, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, FuchsiaGymJanineScript, -1
object_event 5, 7, SPRITE_FUCHSIA_GYM_1, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, LassAliceScript, -1
object_event 5, 11, SPRITE_FUCHSIA_GYM_2, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, LassLindaScript, -1
object_event 9, 4, SPRITE_FUCHSIA_GYM_3, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, PicnickerCindyScript, -1
object_event 4, 2, SPRITE_FUCHSIA_GYM_4, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, CamperBarryScript, -1
object_event 7, 15, SPRITE_GYM_GUIDE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, FuchsiaGymGuideScript, -1