LGPE Beauty Event

This is basically done, but has a few glitches to iron out that I don't have time to do today. So, I'm sending this in as-is with the intent to finish (or someone else can idc) it later.

I initially thought to restrict this to after Vermilion Gym but Persian is really bad and Arcanine doesn't compare to the L30 Dugtrio, so I think it's ok. Just barely balances itself out.

Bugs:
- GiveMonName doesn't work properly for the Vermilion Beauty after receiving the Pokemon, jank ensues.
- Text scrolls immediately when receiving the Pokemon from the Vermilion Beauty.

data/maps/objects/VermilionCity.asm

@@ -30,5 +30,6 @@ VermilionCity_Object:
 	object_event 29,  9, SPRITE_MONSTER, WALK, UP_DOWN, 5 ; person
 	object_event 25, 27, SPRITE_SAILOR, WALK, LEFT_RIGHT, 6 ; person
 	object_event 31, 27, SPRITE_COOLTRAINER_F, WALK, LEFT_RIGHT, 14 ; person
+	object_event 12, 13, SPRITE_BEAUTY, STAY, DOWN, 15 ; person
 
 	def_warps_to VERMILION_CITY

data/text/text_2.asm

@@ -1740,7 +1740,7 @@ _OakSpeechText2B::
 	prompt
 
 _IntroducePlayerText::
-	text "Next, what is"
+	text "Now, what is"
 	line "your name?"
 	prompt
 

data/wild/maps/Route6.asm

@@ -1,16 +1,30 @@
+; The Wild Data here has been redesigned to fit the Vermilion Beauty quest.
+; Meowth and Growlithe have 19.6% chances of appearing.
+; I've limited the amount of Pokemon that can appear by proxy, making it so it's easier to get what the player wants.
+; Oh, and the water encounters are a mishmash of what's seen here over the franchise.
 Route6WildMons:
 	def_grass_wildmons 15 ; encounter rate
-	db 13, ODDISH
-	db 13, PSYDUCK
+	db 13, RATTATA
+	db 13, PIDGEY
 	db 15, PIDGEOTTO
-	db 10, MANKEY
-	db 12, MANKEY
-	db 15, BELLSPROUT
-	db 16, BELLSPROUT
-	db 16, PSYDUCK
-	db 14, JIGGLYPUFF
-	db 16, MEOWTH
+	db 10, MEOWTH
+	db 12, MEOWTH
+	db 15, GROWLITHE
+	db 16, GROWLITHE
+	db 16, JIGGLYPUFF
+	db 14, GROWLITHE
+	db 16, ABRA
 	end_grass_wildmons
 
-	def_water_wildmons 0 ; encounter rate
+	def_water_wildmons 10 ; encounter rate
+	db 12, PSYDUCK
+	db 12, SLOWPOKE
+	db 15, PSYDUCK
+	db 15, SLOWPOKE
+	db 15, GOLDEEN
+	db 15, WEIRDUCK
+	db 15, WEIRDUCK
+	db 16, SEAKING
+	db 15, GOLDUCK
+	db 20, GOLDUCK
 	end_water_wildmons

data/yes_no_menu_strings.asm

@@ -9,7 +9,7 @@ TwoOptionMenuStrings:
 	; width, height, blank line before first menu item?, text pointer
 	two_option_menu 4, 3, FALSE, .YesNoMenu
 	two_option_menu 5, 3, FALSE, .BoyGirlMenu
-	two_option_menu 6, 3, FALSE, .SouthEastMenu
+	two_option_menu 6, 3, TRUE,  .CatsDogsMenu
 	two_option_menu 6, 3, FALSE, .YesNoMenu
 	two_option_menu 6, 3, FALSE, .NorthEastMenu
 	two_option_menu 7, 3, FALSE, .TradeCancelMenu
@@ -26,13 +26,16 @@ TwoOptionMenuStrings:
 	next "NO@"
 
 ; There is probably a better way to word this...
+; Replaced North/West
 .BoyGirlMenu:
 	db   "BOY"
 	next "GIRL@"
 
-.SouthEastMenu:
-	db   "SOUTH"
-	next "EAST@"
+; For the Vermilion Beauty event.
+; Replaced South/East
+.CatsDogsMenu:
+	db   "CATS"
+	next "DOGS@"
 
 .NorthEastMenu:
 	db   "NORTH"