pokecrystal-board/maps/EcruteakTinTowerEntrance.asm

299 lines
6.2 KiB
NASM
Raw Normal View History

2018-01-31 08:38:45 -08:00
const_def 2 ; object constants
const ECRUTEAKTINTOWERENTRANCE_SAGE1
const ECRUTEAKTINTOWERENTRANCE_SAGE2
const ECRUTEAKTINTOWERENTRANCE_SAGE3
const ECRUTEAKTINTOWERENTRANCE_GRAMPS
2015-11-26 21:22:14 -08:00
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:
2013-09-24 00:48:58 -07:00
checkevent EVENT_FOUGHT_SUICUNE
iftrue .DontBlockTower
2013-09-24 00:48:58 -07:00
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
iftrue .DontBlockTower
2013-09-24 00:48:58 -07:00
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue .BlockTower
return
.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:
return
.DontBlockTower:
clearevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
return
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
2015-07-10 01:45:35 -07:00
SageScript_0x98062:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2013-09-24 00:48:58 -07:00
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue .CheckForClearBell
2015-07-10 05:08:03 -07:00
checkflag ENGINE_FOGBADGE
iftrue .BlockPassage_GotFogBadge
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x980d1
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.BlockPassage_GotFogBadge:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x98131
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.CheckForClearBell:
2013-09-24 00:48:58 -07:00
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
iftrue .AllowedThrough
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
iftrue .Event000
checkitem CLEAR_BELL
iftrue .RingClearBell
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x981a4
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.RingClearBell:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x98250
2015-11-25 07:16:29 -08:00
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:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x9837e
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.Event000:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x98391
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:45:35 -07:00
SageScript_0x980b0:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2013-09-24 00:48:58 -07:00
checkevent EVENT_GOT_CLEAR_BELL
iftrue .GotClearBell
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x9840b
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
.GotClearBell:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x9846f
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
EcruteakTinTowerEntranceGrampsScript:
jumptextfaceplayer EcruteakTinTowerEntranceGrampsText
2015-07-10 01:45:35 -07:00
MovementData_0x980c7:
fix_facing
2016-05-14 10:46:14 -07:00
big_step LEFT
remove_fixed_facing
2016-05-14 10:46:14 -07:00
turn_head DOWN
step_end
2015-07-10 01:45:35 -07:00
MovementData_0x980cc:
fix_facing
2016-05-14 10:46:14 -07:00
big_step RIGHT
remove_fixed_facing
2016-05-14 10:46:14 -07:00
turn_head DOWN
step_end
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_0x98250:
text "A momentous event"
line "has occurred."
para "I beg your pardon,"
line "but I must ask you"
cont "to leave."
2018-01-18 23:30:19 -08:00
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
2015-07-10 01:45:35 -07:00
UnknownText_0x9837e:
text "Please, do go on."
done
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_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
2015-07-10 01:45:35 -07:00
UnknownText_0x9846f:
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
2018-02-01 19:22:07 -08:00
warp_event 4, 17, ECRUTEAK_CITY, 3
warp_event 5, 17, ECRUTEAK_CITY, 3
warp_event 5, 3, ECRUTEAK_TIN_TOWER_ENTRANCE, 4
2018-02-01 18:54:00 -08:00
warp_event 17, 15, ECRUTEAK_TIN_TOWER_ENTRANCE, 3
2018-02-01 19:22:07 -08:00
warp_event 17, 3, WISE_TRIOS_ROOM, 3
db 2 ; coord events
2018-02-01 19:22:07 -08:00
coord_event 4, 7, SCENE_DEFAULT, EcruteakTinTowerEntrance_CoordEvent1
coord_event 5, 7, SCENE_DEFAULT, EcruteakTinTowerEntrance_CoordEvent2
db 0 ; bg events
db 4 ; object events
2018-02-01 19:22:07 -08:00
object_event 4, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SageScript_0x98062, EVENT_RANG_CLEAR_BELL_1
object_event 5, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SageScript_0x98062, EVENT_RANG_CLEAR_BELL_2
object_event 6, 9, SPRITE_SAGE, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SageScript_0x980b0, 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