pokeemerald/data/maps/FarawayIsland_Interior/scripts.inc

FarawayIsland_Interior_MapScripts:: @ 8267CFA
	map_script 5, FarawayIsland_Interior_MapScript1_267D54
	map_script 3, FarawayIsland_Interior_MapScript1_267D72
	map_script 2, FarawayIsland_Interior_MapScript2_267D98
	map_script 7, FarawayIsland_Interior_MapScript1_267D0F
	.byte 0

FarawayIsland_Interior_MapScript1_267D0F: @ 8267D0F
	call_if_set FLAG_SYS_CTRL_OBJ_DELETE, FarawayIsland_Interior_EventScript_267D19
	end

FarawayIsland_Interior_EventScript_267D19:: @ 8267D19
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, 1
	goto_if_eq FarawayIsland_Interior_EventScript_267D4B
	compare VAR_RESULT, 4
	goto_if_eq FarawayIsland_Interior_EventScript_267D4B
	compare VAR_RESULT, 5
	goto_if_eq FarawayIsland_Interior_EventScript_267D4B
	compare VAR_RESULT, 10
	goto_if_eq FarawayIsland_Interior_EventScript_267D4B
	return

FarawayIsland_Interior_EventScript_267D4B:: @ 8267D4B
	setvar VAR_0x8004, 1
	special sub_81D4A90
	return

FarawayIsland_Interior_MapScript1_267D54: @ 8267D54
	call_if_set FLAG_SYS_CTRL_OBJ_DELETE, FarawayIsland_Interior_EventScript_267D5E
	end

FarawayIsland_Interior_EventScript_267D5E:: @ 8267D5E
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, 7
	goto_if_ne FarawayIsland_Interior_EventScript_27374E
	removeobject VAR_LAST_TALKED
	return

FarawayIsland_Interior_MapScript1_267D72: @ 8267D72
	setvar VAR_0x403A, 0
	setvar VAR_TEMP_1, 1
	call_if_unset FLAG_0x1CA, FarawayIsland_Interior_EventScript_267D86
	end

FarawayIsland_Interior_EventScript_267D86:: @ 8267D86
	goto_if_set FLAG_0x1C7, FarawayIsland_Interior_EventScript_27374E
	clearflag FLAG_HIDE_MEW
	setvar VAR_TEMP_1, 0
	return

FarawayIsland_Interior_MapScript2_267D98: @ 8267D98
	map_script_2 VAR_TEMP_1, 0, FarawayIsland_Interior_EventScript_267DA2
	.2byte 0

FarawayIsland_Interior_EventScript_267DA2:: @ 8267DA2
	lockall
	playse SE_PIN
	applymovement 1, FarawayIsland_Interior_Movement_272598
	waitmovement 0
	applymovement 1, FarawayIsland_Interior_Movement_27259A
	waitmovement 0
	applymovement 1, FarawayIsland_Interior_Movement_267DCE
	waitmovement 0
	moveobjectoffscreen 1
	setvar VAR_TEMP_1, 1
	releaseall
	end

FarawayIsland_Interior_Movement_267DCE: @ 8267DCE
	walk_up
	walk_up
	walk_up
	walk_in_place_fastest_down
	set_invisible
	step_end

FarawayIsland_Interior_Movement_267DD4: @ 8267DD4
	set_visible
	step_end

FarawayIsland_Interior_Movement_267DD6: @ 8267DD6
	lock_facing_direction
	walk_fast_up
	walk_fast_up
	unlock_facing_direction
	walk_in_place_down
	walk_in_place_down
	step_end

FarawayIsland_Interior_Movement_267DDD: @ 8267DDD
	lock_facing_direction
	walk_fast_up
	walk_fast_up
	unlock_facing_direction
	walk_in_place_up
	walk_in_place_up
	step_end

FarawayIsland_Interior_Movement_267DE4: @ 8267DE4
	lock_facing_direction
	walk_fast_up
	walk_fast_up
	unlock_facing_direction
	walk_in_place_right
	walk_in_place_right
	step_end

FarawayIsland_Interior_Movement_267DEB: @ 8267DEB
	lock_facing_direction
	walk_fast_up
	walk_fast_up
	unlock_facing_direction
	walk_in_place_left
	walk_in_place_left
	step_end

FarawayIsland_Interior_EventScript_267DF2:: @ 8267DF2
	lock
	faceplayer
	applymovement 1, FarawayIsland_Interior_Movement_267DD4
	waitmovement 0
	setvar VAR_0x8004, 0
	special sub_81D4A90
	message FarawayIsland_Interior_Text_2C6DFF
	waitse
	playmoncry SPECIES_MEW, 2
	compare VAR_FACING, 2
	call_if_eq FarawayIsland_Interior_EventScript_267EAF
	compare VAR_FACING, 1
	call_if_eq FarawayIsland_Interior_EventScript_267EBA
	compare VAR_FACING, 3
	call_if_eq FarawayIsland_Interior_EventScript_267EC5
	compare VAR_FACING, 4
	call_if_eq FarawayIsland_Interior_EventScript_267ED0
	special sub_81D4BEC
	delay 40
	waitmoncry
	setvar VAR_0x8004, 151
	setvar VAR_0x8005, 30
	setvar VAR_0x8006, 0
	special CreateObedientEnemyMon
	setflag FLAG_SYS_CTRL_OBJ_DELETE
	special BattleSetup_StartLegendaryBattle
	waitstate
	clearflag FLAG_SYS_CTRL_OBJ_DELETE
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, 1
	goto_if_eq FarawayIsland_Interior_EventScript_267E96
	compare VAR_RESULT, 4
	goto_if_eq FarawayIsland_Interior_EventScript_267EA4
	compare VAR_RESULT, 5
	goto_if_eq FarawayIsland_Interior_EventScript_267EA4
	compare VAR_RESULT, 10
	goto_if_eq FarawayIsland_Interior_EventScript_267EA4
	setflag FLAG_0x1CA
	release
	end

FarawayIsland_Interior_EventScript_267E96:: @ 8267E96
	setflag FLAG_0x1C7
	setvar VAR_0x8004, 151
	goto FarawayIsland_Interior_EventScript_273776
	end

FarawayIsland_Interior_EventScript_267EA4:: @ 8267EA4
	setvar VAR_0x8004, 151
	goto FarawayIsland_Interior_EventScript_273776
	end

FarawayIsland_Interior_EventScript_267EAF:: @ 8267EAF
	applymovement 1, FarawayIsland_Interior_Movement_267DD6
	waitmovement 0
	return

FarawayIsland_Interior_EventScript_267EBA:: @ 8267EBA
	applymovement 1, FarawayIsland_Interior_Movement_267DDD
	waitmovement 0
	return

FarawayIsland_Interior_EventScript_267EC5:: @ 8267EC5
	applymovement 1, FarawayIsland_Interior_Movement_267DE4
	waitmovement 0
	return

FarawayIsland_Interior_EventScript_267ED0:: @ 8267ED0
	applymovement 1, FarawayIsland_Interior_Movement_267DEB
	waitmovement 0
	return

FarawayIsland_Interior_EventScript_267EDB:: @ 8267EDB
	lockall
	fadescreenswapbuffers 1
	setflag FLAG_HIDE_MEW
	removeobject 1
	fadescreenswapbuffers 0
	msgbox FarawayIsland_Interior_Text_267EF1, MSGBOX_DEFAULT
	closemessage
	releaseall
	end

FarawayIsland_Interior_Text_267EF1: @ 8267EF1
	.string "The feeling of being watched faded…$"
Dump maps 2017-11-10 02:21:31 +01:00			`FarawayIsland_Interior_MapScripts:: @ 8267CFA`
			`map_script 5, FarawayIsland_Interior_MapScript1_267D54`
			`map_script 3, FarawayIsland_Interior_MapScript1_267D72`
			`map_script 2, FarawayIsland_Interior_MapScript2_267D98`
			`map_script 7, FarawayIsland_Interior_MapScript1_267D0F`
			`.byte 0`

			`FarawayIsland_Interior_MapScript1_267D0F: @ 8267D0F`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_set FLAG_SYS_CTRL_OBJ_DELETE, FarawayIsland_Interior_EventScript_267D19`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

			`FarawayIsland_Interior_EventScript_267D19:: @ 8267D19`
Begin porting/decompiling field_specials 2018-08-08 10:37:12 +02:00			`specialvar VAR_RESULT, GetBattleOutcome`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 1`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267D4B`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 4`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267D4B`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 5`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267D4B`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 10`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267D4B`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`FarawayIsland_Interior_EventScript_267D4B:: @ 8267D4B`
			`setvar VAR_0x8004, 1`
			`special sub_81D4A90`
			`return`

			`FarawayIsland_Interior_MapScript1_267D54: @ 8267D54`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_set FLAG_SYS_CTRL_OBJ_DELETE, FarawayIsland_Interior_EventScript_267D5E`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

			`FarawayIsland_Interior_EventScript_267D5E:: @ 8267D5E`
Begin porting/decompiling field_specials 2018-08-08 10:37:12 +02:00			`specialvar VAR_RESULT, GetBattleOutcome`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 7`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_ne FarawayIsland_Interior_EventScript_27374E`
Dump maps 2017-11-10 02:21:31 +01:00			`removeobject VAR_LAST_TALKED`
			`return`

			`FarawayIsland_Interior_MapScript1_267D72: @ 8267D72`
			`setvar VAR_0x403A, 0`
decompile field tasks 2018-05-19 18:02:43 +02:00			`setvar VAR_TEMP_1, 1`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_unset FLAG_0x1CA, FarawayIsland_Interior_EventScript_267D86`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

			`FarawayIsland_Interior_EventScript_267D86:: @ 8267D86`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_set FLAG_0x1C7, FarawayIsland_Interior_EventScript_27374E`
begin event flag names, add temporary hidden item macro 2018-10-18 04:07:23 +02:00			`clearflag FLAG_HIDE_MEW`
decompile field tasks 2018-05-19 18:02:43 +02:00			`setvar VAR_TEMP_1, 0`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`FarawayIsland_Interior_MapScript2_267D98: @ 8267D98`
decompile field tasks 2018-05-19 18:02:43 +02:00			`map_script_2 VAR_TEMP_1, 0, FarawayIsland_Interior_EventScript_267DA2`
Dump maps 2017-11-10 02:21:31 +01:00			`.2byte 0`

			`FarawayIsland_Interior_EventScript_267DA2:: @ 8267DA2`
			`lockall`
			`playse SE_PIN`
			`applymovement 1, FarawayIsland_Interior_Movement_272598`
			`waitmovement 0`
			`applymovement 1, FarawayIsland_Interior_Movement_27259A`
			`waitmovement 0`
			`applymovement 1, FarawayIsland_Interior_Movement_267DCE`
			`waitmovement 0`
			`moveobjectoffscreen 1`
decompile field tasks 2018-05-19 18:02:43 +02:00			`setvar VAR_TEMP_1, 1`
Dump maps 2017-11-10 02:21:31 +01:00			`releaseall`
			`end`

			`FarawayIsland_Interior_Movement_267DCE: @ 8267DCE`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`walk_up`
			`walk_up`
			`walk_up`
			`walk_in_place_fastest_down`
			`set_invisible`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`FarawayIsland_Interior_Movement_267DD4: @ 8267DD4`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`set_visible`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`FarawayIsland_Interior_Movement_267DD6: @ 8267DD6`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`lock_facing_direction`
			`walk_fast_up`
			`walk_fast_up`
			`unlock_facing_direction`
			`walk_in_place_down`
			`walk_in_place_down`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`FarawayIsland_Interior_Movement_267DDD: @ 8267DDD`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`lock_facing_direction`
			`walk_fast_up`
			`walk_fast_up`
			`unlock_facing_direction`
			`walk_in_place_up`
			`walk_in_place_up`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`FarawayIsland_Interior_Movement_267DE4: @ 8267DE4`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`lock_facing_direction`
			`walk_fast_up`
			`walk_fast_up`
			`unlock_facing_direction`
			`walk_in_place_right`
			`walk_in_place_right`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`FarawayIsland_Interior_Movement_267DEB: @ 8267DEB`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`lock_facing_direction`
			`walk_fast_up`
			`walk_fast_up`
			`unlock_facing_direction`
			`walk_in_place_left`
			`walk_in_place_left`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`FarawayIsland_Interior_EventScript_267DF2:: @ 8267DF2`
			`lock`
			`faceplayer`
			`applymovement 1, FarawayIsland_Interior_Movement_267DD4`
			`waitmovement 0`
			`setvar VAR_0x8004, 0`
			`special sub_81D4A90`
			`message FarawayIsland_Interior_Text_2C6DFF`
			`waitse`
			`playmoncry SPECIES_MEW, 2`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_FACING, 2`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_eq FarawayIsland_Interior_EventScript_267EAF`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_FACING, 1`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_eq FarawayIsland_Interior_EventScript_267EBA`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_FACING, 3`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_eq FarawayIsland_Interior_EventScript_267EC5`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_FACING, 4`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_eq FarawayIsland_Interior_EventScript_267ED0`
Dump maps 2017-11-10 02:21:31 +01:00			`special sub_81D4BEC`
			`delay 40`
			`waitmoncry`
			`setvar VAR_0x8004, 151`
			`setvar VAR_0x8005, 30`
			`setvar VAR_0x8006, 0`
decompile pokemon1 2018-02-09 15:55:12 +01:00			`special CreateObedientEnemyMon`
Dump maps 2017-11-10 02:21:31 +01:00			`setflag FLAG_SYS_CTRL_OBJ_DELETE`
start working on battle setup 2017-11-28 23:02:09 +01:00			`special BattleSetup_StartLegendaryBattle`
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`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 1`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267E96`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 4`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267EA4`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 5`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267EA4`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_RESULT, 10`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq FarawayIsland_Interior_EventScript_267EA4`
Dump maps 2017-11-10 02:21:31 +01:00			`setflag FLAG_0x1CA`
			`release`
			`end`

			`FarawayIsland_Interior_EventScript_267E96:: @ 8267E96`
			`setflag FLAG_0x1C7`
			`setvar VAR_0x8004, 151`
			`goto FarawayIsland_Interior_EventScript_273776`
			`end`

			`FarawayIsland_Interior_EventScript_267EA4:: @ 8267EA4`
			`setvar VAR_0x8004, 151`
			`goto FarawayIsland_Interior_EventScript_273776`
			`end`

			`FarawayIsland_Interior_EventScript_267EAF:: @ 8267EAF`
			`applymovement 1, FarawayIsland_Interior_Movement_267DD6`
			`waitmovement 0`
			`return`

			`FarawayIsland_Interior_EventScript_267EBA:: @ 8267EBA`
			`applymovement 1, FarawayIsland_Interior_Movement_267DDD`
			`waitmovement 0`
			`return`

			`FarawayIsland_Interior_EventScript_267EC5:: @ 8267EC5`
			`applymovement 1, FarawayIsland_Interior_Movement_267DE4`
			`waitmovement 0`
			`return`

			`FarawayIsland_Interior_EventScript_267ED0:: @ 8267ED0`
			`applymovement 1, FarawayIsland_Interior_Movement_267DEB`
			`waitmovement 0`
			`return`

Extract more baseroms from maps 2017-11-10 09:24:21 +01:00			`FarawayIsland_Interior_EventScript_267EDB:: @ 8267EDB`
			`lockall`
			`fadescreenswapbuffers 1`
begin event flag names, add temporary hidden item macro 2018-10-18 04:07:23 +02:00			`setflag FLAG_HIDE_MEW`
Extract more baseroms from maps 2017-11-10 09:24:21 +01:00			`removeobject 1`
			`fadescreenswapbuffers 0`
adds constants, cleans up callstd and msgbox code * adds some constants for standard script names and messagebox types * replaces some callstd calls with msgbox calls where equivalent * replaces msgbox and callstd calls using raw digits with versions that use the constants 2018-12-02 09:37:46 +01:00			`msgbox FarawayIsland_Interior_Text_267EF1, MSGBOX_DEFAULT`
Extract more baseroms from maps 2017-11-10 09:24:21 +01:00			`closemessage`
			`releaseall`
			`end`

			`FarawayIsland_Interior_Text_267EF1: @ 8267EF1`
			`.string "The feeling of being watched faded…$"`