pokeemerald/data/maps/AncientTomb/scripts.inc

AncientTomb_MapScripts:: @ 8238FB3
	map_script MAP_SCRIPT_ON_RESUME, AncientTomb_OnResume
	map_script MAP_SCRIPT_ON_LOAD, AncientTomb_OnLoad
	map_script MAP_SCRIPT_ON_TRANSITION, AncientTomb_OnTransition
	.byte 0

AncientTomb_OnResume: @ 8238FC3
	call_if_set FLAG_SYS_CTRL_OBJ_DELETE, AncientTomb_EventScript_TryRemoveRegisteel
	end

AncientTomb_EventScript_TryRemoveRegisteel:: @ 8238FCD
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, B_OUTCOME_CAUGHT
	goto_if_ne Common_EventScript_NopReturn
	removeobject VAR_LAST_TALKED
	return

AncientTomb_OnTransition: @ 8238FE1
	setflag FLAG_LANDMARK_ANCIENT_TOMB
	call_if_unset FLAG_DEFEATED_REGISTEEL, AncientTomb_EventScript_ShowRegisteel
	end

AncientTomb_EventScript_ShowRegisteel:: @ 8238FEE
	clearflag FLAG_HIDE_REGISTEEL
	return

AncientTomb_OnLoad: @ 8238FF2
	call_if_unset FLAG_SYS_REGISTEEL_PUZZLE_COMPLETED, AncientTomb_EventScript_HideRegiEntrance
	end

AncientTomb_EventScript_HideRegiEntrance:: @ 8238FFC
	setmetatile 7, 19, METATILE_Cave_EntranceCover, 1
	setmetatile 8, 19, METATILE_Cave_EntranceCover, 1
	setmetatile 9, 19, METATILE_Cave_EntranceCover, 1
	setmetatile 7, 20, METATILE_Cave_SealedChamberBraille_Mid, 1
	setmetatile 8, 20, METATILE_Cave_SealedChamberBraille_Mid, 1
	setmetatile 9, 20, METATILE_Cave_SealedChamberBraille_Mid, 1
	return

AncientTomb_EventScript_CaveEntranceMiddle:: @ 8239033
	lockall
	goto_if_set FLAG_SYS_REGISTEEL_PUZZLE_COMPLETED, AncientTomb_EventScript_BigHoleInWall
	braillemessage AncientTomb_Braille_ShineInTheMiddle
	waitbuttonpress
	closebraillemessage
	releaseall
	end

AncientTomb_EventScript_BigHoleInWall:: @ 8239046
	msgbox gText_BigHoleInTheWall, MSGBOX_DEFAULT
	releaseall
	end

AncientTomb_EventScript_CaveEntranceSide:: @ 8239050
	lockall
	braillemessage AncientTomb_Braille_ShineInTheMiddle
	waitbuttonpress
	closebraillemessage
	releaseall
	end

AncientTomb_EventScript_Registeel:: @ 823905A
	lock
	faceplayer
	waitse
	playmoncry SPECIES_REGISTEEL, 2
	delay 40
	waitmoncry
	setwildbattle SPECIES_REGISTEEL, 40, ITEM_NONE
	setflag FLAG_SYS_CTRL_OBJ_DELETE
	special StartRegiBattle
	waitstate
	clearflag FLAG_SYS_CTRL_OBJ_DELETE
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, B_OUTCOME_WON
	goto_if_eq AncientTomb_EventScript_DefeatedRegisteel
	compare VAR_RESULT, B_OUTCOME_RAN
	goto_if_eq AncientTomb_EventScript_RanFromRegisteel
	compare VAR_RESULT, B_OUTCOME_PLAYER_TELEPORTED
	goto_if_eq AncientTomb_EventScript_RanFromRegisteel
	setflag FLAG_DEFEATED_REGISTEEL
	release
	end

AncientTomb_EventScript_DefeatedRegisteel:: @ 82390A1
	setflag FLAG_DEFEATED_REGISTEEL
	goto Common_EventScript_RemoveStaticPokemon
	end

AncientTomb_EventScript_RanFromRegisteel:: @ 82390AA
	setvar VAR_0x8004, SPECIES_REGISTEEL
	goto Common_EventScript_LegendaryFlewAway
	end
Dump maps 2017-11-10 02:21:31 +01:00			`AncientTomb_MapScripts:: @ 8238FB3`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`map_script MAP_SCRIPT_ON_RESUME, AncientTomb_OnResume`
			`map_script MAP_SCRIPT_ON_LOAD, AncientTomb_OnLoad`
Fix labels, label more scripts 2019-04-05 01:28:37 +02:00			`map_script MAP_SCRIPT_ON_TRANSITION, AncientTomb_OnTransition`
Dump maps 2017-11-10 02:21:31 +01:00			`.byte 0`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_OnResume: @ 8238FC3`
			`call_if_set FLAG_SYS_CTRL_OBJ_DELETE, AncientTomb_EventScript_TryRemoveRegisteel`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_TryRemoveRegisteel:: @ 8238FCD`
Begin porting/decompiling field_specials 2018-08-08 10:37:12 +02:00			`specialvar VAR_RESULT, GetBattleOutcome`
Use B_OUTCOME constants for GetBattleOutcome 2019-10-07 05:07:59 +02:00			`compare VAR_RESULT, B_OUTCOME_CAUGHT`
More misc event names 2019-02-23 02:21:26 +01:00			`goto_if_ne Common_EventScript_NopReturn`
Dump maps 2017-11-10 02:21:31 +01:00			`removeobject VAR_LAST_TALKED`
			`return`

Fix labels, label more scripts 2019-04-05 01:28:37 +02:00			`AncientTomb_OnTransition: @ 8238FE1`
Split/extract/port landmark 2017-12-27 04:20:29 +01:00			`setflag FLAG_LANDMARK_ANCIENT_TOMB`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`call_if_unset FLAG_DEFEATED_REGISTEEL, AncientTomb_EventScript_ShowRegisteel`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_ShowRegisteel:: @ 8238FEE`
begin event flag names, add temporary hidden item macro 2018-10-18 04:07:23 +02:00			`clearflag FLAG_HIDE_REGISTEEL`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_OnLoad: @ 8238FF2`
			`call_if_unset FLAG_SYS_REGISTEEL_PUZZLE_COMPLETED, AncientTomb_EventScript_HideRegiEntrance`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_HideRegiEntrance:: @ 8238FFC`
continue labeling metatiles for scripts 2019-06-12 21:07:32 +02:00			`setmetatile 7, 19, METATILE_Cave_EntranceCover, 1`
			`setmetatile 8, 19, METATILE_Cave_EntranceCover, 1`
			`setmetatile 9, 19, METATILE_Cave_EntranceCover, 1`
			`setmetatile 7, 20, METATILE_Cave_SealedChamberBraille_Mid, 1`
			`setmetatile 8, 20, METATILE_Cave_SealedChamberBraille_Mid, 1`
			`setmetatile 9, 20, METATILE_Cave_SealedChamberBraille_Mid, 1`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_CaveEntranceMiddle:: @ 8239033`
Dump maps 2017-11-10 02:21:31 +01:00			`lockall`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`goto_if_set FLAG_SYS_REGISTEEL_PUZZLE_COMPLETED, AncientTomb_EventScript_BigHoleInWall`
			`braillemessage AncientTomb_Braille_ShineInTheMiddle`
Dump maps 2017-11-10 02:21:31 +01:00			`waitbuttonpress`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`closebraillemessage`
Dump maps 2017-11-10 02:21:31 +01:00			`releaseall`
			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_BigHoleInWall:: @ 8239046`
initial event_scripts documentation 2019-08-15 05:38:42 +02:00			`msgbox gText_BigHoleInTheWall, MSGBOX_DEFAULT`
Dump maps 2017-11-10 02:21:31 +01:00			`releaseall`
			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_CaveEntranceSide:: @ 8239050`
Dump maps 2017-11-10 02:21:31 +01:00			`lockall`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`braillemessage AncientTomb_Braille_ShineInTheMiddle`
Dump maps 2017-11-10 02:21:31 +01:00			`waitbuttonpress`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`closebraillemessage`
Dump maps 2017-11-10 02:21:31 +01:00			`releaseall`
			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_Registeel:: @ 823905A`
Dump maps 2017-11-10 02:21:31 +01:00			`lock`
			`faceplayer`
			`waitse`
			`playmoncry SPECIES_REGISTEEL, 2`
			`delay 40`
			`waitmoncry`
			`setwildbattle SPECIES_REGISTEEL, 40, ITEM_NONE`
			`setflag FLAG_SYS_CTRL_OBJ_DELETE`
start working on battle setup 2017-11-28 23:02:09 +01:00			`special StartRegiBattle`
Dump maps 2017-11-10 02:21:31 +01:00			`waitstate`
			`clearflag FLAG_SYS_CTRL_OBJ_DELETE`
Begin porting/decompiling field_specials 2018-08-08 10:37:12 +02:00			`specialvar VAR_RESULT, GetBattleOutcome`
Use B_OUTCOME constants for GetBattleOutcome 2019-10-07 05:07:59 +02:00			`compare VAR_RESULT, B_OUTCOME_WON`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`goto_if_eq AncientTomb_EventScript_DefeatedRegisteel`
Use B_OUTCOME constants for GetBattleOutcome 2019-10-07 05:07:59 +02:00			`compare VAR_RESULT, B_OUTCOME_RAN`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`goto_if_eq AncientTomb_EventScript_RanFromRegisteel`
Use B_OUTCOME constants for GetBattleOutcome 2019-10-07 05:07:59 +02:00			`compare VAR_RESULT, B_OUTCOME_PLAYER_TELEPORTED`
Document legendary scripts 2019-10-31 22:00:37 +01:00			`goto_if_eq AncientTomb_EventScript_RanFromRegisteel`
Finish off labelling flags 2019-01-02 22:12:43 +01:00			`setflag FLAG_DEFEATED_REGISTEEL`
Dump maps 2017-11-10 02:21:31 +01:00			`release`
			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_DefeatedRegisteel:: @ 82390A1`
Finish off labelling flags 2019-01-02 22:12:43 +01:00			`setflag FLAG_DEFEATED_REGISTEEL`
initial event_scripts documentation 2019-08-15 05:38:42 +02:00			`goto Common_EventScript_RemoveStaticPokemon`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

Document legendary scripts 2019-10-31 22:00:37 +01:00			`AncientTomb_EventScript_RanFromRegisteel:: @ 82390AA`
initial event_scripts documentation 2019-08-15 05:38:42 +02:00			`setvar VAR_0x8004, SPECIES_REGISTEEL`
			`goto Common_EventScript_LegendaryFlewAway`
Dump maps 2017-11-10 02:21:31 +01:00			`end`