tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-04-08 18:35:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix text errors (out of bounds, newlines)

Browse Source
This commit is contained in:
JappaWakka 2024-04-19 15:08:14 +02:00
parent e37b4ed2da
commit 11001f69d0
3 changed files with 3 additions and 3 deletions
P3D
Content/Data/Scripts/phone
039.dat
Entites/Enviroment
BerryPlant.vb
Pokemon/Monster
PokemonInteractions.vb

BIN
P3D/Content/Data/Scripts/phone/039.dat

Binary file not shown.

2
P3D/Entites/Enviroment/BerryPlant.vb

@ -185,7 +185,7 @@
If Me.Berries = 1 Then
Text = Localization.GetString("berry_picked_single_start", "<player.name> picked the~").Replace("<player.name>", Core.Player.Name) & Berry.OneLineName() & " " & Localization.GetString("berry_picked_single_end", "Berry.") & "*" & Core.Player.Inventory.GetMessageReceive(Berry, Me.Berries)
Else
Text = Localization.GetString("berry_picked_multiple_start", "<player.name> picked the~").Replace("<player.name>", Core.Player.Name) & Berries & "~" & Berry.OneLineName() & " " & Localization.GetString("berry_picked_multiple_end", "Berries.") & "*" & Core.Player.Inventory.GetMessageReceive(Berry, Me.Berries)
Text = Localization.GetString("berry_picked_multiple_start", "<player.name> picked the~").Replace("<player.name>", Core.Player.Name) & Berries & Berry.OneLineName() & " " & Localization.GetString("berry_picked_multiple_end", "Berries.") & "*" & Core.Player.Inventory.GetMessageReceive(Berry, Me.Berries)
End If
Core.Player.AddPoints(2, "Picked berries.")

4
P3D/Pokemon/Monster/PokemonInteractions.vb

@ -508,11 +508,11 @@
r = New ReactionContainer("<name> is sniffing~at <player.name>.", MessageBulb.NotificationTypes.Friendly)
Case 51
If IsOutside() = True And World.GetCurrentRegionWeather() = World.Weathers.Rain And GrassAround() = True Then
r = New ReactionContainer("<name> is taking shelter in the grass from the rain!", MessageBulb.NotificationTypes.Waiting)
r = New ReactionContainer("<name> is taking~shelter in the grass from~the rain!", MessageBulb.NotificationTypes.Waiting)
End If
Case 52
If IsOutside() = True And World.GetCurrentRegionWeather() = World.Weathers.Rain And GrassAround() = True Then
r = New ReactionContainer("<name> is splashing~around in the wet grass", MessageBulb.NotificationTypes.Note)
r = New ReactionContainer("<name> is splashing~around in the wet grass!", MessageBulb.NotificationTypes.Note)
End If
End Select
End While