From 3cab6f3b8271b645128cef3199729b76eaf583be Mon Sep 17 00:00:00 2001
From: JappaWakka <jjlspeelman@outlook.com>
Date: Mon, 1 Aug 2022 13:08:17 +0200
Subject: [PATCH] Now I really fixed the menu sprites

---
 P3D/Pokemon/Monster/Resource/PokemonForms.vb | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/P3D/Pokemon/Monster/Resource/PokemonForms.vb b/P3D/Pokemon/Monster/Resource/PokemonForms.vb
index d9a7bafb7..2e0f4e916 100644
--- a/P3D/Pokemon/Monster/Resource/PokemonForms.vb
+++ b/P3D/Pokemon/Monster/Resource/PokemonForms.vb
@@ -136,8 +136,9 @@ Public Class PokemonForms
                 Return listP.GetMenuImageSize(P)
             End If
         Next
-
-        Return New Size(32, 32)
+        Dim sheet As String = GetSheetName(P)
+        Dim _size As Integer = CInt(TextureManager.GetTexture("GUI\PokemonMenu\" & sheet).Width / 32)
+        Return New Size(_size, _size)
     End Function
 
     ''' <summary>