pokecrystal-board/maps/BattleTower1F.asm
2015-11-15 15:07:20 -05:00

816 lines
16 KiB
NASM

BattleTower1F_MapScriptHeader:
.MapTriggers:
db 2
; triggers
dw .Trigger0, 0
dw .Trigger1, 0
.MapCallbacks:
db 0
.Trigger0:
writebyte BATTLE_TOWER_ACTION_09
special BattleTowerAction
iffalse .SkipEverything
writebyte BATTLE_TOWER_ACTION_02
special BattleTowerAction
if_equal $0, .SkipEverything
if_equal $2, .priorityjump1
if_equal $3, .SkipEverything
if_equal $4, .SkipEverything
loadfont
writetext UnknownText_0x9f037
closetext
loadmovesprites
priorityjump UnknownScript_0x9e44e
end
.priorityjump1:
priorityjump UnknownScript_0x9e555
writebyte BATTLE_TOWER_ACTION_04
special BattleTowerAction
writebyte BATTLE_TOWER_ACTION_06
special BattleTowerAction
.SkipEverything:
dotrigger $1
.Trigger1:
end
MapBattleTower1FSignpost0Script:
loadfont
writetext Text_ReadBattleTowerRules
yesorno
iffalse UnknownScript_0x9e3e0
writetext Text_BattleTowerRules
closetext
UnknownScript_0x9e3e0:
loadmovesprites
end
ReceptionistScript_0x9e3e2:
writebyte BATTLE_TOWER_ACTION_02
special BattleTowerAction
if_equal $3, BattleTowerBattleRoomScript_0x9f4e4 ; maps/BattleTowerBattleRoom.asm
loadfont
writetext Text_BattleTowerWelcomesYou
keeptextopen
writebyte BATTLE_TOWER_ACTION_00
special BattleTowerAction
if_not_equal $0, Script_Menu_ChallengeExplanationCancel
jump Script_BattleTowerIntroductionYesNo
Script_Menu_ChallengeExplanationCancel: ; 0x9e3fc
writetext Text_WantToGoIntoABattleRoom
writebyte $1
special Special_Menu_ChallengeExplanationCancel
if_equal $1, Script_ChoseChallenge
if_equal $2, Script_BattleTowerExplanation
jump UnknownScript_0x9e4b0
Script_ChoseChallenge: ; 0x9e40f
writebyte BATTLE_TOWER_ACTION_1A ; ResetBattleTowerTrainerSRAM
special BattleTowerAction
special SpecialCheckForBattleTowerRules
if_not_equal $0, Script_CloseText
writetext Text_SaveBeforeEnteringBattleRoom
yesorno
iffalse Script_Menu_ChallengeExplanationCancel
dotrigger $0
special Special_TryQuickSave
iffalse Script_Menu_ChallengeExplanationCancel
dotrigger $1
writebyte BATTLE_TOWER_ACTION_01
special BattleTowerAction
special Function1700b0
if_equal $a, Script_Menu_ChallengeExplanationCancel
if_not_equal $0, UnknownScript_0x9e550
writebyte BATTLE_TOWER_ACTION_11
special BattleTowerAction
writetext Text_RightThisWayToYourBattleRoom
closetext
loadmovesprites
writebyte BATTLE_TOWER_ACTION_1E
special BattleTowerAction
jump UnknownScript_0x9e454
UnknownScript_0x9e44e:
loadmovesprites
writebyte BATTLE_TOWER_ACTION_08
special BattleTowerAction
UnknownScript_0x9e454:
musicfadeout MUSIC_NONE, $8
domaptrigger BATTLE_TOWER_BATTLE_ROOM, $0
domaptrigger BATTLE_TOWER_ELEVATOR, $0
domaptrigger BATTLE_TOWER_HALLWAY, $0
follow $2, PLAYER
applymovement $2, MovementData_0x9e571
writebyte BATTLE_TOWER_ACTION_0A
special BattleTowerAction
warpsound
disappear $2
stopfollow
applymovement PLAYER, MovementData_0x9e576
warpcheck
end
Script_GivePlayerHisPrize: ; 0x9e47a
writebyte BATTLE_TOWER_ACTION_1C
special BattleTowerAction
writebyte BATTLE_TOWER_ACTION_1B
special BattleTowerAction
if_equal $12, Script_YourPackIsStuffedFull
itemtotext $0, $1
giveitem ITEM_FROM_MEM, 5
writetext Text_PlayerGotFive
writebyte BATTLE_TOWER_ACTION_1D
special BattleTowerAction
loadmovesprites
end
Script_YourPackIsStuffedFull: ; 0x9e498
writetext Text_YourPackIsStuffedFull
closetext
loadmovesprites
end
Script_BattleTowerIntroductionYesNo: ; 0x9e49e
writetext Text_WouldYouLikeToHearAboutTheBattleTower
yesorno
iffalse UnknownScript_0x9e4a8
Script_BattleTowerExplanation: ; 0x9e4a5
writetext Text_BattleTowerIntroduction_2
UnknownScript_0x9e4a8:
writebyte BATTLE_TOWER_ACTION_01
special BattleTowerAction
jump Script_Menu_ChallengeExplanationCancel
UnknownScript_0x9e4b0:
writetext Text_WeHopeToServeYouAgain
closetext
loadmovesprites
end
UnknownScript_0x9e4b6:
special Function17f53d
loadmovesprites
end
Script_CloseText: ; 0x9e4bb
closetext
loadmovesprites
end
UnknownScript_0x9e4be:
writetext Text_SaveBeforeEnteringBattleRoom
yesorno
iffalse Script_Menu_ChallengeExplanationCancel
special Special_TryQuickSave
iffalse Script_Menu_ChallengeExplanationCancel
writebyte BATTLE_TOWER_ACTION_01
special BattleTowerAction
special Function1700ba
if_equal $a, Script_Menu_ChallengeExplanationCancel
if_not_equal $0, UnknownScript_0x9e550
writetext Text_ReceivedAListOfLeadersOnTheHonorRoll
spriteface $2, LEFT
writetext Text_PleaseConfirmOnThisMonitor
closetext
spriteface $2, DOWN
loadmovesprites
end
UnknownScript_0x9e4ea:
writebyte BATTLE_TOWER_ACTION_18
special BattleTowerAction
if_not_equal $0, Script_APkmnLevelExceeds
writebyte BATTLE_TOWER_ACTION_19
special BattleTowerAction
if_not_equal $0, Script_MayNotEnterABattleRoomUnderL70
special SpecialCheckForBattleTowerRules
if_not_equal $0, Script_CloseText
writebyte BATTLE_TOWER_ACTION_05
special BattleTowerAction
if_equal $0, UnknownScript_0x9e512
writetext UnknownText_0x9ecb0
jump UnknownScript_0x9e515
UnknownScript_0x9e512:
writetext UnknownText_0x9ec6d
UnknownScript_0x9e515:
yesorno
iffalse Script_Menu_ChallengeExplanationCancel
writetext UnknownText_0x9ef79
yesorno
iffalse Script_Menu_ChallengeExplanationCancel
dotrigger $0
special Special_TryQuickSave
iffalse Script_Menu_ChallengeExplanationCancel
dotrigger $1
writebyte BATTLE_TOWER_ACTION_06
special BattleTowerAction
writebyte BATTLE_TOWER_ACTION_12
special BattleTowerAction
writetext Text_RightThisWayToYourBattleRoom
closetext
jump UnknownScript_0x9e44e
UnknownScript_0x9e53b:
writetext UnknownText_0x9f076
closetext
jump UnknownScript_0x9e4b0
Script_APkmnLevelExceeds: ; 0x9e542
writetext Text_APkmnLevelExceeds
closetext
jump Script_Menu_ChallengeExplanationCancel
Script_MayNotEnterABattleRoomUnderL70: ; 0x9e549
writetext Text_MayNotEnterABattleRoomUnderL70
closetext
jump Script_Menu_ChallengeExplanationCancel
UnknownScript_0x9e550:
special Function17f53d
loadmovesprites
end
UnknownScript_0x9e555:
loadfont
writetext UnknownText_0x9ee18
closetext
jump UnknownScript_0x9e4b0
YoungsterScript_0x9e55d:
faceplayer
loadfont
writetext Text_BattleTowerYoungster
closetext
loadmovesprites
spriteface $3, RIGHT
end
CooltrainerFScript_0x9e568:
jumptextfaceplayer Text_BattleTowerCooltrainerF
BugCatcherScript_0x9e56b:
jumptextfaceplayer Text_BattleTowerBugCatcher
GrannyScript_0x9e56e:
jumptextfaceplayer Text_BattleTowerGranny
MovementData_0x9e571:
step_up
step_up
step_up
step_up
step_up
MovementData_0x9e576:
step_up
step_end
MovementData_0x9e578:
step_down
step_end
MovementData_0x9e57a:
step_right
step_right
MovementData_0x9e57c:
step_right
step_right
step_up
step_right
turn_head_left
step_end
MovementData_0x9e582:
step_left
step_left
MovementData_0x9e584:
step_left
step_left
MovementData_0x9e586:
step_left
step_left
step_up
step_left
turn_head_right
step_end
MovementData_0x9e58c:
step_up
step_up
step_up
step_up
turn_head_right
step_end
MovementData_0x9e592:
slow_step_down
slow_step_down
slow_step_down
turn_head_left
step_end
MovementData_0x9e597:
turn_head_up
slow_step_up
slow_step_up
slow_step_up
step_end
MovementData_0x9e59c:
slow_step_right
slow_step_right
slow_step_up
slow_step_up
step_end
MovementData_0x9e5a1:
slow_step_down
slow_step_down
slow_step_left
slow_step_left
turn_head_right
step_end
MovementData_0x9e5a7:
turn_head_down
step_end
MovementData_0x9e5a9:
turn_head_right
step_end
Text_BattleTowerWelcomesYou: ; 0x9e5ab
text "BATTLE TOWER"
line "welcomes you!"
para "I could show you"
line "to a BATTLE ROOM."
done
Text_WantToGoIntoABattleRoom: ; 0x9e5ea
text "Want to go into a"
line "BATTLE ROOM?"
done
Text_RightThisWayToYourBattleRoom: ; 0x9e60a
text "Right this way to"
line "your BATTLE ROOM."
done
Text_BattleTowerIntroduction_1: ; 0x9e62f
text "BATTLE TOWER is a"
line "facility made for"
cont "#MON battles."
para "Countless #MON"
line "trainers gather"
para "from all over to"
line "hold battles in"
para "specially designed"
line "BATTLE ROOMS."
para "There are many"
line "BATTLE ROOMS in"
cont "the BATTLE TOWER."
para "Each ROOM holds"
line "seven trainers."
para "If you defeat the"
line "seven in a ROOM,"
para "and you have a"
line "good record, you"
para "could become the"
line "ROOM's LEADER."
para "All LEADERS will"
line "be recorded in the"
para "HONOR ROLL for"
line "posterity."
para "You may challenge"
line "in up to five"
para "BATTLE ROOMS each"
line "day."
para "However, you may"
line "battle only once a"
para "day in any given"
line "ROOM."
para "To interrupt a"
line "session, you must"
para "SAVE. If not, you"
line "won't be able to"
para "resume your ROOM"
line "challenge."
para ""
done
Text_BattleTowerIntroduction_2: ; 0x9e886
text "BATTLE TOWER is a"
line "facility made for"
cont "#MON battles."
para "Countless #MON"
line "trainers gather"
para "from all over to"
line "hold battles in"
para "specially designed"
line "BATTLE ROOMS."
para "There are many"
line "BATTLE ROOMS in"
cont "the BATTLE TOWER."
para "Each ROOM holds"
line "seven trainers."
para "Beat them all, and"
line "win a prize."
para "To interrupt a"
line "session, you must"
para "SAVE. If not, you"
line "won't be able to"
para "resume your ROOM"
line "challenge."
para ""
done
Text_ReceivedAListOfLeadersOnTheHonorRoll: ; 0x9e9eb
text "Received a list of"
line "LEADERS on the"
cont "HONOR ROLL."
para ""
done
Text_PleaseConfirmOnThisMonitor: ; 0x9ea1b
text "Please confirm on"
line "this monitor."
done
Text_ThankYou: ; 0x9ea3c
text "Thank you!"
para ""
done
Text_ThanksForVisiting: ; 0x9ea49
text "Thanks for"
line "visiting!"
done
UnknownText_0x9ea5f:
text "Congratulations!"
para "You've beaten all"
line "the trainers!"
para "Your feat may be"
line "worth registering,"
para "<PLAYER>. With your"
line "results, you may"
para "be chosen as a"
line "ROOM LEADER."
para ""
done
Text_CongratulationsYouveBeatenAllTheTrainers: ; 0x9eaef
text "Congratulations!"
para "You've beaten all"
line "the trainers!"
para "For that, you get"
line "this great prize!"
para ""
done
UnknownText_0x9eb45:
text "Would you like to"
line "register your"
para "record with the"
line "CENTER?"
done
Text_PlayerGotFive: ; 0x9eb7e
text "<PLAYER> got five"
line "@"
text_from_ram StringBuffer4
text "!@"
sound0x0F
text_waitbutton
db "@"
Text_YourPackIsStuffedFull: ; 0x9eb94
text "Oops, your PACK is"
line "stuffed full."
para "Please make room"
line "and come back."
done
Text_YourRegistrationIsComplete: ; 0x9ebd6
text "Your registration"
line "is complete."
para "Please come again!"
done
Text_WeHopeToServeYouAgain: ; 0x9ec09
text "We hope to serve"
line "you again."
done
Text_PleaseStepThisWay: ; 0x9ec26
text "Please step this"
line "way."
done
Text_WouldYouLikeToHearAboutTheBattleTower: ; 0x9ec3d
text "Would you like to"
line "hear about the"
cont "BATTLE TOWER?"
done
UnknownText_0x9ec6d:
text "Your record from"
line "the previous"
para "BATTLE ROOM can't"
line "be registered. OK?"
done
UnknownText_0x9ecb0:
text "Your record from"
line "the previous"
para "BATTLE ROOM can't"
line "be registered."
para "Also, the existing"
line "record will be"
cont "deleted. OK?"
done
Text_CheckTheLeaderHonorRoll: ; 0x9ed1e
text "Check the LEADER"
line "HONOR ROLL?"
done
Text_ReadBattleTowerRules: ; 0x9ed3c
text "BATTLE TOWER rules"
line "are written here."
para "Read the rules?"
done
Text_BattleTowerRules: ; 0x9ed72
text "Three #MON may"
line "enter battles."
para "All three must be"
line "different."
para "The items they"
line "hold must also be"
cont "different."
para "Certain #MON"
line "may also have"
para "level restrictions"
line "placed on them."
done
UnknownText_0x9ee18:
text "Excuse me!"
line "You didn't SAVE"
para "before exiting"
line "the BATTLE ROOM."
para "I'm awfully sorry,"
line "but your challenge"
para "will be declared"
line "invalid."
done
Text_YourPkmnWillBeHealedToFullHealth: ; 0x9ee92
text "Your #MON will"
line "be healed to full"
cont "health."
done
Text_NextUpOpponentNo: ; 0x9eebc
text "Next up, opponent"
line "no.@"
text_from_ram StringBuffer3
text ". Ready?"
done
UnknownText_0x9eee0:
text "Your session will"
line "be SAVED before"
para "connecting with"
line "the CENTER."
done
Text_SaveBeforeEnteringBattleRoom: ; 0x9ef1f
text "Before entering"
line "the BATTLE ROOM,"
para "your progress will"
line "be saved."
done
Text_SaveAndEndTheSession: ; 0x9ef5e
text "SAVE and end the"
line "session?"
done
UnknownText_0x9ef79:
text "Your record will"
line "be SAVED before"
para "you go back into"
line "the previous ROOM."
done
Text_CancelYourBattleRoomChallenge: ; 0x9efbf
text "Cancel your BATTLE"
line "ROOM challenge?"
done
UnknownText_0x9efe3:
text "We have your"
line "previous record on"
para "file. Would you"
line "like to register"
cont "it at the CENTER?"
done
UnknownText_0x9f037:
text "We've been waiting"
line "for you. This way"
para "to a BATTLE ROOM,"
line "please."
done
UnknownText_0x9f076:
text "You may enter only"
line "five BATTLE ROOMS"
cont "each day."
para "Please come back"
line "tomorrow."
done
Text_TooMuchTimeElapsedNoRegister: ; 0x9f0c1
text "Sorry, but it's"
line "not possible to"
para "register your"
line "current record at"
para "the CENTER because"
line "too much time has"
para "elapsed since the"
line "start of your"
cont "challenge."
done
; a dupe?
UnknownText_0x9f151:
text "Sorry, but it's"
line "not possible to"
para "register your most"
line "recent record at"
para "the CENTER because"
line "too much time has"
para "elapsed since the"
line "start of your"
cont "challenge."
done
Text_APkmnLevelExceeds: ; 0x9f1e5
text "One or more of"
line "your #MON's"
cont "levels exceeds @"
deciram ScriptVar, 1, 3
text "."
done
Text_MayNotEnterABattleRoomUnderL70: ; 0x9f217
text_from_ram wcd49
text " may not"
line "enter a BATTLE"
cont "ROOM under L70."
para "This BATTLE ROOM"
line "is for L@"
deciram ScriptVar, 1, 3
text "."
done
Text_BattleTowerYoungster: ; 0x9f264
text "Destroyed by the"
line "first opponent in"
para "no time at all…"
line "I'm no good…"
done
Text_BattleTowerCooltrainerF: ; 0x9f2a4
text "There are lots of"
line "BATTLE ROOMS, but"
para "I'm going to win"
line "them all!"
done
Text_BattleTowerGranny: ; 0x9f2e3
text "It's a grueling"
line "task, not being"
para "able to use items"
line "in battle."
para "Making your"
line "#MON hold items"
para "is the key to"
line "winning battles."
done
Text_BattleTowerBugCatcher: ; 0x9f35b
text "I'm trying to see"
line "how far I can go"
para "using just bug"
line "#MON."
para "Don't let there be"
line "any fire #MON…"
done
BattleTower1F_MapEventHeader:
; filler
db 0, 0
.Warps:
db 3
warp_def $9, $7, 3, BATTLE_TOWER_OUTSIDE
warp_def $9, $8, 4, BATTLE_TOWER_OUTSIDE
warp_def $0, $7, 1, BATTLE_TOWER_ELEVATOR
.XYTriggers:
db 0
.Signposts:
db 1
signpost 6, 6, SIGNPOST_READ, MapBattleTower1FSignpost0Script
.PersonEvents:
db 5
person_event SPRITE_RECEPTIONIST, 6, 7, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, ReceptionistScript_0x9e3e2, -1
person_event SPRITE_YOUNGSTER, 9, 14, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, (1 << 3) | PAL_OW_BROWN, PERSONTYPE_SCRIPT, 0, YoungsterScript_0x9e55d, -1
person_event SPRITE_COOLTRAINER_F, 9, 4, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 1, -1, -1, (1 << 3) | PAL_OW_RED, PERSONTYPE_SCRIPT, 0, CooltrainerFScript_0x9e568, -1
person_event SPRITE_BUG_CATCHER, 3, 1, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, (1 << 3) | PAL_OW_BLUE, PERSONTYPE_SCRIPT, 0, BugCatcherScript_0x9e56b, -1
person_event SPRITE_GRANNY, 3, 14, SPRITEMOVEDATA_WALK_UP_DOWN, 1, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, GrannyScript_0x9e56e, -1