pokeemerald/data/maps/SouthernIsland_Interior/scripts.inc

SouthernIsland_Interior_MapScripts:: @ 8242A45
	map_script 5, SouthernIsland_Interior_MapScript1_242A50
	map_script 3, SouthernIsland_Interior_MapScript1_242A6E
	.byte 0

SouthernIsland_Interior_MapScript1_242A50: @ 8242A50
	call_if_set FLAG_SYS_CTRL_OBJ_DELETE, SouthernIsland_Interior_EventScript_242A5A
	end

SouthernIsland_Interior_EventScript_242A5A:: @ 8242A5A
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, 7
	goto_if_ne SouthernIsland_Interior_EventScript_27374E
	removeobject 2
	return

SouthernIsland_Interior_MapScript1_242A6E: @ 8242A6E
	compare VAR_0x40D5, 0
	call_if_eq SouthernIsland_Interior_EventScript_242A8A
	compare VAR_0x40D5, 0
	call_if_ne SouthernIsland_Interior_EventScript_242A95
	call SouthernIsland_Interior_EventScript_242AA0
	end

SouthernIsland_Interior_EventScript_242A8A:: @ 8242A8A
	setvar VAR_OBJ_GFX_ID_1, EVENT_OBJ_GFX_LATIOS
	setvar VAR_TEMP_4, 408
	return

SouthernIsland_Interior_EventScript_242A95:: @ 8242A95
	setvar VAR_OBJ_GFX_ID_1, EVENT_OBJ_GFX_LATIAS
	setvar VAR_TEMP_4, 407
	return

SouthernIsland_Interior_EventScript_242AA0:: @ 8242AA0
	checkplayergender
	compare VAR_RESULT, MALE
	goto_if_eq SouthernIsland_Interior_EventScript_242AB8
	compare VAR_RESULT, FEMALE
	goto_if_eq SouthernIsland_Interior_EventScript_242ABE
	end

SouthernIsland_Interior_EventScript_242AB8:: @ 8242AB8
	setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_BRENDAN_NORMAL
	return

SouthernIsland_Interior_EventScript_242ABE:: @ 8242ABE
	setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_MAY_NORMAL
	return

SouthernIsland_Interior_EventScript_242AC4:: @ 8242AC4
	lockall
	setvar VAR_0x8008, 12
	goto SouthernIsland_Interior_EventScript_242AD0
	end

SouthernIsland_Interior_EventScript_242AD0:: @ 8242AD0
	goto_if_set FLAG_TEMP_2, SouthernIsland_Interior_EventScript_242B9A
	goto_if_set FLAG_DEFEATED_LATIAS_OR_LATIOS, SouthernIsland_Interior_EventScript_242B9A
	goto_if_set FLAG_CAUGHT_LATIAS_OR_LATIOS, SouthernIsland_Interior_EventScript_242B9A
	goto_if_unset FLAG_SYS_HAS_EON_TICKET, SouthernIsland_Interior_EventScript_242B9A
	setflag FLAG_ENCOUNTERED_LATIAS_OR_LATIOS
	setflag FLAG_TEMP_2
	special SpawnCameraObject
	applymovement EVENT_OBJ_ID_CAMERA, SouthernIsland_Interior_Movement_242BCA
	waitmovement 0
	delay 50
	waitse
	playmoncry VAR_TEMP_4, 0
	delay 30
	waitmoncry
	addobject 2
	delay 30
	applymovement EVENT_OBJ_ID_CAMERA, SouthernIsland_Interior_Movement_242BCE
	applymovement 2, SouthernIsland_Interior_Movement_242BDA
	waitmovement 0
	delay 50
	special RemoveCameraObject
	setvar VAR_LAST_TALKED, 2
	compare VAR_0x40D5, 0
	call_if_eq SouthernIsland_Interior_EventScript_242BA4
	compare VAR_0x40D5, 0
	call_if_ne SouthernIsland_Interior_EventScript_242BB7
	setflag FLAG_SYS_CTRL_OBJ_DELETE
	special BattleSetup_StartLatiBattle
	waitstate
	clearflag FLAG_SYS_CTRL_OBJ_DELETE
	specialvar VAR_RESULT, GetBattleOutcome
	compare VAR_RESULT, 1
	goto_if_eq SouthernIsland_Interior_EventScript_242B81
	compare VAR_RESULT, 4
	goto_if_eq SouthernIsland_Interior_EventScript_242B8F
	compare VAR_RESULT, 5
	goto_if_eq SouthernIsland_Interior_EventScript_242B8F
	setflag FLAG_CAUGHT_LATIAS_OR_LATIOS
	releaseall
	end

SouthernIsland_Interior_EventScript_242B81:: @ 8242B81
	setflag FLAG_DEFEATED_LATIAS_OR_LATIOS
	copyvar VAR_0x8004, VAR_TEMP_4
	goto SouthernIsland_Interior_EventScript_273776
	end

SouthernIsland_Interior_EventScript_242B8F:: @ 8242B8F
	copyvar VAR_0x8004, VAR_TEMP_4
	goto SouthernIsland_Interior_EventScript_273776
	end

SouthernIsland_Interior_EventScript_242B9A:: @ 8242B9A
	msgbox SouthernIsland_Interior_Text_2A6AA1, MSGBOX_DEFAULT
	releaseall
	end

SouthernIsland_Interior_EventScript_242BA4:: @ 8242BA4
	setvar VAR_0x8004, 408
	setvar VAR_0x8005, 50
	setvar VAR_0x8006, 191
	special CreateObedientEnemyMon
	return

SouthernIsland_Interior_EventScript_242BB7:: @ 8242BB7
	setvar VAR_0x8004, 407
	setvar VAR_0x8005, 50
	setvar VAR_0x8006, 191
	special CreateObedientEnemyMon
	return

SouthernIsland_Interior_Movement_242BCA: @ 8242BCA
	walk_up
	walk_up
	walk_up
	step_end

SouthernIsland_Interior_Movement_242BCE: @ 8242BCE
	delay_16
	delay_16
	delay_16
	delay_16
	delay_16
	delay_16
	delay_16
	walk_down
	walk_down
	walk_down
	walk_in_place_fastest_up
	step_end

SouthernIsland_Interior_Movement_242BDA: @ 8242BDA
	walk_down
	walk_down
	walk_down
	walk_down
	walk_down
	delay_16
	delay_16
	walk_down
	walk_down
	walk_down
	walk_down
	step_end
Dump maps 2017-11-10 02:21:31 +01:00			`SouthernIsland_Interior_MapScripts:: @ 8242A45`
			`map_script 5, SouthernIsland_Interior_MapScript1_242A50`
			`map_script 3, SouthernIsland_Interior_MapScript1_242A6E`
			`.byte 0`

			`SouthernIsland_Interior_MapScript1_242A50: @ 8242A50`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_set FLAG_SYS_CTRL_OBJ_DELETE, SouthernIsland_Interior_EventScript_242A5A`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

			`SouthernIsland_Interior_EventScript_242A5A:: @ 8242A5A`
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 SouthernIsland_Interior_EventScript_27374E`
Dump maps 2017-11-10 02:21:31 +01:00			`removeobject 2`
			`return`

			`SouthernIsland_Interior_MapScript1_242A6E: @ 8242A6E`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_0x40D5, 0`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_eq SouthernIsland_Interior_EventScript_242A8A`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_0x40D5, 0`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_ne SouthernIsland_Interior_EventScript_242A95`
Dump maps 2017-11-10 02:21:31 +01:00			`call SouthernIsland_Interior_EventScript_242AA0`
			`end`

			`SouthernIsland_Interior_EventScript_242A8A:: @ 8242A8A`
improve event script object calls 2018-12-25 02:12:51 +01:00			`setvar VAR_OBJ_GFX_ID_1, EVENT_OBJ_GFX_LATIOS`
decompile field tasks 2018-05-19 18:02:43 +02:00			`setvar VAR_TEMP_4, 408`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`SouthernIsland_Interior_EventScript_242A95:: @ 8242A95`
improve event script object calls 2018-12-25 02:12:51 +01:00			`setvar VAR_OBJ_GFX_ID_1, EVENT_OBJ_GFX_LATIAS`
decompile field tasks 2018-05-19 18:02:43 +02:00			`setvar VAR_TEMP_4, 407`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`SouthernIsland_Interior_EventScript_242AA0:: @ 8242AA0`
			`checkplayergender`
improve checkplayergender calls clean up constant definitions make tweaks from review 2018-12-25 03:22:56 +01:00			`compare VAR_RESULT, MALE`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq SouthernIsland_Interior_EventScript_242AB8`
improve checkplayergender calls clean up constant definitions make tweaks from review 2018-12-25 03:22:56 +01:00			`compare VAR_RESULT, FEMALE`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_eq SouthernIsland_Interior_EventScript_242ABE`
Dump maps 2017-11-10 02:21:31 +01:00			`end`

			`SouthernIsland_Interior_EventScript_242AB8:: @ 8242AB8`
improve event script object calls 2018-12-25 02:12:51 +01:00			`setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_BRENDAN_NORMAL`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`SouthernIsland_Interior_EventScript_242ABE:: @ 8242ABE`
improve event script object calls 2018-12-25 02:12:51 +01:00			`setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_MAY_NORMAL`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`SouthernIsland_Interior_EventScript_242AC4:: @ 8242AC4`
			`lockall`
			`setvar VAR_0x8008, 12`
			`goto SouthernIsland_Interior_EventScript_242AD0`
			`end`

			`SouthernIsland_Interior_EventScript_242AD0:: @ 8242AD0`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_set FLAG_TEMP_2, SouthernIsland_Interior_EventScript_242B9A`
Finish off labelling flags 2019-01-02 22:12:43 +01:00			`goto_if_set FLAG_DEFEATED_LATIAS_OR_LATIOS, SouthernIsland_Interior_EventScript_242B9A`
			`goto_if_set FLAG_CAUGHT_LATIAS_OR_LATIOS, SouthernIsland_Interior_EventScript_242B9A`
improve goto_if macros 2018-12-22 02:28:24 +01:00			`goto_if_unset FLAG_SYS_HAS_EON_TICKET, SouthernIsland_Interior_EventScript_242B9A`
Finish off labelling flags 2019-01-02 22:12:43 +01:00			`setflag FLAG_ENCOUNTERED_LATIAS_OR_LATIOS`
label temp flags, test replace script 2018-10-17 18:25:12 +02:00			`setflag FLAG_TEMP_2`
update applymovement to remove magic numbers 2018-12-19 20:08:01 +01:00			`special SpawnCameraObject`
			`applymovement EVENT_OBJ_ID_CAMERA, SouthernIsland_Interior_Movement_242BCA`
Dump maps 2017-11-10 02:21:31 +01:00			`waitmovement 0`
			`delay 50`
			`waitse`
decompile field tasks 2018-05-19 18:02:43 +02:00			`playmoncry VAR_TEMP_4, 0`
Dump maps 2017-11-10 02:21:31 +01:00			`delay 30`
			`waitmoncry`
			`addobject 2`
			`delay 30`
update applymovement to remove magic numbers 2018-12-19 20:08:01 +01:00			`applymovement EVENT_OBJ_ID_CAMERA, SouthernIsland_Interior_Movement_242BCE`
Dump maps 2017-11-10 02:21:31 +01:00			`applymovement 2, SouthernIsland_Interior_Movement_242BDA`
			`waitmovement 0`
			`delay 50`
update applymovement to remove magic numbers 2018-12-19 20:08:01 +01:00			`special RemoveCameraObject`
Dump maps 2017-11-10 02:21:31 +01:00			`setvar VAR_LAST_TALKED, 2`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_0x40D5, 0`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_eq SouthernIsland_Interior_EventScript_242BA4`
Port generic event script macros from pokeruby 2017-12-21 20:47:52 +01:00			`compare VAR_0x40D5, 0`
improve call_if macros 2018-12-22 03:32:45 +01:00			`call_if_ne SouthernIsland_Interior_EventScript_242BB7`
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_StartLatiBattle`
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 SouthernIsland_Interior_EventScript_242B81`
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 SouthernIsland_Interior_EventScript_242B8F`
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 SouthernIsland_Interior_EventScript_242B8F`
Finish off labelling flags 2019-01-02 22:12:43 +01:00			`setflag FLAG_CAUGHT_LATIAS_OR_LATIOS`
Dump maps 2017-11-10 02:21:31 +01:00			`releaseall`
			`end`

			`SouthernIsland_Interior_EventScript_242B81:: @ 8242B81`
Finish off labelling flags 2019-01-02 22:12:43 +01:00			`setflag FLAG_DEFEATED_LATIAS_OR_LATIOS`
decompile field tasks 2018-05-19 18:02:43 +02:00			`copyvar VAR_0x8004, VAR_TEMP_4`
Dump maps 2017-11-10 02:21:31 +01:00			`goto SouthernIsland_Interior_EventScript_273776`
			`end`

			`SouthernIsland_Interior_EventScript_242B8F:: @ 8242B8F`
decompile field tasks 2018-05-19 18:02:43 +02:00			`copyvar VAR_0x8004, VAR_TEMP_4`
Dump maps 2017-11-10 02:21:31 +01:00			`goto SouthernIsland_Interior_EventScript_273776`
			`end`

			`SouthernIsland_Interior_EventScript_242B9A:: @ 8242B9A`
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 SouthernIsland_Interior_Text_2A6AA1, MSGBOX_DEFAULT`
Dump maps 2017-11-10 02:21:31 +01:00			`releaseall`
			`end`

			`SouthernIsland_Interior_EventScript_242BA4:: @ 8242BA4`
			`setvar VAR_0x8004, 408`
			`setvar VAR_0x8005, 50`
			`setvar VAR_0x8006, 191`
decompile pokemon1 2018-02-09 15:55:12 +01:00			`special CreateObedientEnemyMon`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`SouthernIsland_Interior_EventScript_242BB7:: @ 8242BB7`
			`setvar VAR_0x8004, 407`
			`setvar VAR_0x8005, 50`
			`setvar VAR_0x8006, 191`
decompile pokemon1 2018-02-09 15:55:12 +01:00			`special CreateObedientEnemyMon`
Dump maps 2017-11-10 02:21:31 +01:00			`return`

			`SouthernIsland_Interior_Movement_242BCA: @ 8242BCA`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`walk_up`
			`walk_up`
			`walk_up`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`SouthernIsland_Interior_Movement_242BCE: @ 8242BCE`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`delay_16`
			`delay_16`
			`delay_16`
			`delay_16`
			`delay_16`
			`delay_16`
			`delay_16`
			`walk_down`
			`walk_down`
			`walk_down`
			`walk_in_place_fastest_up`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`

			`SouthernIsland_Interior_Movement_242BDA: @ 8242BDA`
Update applymovement actions to reflect movement action names 2018-06-14 01:19:19 +02:00			`walk_down`
			`walk_down`
			`walk_down`
			`walk_down`
			`walk_down`
			`delay_16`
			`delay_16`
			`walk_down`
			`walk_down`
			`walk_down`
			`walk_down`
Dump maps 2017-11-10 02:21:31 +01:00			`step_end`