tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-07-27 07:44:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

Dex form switch and cry tweak

Browse Source
This commit is contained in:
JappaWakka 2023-07-21 19:06:43 +02:00
parent d200669998
commit 916c69d2b0
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
P3D/Screens/Pokedex/PokedexScreen.vb
View File

@ -1688,7 +1688,7 @@ Public Class PokedexViewScreen
CanSwitchCount += 1 CanSwitchCount += 1
End If End If
Next Next
If CanSwitchCount > 1 Then If CanSwitchCount > 1 OrElse CanSwitchCount = 1 AndAlso Pokedex.GetEntryType(Core.Player.PokedexData, PokemonForms.GetPokemonDataFileName(Me.Pokemon.Number, Me.Pokemon.AdditionalData, True)) = 0 Then
Core.SpriteBatch.DrawString(FontManager.MainFont, "Press [Shift] to switch forms", New Vector2(CInt(windowSize.Width - FontManager.MainFont.MeasureString("Press [Shift] to switch forms").X - 128), 36), Color.White, 0.0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0.0F) Core.SpriteBatch.DrawString(FontManager.MainFont, "Press [Shift] to switch forms", New Vector2(CInt(windowSize.Width - FontManager.MainFont.MeasureString("Press [Shift] to switch forms").X - 128), 36), Color.White, 0.0F, Vector2.Zero, 1.0F, SpriteEffects.None, 0.0F)
End If End If
End If End If
@ -2006,7 +2006,11 @@ Public Class PokedexViewScreen
Dim newPokemon As Pokemon = Pokemon.GetPokemonByID(PokeID, PokeAD, True) Dim newPokemon As Pokemon = Pokemon.GetPokemonByID(PokeID, PokeAD, True)
LoadPokemonData(-1, newPokemon, True) Dim playCry As Boolean = True
If FormIndex = OriginalFormIndex Then
playCry = False
End If
LoadPokemonData(-1, newPokemon, playCry)
End If End If
End If End If