shithub: pokecrystal

Download patch

ref: f81fb0ba13af29f3b91e2712ef027eb49c154691
parent: e699992e6b727883c3b5d19efbac0c5302892396
author: IIMarckus <iimarckus@gmail.com>
date: Thu Jan 7 10:41:51 EST 2016

Improve text labels, trim address comments.

--- a/engine/radio.asm
+++ b/engine/radio.asm
@@ -1,4 +1,4 @@
-PlayRadioShow: ; b8612
+PlayRadioShow:
 ; If we're already in the radio program proper, we don't need to be here.
 	ld a, [wCurrentRadioLine]
 	cp POKE_FLUTE_RADIO
@@ -20,15 +20,14 @@
 	ld e, a
 	ld d, 0
 	ld hl, RadioJumptable
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
 	jp [hl]
 
-RadioJumptable: ; b863a (2e:463a)
+RadioJumptable:
 	dw OaksPkmnTalk1  ; $00
 	dw PokedexShow1 ; $01
 	dw BenMonMusic1  ; $02
@@ -127,7 +126,7 @@
 	dw PokedexShow8 ; $57
 
 
-PrintRadioLine: ; b86ea (2e:46ea)
+PrintRadioLine:
 	ld [wNextRadioLine], a
 	ld hl, wRadioText
 	ld a, [wNumRadioLinesPrinted]
@@ -150,9 +149,8 @@
 	ld a, 100
 	ld [wRadioTextDelay], a
 	ret
-; b8718 (2e:4718)
 
-ReplacePeriodsWithSpaces: ; b8718
+ReplacePeriodsWithSpaces:
 	push hl
 	ld b, SCREEN_WIDTH * 2
 .loop
@@ -167,9 +165,8 @@
 	jr nz, .loop
 	pop hl
 	ret
-; b8728
 
-RadioScroll: ; b8728 (2e:4728)
+RadioScroll:
 	ld hl, wRadioTextDelay
 	ld a, [hl]
 	and a
@@ -184,25 +181,25 @@
 	call nz, CopyBottomLineToTopLine
 	jp ClearBottomLine
 
-OaksPkmnTalk1: ; b8742 (2e:4742)
+OaksPkmnTalk1:
 	ld a, 5
 	ld [wOaksPkmnTalkSegmentCounter], a
 	call StartRadioStation
-	ld hl, UnknownText_0xb8820
+	ld hl, OPT_IntroText1
 	ld a, OAKS_POKEMON_TALK_2
 	jp NextRadioLine
 
-OaksPkmnTalk2: ; b8752 (2e:4752)
-	ld hl, UnknownText_0xb8825
+OaksPkmnTalk2:
+	ld hl, OPT_IntroText2
 	ld a, OAKS_POKEMON_TALK_3
 	jp NextRadioLine
 
-OaksPkmnTalk3: ; b875a (2e:475a)
-	ld hl, UnknownText_0xb882a
+OaksPkmnTalk3:
+	ld hl, OPT_IntroText3
 	ld a, OAKS_POKEMON_TALK_4
 	jp NextRadioLine
 
-OaksPkmnTalk4: ; b8762 (2e:4762)
+OaksPkmnTalk4:
 ; Choose a random route, and a random Pokemon from that route.
 	call Random
 	and $1f
@@ -212,9 +209,8 @@
 	ld hl, .routes
 	ld c, a
 	ld b, 0
-rept 2
 	add hl, bc
-endr
+	add hl, bc
 	ld b, [hl]
 	inc hl
 	ld c, [hl]
@@ -264,9 +260,8 @@
 	jr nc, .loop3
 	ld e, a
 	ld d, 0
-rept 2
 	add hl, de
-endr
+	add hl, de
 	inc hl ; skip level
 	ld a, BANK(JohtoGrassWildMons)
 	call GetFarByte
@@ -283,7 +278,7 @@
 	call GetWorldMapLocation
 	ld e, a
 	callba GetLandmarkName
-	ld hl, UnknownText_0xb882f
+	ld hl, OPT_OakText1
 	call CopyRadioTextToRAM
 	ld a, OAKS_POKEMON_TALK_5
 	jp PrintRadioLine
@@ -292,9 +287,8 @@
 	pop bc
 	ld a, OAKS_POKEMON_TALK
 	jp PrintRadioLine
-; b87f2 (2e:47f2)
 
-.routes: ; b87f2
+.routes
 	map ROUTE_29
 	map ROUTE_46
 	map ROUTE_30
@@ -310,87 +304,75 @@
 	map ROUTE_45
 	map ROUTE_36
 	map ROUTE_31
-; b8810
 
-OaksPkmnTalk5: ; b8810 (2e:4810)
-	ld hl, UnknownText_0xb8834
+OaksPkmnTalk5:
+	ld hl, OPT_OakText2
 	ld a, OAKS_POKEMON_TALK_6
 	jp NextRadioLine
 
-OaksPkmnTalk6: ; b8818 (2e:4818)
-	ld hl, UnknownText_0xb8839
+OaksPkmnTalk6:
+	ld hl, OPT_OakText3
 	ld a, OAKS_POKEMON_TALK_7
 	jp NextRadioLine
-; b8820 (2e:4820)
 
-UnknownText_0xb8820: ; 0xb8820
+OPT_IntroText1:
 	; MARY: PROF.OAK'S
-	text_jump UnknownText_0x1bc81a
+	text_jump _OPT_IntroText1
 	db "@"
-; 0xb8825
 
-UnknownText_0xb8825: ; 0xb8825
+OPT_IntroText2:
 	; #MON TALK!
-	text_jump UnknownText_0x1bc82d
+	text_jump _OPT_IntroText2
 	db "@"
-; 0xb882a
 
-UnknownText_0xb882a: ; 0xb882a
+OPT_IntroText3:
 	; With me, MARY!
-	text_jump UnknownText_0x1bc83a
+	text_jump _OPT_IntroText3
 	db "@"
-; 0xb882f
 
-UnknownText_0xb882f: ; 0xb882f
+OPT_OakText1:
 	; OAK: @ @
-	text_jump UnknownText_0x1bc84b
+	text_jump _OPT_OakText1
 	db "@"
-; 0xb8834
 
-UnknownText_0xb8834: ; 0xb8834
+OPT_OakText2:
 	; may be seen around
-	text_jump UnknownText_0x1bc858
+	text_jump _OPT_OakText2
 	db "@"
-; 0xb8839
 
-UnknownText_0xb8839: ; 0xb8839
+OPT_OakText3:
 	; @ .
-	text_jump UnknownText_0x1bc86d
+	text_jump _OPT_OakText3
 	db "@"
-; 0xb883e
 
-OaksPkmnTalk7: ; b883e (2e:483e)
+OaksPkmnTalk7:
 	ld a, [CurPartySpecies]
 	ld [wNamedObjectIndexBuffer], a
 	call GetPokemonName
-	ld hl, UnknownText_0xb884f
+	ld hl, OPT_MaryText1
 	ld a, OAKS_POKEMON_TALK_8
 	jp NextRadioLine
-; b884f (2e:484f)
 
-UnknownText_0xb884f: ; 0xb884f
+OPT_MaryText1:
 	; MARY: @ 's
-	text_jump UnknownText_0x1bc876
+	text_jump _OPT_MaryText1
 	db "@"
-; 0xb8854
 
-OaksPkmnTalk8: ; b8854 (2e:4854)
+OaksPkmnTalk8:
 	call Random
 	and $f
 	ld e, a
 	ld d, 0
 	ld hl, .Descriptors
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
 	ld a, OAKS_POKEMON_TALK_9
 	jp NextRadioLine
-; b8869 (2e:4869)
 
-.Descriptors: ; b8869
+.Descriptors
 	dw .sweetadorably
 	dw .wigglyslickly
 	dw .aptlynamed
@@ -407,113 +389,95 @@
 	dw .provocatively
 	dw .flippedout
 	dw .heartmeltingly
-; b8889
 
-.sweetadorably: ; 0xb8889
+.sweetadorably
 	; sweet and adorably
-	text_jump UnknownText_0x1bc885
+	text_jump OPT_SweetAdorably
 	db "@"
-; 0xb888e
 
-.wigglyslickly: ; 0xb888e
+.wigglyslickly
 	; wiggly and slickly
-	text_jump UnknownText_0x1bc89a
+	text_jump OPT_WigglySlickly
 	db "@"
-; 0xb8893
 
-.aptlynamed: ; 0xb8893
+.aptlynamed
 	; aptly named and
-	text_jump UnknownText_0x1bc8af
+	text_jump OPT_AptlyNamed
 	db "@"
-; 0xb8898
 
-.undeniablykindof: ; 0xb8898
+.undeniablykindof
 	; undeniably kind of
-	text_jump UnknownText_0x1bc8c1
+	text_jump OPT_UndeniablyKindOf
 	db "@"
-; 0xb889d
 
-.unbearably: ; 0xb889d
+.unbearably
 	; so, so unbearably
-	text_jump UnknownText_0x1bc8d6
+	text_jump OPT_Unbearably
 	db "@"
-; 0xb88a2
 
-.wowimpressively: ; 0xb88a2
+.wowimpressively
 	; wow, impressively
-	text_jump UnknownText_0x1bc8ea
+	text_jump OPT_WowImpressively
 	db "@"
-; 0xb88a7
 
-.almostpoisonously: ; 0xb88a7
+.almostpoisonously
 	; almost poisonously
-	text_jump UnknownText_0x1bc8fe
+	text_jump OPT_AlmostPoisonously
 	db "@"
-; 0xb88ac
 
-.sensually: ; 0xb88ac
+.sensually
 	; ooh, so sensually
-	text_jump UnknownText_0x1bc913
+	text_jump OPT_Sensually
 	db "@"
-; 0xb88b1
 
-.mischievously: ; 0xb88b1
+.mischievously
 	; so mischievously
-	text_jump UnknownText_0x1bc927
+	text_jump OPT_Mischievously
 	db "@"
-; 0xb88b6
 
-.topically: ; 0xb88b6
+.topically
 	; so very topically
-	text_jump UnknownText_0x1bc93a
+	text_jump OPT_Topically
 	db "@"
-; 0xb88bb
 
-.addictively: ; 0xb88bb
+.addictively
 	; sure addictively
-	text_jump UnknownText_0x1bc94e
+	text_jump OPT_Addictively
 	db "@"
-; 0xb88c0
 
-.looksinwater: ; 0xb88c0
+.looksinwater
 	; looks in water is
-	text_jump UnknownText_0x1bc961
+	text_jump OPT_LooksInWater
 	db "@"
-; 0xb88c5
 
-.evolutionmustbe: ; 0xb88c5
+.evolutionmustbe
 	; evolution must be
-	text_jump UnknownText_0x1bc975
+	text_jump OPT_EvolutionMustBe
 	db "@"
-; 0xb88ca
 
-.provocatively: ; 0xb88ca
+.provocatively
 	; provocatively
-	text_jump UnknownText_0x1bc989
+	text_jump OPT_Provocatively
 	db "@"
-; 0xb88cf
 
-.flippedout: ; 0xb88cf
+.flippedout
 	; so flipped out and
-	text_jump UnknownText_0x1bc999
+	text_jump OPT_FlippedOut
 	db "@"
-; 0xb88d4
 
-.heartmeltingly: ; 0xb88d4
+.heartmeltingly
 	; heart-meltingly
-	text_jump UnknownText_0x1bc9ae
+	text_jump OPT_HeartMeltingly
 	db "@"
-; 0xb88d9
 
-OaksPkmnTalk9: ; b88d9 (2e:48d9)
+OaksPkmnTalk9:
 	call Random
 	and $f
 	ld e, a
 	ld d, 0
 	ld hl, .Descriptors
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
@@ -527,9 +491,8 @@
 	ld a, OAKS_POKEMON_TALK_10
 .ok
 	jp NextRadioLine
-; b88fe (2e:48fe)
 
-.Descriptors: ; b88fe
+.Descriptors
 	dw .cute
 	dw .weird
 	dw .pleasant
@@ -546,110 +509,93 @@
 	dw .guarded
 	dw .lovely
 	dw .speedy
-; b891e
 
-.cute: ; 0xb891e
+.cute
 	; cute.
-	text_jump UnknownText_0x1bc9c0
+	text_jump OPT_Cute
 	db "@"
-; 0xb8923
 
-.weird: ; 0xb8923
+.weird
 	; weird.
-	text_jump UnknownText_0x1bc9c8
+	text_jump OPT_Weird
 	db "@"
-; 0xb8928
 
-.pleasant: ; 0xb8928
+.pleasant
 	; pleasant.
-	text_jump UnknownText_0x1bc9d1
+	text_jump OPT_Pleasant
 	db "@"
-; 0xb892d
 
-.boldsortof: ; 0xb892d
+.boldsortof
 	; bold, sort of.
-	text_jump UnknownText_0x1bc9dd
+	text_jump OPT_BoldSortOf
 	db "@"
-; 0xb8932
 
-.frightening: ; 0xb8932
+.frightening
 	; frightening.
-	text_jump UnknownText_0x1bc9ee
+	text_jump OPT_Frightening
 	db "@"
-; 0xb8937
 
-.suavedebonair: ; 0xb8937
+.suavedebonair
 	; suave & debonair!
-	text_jump UnknownText_0x1bc9fd
+	text_jump OPT_SuaveDebonair
 	db "@"
-; 0xb893c
 
-.powerful: ; 0xb893c
+.powerful
 	; powerful.
-	text_jump UnknownText_0x1bca11
+	text_jump OPT_Powerful
 	db "@"
-; 0xb8941
 
-.exciting: ; 0xb8941
+.exciting
 	; exciting.
-	text_jump UnknownText_0x1bca1d
+	text_jump OPT_Exciting
 	db "@"
-; 0xb8946
 
-.groovy: ; 0xb8946
+.groovy
 	; groovy!
-	text_jump UnknownText_0x1bca29
+	text_jump OPT_Groovy
 	db "@"
-; 0xb894b
 
-.inspiring: ; 0xb894b
+.inspiring
 	; inspiring.
-	text_jump UnknownText_0x1bca33
+	text_jump OPT_Inspiring
 	db "@"
-; 0xb8950
 
-.friendly: ; 0xb8950
+.friendly
 	; friendly.
-	text_jump UnknownText_0x1bca40
+	text_jump OPT_Friendly
 	db "@"
-; 0xb8955
 
-.hothothot: ; 0xb8955
+.hothothot
 	; hot, hot, hot!
-	text_jump UnknownText_0x1bca4c
+	text_jump OPT_HotHotHot
 	db "@"
-; 0xb895a
 
-.stimulating: ; 0xb895a
+.stimulating
 	; stimulating.
-	text_jump UnknownText_0x1bca5d
+	text_jump OPT_Stimulating
 	db "@"
-; 0xb895f
 
-.guarded: ; 0xb895f
+.guarded
 	; guarded.
-	text_jump UnknownText_0x1bca6c
+	text_jump OPT_Guarded
 	db "@"
-; 0xb8964
 
-.lovely: ; 0xb8964
+.lovely
 	; lovely.
-	text_jump UnknownText_0x1bca77
+	text_jump OPT_Lovely
 	db "@"
-; 0xb8969
 
-.speedy: ; 0xb8969
+.speedy
 	; speedy.
-	text_jump UnknownText_0x1bca81
+	text_jump OPT_Speedy
 	db "@"
-; 0xb896e
 
-OaksPkmnTalk10: ; b896e (2e:496e)
+OaksPkmnTalk10:
 	callba RadioMusicRestartPokemonChannel
-	ld hl, UnknownText_0xb8993
+	ld hl, OPT_RestartText
 	call PrintText
 	call WaitBGMap
-	ld hl, UnknownText_0xb898e
+	ld hl, OPT_PokemonChannelText
 	call PrintText
 	ld a, OAKS_POKEMON_TALK_11
 	ld [wCurrentRadioLine], a
@@ -656,19 +602,16 @@
 	ld a, 100
 	ld [wRadioTextDelay], a
 	ret
-; b898e (2e:498e)
 
-UnknownText_0xb898e: ; 0xb898e
+OPT_PokemonChannelText:
 	; #MON
-	text_jump UnknownText_0x1bca8b
+	text_jump _OPT_PokemonChannelText
 	db "@"
-; 0xb8993
 
-UnknownText_0xb8993: ; 0xb8993
+OPT_RestartText:
 	db "@"
-; 0xb8994
 
-OaksPkmnTalk11: ; b8994 (2e:4994)
+OaksPkmnTalk11:
 	ld hl, wRadioTextDelay
 	dec [hl]
 	ret nz
@@ -676,13 +619,11 @@
 	ld de, .pokemon_string
 	ld a, OAKS_POKEMON_TALK_12
 	jp PlaceRadioString
-; b89a4 (2e:49a4)
 
-.pokemon_string:
+.pokemon_string
 	db "#MON@"
-; b89a9
 
-OaksPkmnTalk12: ; b89a9 (2e:49a9)
+OaksPkmnTalk12:
 	ld hl, wRadioTextDelay
 	dec [hl]
 	ret nz
@@ -690,13 +631,11 @@
 	ld de, .pokemon_channel_string
 	ld a, OAKS_POKEMON_TALK_13
 	jp PlaceRadioString
-; b89b9 (2e:49b9)
 
-.pokemon_channel_string:
+.pokemon_channel_string
 	db "#MON Channel@"
-; b89c6
 
-OaksPkmnTalk13: ; b89c6 (2e:49c6)
+OaksPkmnTalk13:
 	ld hl, wRadioTextDelay
 	dec [hl]
 	ret nz
@@ -704,13 +643,11 @@
 	ld de, .terminator
 	ld a, OAKS_POKEMON_TALK_14
 	jp PlaceRadioString
-; b89d6 (2e:49d6)
 
-.terminator:
+.terminator
 	db "@"
-; b89d7
 
-OaksPkmnTalk14: ; b89d7 (2e:49d7)
+OaksPkmnTalk14:
 	ld hl, wRadioTextDelay
 	dec [hl]
 	ret nz
@@ -727,25 +664,23 @@
 	ld a, 10
 	ld [wRadioTextDelay], a
 	ret
-; b89ff (2e:49ff)
 
-.terminator: ; 0xb89ff
+.terminator
 	db "@"
-; 0xb8a00
 
-PlaceRadioString: ; b8a00 (2e:4a00)
+PlaceRadioString:
 	ld [wCurrentRadioLine], a
 	ld a, 100
 	ld [wRadioTextDelay], a
 	jp PlaceString
 
-CopyBottomLineToTopLine: ; b8a0b (2e:4a0b)
+CopyBottomLineToTopLine:
 	hlcoord 0, 15
 	decoord 0, 13
 	ld bc, SCREEN_WIDTH * 2
 	jp CopyBytes
 
-ClearBottomLine: ; b8a17 (2e:4a17)
+ClearBottomLine:
 	hlcoord 1, 15
 	ld bc, SCREEN_WIDTH - 2
 	ld a, " "
@@ -755,7 +690,7 @@
 	ld a, " "
 	jp ByteFill
 
-PokedexShow_GetDexEntryBank: ; b8a2d (2e:4a2d)
+PokedexShow_GetDexEntryBank:
 	push hl
 	push de
 	ld a, [CurPartySpecies]
@@ -771,7 +706,6 @@
 	pop de
 	pop hl
 	ret
-; b8a42 (2e:4a42)
 
 .pokedexbanks
 	db BANK(PokedexEntries1)
@@ -778,9 +712,8 @@
 	db BANK(PokedexEntries2)
 	db BANK(PokedexEntries3)
 	db BANK(PokedexEntries4)
-; b8a46
 
-PokedexShow1: ; b8a46 (2e:4a46)
+PokedexShow1:
 	call StartRadioStation
 .loop
 	call Random
@@ -797,19 +730,18 @@
 	ld [CurPartySpecies], a
 	ld [wNamedObjectIndexBuffer], a
 	call GetPokemonName
-	ld hl, UnknownText_0xb8b30
+	ld hl, PokedexShowText
 	ld a, POKEDEX_SHOW_2
 	jp NextRadioLine
 
-PokedexShow2: ; b8a6c (2e:4a6c)
+PokedexShow2:
 	ld a, [CurPartySpecies]
 	dec a
 	ld hl, PokedexDataPointerTable
 	ld c, a
 	ld b, 0
-rept 2
 	add hl, bc
-endr
+	add hl, bc
 	ld a, BANK(PokedexDataPointerTable)
 	call GetFarHalfword
 	call PokedexShow_GetDexEntryBank
@@ -833,37 +765,37 @@
 	ld a, POKEDEX_SHOW_3
 	jp PrintRadioLine
 
-PokedexShow3: ; b8aa4 (2e:4aa4)
+PokedexShow3:
 	call CopyDexEntry
 	ld a, POKEDEX_SHOW_4
 	jp PrintRadioLine
 
-PokedexShow4: ; b8aac (2e:4aac)
+PokedexShow4:
 	call CopyDexEntry
 	ld a, POKEDEX_SHOW_5
 	jp PrintRadioLine
 
-PokedexShow5: ; b8ab4 (2e:4ab4)
+PokedexShow5:
 	call CopyDexEntry
 	ld a, POKEDEX_SHOW_6
 	jp PrintRadioLine
 
-PokedexShow6: ; b8abc (2e:4abc)
+PokedexShow6:
 	call CopyDexEntry
 	ld a, POKEDEX_SHOW_7
 	jp PrintRadioLine
 
-PokedexShow7: ; b8ac4 (2e:4ac4)
+PokedexShow7:
 	call CopyDexEntry
 	ld a, POKEDEX_SHOW_8
 	jp PrintRadioLine
 
-PokedexShow8: ; b8acc (2e:4acc)
+PokedexShow8:
 	call CopyDexEntry
 	ld a, POKEDEX_SHOW
 	jp PrintRadioLine
 
-CopyDexEntry: ; b8ad4 (2e:4ad4)
+CopyDexEntry:
 	ld a, [wPokedexShowPointerAddr]
 	ld l, a
 	ld a, [wPokedexShowPointerAddr + 1]
@@ -881,7 +813,7 @@
 	call CopyDexEntryPart2
 	ret
 
-CopyDexEntryPart1: ; b8af3 (2e:4af3)
+CopyDexEntryPart1:
 	ld de, wPokedexShowPointerBank
 	ld bc, SCREEN_WIDTH - 1
 	call FarCopyBytes
@@ -900,7 +832,7 @@
 	ret z
 	jr .loop
 
-CopyDexEntryPart2: ; b8b11 (2e:4b11)
+CopyDexEntryPart2:
 	ld d, a
 .loop
 	ld a, d
@@ -920,70 +852,68 @@
 	ld a, d
 	ld [wPokedexShowPointerBank], a
 	ret
-; b8b30 (2e:4b30)
 
-UnknownText_0xb8b30: ; 0xb8b30
+PokedexShowText:
 	; @ @
-	text_jump UnknownText_0x1bca91
+	text_jump _PokedexShowText
 	db "@"
-; 0xb8b35
 
-BenMonMusic1: ; b8b35 (2e:4b35)
+BenMonMusic1:
 	call StartPokemonMusicChannel
-	ld hl, UnknownText_0xb8baa
+	ld hl, BenIntroText1
 	ld a, POKEMON_MUSIC_2
 	jp NextRadioLine
 
-BenMonMusic2: ; b8b40 (2e:4b40)
-	ld hl, UnknownText_0xb8baf
+BenMonMusic2:
+	ld hl, BenIntroText2
 	ld a, POKEMON_MUSIC_3
 	jp NextRadioLine
 
-BenMonMusic3: ; b8b48 (2e:4b48)
-	ld hl, UnknownText_0xb8bb4
+BenMonMusic3:
+	ld hl, BenIntroText3
 	ld a, POKEMON_MUSIC_4
 	jp NextRadioLine
 
-FernMonMusic1: ; b8b50 (2e:4b50)
+FernMonMusic1:
 	call StartPokemonMusicChannel
-	ld hl, UnknownText_0xb8bb9
+	ld hl, FernIntroText1
 	ld a, LETS_ALL_SING_2
 	jp NextRadioLine
 
-FernMonMusic2: ; b8b5b (2e:4b5b)
-	ld hl, UnknownText_0xb8bbe
+FernMonMusic2:
+	ld hl, FernIntroMusic2
 	ld a, POKEMON_MUSIC_4
 	jp NextRadioLine
 
-BenFernMusic4: ; b8b63 (2e:4b63)
-	ld hl, UnknownText_0xb8bc3
+BenFernMusic4:
+	ld hl, BenFernText1
 	ld a, POKEMON_MUSIC_5
 	jp NextRadioLine
 
-BenFernMusic5: ; b8b6b (2e:4b6b)
+BenFernMusic5:
 	call GetWeekday
 	and 1
-	ld hl, UnknownText_0xb8bc8
+	ld hl, BenFernText2A
 	jr z, .SunTueThurSun
-	ld hl, UnknownText_0xb8bcd
+	ld hl, BenFernText2B
 .SunTueThurSun
 	ld a, POKEMON_MUSIC_6
 	jp NextRadioLine
 
-BenFernMusic6: ; b8b7d (2e:4b7d)
+BenFernMusic6:
 	call GetWeekday
 	and 1
-	ld hl, UnknownText_0xb8bd2
+	ld hl, BenFernText3A
 	jr z, .SunTueThurSun
-	ld hl, UnknownText_0xb8bd7
+	ld hl, BenFernText3B
 .SunTueThurSun
 	ld a, POKEMON_MUSIC_7
 	jp NextRadioLine
 
-BenFernMusic7: ; b8b8f (2e:4b8f)
+BenFernMusic7:
 	ret
 
-StartPokemonMusicChannel: ; b8b90 (2e:4b90)
+StartPokemonMusicChannel:
 	call RadioTerminator
 	call PrintText
 	ld de, MUSIC_POKEMON_MARCH
@@ -994,109 +924,98 @@
 .SunTueThurSun
 	callab RadioMusicRestartDE
 	ret
-; b8baa (2e:4baa)
 
-UnknownText_0xb8baa: ; 0xb8baa
+BenIntroText1:
 	; BEN: #MON MUSIC
-	text_jump UnknownText_0x1bca99
+	text_jump _BenIntroText1
 	db "@"
-; 0xb8baf
 
-UnknownText_0xb8baf: ; 0xb8baf
+BenIntroText2:
 	; CHANNEL!
-	text_jump UnknownText_0x1bcaab
+	text_jump _BenIntroText2
 	db "@"
-; 0xb8bb4
 
-UnknownText_0xb8bb4: ; 0xb8bb4
+BenIntroText3:
 	; It's me, DJ BEN!
-	text_jump UnknownText_0x1bcab6
+	text_jump _BenIntroText3
 	db "@"
-; 0xb8bb9
 
-UnknownText_0xb8bb9: ; 0xb8bb9
+FernIntroText1:
 	; FERN: #MUSIC!
-	text_jump UnknownText_0x1bcac8
+	text_jump _FernIntroText1
 	db "@"
-; 0xb8bbe
 
-UnknownText_0xb8bbe: ; 0xb8bbe
+FernIntroMusic2:
 	; With DJ FERN!
-	text_jump UnknownText_0x1bcad8
+	text_jump _FernIntroText2
 	db "@"
-; 0xb8bc3
 
-UnknownText_0xb8bc3: ; 0xb8bc3
+BenFernText1:
 	; Today's @ ,
-	text_jump UnknownText_0x1bcae8
+	text_jump _BenFernText1
 	db "@"
-; 0xb8bc8
 
-UnknownText_0xb8bc8: ; 0xb8bc8
+BenFernText2A:
 	; so let us jam to
-	text_jump UnknownText_0x1bcaf6
+	text_jump _BenFernText2A
 	db "@"
-; 0xb8bcd
 
-UnknownText_0xb8bcd: ; 0xb8bcd
+BenFernText2B:
 	; so chill out to
-	text_jump UnknownText_0x1bcb09
+	text_jump _BenFernText2B
 	db "@"
-; 0xb8bd2
 
-UnknownText_0xb8bd2: ; 0xb8bd2
+BenFernText3A:
 	; #MON March!
-	text_jump UnknownText_0x1bcb1b
+	text_jump _BenFernText3A
 	db "@"
-; 0xb8bd7
 
-UnknownText_0xb8bd7: ; 0xb8bd7
+BenFernText3B:
 	; #MON Lullaby!
-	text_jump UnknownText_0x1bcb29
+	text_jump _BenFernText3B
 	db "@"
-; 0xb8bdc
 
-LuckyNumberShow1: ; b8bdc (2e:4bdc)
+LuckyNumberShow1:
 	call StartRadioStation
 	callab Special_CheckLuckyNumberShowFlag
 	jr nc, .dontreset
 	callab Special_ResetLuckyNumberShowFlag
 .dontreset
-	ld hl, UnknownText_0xb8c7e
+	ld hl, LC_Text1
 	ld a, LUCKY_NUMBER_SHOW_2
 	jp NextRadioLine
 
-LuckyNumberShow2: ; b8bf5 (2e:4bf5)
-	ld hl, UnknownText_0xb8c83
+LuckyNumberShow2:
+	ld hl, LC_Text2
 	ld a, LUCKY_NUMBER_SHOW_3
 	jp NextRadioLine
 
-LuckyNumberShow3: ; b8bfd (2e:4bfd)
-	ld hl, UnknownText_0xb8c88
+LuckyNumberShow3:
+	ld hl, LC_Text3
 	ld a, LUCKY_NUMBER_SHOW_4
 	jp NextRadioLine
 
-LuckyNumberShow4: ; b8c05 (2e:4c05)
-	ld hl, UnknownText_0xb8c8d
+LuckyNumberShow4:
+	ld hl, LC_Text4
 	ld a, LUCKY_NUMBER_SHOW_5
 	jp NextRadioLine
 
-LuckyNumberShow5: ; b8c0d (2e:4c0d)
-	ld hl, UnknownText_0xb8c92
+LuckyNumberShow5:
+	ld hl, LC_Text5
 	ld a, LUCKY_NUMBER_SHOW_6
 	jp NextRadioLine
 
-LuckyNumberShow6: ; b8c15 (2e:4c15)
-	ld hl, UnknownText_0xb8c97
+LuckyNumberShow6:
+	ld hl, LC_Text6
 	ld a, LUCKY_NUMBER_SHOW_7
 	jp NextRadioLine
 
-LuckyNumberShow7: ; b8c1d (2e:4c1d)
-	ld hl, UnknownText_0xb8c9c
+LuckyNumberShow7:
+	ld hl, LC_Text7
 	ld a, LUCKY_NUMBER_SHOW_8
 	jp NextRadioLine
 
-LuckyNumberShow8: ; b8c25 (2e:4c25)
+LuckyNumberShow8:
 	ld hl, StringBuffer1
 	ld de, wLuckyIDNumber
 	lb bc, PRINTNUM_LEADINGZEROS | 2, 5
@@ -1103,32 +1022,32 @@
 	call PrintNum
 	ld a, "@"
 	ld [StringBuffer1 + 5], a
-	ld hl, UnknownText_0xb8ca1
+	ld hl, LC_Text8
 	ld a, LUCKY_NUMBER_SHOW_9
 	jp NextRadioLine
 
-LuckyNumberShow9: ; b8c3e (2e:4c3e)
-	ld hl, UnknownText_0xb8ca6
+LuckyNumberShow9:
+	ld hl, LC_Text9
 	ld a, LUCKY_NUMBER_SHOW_10
 	jp NextRadioLine
 
-LuckyNumberShow10: ; b8c46 (2e:4c46)
-	ld hl, UnknownText_0xb8c9c
+LuckyNumberShow10:
+	ld hl, LC_Text7
 	ld a, LUCKY_NUMBER_SHOW_11
 	jp NextRadioLine
 
-LuckyNumberShow11: ; b8c4e (2e:4c4e)
-	ld hl, UnknownText_0xb8ca1
+LuckyNumberShow11:
+	ld hl, LC_Text8
 	ld a, LUCKY_NUMBER_SHOW_12
 	jp NextRadioLine
 
-LuckyNumberShow12: ; b8c56 (2e:4c56)
-	ld hl, UnknownText_0xb8cab
+LuckyNumberShow12:
+	ld hl, LC_Text10
 	ld a, LUCKY_NUMBER_SHOW_13
 	jp NextRadioLine
 
-LuckyNumberShow13: ; b8c5e (2e:4c5e)
-	ld hl, UnknownText_0xb8cb0
+LuckyNumberShow13:
+	ld hl, LC_Text11
 	call Random
 	and a
 	ld a, LUCKY_CHANNEL
@@ -1137,108 +1056,94 @@
 .okay
 	jp NextRadioLine
 
-LuckyNumberShow14: ; b8c6e (2e:4c6e)
-	ld hl, UnknownText_0xb8cb5
+LuckyNumberShow14:
+	ld hl, LC_DragText1
 	ld a, LUCKY_NUMBER_SHOW_15
 	jp NextRadioLine
 
-LuckyNumberShow15: ; b8c76 (2e:4c76)
-	ld hl, UnknownText_0xb8cba
+LuckyNumberShow15:
+	ld hl, LC_DragText2
 	ld a, LUCKY_CHANNEL
 	jp NextRadioLine
-; b8c7e (2e:4c7e)
 
-UnknownText_0xb8c7e: ; 0xb8c7e
+LC_Text1:
 	; REED: Yeehaw! How
-	text_jump UnknownText_0x1bcb39
+	text_jump _LC_Text1
 	db "@"
-; 0xb8c83
 
-UnknownText_0xb8c83: ; 0xb8c83
+LC_Text2:
 	; y'all doin' now?
-	text_jump UnknownText_0x1bcb4d
+	text_jump _LC_Text2
 	db "@"
-; 0xb8c88
 
-UnknownText_0xb8c88: ; 0xb8c88
+LC_Text3:
 	; Whether you're up
-	text_jump UnknownText_0x1bcb60
+	text_jump _LC_Text3
 	db "@"
-; 0xb8c8d
 
-UnknownText_0xb8c8d: ; 0xb8c8d
+LC_Text4:
 	; or way down low,
-	text_jump UnknownText_0x1bcb73
+	text_jump _LC_Text4
 	db "@"
-; 0xb8c92
 
-UnknownText_0xb8c92: ; 0xb8c92
+LC_Text5:
 	; don't you miss the
-	text_jump UnknownText_0x1bcb86
+	text_jump _LC_Text5
 	db "@"
-; 0xb8c97
 
-UnknownText_0xb8c97: ; 0xb8c97
+LC_Text6:
 	; LUCKY NUMBER SHOW!
-	text_jump UnknownText_0x1bcb9a
+	text_jump _LC_Text6
 	db "@"
-; 0xb8c9c
 
-UnknownText_0xb8c9c: ; 0xb8c9c
+LC_Text7:
 	; This week's Lucky
-	text_jump UnknownText_0x1bcbaf
+	text_jump _LC_Text7
 	db "@"
-; 0xb8ca1
 
-UnknownText_0xb8ca1: ; 0xb8ca1
+LC_Text8:
 	; Number is @ !
-	text_jump UnknownText_0x1bcbc2
+	text_jump _LC_Text8
 	db "@"
-; 0xb8ca6
 
-UnknownText_0xb8ca6: ; 0xb8ca6
+LC_Text9:
 	; I'll repeat that!
-	text_jump UnknownText_0x1bcbd6
+	text_jump _LC_Text9
 	db "@"
-; 0xb8cab
 
-UnknownText_0xb8cab: ; 0xb8cab
+LC_Text10:
 	; Match it and go to
-	text_jump UnknownText_0x1bcbe9
+	text_jump _LC_Text10
 	db "@"
-; 0xb8cb0
 
-UnknownText_0xb8cb0: ; 0xb8cb0
+LC_Text11:
 	; the RADIO TOWER!
-	text_jump UnknownText_0x1bcbfe
+	text_jump _LC_Text11
 	db "@"
-; 0xb8cb5
 
-UnknownText_0xb8cb5: ; 0xb8cb5
+LC_DragText1:
 	; …Repeating myself
-	text_jump UnknownText_0x1bcc11
+	text_jump _LC_DragText1
 	db "@"
-; 0xb8cba
 
-UnknownText_0xb8cba: ; 0xb8cba
+LC_DragText2:
 	; gets to be a drag…
-	text_jump UnknownText_0x1bcc25
+	text_jump _LC_DragText2
 	db "@"
-; 0xb8cbf
 
-PeoplePlaces1: ; b8cbf (2e:4cbf)
+PeoplePlaces1:
 	call StartRadioStation
-	ld hl, UnknownText_0xb8ce3
+	ld hl, PnP_Text1
 	ld a, PLACES_AND_PEOPLE_2
 	jp NextRadioLine
 
-PeoplePlaces2: ; b8cca (2e:4cca)
-	ld hl, UnknownText_0xb8ce8
+PeoplePlaces2:
+	ld hl, PnP_Text2
 	ld a, PLACES_AND_PEOPLE_3
 	jp NextRadioLine
 
-PeoplePlaces3: ; b8cd2 (2e:4cd2)
-	ld hl, UnknownText_0xb8ced
+PeoplePlaces3:
+	ld hl, PnP_Text3
 	call Random
 	cp $7b ; 48 percent
 	ld a, PLACES_AND_PEOPLE_4 ; People
@@ -1246,25 +1151,21 @@
 	ld a, PLACES_AND_PEOPLE_6 ; Places
 .ok
 	jp NextRadioLine
-; b8ce3 (2e:4ce3)
 
-UnknownText_0xb8ce3: ; 0xb8ce3
+PnP_Text1:
 	; PLACES AND PEOPLE!
-	text_jump UnknownText_0x1bcc3a
+	text_jump _PnP_Text1
 	db "@"
-; 0xb8ce8
 
-UnknownText_0xb8ce8: ; 0xb8ce8
+PnP_Text2:
 	; Brought to you by
-	text_jump UnknownText_0x1bcc4f
+	text_jump _PnP_Text2
 	db "@"
-; 0xb8ced
 
-UnknownText_0xb8ced: ; 0xb8ced
+PnP_Text3:
 	; me, DJ LILY!
-	text_jump UnknownText_0x1bcc63
+	text_jump _PnP_Text3
 	db "@"
-; 0xb8cf2
 
 PeoplePlaces4: ; People
 	call Random
@@ -1297,32 +1198,28 @@
 	pop bc
 	ld b, 1
 	callab GetTrainerName
-	ld hl, UnknownText_0xb8d51
+	ld hl, PnP_Text4
 	ld a, PLACES_AND_PEOPLE_5
 	jp NextRadioLine
-; b8d3e (2e:4d3e)
 
 .E4Names:          db WILL, BRUNO, KAREN, KOGA, CHAMPION
 .KantoLeaderNames: db BROCK, MISTY, LT_SURGE, ERIKA, JANINE, SABRINA, BLAINE, BLUE
 .MiscNames:        db RIVAL1, POKEMON_PROF, CAL, RIVAL2, RED
                    db -1
-; b8d51
 
-UnknownText_0xb8d51: ; 0xb8d51
+PnP_Text4:
 	; @  @ @
-	text_jump UnknownText_0x1bcc72
+	text_jump _PnP_Text4
 	db "@"
-; 0xb8d56
 
-PeoplePlaces5: ; b8d56 (2e:4d56)
+PeoplePlaces5:
 	call Random
 	and $f
 	ld e, a
 	ld d, 0
 	ld hl, .Descriptors
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
@@ -1443,9 +1340,8 @@
 	ld hl, .Maps
 	ld c, a
 	ld b, 0
-rept 2
 	add hl, bc
-endr
+	add hl, bc
 	ld b, [hl]
 	inc hl
 	ld c, [hl]
@@ -1452,12 +1348,11 @@
 	call GetWorldMapLocation
 	ld e, a
 	callba GetLandmarkName
-	ld hl, UnknownText_0xb8e23
+	ld hl, PnP_Text5
 	ld a, PLACES_AND_PEOPLE_7
 	jp NextRadioLine
-; b8e11 (2e:4e11)
 
-.Maps: ; b8e11
+.Maps
 	map PALLET_TOWN
 	map ROUTE_22
 	map PEWTER_CITY
@@ -1467,23 +1362,20 @@
 	map ROUTE_16
 	map ROUTE_14
 	map CINNABAR_POKECENTER_2F_BETA
-; b8e23
 
-UnknownText_0xb8e23: ; 0xb8e23
+PnP_Text5:
 	; @ @
-	text_jump UnknownText_0x1bcda0
+	text_jump _PnP_Text5
 	db "@"
-; 0xb8e28
 
-PeoplePlaces7: ; b8e28 (2e:4e28)
+PeoplePlaces7:
 	call Random
 	and $f
 	ld e, a
 	ld d, 0
 	ld hl, .Descriptors
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
@@ -1499,9 +1391,8 @@
 	ld a, PLACES_AND_PEOPLE_6 ; Places
 .ok
 	jp PrintRadioLine
-; b8e52 (2e:4e52)
 
-.Descriptors:
+.Descriptors
 	dw PnP_cute
 	dw PnP_lazy
 	dw PnP_happy
@@ -1519,137 +1410,126 @@
 	dw PnP_rightforme
 	dw PnP_odd
 
-RocketRadio1: ; b8e72 (2e:4e72)
+RocketRadio1:
 	call StartRadioStation
-	ld hl, UnknownText_0xb8ec5
+	ld hl, RocketRadioText1
 	ld a, ROCKET_RADIO_2
 	jp NextRadioLine
 
-RocketRadio2: ; b8e7d (2e:4e7d)
-	ld hl, UnknownText_0xb8eca
+RocketRadio2:
+	ld hl, RocketRadioText2
 	ld a, ROCKET_RADIO_3
 	jp NextRadioLine
 
-RocketRadio3: ; b8e85 (2e:4e85)
-	ld hl, UnknownText_0xb8ecf
+RocketRadio3:
+	ld hl, RocketRadioText3
 	ld a, ROCKET_RADIO_4
 	jp NextRadioLine
 
-RocketRadio4: ; b8e8d (2e:4e8d)
-	ld hl, UnknownText_0xb8ed4
+RocketRadio4:
+	ld hl, RocketRadioText4
 	ld a, ROCKET_RADIO_5
 	jp NextRadioLine
 
-RocketRadio5: ; b8e95 (2e:4e95)
-	ld hl, UnknownText_0xb8ed9
+RocketRadio5:
+	ld hl, RocketRadioText5
 	ld a, ROCKET_RADIO_6
 	jp NextRadioLine
 
-RocketRadio6: ; b8e9d (2e:4e9d)
-	ld hl, UnknownText_0xb8ede
+RocketRadio6:
+	ld hl, RocketRadioText6
 	ld a, ROCKET_RADIO_7
 	jp NextRadioLine
 
-RocketRadio7: ; b8ea5 (2e:4ea5)
-	ld hl, UnknownText_0xb8ee3
+RocketRadio7:
+	ld hl, RocketRadioText7
 	ld a, ROCKET_RADIO_8
 	jp NextRadioLine
 
-RocketRadio8: ; b8ead (2e:4ead)
-	ld hl, UnknownText_0xb8ee8
+RocketRadio8:
+	ld hl, RocketRadioText8
 	ld a, ROCKET_RADIO_9
 	jp NextRadioLine
 
-RocketRadio9: ; b8eb5 (2e:4eb5)
-	ld hl, UnknownText_0xb8eed
+RocketRadio9:
+	ld hl, RocketRadioText9
 	ld a, ROCKET_RADIO_10
 	jp NextRadioLine
 
-RocketRadio10: ; b8ebd (2e:4ebd)
-	ld hl, UnknownText_0xb8ef2
+RocketRadio10:
+	ld hl, RocketRadioText10
 	ld a, ROCKET_RADIO
 	jp NextRadioLine
-; b8ec5 (2e:4ec5)
 
-UnknownText_0xb8ec5: ; 0xb8ec5
+RocketRadioText1:
 	; … …Ahem, we are
-	text_jump UnknownText_0x1bcda8
+	text_jump _RocketRadioText1
 	db "@"
-; 0xb8eca
 
-UnknownText_0xb8eca: ; 0xb8eca
+RocketRadioText2:
 	; TEAM ROCKET!
-	text_jump UnknownText_0x1bcdba
+	text_jump _RocketRadioText2
 	db "@"
-; 0xb8ecf
 
-UnknownText_0xb8ecf: ; 0xb8ecf
+RocketRadioText3:
 	; After three years
-	text_jump UnknownText_0x1bcdc9
+	text_jump _RocketRadioText3
 	db "@"
-; 0xb8ed4
 
-UnknownText_0xb8ed4: ; 0xb8ed4
+RocketRadioText4:
 	; of preparation, we
-	text_jump UnknownText_0x1bcddd
+	text_jump _RocketRadioText4
 	db "@"
-; 0xb8ed9
 
-UnknownText_0xb8ed9: ; 0xb8ed9
+RocketRadioText5:
 	; have risen again
-	text_jump UnknownText_0x1bcdf2
+	text_jump _RocketRadioText5
 	db "@"
-; 0xb8ede
 
-UnknownText_0xb8ede: ; 0xb8ede
+RocketRadioText6:
 	; from the ashes!
-	text_jump UnknownText_0x1bce05
+	text_jump _RocketRadioText6
 	db "@"
-; 0xb8ee3
 
-UnknownText_0xb8ee3: ; 0xb8ee3
+RocketRadioText7:
 	; GIOVANNI! @ Can you
-	text_jump UnknownText_0x1bce17
+	text_jump _RocketRadioText7
 	db "@"
-; 0xb8ee8
 
-UnknownText_0xb8ee8: ; 0xb8ee8
+RocketRadioText8:
 	; hear?@  We did it!
-	text_jump UnknownText_0x1bce2e
+	text_jump _RocketRadioText8
 	db "@"
-; 0xb8eed
 
-UnknownText_0xb8eed: ; 0xb8eed
+RocketRadioText9:
 	; @ Where is our boss?
-	text_jump UnknownText_0x1bce44
+	text_jump _RocketRadioText9
 	db "@"
-; 0xb8ef2
 
-UnknownText_0xb8ef2: ; 0xb8ef2
+RocketRadioText10:
 	; @ Is he listening?
-	text_jump UnknownText_0x1bce5c
+	text_jump _RocketRadioText10
 	db "@"
-; 0xb8ef7
 
-PokeFluteRadio: ; b8ef7 (2e:4ef7)
+PokeFluteRadio:
 	call StartRadioStation
 	ld a, 1
 	ld [wNumRadioLinesPrinted], a
 	ret
 
-UnownRadio: ; b8f00 (2e:4f00)
+UnownRadio:
 	call StartRadioStation
 	ld a, 1
 	ld [wNumRadioLinesPrinted], a
 	ret
 
-EvolutionRadio: ; b8f09 (2e:4f09)
+EvolutionRadio:
 	call StartRadioStation
 	ld a, 1
 	ld [wNumRadioLinesPrinted], a
 	ret
 
-BuenasPassword1: ; b8f12 (2e:4f12)
+BuenasPassword1:
 ; Determine if we need to be here
 	call BuenasPasswordCheckTime
 	jp nc, .PlayPassword
@@ -1658,34 +1538,34 @@
 	jp z, BuenasPassword20
 	jp BuenasPassword8
 
-.PlayPassword: ; b8f22 (2e:4f22)
+.PlayPassword
 	call StartRadioStation
 	ld a, [hBGMapMode]
 	push af
 	xor a
 	ld [hBGMapMode], a
-	ld de, String_b9171
+	ld de, BuenasPasswordChannelName
 	hlcoord 2, 9
 	call PlaceString
 	pop af
 	ld [hBGMapMode], a
-	ld hl, UnknownText_0xb9182
+	ld hl, BuenaRadioText1
 	ld a, BUENAS_PASSWORD_2
 	jp NextRadioLine
 
-BuenasPassword2: ; b8f3f (2e:4f3f)
-	ld hl, UnknownText_0xb9187
+BuenasPassword2:
+	ld hl, BuenaRadioText2
 	ld a, BUENAS_PASSWORD_3
 	jp NextRadioLine
 
-BuenasPassword3: ; b8f47 (2e:4f47)
+BuenasPassword3:
 	call BuenasPasswordCheckTime
-	ld hl, UnknownText_0xb918c
+	ld hl, BuenaRadioText3
 	jp c, BuenasPasswordAfterMidnight
 	ld a, BUENAS_PASSWORD_4
 	jp NextRadioLine
 
-BuenasPassword4: ; b8f55 (2e:4f55)
+BuenasPassword4:
 	call BuenasPasswordCheckTime
 	jp c, BuenasPassword8
 	ld a, [wBuenasPassword]
@@ -1717,11 +1597,11 @@
 .AlreadyGotIt
 	ld c, a
 	call GetBuenasPassword
-	ld hl, UnknownText_0xb9191
+	ld hl, BuenaRadioText4
 	ld a, BUENAS_PASSWORD_5
 	jp NextRadioLine
 
-GetBuenasPassword: ; b8f8f
+GetBuenasPassword:
 ; The password indices are held in c.  High nybble contains the group index, low nybble contains the word index.
 ; Load the password group pointer in hl.
 	ld a, c
@@ -1730,9 +1610,8 @@
 	ld hl, PasswordTable
 	ld d, 0
 	ld e, a
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
@@ -1748,9 +1627,8 @@
 	push hl
 	ld hl, .StringFunctionJumpTable
 	ld e, b
-rept 2
 	add hl, de
-endr
+	add hl, de
 	ld a, [hli]
 	ld h, [hl]
 	ld l, a
@@ -1759,10 +1637,8 @@
 	pop hl
 	ld c, [hl]
 	ret
-; b8fb8
 
-
-.StringFunctionJumpTable: ; b8fb8 (2e:4fb8)
+.StringFunctionJumpTable
 	dw .Mon
 	dw .Item
 	dw .Move
@@ -1769,22 +1645,22 @@
 	dw .RawString
 
 
-.Mon: ; b8fc0 (2e:4fc0)
+.Mon
 	call .GetTheIndex
 	call GetPokemonName
 	ret
 
-.Item: ; b8fc7 (2e:4fc7)
+.Item
 	call .GetTheIndex
 	call GetItemName
 	ret
 
-.Move: ; b8fce (2e:4fce)
+.Move
 	call .GetTheIndex
 	call GetMoveName
 	ret
 
-.GetTheIndex: ; b8fd5 (2e:4fd5)
+.GetTheIndex
 	ld h, 0
 	ld l, c
 	add hl, de
@@ -1792,7 +1668,7 @@
 	ld [wNamedObjectIndexBuffer], a
 	ret
 
-.RawString: ; b8fde (2e:4fde)
+.RawString
 ; Get the string from the table...
 	ld a, c
 	and a
@@ -1815,9 +1691,8 @@
 	jr nz, .copy_loop
 	ld de, StringBuffer1
 	ret
-; b8ff9 (2e:4ff9)
 
-PasswordTable: ; b8ff9
+PasswordTable:
 	dw .JohtoStarters
 	dw .Beverages
 	dw .HealingItems
@@ -1829,8 +1704,7 @@
 	dw .Moves
 	dw .XItems
 	dw .RadioStations
-; b900f
-                     ; string type, points, option 1, option 2, option 3
+                    ; string type, points, option 1, option 2, option 3
 .JohtoStarters:      db BUENA_MON,    10, CYNDAQUIL, TOTODILE, CHIKORITA
 .Beverages:          db BUENA_ITEM,   12, FRESH_WATER, SODA_POP, LEMONADE
 .HealingItems:       db BUENA_ITEM,   12, POTION, ANTIDOTE, PARLYZ_HEAL
@@ -1842,26 +1716,25 @@
 .Moves:              db BUENA_MOVE,   12, TACKLE, GROWL, MUD_SLAP
 .XItems:             db BUENA_ITEM,   12, X_ATTACK, X_DEFEND, X_SPEED
 .RadioStations:      db BUENA_STRING, 13, "#MON Talk@", "#MON Music@", "Lucky Channel@"
-; b909c
 
-BuenasPassword5: ; b909c (2e:509c)
-	ld hl, UnknownText_0xb9196
+BuenasPassword5:
+	ld hl, BuenaRadioText5
 	ld a, BUENAS_PASSWORD_6
 	jp NextRadioLine
 
-BuenasPassword6: ; b90a4 (2e:50a4)
-	ld hl, UnknownText_0xb919b
+BuenasPassword6:
+	ld hl, BuenaRadioText6
 	ld a, BUENAS_PASSWORD_7
 	jp NextRadioLine
 
-BuenasPassword7: ; b90ac (2e:50ac)
+BuenasPassword7:
 	call BuenasPasswordCheckTime
-	ld hl, UnknownText_0xb91a0
+	ld hl, BuenaRadioText7
 	jr c, BuenasPasswordAfterMidnight
 	ld a, BUENAS_PASSWORD
 	jp NextRadioLine
 
-BuenasPasswordAfterMidnight: ; b90b9 (2e:50b9)
+BuenasPasswordAfterMidnight:
 	push hl
 	ld hl, WeeklyFlags
 	res 7, [hl]
@@ -1869,69 +1742,69 @@
 	ld a, BUENAS_PASSWORD_8
 	jp NextRadioLine
 
-BuenasPassword8: ; b90c5 (2e:50c5)
+BuenasPassword8:
 	ld hl, WeeklyFlags
 	res 7, [hl]
-	ld hl, UnknownText_0xb91d2
+	ld hl, BuenaRadioMidnightText10
 	ld a, BUENAS_PASSWORD_9
 	jp NextRadioLine
 
-BuenasPassword9: ; b90d2 (2e:50d2)
-	ld hl, UnknownText_0xb91a5
+BuenasPassword9:
+	ld hl, BuenaRadioMidnightText1
 	ld a, BUENAS_PASSWORD_10
 	jp NextRadioLine
 
-BuenasPassword10: ; b90da (2e:50da)
-	ld hl, UnknownText_0xb91aa
+BuenasPassword10:
+	ld hl, BuenaRadioMidnightText2
 	ld a, BUENAS_PASSWORD_11
 	jp NextRadioLine
 
-BuenasPassword11: ; b90e2 (2e:50e2)
-	ld hl, UnknownText_0xb91af
+BuenasPassword11:
+	ld hl, BuenaRadioMidnightText3
 	ld a, BUENAS_PASSWORD_12
 	jp NextRadioLine
 
-BuenasPassword12: ; b90ea (2e:50ea)
-	ld hl, UnknownText_0xb91b4
+BuenasPassword12:
+	ld hl, BuenaRadioMidnightText4
 	ld a, BUENAS_PASSWORD_13
 	jp NextRadioLine
 
-BuenasPassword13: ; b90f2 (2e:50f2)
-	ld hl, UnknownText_0xb91b9
+BuenasPassword13:
+	ld hl, BuenaRadioMidnightText5
 	ld a, BUENAS_PASSWORD_14
 	jp NextRadioLine
 
-BuenasPassword14: ; b90fa (2e:50fa)
-	ld hl, UnknownText_0xb91be
+BuenasPassword14:
+	ld hl, BuenaRadioMidnightText6
 	ld a, BUENAS_PASSWORD_15
 	jp NextRadioLine
 
-BuenasPassword15: ; b9102 (2e:5102)
-	ld hl, UnknownText_0xb91c3
+BuenasPassword15:
+	ld hl, BuenaRadioMidnightText7
 	ld a, BUENAS_PASSWORD_16
 	jp NextRadioLine
 
-BuenasPassword16: ; b910a (2e:510a)
-	ld hl, UnknownText_0xb91c8
+BuenasPassword16:
+	ld hl, BuenaRadioMidnightText8
 	ld a, BUENAS_PASSWORD_17
 	jp NextRadioLine
 
-BuenasPassword17: ; b9112 (2e:5112)
-	ld hl, UnknownText_0xb91cd
+BuenasPassword17:
+	ld hl, BuenaRadioMidnightText9
 	ld a, BUENAS_PASSWORD_18
 	jp NextRadioLine
 
-BuenasPassword18: ; b911a (2e:511a)
-	ld hl, UnknownText_0xb91d2
+BuenasPassword18:
+	ld hl, BuenaRadioMidnightText10
 	ld a, BUENAS_PASSWORD_19
 	jp NextRadioLine
 
-BuenasPassword19: ; b9122 (2e:5122)
-	ld hl, UnknownText_0xb91d2
+BuenasPassword19:
+	ld hl, BuenaRadioMidnightText10
 	ld a, BUENAS_PASSWORD_20
 	jp NextRadioLine
 
-BuenasPassword20: ; b912a (2e:512a)
+BuenasPassword20:
 	ld a, [hBGMapMode]
 	push af
 	callba NoRadioMusic
@@ -1944,11 +1817,11 @@
 	ld [wCurrentRadioLine], a
 	xor a
 	ld [wNumRadioLinesPrinted], a
-	ld hl, UnknownText_0xb91d7
+	ld hl, BuenaOffTheAirText
 	ld a, BUENAS_PASSWORD_21
 	jp NextRadioLine
 
-BuenasPassword21: ; b9152 (2e:5152)
+BuenasPassword21:
 	ld a, BUENAS_PASSWORD
 	ld [wCurrentRadioLine], a
 	xor a
@@ -1955,130 +1828,110 @@
 	ld [wNumRadioLinesPrinted], a
 	call BuenasPasswordCheckTime
 	jp nc, BuenasPassword1
-	ld hl, UnknownText_0xb91d7
+	ld hl, BuenaOffTheAirText
 	ld a, BUENAS_PASSWORD_21
 	jp NextRadioLine
 
-BuenasPasswordCheckTime: ; b9169 (2e:5169)
+BuenasPasswordCheckTime:
 	call UpdateTime
 	ld a, [hHours]
 	cp 18 ; 6 PM
 	ret
-; b9171 (2e:5171)
 
-String_b9171:
+BuenasPasswordChannelName:
 	db "BUENA'S PASSWORD@"
-; b9182
 
-UnknownText_0xb9182: ; 0xb9182
+BuenaRadioText1:
 	; BUENA: BUENA here!
-	text_jump UnknownText_0x1bce72
+	text_jump _BuenaRadioText1
 	db "@"
-; 0xb9187
 
-UnknownText_0xb9187: ; 0xb9187
+BuenaRadioText2:
 	; Today's password!
-	text_jump UnknownText_0x1bce87
+	text_jump _BuenaRadioText2
 	db "@"
-; 0xb918c
 
-UnknownText_0xb918c: ; 0xb918c
+BuenaRadioText3:
 	; Let me think… It's
-	text_jump UnknownText_0x1bce9a
+	text_jump _BuenaRadioText3
 	db "@"
-; 0xb9191
 
-UnknownText_0xb9191: ; 0xb9191
+BuenaRadioText4:
 	; @ !
-	text_jump UnknownText_0x1bceae
+	text_jump _BuenaRadioText4
 	db "@"
-; 0xb9196
 
-UnknownText_0xb9196: ; 0xb9196
+BuenaRadioText5:
 	; Don't forget it!
-	text_jump UnknownText_0x1bceb7
+	text_jump _BuenaRadioText5
 	db "@"
-; 0xb919b
 
-UnknownText_0xb919b: ; 0xb919b
+BuenaRadioText6:
 	; I'm in GOLDENROD's
-	text_jump UnknownText_0x1bcec9
+	text_jump _BuenaRadioText6
 	db "@"
-; 0xb91a0
 
-UnknownText_0xb91a0: ; 0xb91a0
+BuenaRadioText7:
 	; RADIO TOWER!
-	text_jump UnknownText_0x1bcedc
+	text_jump _BuenaRadioText7
 	db "@"
-; 0xb91a5
 
-UnknownText_0xb91a5: ; 0xb91a5
+BuenaRadioMidnightText1:
 	; BUENA: Oh my…
-	text_jump UnknownText_0x1bceeb
+	text_jump _BuenaRadioMidnightText1
 	db "@"
-; 0xb91aa
 
-UnknownText_0xb91aa: ; 0xb91aa
+BuenaRadioMidnightText2:
 	; It's midnight! I
-	text_jump UnknownText_0x1bcefb
+	text_jump _BuenaRadioMidnightText2
 	db "@"
-; 0xb91af
 
-UnknownText_0xb91af: ; 0xb91af
+BuenaRadioMidnightText3:
 	; have to shut down!
-	text_jump UnknownText_0x1bcf0d
+	text_jump _BuenaRadioMidnightText3
 	db "@"
-; 0xb91b4
 
-UnknownText_0xb91b4: ; 0xb91b4
+BuenaRadioMidnightText4:
 	; Thanks for tuning
-	text_jump UnknownText_0x1bcf22
+	text_jump _BuenaRadioMidnightText4
 	db "@"
-; 0xb91b9
 
-UnknownText_0xb91b9: ; 0xb91b9
+BuenaRadioMidnightText5:
 	; in to the end! But
-	text_jump UnknownText_0x1bcf36
+	text_jump _BuenaRadioMidnightText5
 	db "@"
-; 0xb91be
 
-UnknownText_0xb91be: ; 0xb91be
+BuenaRadioMidnightText6:
 	; don't stay up too
-	text_jump UnknownText_0x1bcf4b
+	text_jump _BuenaRadioMidnightText6
 	db "@"
-; 0xb91c3
 
-UnknownText_0xb91c3: ; 0xb91c3
+BuenaRadioMidnightText7:
 	; late! Presented to
-	text_jump UnknownText_0x1bcf5e
+	text_jump _BuenaRadioMidnightText7
 	db "@"
-; 0xb91c8
 
-UnknownText_0xb91c8: ; 0xb91c8
+BuenaRadioMidnightText8:
 	; you by DJ BUENA!
-	text_jump UnknownText_0x1bcf73
+	text_jump _BuenaRadioMidnightText8
 	db "@"
-; 0xb91cd
 
-UnknownText_0xb91cd: ; 0xb91cd
+BuenaRadioMidnightText9:
 	; I'm outta here!
-	text_jump UnknownText_0x1bcf86
+	text_jump _BuenaRadioMidnightText9
 	db "@"
-; 0xb91d2
 
-UnknownText_0xb91d2: ; 0xb91d2
+BuenaRadioMidnightText10:
 	; …
-	text_jump UnknownText_0x1bcf96
+	text_jump _BuenaRadioMidnightText10
 	db "@"
-; 0xb91d7
 
-UnknownText_0xb91d7: ; 0xb91d7
+BuenaOffTheAirText:
 	;
-	text_jump UnknownText_0x1bcf99
+	text_jump _BuenaOffTheAirText
 	db "@"
-; 0xb91dc
 
-CopyRadioTextToRAM: ; b91dc (2e:51dc)
+CopyRadioTextToRAM:
 	ld a, [hl]
 	cp TX_FAR
 	jp z, FarCopyRadioText
@@ -2086,7 +1939,7 @@
 	ld bc, SCREEN_WIDTH * 2
 	jp CopyBytes
 
-StartRadioStation: ; b91eb (2e:51eb)
+StartRadioStation:
 	ld a, [wNumRadioLinesPrinted]
 	and a
 	ret nz
@@ -2096,17 +1949,15 @@
 	ld a, [wCurrentRadioLine]
 	ld c, a
 	ld b, 0
-rept 2
 	add hl, bc
-endr
+	add hl, bc
 	ld e, [hl]
 	inc hl
 	ld d, [hl]
 	callab RadioMusicRestartDE
 	ret
-; b920b (2e:520b)
 
-RadioChannelSongs: ; b920b
+RadioChannelSongs:
 	dw MUSIC_POKEMON_TALK
 	dw MUSIC_POKEMON_CENTER
 	dw MUSIC_TITLE
@@ -2118,11 +1969,9 @@
 	dw MUSIC_POKE_FLUTE_CHANNEL
 	dw MUSIC_RUINS_OF_ALPH_RADIO
 	dw MUSIC_LAKE_OF_RAGE_ROCKET_RADIO
-; b9221
 
-NextRadioLine: ; b9221 (2e:5221)
+NextRadioLine:
 	push af
 	call CopyRadioTextToRAM
 	pop af
 	jp PrintRadioLine
-; b9229
--- a/text/common_1.asm
+++ b/text/common_1.asm
@@ -482,33 +482,35 @@
 	line "back!"
 	done
 
-UnknownText_0x1bc81a::
+; Oak's Pokémon Talk
+
+_OPT_IntroText1::
 	text ""
 	line "MARY: PROF.OAK'S"
 	done
 
-UnknownText_0x1bc82d::
+_OPT_IntroText2::
 	text ""
 	line "#MON TALK!"
 	done
 
-UnknownText_0x1bc83a::
+_OPT_IntroText3::
 	text ""
 	line "With me, MARY!"
 	done
 
-UnknownText_0x1bc84b::
+_OPT_OakText1::
 	text ""
 	line "OAK: @"
 	text_from_ram wMonOrItemNameBuffer
 	db "@@"
 
-UnknownText_0x1bc858::
+_OPT_OakText2::
 	text ""
 	line "may be seen around"
 	done
 
-UnknownText_0x1bc86d::
+_OPT_OakText3::
 	text ""
 	line "@"
 	text_from_ram StringBuffer1
@@ -515,7 +517,7 @@
 	text "."
 	done
 
-UnknownText_0x1bc876::
+_OPT_MaryText1::
 	text ""
 	line "MARY: @"
 	text_from_ram StringBuffer1
@@ -522,202 +524,204 @@
 	text "'s"
 	done
 
-UnknownText_0x1bc885::
+OPT_SweetAdorably::
 	text ""
 	line "sweet and adorably"
 	done
 
-UnknownText_0x1bc89a::
+OPT_WigglySlickly::
 	text ""
 	line "wiggly and slickly"
 	done
 
-UnknownText_0x1bc8af::
+OPT_AptlyNamed::
 	text ""
 	line "aptly named and"
 	done
 
-UnknownText_0x1bc8c1::
+OPT_UndeniablyKindOf::
 	text ""
 	line "undeniably kind of"
 	done
 
-UnknownText_0x1bc8d6::
+OPT_Unbearably::
 	text ""
 	line "so, so unbearably"
 	done
 
-UnknownText_0x1bc8ea::
+OPT_WowImpressively::
 	text ""
 	line "wow, impressively"
 	done
 
-UnknownText_0x1bc8fe::
+OPT_AlmostPoisonously::
 	text ""
 	line "almost poisonously"
 	done
 
-UnknownText_0x1bc913::
+OPT_Sensually::
 	text ""
 	line "ooh, so sensually"
 	done
 
-UnknownText_0x1bc927::
+OPT_Mischievously::
 	text ""
 	line "so mischievously"
 	done
 
-UnknownText_0x1bc93a::
+OPT_Topically::
 	text ""
 	line "so very topically"
 	done
 
-UnknownText_0x1bc94e::
+OPT_Addictively::
 	text ""
 	line "sure addictively"
 	done
 
-UnknownText_0x1bc961::
+OPT_LooksInWater::
 	text ""
 	line "looks in water is"
 	done
 
-UnknownText_0x1bc975::
+OPT_EvolutionMustBe::
 	text ""
 	line "evolution must be"
 	done
 
-UnknownText_0x1bc989::
+OPT_Provocatively::
 	text ""
 	line "provocatively"
 	done
 
-UnknownText_0x1bc999::
+OPT_FlippedOut::
 	text ""
 	line "so flipped out and"
 	done
 
-UnknownText_0x1bc9ae::
+OPT_HeartMeltingly::
 	text ""
 	line "heart-meltingly"
 	done
 
-UnknownText_0x1bc9c0::
+OPT_Cute::
 	text ""
 	line "cute."
 	done
 
-UnknownText_0x1bc9c8::
+OPT_Weird::
 	text ""
 	line "weird."
 	done
 
-UnknownText_0x1bc9d1::
+OPT_Pleasant::
 	text ""
 	line "pleasant."
 	done
 
-UnknownText_0x1bc9dd::
+OPT_BoldSortOf::
 	text ""
 	line "bold, sort of."
 	done
 
-UnknownText_0x1bc9ee::
+OPT_Frightening::
 	text ""
 	line "frightening."
 	done
 
-UnknownText_0x1bc9fd::
+OPT_SuaveDebonair::
 	text ""
 	line "suave & debonair!"
 	done
 
-UnknownText_0x1bca11::
+OPT_Powerful::
 	text ""
 	line "powerful."
 	done
 
-UnknownText_0x1bca1d::
+OPT_Exciting::
 	text ""
 	line "exciting."
 	done
 
-UnknownText_0x1bca29::
+OPT_Groovy::
 	text ""
 	line "groovy!"
 	done
 
-UnknownText_0x1bca33::
+OPT_Inspiring::
 	text ""
 	line "inspiring."
 	done
 
-UnknownText_0x1bca40::
+OPT_Friendly::
 	text ""
 	line "friendly."
 	done
 
-UnknownText_0x1bca4c::
+OPT_HotHotHot::
 	text ""
 	line "hot, hot, hot!"
 	done
 
-UnknownText_0x1bca5d::
+OPT_Stimulating::
 	text ""
 	line "stimulating."
 	done
 
-UnknownText_0x1bca6c::
+OPT_Guarded::
 	text ""
 	line "guarded."
 	done
 
-UnknownText_0x1bca77::
+OPT_Lovely::
 	text ""
 	line "lovely."
 	done
 
-UnknownText_0x1bca81::
+OPT_Speedy::
 	text ""
 	line "speedy."
 	done
 
-UnknownText_0x1bca8b::
+_OPT_PokemonChannelText::
 	text "#MON"
 	done
 
-UnknownText_0x1bca91::
+_PokedexShowText::
 	text ""
 	line "@"
 	text_from_ram StringBuffer1
 	db "@@"
 
-UnknownText_0x1bca99::
+; Pokémon Music Channel / Pokémusic
+
+_BenIntroText1::
 	text ""
 	line "BEN: #MON MUSIC"
 	done
 
-UnknownText_0x1bcaab::
+_BenIntroText2::
 	text ""
 	line "CHANNEL!"
 	done
 
-UnknownText_0x1bcab6::
+_BenIntroText3::
 	text ""
 	line "It's me, DJ BEN!"
 	done
 
-UnknownText_0x1bcac8::
+_FernIntroText1::
 	text ""
 	line "FERN: #MUSIC!"
 	done
 
-UnknownText_0x1bcad8::
+_FernIntroText2::
 	text ""
 	line "With DJ FERN!"
 	done
 
-UnknownText_0x1bcae8::
+_BenFernText1::
 	text ""
 	line "Today's @"
 	current_day
@@ -724,62 +728,64 @@
 	text ","
 	done
 
-UnknownText_0x1bcaf6::
+_BenFernText2A::
 	text ""
 	line "so let us jam to"
 	done
 
-UnknownText_0x1bcb09::
+_BenFernText2B::
 	text ""
 	line "so chill out to"
 	done
 
-UnknownText_0x1bcb1b::
+_BenFernText3A::
 	text ""
 	line "#MON March!"
 	done
 
-UnknownText_0x1bcb29::
+_BenFernText3B::
 	text ""
 	line "#MON Lullaby!"
 	done
 
-UnknownText_0x1bcb39::
+; Lucky Channel
+
+_LC_Text1::
 	text ""
 	line "REED: Yeehaw! How"
 	done
 
-UnknownText_0x1bcb4d::
+_LC_Text2::
 	text ""
 	line "y'all doin' now?"
 	done
 
-UnknownText_0x1bcb60::
+_LC_Text3::
 	text ""
 	line "Whether you're up"
 	done
 
-UnknownText_0x1bcb73::
+_LC_Text4::
 	text ""
 	line "or way down low,"
 	done
 
-UnknownText_0x1bcb86::
+_LC_Text5::
 	text ""
 	line "don't you miss the"
 	done
 
-UnknownText_0x1bcb9a::
+_LC_Text6::
 	text ""
 	line "LUCKY NUMBER SHOW!"
 	done
 
-UnknownText_0x1bcbaf::
+_LC_Text7::
 	text ""
 	line "This week's Lucky"
 	done
 
-UnknownText_0x1bcbc2::
+_LC_Text8::
 	text ""
 	line "Number is @"
 	interpret_data
@@ -787,47 +793,49 @@
 	text "!"
 	done
 
-UnknownText_0x1bcbd6::
+_LC_Text9::
 	text ""
 	line "I'll repeat that!"
 	done
 
-UnknownText_0x1bcbe9::
+_LC_Text10::
 	text ""
 	line "Match it and go to"
 	done
 
-UnknownText_0x1bcbfe::
+_LC_Text11::
 	text ""
 	line "the RADIO TOWER!"
 	done
 
-UnknownText_0x1bcc11::
+_LC_DragText1::
 	text ""
 	line "…Repeating myself"
 	done
 
-UnknownText_0x1bcc25::
+_LC_DragText2::
 	text ""
 	line "gets to be a drag…"
 	done
 
-UnknownText_0x1bcc3a::
+; Places and People
+
+_PnP_Text1::
 	text ""
 	line "PLACES AND PEOPLE!"
 	done
 
-UnknownText_0x1bcc4f::
+_PnP_Text2::
 	text ""
 	line "Brought to you by"
 	done
 
-UnknownText_0x1bcc63::
+_PnP_Text3::
 	text ""
 	line "me, DJ LILY!"
 	done
 
-UnknownText_0x1bcc72::
+_PnP_Text4::
 	text ""
 	line "@"
 	text_from_ram StringBuffer2
@@ -915,43 +923,43 @@
 	line "is definitely odd!"
 	done
 
-UnknownText_0x1bcda0::
+_PnP_Text5::
 	text ""
 	line "@"
 	text_from_ram StringBuffer1
 	db "@@"
 
-UnknownText_0x1bcda8::
+_RocketRadioText1::
 	text ""
 	line "… …Ahem, we are"
 	done
 
-UnknownText_0x1bcdba::
+_RocketRadioText2::
 	text ""
 	line "TEAM ROCKET!"
 	done
 
-UnknownText_0x1bcdc9::
+_RocketRadioText3::
 	text ""
 	line "After three years"
 	done
 
-UnknownText_0x1bcddd::
+_RocketRadioText4::
 	text ""
 	line "of preparation, we"
 	done
 
-UnknownText_0x1bcdf2::
+_RocketRadioText5::
 	text ""
 	line "have risen again"
 	done
 
-UnknownText_0x1bce05::
+_RocketRadioText6::
 	text ""
 	line "from the ashes!"
 	done
 
-UnknownText_0x1bce17::
+_RocketRadioText7::
 	text ""
 	line "GIOVANNI! @"
 	interpret_data
@@ -958,7 +966,7 @@
 	text "Can you"
 	done
 
-UnknownText_0x1bce2e::
+_RocketRadioText8::
 	text ""
 	line "hear?@"
 	interpret_data
@@ -965,7 +973,7 @@
 	text " We did it!"
 	done
 
-UnknownText_0x1bce44::
+_RocketRadioText9::
 	text ""
 	line "@"
 	interpret_data
@@ -972,7 +980,7 @@
 	text "Where is our boss?"
 	done
 
-UnknownText_0x1bce5c::
+_RocketRadioText10::
 	text ""
 	line "@"
 	interpret_data
@@ -979,22 +987,22 @@
 	text "Is he listening?"
 	done
 
-UnknownText_0x1bce72::
+_BuenaRadioText1::
 	text ""
 	line "BUENA: BUENA here!"
 	done
 
-UnknownText_0x1bce87::
+_BuenaRadioText2::
 	text ""
 	line "Today's password!"
 	done
 
-UnknownText_0x1bce9a::
+_BuenaRadioText3::
 	text ""
 	line "Let me think… It's"
 	done
 
-UnknownText_0x1bceae::
+_BuenaRadioText4::
 	text ""
 	line "@"
 	text_from_ram StringBuffer1
@@ -1001,70 +1009,70 @@
 	text "!"
 	done
 
-UnknownText_0x1bceb7::
+_BuenaRadioText5::
 	text ""
 	line "Don't forget it!"
 	done
 
-UnknownText_0x1bcec9::
+_BuenaRadioText6::
 	text ""
 	line "I'm in GOLDENROD's"
 	done
 
-UnknownText_0x1bcedc::
+_BuenaRadioText7::
 	text ""
 	line "RADIO TOWER!"
 	done
 
-UnknownText_0x1bceeb::
+_BuenaRadioMidnightText1::
 	text ""
 	line "BUENA: Oh my…"
 	done
 
-UnknownText_0x1bcefb::
+_BuenaRadioMidnightText2::
 	text ""
 	line "It's midnight! I"
 	done
 
-UnknownText_0x1bcf0d::
+_BuenaRadioMidnightText3::
 	text ""
 	line "have to shut down!"
 	done
 
-UnknownText_0x1bcf22::
+_BuenaRadioMidnightText4::
 	text ""
 	line "Thanks for tuning"
 	done
 
-UnknownText_0x1bcf36::
+_BuenaRadioMidnightText5::
 	text ""
 	line "in to the end! But"
 	done
 
-UnknownText_0x1bcf4b::
+_BuenaRadioMidnightText6::
 	text ""
 	line "don't stay up too"
 	done
 
-UnknownText_0x1bcf5e::
+_BuenaRadioMidnightText7::
 	text ""
 	line "late! Presented to"
 	done
 
-UnknownText_0x1bcf73::
+_BuenaRadioMidnightText8::
 	text ""
 	line "you by DJ BUENA!"
 	done
 
-UnknownText_0x1bcf86::
+_BuenaRadioMidnightText9::
 	text "I'm outta here!"
 	done
 
-UnknownText_0x1bcf96::
+_BuenaRadioMidnightText10::
 	text "…"
 	done
 
-UnknownText_0x1bcf99::
+_BuenaOffTheAirText::
 	text ""
 	line ""
 	done