pokecrystal-board/maps/BattleTowerBattleRoom.asm

	const_def 2 ; object constants
	const BATTLETOWERBATTLEROOM_YOUNGSTER
	const BATTLETOWERBATTLEROOM_RECEPTIONIST

BattleTowerBattleRoom_MapScripts:
	db 2 ; scene scripts
	scene_script .EnterBattleRoom ; SCENE_DEFAULT
	scene_script .DummyScene ; SCENE_FINISHED

	db 0 ; callbacks

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

Script_BattleRoom: ; 0x9f421
	applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn
; beat all 7 opponents in a row
Script_BattleRoomLoop: ; 0x9f425
	writebyte BATTLETOWERBATTLEROOM_YOUNGSTER
	special LoadOpponentTrainerAndPokemonWithOTSprite
	appear BATTLETOWERBATTLEROOM_YOUNGSTER
	warpsound
	waitsfx
	applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksIn
	opentext
	battletowertext BATTLETOWERTEXT_INTRO
	buttonsound
	closetext
	special BattleTowerBattle ; calls predef startbattle
	special FadeOutPalettes
	reloadmap
	if_not_equal $0, Script_FailedBattleTowerChallenge
	copybytetovar wNrOfBeatenBattleTowerTrainers ; wcf64
	if_equal BATTLETOWER_STREAK_LENGTH, 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 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 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_MapEvents:
	db 0, 0 ; filler

	db 2 ; warp events
	warp_event  3,  7, BATTLE_TOWER_HALLWAY, 4
	warp_event  4,  7, BATTLE_TOWER_HALLWAY, 4

	db 0 ; coord events

	db 0 ; bg events

	db 2 ; object events
	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
const_def N 2018-01-31 08:38:45 -08:00			`const_def 2 ; object constants`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`const BATTLETOWERBATTLEROOM_YOUNGSTER`
			`const BATTLETOWERBATTLEROOM_RECEPTIONIST`

map_header → map_def; map_header_2 → map_data 2018-01-16 19:57:19 -08:00			`BattleTowerBattleRoom_MapScripts:`
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 2 ; scene scripts`
Meaningful scene constant names (Two common patterns: 0=default event and 1=nothing; and 0=nothing and 1=some event) 2018-02-01 09:40:58 -08:00			`scene_script .EnterBattleRoom ; SCENE_DEFAULT`
SCENE_DEFAULT=0 and SCENE_FINISHED=1 (generic constants for a common scene pattern) 2018-02-01 12:06:06 -08:00			`scene_script .DummyScene ; SCENE_FINISHED`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0 ; callbacks`
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			`.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`
SCENE_DEFAULT=0 and SCENE_FINISHED=1 (generic constants for a common scene pattern) 2018-02-01 12:06:06 -08:00			`setscene SCENE_FINISHED`
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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special LoadOpponentTrainerAndPokemonWithOTSprite`
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`
More Battle Tower map script constants, fewer raw hex values 2018-01-14 16:26:55 -08:00			`battletowertext BATTLETOWERTEXT_INTRO`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerBattle ; calls predef startbattle`
			`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`
PARTY_LENGTH; MON_NAME; sgb_border.bin 2018-01-20 09:25:55 -08:00			`if_equal BATTLETOWER_STREAK_LENGTH, 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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special FadeOutPalettes`
			`special LoadMapPalettes`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`pause 60`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
More battle tower shenanigans 2015-12-08 13:06:13 -08:00			`writebyte BATTLETOWERACTION_SAVEOPTIONS ; choose reward`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
More battle tower shenanigans 2015-12-08 13:06:13 -08:00			`writebyte BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_06`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Rename several script commands 2015-11-25 07:16:29 -08:00			`closetext`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -08:00			`special BattleTowerAction`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`writebyte BATTLETOWERACTION_06`
Remove Special_ prefix from special routines (close #478) 2018-01-24 08:17:05 -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`

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
map_header → map_def; map_header_2 → map_data 2018-01-16 19:57:19 -08:00			`BattleTowerBattleRoom_MapEvents:`
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0, 0 ; filler`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 2 ; warp events`
Align map event coordinate columns 2018-02-01 19:22:07 -08:00			`warp_event 3, 7, BATTLE_TOWER_HALLWAY, 4`
			`warp_event 4, 7, BATTLE_TOWER_HALLWAY, 4`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0 ; coord events`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 0 ; bg events`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
Remove unreferenced map script heading labels 2018-01-30 11:15:47 -08:00			`db 2 ; object events`
Align map event coordinate columns 2018-02-01 19:22:07 -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`