11 files changed, 1576 insertions, 661 deletions
diff --git a/data/scripts/berry_tree.inc b/data/scripts/berry_tree.inc
index 2dc016a52..63d1f0bcc 100644
--- a/data/scripts/berry_tree.inc
+++ b/data/scripts/berry_tree.inc
@@ -184,7 +184,7 @@ BerryTree_EventScript_WaterBerry:: @ 82744C4
 
 BerryTree_EventScript_PlantBerry:: @ 82744DD
 	special EventObjectInteractionPlantBerryTree
-	incrementgamestat 3
+	incrementgamestat GAME_STAT_PLANTED_BERRIES
 	special sub_80EED10
 	special EventObjectInteractionGetBerryCountString
 	message BerryTree_Text_PlantedOneBerry
diff --git a/data/scripts/cable_club.inc b/data/scripts/cable_club.inc
index 8e49c982f..3fcb25807 100644
--- a/data/scripts/cable_club.inc
+++ b/data/scripts/cable_club.inc
@@ -47,7 +47,7 @@ OldaleTown_PokemonCenter_2F_EventScript_276B19:: @ 8276B19
 	gotoram
 
 OldaleTown_PokemonCenter_2F_EventScript_276B1A:: @ 8276B1A
-	msgbox gUnknown_08273178, MSGBOX_NPC
+	msgbox gText_ThankYouForAccessingMysteryGift, MSGBOX_NPC
 	end
 
 OldaleTown_PokemonCenter_2F_EventScript_276B23:: @ 8276B23
@@ -64,7 +64,7 @@ OldaleTown_PokemonCenter_2F_EventScript_276B23:: @ 8276B23
 	end
 
 OldaleTown_PokemonCenter_2F_EventScript_276B62:: @ 8276B62
-	msgbox gUnknown_08273178, MSGBOX_DEFAULT
+	msgbox gText_ThankYouForAccessingMysteryGift, MSGBOX_DEFAULT
 	release
 	end
 
@@ -707,13 +707,13 @@ OldaleTown_PokemonCenter_2F_EventScript_277328:: @ 8277328
 	release
 	end
 
-OldaleTown_PokemonCenter_2F_EventScript_277335:: @ 8277335
-	msgbox gUnknown_0827306F, MSGBOX_DEFAULT
+CableClub_EventScript_WirelessClubAdjustements:: @ 8277335
+	msgbox gText_SorryWirelessClubAdjustments, MSGBOX_DEFAULT
 	release
 	end
 
 OldaleTown_PokemonCenter_2F_EventScript_27733F:: @ 827733F
-	msgbox gUnknown_082730BC, MSGBOX_DEFAULT
+	msgbox gText_UndergoingAdjustments, MSGBOX_DEFAULT
 	releaseall
 	end
 
@@ -977,7 +977,7 @@ OldaleTown_PokemonCenter_2F_EventScript_27751B:: @ 827751B
 	lock
 	faceplayer
 	setvar VAR_FRONTIER_FACILITY, 8
-	goto_if_unset FLAG_SYS_POKEDEX_GET, OldaleTown_PokemonCenter_2F_EventScript_277335
+	goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_WirelessClubAdjustements
 	specialvar VAR_RESULT, IsBadEggInParty
 	compare VAR_RESULT, 1
 	goto_if_eq OldaleTown_PokemonCenter_2F_EventScript_27731B
@@ -1052,12 +1052,12 @@ OldaleTown_PokemonCenter_2F_EventScript_277626:: @ 8277626
 
 OldaleTown_PokemonCenter_2F_EventScript_27764C:: @ 827764C
 	msgbox OldaleTown_PokemonCenter_2F_Text_27893E, MSGBOX_DEFAULT
-	goto OldaleTown_PokemonCenter_2F_EventScript_273755
+	goto EventScript_CableClub_SetVarResult0
 	end
 
 OldaleTown_PokemonCenter_2F_EventScript_27765A:: @ 827765A
 	msgbox OldaleTown_PokemonCenter_2F_Text_27897B, MSGBOX_DEFAULT
-	goto OldaleTown_PokemonCenter_2F_EventScript_273755
+	goto EventScript_CableClub_SetVarResult0
 	end
 
 OldaleTown_PokemonCenter_2F_EventScript_277668:: @ 8277668
@@ -1068,7 +1068,7 @@ OldaleTown_PokemonCenter_2F_EventScript_277668:: @ 8277668
 OldaleTown_PokemonCenter_2F_EventScript_277672:: @ 8277672
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_POKEDEX_GET, OldaleTown_PokemonCenter_2F_EventScript_277335
+	goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_WirelessClubAdjustements
 	msgbox OldaleTown_PokemonCenter_2F_Text_279937, MSGBOX_YESNO
 	compare VAR_RESULT, 0
 	goto_if_eq OldaleTown_PokemonCenter_2F_EventScript_27769A
@@ -1085,7 +1085,7 @@ OldaleTown_PokemonCenter_2F_EventScript_2776A4:: @ 82776A4
 	lock
 	faceplayer
 	setvar VAR_FRONTIER_FACILITY, 9
-	goto_if_unset FLAG_SYS_POKEDEX_GET, OldaleTown_PokemonCenter_2F_EventScript_277335
+	goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_WirelessClubAdjustements
 	specialvar VAR_RESULT, IsBadEggInParty
 	compare VAR_RESULT, 1
 	goto_if_eq OldaleTown_PokemonCenter_2F_EventScript_27731B
@@ -1856,7 +1856,7 @@ OldaleTown_PokemonCenter_2F_Text_278A39: @ 8278A39
 	.string "Oh…\n"
 	.string "Excuse me!$"
 
-OldaleTown_PokemonCenter_1F_Text_278A48: @ 8278A48
+CableClub_Text_PlayerIsWaiting: @ 8278A48
 	.string "It appears as if {STR_VAR_1} is playing\n"
 	.string "right now.\l"
 	.string "Go for it!$"
diff --git a/data/scripts/contest_hall.inc b/data/scripts/contest_hall.inc
index 03863eb40..9a9816a5f 100644
--- a/data/scripts/contest_hall.inc
+++ b/data/scripts/contest_hall.inc
@@ -1232,7 +1232,7 @@ LinkContestRoom1_EventScript_27ACBD:: @ 827ACBD
 
 LinkContestRoom1_EventScript_27ACDF:: @ 827ACDF
 	special sub_80F7FFC
-	incrementgamestat 42
+	incrementgamestat GAME_STAT_RECEIVED_RIBBONS
 	setflag FLAG_SYS_RIBBON_GET
 	lockall
 	msgbox LinkContestRoom1_Text_27BBD4, MSGBOX_DEFAULT
diff --git a/data/scripts/field_move_scripts.inc b/data/scripts/field_move_scripts.inc
index 6eae55294..71d4b725c 100644
--- a/data/scripts/field_move_scripts.inc
+++ b/data/scripts/field_move_scripts.inc
@@ -11,7 +11,7 @@ EventScript_CutTree:: @ 82906BB
 	msgbox Text_WantToCut, MSGBOX_YESNO
 	compare VAR_RESULT, 0
 	goto_if_eq EventScript_CancelCut
-	msgbox Text_MonUsedHM, MSGBOX_DEFAULT
+	msgbox Text_MonUsedFieldMove, MSGBOX_DEFAULT
 	closemessage
 	dofieldeffect FLDEFF_USE_CUT_ON_TREE
 	waitstate
@@ -51,7 +51,7 @@ Text_WantToCut: @ 829072E
 	.string "CUT down!\p"
 	.string "Would you like to CUT it?$"
 
-Text_MonUsedHM: @ 8290771
+Text_MonUsedFieldMove: @ 8290771
 	.string "{STR_VAR_1} used {STR_VAR_2}!$"
 
 Text_CantCut: @ 829077D
@@ -70,7 +70,7 @@ EventScript_RockSmash:: @ 82907A6
 	msgbox Text_WantToSmash, MSGBOX_YESNO
 	compare VAR_RESULT, 0
 	goto_if_eq EventScript_CancelSmash
-	msgbox Text_MonUsedHM, MSGBOX_DEFAULT
+	msgbox Text_MonUsedFieldMove, MSGBOX_DEFAULT
 	closemessage
 	dofieldeffect FLDEFF_USE_ROCK_SMASH
 	waitstate
diff --git a/data/scripts/lilycove_lady.inc b/data/scripts/lilycove_lady.inc
new file mode 100644
index 000000000..77b842d3d
--- /dev/null
+++ b/data/scripts/lilycove_lady.inc
@@ -0,0 +1,856 @@
+LilycoveCity_PokemonCenter_1F_EventScript_2A836B:: @ 82A836B
+    special Script_GetLilycoveLadyId
+    switch VAR_RESULT
+    case LILYCOVE_LADY_QUIZ, LilycoveCity_PokemonCenter_1F_EventScript_2A8554
+    case LILYCOVE_LADY_FAVOR, LilycoveCity_PokemonCenter_1F_EventScript_2A8395
+    case LILYCOVE_LADY_CONTEST, LilycoveCity_PokemonCenter_1F_EventScript_2A882A
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8395:: @ 82A8395
+    lock
+    faceplayer
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8A69, MSGBOX_DEFAULT
+    specialvar VAR_RESULT, GetFavorLadyState
+    compare VAR_RESULT, LILYCOVE_LADY_STATE_READY
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A83D0
+    compare VAR_RESULT, LILYCOVE_LADY_STATE_COMPLETED
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A83C6
+    compare VAR_RESULT, LILYCOVE_LADY_STATE_PRIZE
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8510
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A83C6:: @ 82A83C6
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8AB1, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A83D0:: @ 82A83D0
+    special BufferFavorLadyRequest
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8A7D, MSGBOX_DEFAULT
+    specialvar VAR_RESULT, HasAnotherPlayerGivenFavorLadyItem
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8435
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A83F7
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A83F7:: @ 82A83F7
+    special BufferFavorLadyItemName
+    special BufferFavorLadyPlayerName
+    specialvar VAR_RESULT, DidFavorLadyLikeItem
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8419
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8427
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8419:: @ 82A8419
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8ACE, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8435
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8427:: @ 82A8427
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8B36, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8435
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8435:: @ 82A8435
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8B69, MSGBOX_YESNO
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8454
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A845E
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8454:: @ 82A8454
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8BCD, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A845E:: @ 82A845E
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8BAD, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A846C
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A846C:: @ 82A846C
+    fadescreen 1
+    setvar VAR_RESULT, 0
+    special Script_FavorLadyOpenBagMenu
+    waitstate
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A848E
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A84AD
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A848E:: @ 82A848E
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8BEE, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8454
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A846C
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A84AD:: @ 82A84AD
+    specialvar VAR_RESULT, Script_DoesFavorLadyLikeItem
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A84C9
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A84D6
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A84C9:: @ 82A84C9
+    special BufferFavorLadyRequest
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8C0F, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A84D6:: @ 82A84D6
+    specialvar VAR_RESULT, IsFavorLadyThresholdMet
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A84F2
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A84FF
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A84F2:: @ 82A84F2
+    special BufferFavorLadyRequest
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8C6F, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A84FF:: @ 82A84FF
+    special BufferFavorLadyRequest
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8CC8, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8510
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8510:: @ 82A8510
+    setvar VAR_0x8004, 0
+    specialvar VAR_0x8004, FavorLadyGetPrize
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8D5D, MSGBOX_DEFAULT
+    giveitem_std VAR_0x8004
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8545
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A854F
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8545:: @ 82A8545
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8DBD, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A854F:: @ 82A854F
+    special SetFavorLadyState_Complete
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8554:: @ 82A8554
+    lock
+    faceplayer
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8E2B, MSGBOX_DEFAULT
+    specialvar VAR_RESULT, GetQuizLadyState
+    compare VAR_RESULT, LILYCOVE_LADY_STATE_READY
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8585
+    compare VAR_RESULT, LILYCOVE_LADY_STATE_COMPLETED
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A85AC
+    compare VAR_RESULT, LILYCOVE_LADY_STATE_PRIZE
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A86EC
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8585:: @ 82A8585
+    specialvar VAR_RESULT, GetQuizAuthor
+    compare VAR_RESULT, QUIZ_AUTHOR_PLAYER
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A85C8
+    compare VAR_RESULT, QUIZ_AUTHOR_OTHER_PLAYER
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A85D2
+    compare VAR_RESULT, QUIZ_AUTHOR_LADY
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A85E0
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A85AC:: @ 82A85AC
+    specialvar VAR_RESULT, IsQuizLadyWaitingForChallenger
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8759
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A85C8
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A85C8:: @ 82A85C8
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8E4E, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A85D2:: @ 82A85D2
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8EAC, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A85EE
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A85E0:: @ 82A85E0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8EAC, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A85EE
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A85EE:: @ 82A85EE
+    setvar VAR_0x8004, 0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8EEC, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A861C
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8612
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8612:: @ 82A8612
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8F65, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A861C:: @ 82A861C
+    special ClearQuizLadyPlayerAnswer
+    compare VAR_0x8004, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A864C
+    compare VAR_0x8004, EASY_CHAT_TYPE_QUIZ_ANSWER
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8656
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8635:: @ 82A8635
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8660
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8689
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A864C:: @ 82A864C
+    special QuizLadyShowQuizQuestion
+    waitstate
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8635
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8656:: @ 82A8656
+    special QuizLadyGetPlayerAnswer
+    waitstate
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8635
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8660:: @ 82A8660
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8F7E, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A867F
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A861C
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A867F:: @ 82A867F
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8F9A, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8689:: @ 82A8689
+    special SetQuizLadyState_Complete
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8F4D, MSGBOX_DEFAULT
+    specialvar VAR_RESULT, IsQuizAnswerCorrect
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A86C7
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A86B0
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A86B0:: @ 82A86B0
+    playse SE_SEIKAI
+    delay 10
+    playse SE_SEIKAI
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A8FC7, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A86EC
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A86C7:: @ 82A86C7
+    special BufferQuizCorrectAnswer
+    special BufferQuizPrizeName
+    playse SE_HAZURE
+    delay 10
+    playse SE_HAZURE
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A90A5, MSGBOX_DEFAULT
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A90CD, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8759
+    end
+
+@ VAR_RESULT is essentially ignored, both jumps are identical
+LilycoveCity_PokemonCenter_1F_EventScript_2A86EC:: @ 82A86EC
+    specialvar VAR_RESULT, BufferQuizAuthorNameAndCheckIfLady
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8708
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8716
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8708:: @ 82A8708
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9007, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8724
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8716:: @ 82A8716
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9007, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8724
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8724:: @ 82A8724
+    setvar VAR_0x8005, 0
+    special BufferQuizPrizeItem
+    special SetQuizLadyState_Complete
+    giveitem_std VAR_0x8005
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A874C
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8759
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A874C:: @ 82A874C
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A906A, MSGBOX_DEFAULT
+    special SetQuizLadyState_GivePrize
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8759:: @ 82A8759
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A90FB, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8785
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8778
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8778:: @ 82A8778
+    special QuizLadyPickNewQuestion
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9131, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8785:: @ 82A8785
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9153, MSGBOX_DEFAULT
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A878D:: @ 82A878D
+    fadescreen 1
+    setvar VAR_RESULT, 0
+    special Script_QuizLadyOpenBagMenu
+    waitstate
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A87AF
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A87CE
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A87AF:: @ 82A87AF
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9212, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8778
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A878D
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A87CE:: @ 82A87CE
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9270, MSGBOX_DEFAULT
+    special ClearQuizLadyQuestionAndAnswer
+    special ClearQuizLadyPlayerAnswer
+    setvar VAR_0x8004, EASY_CHAT_TYPE_QUIZ_QUESTION
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A87E1:: @ 82A87E1
+    fadescreen 1
+    special QuizLadySetCustomQuestion
+    waitstate
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A87F8
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A8817
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A87F8:: @ 82A87F8
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A92D3, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8778
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A87E1
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8817:: @ 82A8817
+    special QuizLadyTakePrizeForCustomQuiz
+    special QuizLadyRecordCustomQuizData
+    special QuizLadySetWaitingForChallenger
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9336, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A882A:: @ 82A882A
+    lock
+    faceplayer
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A93A7, MSGBOX_DEFAULT
+    specialvar VAR_RESULT, HasPlayerGivenContestLadyPokeblock
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8850
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A886C
+    end
+
+@ Redundant with above script, VAR_RESULT will always be 0 here
+LilycoveCity_PokemonCenter_1F_EventScript_2A8850:: @ 82A8850
+    specialvar VAR_RESULT, ShouldContestLadyShowGoOnAir
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8876
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A886C
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A886C:: @ 82A886C
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A93D6, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8876:: @ 82A8876
+    special Script_BufferContestLadyCategoryAndMonName
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A93F4, MSGBOX_DEFAULT
+    checkitem ITEM_POKEBLOCK_CASE, 1
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A89AE
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A94E8, MSGBOX_YESNO
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A88B0
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A88BA
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A88B0:: @ 82A88B0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9556, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A88BA:: @ 82A88BA
+    fadescreen 1
+    special OpenPokeblockCaseForContestLady
+    waitstate
+    compare VAR_RESULT, 0xFFFF
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A88D7
+    compare VAR_RESULT, 0xFFFF
+    goto_if_ne LilycoveCity_PokemonCenter_1F_EventScript_2A88F6
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A88D7:: @ 82A88D7
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9537, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A88B0
+    compare VAR_RESULT, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A88BA
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A88F6:: @ 82A88F6
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9571, MSGBOX_DEFAULT
+    special SetContestLadyGivenPokeblock
+    special GetContestLadyMonSpecies
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A890A
+    end
+
+@ VAR_0x8004 here is the return value from GivePokeblockToContestLady
+LilycoveCity_PokemonCenter_1F_EventScript_2A890A:: @ 82A890A
+    applymovement 4, LilycoveCity_PokemonCenter_1F_Movement_2A89B8
+    waitmovement 0
+    delay 60
+    applymovement 5, LilycoveCity_PokemonCenter_1F_Movement_2A89BB
+    waitmovement 0
+    delay 60
+    waitse
+    playmoncry VAR_0x8005, 0
+    delay 120
+    waitmoncry
+    compare VAR_0x8004, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A893F
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A894C
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A893F:: @ 82A893F
+    applymovement 5, LilycoveCity_PokemonCenter_1F_Movement_2A89C2
+    waitmovement 0
+    delay 60
+
+@ VAR_0x8004 here is the return value from GivePokeblockToContestLady
+LilycoveCity_PokemonCenter_1F_EventScript_2A894C:: @ 82A894C
+    applymovement 4, LilycoveCity_PokemonCenter_1F_Movement_2A89C0
+    waitmovement 0
+    delay 60
+    compare VAR_0x8004, 0
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8970
+    compare VAR_0x8004, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A897E
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8970:: @ 82A8970
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A95AD, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A898F
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A897E:: @ 82A897E
+    special Script_BufferContestLadyCategoryAndMonName
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9605, MSGBOX_DEFAULT
+    goto LilycoveCity_PokemonCenter_1F_EventScript_2A898F
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A898F:: @ 82A898F
+    specialvar VAR_RESULT, ShouldContestLadyShowGoOnAir
+    compare VAR_RESULT, 1
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A89A1
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A89A1:: @ 82A89A1
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9669, MSGBOX_DEFAULT
+    special PutLilycoveContestLadyShowOnTheAir
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A89AE:: @ 82A89AE
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9451, MSGBOX_DEFAULT
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_Movement_2A89B8: @ 82A89B8
+    face_right
+    delay_8
+    step_end
+
+LilycoveCity_PokemonCenter_1F_Movement_2A89BB: @ 82A89BB
+    face_left
+    delay_8
+    step_end
+
+LilycoveCity_PokemonCenter_1F_Movement_2A89BE: @ 82A89BE
+    face_down
+    step_end
+
+LilycoveCity_PokemonCenter_1F_Movement_2A89C0: @ 82A89C0
+    face_player
+    step_end
+
+LilycoveCity_PokemonCenter_1F_Movement_2A89C2: @ 82A89C2
+    disable_jump_landing_ground_effect
+    jump_in_place_left
+    disable_jump_landing_ground_effect
+    jump_in_place_left
+    step_end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A89C7:: @ 82A89C7
+    specialvar VAR_RESULT, GetContestLadyCategory
+    special Script_BufferContestLadyCategoryAndMonName
+    special GetContestLadyMonSpecies
+    compare VAR_RESULT, CONTEST_CATEGORY_COOL
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8A0A
+    compare VAR_RESULT, CONTEST_CATEGORY_BEAUTY
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8A1D
+    compare VAR_RESULT, CONTEST_CATEGORY_CUTE
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8A30
+    compare VAR_RESULT, CONTEST_CATEGORY_SMART
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8A43
+    compare VAR_RESULT, CONTEST_CATEGORY_TOUGH
+    goto_if_eq LilycoveCity_PokemonCenter_1F_EventScript_2A8A56
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8A0A:: @ 82A8A0A
+    lock
+    faceplayer
+    waitse
+    playmoncry VAR_0x8005, 0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A96DA, MSGBOX_DEFAULT
+    waitmoncry
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8A1D:: @ 82A8A1D
+    lock
+    faceplayer
+    waitse
+    playmoncry VAR_0x8005, 0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A970E, MSGBOX_DEFAULT
+    waitmoncry
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8A30:: @ 82A8A30
+    lock
+    faceplayer
+    waitse
+    playmoncry VAR_0x8005, 0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A96F6, MSGBOX_DEFAULT
+    waitmoncry
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8A43:: @ 82A8A43
+    lock
+    faceplayer
+    waitse
+    playmoncry VAR_0x8005, 0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A96E6, MSGBOX_DEFAULT
+    waitmoncry
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_EventScript_2A8A56:: @ 82A8A56
+    lock
+    faceplayer
+    waitse
+    playmoncry VAR_0x8005, 0
+    msgbox LilycoveCity_PokemonCenter_1F_Text_2A9703, MSGBOX_DEFAULT
+    waitmoncry
+    release
+    end
+
+LilycoveCity_PokemonCenter_1F_Text_2A8A69: @ 82A8A69
+    .string "I'm the FAVOR LADY…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8A7D: @ 82A8A7D
+    .string "I've recently developed an obsession\n"
+    .string "for {STR_VAR_1} things…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8AB1: @ 82A8AB1
+    .string "Oh…\n"
+    .string "Thank you for last time…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8ACE: @ 82A8ACE
+    .string "Before, I think it was {STR_VAR_3}…\p"
+    .string "{STR_VAR_3} gave me one {STR_VAR_2},\n"
+    .string "saying it was {STR_VAR_1}.\p"
+    .string "But it wasn't {STR_VAR_1}.\n"
+    .string "Not in the least bit.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8B36: @ 82A8B36
+    .string "Before, {STR_VAR_3} gave me a very\n"
+    .string "{STR_VAR_1} {STR_VAR_2}.\p"
+    .string "I cherish it now.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8B69: @ 82A8B69
+    .string "Listen, if you have anything that\n"
+    .string "is {STR_VAR_1}, will you share it\l"
+    .string "with me?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8BAD: @ 82A8BAD
+    .string "…Really?\n"
+    .string "What will you give me?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8BCD: @ 82A8BCD
+    .string "Is that so?\n"
+    .string "Then, it's good-bye…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8BEE: @ 82A8BEE
+    .string "Oh…\n"
+    .string "You're not willing to share?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8C0F: @ 82A8C0F
+    .string "Oh?\n"
+    .string "That {STR_VAR_2} is {STR_VAR_1}?\p"
+    .string "…Oh, is that right?\p"
+    .string "Well, I owe you a thanks anyway.\n"
+    .string "I'll try to cherish it…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8C6F: @ 82A8C6F
+    .string "Oh…\p"
+    .string "That's a quite {STR_VAR_1}\n"
+    .string "{STR_VAR_2}…\p"
+    .string "Isn't it nice?\n"
+    .string "It's so dreamy…\p"
+    .string "Thank you…\n"
+    .string "I will cherish this…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8CC8: @ 82A8CC8
+    .string "…Oh, oh, oh…\p"
+    .string "This is amazing!\n"
+    .string "This really is {STR_VAR_1}!\p"
+    .string "I never knew that one {STR_VAR_2}\n"
+    .string "could be this {STR_VAR_1}!\p"
+    .string "Thank you!\p"
+    .string "I will treasure this for the rest\n"
+    .string "of my life!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8D5D: @ 82A8D5D
+    .string "I'll give you this wonderful item in\n"
+    .string "return for your fabulous gift.\p"
+    .string "I hope you will cherish it…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8DBD: @ 82A8DBD
+    .string "Oh, you can't have it if you don't have\n"
+    .string "the space for it.\p"
+    .string "Please come see me when you get\n"
+    .string "your BAG organized…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8E2B: @ 82A8E2B
+    .string "I'm the QUIZ LADY!\n"
+    .string "I love quizzes!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8E4E: @ 82A8E4E
+    .string "Oh?\p"
+    .string "I'm waiting for a challenger to answer\n"
+    .string "the quiz you made.\p"
+    .string "We can chat another time, okay?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8EAC: @ 82A8EAC
+    .string "I'm waiting for someone to challenge\n"
+    .string "a quiz this {STR_VAR_1} thought up!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8EEC: @ 82A8EEC
+    .string "If you answer correctly, you can win\n"
+    .string "fabulous prizes!\p"
+    .string "Would you like to take the quiz\n"
+    .string "challenge?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8F4D: @ 82A8F4D
+    .string "… … … … … …\n"
+    .string "… … … … … …$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8F65: @ 82A8F65
+    .string "Oh, how boring!\n"
+    .string "Bye-bye!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8F7E: @ 82A8F7E
+    .string "Awww!\n"
+    .string "You're going to quit?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8F9A: @ 82A8F9A
+    .string "Please take the quiz challenge\n"
+    .string "another time!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A8FC7: @ 82A8FC7
+    .string "You're amazing! You've got it right!\n"
+    .string "You're one sharp customer!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9007: @ 82A9007
+    .string "Congratulations!\n"
+    .string "You've got the quiz right!\p"
+    .string "You've won a prize provided by\n"
+    .string "{STR_VAR_1}!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9056: @ 82A9056
+    .string "{STR_VAR_1} received\n"
+    .string "one {STR_VAR_2}!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A906A: @ 82A906A
+    .string "Oh? Your BAG is filled up!\n"
+    .string "Come see me when you have room.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A90A5: @ 82A90A5
+    .string "Hmm… Wrong!\n"
+    .string "The correct answer is “{STR_VAR_3}”!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A90CD: @ 82A90CD
+    .string "Too bad!\p"
+    .string "I get to keep the quiz prize\n"
+    .string "{STR_VAR_1} now!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A90FB: @ 82A90FB
+    .string "Listen, listen!\n"
+    .string "Would you like to make your own quiz?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9131: @ 82A9131
+    .string "Oh, I see…\n"
+    .string "Well, maybe next time!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9153: @ 82A9153
+    .string "Okay, the first thing you have to do\n"
+    .string "is pick the prize for the person that\l"
+    .string "answers your quiz correctly.\p"
+    .string "But beware, if the person taking\n"
+    .string "the quiz can't get it right, I get to\l"
+    .string "keep the prize!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9212: @ 82A9212
+    .string "If you don't choose a prize,\n"
+    .string "your quiz can't be made.\p"
+    .string "Are you going to quit making\n"
+    .string "your quiz?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9270: @ 82A9270
+    .string "Oh, how nice!\n"
+    .string "That's a wonderful prize!\p"
+    .string "Next, you need to write your quiz\n"
+    .string "question and its answer.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A92D3: @ 82A92D3
+    .string "Are you going to quit writing\n"
+    .string "your quiz question?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9305: @ 82A9305
+    .string "Are you going to quit choosing\n"
+    .string "your quiz answer?$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9336: @ 82A9336
+    .string "Thank you!\n"
+    .string "You've put together a nice quiz.\p"
+    .string "I'll go look for someone who'll take\n"
+    .string "your quiz challenge right away.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A93A7: @ 82A93A7
+    .string "I'm the CONTEST LADY!\n"
+    .string "I sure do love CONTESTS!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A93D6: @ 82A93D6
+    .string "Thanks for your {POKEBLOCK} before!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A93F4: @ 82A93F4
+    .string "This is my friend {STR_VAR_1}!\n"
+    .string "It's the epitome of {STR_VAR_2}!\p"
+    .string "But I think that it will display\n"
+    .string "even more {STR_VAR_2}!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9451: @ 82A9451
+    .string "So, I need your help!\p"
+    .string "Please, may I have one {POKEBLOCK}?\n"
+    .string "All I'm asking for is one!\p"
+    .string "…Oh, but…\n"
+    .string "Don't you have a {POKEBLOCK} CASE?\l"
+    .string "That's no good. Next time, then!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A94E8: @ 82A94E8
+    .string "So, I need your help!\p"
+    .string "Please, may I have one {POKEBLOCK}?\n"
+    .string "All I'm asking for is one!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9537: @ 82A9537
+    .string "Awww!\n"
+    .string "I can't have one {POKEBLOCK}?!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9556: @ 82A9556
+    .string "Sheesh!\n"
+    .string "What a cheapskate!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9571: @ 82A9571
+    .string "Yay!\n"
+    .string "Thank you!\p"
+    .string "I'll feed my POKéMON your {POKEBLOCK}\n"
+    .string "right away.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A95AD: @ 82A95AD
+    .string "…It doesn't seem to have changed\n"
+    .string "in any way at all…\p"
+    .string "Hmm…\p"
+    .string "Oh, well!\n"
+    .string "Thank you very much!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9605: @ 82A9605
+    .string "Oh, yay!\n"
+    .string "It's really delighted!\p"
+    .string "I think it really improved {STR_VAR_1}'s\n"
+    .string "{STR_VAR_2} quality, too.\p"
+    .string "Thank you so much!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9669: @ 82A9669
+    .string "Hmm…\p"
+    .string "I think we may be ready to enter\n"
+    .string "some CONTESTS.\p"
+    .string "If you see us in one somewhere,\n"
+    .string "I hope you'll cheer for us.$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A96DA: @ 82A96DA
+    .string "{STR_VAR_1}: Guguuh!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A96E6: @ 82A96E6
+    .string "{STR_VAR_1}: Igigigiiih!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A96F6: @ 82A96F6
+    .string "{STR_VAR_1}: Baaarun…$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A9703: @ 82A9703
+    .string "{STR_VAR_1}: Pikka!$"
+
+LilycoveCity_PokemonCenter_1F_Text_2A970E: @ 82A970E
+    .string "{STR_VAR_1}: Umyaaaan!$"
diff --git a/data/scripts/pkmn_center_nurse.inc b/data/scripts/pkmn_center_nurse.inc
new file mode 100644
index 000000000..bfeba79e3
--- /dev/null
+++ b/data/scripts/pkmn_center_nurse.inc
@@ -0,0 +1,135 @@
+Common_EventScript_PkmnCenterNurse:: @ 827191E
+    lock
+    faceplayer
+    setvar VAR_0x8004, 0
+    specialvar VAR_RESULT, CountPlayerTrainerStars
+    compare VAR_RESULT, 4
+    goto_if_eq EventScript_PkmnCenterNurse_GoldCard
+    msgbox gText_WouldYouLikeToRestYourPkmn, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq EventScript_PkmnCenterNurse_HealPkmn
+    compare VAR_RESULT, 0
+    goto_if_eq EventScript_PkmnCenterNurse_Goodbye
+    end
+
+EventScript_PkmnCenterNurse_Goodbye:: @ 8271954
+    message gText_WeHopeToSeeYouAgain
+    return
+
+@ VAR_0x8004 is 1 when player has Gold Card; jumps are identical
+EventScript_PkmnCenterNurse_HealPkmn:: @ 827195A
+    incrementgamestat GAME_STAT_USED_POKECENTER
+    compare VAR_0x8004, 0
+    call_if_eq EventScript_PkmnCenterNurse_IllTakeYourPkmn
+    compare VAR_0x8004, 1
+    call_if_eq EventScript_PkmnCenterNurse_IllTakeYourPkmn2
+    waitmessage
+    call EventScript_PkmnCenterNurse_TakeAndHealPkmn
+    goto_if_unset FLAG_POKERUS_EXPLAINED, EventScript_PkmnCenterNurse_CheckPokerus
+    goto EventScript_PkmnCenterNurse_CheckTrainerHillAndUnionRoom
+    end
+
+EventScript_PkmnCenterNurse_IllTakeYourPkmn:: @ 8271987
+    message gText_IllTakeYourPkmn
+    return
+
+EventScript_PkmnCenterNurse_IllTakeYourPkmn2:: @ 827198D
+    message gText_IllTakeYourPkmn2
+    return
+
+EventScript_PkmnCenterNurse_TakeAndHealPkmn:: @ 8271993
+    applymovement VAR_0x800B, Common_Movement_WalkInPlaceLeft
+    waitmovement 0
+    dofieldeffect FLDEFF_POKECENTER_HEAL
+    waitfieldeffect FLDEFF_POKECENTER_HEAL
+    applymovement VAR_0x800B, Common_Movement_WalkInPlaceDown
+    waitmovement 0
+    special HealPlayerParty
+    return
+
+EventScript_PkmnCenterNurse_CheckTrainerHillAndUnionRoom:: @ 82719B1
+    specialvar VAR_RESULT, PlayerNotAtTrainerHillEntrance
+    compare VAR_RESULT, 0
+    goto_if_eq EventScript_PkmnCenterNurse_ReturnPkmn
+    specialvar VAR_RESULT, BufferUnionRoomPlayerName
+    copyvar VAR_0x8008, VAR_RESULT
+    compare VAR_0x8008, 0
+    goto_if_eq EventScript_PkmnCenterNurse_ReturnPkmn
+    compare VAR_0x8008, 1
+    goto_if_eq EventScript_PkmnCenterNurse_PlayerWaitingInUnionRoom
+    end
+
+@ VAR_0x8004 is 1 when player has Gold Card
+EventScript_PkmnCenterNurse_ReturnPkmn:: @ 82719E2
+    compare VAR_0x8004, 1
+    goto_if_eq EventScript_PkmnCenterNurse_ReturnPkmn2
+    message gText_RestoredPkmnToFullHealth
+    waitmessage
+    applymovement VAR_0x800B, EventScript_PkmnCenterNurse_Bow
+    waitmovement 0
+    message gText_WeHopeToSeeYouAgain
+    return
+
+EventScript_PkmnCenterNurse_ReturnPkmn2:: @ 8271A03
+    message gText_ThankYouForWaiting
+    waitmessage
+    applymovement VAR_0x800B, EventScript_PkmnCenterNurse_Bow
+    waitmovement 0
+    message gText_WeHopeToSeeYouAgain2
+    return
+
+EventScript_PkmnCenterNurse_PlayerWaitingInUnionRoom:: @ 8271A19
+    goto_if_set FLAG_NURSE_UNION_ROOM_REMINDER, EventScript_PkmnCenterNurse_ReturnPkmn
+    msgbox gText_RestoredPkmnToFullHealth, MSGBOX_DEFAULT
+    setflag FLAG_NURSE_UNION_ROOM_REMINDER
+    message CableClub_Text_PlayerIsWaiting
+    waitmessage
+    applymovement VAR_0x800B, EventScript_PkmnCenterNurse_Bow
+    waitmovement 0
+    message gText_WeHopeToSeeYouAgain
+    return
+
+EventScript_PkmnCenterNurse_CheckPokerus:: @ 8271A43
+    specialvar VAR_RESULT, IsPokerusInParty
+    compare VAR_RESULT, 1
+    goto_if_eq EventScript_PkmnCenterNurse_ExplainPokerus
+    compare VAR_RESULT, 0
+    goto_if_eq EventScript_PkmnCenterNurse_CheckTrainerHillAndUnionRoom
+    end
+
+EventScript_PkmnCenterNurse_ExplainPokerus:: @ 8271A5F
+    message gText_PokerusExplanation
+    setflag FLAG_POKERUS_EXPLAINED
+    return
+
+EventScript_PkmnCenterNurse_GoldCard:: @ 8271A68
+    goto_if_set FLAG_NURSE_MENTIONS_GOLD_CARD, EventScript_PkmnCenterNurse_AskForUsual
+    setflag FLAG_NURSE_MENTIONS_GOLD_CARD
+    msgbox gText_WelcomeCutShort, MSGBOX_DEFAULT
+    playse SE_PIN
+    applymovement VAR_0x800B, Common_Movement_ExclamationMark
+    waitmovement 0
+    applymovement VAR_0x800B, Common_Movement_Delay48
+    waitmovement 0
+    msgbox gText_NoticesGoldCard, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq EventScript_PkmnCenterNurse_GoldCardHealPkmn
+    message gText_WeHopeToSeeYouAgain2
+    return
+
+EventScript_PkmnCenterNurse_AskForUsual:: @ 8271AAC
+    msgbox gText_YouWantTheUsual, MSGBOX_YESNO
+    compare VAR_RESULT, 1
+    goto_if_eq EventScript_PkmnCenterNurse_GoldCardHealPkmn
+    message gText_WeHopeToSeeYouAgain2
+    return
+
+EventScript_PkmnCenterNurse_GoldCardHealPkmn:: @ 8271AC5
+    setvar VAR_0x8004, 1
+    goto EventScript_PkmnCenterNurse_HealPkmn
+    end
+
+EventScript_PkmnCenterNurse_Bow: @ 8271AD0
+    nurse_joy_bow
+    delay_4
+    step_end
diff --git a/data/scripts/players_house.inc b/data/scripts/players_house.inc
index 855c5eac2..149fb52cc 100644
--- a/data/scripts/players_house.inc
+++ b/data/scripts/players_house.inc
@@ -104,7 +104,7 @@ LittlerootTown_BrendansHouse_2F_EventScript_29280F:: @ 829280F
 	return
 
 LittlerootTown_BrendansHouse_2F_EventScript_29283F:: @ 829283F
-	incrementgamestat 45
+	incrementgamestat GAME_STAT_CHECKED_CLOCK
 	fadescreen 1
 	special Special_ViewWallClock
 	waitstate
@@ -374,7 +374,7 @@ LittlerootTown_BrendansHouse_1F_EventScript_292A94:: @ 8292A94
 LittlerootTown_BrendansHouse_1F_EventScript_292A9E:: @ 8292A9E
 	closemessage
 	call Common_EventScript_OutOfCenterPartyHeal
-	incrementgamestat 16
+	incrementgamestat GAME_STAT_RESTED_AT_HOME
 	msgbox LittlerootTown_BrendansHouse_1F_Text_1F7D5C, MSGBOX_DEFAULT
 	release
 	end
diff --git a/data/scripts/pokeblocks.inc b/data/scripts/pokeblocks.inc
index 7b3932341..10ced77c4 100644
--- a/data/scripts/pokeblocks.inc
+++ b/data/scripts/pokeblocks.inc
@@ -679,7 +679,7 @@ EventScript_PblocLink_DifferentSelections: @ 8294183
 
 EventScript_PblocLink_CloseLink: @ 8294190
 	special CloseLink
-	msgbox gUnknown_08272D9C, MSGBOX_DEFAULT
+	msgbox gText_PokeblockLinkCanceled, MSGBOX_DEFAULT
 	releaseall
 	end
 
diff --git a/data/scripts/secret_base.inc b/data/scripts/secret_base.inc
index 81bd388f8..f2a99cd36 100644
--- a/data/scripts/secret_base.inc
+++ b/data/scripts/secret_base.inc
@@ -1,433 +1,148 @@
-Text_274746: @ 8274746
+SecretBase_Text_TreeCanBeClimbed: @ 8274746
 	.string "If some vines drop down, this tree can\n"
 	.string "be climbed.$"
 
-Text_274779: @ 8274779
+SecretBase_Text_TreeUseSecretPower: @ 8274779
 	.string "If some vines drop down, this tree can\n"
 	.string "be climbed.\p"
 	.string "Use the SECRET POWER?$"
 
-Text_2747C2: @ 82747C2
+SecretBase_Text_VineDroppedDown: @ 82747C2
 	.string "A thick vine dropped down!$"
 
-Text_2747DD: @ 82747DD
+SecretBase_Text_ClumpOfGrass: @ 82747DD
 	.string "If this clump of grass can be moved,\n"
 	.string "it might be possible to go inside.$"
 
-Text_274825: @ 8274825
+SecretBase_Text_ClumpUseSecretPower: @ 8274825
 	.string "If this clump of grass can be moved,\n"
 	.string "it might be possible to go inside.\p"
 	.string "Use the SECRET POWER?$"
 
-Text_274883: @ 8274883
+SecretBase_Text_DiscoveredSmallEntrance: @ 8274883
 	.string "Discovered a small entrance!$"
 
-SecretBase_RedCave1_Text_2748A0: @ 82748A0
-	.string "Have you made a SECRET BASE already?\p"
-	.string "I went here, there, everywhere before\n"
-	.string "choosing this place.\p"
-	.string "Since you're already here, how would\n"
-	.string "you like to battle?$"
-
-SecretBase_RedCave1_Text_274939: @ 8274939
-	.string "Okay!\n"
-	.string "Here we come!$"
-
-SecretBase_RedCave1_Text_27494D: @ 827494D
-	.string "Hunh?\n"
-	.string "Oh, you can't now…$"
-
-SecretBase_RedCave1_Text_274966:: @ 8274966
-	.string "Waaargh! You're too strong!\n"
-	.string "About me losing… Please keep it secret!$"
-
-SecretBase_RedCave1_Text_2749AA: @ 82749AA
-	.string "What do you think of my SECRET BASE?\n"
-	.string "Come visit me again tomorrow.$"
-
-SecretBase_RedCave1_Text_2749ED: @ 82749ED
-	.string "Have you made a SECRET BASE already?\p"
-	.string "I went here, there, everywhere before\n"
-	.string "choosing this place.\p"
-	.string "Feel free to hang out!$"
-
-SecretBase_RedCave1_Text_274A64: @ 8274A64
-	.string "There're a lot of places where\n"
-	.string "you can make a SECRET BASE.\p"
-	.string "But I like this spot best.\n"
-	.string "Don't you think it's nice?\p"
-	.string "Oh, would you like to have a battle?$"
-
-SecretBase_RedCave1_Text_274AFA: @ 8274AFA
-	.string "Okay, here goes!$"
-
-SecretBase_RedCave1_Text_274B0B: @ 8274B0B
-	.string "Oh…\n"
-	.string "You can't now, okay.$"
-
-SecretBase_RedCave1_Text_274B24:: @ 8274B24
-	.string "Hmmm… It's our loss…\n"
-	.string "But don't tell anyone!\l"
-	.string "It's a confidential secret!$"
-
-SecretBase_RedCave1_Text_274B6C: @ 8274B6C
-	.string "If you're in this area again,\n"
-	.string "I hope you'll visit me.$"
-
-SecretBase_RedCave1_Text_274BA2: @ 8274BA2
-	.string "There're a lot of places where you can\n"
-	.string "make a SECRET BASE.\p"
-	.string "But I like this spot best.\n"
-	.string "Don't you think it's nice?$"
-
-SecretBase_RedCave1_Text_274C13: @ 8274C13
-	.string "This is a popular spot.\n"
-	.string "It's always taken.\p"
-	.string "Oh! Were you thinking about\n"
-	.string "taking this spot, too?\p"
-	.string "I'll tell you what, you can have this\n"
-	.string "spot if you can beat me.$"
-
-SecretBase_RedCave1_Text_274CB0: @ 8274CB0
-	.string "Okay!\n"
-	.string "I'm going to defend my SECRET BASE!$"
-
-SecretBase_RedCave1_Text_274CDA: @ 8274CDA
-	.string "Hunh? Is that right?\n"
-	.string "You're not interested in this spot?$"
-
-SecretBase_RedCave1_Text_274D13:: @ 8274D13
-	.string "I can't keep going!\n"
-	.string "I surrender!$"
-
-SecretBase_RedCave1_Text_274D34: @ 8274D34
-	.string "Okay, when I move one day,\n"
-	.string "this place will be yours!$"
-
-SecretBase_RedCave1_Text_274D69: @ 8274D69
-	.string "This is a popular spot.\n"
-	.string "It's always taken.\p"
-	.string "I waited a long time for it to open.\n"
-	.string "I finally got to use it!$"
-
-SecretBase_RedCave1_Text_274DD2: @ 8274DD2
-	.string "Welcome to my POKéMON LAB.\p"
-	.string "I carry out research on battling in\n"
-	.string "secrecy.\p"
-	.string "Would you like to see how strong I am?$"
-
-SecretBase_RedCave1_Text_274E41: @ 8274E41
-	.string "I'm going to go all out!$"
-
-SecretBase_RedCave1_Text_274E5A: @ 8274E5A
-	.string "Oh.\n"
-	.string "Some other time, then!$"
-
-SecretBase_RedCave1_Text_274E75:: @ 8274E75
-	.string "Hmm… I've still got lots to learn.\n"
-	.string "I have to study some more.$"
-
-SecretBase_RedCave1_Text_274EB3: @ 8274EB3
-	.string "Thanks for battling with me.\n"
-	.string "Please come back again tomorrow.$"
-
-SecretBase_RedCave1_Text_274EF1: @ 8274EF1
-	.string "Welcome to my POKéMON LAB.\p"
-	.string "I carry out research on battling in\n"
-	.string "secrecy.$"
-
-SecretBase_RedCave1_Text_274F39: @ 8274F39
-	.string "A big mansion is nice, but I like this\n"
-	.string "sort of place more.\p"
-	.string "I like it because all kinds of people\n"
-	.string "come visit me.\p"
-	.string "So, how would you like a battle?$"
-
-SecretBase_RedCave1_Text_274FCA: @ 8274FCA
-	.string "That's the way!$"
-
-SecretBase_RedCave1_Text_274FDA: @ 8274FDA
-	.string "When you're ready, give me a shout!$"
-
-SecretBase_RedCave1_Text_274FFE:: @ 8274FFE
-	.string "Aww! Done in!\n"
-	.string "But it's still fun to battle!$"
-
-SecretBase_RedCave1_Text_27502A: @ 827502A
-	.string "Well, anyway, I should go buy some\n"
-	.string "decorations and furniture.\p"
-	.string "I want my SECRET BASE to be a place\n"
-	.string "other people can enjoy.$"
-
-SecretBase_RedCave1_Text_2750A4: @ 82750A4
-	.string "A big mansion is nice, but I like this\n"
-	.string "sort of place more.\p"
-	.string "I like it because all kinds of people\n"
-	.string "come visit me.$"
-
-SecretBase_RedCave1_Text_275114: @ 8275114
-	.string "I simply adore shopping for decorations\n"
-	.string "and furniture.\p"
-	.string "I also love raising POKéMON just\n"
-	.string "as much.\p"
-	.string "If you would be so kind, will you battle\n"
-	.string "with my POKéMON?$"
-
-SecretBase_RedCave1_Text_2751AF: @ 82751AF
-	.string "Thank you.\n"
-	.string "Shall we begin?$"
-
-SecretBase_RedCave1_Text_2751CA: @ 82751CA
-	.string "Oh.\n"
-	.string "How disappointing…$"
-
-SecretBase_RedCave1_Text_2751E1:: @ 82751E1
-	.string "I concede…$"
-
-SecretBase_RedCave1_Text_2751EC: @ 82751EC
-	.string "That was all in good fun!\n"
-	.string "I should go enjoy shopping now.$"
-
-SecretBase_RedCave1_Text_275226: @ 8275226
-	.string "I simply adore shopping for decorations\n"
-	.string "and furniture.\p"
-	.string "I also love raising POKéMON just\n"
-	.string "as much.$"
-
-SecretBase_RedCave1_Text_275287: @ 8275287
-	.string "Some people make their SECRET BASES in\n"
-	.string "hard-to-find places.\l"
-	.string "Do they want to just lie low?\p"
-	.string "But since you found me, how about we\n"
-	.string "have a battle?$"
-
-SecretBase_RedCave1_Text_275315: @ 8275315
-	.string "I'm not going down easily!$"
-
-SecretBase_RedCave1_Text_275330: @ 8275330
-	.string "Oh… Are you maybe tired from searching\n"
-	.string "for this place?$"
-
-SecretBase_RedCave1_Text_275367:: @ 8275367
-	.string "I went down…$"
-
-SecretBase_RedCave1_Text_275374: @ 8275374
-	.string "Where's your SECRET BASE?\n"
-	.string "I should go visit you there.$"
-
-SecretBase_RedCave1_Text_2753AB: @ 82753AB
-	.string "Some people make their SECRET BASES in\n"
-	.string "hard-to-find places.\l"
-	.string "Do they want to just lie low?$"
-
-SecretBase_RedCave1_Text_275405: @ 8275405
-	.string "People have told me that you can get\n"
-	.string "decorations in several ways.\p"
-	.string "We should have a race to see who can\n"
-	.string "get nicer decorations and furniture!\p"
-	.string "In the meantime, want to battle?$"
-
-SecretBase_RedCave1_Text_2754B2: @ 82754B2
-	.string "This is my SECRET BASE.\n"
-	.string "I can't lose!$"
-
-SecretBase_RedCave1_Text_2754D8: @ 82754D8
-	.string "I'll battle with you anytime.$"
-
-SecretBase_RedCave1_Text_2754F6:: @ 82754F6
-	.string "Huh?\n"
-	.string "Did I just lose?$"
-
-SecretBase_RedCave1_Text_27550C: @ 827550C
-	.string "I won't lose at collecting decorations.\n"
-	.string "Come visit again!$"
-
-SecretBase_RedCave1_Text_275546: @ 8275546
-	.string "People have told me that you can get\n"
-	.string "decorations in several ways.\p"
-	.string "We should have a race to see who can\n"
-	.string "get nicer decorations and furniture!$"
-
-SecretBase_RedCave1_Text_2755D2: @ 82755D2
-	.string "I found a spot I liked, and I did it up\n"
-	.string "with my favorite decorations.\p"
-	.string "I raise my favorite POKéMON and grow\n"
-	.string "stronger with it.\p"
-	.string "That's what I do.\n"
-	.string "Want to battle with me?$"
-
-SecretBase_RedCave1_Text_275679: @ 8275679
-	.string "Show me what you're made of!$"
-
-SecretBase_RedCave1_Text_275696: @ 8275696
-	.string "I guess there are times when you're not\n"
-	.string "into it.$"
-
-SecretBase_RedCave1_Text_2756C7:: @ 82756C7
-	.string "I know exactly what you're made of now.$"
-
-SecretBase_RedCave1_Text_2756EF: @ 82756EF
-	.string "We can both become stronger.\n"
-	.string "Let's keep at it!$"
-
-SecretBase_RedCave1_Text_27571E: @ 827571E
-	.string "I found a spot I liked, and I did it up\n"
-	.string "with my favorite decorations.\p"
-	.string "I raise my favorite POKéMON and grow\n"
-	.string "stronger with it.\p"
-	.string "Every day is a great day.$"
-
-SecretBase_RedCave1_Text_2757B5: @ 82757B5
-	.string "You can learn a lot about the taste\n"
-	.string "and sense of people by the kinds of\l"
-	.string "decorations they have, and how they\l"
-	.string "display them.\p"
-	.string "What do you think of my taste?\n"
-	.string "Are you speechless?\p"
-	.string "Want to see my taste in battling?$"
-
-SecretBase_RedCave1_Text_275884: @ 8275884
-	.string "There's no holding back!$"
-
-SecretBase_RedCave1_Text_27589D: @ 827589D
-	.string "I'll be happy to demonstrate my style\n"
-	.string "anytime.$"
-
-SecretBase_RedCave1_Text_2758CC:: @ 82758CC
-	.string "You're supremely talented!\n"
-	.string "Your power seems to be limitless…$"
-
-SecretBase_RedCave1_Text_275909: @ 8275909
-	.string "What did you think of my style?\n"
-	.string "I'll keep on polishing it!$"
-
-SecretBase_RedCave1_Text_275944: @ 8275944
-	.string "You can learn a lot about the taste\n"
-	.string "and sense of people by the kinds of\l"
-	.string "decorations they have, and how they\l"
-	.string "display them.\p"
-	.string "What do you think of my taste?\n"
-	.string "Are you speechless?$"
-
-EventScript_2759F1:: @ 82759F1
+	.include "data/text/secret_base_trainers.inc"
+
+SecretBase_EventScript_CheckEntrance:: @ 82759F1
 	special GetSecretBaseTypeInFrontOfPlayer
 	special CheckPlayerHasSecretBase
 	compare VAR_RESULT, 1
-	goto_if_eq EventScript_275BE8
+	goto_if_eq SecretBase_EventScript_AlreadyHasSecretBase
 	checkpartymove MOVE_SECRET_POWER
 	setfieldeffectargument 0, VAR_RESULT
 	buffermovename 1, MOVE_SECRET_POWER
-	compare VAR_0x8007, 1
-	goto_if_eq EventScript_275A50
-	compare VAR_0x8007, 2
-	goto_if_eq EventScript_275A50
-	compare VAR_0x8007, 3
-	goto_if_eq EventScript_275A50
-	compare VAR_0x8007, 4
-	goto_if_eq EventScript_275A50
-	compare VAR_0x8007, 5
-	goto_if_eq EventScript_275AA9
-	compare VAR_0x8007, 6
-	goto_if_eq EventScript_275B02
-	end
-
-EventScript_275A50:: @ 8275A50
+	compare VAR_0x8007, SECRET_BASE_RED_CAVE
+	goto_if_eq SecretBase_EventScript_Cave
+	compare VAR_0x8007, SECRET_BASE_BROWN_CAVE
+	goto_if_eq SecretBase_EventScript_Cave
+	compare VAR_0x8007, SECRET_BASE_BLUE_CAVE
+	goto_if_eq SecretBase_EventScript_Cave
+	compare VAR_0x8007, SECRET_BASE_YELLOW_CAVE
+	goto_if_eq SecretBase_EventScript_Cave
+	compare VAR_0x8007, SECRET_BASE_TREE
+	goto_if_eq SecretBase_EventScript_Tree
+	compare VAR_0x8007, SECRET_BASE_SHRUB
+	goto_if_eq SecretBase_EventScript_Shrub
+	end
+
+SecretBase_EventScript_Cave:: @ 8275A50
 	lockall
-	compare VAR_RESULT, 6
-	goto_if_eq EventScript_275A91
+	compare VAR_RESULT, PARTY_SIZE
+	goto_if_eq SecretBase_EventScript_CaveNoSecretPower
 	bufferpartymonnick 0, VAR_RESULT
-	msgbox gText_23B704, MSGBOX_YESNO
+	msgbox SecretBase_Text_IndentUseSecretPower, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275CDE
-	msgbox Text_MonUsedHM, MSGBOX_DEFAULT
+	goto_if_eq SecretBase_EventScript_CancelOnEntrance
+	msgbox Text_MonUsedFieldMove, MSGBOX_DEFAULT
 	closemessage
 	dofieldeffect FLDEFF_USE_SECRET_POWER_CAVE
 	waitstate
-	goto EventScript_275A9B
+	goto SecretBase_EventScript_CaveEnter
 	end
 
-EventScript_275A86:: @ 8275A86
+SecretBase_EventScript_CaveUseSecretPower:: @ 8275A86
 	lockall
 	dofieldeffect FLDEFF_USE_SECRET_POWER_CAVE
 	waitstate
-	goto EventScript_275A9B
+	goto SecretBase_EventScript_CaveEnter
 	end
 
-EventScript_275A91:: @ 8275A91
-	msgbox gText_23B6E0, MSGBOX_DEFAULT
+SecretBase_EventScript_CaveNoSecretPower:: @ 8275A91
+	msgbox SecretBase_Text_SmallIndentInWall, MSGBOX_DEFAULT
 	releaseall
 	end
 
-EventScript_275A9B:: @ 8275A9B
-	msgbox gText_23B73E, MSGBOX_DEFAULT
-	goto EventScript_275B5B
+SecretBase_EventScript_CaveEnter:: @ 8275A9B
+	msgbox SecretBase_Text_DiscoveredSmallCavern, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_InitSecretBase
 	end
 
-EventScript_275AA9:: @ 8275AA9
+SecretBase_EventScript_Tree:: @ 8275AA9
 	lockall
-	compare VAR_RESULT, 6
-	goto_if_eq EventScript_275AEA
+	compare VAR_RESULT, PARTY_SIZE
+	goto_if_eq SecretBase_EventScript_TreeNoSecretPower
 	bufferpartymonnick 0, VAR_RESULT
-	msgbox Text_274779, MSGBOX_YESNO
+	msgbox SecretBase_Text_TreeUseSecretPower, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275CDE
-	msgbox Text_MonUsedHM, MSGBOX_DEFAULT
+	goto_if_eq SecretBase_EventScript_CancelOnEntrance
+	msgbox Text_MonUsedFieldMove, MSGBOX_DEFAULT
 	closemessage
 	dofieldeffect FLDEFF_USE_SECRET_POWER_TREE
 	waitstate
-	goto EventScript_275AF4
+	goto SecretBase_EventScript_TreeEnter
 	end
 
-EventScript_275ADF:: @ 8275ADF
+SecretBase_EventScript_TreeUseSecretPower:: @ 8275ADF
 	lockall
 	dofieldeffect FLDEFF_USE_SECRET_POWER_TREE
 	waitstate
-	goto EventScript_275AF4
+	goto SecretBase_EventScript_TreeEnter
 	end
 
-EventScript_275AEA:: @ 8275AEA
-	msgbox Text_274746, MSGBOX_DEFAULT
+SecretBase_EventScript_TreeNoSecretPower:: @ 8275AEA
+	msgbox SecretBase_Text_TreeCanBeClimbed, MSGBOX_DEFAULT
 	releaseall
 	end
 
-EventScript_275AF4:: @ 8275AF4
-	msgbox Text_2747C2, MSGBOX_DEFAULT
-	goto EventScript_275B5B
+SecretBase_EventScript_TreeEnter:: @ 8275AF4
+	msgbox SecretBase_Text_VineDroppedDown, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_InitSecretBase
 	end
 
-EventScript_275B02:: @ 8275B02
+SecretBase_EventScript_Shrub:: @ 8275B02
 	lockall
-	compare VAR_RESULT, 6
-	goto_if_eq EventScript_275B43
+	compare VAR_RESULT, PARTY_SIZE
+	goto_if_eq SecretBase_EventScript_ShrubNoSecretPower
 	bufferpartymonnick 0, VAR_RESULT
-	msgbox Text_274825, MSGBOX_YESNO
+	msgbox SecretBase_Text_ClumpUseSecretPower, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275CDE
-	msgbox Text_MonUsedHM, MSGBOX_DEFAULT
+	goto_if_eq SecretBase_EventScript_CancelOnEntrance
+	msgbox Text_MonUsedFieldMove, MSGBOX_DEFAULT
 	closemessage
 	dofieldeffect FLDEFF_USE_SECRET_POWER_SHRUB
 	waitstate
-	goto EventScript_275B4D
+	goto SecretBase_EventScript_ShrubEnter
 	end
 
-EventScript_275B38:: @ 8275B38
+SecretBase_EventScript_ShrubUseSecretPower:: @ 8275B38
 	lockall
 	dofieldeffect FLDEFF_USE_SECRET_POWER_SHRUB
 	waitstate
-	goto EventScript_275B4D
+	goto SecretBase_EventScript_ShrubEnter
 	end
 
-EventScript_275B43:: @ 8275B43
-	msgbox Text_2747DD, MSGBOX_DEFAULT
+SecretBase_EventScript_ShrubNoSecretPower:: @ 8275B43
+	msgbox SecretBase_Text_ClumpOfGrass, MSGBOX_DEFAULT
 	releaseall
 	end
 
-EventScript_275B4D:: @ 8275B4D
-	msgbox Text_274883, MSGBOX_DEFAULT
-	goto EventScript_275B5B
+SecretBase_EventScript_ShrubEnter:: @ 8275B4D
+	msgbox SecretBase_Text_DiscoveredSmallEntrance, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_InitSecretBase
 	end
 
-EventScript_275B5B:: @ 8275B5B
+SecretBase_EventScript_InitSecretBase:: @ 8275B5B
 	closemessage
 	playse SE_KAIDAN
 	setvar VAR_INIT_SECRET_BASE, 0
@@ -441,115 +156,113 @@ EventScript_275B5B:: @ 8275B5B
 	waitstate
 	end
 
-SecretBase_RedCave1_EventScript_275B81:: @ 8275B81
-	applymovement EVENT_OBJ_ID_PLAYER, SecretBase_RedCave1_Movement_275BB4
+SecretBase_EventScript_FirstEntrance:: @ 8275B81
+	applymovement EVENT_OBJ_ID_PLAYER, SecretBase_Movement_275BB4
 	waitmovement 0
 	setvar VAR_INIT_SECRET_BASE, 1
-	msgbox SecretBase_RedCave1_Text_23B759, MSGBOX_YESNO
+	msgbox SecretBase_Text_WantToMakeYourSecretBaseHere, MSGBOX_YESNO
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_275BAB
+	goto_if_eq SecretBase_EventScript_SetAsBase
 	closemessage
 	playse SE_KAIDAN
 	special ClearAndLeaveSecretBase
 	end
 
-SecretBase_RedCave1_EventScript_275BAB:: @ 8275BAB
+SecretBase_EventScript_SetAsBase:: @ 8275BAB
 	closemessage
 	setflag FLAG_RECEIVED_SECRET_POWER
 	special EnterNewlyCreatedSecretBase
 	waitstate
 	end
 
-SecretBase_RedCave1_Movement_275BB4: @ 8275BB4
+SecretBase_Movement_275BB4: @ 8275BB4
 	walk_up
 	walk_up
 	step_end
 
-EventScript_275BB7:: @ 8275BB7
+SecretBase_EventScript_Enter:: @ 8275BB7
 	lockall
 	setvar VAR_INIT_SECRET_BASE, 1
 	playse SE_KAIDAN
 	special IsCurSecretBaseOwnedByAnotherPlayer
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275BDB
+	goto_if_eq SecretBase_EventScript_EnterPlayersBase
 	clearflag FLAG_DECORATION_0
 	special EnterSecretBase
 	setvar VAR_SECRET_BASE_INITIALIZED, 0
 	waitstate
 	end
 
-EventScript_275BDB:: @ 8275BDB
+SecretBase_EventScript_EnterPlayersBase:: @ 8275BDB
 	setflag FLAG_DECORATION_0
 	special EnterSecretBase
 	setvar VAR_SECRET_BASE_INITIALIZED, 0
 	waitstate
 	end
 
-EventScript_275BE8:: @ 8275BE8
+SecretBase_EventScript_AlreadyHasSecretBase:: @ 8275BE8
 	checkpartymove MOVE_SECRET_POWER
-	compare VAR_RESULT, 6
-	goto_if_eq EventScript_275C9A
+	compare VAR_RESULT, PARTY_SIZE
+	goto_if_eq SecretBase_EventScript_NoSecretPower
 	setfieldeffectargument 0, VAR_RESULT
 	setorcopyvar VAR_0x8004, VAR_RESULT
 	lockall
 	special GetSecretBaseNearbyMapName
-	msgbox Text_276A3D, MSGBOX_YESNO
+	msgbox SecretBase_Text_WouldYouLikeToMoveBases, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275CDE
-	msgbox Text_2766AA, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_CancelOnEntrance
+	msgbox SecretBase_Text_AllDecorationsWillBeReturned, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275CDE
+	goto_if_eq SecretBase_EventScript_CancelOnEntrance
 	fadescreenswapbuffers 1
 	special MoveOutOfSecretBaseFromOutside
 	closemessage
 	fadescreenswapbuffers 0
-	msgbox Text_276A95, MSGBOX_YESNO
+	msgbox SecretBase_Text_MovingCompletedUseSecretPower, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_275CDE
+	goto_if_eq SecretBase_EventScript_CancelOnEntrance
 	bufferpartymonnick 0, VAR_0x8004
 	buffermovename 1, MOVE_SECRET_POWER
-	msgbox Text_MonUsedHM, MSGBOX_DEFAULT
+	msgbox Text_MonUsedFieldMove, MSGBOX_DEFAULT
 	closemessage
 	closemessage
-	compare VAR_0x8007, 1
-	goto_if_eq EventScript_275A86
-	compare VAR_0x8007, 2
-	goto_if_eq EventScript_275A86
-	compare VAR_0x8007, 3
-	goto_if_eq EventScript_275A86
-	compare VAR_0x8007, 4
-	goto_if_eq EventScript_275A86
-	compare VAR_0x8007, 5
-	goto_if_eq EventScript_275ADF
-	compare VAR_0x8007, 6
-	goto_if_eq EventScript_275B38
+	compare VAR_0x8007, SECRET_BASE_RED_CAVE
+	goto_if_eq SecretBase_EventScript_CaveUseSecretPower
+	compare VAR_0x8007, SECRET_BASE_BROWN_CAVE
+	goto_if_eq SecretBase_EventScript_CaveUseSecretPower
+	compare VAR_0x8007, SECRET_BASE_BLUE_CAVE
+	goto_if_eq SecretBase_EventScript_CaveUseSecretPower
+	compare VAR_0x8007, SECRET_BASE_YELLOW_CAVE
+	goto_if_eq SecretBase_EventScript_CaveUseSecretPower
+	compare VAR_0x8007, SECRET_BASE_TREE
+	goto_if_eq SecretBase_EventScript_TreeUseSecretPower
+	compare VAR_0x8007, SECRET_BASE_SHRUB
+	goto_if_eq SecretBase_EventScript_ShrubUseSecretPower
 	releaseall
 	end
 
-EventScript_275C9A:: @ 8275C9A
+SecretBase_EventScript_NoSecretPower:: @ 8275C9A
 	lockall
-	compare VAR_0x8007, 1
-	goto_if_eq EventScript_275A91
-	compare VAR_0x8007, 2
-	goto_if_eq EventScript_275A91
-	compare VAR_0x8007, 3
-	goto_if_eq EventScript_275A91
-	compare VAR_0x8007, 4
-	goto_if_eq EventScript_275A91
-	compare VAR_0x8007, 5
-	goto_if_eq EventScript_275AEA
-	compare VAR_0x8007, 6
-	goto_if_eq EventScript_275B43
-	end
-
-EventScript_275CDE:: @ 8275CDE
+	compare VAR_0x8007, SECRET_BASE_RED_CAVE
+	goto_if_eq SecretBase_EventScript_CaveNoSecretPower
+	compare VAR_0x8007, SECRET_BASE_BROWN_CAVE
+	goto_if_eq SecretBase_EventScript_CaveNoSecretPower
+	compare VAR_0x8007, SECRET_BASE_BLUE_CAVE
+	goto_if_eq SecretBase_EventScript_CaveNoSecretPower
+	compare VAR_0x8007, SECRET_BASE_YELLOW_CAVE
+	goto_if_eq SecretBase_EventScript_CaveNoSecretPower
+	compare VAR_0x8007, SECRET_BASE_TREE
+	goto_if_eq SecretBase_EventScript_TreeNoSecretPower
+	compare VAR_0x8007, SECRET_BASE_SHRUB
+	goto_if_eq SecretBase_EventScript_ShrubNoSecretPower
+	end
+
+SecretBase_EventScript_CancelOnEntrance:: @ 8275CDE
 	closemessage
 	releaseall
 	end
 
-LittlerootTown_BrendansHouse_2F_EventScript_275CE1:: @ 8275CE1
-LittlerootTown_MaysHouse_2F_EventScript_275CE1:: @ 8275CE1
-SecretBase_RedCave1_EventScript_275CE1:: @ 8275CE1
+SecretBase_EventScript_SetDecorationFlags:: @ 8275CE1
 	setflag FLAG_DECORATION_1
 	setflag FLAG_DECORATION_2
 	setflag FLAG_DECORATION_3
@@ -566,474 +279,461 @@ SecretBase_RedCave1_EventScript_275CE1:: @ 8275CE1
 	setflag FLAG_DECORATION_14
 	return
 
-EventScript_275D0C:: @ 8275D0C
+SecretBase_EventScript_InitDecorations:: @ 8275D0C
 	setvar VAR_0x8004, 0
 	setvar VAR_0x8005, 0
 	special InitSecretBaseDecorationSprites
 	setvar VAR_SECRET_BASE_INITIALIZED, 1
 	end
 
-EventScript_275D1F:: @ 8275D1F
+SecretBase_EventScript_SetDecoration:: @ 8275D1F
 	setvar VAR_0x8005, 0
-	goto EventScript_275D2A
+	goto SecretBase_EventScript_SetDecoration2
 	end
 
-EventScript_275D2A:: @ 8275D2A
-	special sub_8127E18
+SecretBase_EventScript_SetDecoration2:: @ 8275D2A
+	special SetDecoration
 	end
 
-EventScript_275D2E:: @ 8275D2E
+SecretBase_EventScript_PutAwayDecoration:: @ 8275D2E
 	setvar VAR_0x8004, 0
-	goto EventScript_275D39
+	goto SecretBase_EventScript_PutAwayDecorationLoop
 	end
 
-EventScript_275D39:: @ 8275D39
+SecretBase_EventScript_PutAwayDecorationLoop:: @ 8275D39
 	special sub_8129708
 	compare VAR_RESULT, 1
-	goto_if_eq EventScript_275D63
+	goto_if_eq SecretBase_EventScript_PutAwayDecorationEnd
 	addvar VAR_0x8004, 1
 	compare VAR_0x8005, 0
-	goto_if_eq EventScript_275D39
+	goto_if_eq SecretBase_EventScript_PutAwayDecorationLoop
 	removeobject VAR_0x8006
-	setflag 0x8005
-	goto EventScript_275D39
-	end
-
-EventScript_275D63:: @ 8275D63
-	end
-
-SecretBase_BlueCave1_EventScript_275D64:: @ 8275D64
-SecretBase_BlueCave2_EventScript_275D64:: @ 8275D64
-SecretBase_BlueCave3_EventScript_275D64:: @ 8275D64
-SecretBase_BlueCave4_EventScript_275D64:: @ 8275D64
-SecretBase_BrownCave1_EventScript_275D64:: @ 8275D64
-SecretBase_BrownCave2_EventScript_275D64:: @ 8275D64
-SecretBase_BrownCave3_EventScript_275D64:: @ 8275D64
-SecretBase_BrownCave4_EventScript_275D64:: @ 8275D64
-SecretBase_RedCave1_EventScript_275D64:: @ 8275D64
-SecretBase_RedCave2_EventScript_275D64:: @ 8275D64
-SecretBase_RedCave3_EventScript_275D64:: @ 8275D64
-SecretBase_RedCave4_EventScript_275D64:: @ 8275D64
-SecretBase_Shrub1_EventScript_275D64:: @ 8275D64
-SecretBase_Shrub2_EventScript_275D64:: @ 8275D64
-SecretBase_Shrub3_EventScript_275D64:: @ 8275D64
-SecretBase_Shrub4_EventScript_275D64:: @ 8275D64
-SecretBase_Tree1_EventScript_275D64:: @ 8275D64
-SecretBase_Tree2_EventScript_275D64:: @ 8275D64
-SecretBase_Tree3_EventScript_275D64:: @ 8275D64
-SecretBase_Tree4_EventScript_275D64:: @ 8275D64
-SecretBase_YellowCave1_EventScript_275D64:: @ 8275D64
-SecretBase_YellowCave2_EventScript_275D64:: @ 8275D64
-SecretBase_YellowCave3_EventScript_275D64:: @ 8275D64
-SecretBase_YellowCave4_EventScript_275D64:: @ 8275D64
-	special GetSecretBaseOwnerInteractionState
+	setflag 0x8005  @ UB: GF likely meant setvar here; setflag 0x8005 is out of bounds
+	goto SecretBase_EventScript_PutAwayDecorationLoop
+	end
+
+SecretBase_EventScript_PutAwayDecorationEnd:: @ 8275D63
+	end
+
+SecretBase_EventScript_RecordMixTrainer:: @ 8275D64
+	special GetSecretBaseOwnerAndState
 	compare VAR_0x8004, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275DD6
+	goto_if_eq SecretBase_EventScript_Trainer0
 	compare VAR_0x8004, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_275E4E
+	goto_if_eq SecretBase_EventScript_Trainer1
 	compare VAR_0x8004, 2
-	goto_if_eq SecretBase_RedCave1_EventScript_275EC6
+	goto_if_eq SecretBase_EventScript_Trainer2
 	compare VAR_0x8004, 3
-	goto_if_eq SecretBase_RedCave1_EventScript_275F3E
+	goto_if_eq SecretBase_EventScript_Trainer3
 	compare VAR_0x8004, 4
-	goto_if_eq SecretBase_RedCave1_EventScript_275FB6
+	goto_if_eq SecretBase_EventScript_Trainer4
 	compare VAR_0x8004, 5
-	goto_if_eq SecretBase_RedCave1_EventScript_27602E
+	goto_if_eq SecretBase_EventScript_Trainer5
 	compare VAR_0x8004, 6
-	goto_if_eq SecretBase_RedCave1_EventScript_2760A6
+	goto_if_eq SecretBase_EventScript_Trainer6
 	compare VAR_0x8004, 7
-	goto_if_eq SecretBase_RedCave1_EventScript_27611E
+	goto_if_eq SecretBase_EventScript_Trainer7
 	compare VAR_0x8004, 8
-	goto_if_eq SecretBase_RedCave1_EventScript_276196
+	goto_if_eq SecretBase_EventScript_Trainer8
 	compare VAR_0x8004, 9
-	goto_if_eq SecretBase_RedCave1_EventScript_27620E
+	goto_if_eq SecretBase_EventScript_Trainer9
 	end
 
-SecretBase_RedCave1_EventScript_275DD6:: @ 8275DD6
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer0:: @ 8275DD6
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_275E25
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer0PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_275E44
-	msgbox SecretBase_RedCave1_Text_2748A0, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer0PostBattle
+	msgbox SecretBase_Text_Trainer0PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275E2F
+	goto_if_eq SecretBase_EventScript_Trainer0DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275E2F
-	msgbox SecretBase_RedCave1_Text_274939, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer0DeclineBattle
+	msgbox SecretBase_Text_Trainer0AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_275E25:: @ 8275E25
-	msgbox SecretBase_RedCave1_Text_2749ED, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer0PreChampion:: @ 8275E25
+	msgbox SecretBase_Text_Trainer0PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275E2F:: @ 8275E2F
+SecretBase_EventScript_Trainer0DeclineBattle:: @ 8275E2F
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_27494D, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer0DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275E44:: @ 8275E44
-	msgbox SecretBase_RedCave1_Text_2749AA, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer0PostBattle:: @ 8275E44
+	msgbox SecretBase_Text_Trainer0PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275E4E:: @ 8275E4E
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer1:: @ 8275E4E
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_275E9D
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer1PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_275EBC
-	msgbox SecretBase_RedCave1_Text_274C13, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer1PostBattle
+	msgbox SecretBase_Text_Trainer1PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275EA7
+	goto_if_eq SecretBase_EventScript_Trainer1DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275EA7
-	msgbox SecretBase_RedCave1_Text_274CB0, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer1DeclineBattle
+	msgbox SecretBase_Text_Trainer1AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_275E9D:: @ 8275E9D
-	msgbox SecretBase_RedCave1_Text_274D69, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer1PreChampion:: @ 8275E9D
+	msgbox SecretBase_Text_Trainer1PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275EA7:: @ 8275EA7
+SecretBase_EventScript_Trainer1DeclineBattle:: @ 8275EA7
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_274CDA, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer1DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275EBC:: @ 8275EBC
-	msgbox SecretBase_RedCave1_Text_274D34, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer1PostBattle:: @ 8275EBC
+	msgbox SecretBase_Text_Trainer1PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275EC6:: @ 8275EC6
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer2:: @ 8275EC6
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_275F15
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer2PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_275F34
-	msgbox SecretBase_RedCave1_Text_274F39, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer2PostBattle
+	msgbox SecretBase_Text_Trainer2PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275F1F
+	goto_if_eq SecretBase_EventScript_Trainer2DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275F1F
-	msgbox SecretBase_RedCave1_Text_274FCA, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer2DeclineBattle
+	msgbox SecretBase_Text_Trainer2AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_275F15:: @ 8275F15
-	msgbox SecretBase_RedCave1_Text_2750A4, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer2PreChampion:: @ 8275F15
+	msgbox SecretBase_Text_Trainer2PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275F1F:: @ 8275F1F
+SecretBase_EventScript_Trainer2DeclineBattle:: @ 8275F1F
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_274FDA, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer2DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275F34:: @ 8275F34
-	msgbox SecretBase_RedCave1_Text_27502A, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer2PostBattle:: @ 8275F34
+	msgbox SecretBase_Text_Trainer2PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275F3E:: @ 8275F3E
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer3:: @ 8275F3E
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_275F8D
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer3PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_275FAC
-	msgbox SecretBase_RedCave1_Text_275287, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer3PostBattle
+	msgbox SecretBase_Text_Trainer3PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275F97
+	goto_if_eq SecretBase_EventScript_Trainer3DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_275F97
-	msgbox SecretBase_RedCave1_Text_275315, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer3DeclineBattle
+	msgbox SecretBase_Text_Trainer3AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_275F8D:: @ 8275F8D
-	msgbox SecretBase_RedCave1_Text_2753AB, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer3PreChampion:: @ 8275F8D
+	msgbox SecretBase_Text_Trainer3PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275F97:: @ 8275F97
+SecretBase_EventScript_Trainer3DeclineBattle:: @ 8275F97
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_275330, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer3DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275FAC:: @ 8275FAC
-	msgbox SecretBase_RedCave1_Text_275374, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer3PostBattle:: @ 8275FAC
+	msgbox SecretBase_Text_Trainer3PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_275FB6:: @ 8275FB6
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer4:: @ 8275FB6
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_276005
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer4PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_276024
-	msgbox SecretBase_RedCave1_Text_2755D2, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer4PostBattle
+	msgbox SecretBase_Text_Trainer4PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_27600F
+	goto_if_eq SecretBase_EventScript_Trainer4DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_27600F
-	msgbox SecretBase_RedCave1_Text_275679, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer4DeclineBattle
+	msgbox SecretBase_Text_Trainer4AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_276005:: @ 8276005
-	msgbox SecretBase_RedCave1_Text_27571E, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer4PreChampion:: @ 8276005
+	msgbox SecretBase_Text_Trainer4PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27600F:: @ 827600F
+SecretBase_EventScript_Trainer4DeclineBattle:: @ 827600F
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_275696, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer4DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276024:: @ 8276024
-	msgbox SecretBase_RedCave1_Text_2756EF, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer4PostBattle:: @ 8276024
+	msgbox SecretBase_Text_Trainer4PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27602E:: @ 827602E
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer5:: @ 827602E
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_27607D
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer5PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_27609C
-	msgbox SecretBase_RedCave1_Text_274A64, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer5PostBattle
+	msgbox SecretBase_Text_Trainer5PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_276087
+	goto_if_eq SecretBase_EventScript_Trainer5DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_276087
-	msgbox SecretBase_RedCave1_Text_274AFA, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer5DeclineBattle
+	msgbox SecretBase_Text_Trainer5AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_27607D:: @ 827607D
-	msgbox SecretBase_RedCave1_Text_274BA2, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer5PreChampion:: @ 827607D
+	msgbox SecretBase_Text_Trainer5PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276087:: @ 8276087
+SecretBase_EventScript_Trainer5DeclineBattle:: @ 8276087
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_274B0B, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer5DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27609C:: @ 827609C
-	msgbox SecretBase_RedCave1_Text_274B6C, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer5PostBattle:: @ 827609C
+	msgbox SecretBase_Text_Trainer5PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_2760A6:: @ 82760A6
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer6:: @ 82760A6
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_2760F5
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer6PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_276114
-	msgbox SecretBase_RedCave1_Text_274DD2, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer6PostBattle
+	msgbox SecretBase_Text_Trainer6PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_2760FF
+	goto_if_eq SecretBase_EventScript_Trainer6DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_2760FF
-	msgbox SecretBase_RedCave1_Text_274E41, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer6DeclineBattle
+	msgbox SecretBase_Text_Trainer6AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_2760F5:: @ 82760F5
-	msgbox SecretBase_RedCave1_Text_274EF1, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer6PreChampion:: @ 82760F5
+	msgbox SecretBase_Text_Trainer6PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_2760FF:: @ 82760FF
+SecretBase_EventScript_Trainer6DeclineBattle:: @ 82760FF
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_274E5A, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer6DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276114:: @ 8276114
-	msgbox SecretBase_RedCave1_Text_274EB3, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer6PostBattle:: @ 8276114
+	msgbox SecretBase_Text_Trainer6PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27611E:: @ 827611E
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer7:: @ 827611E
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_27616D
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer7PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_27618C
-	msgbox SecretBase_RedCave1_Text_275114, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer7PostBattle
+	msgbox SecretBase_Text_Trainer7PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_276177
+	goto_if_eq SecretBase_EventScript_Trainer7DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_276177
-	msgbox SecretBase_RedCave1_Text_2751AF, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer7DeclineBattle
+	msgbox SecretBase_Text_Trainer7AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_27616D:: @ 827616D
-	msgbox SecretBase_RedCave1_Text_275226, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer7PreChampion:: @ 827616D
+	msgbox SecretBase_Text_Trainer7PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276177:: @ 8276177
+SecretBase_EventScript_Trainer7DeclineBattle:: @ 8276177
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_2751CA, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer7DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27618C:: @ 827618C
-	msgbox SecretBase_RedCave1_Text_2751EC, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer7PostBattle:: @ 827618C
+	msgbox SecretBase_Text_Trainer7PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276196:: @ 8276196
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer8:: @ 8276196
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_2761E5
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer8PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_276204
-	msgbox SecretBase_RedCave1_Text_275405, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer8PostBattle
+	msgbox SecretBase_Text_Trainer8PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_2761EF
+	goto_if_eq SecretBase_EventScript_Trainer8DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_2761EF
-	msgbox SecretBase_RedCave1_Text_2754B2, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer8DeclineBattle
+	msgbox SecretBase_Text_Trainer8AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_2761E5:: @ 82761E5
-	msgbox SecretBase_RedCave1_Text_275546, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer8PreChampion:: @ 82761E5
+	msgbox SecretBase_Text_Trainer8PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_2761EF:: @ 82761EF
+SecretBase_EventScript_Trainer8DeclineBattle:: @ 82761EF
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_2754D8, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer8DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276204:: @ 8276204
-	msgbox SecretBase_RedCave1_Text_27550C, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer8PostBattle:: @ 8276204
+	msgbox SecretBase_Text_Trainer8PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27620E:: @ 827620E
+@ VAR_RESULT is initially set by GetSecretBaseOwnerAndState
+SecretBase_EventScript_Trainer9:: @ 827620E
 	lock
 	faceplayer
-	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_RedCave1_EventScript_27625D
+	goto_if_unset FLAG_SYS_GAME_CLEAR, SecretBase_EventScript_Trainer9PreChampion
 	compare VAR_RESULT, 1
-	goto_if_eq SecretBase_RedCave1_EventScript_27627C
-	msgbox SecretBase_RedCave1_Text_2757B5, MSGBOX_YESNO
+	goto_if_eq SecretBase_EventScript_Trainer9PostBattle
+	msgbox SecretBase_Text_Trainer9PreBattle, MSGBOX_YESNO
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_276267
+	goto_if_eq SecretBase_EventScript_Trainer9DeclineBattle
 	setvar VAR_RESULT, 1
-	special sub_80EA30C
+	special SetBattledOwnerFromResult
 	call Common_EventScript_SaveGame
 	compare VAR_RESULT, 0
-	goto_if_eq SecretBase_RedCave1_EventScript_276267
-	msgbox SecretBase_RedCave1_Text_275884, MSGBOX_DEFAULT
-	goto SecretBase_RedCave1_EventScript_276286
+	goto_if_eq SecretBase_EventScript_Trainer9DeclineBattle
+	msgbox SecretBase_Text_Trainer9AcceptBattle, MSGBOX_DEFAULT
+	goto SecretBase_EventScript_BattleTrainer
 	end
 
-SecretBase_RedCave1_EventScript_27625D:: @ 827625D
-	msgbox SecretBase_RedCave1_Text_275944, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer9PreChampion:: @ 827625D
+	msgbox SecretBase_Text_Trainer9PreChampion, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276267:: @ 8276267
+SecretBase_EventScript_Trainer9DeclineBattle:: @ 8276267
 	special sub_80EB300
 	setvar VAR_RESULT, 0
-	special sub_80EA30C
-	msgbox SecretBase_RedCave1_Text_27589D, MSGBOX_DEFAULT
+	special SetBattledOwnerFromResult
+	msgbox SecretBase_Text_Trainer9DeclineBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_27627C:: @ 827627C
-	msgbox SecretBase_RedCave1_Text_275909, MSGBOX_DEFAULT
+SecretBase_EventScript_Trainer9PostBattle:: @ 827627C
+	msgbox SecretBase_Text_Trainer9PostBattle, MSGBOX_DEFAULT
 	release
 	end
 
-SecretBase_RedCave1_EventScript_276286:: @ 8276286
+SecretBase_EventScript_BattleTrainer:: @ 8276286
 	special PrepSecretBaseBattleFlags
 	setvar VAR_0x8004, SPECIAL_BATTLE_SECRET_BASE
 	setvar VAR_0x8005, 0
 	special DoSpecialTrainerBattle
 	waitstate
-	compare VAR_RESULT, 3
-	call_if_eq SecretBase_RedCave1_EventScript_2762BD
-	compare VAR_RESULT, 1
-	call_if_eq SecretBase_RedCave1_EventScript_2762C1
-	compare VAR_RESULT, 2
-	call_if_eq SecretBase_RedCave1_EventScript_2762C5
+	compare VAR_RESULT, B_OUTCOME_DREW
+	call_if_eq SecretBase_EventScript_2762BD
+	compare VAR_RESULT, B_OUTCOME_WON
+	call_if_eq SecretBase_EventScript_2762C1
+	compare VAR_RESULT, B_OUTCOME_LOST
+	call_if_eq SecretBase_EventScript_2762C5
 	special HealPlayerParty
 	release
 	end
 
-SecretBase_RedCave1_EventScript_2762BD:: @ 82762BD
+SecretBase_EventScript_2762BD:: @ 82762BD
 	special sub_80EB438
 	return
 
-SecretBase_RedCave1_EventScript_2762C1:: @ 82762C1
+SecretBase_EventScript_2762C1:: @ 82762C1
 	special sub_80EB368
 	return
 
-SecretBase_RedCave1_EventScript_2762C5:: @ 82762C5
+SecretBase_EventScript_2762C5:: @ 82762C5
 	special sub_80EB3D0
 	return
 
@@ -1047,37 +747,37 @@ SecretBase_EventScript_CushionInteract:: @ 82766A6
 	special sub_80EB2C8
 	end
 
-Text_2766AA: @ 82766AA
+SecretBase_Text_AllDecorationsWillBeReturned: @ 82766AA
 	.string "All decorations and furniture in your\n"
 	.string "SECRET BASE will be returned to your PC.\p"
 	.string "Is that okay?$"
 
-Text_WantToRegisterSecretBase: @ 8276707
+SecretBase_Text_WantToRegisterSecretBase: @ 8276707
 	.string "Do you want to register\n"
 	.string "{STR_VAR_1}'s SECRET BASE?$"
 
-Text_276731: @ 8276731
+SecretBase_Text_AlreadyRegisteredDelete: @ 8276731
 	.string "This data is already registered.\n"
 	.string "Would you like to delete it?$"
 
-Text_TooManyBasesDeleteSome: @ 827676F
+SecretBase_Text_TooManyBasesDeleteSome: @ 827676F
 	.string "Up to 10 locations can be registered.\p"
 	.string "Delete a location if you want to\n"
 	.string "register another location.$"
 
-Text_2767D1: @ 82767D1
+SecretBase_Text_RegistrationCompleted: @ 82767D1
 	.string "Registration completed.$"
 
-Text_2767E9: @ 82767E9
+SecretBase_Text_DataUnregistered: @ 82767E9
 	.string "Data has been unregistered.$"
 
-Text_SecretBaseBootUpPC: @ 8276805
+SecretBase_Text_BootUpPC: @ 8276805
 	.string "{PLAYER} booted up the PC.$"
 
-Text_SecretBasePCStartMenu: @ 827681A
+SecretBase_Text_WhatWouldYouLikeToDo: @ 827681A
 	.string "What would you like to do?$"
 
-Text_276835: @ 8276835
+SecretBase_Text_RegistryInfo: @ 8276835
 	.string "Once registered, a SECRET BASE will not\n"
 	.string "disappear unless the other TRAINER\l"
 	.string "moves it to a different location.\p"
@@ -1087,27 +787,27 @@ Text_276835: @ 8276835
 	.string "Up to ten SECRET BASE locations\n"
 	.string "may be registered.$"
 
-Text_27692B: @ 827692B
+SecretBase_Text_BattleTowerShield: @ 827692B
 	.string "A shield of {STR_VAR_2} that marks winning\n"
 	.string "{STR_VAR_1} times in a row at the BATTLE TOWER.$"
 
-Text_276974: @ 8276974
+SecretBase_Text_ToyTV: @ 8276974
 	.string "A realistic toy TV. It could be easily\n"
 	.string "mistaken for the real thing.$"
 
-Text_2769B8: @ 82769B8
+SecretBase_Text_SeedotTV: @ 82769B8
 	.string "A toy TV shaped like a SEEDOT.\n"
 	.string "It looks ready to roll away on its own…$"
 
-Text_2769FF: @ 82769FF
+SecretBase_Text_SkittyTV: @ 82769FF
 	.string "A toy TV shaped like a SKITTY.\n"
 	.string "It looks ready to stroll away…$"
 
-Text_276A3D: @ 8276A3D
+SecretBase_Text_WouldYouLikeToMoveBases: @ 8276A3D
 	.string "You may only make one SECRET BASE.\p"
 	.string "Would you like to move from the SECRET\n"
 	.string "BASE near {STR_VAR_1}?$"
 
-Text_276A95: @ 8276A95
+SecretBase_Text_MovingCompletedUseSecretPower: @ 8276A95
 	.string "Moving completed.\p"
 	.string "Would you like to use the SECRET POWER?$"
diff --git a/data/scripts/shared_secret_base.inc b/data/scripts/shared_secret_base.inc
new file mode 100644
index 000000000..933835a73
--- /dev/null
+++ b/data/scripts/shared_secret_base.inc
@@ -0,0 +1,224 @@
+SecretBase_MapScripts::
+    map_script MAP_SCRIPT_ON_WARP_INTO_MAP_TABLE, SecretBase_MapScript2_OnWarp
+    map_script MAP_SCRIPT_ON_TRANSITION, SecretBase_MapScript1_OnTransition
+    map_script MAP_SCRIPT_ON_FRAME_TABLE, SecretBase_MapScript2_OnFrame
+    map_script MAP_SCRIPT_ON_RESUME, SecretBase_MapScript1_OnResume
+    .byte 0
+
+SecretBase_MapScript2_OnWarp: @ 823B498
+    map_script_2 VAR_SECRET_BASE_INITIALIZED, 0, SecretBase_EventScript_InitDecorations
+    .2byte 0
+
+SecretBase_MapScript1_OnTransition: @ 823B4A2
+    call SecretBase_EventScript_SetDecorationFlags
+    special SetSecretBaseOwnerGfxId
+    special InitSecretBaseVars
+    end
+
+SecretBase_MapScript2_OnFrame: @ 823B4AE
+    map_script_2 VAR_INIT_SECRET_BASE, 0, SecretBase_EventScript_FirstEntrance
+    .2byte 0
+
+SecretBase_MapScript1_OnResume: @ 823B4B8
+    setstepcallback 6
+    end
+
+SecretBase_EventScript_PC:: @ 823B4BB
+    lockall
+    playse SE_PC_LOGIN
+    message SecretBase_Text_BootUpPC
+    dofieldeffect FLDEFF_PCTURN_ON
+    waitstate
+    waitmessage
+    waitbuttonpress
+    playse SE_SELECT
+    goto SecretBase_EventScript_PCShowMainMenu
+    end
+
+SecretBase_EventScript_PCShowMainMenu:: @ 823B4D3
+    message SecretBase_Text_WhatWouldYouLikeToDo
+    waitmessage
+    goto_if_set FLAG_SECRET_BASE_REGISTRY_ENABLED, SecretBase_EventScript_PCMainMenuWithRegister
+    goto SecretBase_EventScript_PCMainMenuWithoutRegister
+    end
+
+SecretBase_EventScript_PCCancel:: @ 823B4E8
+    lockall
+    goto SecretBase_EventScript_PCShowMainMenu
+    end
+
+SecretBase_EventScript_PCMainMenuWithRegister:: @ 823B4EF
+    multichoice 0, 0, MULTI_BASE_PC_WITH_REGISTRY, 0
+    switch VAR_RESULT
+    case 0, SecretBase_EventScript_PCDecorationMenu
+    case 1, SecretBase_EventScript_PCPackUp
+    case 2, SecretBase_EventScript_PCRegistryMenu
+    case 3, SecretBase_EventScript_PCTurnOff
+    case MULTI_B_PRESSED, SecretBase_EventScript_PCTurnOff
+    end
+
+SecretBase_EventScript_PCMainMenuWithoutRegister:: @ 823B531
+    multichoice 0, 0, MULTI_BASE_PC_NO_REGISTRY, 0
+    switch VAR_RESULT
+    case 0, SecretBase_EventScript_PCDecorationMenu
+    case 1, SecretBase_EventScript_PCPackUp
+    case 2, SecretBase_EventScript_PCTurnOff
+    case MULTI_B_PRESSED, SecretBase_EventScript_PCTurnOff
+    end
+
+SecretBase_EventScript_PCPackUp:: @ 823B568
+    msgbox SecretBase_Text_AllDecorationsWillBeReturned, MSGBOX_YESNO
+    compare VAR_RESULT, 0
+    goto_if_eq SecretBase_EventScript_PCShowMainMenu
+    closemessage
+    special MoveOutOfSecretBase
+    releaseall
+    end
+
+SecretBase_EventScript_PCDecorationMenu:: @ 823B581
+    special ShowSecretBaseDecorationMenu
+    end
+
+SecretBase_EventScript_PCRegistryMenu:: @ 823B585
+    special ShowSecretBaseRegistryMenu
+    end
+
+SecretBase_EventScript_RecordMixingPC:: @ 823B589
+    lockall
+    message SecretBase_Text_BootUpPC
+    playse SE_PC_LOGIN
+    dofieldeffect FLDEFF_PCTURN_ON
+    waitstate
+    waitmessage
+    waitbuttonpress
+    playse SE_SELECT
+    goto SecretBase_EventScript_PCRegisterMenu
+    end
+
+SecretBase_EventScript_PCRegisterMenu:: @ 823B5A1
+    message SecretBase_Text_WhatWouldYouLikeToDo
+    waitmessage
+    multichoice 0, 0, MULTI_REGISTER_MENU, 0
+    switch VAR_RESULT
+    case 0, SecretBase_EventScript_PCRegister
+    case 1, SecretBase_EventScript_PCRegistryMenu
+    case 2, SecretBase_EventScript_PCRegistryInfo
+    case 3, SecretBase_EventScript_PCTurnOff
+    case MULTI_B_PRESSED, SecretBase_EventScript_PCTurnOff
+    end
+
+SecretBase_EventScript_ShowRegisterMenu:: @ 823B5E9
+    lockall
+    goto SecretBase_EventScript_PCRegisterMenu
+    end
+
+SecretBase_EventScript_PCRegister:: @ 823B5F0
+    special GetCurSecretBaseRegistrationValidity
+    compare VAR_RESULT, 1
+    goto_if_eq SecretBase_EventScript_AlreadyRegistered
+    compare VAR_RESULT, 2
+    goto_if_eq SecretBase_EventScript_CantRegisterTooManyBases
+    special CopyCurSecretBaseOwnerName_StrVar1
+    msgbox SecretBase_Text_WantToRegisterSecretBase, MSGBOX_YESNO
+    compare VAR_RESULT, 0
+    goto_if_eq SecretBase_EventScript_PCRegisterMenu
+    msgbox SecretBase_Text_RegistrationCompleted, MSGBOX_SIGN
+    special ToggleCurSecretBaseRegistry
+    special DoSecretBasePCTurnOffEffect
+    releaseall
+    end
+
+SecretBase_EventScript_AlreadyRegistered:: @ 823B62F
+    msgbox SecretBase_Text_AlreadyRegisteredDelete, MSGBOX_YESNO
+    compare VAR_RESULT, 0
+    goto_if_eq SecretBase_EventScript_PCRegisterMenu
+    msgbox SecretBase_Text_DataUnregistered, MSGBOX_SIGN
+    special ToggleCurSecretBaseRegistry
+    special DoSecretBasePCTurnOffEffect
+    releaseall
+    end
+
+SecretBase_EventScript_CantRegisterTooManyBases:: @ 823B652
+    msgbox SecretBase_Text_TooManyBasesDeleteSome, MSGBOX_SIGN
+    special DoSecretBasePCTurnOffEffect
+    closemessage
+    releaseall
+    end
+
+SecretBase_EventScript_PCRegistryInfo:: @ 823B660
+    msgbox SecretBase_Text_RegistryInfo, MSGBOX_DEFAULT
+    goto SecretBase_EventScript_PCRegisterMenu
+    end
+
+SecretBase_EventScript_PCTurnOff:: @ 823B66E
+    special DoSecretBasePCTurnOffEffect
+    closemessage
+    releaseall
+    end
+
+@ Unused
+SecretBase_EventScript_23B674:: @ 823B674
+    special SetSecretBaseSecretsTvFlags_Poster
+    end
+
+@ Unused
+SecretBase_EventScript_23B678:: @ 823B678
+    special SetSecretBaseSecretsTvFlags_MiscFurnature
+    end
+
+@ Unused
+SecretBase_EventScript_23B67C:: @ 823B67C
+    special SetSecretBaseSecretsTvFlags_LargeDecorationSpot
+    end
+
+@ Unused
+SecretBase_EventScript_23B680:: @ 823B680
+    special SetSecretBaseSecretsTvFlags_SmallDecorationSpot
+    end
+
+SecretBase_EventScript_SandOrnament:: @ 823B684
+    special SetSecretBaseSecretsTvFlags_SandOrnament
+    dofieldeffect FLDEFF_SAND_PILLAR
+    waitstate
+    end
+
+SecretBase_EventScript_ShieldOrToyTV:: @ 823B68C
+    special GetShieldToyTVDecorationInfo
+    compare VAR_RESULT, 0
+    goto_if_eq SecretBase_EventScript_BattleTowerShield
+    compare VAR_RESULT, 1
+    goto_if_eq SecretBase_EventScript_ToyTV
+    compare VAR_RESULT, 2
+    goto_if_eq SecretBase_EventScript_SeedotTV
+    compare VAR_RESULT, 3
+    goto_if_eq SecretBase_EventScript_SkittyTV
+    end
+
+SecretBase_EventScript_BattleTowerShield:: @ 823B6BC
+    msgbox SecretBase_Text_BattleTowerShield, MSGBOX_SIGN
+    end
+
+SecretBase_EventScript_ToyTV:: @ 823B6C5
+    msgbox SecretBase_Text_ToyTV, MSGBOX_SIGN
+    end
+
+SecretBase_EventScript_SeedotTV:: @ 823B6CE
+    msgbox SecretBase_Text_SeedotTV, MSGBOX_SIGN
+    end
+
+SecretBase_EventScript_SkittyTV:: @ 823B6D7
+    msgbox SecretBase_Text_SkittyTV, MSGBOX_SIGN
+    end
+
+SecretBase_Text_SmallIndentInWall:: @ 823B6E0
+    .string "There's a small indent in the wall.$"
+
+SecretBase_Text_IndentUseSecretPower:: @ 823B704
+    .string "There's a small indent in the wall.\p"
+    .string "Use the SECRET POWER?$"
+
+SecretBase_Text_DiscoveredSmallCavern:: @ 823B73E
+    .string "Discovered a small cavern!$"
+
+SecretBase_Text_WantToMakeYourSecretBaseHere: @ 823B759
+    .string "Want to make your SECRET BASE here?$"
diff --git a/data/scripts/tv.inc b/data/scripts/tv.inc
index 4a276ffc0..ed279d478 100644
--- a/data/scripts/tv.inc
+++ b/data/scripts/tv.inc
@@ -1,6 +1,6 @@
 EventScript_TV:: @ 827EE0B
 	lockall
-	incrementgamestat 44
+	incrementgamestat GAME_STAT_WATCHED_TV
 	special ResetTVShowState
 	specialvar VAR_RESULT, CheckForBigMovieOrEmergencyNewsOnTV
 	compare VAR_RESULT, 2
@@ -30,7 +30,7 @@ EventScript_27EE54:: @ 827EE54
 
 EventScript_27EE8A:: @ 827EE8A
 	special GetMomOrDadStringForTVMessage
-	msgbox gUnknown_08272BCF, MSGBOX_DEFAULT
+	msgbox gText_MomOrDadMightLikeThisProgram, MSGBOX_DEFAULT
 	special TurnOffTVScreen
 	releaseall
 	end
@@ -69,7 +69,7 @@ EventScript_27EED0:: @ 827EED0
 
 EventScript_27EED8:: @ 827EED8
 	special GetMomOrDadStringForTVMessage
-	msgbox gUnknown_08272BCF, MSGBOX_DEFAULT
+	msgbox gText_MomOrDadMightLikeThisProgram, MSGBOX_DEFAULT
 	goto EventScript_27EED0
 	end