pokecrystal/maps/FastShip1F.asm

317 lines
5.9 KiB
NASM

FastShip1F_MapScriptHeader:
.MapTriggers:
db 3
; triggers
dw .Trigger1, 0
dw .Trigger2, 0
dw .Trigger3, 0
.MapCallbacks:
db 0
.Trigger1:
end
.Trigger2:
priorityjump .PriorityJump2
end
.Trigger3:
end
.PriorityJump2:
applymovement $2, MovementData_0x7520e
applymovement PLAYER, MovementData_0x75217
applymovement $2, MovementData_0x75211
pause 30
playsound SFX_BOAT
earthquake 30
blackoutmod FAST_SHIP_CABINS_SW_SSW_NW
clearevent EVENT_FAST_SHIP_HAS_ARRIVED
checkevent EVENT_FAST_SHIP_FIRST_TIME
iftrue .SkipGrandpa
dotrigger $2
end
.SkipGrandpa:
dotrigger $0
end
SailorScript_0x75160:
faceplayer
loadfont
checkevent EVENT_FAST_SHIP_HAS_ARRIVED
iftrue .Arrived
checkevent EVENT_FAST_SHIP_DESTINATION_OLIVINE
iftrue .Olivine
writetext UnknownText_0x7523b
closetext
loadmovesprites
end
.Olivine
writetext UnknownText_0x7529b
closetext
loadmovesprites
end
.Arrived:
checkevent EVENT_FAST_SHIP_DESTINATION_OLIVINE
iftrue ._Olivine
writetext UnknownText_0x754be
closetext
loadmovesprites
scall .LetThePlayerOut
playsound SFX_EXIT_BUILDING
special FadeOutPalettes
waitbutton
setevent EVENT_VERMILION_PORT_SAILOR_AT_GANGWAY
domaptrigger VERMILION_PORT, $1
warp VERMILION_PORT, $7, $11
end
._Olivine
writetext UnknownText_0x7548d
closetext
loadmovesprites
scall .LetThePlayerOut
playsound SFX_EXIT_BUILDING
special FadeOutPalettes
waitbutton
setevent EVENT_OLIVINE_PORT_SAILOR_AT_GANGWAY
domaptrigger OLIVINE_PORT, $1
warp OLIVINE_PORT, $7, $17
end
.LetThePlayerOut:
checkcode VAR_FACING
if_equal RIGHT, .YouAreFacingRight
applymovement $2, MovementData_0x7520e
applymovement PLAYER, MovementData_0x75235
end
.YouAreFacingRight:
applymovement $2, MovementData_0x75214
applymovement PLAYER, MovementData_0x75238
end
SailorScript_0x751d0:
faceplayer
loadfont
checkevent EVENT_FAST_SHIP_FIRST_TIME
iftrue .Vermilion
writetext UnknownText_0x752f9
closetext
loadmovesprites
end
.Vermilion:
writetext UnknownText_0x7534f
closetext
loadmovesprites
end
SailorScript_0x751e4:
jumptextfaceplayer UnknownText_0x753c0
WorriedGrandpaTriggerRight:
moveperson $5, $14, $6
WorriedGrandpaTriggerLeft:
appear $5
applymovement $5, MovementData_0x7521b
playsound SFX_TACKLE
applymovement PLAYER, MovementData_0x7522e
applymovement $5, MovementData_0x75220
loadfont
writetext UnknownText_0x75412
closetext
loadmovesprites
spriteface PLAYER, RIGHT
applymovement $5, MovementData_0x75222
disappear $5
dotrigger $0
end
MovementData_0x7520e:
slow_step_left
turn_head_right
step_end
MovementData_0x75211:
slow_step_right
turn_head_down
step_end
MovementData_0x75214:
slow_step_down
turn_head_up
step_end
MovementData_0x75217:
step_down
step_down
turn_head_down
step_end
MovementData_0x7521b:
big_step_right
big_step_right
big_step_right
big_step_right
step_end
MovementData_0x75220:
step_right
step_end
MovementData_0x75222:
big_step_down
big_step_right
big_step_right
big_step_right
big_step_right
big_step_right
big_step_right
big_step_down
big_step_down
big_step_down
big_step_down
step_end
MovementData_0x7522e:
big_step_right
turn_head_left
step_end
MovementData_0x75231:
step_up
step_end
MovementData_0x75233:
step_down
step_end
MovementData_0x75235:
step_up
step_up
step_end
MovementData_0x75238:
step_right
step_up
step_end
UnknownText_0x7523b:
text "FAST SHIP S.S.AQUA"
line "is en route to"
cont "VERMILION CITY."
para "We will make an"
line "announcement when"
cont "we arrive."
done
UnknownText_0x7529b:
text "FAST SHIP S.S.AQUA"
line "is en route to"
cont "OLIVINE CITY."
para "We will make an"
line "announcement when"
cont "we arrive."
done
UnknownText_0x752f9:
text "Here's your cabin."
para "If your #MON"
line "are hurt, take a"
cont "nap in the bed."
para "That will heal"
line "them."
done
UnknownText_0x7534f:
text "Here's your cabin."
para "You can heal your"
line "#MON by taking"
cont "a nap in the bed."
para "The ship will"
line "arrive while"
cont "you're sleeping."
done
UnknownText_0x753c0:
text "The passengers are"
line "all trainers."
para "They're all itch-"
line "ing to battle in"
cont "their cabins."
done
UnknownText_0x75412:
text "Whoa! Excuse me."
line "I was in a hurry!"
para "My granddaughter"
line "is missing!"
para "She's just a wee"
line "girl. If you see"
para "her, please let me"
line "know!"
done
UnknownText_0x7548d:
text "FAST SHIP S.S.AQUA"
line "has arrived in"
cont "OLIVINE CITY."
done
UnknownText_0x754be:
text "FAST SHIP S.S.AQUA"
line "has arrived in"
cont "VERMILION CITY."
done
FastShip1F_MapEventHeader:
; filler
db 0, 0
.Warps:
db 12
warp_def $1, $19, -1, FAST_SHIP_1F
warp_def $8, $1b, 1, FAST_SHIP_CABINS_NNW_NNE_NE
warp_def $8, $17, 2, FAST_SHIP_CABINS_NNW_NNE_NE
warp_def $8, $13, 3, FAST_SHIP_CABINS_NNW_NNE_NE
warp_def $8, $f, 1, FAST_SHIP_CABINS_SW_SSW_NW
warp_def $f, $f, 2, FAST_SHIP_CABINS_SW_SSW_NW
warp_def $f, $13, 4, FAST_SHIP_CABINS_SW_SSW_NW
warp_def $f, $17, 1, FAST_SHIP_CABINS_SE_SSE_CAPTAINS_CABIN
warp_def $f, $1b, 3, FAST_SHIP_CABINS_SE_SSE_CAPTAINS_CABIN
warp_def $d, $3, 5, FAST_SHIP_CABINS_SE_SSE_CAPTAINS_CABIN
warp_def $c, $6, 1, FAST_SHIP_B1F
warp_def $e, $1e, 2, FAST_SHIP_B1F
.XYTriggers:
db 2
xy_trigger 2, $6, $18, $0, WorriedGrandpaTriggerLeft, $0, $0
xy_trigger 2, $6, $19, $0, WorriedGrandpaTriggerRight, $0, $0
.Signposts:
db 0
.PersonEvents:
db 4
person_event SPRITE_SAILOR, 2, 25, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, SailorScript_0x75160, -1
person_event SPRITE_SAILOR, 7, 14, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, SailorScript_0x751d0, -1
person_event SPRITE_SAILOR, 17, 22, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 2, -1, -1, 0, PERSONTYPE_SCRIPT, 0, SailorScript_0x751e4, -1
person_event SPRITE_GENTLEMAN, 6, 19, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, ObjectEvent, EVENT_FAST_SHIP_1F_GENTLEMAN