pokecrystal/maps/EcruteakHouse.asm

335 lines
5.9 KiB
NASM

EcruteakHouse_MapScriptHeader: ; 0x98000
; trigger count
db 2
; triggers
dw UnknownScript_0x9800d, $0000
dw UnknownScript_0x9800e, $0000
; callback count
db 1
; callbacks
dbw 2, UnknownScript_0x9800f
; 0x9800d
UnknownScript_0x9800d: ; 0x9800d
end
; 0x9800e
UnknownScript_0x9800e: ; 0x9800e
end
; 0x9800f
UnknownScript_0x9800f: ; 0x9800f
checkevent EVENT_FOUGHT_SUICUNE
iftrue UnknownScript_0x98033
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
iftrue UnknownScript_0x98033
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue UnknownScript_0x98022
return
; 0x98022
UnknownScript_0x98022: ; 0x98022
clearevent $0766
setevent $0767
setevent $07b1
checkitem CLEAR_BELL
iftrue UnknownScript_0x98032
dotrigger $0
UnknownScript_0x98032: ; 0x98032
return
; 0x98033
UnknownScript_0x98033: ; 0x98033
clearevent $07b1
return
; 0x98037
UnknownScript_0x98037: ; 0x98037
checkevent $0767
iftrue UnknownScript_0x98061
applymovement $3, MovementData_0x980c7
moveperson $2, $4, $6
appear $2
pause 5
disappear $3
end
; 0x9804c
UnknownScript_0x9804c: ; 0x9804c
checkevent $0766
iftrue UnknownScript_0x98061
applymovement $2, MovementData_0x980cc
moveperson $3, $5, $6
appear $3
pause 5
disappear $2
end
; 0x98061
UnknownScript_0x98061: ; 0x98061
end
; 0x98062
SageScript_0x98062: ; 0x98062
faceplayer
loadfont
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue UnknownScript_0x9807c
checkflag $001e
iftrue UnknownScript_0x98076
writetext UnknownText_0x980d1
closetext
loadmovesprites
end
; 0x98076
UnknownScript_0x98076: ; 0x98076
writetext UnknownText_0x98131
closetext
loadmovesprites
end
; 0x9807c
UnknownScript_0x9807c: ; 0x9807c
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
iftrue UnknownScript_0x980a4
checkevent $0000
iftrue UnknownScript_0x980aa
checkitem CLEAR_BELL
iftrue UnknownScript_0x98093
writetext UnknownText_0x981a4
closetext
loadmovesprites
end
; 0x98093
UnknownScript_0x98093: ; 0x98093
writetext UnknownText_0x98250
closetext
loadmovesprites
dotrigger $1
setevent $0767
clearevent $0766
setevent $0000
end
; 0x980a4
UnknownScript_0x980a4: ; 0x980a4
writetext UnknownText_0x9837e
closetext
loadmovesprites
end
; 0x980aa
UnknownScript_0x980aa: ; 0x980aa
writetext UnknownText_0x98391
closetext
loadmovesprites
end
; 0x980b0
SageScript_0x980b0: ; 0x980b0
faceplayer
loadfont
checkevent EVENT_GOT_CLEAR_BELL
iftrue UnknownScript_0x980be
writetext UnknownText_0x9840b
closetext
loadmovesprites
end
; 0x980be
UnknownScript_0x980be: ; 0x980be
writetext UnknownText_0x9846f
closetext
loadmovesprites
end
; 0x980c4
GrampsScript_0x980c4: ; 0x980c4
jumptextfaceplayer UnknownText_0x984ab
; 0x980c7
MovementData_0x980c7: ; 0x980c7
fix_facing
big_step_left
remove_fixed_facing
turn_head_down
step_end
; 0x980cc
MovementData_0x980cc: ; 0x980cc
fix_facing
big_step_right
remove_fixed_facing
turn_head_down
step_end
; 0x980d1
UnknownText_0x980d1: ; 0x980d1
text "TIN TOWER is off"
line "limits to anyone"
para "without ECRUTEAK"
line "GYM's BADGE."
para "Sorry, but you'll"
line "have to leave."
done
; 0x98131
UnknownText_0x98131: ; 0x98131
text "TIN TOWER is off"
line "limits to anyone"
para "without ECRUTEAK"
line "GYM's BADGE."
para "Ah!"
para "ECRUTEAK's GYM"
line "BADGE! Please, go"
cont "right through."
done
; 0x981a4
UnknownText_0x981a4: ; 0x981a4
text "A momentous event"
line "has occurred."
para "I beg your pardon,"
line "but I must ask you"
cont "to leave."
para "…What soothes the"
line "soul…"
para "The WISE TRIO say"
line "things that are so"
para "very difficult to"
line "understand…"
done
; 0x98250
UnknownText_0x98250: ; 0x98250
text "A momentous event"
line "has occurred."
para "I beg your pardon,"
line "but I must ask you"
cont "to leave."
para $56, $56, $56
para "Ah!"
para "The sound of that"
line "CLEAR BELL!"
para "It… It's sublime!"
para "I've never heard"
line "so beautiful a"
cont "sound before!"
para "That bell's chime"
line "is indicative of"
cont "the bearer's soul."
para "You…"
para "You may be able to"
line "make it through"
cont "TIN TOWER."
para "Please, do go on."
done
; 0x9837e
UnknownText_0x9837e: ; 0x9837e
text "Please, do go on."
done
; 0x98391
UnknownText_0x98391: ; 0x98391
text "That bell's chime"
line "is indicative of"
cont "the bearer's soul."
para "You…"
para "You may be able to"
line "make it through"
cont "TIN TOWER."
para "Please, do go on."
done
; 0x9840b
UnknownText_0x9840b: ; 0x9840b
text "The TIN TOWER"
line "ahead is a nine-"
para "tier tower of"
line "divine beauty."
para "It soothes the"
line "soul of all who"
cont "see it."
done
; 0x9846f
UnknownText_0x9846f: ; 0x9846f
text "The TIN TOWER"
line "shook! A #MON"
para "must have returned"
line "to the top!"
done
; 0x984ab
UnknownText_0x984ab: ; 0x984ab
text "Two towers…"
line "Two #MON…"
para "But when one"
line "burned down, both"
para "#MON flew away,"
line "never to return."
done
; 0x98502
EcruteakHouse_MapEventHeader: ; 0x98502
; filler
db 0, 0
; warps
db 5
warp_def $11, $4, 3, GROUP_ECRUTEAK_CITY, MAP_ECRUTEAK_CITY
warp_def $11, $5, 3, GROUP_ECRUTEAK_CITY, MAP_ECRUTEAK_CITY
warp_def $3, $5, 4, GROUP_ECRUTEAK_HOUSE, MAP_ECRUTEAK_HOUSE
warp_def $f, $11, 3, GROUP_ECRUTEAK_HOUSE, MAP_ECRUTEAK_HOUSE
warp_def $3, $11, 3, GROUP_WISE_TRIOS_ROOM, MAP_WISE_TRIOS_ROOM
; xy triggers
db 2
xy_trigger 0, $7, $4, $0, UnknownScript_0x98037, $0, $0
xy_trigger 0, $7, $5, $0, UnknownScript_0x9804c, $0, $0
; signposts
db 0
; people-events
db 4
person_event SPRITE_SAGE, 10, 8, $6, $0, 255, 255, $0, 0, SageScript_0x98062, $0766
person_event SPRITE_SAGE, 10, 9, $6, $0, 255, 255, $0, 0, SageScript_0x98062, $0767
person_event SPRITE_SAGE, 13, 10, $2, $11, 255, 255, $0, 0, SageScript_0x980b0, $07b1
person_event SPRITE_GRAMPS, 15, 7, $2, $11, 255, 255, $0, 0, GrampsScript_0x980c4, $07b1
; 0x98565