pokecrystal-board/maps/FastShipCabins_SE_SSE_CaptainsCabin.asm
2018-02-01 22:22:07 -05:00

491 lines
12 KiB
NASM

const_def 2 ; object constants
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_CAPTAIN
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_GENTLEMAN
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN1
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN2
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_POKEFAN_M1
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN3
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN4
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_SUPER_NERD1
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_POKEFAN_M2
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_POKEFAN_F
const FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_SUPER_NERD2
FastShipCabins_SE_SSE_CaptainsCabin_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
Unreferenced_0x75ea6:
end
SSAquaCaptain:
faceplayer
opentext
checkevent EVENT_FAST_SHIP_FIRST_TIME
iftrue .LaterTrip
writetext SSAquaCaptainExhaustingText
waitbutton
closetext
end
.LaterTrip:
writetext SSAquaCaptainHowDoYouLikeText
waitbutton
closetext
end
SSAquaGranddaughterBefore:
spriteface FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN2, RIGHT
opentext
writetext SSAquaGranddaughterCaptainPlayWithMeText
waitbutton
closetext
faceplayer
opentext
writetext SSAquaGranddaughterHasToFindGrandpaText
waitbutton
closetext
special FadeBlackQuickly
special ReloadSpritesNoPalettes
disappear FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN2
applymovement PLAYER, MovementData_0x76004
moveobject FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN1, 3, 19
appear FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN1
spriteface PLAYER, UP
spriteface FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN1, UP
special FadeInQuickly
spriteface FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_GENTLEMAN, DOWN
showemote EMOTE_SHOCK, FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_GENTLEMAN, 15
applymovement FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN1, MovementData_0x7600c
spriteface FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_GENTLEMAN, RIGHT
checkflag ENGINE_PLAYER_IS_FEMALE
iftrue .PlayerIsFemale
opentext
writetext SSAquaGranddaughterWasPlayingMText
waitbutton
closetext
jump .cont
.PlayerIsFemale:
opentext
writetext SSAquaGranddaughterWasPlayingFText
waitbutton
closetext
.cont:
spriteface FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_TWIN2, DOWN
applymovement FASTSHIPCABINS_SE_SSE_CAPTAINSCABIN_GENTLEMAN, MovementData_0x76010
opentext
writetext SSAquaEntertainedGranddaughterText
buttonsound
setevent EVENT_VERMILION_PORT_SAILOR_AT_GANGWAY
setmapscene FAST_SHIP_1F, SCENE_DEFAULT
jump SSAquaMetalCoatAndDocking
SSAquaGrandpa:
faceplayer
opentext
checkevent EVENT_GOT_METAL_COAT_FROM_GRANDPA_ON_SS_AQUA
iftrue SSAquaGotMetalCoat
checkevent EVENT_FAST_SHIP_CABINS_SE_SSE_CAPTAINS_CABIN_TWIN_2
iftrue SSAquaFoundGranddaughter
writetext SSAquaCantFindGranddaughterText
waitbutton
closetext
setmapscene FAST_SHIP_1F, SCENE_DEFAULT
end
SSAquaMetalCoatAndDocking:
writetext SSAquaGrandpaHaveThisText
buttonsound
verbosegiveitem METAL_COAT
iffalse .NoRoom
setevent EVENT_GOT_METAL_COAT_FROM_GRANDPA_ON_SS_AQUA
.NoRoom:
closetext
waitsfx
playsound SFX_ELEVATOR_END
pause 30
opentext
writetext SSAquaHasArrivedVermilionText
waitbutton
setevent EVENT_FAST_SHIP_HAS_ARRIVED
setevent EVENT_FAST_SHIP_FOUND_GIRL
closetext
end
SSAquaFoundGranddaughter:
writetext SSAquaGrandpaHaveThisText
buttonsound
verbosegiveitem METAL_COAT
iffalse .NoRoom
setevent EVENT_GOT_METAL_COAT_FROM_GRANDPA_ON_SS_AQUA
.NoRoom:
closetext
end
SSAquaGotMetalCoat:
writetext SSAquaGrandpaTravellingText
waitbutton
closetext
end
SSAquaGranddaughterAfter:
faceplayer
opentext
writetext SSAquaGranddaughterHadFunText
waitbutton
closetext
end
TrainerPokefanmColin:
trainer POKEFANM, COLIN, EVENT_BEAT_POKEFANM_COLIN, PokefanmColinSeenText, PokefanmColinBeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext PokefanmColinAfterBattleText
waitbutton
closetext
end
TrainerTwinsMegandpeg1:
trainer TWINS, MEGANDPEG1, EVENT_BEAT_TWINS_MEG_AND_PEG, TwinsMegandpeg1SeenText, TwinsMegandpeg1BeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext TwinsMegandpeg1AfterBattleText
waitbutton
closetext
end
TrainerTwinsMegandpeg2:
trainer TWINS, MEGANDPEG2, EVENT_BEAT_TWINS_MEG_AND_PEG, TwinsMegandpeg2SeenText, TwinsMegandpeg2BeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext TwinsMegandpeg2AfterBattleText
waitbutton
closetext
end
TrainerPsychicRodney:
trainer PSYCHIC_T, RODNEY, EVENT_BEAT_PSYCHIC_RODNEY, PsychicRodneySeenText, PsychicRodneyBeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext PsychicRodneyAfterBattleText
waitbutton
closetext
end
TrainerPokefanmJeremy:
trainer POKEFANM, JEREMY, EVENT_BEAT_POKEFANM_JEREMY, PokefanmJeremySeenText, PokefanmJeremyBeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext PokefanmJeremyAfterBattleText
waitbutton
closetext
end
TrainerPokefanfGeorgia:
trainer POKEFANF, GEORGIA, EVENT_BEAT_POKEFANF_GEORGIA, PokefanfGeorgiaSeenText, PokefanfGeorgiaBeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext PokefanfGeorgiaAfterBattleText
waitbutton
closetext
end
TrainerSupernerdShawn:
trainer SUPER_NERD, SHAWN, EVENT_BEAT_SUPER_NERD_SHAWN, SupernerdShawnSeenText, SupernerdShawnBeatenText, 0, .Script
.Script:
end_if_just_battled
opentext
writetext SupernerdShawnAfterBattleText
waitbutton
closetext
end
FastShipCaptainsCabinTrashcan:
jumpstd trashcan
MovementData_0x76004:
big_step RIGHT
big_step UP
big_step UP
big_step UP
big_step UP
big_step UP
big_step UP
step_end
MovementData_0x7600c:
step UP
step UP
turn_head LEFT
step_end
MovementData_0x76010:
step DOWN
step_end
SSAquaCaptainExhaustingText:
text "Whew! Thanks for"
line "coming along."
para "Keeping that lit-"
line "tle girl amused"
cont "was exhausting."
done
SSAquaCaptainHowDoYouLikeText:
text "How do you like"
line "S.S.AQUA's ride?"
para "She practically"
line "skates across the"
cont "waves."
done
SSAquaCantFindGranddaughterText:
text "Oh, hello…"
para "I still can't find"
line "my granddaughter."
para "If she's on the"
line "ship, that's OK."
para "She's an energetic"
line "child, so she may"
para "be bugging some-"
line "one. I'm worried…"
done
SSAquaEntertainedGranddaughterText:
text "<PLAY_G>, was it?"
line "I heard you enter-"
cont "tained my grand-"
cont "daughter."
para "I want to thank"
line "you for that."
done
SSAquaGrandpaHaveThisText:
text "I know! I'd like"
line "you to have this!"
done
SSAquaGrandpaTravellingText:
text "We're traveling"
line "around the world."
done
SSAquaGranddaughterCaptainPlayWithMeText:
text "CAPTAIN, play with"
line "me, please?"
para "I'm bored! I want"
line "to play more!"
done
SSAquaGranddaughterHasToFindGrandpaText:
text "Hi! Will you play"
line "with me?"
para "…Oh!"
para "Grandpa's worried"
line "about me?"
para "I have to go!"
para "I have to go find"
line "Grandpa!"
done
SSAquaGranddaughterWasPlayingMText:
text "Grandpa, here I"
line "am! I was playing"
para "with the CAPTAIN"
line "and this guy!"
done
SSAquaGranddaughterWasPlayingFText:
text "Grandpa, here I"
line "am! I was playing"
para "with the CAPTAIN"
line "and this big girl!"
done
SSAquaGranddaughterHadFunText:
text "I had lots of fun"
line "playing!"
done
PokefanmColinSeenText:
text "Hey, kid! Want to"
line "battle with me?"
done
PokefanmColinBeatenText:
text "You're strong!"
done
PokefanmColinAfterBattleText:
text "You're traveling"
line "all alone?"
para "Isn't your mom"
line "worried?"
done
TwinsMegandpeg1SeenText:
text "You think I'm a"
line "baby?"
cont "That's not fair!"
done
TwinsMegandpeg1BeatenText:
text "Oh! We lost!"
done
TwinsMegandpeg1AfterBattleText:
text "Baby is a rude"
line "name to call us"
cont "girls!"
done
TwinsMegandpeg2SeenText:
text "I'm not a baby!"
para "That's not nice to"
line "say to a lady!"
done
TwinsMegandpeg2BeatenText:
text "Oh! We lost!"
done
TwinsMegandpeg2AfterBattleText:
text "Sometimes, kids"
line "are smarter than"
cont "grown-ups!"
done
PsychicRodneySeenText:
text "Ssh! My brain is"
line "picking up radio"
cont "signals!"
done
PsychicRodneyBeatenText:
text "…I hear some-"
line "thing!"
done
PsychicRodneyAfterBattleText:
text "I get it. You can"
line "hear JOHTO's radio"
cont "on the FAST SHIP."
done
PokefanmJeremySeenText:
text "What do you think?"
line "My #MON are"
cont "beautiful, yes?"
done
PokefanmJeremyBeatenText:
text "Oh, no! My beauti-"
line "ful #MON!"
done
PokefanmJeremyAfterBattleText:
text "I must go to the"
line "#MON SALON and"
cont "fix them up nice!"
done
PokefanfGeorgiaSeenText:
text "I'm going to shop"
line "at the DEPT.STORE"
cont "and then…"
done
PokefanfGeorgiaBeatenText:
text "What was I going"
line "to do?"
done
PokefanfGeorgiaAfterBattleText:
text "Oh, yes! I have to"
line "get my #MON out"
cont "of DAY-CARE!"
done
SupernerdShawnSeenText:
text "What kinds of #"
line "BALLS do you have"
cont "with you?"
done
SupernerdShawnBeatenText:
text "Wait! Stop! Don't!"
line "Please!"
done
SupernerdShawnAfterBattleText:
text "You should use the"
line "right BALLS to fit"
cont "the situation."
done
SSAquaHasArrivedVermilionText:
text "FAST SHIP S.S.AQUA"
line "has arrived in"
cont "VERMILION CITY."
done
FastShipCabins_SE_SSE_CaptainsCabin_MapEvents:
db 0, 0 ; filler
db 6 ; warp events
warp_event 2, 7, FAST_SHIP_1F, 8
warp_event 3, 7, FAST_SHIP_1F, 8
warp_event 2, 19, FAST_SHIP_1F, 9
warp_event 3, 19, FAST_SHIP_1F, 9
warp_event 2, 33, FAST_SHIP_1F, 10
warp_event 3, 33, FAST_SHIP_1F, 10
db 0 ; coord events
db 1 ; bg events
bg_event 4, 25, BGEVENT_READ, FastShipCaptainsCabinTrashcan
db 11 ; object events
object_event 3, 25, SPRITE_CAPTAIN, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, SSAquaCaptain, -1
object_event 2, 17, SPRITE_GENTLEMAN, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, SSAquaGrandpa, EVENT_FAST_SHIP_CABINS_SE_SSE_GENTLEMAN
object_event 3, 17, SPRITE_TWIN, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SSAquaGranddaughterAfter, EVENT_FAST_SHIP_CABINS_SE_SSE_CAPTAINS_CABIN_TWIN_1
object_event 2, 25, SPRITE_TWIN, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SSAquaGranddaughterBefore, EVENT_FAST_SHIP_CABINS_SE_SSE_CAPTAINS_CABIN_TWIN_2
object_event 5, 6, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 5, TrainerPokefanmColin, EVENT_FAST_SHIP_PASSENGERS_FIRST_TRIP
object_event 2, 4, SPRITE_TWIN, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerTwinsMegandpeg1, EVENT_FAST_SHIP_PASSENGERS_FIRST_TRIP
object_event 3, 4, SPRITE_TWIN, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerTwinsMegandpeg2, EVENT_FAST_SHIP_PASSENGERS_FIRST_TRIP
object_event 5, 5, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 5, TrainerPsychicRodney, EVENT_FAST_SHIP_PASSENGERS_EASTBOUND
object_event 2, 3, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerPokefanmJeremy, EVENT_FAST_SHIP_PASSENGERS_WESTBOUND
object_event 5, 5, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerPokefanfGeorgia, EVENT_FAST_SHIP_PASSENGERS_WESTBOUND
object_event 1, 15, SPRITE_SUPER_NERD, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerSupernerdShawn, EVENT_FAST_SHIP_PASSENGERS_EASTBOUND