pokeemerald/data/scripts/kecleon.inc

Route120_EventScript_Kecleon1::
	lock
	faceplayer
	setvar VAR_0x8009, 1
	goto EventScript_Kecleon
	end

Route120_EventScript_Kecleon2::
	lock
	faceplayer
	setvar VAR_0x8009, 2
	goto EventScript_Kecleon
	end

Route120_EventScript_Kecleon3::
	lock
	faceplayer
	setvar VAR_0x8009, 3
	goto EventScript_Kecleon
	end

Route120_EventScript_Kecleon4::
	lock
	faceplayer
	setvar VAR_0x8009, 4
	goto EventScript_Kecleon
	end

Route120_EventScript_Kecleon5::
	lock
	faceplayer
	setvar VAR_0x8009, 5
	goto EventScript_Kecleon
	end

Route119_EventScript_Kecleon1::
	lock
	faceplayer
	setvar VAR_0x8009, 6
	goto EventScript_Kecleon
	end

Route119_EventScript_Kecleon2::
	lock
	faceplayer
	setvar VAR_0x8009, 7
	goto EventScript_Kecleon
	end

EventScript_Kecleon::
	checkitem ITEM_DEVON_SCOPE
	goto_if_eq VAR_RESULT, TRUE, EventScript_AskUseDevonScope
	msgbox Kecleon_Text_SomethingUnseeable, MSGBOX_DEFAULT
	release
	end

EventScript_AskUseDevonScope::
	msgbox Kecleon_Text_WantToUseDevonScope, MSGBOX_YESNO
	goto_if_eq VAR_RESULT, YES, EventScript_BattleKecleon
	release
	end

EventScript_BattleKecleon::
	msgbox Kecleon_Text_UseDevonScopeMonAttacked, MSGBOX_DEFAULT
	closemessage
	applymovement VAR_LAST_TALKED, Common_Movement_FacePlayer
	waitmovement 0
	applymovement VAR_LAST_TALKED, Movement_KecleonAppears
	waitmovement 0
	waitse
	playmoncry SPECIES_KECLEON, CRY_MODE_ENCOUNTER
	delay 40
	waitmoncry
	setwildbattle SPECIES_KECLEON, 30, ITEM_NONE
	setflag FLAG_SYS_CTRL_OBJ_DELETE
	dowildbattle
	clearflag FLAG_SYS_CTRL_OBJ_DELETE
	specialvar VAR_RESULT, GetBattleOutcome
	goto_if_eq VAR_RESULT, B_OUTCOME_WON, EventScript_RemoveKecleon
	goto_if_eq VAR_RESULT, B_OUTCOME_RAN, EventScript_RemoveKecleon
	goto_if_eq VAR_RESULT, B_OUTCOME_PLAYER_TELEPORTED, EventScript_RemoveKecleon
	release
	end

EventScript_RemoveKecleon::
	goto Common_EventScript_RemoveStaticPokemon
	end

Movement_KecleonAppears:
	set_visible
	delay_4
	set_invisible
	delay_4
	set_visible
	delay_4
	set_invisible
	delay_4
	set_visible
	delay_8
	set_invisible
	delay_8
	set_visible
	delay_8
	set_invisible
	delay_8
	set_visible
	delay_16
	set_invisible
	delay_16
	set_visible
	step_end
Remove address comments 2021-07-20 21:18:31 +02:00			`Route120_EventScript_Kecleon1::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 1`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Route120_EventScript_Kecleon2::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 2`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Route120_EventScript_Kecleon3::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 3`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Route120_EventScript_Kecleon4::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 4`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Route120_EventScript_Kecleon5::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 5`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Route119_EventScript_Kecleon1::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 6`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Route119_EventScript_Kecleon2::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`lock`
			`faceplayer`
			`setvar VAR_0x8009, 7`
Document kecleon 2019-10-06 22:06:34 +02:00			`goto EventScript_Kecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`EventScript_Kecleon::`
Start event macro comment updates 2021-08-05 18:46:11 +02:00			`checkitem ITEM_DEVON_SCOPE`
Reformat compare + goto_if/call_if to single statements 2021-11-19 05:06:30 +01:00			`goto_if_eq VAR_RESULT, TRUE, EventScript_AskUseDevonScope`
Document kecleon 2019-10-06 22:06:34 +02:00			`msgbox Kecleon_Text_SomethingUnseeable, MSGBOX_DEFAULT`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`release`
			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`EventScript_AskUseDevonScope::`
Document kecleon 2019-10-06 22:06:34 +02:00			`msgbox Kecleon_Text_WantToUseDevonScope, MSGBOX_YESNO`
Reformat compare + goto_if/call_if to single statements 2021-11-19 05:06:30 +01:00			`goto_if_eq VAR_RESULT, YES, EventScript_BattleKecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`release`
			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`EventScript_BattleKecleon::`
Document kecleon 2019-10-06 22:06:34 +02:00			`msgbox Kecleon_Text_UseDevonScopeMonAttacked, MSGBOX_DEFAULT`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`closemessage`
			`applymovement VAR_LAST_TALKED, Common_Movement_FacePlayer`
			`waitmovement 0`
Document kecleon 2019-10-06 22:06:34 +02:00			`applymovement VAR_LAST_TALKED, Movement_KecleonAppears`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`waitmovement 0`
			`waitse`
Add CRY_MODE constants 2021-11-07 18:58:11 +01:00			`playmoncry SPECIES_KECLEON, CRY_MODE_ENCOUNTER`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`delay 40`
			`waitmoncry`
			`setwildbattle SPECIES_KECLEON, 30, ITEM_NONE`
			`setflag FLAG_SYS_CTRL_OBJ_DELETE`
			`dowildbattle`
			`clearflag FLAG_SYS_CTRL_OBJ_DELETE`
			`specialvar VAR_RESULT, GetBattleOutcome`
Reformat compare + goto_if/call_if to single statements 2021-11-19 05:06:30 +01:00			`goto_if_eq VAR_RESULT, B_OUTCOME_WON, EventScript_RemoveKecleon`
			`goto_if_eq VAR_RESULT, B_OUTCOME_RAN, EventScript_RemoveKecleon`
			`goto_if_eq VAR_RESULT, B_OUTCOME_PLAYER_TELEPORTED, EventScript_RemoveKecleon`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`release`
			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`EventScript_RemoveKecleon::`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`goto Common_EventScript_RemoveStaticPokemon`
			`end`
Split off more files from event_scripts 2019-09-28 08:37:01 +02:00
Remove address comments 2021-07-20 21:18:31 +02:00			`Movement_KecleonAppears:`
Convert 4 spaces in .inc to tab 2019-10-05 16:52:48 +02:00			`set_visible`
			`delay_4`
			`set_invisible`
			`delay_4`
			`set_visible`
			`delay_4`
			`set_invisible`
			`delay_4`
			`set_visible`
			`delay_8`
			`set_invisible`
			`delay_8`
			`set_visible`
			`delay_8`
			`set_invisible`
			`delay_8`
			`set_visible`
			`delay_16`
			`set_invisible`
			`delay_16`
			`set_visible`
			`step_end`