Merge pull request #270 from GriffinRichards/doc-oneisland

Document One Island scripts

3 files changed, 285 insertions, 278 deletions

diff --git a/data/maps/OneIsland_PokemonCenter_1F/map.json b/data/maps/OneIsland_PokemonCenter_1F/map.json
index 08df3284c..8ffa34c57 100644
--- a/data/maps/OneIsland_PokemonCenter_1F/map.json
+++ b/data/maps/OneIsland_PokemonCenter_1F/map.json
@@ -25,7 +25,7 @@
       "movement_range_y": 1,
       "trainer_type": 0,
       "trainer_sight_or_berry_tree_id": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_170E94",
+      "script": "OneIsland_PokemonCenter_1F_EventScript_Nurse",
       "flag": "0"
     },
     {
@@ -38,7 +38,7 @@
       "movement_range_y": 1,
       "trainer_type": 0,
       "trainer_sight_or_berry_tree_id": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_170E9D",
+      "script": "OneIsland_PokemonCenter_1F_EventScript_Bill",
       "flag": "FLAG_HIDE_ONE_ISLAND_POKECENTER_BILL"
     },
     {
@@ -51,7 +51,7 @@
       "movement_range_y": 1,
       "trainer_type": 0,
       "trainer_sight_or_berry_tree_id": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_170EC5",
+      "script": "OneIsland_PokemonCenter_1F_EventScript_Celio",
       "flag": "FLAG_HIDE_ONE_ISLAND_POKECENTER_CELIO"
     },
     {
@@ -64,7 +64,7 @@
       "movement_range_y": 1,
       "trainer_type": 0,
       "trainer_sight_or_berry_tree_id": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171148",
+      "script": "OneIsland_PokemonCenter_1F_EventScript_LittleBoy",
       "flag": "0"
     },
     {
@@ -77,7 +77,7 @@
       "movement_range_y": 1,
       "trainer_type": 0,
       "trainer_sight_or_berry_tree_id": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171151",
+      "script": "OneIsland_PokemonCenter_1F_EventScript_Hiker",
       "flag": "0"
     },
     {
@@ -90,7 +90,7 @@
       "movement_range_y": 1,
       "trainer_type": 0,
       "trainer_sight_or_berry_tree_id": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_17115A",
+      "script": "OneIsland_PokemonCenter_1F_EventScript_BattleGirl",
       "flag": "0"
     }
   ],
@@ -118,7 +118,7 @@
       "elevation": 3,
       "var": "VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F",
       "var_value": 2,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_1711AA"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerTop"
     },
     {
       "type": "trigger",
@@ -127,7 +127,7 @@
       "elevation": 3,
       "var": "VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F",
       "var_value": 2,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_1711B6"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerMidTop"
     },
     {
       "type": "trigger",
@@ -136,7 +136,7 @@
       "elevation": 3,
       "var": "VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F",
       "var_value": 2,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_1711C2"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerMidBottom"
     },
     {
       "type": "trigger",
@@ -145,7 +145,7 @@
       "elevation": 3,
       "var": "VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F",
       "var_value": 2,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_1711CE"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerBottom"
     }
   ],
   "bg_events": [
@@ -154,63 +154,63 @@
       "x": 12,
       "y": 2,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 12,
       "y": 3,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 12,
       "y": 4,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 12,
       "y": 5,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 13,
       "y": 5,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 15,
       "y": 5,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 14,
       "y": 5,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 16,
       "y": 5,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     },
     {
       "type": "bg_event_type_0",
       "x": 17,
       "y": 5,
       "elevation": 0,
-      "script": "OneIsland_PokemonCenter_1F_EventScript_171179"
+      "script": "OneIsland_PokemonCenter_1F_EventScript_NetworkMachine"
     }
   ]
 }
diff --git a/data/maps/OneIsland_PokemonCenter_1F/scripts.inc b/data/maps/OneIsland_PokemonCenter_1F/scripts.inc
index 05f00c76b..53d0aebcd 100644
--- a/data/maps/OneIsland_PokemonCenter_1F/scripts.inc
+++ b/data/maps/OneIsland_PokemonCenter_1F/scripts.inc
@@ -1,3 +1,6 @@
+.equ LOCALID_BILL,  2
+.equ LOCALID_CELIO, 3
+
 OneIsland_PokemonCenter_1F_MapScripts:: @ 8170BF8
 	map_script MAP_SCRIPT_ON_TRANSITION, OneIsland_PokemonCenter_1F_OnTransition
 	map_script MAP_SCRIPT_ON_RESUME, CableClub_OnResume
@@ -7,147 +10,147 @@ OneIsland_PokemonCenter_1F_MapScripts:: @ 8170BF8
 
 OneIsland_PokemonCenter_1F_OnLoad:: @ 8170C0D
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
-	call_if_ge EventScript_170C22
-	call_if_set FLAG_SYS_CAN_LINK_WITH_RS, EventScript_170C36
+	call_if_ge OneIsland_PokemonCenter_1F_EventScript_SetRubyMetatile
+	call_if_set FLAG_SYS_CAN_LINK_WITH_RS, OneIsland_PokemonCenter_1F_EventScript_SetNetworkMachineOn
 	end
 
-EventScript_170C22:: @ 8170C22
-	setmetatile 13, 4, 861, 1
+OneIsland_PokemonCenter_1F_EventScript_SetRubyMetatile:: @ 8170C22
+	setmetatile 13, 4, METATILE_PokemonCenter_NetworkMachine_Ruby, 1
 	return
 
-EventScript_170C2C:: @ 8170C2C
-	setmetatile 16, 4, 863, 1
+OneIsland_PokemonCenter_1F_EventScript_SetSapphireMetatile:: @ 8170C2C
+	setmetatile 16, 4, METATILE_PokemonCenter_NetworkMachine_Sapphire, 1
 	return
 
-EventScript_170C36:: @ 8170C36
-	call EventScript_170C2C
-	setmetatile 14, 4, 858, 1
-	setmetatile 15, 4, 859, 1
+OneIsland_PokemonCenter_1F_EventScript_SetNetworkMachineOn:: @ 8170C36
+	call OneIsland_PokemonCenter_1F_EventScript_SetSapphireMetatile
+	setmetatile 14, 4, METATILE_PokemonCenter_NetworkMachine_ScreenLeft_On, 1
+	setmetatile 15, 4, METATILE_PokemonCenter_NetworkMachine_ScreenRight_On, 1
 	return
 
 OneIsland_PokemonCenter_1F_OnTransition:: @ 8170C4E
 	setrespawn SPAWN_ONE_ISLAND
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 6
-	call_if_eq EventScript_170C73
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_SetCelioQuestDone
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 0
-	call_if_eq EventScript_170C79
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_SetBillCelioFirstMeetingPos
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 2
-	call_if_eq EventScript_170C90
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_SetBillCelioReadyToLeavePos
 	end
 
-EventScript_170C73:: @ 8170C73
+OneIsland_PokemonCenter_1F_EventScript_SetCelioQuestDone:: @ 8170C73
 	setvar VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 7
 	return
 
-EventScript_170C79:: @ 8170C79
-	setobjectxyperm 2, 9, 8
-	setobjectmovementtype 2, 7
-	setobjectxyperm 3, 15, 6
-	setobjectmovementtype 3, 7
+OneIsland_PokemonCenter_1F_EventScript_SetBillCelioFirstMeetingPos:: @ 8170C79
+	setobjectxyperm LOCALID_BILL, 9, 8
+	setobjectmovementtype LOCALID_BILL, MOVEMENT_TYPE_FACE_UP
+	setobjectxyperm LOCALID_CELIO, 15, 6
+	setobjectmovementtype LOCALID_CELIO, MOVEMENT_TYPE_FACE_UP
 	return
 
-EventScript_170C90:: @ 8170C90
-	setobjectxyperm 2, 14, 7
-	setobjectmovementtype 2, 9
-	setobjectxyperm 3, 14, 8
-	setobjectmovementtype 3, 9
+OneIsland_PokemonCenter_1F_EventScript_SetBillCelioReadyToLeavePos:: @ 8170C90
+	setobjectxyperm LOCALID_BILL, 14, 7
+	setobjectmovementtype LOCALID_BILL, MOVEMENT_TYPE_FACE_LEFT
+	setobjectxyperm LOCALID_CELIO, 14, 8
+	setobjectmovementtype LOCALID_CELIO, MOVEMENT_TYPE_FACE_LEFT
 	return
 
 OneIsland_PokemonCenter_1F_OnFrame:: @ 8170CA7
-	map_script_2 VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 0, EventScript_170CB1
+	map_script_2 VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 0, OneIsland_PokemonCenter_1F_EventScript_MeetCelioScene
 	.2byte 0
 
-EventScript_170CB1:: @ 8170CB1
+OneIsland_PokemonCenter_1F_EventScript_MeetCelioScene:: @ 8170CB1
 	lockall
 	textcolor 0
-	applymovement OBJ_EVENT_ID_PLAYER, Movement_170E7D
-	applymovement 2, Movement_170E86
+	applymovement OBJ_EVENT_ID_PLAYER, OneIsland_PokemonCenter_1F_Movement_PlayerWalkToCelio
+	applymovement LOCALID_BILL, OneIsland_PokemonCenter_1F_Movement_BillWalkToCelio
 	waitmovement 0
-	msgbox gUnknown_81A0CDE
+	msgbox OneIsland_PokemonCenter_1F_Text_BillHeyThereCelio
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestRight
 	waitmovement 0
 	playse SE_PIN
-	applymovement 3, Movement_ExclamationMark
+	applymovement LOCALID_CELIO, Movement_ExclamationMark
 	waitmovement 0
-	applymovement 3, Movement_WalkInPlaceFastestLeft
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestLeft
 	waitmovement 0
-	applymovement 3, Movement_Delay48
+	applymovement LOCALID_CELIO, Movement_Delay48
 	waitmovement 0
-	msgbox gUnknown_81A0CF7
-	msgbox gUnknown_81A0D27
-	applymovement 2, Movement_WalkInPlaceFastestDown
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioCantBelieveYouCameOut
+	msgbox OneIsland_PokemonCenter_1F_Text_BillHowsYourResearchComing
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestDown
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestUp
 	waitmovement 0
-	msgbox gUnknown_81A0D72
-	applymovement 2, Movement_WalkInPlaceFastestRight
+	msgbox OneIsland_PokemonCenter_1F_Text_ThisIsMyBuddyCelio
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestRight
 	waitmovement 0
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestRight
 	waitmovement 0
-	call_if_set FLAG_SYS_GAME_CLEAR, EventScript_170E34
-	call_if_unset FLAG_SYS_GAME_CLEAR, EventScript_170E3D
-	applymovement 3, Movement_WalkInPlaceFastestDown
+	call_if_set FLAG_SYS_GAME_CLEAR, OneIsland_PokemonCenter_1F_EventScript_IntroducePlayerChamp
+	call_if_unset FLAG_SYS_GAME_CLEAR, OneIsland_PokemonCenter_1F_EventScript_IntroducePlayerNotChamp
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestDown
 	waitmovement 0
-	msgbox gUnknown_81A0E17
-	msgbox gUnknown_81A0E90
-	applymovement 3, Movement_WalkInPlaceFastestLeft
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioThatsReallyImpressive
+	msgbox OneIsland_PokemonCenter_1F_Text_BillBringMeUpToSpeed
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestLeft
 	waitmovement 0
-	msgbox gUnknown_81A0ECC
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioPCsCantLinkWithYours
 	closemessage
-	applymovement 2, Movement_WalkInPlaceFastestUp
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestUp
 	waitmovement 0
-	msgbox gUnknown_81A0F40
-	applymovement 2, Movement_WalkInPlaceFastestDown
+	msgbox OneIsland_PokemonCenter_1F_Text_BillLetMeHelpYou
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestDown
 	waitmovement 0
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestUp
 	waitmovement 0
-	msgbox gUnknown_81A0FB1
-	msgreceiveditem gUnknown_81A10EE, ITEM_METEORITE, 1, MUS_FAN5
+	msgbox OneIsland_PokemonCenter_1F_Text_CanYouDeliverThisMeteoritePlayer
+	msgreceiveditem OneIsland_PokemonCenter_1F_Text_AcceptedMeteoriteFromBill, ITEM_METEORITE, 1, MUS_FAN5
 	additem ITEM_METEORITE
-	applymovement 3, Movement_WalkInPlaceFastestDown
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestDown
 	waitmovement 0
-	msgbox gUnknown_81A1113
-	giveitem_msg gUnknown_81A231B, ITEM_TRI_PASS, 1, MUS_FAN5
-	msgbox gUnknown_81A1150
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioPleaseTakeThis
+	giveitem_msg OneIsland_PokemonCenter_1F_Text_ObtainedTriPass, ITEM_TRI_PASS, 1, MUS_FAN5
+	msgbox OneIsland_PokemonCenter_1F_Text_PassLetsYouTravelBetweenIslands
 	compare VAR_MAP_SCENE_PALLET_TOWN_GARYS_HOUSE, 2
-	call_if_ge EventScript_170E46
+	call_if_ge OneIsland_PokemonCenter_1F_EventScript_ReceiveTownMapPage
 	compare VAR_MAP_SCENE_PALLET_TOWN_GARYS_HOUSE, 2
-	call_if_lt EventScript_170E58
+	call_if_lt OneIsland_PokemonCenter_1F_EventScript_ReceiveTownMap
 	setflag FLAG_SYS_SEVII_MAP_123
-	msgbox gUnknown_81A1230
+	msgbox OneIsland_PokemonCenter_1F_Text_BillCatchYouLater
 	closemessage
-	applymovement 2, Movement_WalkInPlaceFastestUp
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestUp
 	waitmovement 0
-	applymovement 3, Movement_WalkInPlaceFastestUp
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestUp
 	waitmovement 0
 	setflag FLAG_SYS_PC_STORAGE_DISABLED
 	setvar VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 1
 	releaseall
 	end
 
-EventScript_170E34:: @ 8170E34
-	msgbox gUnknown_81A0DE8
+OneIsland_PokemonCenter_1F_EventScript_IntroducePlayerChamp:: @ 8170E34
+	msgbox OneIsland_PokemonCenter_1F_Text_PlayerIsReigningPokemonChamp
 	return
 
-EventScript_170E3D:: @ 8170E3D
-	msgbox gUnknown_81A0DAC
+OneIsland_PokemonCenter_1F_EventScript_IntroducePlayerNotChamp:: @ 8170E3D
+	msgbox OneIsland_PokemonCenter_1F_Text_PlayerIsRisingPokemonChamp
 	return
 
-EventScript_170E46:: @ 8170E46
+OneIsland_PokemonCenter_1F_EventScript_ReceiveTownMapPage:: @ 8170E46
 	textcolor 3
 	playfanfare MUS_FAN5
-	message Text_1A11EC
+	message OneIsland_PokemonCenter_1F_Text_ReceivedExtraPageForTownMap
 	waitmessage
 	waitfanfare
 	call EventScript_1A6675
 	return
 
-EventScript_170E58:: @ 8170E58
+OneIsland_PokemonCenter_1F_EventScript_ReceiveTownMap:: @ 8170E58
 	setflag FLAG_HIDE_TOWN_MAP
 	setvar VAR_MAP_SCENE_PALLET_TOWN_GARYS_HOUSE, 2
-	giveitem_msg gUnknown_81A1218, ITEM_TOWN_MAP, 1, MUS_FAN5
+	giveitem_msg OneIsland_PokemonCenter_1F_Text_ReceivedTownMap, ITEM_TOWN_MAP, 1, MUS_FAN5
 	return
 
-Movement_170E7D:: @ 8170E7D
+OneIsland_PokemonCenter_1F_Movement_PlayerWalkToCelio:: @ 8170E7D
 	walk_up
 	walk_up
 	walk_right
@@ -158,7 +161,7 @@ Movement_170E7D:: @ 8170E7D
 	walk_in_place_fastest_up
 	step_end
 
-Movement_170E86:: @ 8170E86
+OneIsland_PokemonCenter_1F_Movement_BillWalkToCelio:: @ 8170E86
 	walk_up
 	walk_right
 	walk_right
@@ -169,121 +172,123 @@ Movement_170E86:: @ 8170E86
 	walk_in_place_fastest_right
 	step_end
 
+@ Unused
 Movement_170E8F:: @ 8170E8F
 	walk_up
 	step_end
 
+@ Unused
 Movement_170E91:: @ 8170E91
 	walk_left
 	walk_in_place_fastest_right
 	step_end
 
-OneIsland_PokemonCenter_1F_EventScript_170E94:: @ 8170E94
+OneIsland_PokemonCenter_1F_EventScript_Nurse:: @ 8170E94
 	lock
 	faceplayer
 	call EventScript_PkmnCenterNurse
 	release
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_170E9D:: @ 8170E9D
+OneIsland_PokemonCenter_1F_EventScript_Bill:: @ 8170E9D
 	lock
-	goto_if_set FLAG_SEVII_DETOUR_FINISHED, EventScript_170EB1
-	msgbox gUnknown_81A1266
+	goto_if_set FLAG_SEVII_DETOUR_FINISHED, OneIsland_PokemonCenter_1F_EventScript_BillGoTakeStroll
+	msgbox OneIsland_PokemonCenter_1F_Text_HmmHowAboutLikeThis
 	release
 	end
 
-EventScript_170EB1:: @ 8170EB1
-	applymovement 2, Movement_FacePlayer
+OneIsland_PokemonCenter_1F_EventScript_BillGoTakeStroll:: @ 8170EB1
+	applymovement LOCALID_BILL, Movement_FacePlayer
 	waitmovement 0
-	msgbox gUnknown_81A128C
+	msgbox OneIsland_PokemonCenter_1F_Text_GotPCWorkingStrollAWhileMore
 	release
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_170EC5:: @ 8170EC5
+OneIsland_PokemonCenter_1F_EventScript_Celio:: @ 8170EC5
 	lock
 	faceplayer
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 7
-	goto_if_eq EventScript_170F35
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_CelioGiveBillFact
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 6
-	goto_if_eq EventScript_170F9B
-	goto_if_set FLAG_RECOVERED_SAPPHIRE, EventScript_170FA5
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_CelioJustGivenSapphire
+	goto_if_set FLAG_RECOVERED_SAPPHIRE, OneIsland_PokemonCenter_1F_EventScript_GiveCelioSapphire
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
-	goto_if_eq EventScript_17103A
-	goto_if_set FLAG_GOT_RUBY, EventScript_171044
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_ExplainRainbowPass
+	goto_if_set FLAG_GOT_RUBY, OneIsland_PokemonCenter_1F_EventScript_GiveCelioRuby
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 4
-	goto_if_eq EventScript_1710F2
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_CelioWaitingForRuby
 	specialvar VAR_RESULT, IsNationalPokedexEnabled
 	compare VAR_RESULT, TRUE
-	goto_if_eq EventScript_1710FC
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_CelioRequestRuby
 	compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 3
-	goto_if_eq EventScript_171134
-	msgbox gUnknown_81A1321
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_CelioPlayerMissingNationalDex
+	msgbox OneIsland_PokemonCenter_1F_Text_SorryForBeingPoorHost
 	closemessage
-	applymovement 3, Movement_FaceOriginalDirection
+	applymovement LOCALID_CELIO, Movement_FaceOriginalDirection
 	waitmovement 0
 	release
 	end
 
-EventScript_170F35:: @ 8170F35
-	msgbox gUnknown_81A1EBD
+OneIsland_PokemonCenter_1F_EventScript_CelioGiveBillFact:: @ 8170F35
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioHearingRumorsAboutYou
 	random 3
 	compare VAR_RESULT, 0
-	goto_if_eq EventScript_170F6D
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_BillFact1
 	compare VAR_RESULT, 1
-	goto_if_eq EventScript_170F84
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_BillFact2
 	famechecker FAMECHECKER_BILL, 5
-	msgbox gUnknown_81A2076
+	msgbox OneIsland_PokemonCenter_1F_Text_BillCantStomachMilk
 	release
 	end
 
-EventScript_170F6D:: @ 8170F6D
+OneIsland_PokemonCenter_1F_EventScript_BillFact1:: @ 8170F6D
 	famechecker FAMECHECKER_BILL, 3
-	msgbox gUnknown_81A1EF3
+	msgbox OneIsland_PokemonCenter_1F_Text_BillsFirstMonWasAbra
 	release
 	end
 
-EventScript_170F84:: @ 8170F84
+OneIsland_PokemonCenter_1F_EventScript_BillFact2:: @ 8170F84
 	famechecker FAMECHECKER_BILL, 4
-	msgbox gUnknown_81A1F7C
+	msgbox OneIsland_PokemonCenter_1F_Text_BillsHometownInGoldenrod
 	release
 	end
 
-EventScript_170F9B:: @ 8170F9B
-	msgbox gUnknown_81A1E39
+OneIsland_PokemonCenter_1F_EventScript_CelioJustGivenSapphire:: @ 8170F9B
+	msgbox OneIsland_PokemonCenter_1F_Text_WishYouBestOfLuck
 	release
 	end
 
-EventScript_170FA5:: @ 8170FA5
+OneIsland_PokemonCenter_1F_EventScript_GiveCelioSapphire:: @ 8170FA5
 	textcolor 3
 	playfanfare MUS_ME_WAZA
-	message Text_1A1C2D
+	message OneIsland_PokemonCenter_1F_Text_HandedSapphireToCelio
 	waitmessage
 	waitfanfare
 	call EventScript_1A6675
 	removeitem ITEM_SAPPHIRE, 1
-	msgbox gUnknown_81A1C4E
+	msgbox OneIsland_PokemonCenter_1F_Text_ThankYouGiveMeTime
 	closemessage
-	applymovement 3, Movement_171142
+	applymovement LOCALID_CELIO, OneIsland_PokemonCenter_1F_Movement_CelioPutGemInMachine
 	waitmovement 0
 	playse SE_TK_KASYA
-	call EventScript_170C2C
+	call OneIsland_PokemonCenter_1F_EventScript_SetSapphireMetatile
 	special DrawWholeMapView
-	msgbox gUnknown_81A1D45
+	msgbox OneIsland_PokemonCenter_1F_Text_OkayThisIsGood
 	closemessage
 	delay 60
-	applymovement 3, Movement_17113E
+	applymovement LOCALID_CELIO, OneIsland_PokemonCenter_1F_Movement_CelioCheckMachine
 	waitmovement 0
 	delay 30
-	applymovement 3, Movement_17113E
+	applymovement LOCALID_CELIO, OneIsland_PokemonCenter_1F_Movement_CelioCheckMachine
 	waitmovement 0
 	delay 40
 	playse SE_PC_ON
-	call EventScript_170C36
+	call OneIsland_PokemonCenter_1F_EventScript_SetNetworkMachineOn
 	special DrawWholeMapView
-	msgbox gUnknown_81A1D59
-	applymovement 3, Movement_FacePlayer
+	msgbox OneIsland_PokemonCenter_1F_Text_LinkedUpWithLanette
+	applymovement LOCALID_CELIO, Movement_FacePlayer
 	waitmovement 0
-	msgbox gUnknown_81A1D7D
+	msgbox OneIsland_PokemonCenter_1F_Text_ManagedToLinkWithHoennThankYou
 	special sub_810B82C
 	setflag FLAG_SYS_CAN_LINK_WITH_RS
 	setflag FLAG_HIDE_CERULEAN_CAVE_GUARD
@@ -293,43 +298,43 @@ EventScript_170FA5:: @ 8170FA5
 	release
 	end
 
-EventScript_17103A:: @ 817103A
-	msgbox gUnknown_81A1BB7
+OneIsland_PokemonCenter_1F_EventScript_ExplainRainbowPass:: @ 817103A
+	msgbox OneIsland_PokemonCenter_1F_Text_PassLetYouGetToAllIslands
 	release
 	end
 
-EventScript_171044:: @ 8171044
-	msgbox gUnknown_81A197E
+OneIsland_PokemonCenter_1F_EventScript_GiveCelioRuby:: @ 8171044
+	msgbox OneIsland_PokemonCenter_1F_Text_OhThats
 	textcolor 3
 	playfanfare MUS_ME_WAZA
-	message Text_1A198D
+	message OneIsland_PokemonCenter_1F_Text_HandedRubyToCelio
 	waitmessage
 	waitfanfare
 	call EventScript_1A6675
 	closemessage
-	applymovement 3, Movement_171142
+	applymovement LOCALID_CELIO, OneIsland_PokemonCenter_1F_Movement_CelioPutGemInMachine
 	waitmovement 0
 	playse SE_TK_KASYA
-	call EventScript_170C22
+	call OneIsland_PokemonCenter_1F_EventScript_SetRubyMetatile
 	special DrawWholeMapView
 	delay 30
-	applymovement 3, Movement_FacePlayer
+	applymovement LOCALID_CELIO, Movement_FacePlayer
 	waitmovement 0
-	msgbox gUnknown_81A19AA, MSGBOX_YESNO
+	msgbox OneIsland_PokemonCenter_1F_Text_MayIAskOneMoreFavor, MSGBOX_YESNO
 	compare VAR_RESULT, NO
-	goto_if_eq EventScript_171099
-	goto EventScript_1710B2
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_DeclineHelpCelio
+	goto OneIsland_PokemonCenter_1F_EventScript_GiveRainbowPass
 	end
 
-EventScript_171099:: @ 8171099
-	msgbox gUnknown_81A1A08, MSGBOX_YESNO
+OneIsland_PokemonCenter_1F_EventScript_DeclineHelpCelio:: @ 8171099
+	msgbox OneIsland_PokemonCenter_1F_Text_PleaseINeedYourHelp, MSGBOX_YESNO
 	compare VAR_RESULT, NO
-	goto_if_eq EventScript_171099
-	goto EventScript_1710B2
+	goto_if_eq OneIsland_PokemonCenter_1F_EventScript_DeclineHelpCelio
+	goto OneIsland_PokemonCenter_1F_EventScript_GiveRainbowPass
 	end
 
-EventScript_1710B2:: @ 81710B2
-	msgbox gUnknown_81A1A3F
+OneIsland_PokemonCenter_1F_EventScript_GiveRainbowPass:: @ 81710B2
+	msgbox OneIsland_PokemonCenter_1F_Text_AnotherGemstoneInSeviiIslands
 	removeitem ITEM_RUBY, 1
 	removeitem ITEM_TRI_PASS, 1
 	setvar VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
@@ -337,47 +342,47 @@ EventScript_1710B2:: @ 81710B2
 	setflag FLAG_SYS_SEVII_MAP_4567
 	textcolor 3
 	playfanfare MUS_FAN5
-	message Text_1A1B56
+	message OneIsland_PokemonCenter_1F_Text_ReturnedTriPassForRainbowPass
 	waitmessage
 	waitfanfare
 	playfanfare MUS_FAN5
-	message Text_1A1B8E
+	message OneIsland_PokemonCenter_1F_Text_ObtainedExtraMapPage
 	waitmessage
 	waitfanfare
 	call EventScript_1A6675
-	goto EventScript_17103A
+	goto OneIsland_PokemonCenter_1F_EventScript_ExplainRainbowPass
 	end
 
-EventScript_1710F2:: @ 81710F2
-	msgbox gUnknown_81A1896
+OneIsland_PokemonCenter_1F_EventScript_CelioWaitingForRuby:: @ 81710F2
+	msgbox OneIsland_PokemonCenter_1F_Text_TryingToFindGem
 	release
 	end
 
-EventScript_1710FC:: @ 81710FC
-	msgbox gUnknown_81A169B
-	applymovement 3, Movement_WalkInPlaceFastestUp
+OneIsland_PokemonCenter_1F_EventScript_CelioRequestRuby:: @ 81710FC
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioCaughtMoreMonMaybeICanBeUseful
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestUp
 	waitmovement 0
-	msgbox gUnknown_81A1723
-	applymovement 3, Movement_FacePlayer
+	msgbox OneIsland_PokemonCenter_1F_Text_YoullBeTradingFromTrainersFarAway
+	applymovement LOCALID_CELIO, Movement_FacePlayer
 	waitmovement 0
-	msgbox gUnknown_81A17DF
+	msgbox OneIsland_PokemonCenter_1F_Text_NeedsSpecialGemstone
 	setvar VAR_MAP_SCENE_MT_EMBER_EXTERIOR, 1
 	setvar VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 4
 	release
 	end
 
-EventScript_171134:: @ 8171134
-	msgbox gUnknown_81A15EC
+OneIsland_PokemonCenter_1F_EventScript_CelioPlayerMissingNationalDex:: @ 8171134
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioImModifyingMyNetworkMachine
 	release
 	end
 
-Movement_17113E:: @ 817113E
+OneIsland_PokemonCenter_1F_Movement_CelioCheckMachine:: @ 817113E
 	walk_in_place_up
 	delay_8
 	walk_in_place_up
 	step_end
 
-Movement_171142:: @ 8171142
+OneIsland_PokemonCenter_1F_Movement_CelioPutGemInMachine:: @ 8171142
 	walk_in_place_fastest_up
 	walk_in_place_up
 	delay_16
@@ -385,116 +390,116 @@ Movement_171142:: @ 8171142
 	walk_in_place_up
 	step_end
 
-OneIsland_PokemonCenter_1F_EventScript_171148:: @ 8171148
-	msgbox gUnknown_81A20D5, MSGBOX_NPC
+OneIsland_PokemonCenter_1F_EventScript_LittleBoy:: @ 8171148
+	msgbox OneIsland_PokemonCenter_1F_Text_CameFromPalletDontKnowIt, MSGBOX_NPC
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_171151:: @ 8171151
-	msgbox gUnknown_81A212D, MSGBOX_NPC
+OneIsland_PokemonCenter_1F_EventScript_Hiker:: @ 8171151
+	msgbox OneIsland_PokemonCenter_1F_Text_EnormousVolcanoOnIsland, MSGBOX_NPC
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_17115A:: @ 817115A
+OneIsland_PokemonCenter_1F_EventScript_BattleGirl:: @ 817115A
 	lock
 	faceplayer
-	goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, EventScript_17116F
-	msgbox gUnknown_81A218D
+	goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, OneIsland_PokemonCenter_1F_EventScript_BattleGirlHoennLinked
+	msgbox OneIsland_PokemonCenter_1F_Text_WishICouldTradeWithBoyfriend
 	release
 	end
 
-EventScript_17116F:: @ 817116F
-	msgbox gUnknown_81A21D0
+OneIsland_PokemonCenter_1F_EventScript_BattleGirlHoennLinked:: @ 817116F
+	msgbox OneIsland_PokemonCenter_1F_Text_TradedWithFarAwayBoyfriend
 	release
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_171179:: @ 8171179
+OneIsland_PokemonCenter_1F_EventScript_NetworkMachine:: @ 8171179
 	lockall
-	goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, EventScript_1711A0
-	goto_if_set FLAG_SEVII_DETOUR_FINISHED, EventScript_171196
-	msgbox gUnknown_81A223F
+	goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, OneIsland_PokemonCenter_1F_EventScript_NetworkMachineLinkedWithHoenn
+	goto_if_set FLAG_SEVII_DETOUR_FINISHED, OneIsland_PokemonCenter_1F_EventScript_NetworkMachineLinkedWithKanto
+	msgbox OneIsland_PokemonCenter_1F_Text_MachineUnderAdjustment
 	releaseall
 	end
 
-EventScript_171196:: @ 8171196
-	msgbox gUnknown_81A2286
+OneIsland_PokemonCenter_1F_EventScript_NetworkMachineLinkedWithKanto:: @ 8171196
+	msgbox OneIsland_PokemonCenter_1F_Text_MachineLinkedWithKanto
 	releaseall
 	end
 
-EventScript_1711A0:: @ 81711A0
-	msgbox gUnknown_81A22CB
+OneIsland_PokemonCenter_1F_EventScript_NetworkMachineLinkedWithHoenn:: @ 81711A0
+	msgbox OneIsland_PokemonCenter_1F_Text_MachineLinkedWithKantoAndHoenn
 	releaseall
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_1711AA:: @ 81711AA
+OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerTop:: @ 81711AA
 	lockall
 	setvar VAR_TEMP_1, 1
-	goto EventScript_1711DA
+	goto OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandScene
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_1711B6:: @ 81711B6
+OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerMidTop:: @ 81711B6
 	lockall
 	setvar VAR_TEMP_1, 2
-	goto EventScript_1711DA
+	goto OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandScene
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_1711C2:: @ 81711C2
+OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerMidBottom:: @ 81711C2
 	lockall
 	setvar VAR_TEMP_1, 3
-	goto EventScript_1711DA
+	goto OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandScene
 	end
 
-OneIsland_PokemonCenter_1F_EventScript_1711CE:: @ 81711CE
+OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandTriggerBottom:: @ 81711CE
 	lockall
 	setvar VAR_TEMP_1, 4
-	goto EventScript_1711DA
+	goto OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandScene
 	end
 
-EventScript_1711DA:: @ 81711DA
+OneIsland_PokemonCenter_1F_EventScript_LeaveOneIslandScene:: @ 81711DA
 	textcolor 0
 	playse SE_PIN
-	applymovement 2, Movement_ExclamationMark
+	applymovement LOCALID_BILL, Movement_ExclamationMark
 	waitmovement 0
-	msgbox gUnknown_81A13B8
+	msgbox OneIsland_PokemonCenter_1F_Text_BillOhHeyPlayer
 	closemessage
 	compare VAR_TEMP_1, 1
-	call_if_eq EventScript_1712E4
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillTop
 	compare VAR_TEMP_1, 2
-	call_if_eq EventScript_1712EF
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillMidTop
 	compare VAR_TEMP_1, 3
-	call_if_eq EventScript_1712FA
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillMidBottom
 	compare VAR_TEMP_1, 4
-	call_if_eq EventScript_171305
+	call_if_eq OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillBottom
 	delay 10
-	msgbox gUnknown_81A13CB
+	msgbox OneIsland_PokemonCenter_1F_Text_BillWeGotItDone
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestDown
 	waitmovement 0
-	msgbox gUnknown_81A1431
-	applymovement 2, Movement_WalkInPlaceFastestDown
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioJobWentQuick
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestDown
 	waitmovement 0
-	applymovement 3, Movement_WalkInPlaceFastestUp
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestUp
 	waitmovement 0
-	msgbox gUnknown_81A1470
-	msgbox gUnknown_81A14E1
+	msgbox OneIsland_PokemonCenter_1F_Text_BillYouveLearnedALot
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioOhReallyEhehe
 	closemessage
-	applymovement 2, Movement_WalkInPlaceFastestLeft
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestLeft
 	waitmovement 0
 	delay 10
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestRight
 	waitmovement 0
 	delay 15
-	msgbox gUnknown_81A14FB
+	msgbox OneIsland_PokemonCenter_1F_Text_BillWeShouldHeadBackToKanto
 	closemessage
-	applymovement 2, Movement_WalkInPlaceFastestDown
+	applymovement LOCALID_BILL, Movement_WalkInPlaceFastestDown
 	waitmovement 0
 	delay 15
-	applymovement 3, Movement_WalkInPlaceFastestLeft
+	applymovement LOCALID_CELIO, Movement_WalkInPlaceFastestLeft
 	waitmovement 0
 	applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestDown
 	waitmovement 0
-	msgbox gUnknown_81A1574
+	msgbox OneIsland_PokemonCenter_1F_Text_CelioPromiseIllShowYouAroundSometime
 	closemessage
 	delay 25
-	applymovement OBJ_EVENT_ID_PLAYER, Movement_171326
-	applymovement 2, Movement_17132D
+	applymovement OBJ_EVENT_ID_PLAYER, OneIsland_PokemonCenter_1F_Movement_PlayerExit
+	applymovement LOCALID_BILL, OneIsland_PokemonCenter_1F_Movement_BillExit
 	waitmovement 0
 	playse SE_KAIDAN
 	setflag FLAG_HIDE_ONE_ISLAND_POKECENTER_BILL
@@ -506,49 +511,50 @@ EventScript_1711DA:: @ 81711DA
 	goto EventScript_SetSail
 	end
 
-EventScript_1712E4:: @ 81712E4
-	applymovement OBJ_EVENT_ID_PLAYER, Movement_171310
+OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillTop:: @ 81712E4
+	applymovement OBJ_EVENT_ID_PLAYER, OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillTop
 	waitmovement 0
 	return
 
-EventScript_1712EF:: @ 81712EF
-	applymovement OBJ_EVENT_ID_PLAYER, Movement_171314
+OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillMidTop:: @ 81712EF
+	applymovement OBJ_EVENT_ID_PLAYER, OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillMidTop
 	waitmovement 0
 	return
 
-EventScript_1712FA:: @ 81712FA
-	applymovement OBJ_EVENT_ID_PLAYER, Movement_171316
+OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillMidBottom:: @ 81712FA
+	applymovement OBJ_EVENT_ID_PLAYER, OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillMidBottom
 	waitmovement 0
 	return
 
-EventScript_171305:: @ 8171305
-	applymovement OBJ_EVENT_ID_PLAYER, Movement_17131A
+OneIsland_PokemonCenter_1F_EventScript_PlayerWalkToBillBottom:: @ 8171305
+	applymovement OBJ_EVENT_ID_PLAYER, OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillBottom
 	waitmovement 0
 	return
 
-Movement_171310:: @ 8171310
+OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillTop:: @ 8171310
 	walk_right
 	walk_down
 	walk_in_place_fastest_right
 	step_end
 
-Movement_171314:: @ 8171314
+OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillMidTop:: @ 8171314
 	walk_right
 	step_end
 
-Movement_171316:: @ 8171316
+OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillMidBottom:: @ 8171316
 	walk_right
 	walk_up
 	walk_in_place_fastest_right
 	step_end
 
-Movement_17131A:: @ 817131A
+OneIsland_PokemonCenter_1F_Movement_PlayerWalkToBillBottom:: @ 817131A
 	walk_right
 	walk_up
 	walk_up
 	walk_in_place_fastest_right
 	step_end
 
+@ Unused
 Movement_17131F:: @ 817131F
 	delay_16
 	delay_16
@@ -556,11 +562,12 @@ Movement_17131F:: @ 817131F
 	walk_in_place_fastest_left
 	step_end
 
+@ Unused
 Movement_171324:: @ 8171324
 	walk_in_place_fast_down
 	step_end
 
-Movement_171326:: @ 8171326
+OneIsland_PokemonCenter_1F_Movement_PlayerExit:: @ 8171326
 	walk_left
 	walk_left
 	walk_left
@@ -569,7 +576,7 @@ Movement_171326:: @ 8171326
 	walk_down
 	step_end
 
-Movement_17132D:: @ 817132D
+OneIsland_PokemonCenter_1F_Movement_BillExit:: @ 817132D
 	walk_left
 	walk_left
 	walk_left
diff --git a/data/maps/OneIsland_PokemonCenter_1F/text.inc b/data/maps/OneIsland_PokemonCenter_1F/text.inc
index e2d6c7fed..278a1cc44 100644
--- a/data/maps/OneIsland_PokemonCenter_1F/text.inc
+++ b/data/maps/OneIsland_PokemonCenter_1F/text.inc
@@ -1,52 +1,52 @@
-gUnknown_81A0CDE:: @ 81A0CDE
+OneIsland_PokemonCenter_1F_Text_BillHeyThereCelio:: @ 81A0CDE
     .string "BILL: Hey, there!\n"
     .string "CELIO!$"
 
-gUnknown_81A0CF7:: @ 81A0CF7
+OneIsland_PokemonCenter_1F_Text_CelioCantBelieveYouCameOut:: @ 81A0CF7
     .string "CELIO: BILL!\n"
     .string "I can't believe you came out here.$"
 
-gUnknown_81A0D27:: @ 81A0D27
+OneIsland_PokemonCenter_1F_Text_BillHowsYourResearchComing:: @ 81A0D27
     .string "BILL: Well, absolutely!\n"
     .string "How's your research coming along?\p"
     .string "…Oh, wait a sec.$"
 
-gUnknown_81A0D72:: @ 81A0D72
+OneIsland_PokemonCenter_1F_Text_ThisIsMyBuddyCelio:: @ 81A0D72
     .string "{PLAYER}, this is my buddy CELIO.\n"
     .string "He's one dedicated PC MANIAC!$"
 
-gUnknown_81A0DAC:: @ 81A0DAC
+OneIsland_PokemonCenter_1F_Text_PlayerIsRisingPokemonChamp:: @ 81A0DAC
     .string "CELIO, this is {PLAYER}, a rising\n"
     .string "contender as the POKéMON CHAMP!$"
 
-gUnknown_81A0DE8:: @ 81A0DE8
+OneIsland_PokemonCenter_1F_Text_PlayerIsReigningPokemonChamp:: @ 81A0DE8
     .string "CELIO, this is {PLAYER}, the\n"
     .string "reigning POKéMON CHAMP!$"
 
-gUnknown_81A0E17:: @ 81A0E17
+OneIsland_PokemonCenter_1F_Text_CelioThatsReallyImpressive:: @ 81A0E17
     .string "CELIO: That's really impressive.\p"
     .string "I hate to say it, but I have zero\n"
     .string "aptitude for battling.\p"
     .string "Anyways, I'm glad to meet you.$"
 
-gUnknown_81A0E90:: @ 81A0E90
+OneIsland_PokemonCenter_1F_Text_BillBringMeUpToSpeed:: @ 81A0E90
     .string "BILL: So, bring me up to speed.\n"
     .string "How's your machine running?$"
 
-gUnknown_81A0ECC:: @ 81A0ECC
+OneIsland_PokemonCenter_1F_Text_CelioPCsCantLinkWithYours:: @ 81A0ECC
     .string "CELIO: It's running fine, but we're\n"
     .string "too remote out here.\p"
     .string "The PCs on this island just can't\n"
     .string "link with your PC, BILL.$"
 
-gUnknown_81A0F40:: @ 81A0F40
+OneIsland_PokemonCenter_1F_Text_BillLetMeHelpYou:: @ 81A0F40
     .string "BILL: Oh, yeah?\n"
     .string "Okay, let me take a look-see.\p"
     .string "…Hang on here…\n"
     .string "I think we can make it work.\l"
     .string "Let me help you, okay?$"
 
-gUnknown_81A0FB1:: @ 81A0FB1
+OneIsland_PokemonCenter_1F_Text_CanYouDeliverThisMeteoritePlayer:: @ 81A0FB1
     .string "{PLAYER}, can I get you to wait for\n"
     .string "me just a bit?\p"
     .string "…Actually, can I get you to do\n"
@@ -62,38 +62,38 @@ gUnknown_81A0FB1:: @ 81A0FB1
     .string "So, can I get you to deliver this\n"
     .string "METEORITE to him?$"
 
-gUnknown_81A10EE:: @ 81A10EE
+OneIsland_PokemonCenter_1F_Text_AcceptedMeteoriteFromBill:: @ 81A10EE
     .string "{PLAYER} accepted the METEORITE\n"
     .string "from BILL.$"
 
-gUnknown_81A1113:: @ 81A1113
+OneIsland_PokemonCenter_1F_Text_CelioPleaseTakeThis:: @ 81A1113
     .string "CELIO: {PLAYER}, if you are going\n"
     .string "to TWO ISLAND, please take this.$"
 
-gUnknown_81A1150:: @ 81A1150
+OneIsland_PokemonCenter_1F_Text_PassLetsYouTravelBetweenIslands:: @ 81A1150
     .string "It's a PASS for the ferry service\n"
     .string "serving the local islands.\p"
     .string "It will let you travel between the\n"
     .string "ISLANDS ONE, TWO, and THREE.\p"
     .string "Oh, you should have this, too.$"
 
-Text_1A11EC:: @ 81A11EC
+OneIsland_PokemonCenter_1F_Text_ReceivedExtraPageForTownMap:: @ 81A11EC
     .string "{PLAYER} received an extra page\n"
     .string "for the TOWN MAP!$"
 
-gUnknown_81A1218:: @ 81A1218
+OneIsland_PokemonCenter_1F_Text_ReceivedTownMap:: @ 81A1218
     .string "{PLAYER} received\n"
     .string "a TOWN MAP!$"
 
-gUnknown_81A1230:: @ 81A1230
+OneIsland_PokemonCenter_1F_Text_BillCatchYouLater:: @ 81A1230
     .string "BILL: I'll catch you later!\n"
     .string "Say hi to the guy for me!$"
 
-gUnknown_81A1266:: @ 81A1266
+OneIsland_PokemonCenter_1F_Text_HmmHowAboutLikeThis:: @ 81A1266
     .string "Hmm…\p"
     .string "How about we try this like this…$"
 
-gUnknown_81A128C:: @ 81A128C
+OneIsland_PokemonCenter_1F_Text_GotPCWorkingStrollAWhileMore:: @ 81A128C
     .string "Oh, hey, {PLAYER}!\p"
     .string "Did you see?\n"
     .string "We got the PC working!\p"
@@ -102,54 +102,54 @@ gUnknown_81A128C:: @ 81A128C
     .string "Can you go out on a stroll or\n"
     .string "something for a while more?$"
 
-gUnknown_81A1321:: @ 81A1321
+OneIsland_PokemonCenter_1F_Text_SorryForBeingPoorHost:: @ 81A1321
     .string "I'm sorry for taking up so much of\n"
     .string "BILL's time.\p"
     .string "I'm also sorry for being such a \n"
     .string "poor host on your visit here.$"
 
-Text_UsualPCServicesUnavailable:: @ 81A1390
+OneIsland_PokemonCenter_1F_Text_UsualPCServicesUnavailable:: @ 81A1390
     .string "The usual PC services aren't\n"
     .string "available…$"
 
-gUnknown_81A13B8:: @ 81A13B8
+OneIsland_PokemonCenter_1F_Text_BillOhHeyPlayer:: @ 81A13B8
     .string "BILL: Oh, hey!\n"
     .string "{PLAYER}!$"
 
-gUnknown_81A13CB:: @ 81A13CB
+OneIsland_PokemonCenter_1F_Text_BillWeGotItDone:: @ 81A13CB
     .string "BILL: What kept you so long?\n"
     .string "Been out having a good time?\p"
     .string "We got it done.\n"
     .string "The PCs are up and running!$"
 
-gUnknown_81A1431:: @ 81A1431
+OneIsland_PokemonCenter_1F_Text_CelioJobWentQuick:: @ 81A1431
     .string "CELIO: The job went incredibly\n"
     .string "quick.\p"
     .string "BILL is one amazing guy…$"
 
-gUnknown_81A1470:: @ 81A1470
+OneIsland_PokemonCenter_1F_Text_BillYouveLearnedALot:: @ 81A1470
     .string "BILL: No, no! There was almost\n"
     .string "nothing left for me to do.\p"
     .string "CELIO, I have to hand it to you.\n"
     .string "You've learned a lot.$"
 
-gUnknown_81A14E1:: @ 81A14E1
+OneIsland_PokemonCenter_1F_Text_CelioOhReallyEhehe:: @ 81A14E1
     .string "CELIO: Oh, really?\n"
     .string "Ehehe…$"
 
-gUnknown_81A14FB:: @ 81A14FB
+OneIsland_PokemonCenter_1F_Text_BillWeShouldHeadBackToKanto:: @ 81A14FB
     .string "BILL: Well, there you have it.\n"
     .string "I'm finished with the job.\l"
     .string "We should head back to KANTO.\p"
     .string "CELIO, I'll be seeing you again.$"
 
-gUnknown_81A1574:: @ 81A1574
+OneIsland_PokemonCenter_1F_Text_CelioPromiseIllShowYouAroundSometime:: @ 81A1574
     .string "CELIO: {PLAYER}, I'm really sorry\n"
     .string "that we sent you off alone today.\p"
     .string "I promise, I will show you around\n"
     .string "these islands sometime.$"
 
-gUnknown_81A15EC:: @ 81A15EC
+OneIsland_PokemonCenter_1F_Text_CelioImModifyingMyNetworkMachine:: @ 81A15EC
     .string "CELIO: Hello!\n"
     .string "You look awfully busy as always.\p"
     .string "How am I doing?\p"
@@ -159,7 +159,7 @@ gUnknown_81A15EC:: @ 81A15EC
     .string "I hope you'll be first to use it,\l"
     .string "{PLAYER}.$"
 
-gUnknown_81A169B:: @ 81A169B
+OneIsland_PokemonCenter_1F_Text_CelioCaughtMoreMonMaybeICanBeUseful:: @ 81A169B
     .string "CELIO: {PLAYER}, how have things\n"
     .string "been for you?\p"
     .string "Oh, is that right?\n"
@@ -167,7 +167,7 @@ gUnknown_81A169B:: @ 81A169B
     .string "Do you know what?\n"
     .string "Maybe I can be useful to you.$"
 
-gUnknown_81A1723:: @ 81A1723
+OneIsland_PokemonCenter_1F_Text_YoullBeTradingFromTrainersFarAway:: @ 81A1723
     .string "I'm modifying the Network Machine\n"
     .string "right now.\p"
     .string "I'm changing it so it can handle\n"
@@ -176,7 +176,7 @@ gUnknown_81A1723:: @ 81A1723
     .string "trading for exotic POKéMON from\l"
     .string "TRAINERS far away.$"
 
-gUnknown_81A17DF:: @ 81A17DF
+OneIsland_PokemonCenter_1F_Text_NeedsSpecialGemstone:: @ 81A17DF
     .string "But, there is a slight catch.\p"
     .string "For the link to work, the Machine\n"
     .string "needs a special gemstone.\p"
@@ -184,7 +184,7 @@ gUnknown_81A17DF:: @ 81A17DF
     .string "but I haven't found one yet.\p"
     .string "Who knows where it could be.$"
 
-gUnknown_81A1896:: @ 81A1896
+OneIsland_PokemonCenter_1F_Text_TryingToFindGem:: @ 81A1896
     .string "I was trying to find the gem\n"
     .string "even while I was studying.\p"
     .string "As a result, I've made no headway\n"
@@ -194,26 +194,26 @@ gUnknown_81A1896:: @ 81A1896
     .string "But this time, I want to try to do\n"
     .string "things by myself.$"
 
-gUnknown_81A197E:: @ 81A197E
+OneIsland_PokemonCenter_1F_Text_OhThats:: @ 81A197E
     .string "Oh!\n"
     .string "Th-that's…$"
 
-Text_1A198D:: @ 81A198D
+OneIsland_PokemonCenter_1F_Text_HandedRubyToCelio:: @ 81A198D
     .string "{PLAYER} handed the RUBY\n"
     .string "to CELIO.$"
 
-gUnknown_81A19AA:: @ 81A19AA
+OneIsland_PokemonCenter_1F_Text_MayIAskOneMoreFavor:: @ 81A19AA
     .string "Thank you!\n"
     .string "{PLAYER}, you're simply amazing.\p"
     .string "… … …  … … …\p"
     .string "Um… May I ask one more giant favor\n"
     .string "of you?$"
 
-gUnknown_81A1A08:: @ 81A1A08
+OneIsland_PokemonCenter_1F_Text_PleaseINeedYourHelp:: @ 81A1A08
     .string "It… It's not anything weird.\n"
     .string "Please, I need your help.$"
 
-gUnknown_81A1A3F:: @ 81A1A3F
+OneIsland_PokemonCenter_1F_Text_AnotherGemstoneInSeviiIslands:: @ 81A1A3F
     .string "While I was studying gemstones,\n"
     .string "I discovered something important.\p"
     .string "There is another gem that forms\n"
@@ -225,26 +225,26 @@ gUnknown_81A1A3F:: @ 81A1A3F
     .string "{PLAYER}, may I have your ferry\n"
     .string "PASS and the TOWN MAP?$"
 
-Text_1A1B56:: @ 81A1B56
+OneIsland_PokemonCenter_1F_Text_ReturnedTriPassForRainbowPass:: @ 81A1B56
     .string "{PLAYER} returned the TRI-PASS and\n"
     .string "received the RAINBOW PASS.$"
 
-Text_1A1B8E:: @ 81A1B8E
+OneIsland_PokemonCenter_1F_Text_ObtainedExtraMapPage:: @ 81A1B8E
     .string "Obtained an extra page for the\n"
     .string "TOWN MAP!$"
 
-gUnknown_81A1BB7:: @ 81A1BB7
+OneIsland_PokemonCenter_1F_Text_PassLetYouGetToAllIslands:: @ 81A1BB7
     .string "This is my own ferry PASS.\p"
     .string "It will let you get to all the\n"
     .string "SEVII ISLANDS.\p"
     .string "{PLAYER}, please, I can't do\n"
     .string "it without your help.$"
 
-Text_1A1C2D:: @ 81A1C2D
+OneIsland_PokemonCenter_1F_Text_HandedSapphireToCelio:: @ 81A1C2D
     .string "{PLAYER} handed the SAPPHIRE\n"
     .string "to CELIO.$"
 
-gUnknown_81A1C4E:: @ 81A1C4E
+OneIsland_PokemonCenter_1F_Text_ThankYouGiveMeTime:: @ 81A1C4E
     .string "CELIO: So this is the gem that\n"
     .string "forms a pair with the RUBY…\p"
     .string "{PLAYER}, you've gone through a lot\n"
@@ -255,14 +255,14 @@ gUnknown_81A1C4E:: @ 81A1C4E
     .string "Now it's my turn to work for you!\n"
     .string "Please give me a little time.$"
 
-gUnknown_81A1D45:: @ 81A1D45
+OneIsland_PokemonCenter_1F_Text_OkayThisIsGood:: @ 81A1D45
     .string "Okay, this is good…$"
 
-gUnknown_81A1D59:: @ 81A1D59
+OneIsland_PokemonCenter_1F_Text_LinkedUpWithLanette:: @ 81A1D59
     .string "I did it!\n"
     .string "I linked up with LANETTE!$"
 
-gUnknown_81A1D7D:: @ 81A1D7D
+OneIsland_PokemonCenter_1F_Text_ManagedToLinkWithHoennThankYou:: @ 81A1D7D
     .string "{PLAYER}…\n"
     .string "{PLAYER}, I did it!\p"
     .string "I've managed to link up with\n"
@@ -273,7 +273,7 @@ gUnknown_81A1D7D:: @ 81A1D7D
     .string "Thanks to you, my dream came\n"
     .string "true…$"
 
-gUnknown_81A1E39:: @ 81A1E39
+OneIsland_PokemonCenter_1F_Text_WishYouBestOfLuck:: @ 81A1E39
     .string "I…\n"
     .string "I'm not crying.\p"
     .string "That's enough about me!\p"
@@ -281,12 +281,12 @@ gUnknown_81A1E39:: @ 81A1E39
     .string "looking for exotic POKéMON, right?\p"
     .string "I wish you the best of luck!$"
 
-gUnknown_81A1EBD:: @ 81A1EBD
+OneIsland_PokemonCenter_1F_Text_CelioHearingRumorsAboutYou:: @ 81A1EBD
     .string "CELIO: Hello!\p"
     .string "{PLAYER}, I've been hearing rumors\n"
     .string "about you.$"
 
-gUnknown_81A1EF3:: @ 81A1EF3
+OneIsland_PokemonCenter_1F_Text_BillsFirstMonWasAbra:: @ 81A1EF3
     .string "{PLAYER}, what's your favorite kind\n"
     .string "of POKéMON?\p"
     .string "BILL is a POKéMANIAC, so he loves\n"
@@ -294,7 +294,7 @@ gUnknown_81A1EF3:: @ 81A1EF3
     .string "Apparently, the first one he caught\n"
     .string "was an ABRA.$"
 
-gUnknown_81A1F7C:: @ 81A1F7C
+OneIsland_PokemonCenter_1F_Text_BillsHometownInGoldenrod:: @ 81A1F7C
     .string "By the way, {PLAYER}, you're from\n"
     .string "PALLET TOWN, aren't you?\p"
     .string "I've heard that it's a quiet and\n"
@@ -305,53 +305,53 @@ gUnknown_81A1F7C:: @ 81A1F7C
     .string "festive, bustling city.\p"
     .string "I'd like to go there one day.$"
 
-gUnknown_81A2076:: @ 81A2076
+OneIsland_PokemonCenter_1F_Text_BillCantStomachMilk:: @ 81A2076
     .string "{PLAYER}, is there anything that\n"
     .string "you can't stand?\p"
     .string "Apparently, BILL simply can't\n"
     .string "stomach milk at all.$"
 
-gUnknown_81A20D5:: @ 81A20D5
+OneIsland_PokemonCenter_1F_Text_CameFromPalletDontKnowIt:: @ 81A20D5
     .string "Oh, you're a stranger here!\n"
     .string "Hi! Where did you come from?\p"
     .string "…PALLET TOWN?\n"
     .string "I don't know it!$"
 
-gUnknown_81A212D:: @ 81A212D
+OneIsland_PokemonCenter_1F_Text_EnormousVolcanoOnIsland:: @ 81A212D
     .string "On this island, there's an enormous\n"
     .string "volcano.\p"
     .string "It hasn't erupted lately, so why\n"
     .string "not enjoy a hike?$"
 
-gUnknown_81A218D:: @ 81A218D
+OneIsland_PokemonCenter_1F_Text_WishICouldTradeWithBoyfriend:: @ 81A218D
     .string "I wish I could trade POKéMON with\n"
     .string "my boyfriend who lives far away…$"
 
-gUnknown_81A21D0:: @ 81A21D0
+OneIsland_PokemonCenter_1F_Text_TradedWithFarAwayBoyfriend:: @ 81A21D0
     .string "I traded POKéMON with my boyfriend\n"
     .string "far away!\p"
     .string "Everyone's saying that we can\n"
     .string "thank you and CELIO.\p"
     .string "So, thank you!$"
 
-gUnknown_81A223F:: @ 81A223F
+OneIsland_PokemonCenter_1F_Text_MachineUnderAdjustment:: @ 81A223F
     .string "Network Machine\n"
     .string "Link Level 0\p"
     .string "…POKéMON Storage System under\n"
     .string "adjustment…$"
 
-gUnknown_81A2286:: @ 81A2286
+OneIsland_PokemonCenter_1F_Text_MachineLinkedWithKanto:: @ 81A2286
     .string "Network Machine\n"
     .string "Link Level 1\p"
     .string "Link established with the KANTO\n"
     .string "region.$"
 
-gUnknown_81A22CB:: @ 81A22CB
+OneIsland_PokemonCenter_1F_Text_MachineLinkedWithKantoAndHoenn:: @ 81A22CB
     .string "Network Machine\n"
     .string "Link Level 2\p"
     .string "Link established with the KANTO\n"
     .string "and HOENN regions.$"
 
-gUnknown_81A231B:: @ 81A231B
+OneIsland_PokemonCenter_1F_Text_ObtainedTriPass:: @ 81A231B
     .string "Obtained the TRI-PASS!$"