Failsafe for Pokémon player texture

This commit is contained in:
JappaWakka 2022-08-28 14:29:09 +02:00
parent 936368b322
commit 3d41783c71
1 changed files with 2 additions and 3 deletions

View File

@ -28,12 +28,11 @@
Public Sub SetTexture(ByVal TextureID As String, ByVal UseGameJoltID As Boolean)
Me.SkinName = TextureID
Dim texturePath As String = "Textures\NPC\"
If TextureID.StartsWith("[POKEMON|N]") Or TextureID.StartsWith("[POKEMON|N]") Then
If TextureID.StartsWith("[POKEMON|N]") Or TextureID.StartsWith("[Pokémon|N]") Then
TextureID = TextureID.Remove(0, 11)
texturePath = "Pokemon\Overworld\Normal\"
ElseIf TextureID.StartsWith("[POKEMON|S]") Or TextureID.StartsWith("[POKEMON|S]") Then
ElseIf TextureID.StartsWith("[POKEMON|S]") Or TextureID.StartsWith("[Pokémon|S]") Then
TextureID = TextureID.Remove(0, 11)
texturePath = "Pokemon\Overworld\Shiny\"
End If