pokecrystal/maps/TrainerHouseB1F.asm

const_value set 2
	const TRAINERHOUSEB1F_RECEPTIONIST
	const TRAINERHOUSEB1F_CHRIS

TrainerHouseB1F_MapScriptHeader:
.SceneScripts:
	db 1
	scene_script .DummyScene

.MapCallbacks:
	db 0

.DummyScene:
	end

TrainerHouseReceptionistScript:
	spriteface PLAYER, UP
	opentext
	checkflag ENGINE_FOUGHT_IN_TRAINER_HALL_TODAY
	iftrue .FoughtTooManyTimes
	writetext TrainerHouseB1FIntroText
	buttonsound
	special SpecialTrainerHouse
	iffalse .GetCal3Name
	trainertotext CAL, CAL2, $0
	jump .GotName

.GetCal3Name:
	trainertotext CAL, CAL3, $0
.GotName:
	writetext TrainerHouseB1FYourOpponentIsText
	buttonsound
	writetext TrainerHouseB1FAskWantToBattleText
	yesorno
	iffalse .Declined
	setflag ENGINE_FOUGHT_IN_TRAINER_HALL_TODAY
	writetext TrainerHouseB1FGoRightInText
	waitbutton
	closetext
	applymovement PLAYER, Movement_EnterTrainerHouseBattleRoom
	opentext
	writetext TrainerHouseB1FCalBeforeText
	waitbutton
	closetext
	special SpecialTrainerHouse
	iffalse .NoSpecialBattle
	winlosstext TrainerHouseB1FCalBeatenText, 0
	setlasttalked TRAINERHOUSEB1F_CHRIS
	loadtrainer CAL, CAL2
	startbattle
	reloadmapafterbattle
	iffalse .End
.NoSpecialBattle:
	winlosstext TrainerHouseB1FCalBeatenText, 0
	setlasttalked TRAINERHOUSEB1F_CHRIS
	loadtrainer CAL, CAL3
	startbattle
	reloadmapafterbattle
.End:
	applymovement PLAYER, Movement_ExitTrainerHouseBattleRoom
	end

.Declined:
	writetext TrainerHouseB1FPleaseComeAgainText
	waitbutton
	closetext
	applymovement PLAYER, Movement_TrainerHouseTurnBack
	end

.FoughtTooManyTimes:
	writetext TrainerHouseB1FSecondChallengeDeniedText
	waitbutton
	closetext
	applymovement PLAYER, Movement_TrainerHouseTurnBack
	end

Movement_EnterTrainerHouseBattleRoom:
	step LEFT
	step LEFT
	step LEFT
	step DOWN
	step DOWN
	step DOWN
	step DOWN
	step DOWN
	step DOWN
	step DOWN
	step DOWN
	step LEFT
	turn_head RIGHT
	step_end

Movement_ExitTrainerHouseBattleRoom:
	step UP
	step UP
	step UP
	step RIGHT
	step UP
	step UP
	step UP
	step UP
	step UP
	step RIGHT
	step RIGHT
	step RIGHT
	step RIGHT
	step_end

Movement_TrainerHouseTurnBack:
	step RIGHT
	turn_head LEFT
	step_end

TrainerHouseB1FIntroText:
	text "Hi. Welcome to our"
	line "TRAINING HALL."

	para "You may battle a"
	line "trainer once per"
	cont "day."
	done

TrainerHouseB1FYourOpponentIsText:
	text_from_ram StringBuffer3
	text " is your"
	line "opponent today."
	done

TrainerHouseB1FAskWantToBattleText:
	text "Would you like to"
	line "battle?"
	done

TrainerHouseB1FGoRightInText:
	text "Please go right"
	line "through."

	para "You may begin"
	line "right away."
	done

TrainerHouseB1FPleaseComeAgainText:
	text "Sorry. Only those"
	line "trainers who will"

	para "be battling are"
	line "allowed to go in."
	done

TrainerHouseB1FSecondChallengeDeniedText:
	text "I'm sorry."
	line "This would be your"

	para "second time today."
	line "You're permitted"

	para "to enter just once"
	line "a day."
	done

TrainerHouseB1FCalBeatenText:
	text "I lost…"
	line "Darn…"
	done

TrainerHouseB1FCalBeforeText:
	text "I traveled out"
	line "here just so I"
	cont "could battle you."
	done

TrainerHouseB1F_MapEventHeader:
	; filler
	db 0, 0

.Warps:
	db 1
	warp_def $4, $9, 3, TRAINER_HOUSE_1F

.CoordEvents:
	db 1
	coord_event 0, $3, $7, TrainerHouseReceptionistScript

.BGEvents:
	db 0

.ObjectEvents:
	db 2
	object_event SPRITE_RECEPTIONIST, 1, 7, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1
	object_event SPRITE_CHRIS, 11, 6, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1
Person event constants for each map 2015-11-27 05:22:14 +00:00			`const_value set 2`
			`const TRAINERHOUSEB1F_RECEPTIONIST`
			`const TRAINERHOUSEB1F_CHRIS`

Trim address comments from maps. 2015-07-10 08:45:35 +00:00			`TrainerHouseB1F_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 18:46:34 +00:00			`.SceneScripts:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 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			`scene_script .DummyScene`
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`

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			`.DummyScene:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseReceptionistScript:`
Add constants for common map object ids. 2015-07-22 06:49:18 +00:00			`spriteface PLAYER, UP`
opentext and breeding 2015-12-09 23:25:44 +00:00			`opentext`
Add more event flags. 2015-07-10 12:08:03 +00:00			`checkflag ENGINE_FOUGHT_IN_TRAINER_HALL_TODAY`
underground switches, town map 2015-12-09 16:38:40 +00:00			`iftrue .FoughtTooManyTimes`
			`writetext TrainerHouseB1FIntroText`
buttonsound 2015-11-30 03:29:45 +00:00			`buttonsound`
Use labels for script specials instead of constants/static values. 2015-02-11 23:03:42 +00:00			`special SpecialTrainerHouse`
underground switches, town map 2015-12-09 16:38:40 +00:00			`iffalse .GetCal3Name`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`trainertotext CAL, CAL2, $0`
underground switches, town map 2015-12-09 16:38:40 +00:00			`jump .GotName`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`.GetCal3Name:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`trainertotext CAL, CAL3, $0`
underground switches, town map 2015-12-09 16:38:40 +00:00			`.GotName:`
			`writetext TrainerHouseB1FYourOpponentIsText`
buttonsound 2015-11-30 03:29:45 +00:00			`buttonsound`
underground switches, town map 2015-12-09 16:38:40 +00:00			`writetext TrainerHouseB1FAskWantToBattleText`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`yesorno`
underground switches, town map 2015-12-09 16:38:40 +00:00			`iffalse .Declined`
Add more event flags. 2015-07-10 12:08:03 +00:00			`setflag ENGINE_FOUGHT_IN_TRAINER_HALL_TODAY`
underground switches, town map 2015-12-09 16:38:40 +00:00			`writetext TrainerHouseB1FGoRightInText`
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`
underground switches, town map 2015-12-09 16:38:40 +00:00			`applymovement PLAYER, Movement_EnterTrainerHouseBattleRoom`
opentext and breeding 2015-12-09 23:25:44 +00:00			`opentext`
underground switches, town map 2015-12-09 16:38:40 +00:00			`writetext TrainerHouseB1FCalBeforeText`
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`
Use labels for script specials instead of constants/static values. 2015-02-11 23:03:42 +00:00			`special SpecialTrainerHouse`
underground switches, town map 2015-12-09 16:38:40 +00:00			`iffalse .NoSpecialBattle`
			`winlosstext TrainerHouseB1FCalBeatenText, 0`
			`setlasttalked TRAINERHOUSEB1F_CHRIS`
Break up engine/sprites.asm; address yenatch's comments 2015-12-02 02:54:11 +00:00			`loadtrainer CAL, CAL2`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`startbattle`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`reloadmapafterbattle`
underground switches, town map 2015-12-09 16:38:40 +00:00			`iffalse .End`
			`.NoSpecialBattle:`
			`winlosstext TrainerHouseB1FCalBeatenText, 0`
			`setlasttalked TRAINERHOUSEB1F_CHRIS`
Break up engine/sprites.asm; address yenatch's comments 2015-12-02 02:54:11 +00:00			`loadtrainer CAL, CAL3`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`startbattle`
Move effects; no more reloadmapmusic, returnafterbattle 2015-12-26 23:11:55 +00:00			`reloadmapafterbattle`
underground switches, town map 2015-12-09 16:38:40 +00:00			`.End:`
			`applymovement PLAYER, Movement_ExitTrainerHouseBattleRoom`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`.Declined:`
			`writetext TrainerHouseB1FPleaseComeAgainText`
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`
underground switches, town map 2015-12-09 16:38:40 +00:00			`applymovement PLAYER, Movement_TrainerHouseTurnBack`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`.FoughtTooManyTimes:`
			`writetext TrainerHouseB1FSecondChallengeDeniedText`
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`
underground switches, town map 2015-12-09 16:38:40 +00:00			`applymovement PLAYER, Movement_TrainerHouseTurnBack`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`Movement_EnterTrainerHouseBattleRoom:`
Unify directional movement macros 2016-05-14 17:46:14 +00:00			`step LEFT`
			`step LEFT`
			`step LEFT`
			`step DOWN`
			`step DOWN`
			`step DOWN`
			`step DOWN`
			`step DOWN`
			`step DOWN`
			`step DOWN`
			`step DOWN`
			`step LEFT`
			`turn_head RIGHT`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`step_end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`Movement_ExitTrainerHouseBattleRoom:`
Unify directional movement macros 2016-05-14 17:46:14 +00:00			`step UP`
			`step UP`
			`step UP`
			`step RIGHT`
			`step UP`
			`step UP`
			`step UP`
			`step UP`
			`step UP`
			`step RIGHT`
			`step RIGHT`
			`step RIGHT`
			`step RIGHT`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`step_end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`Movement_TrainerHouseTurnBack:`
Unify directional movement macros 2016-05-14 17:46:14 +00:00			`step RIGHT`
			`turn_head LEFT`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`step_end`

underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FIntroText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "Hi. Welcome to our"`
			`line "TRAINING HALL."`

			`para "You may battle a"`
			`line "trainer once per"`
			`cont "day."`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FYourOpponentIsText:`
Blind wram in maps. 2015-02-10 23:37:24 +00:00			`text_from_ram StringBuffer3`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text " is your"`
			`line "opponent today."`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FAskWantToBattleText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "Would you like to"`
			`line "battle?"`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FGoRightInText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "Please go right"`
			`line "through."`

			`para "You may begin"`
			`line "right away."`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FPleaseComeAgainText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "Sorry. Only those"`
			`line "trainers who will"`

			`para "be battling are"`
			`line "allowed to go in."`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FSecondChallengeDeniedText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "I'm sorry."`
			`line "This would be your"`

			`para "second time today."`
			`line "You're permitted"`

			`para "to enter just once"`
			`line "a day."`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FCalBeatenText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "I lost…"`
			`line "Darn…"`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
underground switches, town map 2015-12-09 16:38:40 +00:00			`TrainerHouseB1FCalBeforeText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 05:29:44 +00:00			`text "I traveled out"`
			`line "here just so I"`
			`cont "could battle you."`
			`done`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00
Trim address comments from maps. 2015-07-10 08:45:35 +00:00			`TrainerHouseB1F_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 1`
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 $4, $9, 3, TRAINER_HOUSE_1F`
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			`.CoordEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00:00			`db 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			`coord_event 0, $3, $7, TrainerHouseReceptionistScript`
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			`.BGEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00: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 18:46:34 +00:00			`.ObjectEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 06:54:07 +00: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 18:46:34 +00:00			`object_event SPRITE_RECEPTIONIST, 1, 7, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1`
			`object_event SPRITE_CHRIS, 11, 6, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, ObjectEvent, -1`