pokecrystal-board/maps/HallOfFame.asm
Remy Oukaour 5c28d05bb4 Merge branch 'master' of https://github.com/xCrystal/pokecrystal (resolve PR #459)
# Conflicts:
#	data/items/descriptions.asm
#	data/sprite_anims/framesets.asm
#	engine/crystal_colors.asm
#	engine/events/kurt.asm
#	engine/events/special.asm
#	engine/events/std_scripts.asm
#	engine/events_3.asm
#	engine/item_effects.asm
#	engine/namingscreen.asm
#	engine/scripting.asm
#	engine/stats_screen.asm
#	engine/trade_animation.asm
#	home/audio.asm
#	main.asm
#	maps/BattleTower1F.asm
#	maps/BattleTowerBattleRoom.asm
#	maps/BurnedTowerB1F.asm
#	maps/ElmsLab.asm
#	maps/GoldenrodDeptStore5F.asm
#	maps/GoldenrodUnderground.asm
#	maps/HallOfFame.asm
#	maps/MahoganyTown.asm
#	maps/ManiasHouse.asm
#	maps/MobileBattleRoom.asm
#	maps/MobileTradeRoomMobile.asm
#	maps/RadioTower2F.asm
#	maps/Route35NationalParkGate.asm
#	maps/Route36NationalParkGate.asm
#	maps/Route39Farmhouse.asm
#	tilesets/palette_maps.asm
2018-01-14 22:56:36 -05:00

131 lines
2.3 KiB
NASM

const_value set 2
const HALLOFFAME_LANCE
HallOfFame_MapScriptHeader:
.SceneScripts:
db 2
scene_script .EnterHallOfFame
scene_script .DummyScene
.MapCallbacks:
db 0
.EnterHallOfFame:
priorityjump .EnterHallOfFameScript
end
.DummyScene:
end
.EnterHallOfFameScript:
follow HALLOFFAME_LANCE, PLAYER
applymovement HALLOFFAME_LANCE, HallOfFame_WalkUpWithLance
stopfollow
spriteface PLAYER, RIGHT
opentext
writetext HallOfFame_LanceText
waitbutton
closetext
spriteface HALLOFFAME_LANCE, UP
applymovement PLAYER, HallOfFame_SlowlyApproachMachine
setscene 1
pause 15
writebyte HEALMACHINE_HALL_OF_FAME
special Special_HealMachineAnim
setevent EVENT_BEAT_ELITE_FOUR
setevent EVENT_TELEPORT_GUY
setevent EVENT_RIVAL_SPROUT_TOWER
clearevent EVENT_RED_IN_MT_SILVER
setevent EVENT_OLIVINE_PORT_SPRITES_BEFORE_HALL_OF_FAME
clearevent EVENT_OLIVINE_PORT_SPRITES_AFTER_HALL_OF_FAME
setmapscene SPROUT_TOWER_3F, 1
special HealParty
checkevent EVENT_GOT_SS_TICKET_FROM_ELM
iftrue .SkipPhoneCall
specialphonecall SPECIALCALL_SSTICKET
.SkipPhoneCall:
halloffame
end
HallOfFame_WalkUpWithLance:
step UP
step UP
step UP
step UP
step UP
step UP
step UP
step UP
step RIGHT
turn_head LEFT
step_end
HallOfFame_SlowlyApproachMachine:
slow_step UP
step_end
HallOfFame_LanceText:
text "LANCE: It's been a"
line "long time since I"
cont "last came here."
para "This is where we"
line "honor the LEAGUE"
para "CHAMPIONS for all"
line "eternity."
para "Their courageous"
line "#MON are also"
cont "inducted."
para "Here today, we"
line "witnessed the rise"
para "of a new LEAGUE"
line "CHAMPION--a"
para "trainer who feels"
line "compassion for,"
para "and trust toward,"
line "all #MON."
para "A trainer who"
line "succeeded through"
para "perseverance and"
line "determination."
para "The new LEAGUE"
line "CHAMPION who has"
para "all the makings"
line "of greatness!"
para "<PLAY_G>, allow me"
line "to register you"
para "and your partners"
line "as CHAMPIONS!"
done
HallOfFame_MapEventHeader:
; filler
db 0, 0
.Warps:
db 2
warp_def 4, 13, 3, LANCES_ROOM
warp_def 5, 13, 4, LANCES_ROOM
.CoordEvents:
db 0
.BGEvents:
db 0
.ObjectEvents:
db 1
object_event 4, 12, SPRITE_LANCE, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1