mirror of https://github.com/pret/pokecrystal.git
299 lines
6.7 KiB
NASM
299 lines
6.7 KiB
NASM
object_const_def ; object_event constants
|
|
const ECRUTEAKTINTOWERENTRANCE_SAGE1
|
|
const ECRUTEAKTINTOWERENTRANCE_SAGE2
|
|
const ECRUTEAKTINTOWERENTRANCE_SAGE3
|
|
const ECRUTEAKTINTOWERENTRANCE_GRAMPS
|
|
|
|
EcruteakTinTowerEntrance_MapScripts:
|
|
db 2 ; scene scripts
|
|
scene_script .DummyScene0 ; SCENE_DEFAULT
|
|
scene_script .DummyScene1 ; SCENE_FINISHED
|
|
|
|
db 1 ; callbacks
|
|
callback MAPCALLBACK_OBJECTS, .InitializeSages
|
|
|
|
.DummyScene0:
|
|
end
|
|
|
|
.DummyScene1:
|
|
end
|
|
|
|
.InitializeSages:
|
|
checkevent EVENT_FOUGHT_SUICUNE
|
|
iftrue .DontBlockTower
|
|
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
|
|
iftrue .DontBlockTower
|
|
checkevent EVENT_CLEARED_RADIO_TOWER
|
|
iftrue .BlockTower
|
|
endcallback
|
|
|
|
.BlockTower:
|
|
clearevent EVENT_RANG_CLEAR_BELL_1
|
|
setevent EVENT_RANG_CLEAR_BELL_2
|
|
setevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
|
|
checkitem CLEAR_BELL
|
|
iftrue .NoClearBell
|
|
setscene SCENE_DEFAULT
|
|
.NoClearBell:
|
|
endcallback
|
|
|
|
.DontBlockTower:
|
|
clearevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
|
|
endcallback
|
|
|
|
EcruteakTinTowerEntrance_CoordEvent1:
|
|
checkevent EVENT_RANG_CLEAR_BELL_2
|
|
iftrue EcruteakTinTowerEntrance_CoordEvent_DontMove
|
|
applymovement ECRUTEAKTINTOWERENTRANCE_SAGE2, MovementData_0x980c7
|
|
moveobject ECRUTEAKTINTOWERENTRANCE_SAGE1, 4, 6
|
|
appear ECRUTEAKTINTOWERENTRANCE_SAGE1
|
|
pause 5
|
|
disappear ECRUTEAKTINTOWERENTRANCE_SAGE2
|
|
end
|
|
|
|
EcruteakTinTowerEntrance_CoordEvent2:
|
|
checkevent EVENT_RANG_CLEAR_BELL_1
|
|
iftrue EcruteakTinTowerEntrance_CoordEvent_DontMove
|
|
applymovement ECRUTEAKTINTOWERENTRANCE_SAGE1, MovementData_0x980cc
|
|
moveobject ECRUTEAKTINTOWERENTRANCE_SAGE2, 5, 6
|
|
appear ECRUTEAKTINTOWERENTRANCE_SAGE2
|
|
pause 5
|
|
disappear ECRUTEAKTINTOWERENTRANCE_SAGE1
|
|
end
|
|
|
|
EcruteakTinTowerEntrance_CoordEvent_DontMove:
|
|
end
|
|
|
|
EcruteakTinTowerEntranceSageScript:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_CLEARED_RADIO_TOWER
|
|
iftrue .CheckForClearBell
|
|
checkflag ENGINE_FOGBADGE
|
|
iftrue .BlockPassage_GotFogBadge
|
|
writetext EcruteakTinTowerEntranceSageText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.BlockPassage_GotFogBadge:
|
|
writetext EcruteakTinTowerEntranceSageText_GotFogBadge
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.CheckForClearBell:
|
|
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
|
|
iftrue .AllowedThrough
|
|
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
|
|
iftrue .RangClearBell
|
|
checkitem CLEAR_BELL
|
|
iftrue .GotClearBell
|
|
writetext EcruteakTinTowerEntranceSageText_NoClearBell
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.GotClearBell:
|
|
writetext EcruteakTinTowerEntranceSageText_HearsClearBell
|
|
waitbutton
|
|
closetext
|
|
setscene SCENE_FINISHED
|
|
setevent EVENT_RANG_CLEAR_BELL_2
|
|
clearevent EVENT_RANG_CLEAR_BELL_1
|
|
setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
|
|
end
|
|
|
|
.AllowedThrough:
|
|
writetext EcruteakTinTowerEntranceSageText_PleaseDoGoOn
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.RangClearBell:
|
|
writetext EcruteakTinTowerEntranceSageText_HeardClearBell
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
EcruteakTinTowerEntranceWanderingSageScript:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_GOT_CLEAR_BELL
|
|
iftrue .GotClearBell
|
|
writetext EcruteakTinTowerEntranceWanderingSageText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.GotClearBell:
|
|
writetext EcruteakTinTowerEntranceWanderingSageText_GotClearBell
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
EcruteakTinTowerEntranceGrampsScript:
|
|
jumptextfaceplayer EcruteakTinTowerEntranceGrampsText
|
|
|
|
MovementData_0x980c7:
|
|
fix_facing
|
|
big_step LEFT
|
|
remove_fixed_facing
|
|
turn_head DOWN
|
|
step_end
|
|
|
|
MovementData_0x980cc:
|
|
fix_facing
|
|
big_step RIGHT
|
|
remove_fixed_facing
|
|
turn_head DOWN
|
|
step_end
|
|
|
|
EcruteakTinTowerEntranceSageText:
|
|
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
|
|
|
|
EcruteakTinTowerEntranceSageText_GotFogBadge:
|
|
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
|
|
|
|
EcruteakTinTowerEntranceSageText_NoClearBell:
|
|
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
|
|
|
|
EcruteakTinTowerEntranceSageText_HearsClearBell:
|
|
text "A momentous event"
|
|
line "has occurred."
|
|
|
|
para "I beg your pardon,"
|
|
line "but I must ask you"
|
|
cont "to leave."
|
|
|
|
para "<……><……><……>"
|
|
|
|
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
|
|
|
|
EcruteakTinTowerEntranceSageText_PleaseDoGoOn:
|
|
text "Please, do go on."
|
|
done
|
|
|
|
EcruteakTinTowerEntranceSageText_HeardClearBell:
|
|
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
|
|
|
|
EcruteakTinTowerEntranceWanderingSageText:
|
|
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
|
|
|
|
EcruteakTinTowerEntranceWanderingSageText_GotClearBell:
|
|
text "The TIN TOWER"
|
|
line "shook! A #MON"
|
|
|
|
para "must have returned"
|
|
line "to the top!"
|
|
done
|
|
|
|
EcruteakTinTowerEntranceGrampsText:
|
|
text "Two towers…"
|
|
line "Two #MON…"
|
|
|
|
para "But when one"
|
|
line "burned down, both"
|
|
|
|
para "#MON flew away,"
|
|
line "never to return."
|
|
done
|
|
|
|
EcruteakTinTowerEntrance_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 5 ; warp events
|
|
warp_event 4, 17, ECRUTEAK_CITY, 3
|
|
warp_event 5, 17, ECRUTEAK_CITY, 3
|
|
warp_event 5, 3, ECRUTEAK_TIN_TOWER_ENTRANCE, 4
|
|
warp_event 17, 15, ECRUTEAK_TIN_TOWER_ENTRANCE, 3
|
|
warp_event 17, 3, WISE_TRIOS_ROOM, 3
|
|
|
|
db 2 ; coord events
|
|
coord_event 4, 7, SCENE_DEFAULT, EcruteakTinTowerEntrance_CoordEvent1
|
|
coord_event 5, 7, SCENE_DEFAULT, EcruteakTinTowerEntrance_CoordEvent2
|
|
|
|
db 0 ; bg events
|
|
|
|
db 4 ; object events
|
|
object_event 4, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceSageScript, EVENT_RANG_CLEAR_BELL_1
|
|
object_event 5, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceSageScript, EVENT_RANG_CLEAR_BELL_2
|
|
object_event 6, 9, SPRITE_SAGE, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceWanderingSageScript, EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
|
|
object_event 3, 11, SPRITE_GRAMPS, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceGrampsScript, EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
|