Split more files from event_scripts.s

2020-01-09 13:25:10 -05:00
parent a40c63fe48
commit d071f05504
33 changed files with 1594 additions and 1591 deletions
@@ -0,0 +1,108 @@
+EventScript_PC:: @ 81A6955
+	special sub_8110AB4
+	compare VAR_RESULT, 2
+	goto_if eq, EventScript_1A7AE0
+	lockall
+	checkflag FLAG_SYS_PC_STORAGE_DISABLED
+	goto_if TRUE, EventScript_PCDisabled
+	setvar VAR_0x8004, 27
+	special Special_SetSomeVariable
+	setvar VAR_0x8004, 0
+	special Special_AnimatePcTurnOn
+	playse SE_PC_ON
+	msgbox Text_BootedUpPC
+	goto EventScript_PCMainMenu
+	end
+
+EventScript_PCDisabled:: @ 81A698E
+	msgbox Text_UsualPCServicesUnavailable
+	releaseall
+	end
+
+EventScript_PCMainMenu:: @ 81A6998
+	message Text_AccessWhichPC
+	waitmessage
+	special ScrSpecial_CreatePCMenu
+	waitstate
+	goto EventScript_ChoosePCMenu
+	end
+
+EventScript_ChoosePCMenu:: @ 81A69A8
+	switch VAR_RESULT
+	case 0, EventScript_AccessPokemonStorage
+	case 1, EventScript_AccessPlayersPC
+	case 2, EventScript_AccessProfOaksPC
+	case 3, EventScript_1A6A56
+	case 4, EventScript_1A6A46
+	case SCR_MENU_CANCEL, EventScript_1A6A46
+	end
+
+EventScript_AccessPlayersPC:: @ 81A69F0
+	playse SE_PC_LOGIN
+	msgbox Text_AccessedPlayersPC
+	special PlayerPC
+	waitstate
+	goto EventScript_PCMainMenu
+	end
+
+EventScript_AccessPokemonStorage:: @ 81A6A05
+	playse SE_PC_LOGIN
+	checkflag FLAG_SYS_NOT_SOMEONES_PC
+	call_if FALSE, EventScript_1A6A34
+	checkflag FLAG_SYS_NOT_SOMEONES_PC
+	call_if TRUE, EventScript_1A6A3D
+	msgbox Text_OpenedPkmnStorage
+	special ShowPokemonStorageSystem
+	waitstate
+	setvar VAR_0x8004, 27
+	special Special_SetSomeVariable
+	goto EventScript_PCMainMenu
+	end
+
+EventScript_1A6A34:: @ 81A6A34
+	msgbox Text_AccessedSomeonesPC
+	return
+
+EventScript_1A6A3D:: @ 81A6A3D
+	msgbox Text_AccessedBillsPC
+	return
+
+EventScript_1A6A46:: @ 81A6A46
+	setvar VAR_0x8004, 0
+	playse SE_PC_OFF
+	special Special_AnimatePcTurnOff
+	special sub_812B35C
+	releaseall
+	end
+
+EventScript_1A6A56:: @ 81A6A56
+	checkflag FLAG_SYS_GAME_CLEAR
+	goto_if FALSE, EventScript_1A6A46
+	playse SE_PC_LOGIN
+	setvar VAR_0x8004, 31
+	special HelpSystem_BackupSomeVariable
+	special Special_SetSomeVariable
+	special HallOfFamePCBeginFade
+	waitstate
+	special HelpSystem_RestoreSomeVariable
+	goto EventScript_ChoosePCMenu
+	end
+
+EventScript_AccessProfOaksPC:: @ 81A6A7A
+	checkflag FLAG_SYS_POKEDEX_GET
+	goto_if FALSE, EventScript_1A6A46
+	playse SE_PC_LOGIN
+	msgbox Text_AccessedProfOaksPC
+	msgbox Text_HavePokedexRated, MSGBOX_YESNO
+	compare VAR_RESULT, NO
+	goto_if eq, EventScript_ExitOaksPC
+	setflag FLAG_OAKS_RATING_IS_VIA_PC
+	call EventScript_1A73E0
+	clearflag FLAG_OAKS_RATING_IS_VIA_PC
+	goto EventScript_ExitOaksPC
+	end
+
+EventScript_ExitOaksPC:: @ 81A6AB2
+	msgbox Text_ClosedLinkToProfOaksPC
+	goto EventScript_PCMainMenu
+	end