pokecrystal-board/maps/BattleTowerHallway.asm

const_value set 2
	const BATTLETOWERHALLWAY_RECEPTIONIST

BattleTowerHallway_MapScriptHeader:
.SceneScripts:
	db 2
	scene_script .Scene0
	scene_script .Scene1

.MapCallbacks:
	db 0

.Scene0:
	priorityjump .ChooseBattleRoom
	setscene 1
.Scene1:
	end

.ChooseBattleRoom:
	follow BATTLETOWERHALLWAY_RECEPTIONIST, PLAYER
	callasm .asm_load_battle_room
	jump .WalkToChosenBattleRoom


.asm_load_battle_room
	ld a, [rSVBK]
	push af

	ld a, BANK(wBTChoiceOfLvlGroup)
	ld [rSVBK], a
	ld a, [wBTChoiceOfLvlGroup]
	ld [ScriptVar], a

	pop af
	ld [rSVBK], a
	ret


; enter different rooms for different levels to battle against
; at least it should look like that
; because all warps lead to the same room
.WalkToChosenBattleRoom: ; 0x9f5dc
	if_equal 3, .L30L40
	if_equal 4, .L30L40
	if_equal 5, .L50L60
	if_equal 6, .L50L60
	if_equal 7, .L70L80
	if_equal 8, .L70L80
	if_equal 9, .L90L100
	if_equal 10, .L90L100
	applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo1020Room
	jump .EnterBattleRoom

.L30L40: ; 0x9f603
	applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo3040Room
	jump .EnterBattleRoom

.L50L60: ; 0x9f60a
	applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo5060Room
	jump .EnterBattleRoom

.L70L80: ; 0x9f611
	applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo7080Room
	jump .EnterBattleRoom

.L90L100: ; 0x9f618
	applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo90100Room
	jump .EnterBattleRoom

.EnterBattleRoom: ; 0x9f61f
	faceobject PLAYER, BATTLETOWERHALLWAY_RECEPTIONIST
	opentext
	writetext Text_PleaseStepThisWay
	waitbutton
	closetext
	stopfollow
	applymovement PLAYER, MovementData_BattleTowerHallwayPlayerEntersBattleRoom
	warpcheck
	end

BattleTowerHallway_MapEventHeader:
	; filler
	db 0, 0

.Warps:
	db 6
	warp_def 11, 1, 1, BATTLE_TOWER_ELEVATOR
	warp_def 5, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def 7, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def 9, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def 13, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def 15, 0, 1, BATTLE_TOWER_BATTLE_ROOM

.CoordEvents:
	db 0

.BGEvents:
	db 0

.ObjectEvents:
	db 1
	object_event 11, 2, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BattleTowerHallway_MapEventHeader, -1
Person event constants for each map 2015-11-26 21:22:14 -08:00			`const_value set 2`
			`const BATTLETOWERHALLWAY_RECEPTIONIST`

Trim address comments from maps. 2015-07-10 01:45:35 -07:00			`BattleTowerHallway_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 .Scene0`
			`scene_script .Scene1`
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`

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			`.Scene0:`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`priorityjump .ChooseBattleRoom`
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			`.Scene1:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`end`

dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.ChooseBattleRoom:`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`follow BATTLETOWERHALLWAY_RECEPTIONIST, PLAYER`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`callasm .asm_load_battle_room`
			`jump .WalkToChosenBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
remove incbins in BattleTower 2013-05-01 10:29:45 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.asm_load_battle_room`
remove incbins in BattleTower 2013-05-01 10:29:45 -07:00			`ld a, [rSVBK]`
			`push af`

dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`ld a, BANK(wBTChoiceOfLvlGroup)`
remove incbins in BattleTower 2013-05-01 10:29:45 -07:00			`ld [rSVBK], a`
added/renamed constants and labels 2015-08-31 21:26:31 -07:00			`ld a, [wBTChoiceOfLvlGroup]`
remove incbins in BattleTower 2013-05-01 10:29:45 -07:00			`ld [ScriptVar], a`

			`pop af`
			`ld [rSVBK], a`
			`ret`

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			`; enter different rooms for different levels to battle against`
			`; at least it should look like that`
			`; because all warps lead to the same room`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.WalkToChosenBattleRoom: ; 0x9f5dc`
			`if_equal 3, .L30L40`
			`if_equal 4, .L30L40`
			`if_equal 5, .L50L60`
			`if_equal 6, .L50L60`
			`if_equal 7, .L70L80`
			`if_equal 8, .L70L80`
			`if_equal 9, .L90L100`
			`if_equal 10, .L90L100`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo1020Room`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.L30L40: ; 0x9f603`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo3040Room`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.L50L60: ; 0x9f60a`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo5060Room`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.L70L80: ; 0x9f611`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo7080Room`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.L90L100: ; 0x9f618`
Person event constants for each map 2015-11-26 21:22:14 -08:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo90100Room`
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00
dbw BANK, addr replaced with dba 2015-11-03 16:43:47 -08:00			`.EnterBattleRoom: ; 0x9f61f`
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			`faceobject PLAYER, BATTLETOWERHALLWAY_RECEPTIONIST`
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_PleaseStepThisWay`
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`
			`stopfollow`
Battle Tower scripts and text labels 2015-11-26 18:05:32 -08:00			`applymovement PLAYER, MovementData_BattleTowerHallwayPlayerEntersBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-16 22:54:07 -08:00			`warpcheck`
			`end`

Trim address comments from maps. 2015-07-10 01:45:35 -07:00			`BattleTowerHallway_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 6`
Consistent (x, y) coordinate formatting in map scripts 2017-12-28 11:31:25 -08:00			`warp_def 11, 1, 1, BATTLE_TOWER_ELEVATOR`
			`warp_def 5, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def 7, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def 9, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def 13, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def 15, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
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 1`
Consistent (x, y) coordinate formatting in map scripts 2017-12-28 11:31:25 -08:00			`object_event 11, 2, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BattleTowerHallway_MapEventHeader, -1`