pokecrystal/maps/BattleTowerHallway.asm

const_value set 2
	const BATTLETOWERHALLWAY_RECEPTIONIST

BattleTowerHallway_MapScriptHeader:
.MapTriggers:
	db 2

	; triggers
	dw .Trigger0, 0
	dw .Trigger1, 0

.MapCallbacks:
	db 0

.Trigger0:
	priorityjump .ChooseBattleRoom
	dotrigger $1
.Trigger1:
	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
	faceperson 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 $1, $b, 1, BATTLE_TOWER_ELEVATOR
	warp_def $0, $5, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def $0, $7, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def $0, $9, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def $0, $d, 1, BATTLE_TOWER_BATTLE_ROOM
	warp_def $0, $f, 1, BATTLE_TOWER_BATTLE_ROOM

.XYTriggers:
	db 0

.Signposts:
	db 0

.PersonEvents:
	db 1
	person_event SPRITE_RECEPTIONIST, 2, 11, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, BattleTowerHallway_MapEventHeader, -1
Person event constants for each map 2015-11-27 05:22:14 +00:00			`const_value set 2`
			`const BATTLETOWERHALLWAY_RECEPTIONIST`

Trim address comments from maps. 2015-07-10 08:45:35 +00:00			`BattleTowerHallway_MapScriptHeader:`
Added labels to different parts of the map script and event headers 2015-07-21 04:02:21 +00:00			`.MapTriggers:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 2`

			`; triggers`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`dw .Trigger0, 0`
			`dw .Trigger1, 0`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Added labels to different parts of the map script and event headers 2015-07-21 04:02:21 +00:00			`.MapCallbacks:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 0`

dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`.Trigger0:`
			`priorityjump .ChooseBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`dotrigger $1`
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +00:00			`.Trigger1:`
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
remove incbins in BattleTower 2013-05-01 17:29:45 +00:00
dbw BANK, addr replaced with dba 2015-11-04 00:43:47 +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`

Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
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`
Person event constants for each map 2015-11-27 05:22:14 +00:00			`faceperson 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`

Trim address comments from maps. 2015-07-10 08:45:35 +00:00			`BattleTowerHallway_MapEventHeader:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`; filler`
			`db 0, 0`

Added labels to different parts of the map script and event headers 2015-07-21 04:02:21 +00:00			`.Warps:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 6`
Replaced GROUP_, MAP_ references with the map macro Updated macros that rely on the GROUP_, MAP_ constants to use the map macro Added GROUP_NONE and MAP_NONE for the sake of compatibility with this new scheme Added new macro elevfloor to simplify the definition of elevators under this new scheme 2015-07-23 16:59:19 +00:00			`warp_def $1, $b, 1, BATTLE_TOWER_ELEVATOR`
			`warp_def $0, $5, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def $0, $7, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def $0, $9, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def $0, $d, 1, BATTLE_TOWER_BATTLE_ROOM`
			`warp_def $0, $f, 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
Added labels to different parts of the map script and event headers 2015-07-21 04:02:21 +00:00			`.XYTriggers:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 0`

Added labels to different parts of the map script and event headers 2015-07-21 04:02:21 +00:00			`.Signposts:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 0`

Added labels to different parts of the map script and event headers 2015-07-21 04:02:21 +00:00			`.PersonEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 1`
Globally introduce PERSONTYPE constants 2015-11-15 20:07:20 +00:00			`person_event SPRITE_RECEPTIONIST, 2, 11, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, BattleTowerHallway_MapEventHeader, -1`