jep-hack/maps/EcruteakTinTowerEntrance.asm
2024-09-02 19:06:43 +01:00

293 lines
7.1 KiB
NASM

object_const_def
const ECRUTEAKTINTOWERENTRANCE_SAGE1
const ECRUTEAKTINTOWERENTRANCE_SAGE2
const ECRUTEAKTINTOWERENTRANCE_SAGE3
const ECRUTEAKTINTOWERENTRANCE_GRAMPS
EcruteakTinTowerEntrance_MapScripts:
def_scene_scripts
scene_script EcruteakTinTowerEntranceNoop1Scene, SCENE_ECRUTEAKTINTOWERENTRANCE_SAGE_BLOCKS
scene_script EcruteakTinTowerEntranceNoop2Scene, SCENE_ECRUTEAKTINTOWERENTRANCE_NOOP
def_callbacks
callback MAPCALLBACK_OBJECTS, EcruteakTinTowerEntranceInitializeSagesCallback
EcruteakTinTowerEntranceNoop1Scene:
end
EcruteakTinTowerEntranceNoop2Scene:
end
EcruteakTinTowerEntranceInitializeSagesCallback:
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
iftrue .DontBlockTower
checkevent EVENT_BEAT_ELITE_FOUR ; Temporary. This should be changed to something relating to Navel Rock. We don't need it to be the Radio Tower, anyway, as Suicune is no longer here.
iftrue .BlockTower
endcallback
.BlockTower:
clearevent EVENT_SAW_RAINBOW_WING_1
setevent EVENT_SAW_RAINBOW_WING_2
setevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
checkitem RAINBOW_WING
iftrue .NoRainbowWing
setscene SCENE_ECRUTEAKTINTOWERENTRANCE_SAGE_BLOCKS
.NoRainbowWing:
endcallback
.DontBlockTower:
clearevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE
endcallback
EcruteakTinTowerEntranceSageBlocksLeft:
checkevent EVENT_SAW_RAINBOW_WING_2
iftrue EcruteakTinTowerEntranceAlreadyBlocked
applymovement ECRUTEAKTINTOWERENTRANCE_SAGE2, EcruteakTinTowerEntranceSageBlocksLeftMovement
moveobject ECRUTEAKTINTOWERENTRANCE_SAGE1, 4, 6
appear ECRUTEAKTINTOWERENTRANCE_SAGE1
pause 5
disappear ECRUTEAKTINTOWERENTRANCE_SAGE2
end
EcruteakTinTowerEntranceSageBlocksRight:
checkevent EVENT_SAW_RAINBOW_WING_1 ; check what this is for
iftrue EcruteakTinTowerEntranceAlreadyBlocked
applymovement ECRUTEAKTINTOWERENTRANCE_SAGE1, EcruteakTinTowerEntranceSageBlocksRightMovement
moveobject ECRUTEAKTINTOWERENTRANCE_SAGE2, 5, 6
appear ECRUTEAKTINTOWERENTRANCE_SAGE2
pause 5
disappear ECRUTEAKTINTOWERENTRANCE_SAGE1
end
EcruteakTinTowerEntranceAlreadyBlocked:
end
EcruteakTinTowerEntranceSageScript:
faceplayer
opentext
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue .CheckForRainbowWing
checkflag ENGINE_FOGBADGE
iftrue .BlockPassage_GotFogBadge
writetext EcruteakTinTowerEntranceSageText
waitbutton
closetext
end
.BlockPassage_GotFogBadge:
writetext EcruteakTinTowerEntranceSageText_GotFogBadge
waitbutton
closetext
end
.CheckForRainbowWing:
checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER
iftrue .AllowedThrough
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
iftrue .SawRainbowWing
checkitem RAINBOW_WING
iftrue .GotRainbowWing
writetext EcruteakTinTowerEntranceSageText_NoRainbowWing
waitbutton
closetext
end
.GotRainbowWing:
writetext EcruteakTinTowerEntranceSageText_SeesRainbowWing
waitbutton
closetext
setscene SCENE_ECRUTEAKTINTOWERENTRANCE_NOOP
setevent EVENT_SAW_RAINBOW_WING_2
clearevent EVENT_SAW_RAINBOW_WING_1
setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
end
.AllowedThrough:
writetext EcruteakTinTowerEntranceSageText_PleaseDoGoOn
waitbutton
closetext
end
.SawRainbowWing:
writetext EcruteakTinTowerEntranceSageText_SawRainbowWing
waitbutton
closetext
end
EcruteakTinTowerEntranceWanderingSageScript:
faceplayer
opentext
checkevent EVENT_GOT_MASTER_BALL
iftrue .GotRainbowWing
writetext EcruteakTinTowerEntranceWanderingSageText
waitbutton
closetext
end
.GotRainbowWing:
writetext EcruteakTinTowerEntranceWanderingSageText_GotRainbowWing
waitbutton
closetext
end
EcruteakTinTowerEntranceGrampsScript:
jumptextfaceplayer EcruteakTinTowerEntranceGrampsText
EcruteakTinTowerEntranceSageBlocksLeftMovement:
fix_facing
big_step LEFT
remove_fixed_facing
turn_head DOWN
step_end
EcruteakTinTowerEntranceSageBlocksRightMovement:
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_NoRainbowWing:
text "A momentous event"
line "has occurred."
para "I beg your pardon,"
line "but I must ask you"
cont "to leave."
para "…What symbolises"
line "the heart…"
para "The WISE TRIO say"
line "things that are so"
para "very difficult to"
line "understand…"
done
EcruteakTinTowerEntranceSageText_SeesRainbowWing:
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 "That's a RAINBOW"
line "WING!"
para "It… It's sublime!"
para "I've never seen"
line "something so"
cont "beautiful!"
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_SawRainbowWing:
text "The RAINBOW WING"
line "is indicative of"
cont "one's heart."
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_GotRainbowWing:
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
def_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
def_coord_events
coord_event 4, 7, SCENE_ECRUTEAKTINTOWERENTRANCE_SAGE_BLOCKS, EcruteakTinTowerEntranceSageBlocksLeft
coord_event 5, 7, SCENE_ECRUTEAKTINTOWERENTRANCE_SAGE_BLOCKS, EcruteakTinTowerEntranceSageBlocksRight
def_bg_events
def_object_events
object_event 4, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceSageScript, EVENT_SAW_RAINBOW_WING_1
object_event 5, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceSageScript, EVENT_SAW_RAINBOW_WING_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