pokecrystal-board/maps/BattleTowerBattleRoom.asm

const_value set 2
	const BATTLETOWERBATTLEROOM_YOUNGSTER
	const BATTLETOWERBATTLEROOM_RECEPTIONIST

BattleTowerBattleRoom_MapScriptHeader:
.SceneScripts:
	db 2
	scene_script .EnterBattleRoom
	scene_script .DummyScene

.MapCallbacks:
	db 0

.EnterBattleRoom: ; 0x9f419
	disappear BATTLETOWERBATTLEROOM_YOUNGSTER
	priorityjump Script_BattleRoom
	setscene 1
.DummyScene:
	end

Script_BattleRoom: ; 0x9f421
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn
; beat all 7 opponents in a row
Script_BattleRoomLoop: ; 0x9f425
	writebyte BATTLETOWERBATTLEROOM_YOUNGSTER
	special Function_LoadOpponentTrainerAndPokemonsWithOTSprite
	appear BATTLETOWERBATTLEROOM_YOUNGSTER
	warpsound
	waitsfx
	applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksIn
	opentext
	battletowertext 1
	buttonsound
	closetext
	special BattleTowerBattle ; calls predef startbattle
	special FadeOutPalettes
	reloadmap
	if_not_equal $0, Script_FailedBattleTowerChallenge
	copybytetovar wNrOfBeatenBattleTowerTrainers ; wcf64
	if_equal BATTLETOWER_NROFTRAINERS, Script_BeatenAllTrainers
	applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut
	warpsound
	disappear BATTLETOWERBATTLEROOM_YOUNGSTER
	applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksToPlayer
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceReceptionist
	opentext
	writetext Text_YourPkmnWillBeHealedToFullHealth
	waitbutton
	closetext
	playmusic MUSIC_HEAL
	special FadeOutPalettes
	special LoadMapPalettes
	pause 60
	special FadeInPalettes
	special RestartMapMusic
	opentext
	writetext Text_NextUpOpponentNo
	yesorno
	iffalse Script_DontBattleNextOpponent
Script_ContinueAndBattleNextOpponent: ; 0x9f477
	closetext
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceNextOpponent
	applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksAway
	jump Script_BattleRoomLoop

Script_DontBattleNextOpponent: ; 0x9f483
	writetext Text_SaveAndEndTheSession
	yesorno
	iffalse Script_DontSaveAndEndTheSession
	writebyte BATTLETOWERACTION_SAVELEVELGROUP ; save level group
	special BattleTowerAction
	writebyte BATTLETOWERACTION_SAVEOPTIONS ; choose reward
	special BattleTowerAction
	writebyte BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave
	special BattleTowerAction
	playsound SFX_SAVE
	waitsfx
	special FadeOutPalettes
	special Reset
Script_DontSaveAndEndTheSession: ; 0x9f4a3
	writetext Text_CancelYourBattleRoomChallenge
	yesorno
	iffalse Script_ContinueAndBattleNextOpponent
	writebyte BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	writebyte BATTLETOWERACTION_06
	special BattleTowerAction
	closetext
	special FadeOutPalettes
	warpfacing UP, BATTLE_TOWER_1F, 7, 7
	opentext
	jump Script_BattleTowerHopeToServeYouAgain

Script_FailedBattleTowerChallenge:
	pause 60
	special Special_BattleTowerFade
	warpfacing UP, BATTLE_TOWER_1F, 7, 7
	writebyte BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	opentext
	writetext Text_ThanksForVisiting
	waitbutton
	closetext
	end

Script_BeatenAllTrainers: ; 0x9f4d9
	pause 60
	special Special_BattleTowerFade
	warpfacing UP, BATTLE_TOWER_1F, 7, 7
Script_BeatenAllTrainers2:
	opentext
	writetext Text_CongratulationsYouveBeatenAllTheTrainers
	jump Script_GivePlayerHisPrize

UnreferencedScript_0x9f4eb:
	writebyte BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	opentext
	writetext Text_TooMuchTimeElapsedNoRegister
	waitbutton
	closetext
	end

UnreferencedScript_0x9f4f7:
	writebyte BATTLETOWERACTION_CHALLENGECANCELED
	special BattleTowerAction
	writebyte BATTLETOWERACTION_06
	special BattleTowerAction
	opentext
	writetext Text_ThanksForVisiting
	writetext Text_WeHopeToServeYouAgain
	waitbutton
	closetext
	end


Text_ReturnedAfterSave_Mobile:
	text "You'll be returned"
	line "after you SAVE."
	done


BattleTowerBattleRoom_MapEventHeader:
	; 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
Person event constants for each map 2015-11-26 21:22:14 -08:00			`const_value set 2`
			`const BATTLETOWERBATTLEROOM_YOUNGSTER`
			`const BATTLETOWERBATTLEROOM_RECEPTIONIST`

Trim address comments from maps. 2015-07-10 01:45:35 -07:00			`BattleTowerBattleRoom_MapScriptHeader:`
Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`.SceneScripts:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`db 2`
Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`scene_script .EnterBattleRoom`
			`scene_script .DummyScene`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Added labels to different parts of the map script and event headers 2015-07-20 21:02:21 -07:00			`.MapCallbacks:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`db 0`

Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`.EnterBattleRoom: ; 0x9f419`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`disappear BATTLETOWERBATTLEROOM_YOUNGSTER`
change more labelss 2015-08-24 16:56:30 -07:00			`priorityjump Script_BattleRoom`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`setscene 1`
Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`.DummyScene:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`end`

change more labelss 2015-08-24 16:56:30 -07:00			`Script_BattleRoom: ; 0x9f421`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn`
change more labelss 2015-08-24 16:56:30 -07:00			`; beat all 7 opponents in a row`
			`Script_BattleRoomLoop: ; 0x9f425`
More battle tower shenanigans 2015-12-08 13:06:13 -08:00			`writebyte BATTLETOWERBATTLEROOM_YOUNGSTER`
added 'wBT_OTTempCopy'-label and the data structure that comes after 2015-08-31 05:31:13 -07:00			`special Function_LoadOpponentTrainerAndPokemonsWithOTSprite`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`appear BATTLETOWERBATTLEROOM_YOUNGSTER`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`warpsound`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitsfx`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksIn`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
Battle Tower trainer text 2015-11-03 19:35:36 -08:00			`battletowertext 1`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerBattle ; calls predef startbattle`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`special FadeOutPalettes`
more 3pt macro labels; shorten 3pt macros to take just a label static addresses should be avoided anyway 2013-12-02 11:18:03 -08:00			`reloadmap`
Battle Tower 2015-11-03 12:05:19 -08:00			`if_not_equal $0, Script_FailedBattleTowerChallenge`
added/renamed constants and labels 2015-08-31 21:26:31 -07:00			`copybytetovar wNrOfBeatenBattleTowerTrainers ; wcf64`
			`if_equal BATTLETOWER_NROFTRAINERS, Script_BeatenAllTrainers`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`warpsound`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`disappear BATTLETOWERBATTLEROOM_YOUNGSTER`
			`applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksToPlayer`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceReceptionist`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_YourPkmnWillBeHealedToFullHealth`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
Music and sound effect constants in map events. 2014-04-30 03:04:35 -07:00			`playmusic MUSIC_HEAL`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`special FadeOutPalettes`
More label updates, moved predefs to new file Also named most of the engine and event flag constants. 2015-07-20 00:51:52 -07:00			`special LoadMapPalettes`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`special FadeInPalettes`
Use labels for script specials instead of constants/static values. 2015-02-11 15:03:42 -08:00			`special RestartMapMusic`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_NextUpOpponentNo`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`yesorno`
change more labelss 2015-08-24 16:56:30 -07:00			`iffalse Script_DontBattleNextOpponent`
			`Script_ContinueAndBattleNextOpponent: ; 0x9f477`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerTurnsToFaceNextOpponent`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERBATTLEROOM_RECEPTIONIST, MovementData_BattleTowerBattleRoomReceptionistWalksAway`
change more labelss 2015-08-24 16:56:30 -07:00			`jump Script_BattleRoomLoop`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
change more labelss 2015-08-24 16:56:30 -07:00			`Script_DontBattleNextOpponent: ; 0x9f483`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_SaveAndEndTheSession`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`yesorno`
change more labelss 2015-08-24 16:56:30 -07:00			`iffalse Script_DontSaveAndEndTheSession`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_SAVELEVELGROUP ; save level group`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
More battle tower shenanigans 2015-12-08 13:06:13 -08:00			`writebyte BATTLETOWERACTION_SAVEOPTIONS ; choose reward`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
More battle tower shenanigans 2015-12-08 13:06:13 -08:00			`writebyte BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
Music and sound effect constants in map events. 2014-04-30 03:04:35 -07:00			`playsound SFX_SAVE`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitsfx`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`special FadeOutPalettes`
Use labels for script specials instead of constants/static values. 2015-02-11 15:03:42 -08:00			`special Reset`
change more labelss 2015-08-24 16:56:30 -07:00			`Script_DontSaveAndEndTheSession: ; 0x9f4a3`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_CancelYourBattleRoomChallenge`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`yesorno`
change more labelss 2015-08-24 16:56:30 -07:00			`iffalse Script_ContinueAndBattleNextOpponent`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_CHALLENGECANCELED`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_06`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`special FadeOutPalettes`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`warpfacing UP, BATTLE_TOWER_1F, 7, 7`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`jump Script_BattleTowerHopeToServeYouAgain`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Battle Tower 2015-11-03 12:05:19 -08:00			`Script_FailedBattleTowerChallenge:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Named more specials, fixed a missing EOL 2015-07-20 15:59:26 -07:00			`special Special_BattleTowerFade`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`warpfacing UP, BATTLE_TOWER_1F, 7, 7`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_CHALLENGECANCELED`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_ThanksForVisiting`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
			`end`

change more labelss 2015-08-24 16:56:30 -07:00			`Script_BeatenAllTrainers: ; 0x9f4d9`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Named more specials, fixed a missing EOL 2015-07-20 15:59:26 -07:00			`special Special_BattleTowerFade`
Clean up some hex values in map scripts 2018-01-09 15:45:25 -08:00			`warpfacing UP, BATTLE_TOWER_1F, 7, 7`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`Script_BeatenAllTrainers2:`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_CongratulationsYouveBeatenAllTheTrainers`
			`jump Script_GivePlayerHisPrize`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`UnreferencedScript_0x9f4eb:`
			`writebyte BATTLETOWERACTION_CHALLENGECANCELED`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_TooMuchTimeElapsedNoRegister`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
			`end`

Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`UnreferencedScript_0x9f4f7:`
			`writebyte BATTLETOWERACTION_CHALLENGECANCELED`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_06`
Battle Tower 2015-11-03 12:05:19 -08:00			`special BattleTowerAction`
opentext and breeding 2015-12-09 15:25:44 -08:00			`opentext`
change more labelss 2015-08-24 16:56:30 -07:00			`writetext Text_ThanksForVisiting`
changed BattleTower-Labels 2015-08-24 10:35:05 -07:00			`writetext Text_WeHopeToServeYouAgain`
Rename several script commands 2015-11-25 07:16:29 -08:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`closetext`
			`end`

remove incbins in BattleTower 2013-05-01 10:29:45 -07:00
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`Text_ReturnedAfterSave_Mobile:`
Text macros in maps/. Looks fine at a glance. 2014-03-05 21:29:44 -08:00			`text "You'll be returned"`
			`line "after you SAVE."`
			`done`
remove incbins in BattleTower 2013-05-01 10:29:45 -07:00
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Trim address comments from maps. 2015-07-10 01:45:35 -07:00			`BattleTowerBattleRoom_MapEventHeader:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`; filler`
			`db 0, 0`

Added labels to different parts of the map script and event headers 2015-07-20 21:02:21 -07:00			`.Warps:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`db 2`
Consistent (x, y) coordinate formatting in map scripts 2017-12-28 11:31:25 -08:00			`warp_def 3, 7, 4, BATTLE_TOWER_HALLWAY`
			`warp_def 4, 7, 4, BATTLE_TOWER_HALLWAY`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`.CoordEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`db 0`

Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`.BGEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`db 0`

Renaming: (fix #412) - MapTriggers / maptrigger → SceneScripts / scene_script - XYTriggers / xy_trigger → CoordEvents / coord_event - Signposts / signpost → BGEvents / bg_event - PersonEvents / person_event → ObjectEvents / object_event 2017-12-24 10:46:34 -08:00			`.ObjectEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`db 2`
Consistent (x, y) coordinate formatting in map scripts 2017-12-28 11:31:25 -08:00			`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`