mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-04-08 18:35:09 +02:00
Fix Shellos HiddenGrotto form
This commit is contained in:
parent
6932819c21
commit
3d7dbe2156
Binary file not shown.
@ -120,7 +120,9 @@
|
||||
ElseIf Me.TextureID.Contains("-") Then
|
||||
Me.TextureID = Me.TextureID.GetSplit(0, "-")
|
||||
ElseIf Me.TextureID.Contains(";") Then
|
||||
Me.TextureID = Me.TextureID.GetSplit(0, ";")
|
||||
Dim p As Pokemon = Pokemon.GetPokemonByID(CInt(Me.TextureID.GetSplit(0, ";")), Me.TextureID.GetSplit(1, ";"), True)
|
||||
Dim formaddition = PokemonForms.GetOverworldAddition(p)
|
||||
Me.TextureID = Me.TextureID.GetSplit(0, ";") & formaddition
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
Loading…
x
Reference in New Issue
Block a user