pokecrystal/maps/BattleTowerHallway.asm

const_value set 2 ; person constants
	const BATTLETOWERHALLWAY_RECEPTIONIST

BattleTowerHallway_MapScripts:
	db 2 ; scene scripts
	scene_script .Scene0
	scene_script .Scene1

	db 0 ; callbacks

.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_MapEvents:
	db 0, 0 ; filler

	db 6 ; warp events
	warp_event 11, 1, 1, BATTLE_TOWER_ELEVATOR
	warp_event 5, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_event 7, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_event 9, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_event 13, 0, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_event 15, 0, 1, BATTLE_TOWER_BATTLE_ROOM

	db 0 ; coord events

	db 0 ; bg events

	db 1 ; object events
	object_event 11, 2, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BattleTowerHallway_MapEvents, -1
Comment the person constants sections, like the others 2018-01-31 16:04:17 +00:00			`const_value set 2 ; person constants`
Person event constants for each map 2015-11-27 05:22:14 +00:00			`const BATTLETOWERHALLWAY_RECEPTIONIST`

map_header → map_def; map_header_2 → map_data 2018-01-17 03:57:19 +00:00			`BattleTowerHallway_MapScripts:`
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 2 ; scene scripts`
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 18:46:34 +00:00			`scene_script .Scene0`
			`scene_script .Scene1`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 0 ; callbacks`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00: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 18:46:34 +00:00			`.Scene0:`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`priorityjump .ChooseBattleRoom`
Clean up some hex values in map scripts 2018-01-09 23:45:25 +00: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 18:46:34 +00:00			`.Scene1:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`end`

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

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

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

change more labelss 2015-08-24 23:56:30 +00: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-04 00:43:47 +00: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-27 05:22:14 +00:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo1020Room`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`.L30L40: ; 0x9f603`
Person event constants for each map 2015-11-27 05:22:14 +00:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo3040Room`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`.L50L60: ; 0x9f60a`
Person event constants for each map 2015-11-27 05:22:14 +00:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo5060Room`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`.L70L80: ; 0x9f611`
Person event constants for each map 2015-11-27 05:22:14 +00:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo7080Room`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`.L90L100: ; 0x9f618`
Person event constants for each map 2015-11-27 05:22:14 +00:00			`applymovement BATTLETOWERHALLWAY_RECEPTIONIST, MovementData_BattleTowerHallwayWalkTo90100Room`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`jump .EnterBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00: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 18:46:34 +00:00			`faceobject PLAYER, BATTLETOWERHALLWAY_RECEPTIONIST`
opentext and breeding 2015-12-09 23:25:44 +00:00			`opentext`
changed BattleTower-Labels 2015-08-24 17:35:05 +00:00			`writetext Text_PleaseStepThisWay`
Rename several script commands 2015-11-25 15:16:29 +00:00			`waitbutton`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`closetext`
			`stopfollow`
Battle Tower scripts and text labels 2015-11-27 02:05:32 +00:00			`applymovement PLAYER, MovementData_BattleTowerHallwayPlayerEntersBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`warpcheck`
			`end`

map_header → map_def; map_header_2 → map_data 2018-01-17 03:57:19 +00:00			`BattleTowerHallway_MapEvents:`
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 0, 0 ; filler`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 6 ; warp events`
grep -rl warp_def . \| xargs sed -i s/warp_def/warp_event/g 2018-01-28 18:20:04 +00:00			`warp_event 11, 1, 1, BATTLE_TOWER_ELEVATOR`
			`warp_event 5, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_event 7, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_event 9, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_event 13, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_event 15, 0, 1, BATTLE_TOWER_BATTLE_ROOM`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 0 ; coord events`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 0 ; bg events`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Remove unreferenced map script heading labels 2018-01-30 19:15:47 +00:00			`db 1 ; object events`
map_header → map_def; map_header_2 → map_data 2018-01-17 03:57:19 +00:00			`object_event 11, 2, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BattleTowerHallway_MapEvents, -1`