pokecrystal-board/maps/BattleTowerBattleRoom.asm

160 lines
4.5 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const BATTLETOWERBATTLEROOM_YOUNGSTER
const BATTLETOWERBATTLEROOM_RECEPTIONIST
BattleTowerBattleRoom_MapScripts:
.SceneScripts:
db 2
scene_script .EnterBattleRoom
scene_script .DummyScene
.MapCallbacks:
db 0
2015-11-26 18:05:32 -08:00
.EnterBattleRoom: ; 0x9f419
2015-11-26 21:22:14 -08:00
disappear BATTLETOWERBATTLEROOM_YOUNGSTER
2015-08-24 16:56:30 -07:00
priorityjump Script_BattleRoom
setscene 1
.DummyScene:
end
2015-08-24 16:56:30 -07:00
Script_BattleRoom: ; 0x9f421
2015-11-26 18:05:32 -08:00
applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn
2015-08-24 16:56:30 -07:00
; beat all 7 opponents in a row
Script_BattleRoomLoop: ; 0x9f425
2015-12-08 13:06:13 -08:00
writebyte BATTLETOWERBATTLEROOM_YOUNGSTER
special Special_LoadOpponentTrainerAndPokemonWithOTSprite
2015-11-26 21:22:14 -08:00
appear BATTLETOWERBATTLEROOM_YOUNGSTER
warpsound
2015-11-25 07:16:29 -08:00
waitsfx
2015-11-26 21:22:14 -08:00
applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksIn
2015-12-09 15:25:44 -08:00
opentext
battletowertext BATTLETOWERTEXT_INTRO
2015-11-29 19:29:45 -08:00
buttonsound
2015-11-25 07:16:29 -08:00
closetext
special Special_BattleTowerBattle ; calls predef startbattle
2018-01-02 08:13:57 -08:00
special Special_FadeOutPalettes
reloadmap
2015-11-03 12:05:19 -08:00
if_not_equal $0, Script_FailedBattleTowerChallenge
2015-08-31 21:26:31 -07:00
copybytetovar wNrOfBeatenBattleTowerTrainers ; wcf64
if_equal BATTLETOWER_NROFTRAINERS, Script_BeatenAllTrainers
2015-11-26 21:22:14 -08:00
applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut
warpsound
2015-11-26 21:22:14 -08:00
disappear BATTLETOWERBATTLEROOM_YOUNGSTER
applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksToPlayer
2015-11-26 18:05:32 -08:00
applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceReceptionist
2015-12-09 15:25:44 -08:00
opentext
2015-08-24 10:35:05 -07:00
writetext Text_YourPkmnWillBeHealedToFullHealth
2015-11-25 07:16:29 -08:00
waitbutton
closetext
playmusic MUSIC_HEAL
2018-01-02 08:13:57 -08:00
special Special_FadeOutPalettes
special Special_LoadMapPalettes
pause 60
2018-01-02 08:13:57 -08:00
special Special_FadeInPalettes
special RestartMapMusic
2015-12-09 15:25:44 -08:00
opentext
2015-08-24 10:35:05 -07:00
writetext Text_NextUpOpponentNo
yesorno
2015-08-24 16:56:30 -07:00
iffalse Script_DontBattleNextOpponent
Script_ContinueAndBattleNextOpponent: ; 0x9f477
2015-11-25 07:16:29 -08:00
closetext
2015-11-26 18:05:32 -08:00
applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceNextOpponent
2015-11-26 21:22:14 -08:00
applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksAway
2015-08-24 16:56:30 -07:00
jump Script_BattleRoomLoop
2015-08-24 16:56:30 -07:00
Script_DontBattleNextOpponent: ; 0x9f483
2015-08-24 10:35:05 -07:00
writetext Text_SaveAndEndTheSession
yesorno
2015-08-24 16:56:30 -07:00
iffalse Script_DontSaveAndEndTheSession
2015-11-26 18:05:32 -08:00
writebyte BATTLETOWERACTION_SAVELEVELGROUP ; save level group
special Special_BattleTowerAction
2015-12-08 13:06:13 -08:00
writebyte BATTLETOWERACTION_SAVEOPTIONS ; choose reward
special Special_BattleTowerAction
2015-12-08 13:06:13 -08:00
writebyte BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave
special Special_BattleTowerAction
playsound SFX_SAVE
2015-11-25 07:16:29 -08:00
waitsfx
2018-01-02 08:13:57 -08:00
special Special_FadeOutPalettes
special Reset
2015-08-24 16:56:30 -07:00
Script_DontSaveAndEndTheSession: ; 0x9f4a3
2015-08-24 10:35:05 -07:00
writetext Text_CancelYourBattleRoomChallenge
yesorno
2015-08-24 16:56:30 -07:00
iffalse Script_ContinueAndBattleNextOpponent
2015-11-26 18:05:32 -08:00
writebyte BATTLETOWERACTION_CHALLENGECANCELED
special Special_BattleTowerAction
2015-11-26 18:05:32 -08:00
writebyte BATTLETOWERACTION_06
special Special_BattleTowerAction
2015-11-25 07:16:29 -08:00
closetext
2018-01-02 08:13:57 -08:00
special Special_FadeOutPalettes
warpfacing UP, BATTLE_TOWER_1F, 7, 7
2015-12-09 15:25:44 -08:00
opentext
2015-11-26 18:05:32 -08:00
jump Script_BattleTowerHopeToServeYouAgain
2015-11-03 12:05:19 -08:00
Script_FailedBattleTowerChallenge:
pause 60
special Special_BattleTowerFade
warpfacing UP, BATTLE_TOWER_1F, 7, 7
2015-11-26 18:05:32 -08:00
writebyte BATTLETOWERACTION_CHALLENGECANCELED
special Special_BattleTowerAction
2015-12-09 15:25:44 -08:00
opentext
2015-08-24 16:56:30 -07:00
writetext Text_ThanksForVisiting
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-08-24 16:56:30 -07:00
Script_BeatenAllTrainers: ; 0x9f4d9
pause 60
special Special_BattleTowerFade
warpfacing UP, BATTLE_TOWER_1F, 7, 7
2015-11-26 18:05:32 -08:00
Script_BeatenAllTrainers2:
2015-12-09 15:25:44 -08:00
opentext
2015-08-24 16:56:30 -07:00
writetext Text_CongratulationsYouveBeatenAllTheTrainers
jump Script_GivePlayerHisPrize
2015-11-26 18:05:32 -08:00
UnreferencedScript_0x9f4eb:
writebyte BATTLETOWERACTION_CHALLENGECANCELED
special Special_BattleTowerAction
2015-12-09 15:25:44 -08:00
opentext
2015-08-24 16:56:30 -07:00
writetext Text_TooMuchTimeElapsedNoRegister
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-11-26 18:05:32 -08:00
UnreferencedScript_0x9f4f7:
writebyte BATTLETOWERACTION_CHALLENGECANCELED
special Special_BattleTowerAction
2015-11-26 18:05:32 -08:00
writebyte BATTLETOWERACTION_06
special Special_BattleTowerAction
2015-12-09 15:25:44 -08:00
opentext
2015-08-24 16:56:30 -07:00
writetext Text_ThanksForVisiting
2015-08-24 10:35:05 -07:00
writetext Text_WeHopeToServeYouAgain
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-11-26 18:05:32 -08:00
Text_ReturnedAfterSave_Mobile:
text "You'll be returned"
line "after you SAVE."
done
2013-05-01 10:29:45 -07:00
BattleTowerBattleRoom_MapEvents:
; filler
db 0, 0
.Warps:
db 2
warp_def 3, 7, 4, BATTLE_TOWER_HALLWAY
warp_def 4, 7, 4, BATTLE_TOWER_HALLWAY
.CoordEvents:
db 0
.BGEvents:
db 0
.ObjectEvents:
db 2
object_event 4, 0, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_BATTLE_TOWER_BATTLE_ROOM_YOUNGSTER
object_event 1, 6, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1