Split some smaller files from event_scripts

data/scripts/flash.inc

@@ -0,0 +1,4 @@
+EventScript_2926F8:: @ 82926F8
+	animateflash 1
+	setflashradius 1
+	end

data/scripts/obtain_item.inc

@@ -0,0 +1,208 @@
+Std_ObtainItem:: @ 8271AD3
+	giveitem VAR_0x8000, VAR_0x8001
+	copyvar VAR_0x8007, VAR_RESULT
+	call EventScript_271AE3
+	return
+
+EventScript_271AE3:: @ 8271AE3
+	bufferitemnameplural 1, VAR_0x8000, VAR_0x8001
+	checkitemtype VAR_0x8000
+	call EventScript_BufferStdString
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_271B95
+	compare VAR_0x8007, 0
+	call_if_eq EventScript_271BA9
+	return
+
+EventScript_BufferStdString:: @ 8271B08
+	switch VAR_RESULT
+	case POCKET_ITEMS, EventScript_StdStringItem
+	case POCKET_KEY_ITEMS, EventScript_StdStringKeyItems
+	case POCKET_POKE_BALLS, EventScript_StdStringPokeballs
+	case POCKET_TM_HM, EventScript_StdStringTMHMS
+	case POCKET_BERRIES, EventScript_StdStringBerries
+	end
+
+EventScript_StdStringItem:: @ 8271B45
+	bufferstdstring 2, STDSTRING_ITEMS
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_PlayFanfareObtainedItem
+	return
+
+EventScript_StdStringKeyItems:: @ 8271B55
+	bufferstdstring 2, STDSTRING_KEYITEMS
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_PlayFanfareObtainedItem
+	return
+
+EventScript_StdStringPokeballs:: @ 8271B65
+	bufferstdstring 2, STDSTRING_POKEBALLS
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_PlayFanfareObtainedItem
+	return
+
+EventScript_StdStringTMHMS:: @ 8271B75
+	bufferstdstring 2, STDSTRING_TMHMS
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_PlayFanfareObtainedTMHM
+	return
+
+EventScript_StdStringBerries:: @ 8271B85
+	bufferstdstring 2, STDSTRING_BERRIES
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_PlayFanfareObtainedItem
+	return
+
+EventScript_271B95:: @ 8271B95
+	message gText_ObtainedTheItem
+	waitfanfare
+	msgbox gText_PutItemInPocket, MSGBOX_DEFAULT
+	setvar VAR_RESULT, 1
+	return
+
+EventScript_271BA9:: @ 8271BA9
+	setvar VAR_RESULT, 0
+	return
+
+EventScript_PlayFanfareObtainedItem:: @ 8271BAF
+	playfanfare MUS_FANFA4
+	return
+
+EventScript_PlayFanfareObtainedTMHM:: @ 8271BB3
+	playfanfare MUS_ME_WAZA
+	return
+
+Std_ObtainDecoration:: @ 8271BB7
+	givedecoration VAR_0x8000
+	copyvar VAR_0x8007, VAR_RESULT
+	call EventScript_271BC5
+	return
+
+EventScript_271BC5:: @ 8271BC5
+	bufferdecorationname 1, VAR_0x8000
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_271BE0
+	compare VAR_0x8007, 0
+	call_if_eq EventScript_271BF7
+	return
+
+EventScript_271BE0:: @ 8271BE0
+	playfanfare MUS_FANFA4
+	message gText_ObtainedTheDecor
+	waitfanfare
+	msgbox gText_TheDecorWasTransferredToThePC, MSGBOX_DEFAULT
+	setvar VAR_RESULT, 1
+	return
+
+EventScript_271BF7:: @ 8271BF7
+	setvar VAR_RESULT, 0
+	return
+
+Std_FindItem:: @ 8271BFD
+	lock
+	faceplayer
+	waitse
+	copyvar VAR_0x8004, VAR_0x8000
+	copyvar VAR_0x8005, VAR_0x8001
+	checkitemspace VAR_0x8000, VAR_0x8001
+	copyvar VAR_0x8007, VAR_RESULT
+	bufferitemnameplural 1, VAR_0x8000, VAR_0x8001
+	checkitemtype VAR_0x8000
+	call EventScript_BufferStdString
+	compare VAR_0x8007, 1
+	call_if_eq EventScript_PickItemUp
+	compare VAR_0x8007, 0
+	call_if_eq EventScript_271CA1
+	release
+	return
+
+EventScript_PickItemUp:: @ 8271C3A
+	removeobject VAR_LAST_TALKED
+	giveitem VAR_0x8004, VAR_0x8005
+	specialvar VAR_RESULT, BufferTMHMMoveName
+	copyvar VAR_0x8008, VAR_RESULT
+	compare VAR_0x8008, 1
+	call_if_eq EventScript_271C8F
+	compare VAR_0x8008, 0
+	call_if_eq EventScript_271C9B
+	waitfanfare
+	waitmessage
+	bufferitemnameplural 1, VAR_0x8004, VAR_0x8005
+	setvar VAR_0x8004, BATTLE_PYRAMID_FUNC_IS_IN
+	special CallBattlePyramidFunction
+	compare VAR_RESULT, 1
+	goto_if_eq EventScript_271C86
+	msgbox gText_PutItemInPocket, MSGBOX_DEFAULT
+	return
+
+EventScript_271C86:: @ 8271C86
+	msgbox gText_PlayerPutItemInBag, MSGBOX_DEFAULT
+	return
+
+EventScript_271C8F:: @ 8271C8F
+	bufferitemnameplural 0, VAR_0x8004, VAR_0x8005
+	message gText_PlayerFoundOneItemTwoLines
+	return
+
+EventScript_271C9B:: @ 8271C9B
+	message gText_PlayerFoundOneItem
+	return
+
+EventScript_271CA1:: @ 8271CA1
+	msgbox gText_ObtainedTheItem, MSGBOX_DEFAULT
+	msgbox gText_TooBadBagIsFull, MSGBOX_DEFAULT
+	setvar VAR_RESULT, 0
+	return
+
+EventScript_HiddenItemScript:: @ 8271CB7
+	lockall
+	waitse
+	giveitem VAR_0x8005, 1
+	copyvar VAR_0x8007, VAR_RESULT
+	bufferitemnameplural 1, VAR_0x8005, 1
+	checkitemtype VAR_0x8005
+	call EventScript_BufferStdString
+	compare VAR_0x8007, 1
+	goto_if_eq EventScript_271CE8
+	compare VAR_0x8007, 0
+	goto_if_eq EventScript_271D47
+	end
+
+EventScript_271CE8:: @ 8271CE8
+	copyvar VAR_0x8008, VAR_0x8004
+	copyvar VAR_0x8004, VAR_0x8005
+	specialvar VAR_RESULT, BufferTMHMMoveName
+	compare VAR_RESULT, 1
+	goto_if_eq EventScript_271D0E
+	compare VAR_RESULT, 0
+	goto_if_eq EventScript_271D1F
+	end
+
+EventScript_271D0E:: @ 8271D0E
+	bufferitemnameplural 0, VAR_0x8004, 1
+	message gText_PlayerFoundOneItemTwoLines
+	goto EventScript_271D2A
+	end
+
+EventScript_271D1F:: @ 8271D1F
+	message gText_PlayerFoundOneItem
+	goto EventScript_271D2A
+	end
+
+EventScript_271D2A:: @ 8271D2A
+	waitmessage
+	waitfanfare
+	bufferitemnameplural 1, VAR_0x8004, 1
+	copyvar VAR_0x8004, VAR_0x8008
+	msgbox gText_PutItemInPocket, MSGBOX_DEFAULT
+	special sub_80EDCE8
+	special SetFlagInVar
+	releaseall
+	end
+
+EventScript_271D47:: @ 8271D47
+	msgbox gText_PlayerFoundOneItem, MSGBOX_DEFAULT
+	msgbox gText_TooBadBagIsFull, MSGBOX_DEFAULT
+	setvar VAR_RESULT, 0
+	releaseall
+	end

data/scripts/pc_transfer.inc

@@ -0,0 +1,55 @@
+@ VAR_0x8004 here is used by ChangePokemonNickname
+Common_EventScript_GetGiftMonPartySlot:: @ 827378B
+	getpartysize
+	subvar VAR_RESULT, 1
+	copyvar VAR_0x8004, VAR_RESULT
+	return
+
+Common_EventScript_NameReceivedBoxMon:: @ 8273797
+	fadescreen 1
+	special ChangeBoxPokemonNickname
+	waitstate
+	lock
+	faceplayer
+	return
+
+LittlerootTown_ProfessorBirchsLab_EventScript_2737A0:: @ 82737A0
+MossdeepCity_StevensHouse_EventScript_2737A0:: @ 82737A0
+Route119_WeatherInstitute_2F_EventScript_2737A0:: @ 82737A0
+RustboroCity_DevonCorp_2F_EventScript_2737A0:: @ 82737A0
+	bufferboxname 0, VAR_PC_BOX_TO_SEND_MON
+	bufferspeciesname 1, VAR_TEMP_1
+	call_if_unset FLAG_SYS_PC_LANETTE, LittlerootTown_ProfessorBirchsLab_EventScript_2737BB
+	call_if_set FLAG_SYS_PC_LANETTE, LittlerootTown_ProfessorBirchsLab_EventScript_2737E6
+	return
+
+LittlerootTown_ProfessorBirchsLab_EventScript_2737BB:: @ 82737BB
+	specialvar VAR_RESULT, ShouldShowBoxWasFullMessage
+	compare VAR_RESULT, 1
+	goto_if_eq LittlerootTown_ProfessorBirchsLab_EventScript_2737D4
+	msgbox gText_PkmnTransferredSomeonesPC, MSGBOX_DEFAULT
+	return
+
+LittlerootTown_ProfessorBirchsLab_EventScript_2737D4:: @ 82737D4
+	specialvar VAR_RESULT, GetPCBoxToSendMon
+	bufferboxname 2, VAR_RESULT
+	msgbox gText_PkmnBoxSomeonesPCFull, MSGBOX_DEFAULT
+	return
+
+LittlerootTown_ProfessorBirchsLab_EventScript_2737E6:: @ 82737E6
+	specialvar VAR_RESULT, ShouldShowBoxWasFullMessage
+	compare VAR_RESULT, 1
+	goto_if_eq LittlerootTown_ProfessorBirchsLab_EventScript_2737FF
+	msgbox gText_PkmnTransferredLanettesPC, MSGBOX_DEFAULT
+	return
+
+LittlerootTown_ProfessorBirchsLab_EventScript_2737FF:: @ 82737FF
+	specialvar VAR_RESULT, GetPCBoxToSendMon
+	bufferboxname 2, VAR_RESULT
+	msgbox gText_PkmnBoxLanettesPCFull, MSGBOX_DEFAULT
+	return
+
+Common_EventScript_NoMoreRoomForPokemon:: @ 8273811
+	msgbox gText_NoMoreRoomForPokemon, MSGBOX_DEFAULT
+	release
+	end

data/scripts/record_mix.inc

@@ -0,0 +1,22 @@
+EventScript_271D5E:: @ 8271D5E
+	lock
+	faceplayer
+	msgbox Text_WouldYouLikeToMixRecords, MSGBOX_YESNO
+	compare VAR_RESULT, 1
+	goto_if_eq EventScript_271D83
+	compare VAR_RESULT, 0
+	goto_if_eq EventScript_271D89
+	goto EventScript_271D89
+
+EventScript_271D83:: @ 8271D83
+	special RecordMixingPlayerSpotTriggered
+	waitstate
+	lock
+	faceplayer
+
+EventScript_271D89:: @ 8271D89
+	message Text_WouldNotLikeToMixRecords
+	waitmessage
+	waitbuttonpress
+	release
+	end

data/scripts/repel.inc

@@ -0,0 +1,6 @@
+EventScript_RepelWoreOff:: @ 82A4B2A
+	msgbox Text_RepelWoreOff, MSGBOX_SIGN
+	end
+
+Text_RepelWoreOff: @ 82A4B33
+	.string "REPEL's effect wore off…$"

data/scripts/rival_graphics.inc

@@ -0,0 +1,48 @@
+Common_EventScript_SetupRivalGfxId:: @ 8271ED7
+	checkplayergender
+	compare VAR_RESULT, MALE
+	goto_if_eq EventScript_SetupRivalGfxIdFemale
+	compare VAR_RESULT, FEMALE
+	goto_if_eq EventScript_SetupRivalGfxIdMale
+	end
+
+EventScript_SetupRivalGfxIdFemale:: @ 8271EEF
+	setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_MAY_NORMAL
+	return
+
+EventScript_SetupRivalGfxIdMale:: @ 8271EF5
+	setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_BRENDAN_NORMAL
+	return
+
+Common_EventScript_SetupRivalOnBikeGfxId:: @ 8271EFB
+	checkplayergender
+	compare VAR_RESULT, MALE
+	goto_if_eq EventScript_SetupRivalOnBikeGfxIdFemale
+	compare VAR_RESULT, FEMALE
+	goto_if_eq EventScript_SetupRivalOnBikeGfxIdMale
+	end
+
+EventScript_SetupRivalOnBikeGfxIdFemale:: @ 8271F13
+	setvar VAR_OBJ_GFX_ID_3, EVENT_OBJ_GFX_RIVAL_MAY_MACH_BIKE
+	return
+
+EventScript_SetupRivalOnBikeGfxIdMale:: @ 8271F19
+	setvar VAR_OBJ_GFX_ID_3, EVENT_OBJ_GFX_RIVAL_BRENDAN_MACH_BIKE
+	return
+
+@ Unused
+Common_EventScript_SetupRivalGfxIdSameGender:: @ 8271F1F
+	checkplayergender
+	compare VAR_RESULT, MALE
+	goto_if_eq EventScript_SetupRivalGfxIdMale2
+	compare VAR_RESULT, FEMALE
+	goto_if_eq EventScript_SetupRivalGfxIdFemale2
+	end
+
+EventScript_SetupRivalGfxIdMale2:: @ 8271F37
+	setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_BRENDAN_NORMAL
+	return
+
+EventScript_SetupRivalGfxIdFemale2:: @ 8271F3D
+	setvar VAR_OBJ_GFX_ID_0, EVENT_OBJ_GFX_RIVAL_MAY_NORMAL
+	return

data/scripts/set_gym_trainers.inc

@@ -0,0 +1,92 @@
+Common_EventScript_SetGymTrainers:: @ 8271F43
+	switch VAR_0x8008
+	case 1, RusboroCity_Gym_SetGymTrainers
+	case 2, DewfordTown_Gym_SetGymTrainers
+	case 3, MauvilleCity_Gym_SetGymTrainers
+	case 4, LavaridgeTown_Gym_SetGymTrainers
+	case 5, PetalburgCity_Gym_SetGymTrainers
+	case 6, FortreeCity_Gym_SetGymTrainers
+	case 7, MossdeepCity_Gym_SetGymTrainers
+	case 8, SootopolisCity_Gym_SetGymTrainers
+	end
+
+RusboroCity_Gym_SetGymTrainers:: @ 8271FA1
+	settrainerflag TRAINER_JOSH
+	settrainerflag TRAINER_TOMMY
+	settrainerflag TRAINER_MARC
+	return
+
+DewfordTown_Gym_SetGymTrainers:: @ 8271FAB
+	settrainerflag TRAINER_TAKAO
+	settrainerflag TRAINER_JOCELYN
+	settrainerflag TRAINER_LAURA
+	settrainerflag TRAINER_BRENDEN
+	settrainerflag TRAINER_CRISTIAN
+	settrainerflag TRAINER_LILITH
+	return
+
+MauvilleCity_Gym_SetGymTrainers:: @ 8271FBE
+	settrainerflag TRAINER_KIRK
+	settrainerflag TRAINER_SHAWN
+	settrainerflag TRAINER_BEN
+	settrainerflag TRAINER_VIVIAN
+	settrainerflag TRAINER_ANGELO
+	return
+
+LavaridgeTown_Gym_SetGymTrainers:: @ 8271FCE
+	settrainerflag TRAINER_COLE
+	settrainerflag TRAINER_AXLE
+	settrainerflag TRAINER_KEEGAN
+	settrainerflag TRAINER_GERALD
+	settrainerflag TRAINER_DANIELLE
+	settrainerflag TRAINER_JACE
+	settrainerflag TRAINER_JEFF
+	settrainerflag TRAINER_ELI
+	return
+
+PetalburgCity_Gym_SetGymTrainers:: @ 8271FE7
+	settrainerflag TRAINER_RANDALL
+	settrainerflag TRAINER_PARKER
+	settrainerflag TRAINER_GEORGE
+	settrainerflag TRAINER_BERKE
+	settrainerflag TRAINER_MARY
+	settrainerflag TRAINER_ALEXIA
+	settrainerflag TRAINER_JODY
+	return
+
+FortreeCity_Gym_SetGymTrainers:: @ 8271FFD
+	settrainerflag TRAINER_JARED
+	settrainerflag TRAINER_FLINT
+	settrainerflag TRAINER_ASHLEY
+	settrainerflag TRAINER_EDWARDO
+	settrainerflag TRAINER_HUMBERTO
+	settrainerflag TRAINER_DARIUS
+	return
+
+MossdeepCity_Gym_SetGymTrainers:: @ 8272010
+	settrainerflag TRAINER_PRESTON
+	settrainerflag TRAINER_VIRGIL
+	settrainerflag TRAINER_BLAKE
+	settrainerflag TRAINER_HANNAH
+	settrainerflag TRAINER_SAMANTHA
+	settrainerflag TRAINER_MAURA
+	settrainerflag TRAINER_SYLVIA
+	settrainerflag TRAINER_NATE
+	settrainerflag TRAINER_KATHLEEN
+	settrainerflag TRAINER_CLIFFORD
+	settrainerflag TRAINER_MACEY
+	settrainerflag TRAINER_NICHOLAS
+	return
+
+SootopolisCity_Gym_SetGymTrainers:: @ 8272035
+	settrainerflag TRAINER_ANDREA
+	settrainerflag TRAINER_CRISSY
+	settrainerflag TRAINER_BRIANNA
+	settrainerflag TRAINER_CONNIE
+	settrainerflag TRAINER_BRIDGET
+	settrainerflag TRAINER_OLIVIA
+	settrainerflag TRAINER_TIFFANY
+	settrainerflag TRAINER_BETHANY
+	settrainerflag TRAINER_ANNIKA
+	settrainerflag TRAINER_DAPHNE
+	return

data/scripts/surf.inc

@@ -0,0 +1,18 @@
+EventScript_UseSurf:: @ 8271EA0
+	checkpartymove MOVE_SURF
+	compare VAR_RESULT, 6
+	goto_if_eq EventScript_CantSurf
+	bufferpartymonnick 0, VAR_RESULT
+	setfieldeffectargument 0, VAR_RESULT
+	lockall
+	msgbox gText_WantToUseSurf, MSGBOX_YESNO
+	compare VAR_RESULT, 0
+	goto_if_eq EventScript_CancelSurf
+	msgbox gText_PlayerUsedSurf, MSGBOX_DEFAULT
+	dofieldeffect FLDEFF_USE_SURF
+
+EventScript_CancelSurf:: @ 8271ED5
+	releaseall
+
+EventScript_CantSurf:: @ 8271ED6
+	end

data/scripts/test_signpost.inc

@@ -0,0 +1,7 @@
+Text_ThisIsATestSignpostMsg:: @ 82C840A
+	.string "This is a test message.\n"
+	.string "This is a signpost.$"
+
+EventScript_TestSignpostMsg:: @ 82C8436
+	msgbox Text_ThisIsATestSignpostMsg, MSGBOX_SIGN
+	end

data/scripts/trainer_battle.inc

@@ -1,3 +1,7 @@
+EventScript_271354:: @ 8271354
+	cmdD8
+	cmdD9
+
 EventScript_ShowSecondTrainerIntro:: @ 8271356
 	special SetUpTrainerEncounterMusic
 	special EndTrainerApproach

data/scripts/trainer_script.inc

@@ -0,0 +1,23 @@
+Std_RegisteredInMatchCall:: @ 82742C9
+	buffertrainerclassname 0, VAR_0x8000
+	buffertrainername 1, VAR_0x8000
+	closemessage
+	delay 30
+	playfanfare MUS_ME_TORE_EYE
+	msgbox gText_RegisteredTrainerinPokeNav, MSGBOX_DEFAULT
+	waitfanfare
+	closemessage
+	delay 30
+	return
+
+EventScript_TryGetTrainerScript:: @ 82742E6
+	special ShouldTryGetTrainerScript
+	compare VAR_RESULT, 1
+	goto_if_eq EventScript_GotoTrainerScript
+	releaseall
+	end
+
+EventScript_GotoTrainerScript:: @ 82742F6
+	gotobeatenscript
+	releaseall
+	end