mirror of https://github.com/pret/pokecrystal.git
300 lines
5.9 KiB
NASM
300 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
|
|
checkbit1 $0335
|
|
iftrue UnknownScript_0x98033
|
|
checkbit1 $0334
|
|
iftrue UnknownScript_0x98033
|
|
checkbit1 $0021
|
|
iftrue UnknownScript_0x98022
|
|
return
|
|
; 0x98022
|
|
|
|
UnknownScript_0x98022: ; 0x98022
|
|
clearbit1 $0766
|
|
setbit1 $0767
|
|
setbit1 $07b1
|
|
checkitem CLEAR_BELL
|
|
iftrue UnknownScript_0x98032
|
|
dotrigger $0
|
|
UnknownScript_0x98032: ; 0x98032
|
|
return
|
|
; 0x98033
|
|
|
|
UnknownScript_0x98033: ; 0x98033
|
|
clearbit1 $07b1
|
|
return
|
|
; 0x98037
|
|
|
|
UnknownScript_0x98037: ; 0x98037
|
|
checkbit1 $0767
|
|
iftrue UnknownScript_0x98061
|
|
applymovement $3, MovementData_0x980c7
|
|
moveperson $2, $4, $6
|
|
appear $2
|
|
pause 5
|
|
disappear $3
|
|
end
|
|
; 0x9804c
|
|
|
|
UnknownScript_0x9804c: ; 0x9804c
|
|
checkbit1 $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
|
|
checkbit1 $0021
|
|
iftrue UnknownScript_0x9807c
|
|
checkbit2 $001e
|
|
iftrue UnknownScript_0x98076
|
|
2writetext UnknownText_0x980d1
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x98076
|
|
|
|
UnknownScript_0x98076: ; 0x98076
|
|
2writetext UnknownText_0x98131
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x9807c
|
|
|
|
UnknownScript_0x9807c: ; 0x9807c
|
|
checkbit1 $0334
|
|
iftrue UnknownScript_0x980a4
|
|
checkbit1 $0000
|
|
iftrue UnknownScript_0x980aa
|
|
checkitem CLEAR_BELL
|
|
iftrue UnknownScript_0x98093
|
|
2writetext UnknownText_0x981a4
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x98093
|
|
|
|
UnknownScript_0x98093: ; 0x98093
|
|
2writetext UnknownText_0x98250
|
|
closetext
|
|
loadmovesprites
|
|
dotrigger $1
|
|
setbit1 $0767
|
|
clearbit1 $0766
|
|
setbit1 $0000
|
|
end
|
|
; 0x980a4
|
|
|
|
UnknownScript_0x980a4: ; 0x980a4
|
|
2writetext UnknownText_0x9837e
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x980aa
|
|
|
|
UnknownScript_0x980aa: ; 0x980aa
|
|
2writetext UnknownText_0x98391
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x980b0
|
|
|
|
SageScript_0x980b0: ; 0x980b0
|
|
faceplayer
|
|
loadfont
|
|
checkbit1 $0078
|
|
iftrue UnknownScript_0x980be
|
|
2writetext UnknownText_0x9840b
|
|
closetext
|
|
loadmovesprites
|
|
end
|
|
; 0x980be
|
|
|
|
UnknownScript_0x980be: ; 0x980be
|
|
2writetext 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
|
|
db $0, "TIN TOWER is off", $4f
|
|
db "limits to anyone", $51
|
|
db "without ECRUTEAK", $4f
|
|
db "GYM's BADGE.", $51
|
|
db "Sorry, but you'll", $4f
|
|
db "have to leave.", $57
|
|
; 0x98131
|
|
|
|
UnknownText_0x98131: ; 0x98131
|
|
db $0, "TIN TOWER is off", $4f
|
|
db "limits to anyone", $51
|
|
db "without ECRUTEAK", $4f
|
|
db "GYM's BADGE.", $51
|
|
db "Ah!", $51
|
|
db "ECRUTEAK's GYM", $4f
|
|
db "BADGE! Please, go", $55
|
|
db "right through.", $57
|
|
; 0x981a4
|
|
|
|
UnknownText_0x981a4: ; 0x981a4
|
|
db $0, "A momentous event", $4f
|
|
db "has occurred.", $51
|
|
db "I beg your pardon,", $4f
|
|
db "but I must ask you", $55
|
|
db "to leave.", $51
|
|
db "…What soothes the", $4f
|
|
db "soul…", $51
|
|
db "The WISE TRIO say", $4f
|
|
db "things that are so", $51
|
|
db "very difficult to", $4f
|
|
db "understand…", $57
|
|
; 0x98250
|
|
|
|
UnknownText_0x98250: ; 0x98250
|
|
db $0, "A momentous event", $4f
|
|
db "has occurred.", $51
|
|
db "I beg your pardon,", $4f
|
|
db "but I must ask you", $55
|
|
db "to leave.", $51
|
|
db $56, $56, $56, $51
|
|
db "Ah!", $51
|
|
db "The sound of that", $4f
|
|
db "CLEAR BELL!", $51
|
|
db "It… It's sublime!", $51
|
|
db "I've never heard", $4f
|
|
db "so beautiful a", $55
|
|
db "sound before!", $51
|
|
db "That bell's chime", $4f
|
|
db "is indicative of", $55
|
|
db "the bearer's soul.", $51
|
|
db "You…", $51
|
|
db "You may be able to", $4f
|
|
db "make it through", $55
|
|
db "TIN TOWER.", $51
|
|
db "Please, do go on.", $57
|
|
; 0x9837e
|
|
|
|
UnknownText_0x9837e: ; 0x9837e
|
|
db $0, "Please, do go on.", $57
|
|
; 0x98391
|
|
|
|
UnknownText_0x98391: ; 0x98391
|
|
db $0, "That bell's chime", $4f
|
|
db "is indicative of", $55
|
|
db "the bearer's soul.", $51
|
|
db "You…", $51
|
|
db "You may be able to", $4f
|
|
db "make it through", $55
|
|
db "TIN TOWER.", $51
|
|
db "Please, do go on.", $57
|
|
; 0x9840b
|
|
|
|
UnknownText_0x9840b: ; 0x9840b
|
|
db $0, "The TIN TOWER", $4f
|
|
db "ahead is a nine-", $51
|
|
db "tier tower of", $4f
|
|
db "divine beauty.", $51
|
|
db "It soothes the", $4f
|
|
db "soul of all who", $55
|
|
db "see it.", $57
|
|
; 0x9846f
|
|
|
|
UnknownText_0x9846f: ; 0x9846f
|
|
db $0, "The TIN TOWER", $4f
|
|
db "shook! A #MON", $51
|
|
db "must have returned", $4f
|
|
db "to the top!", $57
|
|
; 0x984ab
|
|
|
|
UnknownText_0x984ab: ; 0x984ab
|
|
db $0, "Two towers…", $4f
|
|
db "Two #MON…", $51
|
|
db "But when one", $4f
|
|
db "burned down, both", $51
|
|
db "#MON flew away,", $4f
|
|
db "never to return.", $57
|
|
; 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
|
|
|