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

ContentPack fixes

Browse Source 
* Fixed ContentPack menu crashing when trying to load more than 5 Content Packs
* Fixed Texture Replacements in exceptions.dat being ignored if not the same case
* Fixed minor visual bug in the Box screen where smaller textures would be scaled incorrectly
This commit is contained in:
JappaWakka 2022-06-22 21:02:11 +02:00
parent a73bbee55b
commit 9ff6e94a1f
3 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
P3D/Resources/ContentPackManager.vb
View File

@ -136,7 +136,7 @@ Public Class TextureSource
End Function End Function
Public Function IsEqual(ByVal TextureSource As TextureSource) As Boolean Public Function IsEqual(ByVal TextureSource As TextureSource) As Boolean
If Me.TexturePath = TextureSource.TexturePath And Me.TextureRectangle = TextureSource.TextureRectangle Then If Me.TexturePath.ToLower() = TextureSource.TexturePath.ToLower() And Me.TextureRectangle = TextureSource.TextureRectangle Then
Return True Return True
End If End If

6
P3D/Screens/NewOptionScreen.vb
View File

@ -470,14 +470,14 @@
Private Sub PackEnabledToggle(ByVal c As ToggleButton) Private Sub PackEnabledToggle(ByVal c As ToggleButton)
If PackNames.Count > 0 Then If PackNames.Count > 0 Then
If EnabledPackNames.Contains(PackNames(packsMenuIndex(0) + packsMenuIndex(2))) Then If EnabledPackNames.Contains(PackNames(packsMenuIndex(0))) Then
isSelectedEnabled = False isSelectedEnabled = False
c.Toggled = False c.Toggled = False
ButtonToggle(PackNames(packsMenuIndex(0) + packsMenuIndex(2))) ButtonToggle(PackNames(packsMenuIndex(0)))
Else Else
isSelectedEnabled = True isSelectedEnabled = True
c.Toggled = True c.Toggled = True
ButtonToggle(PackNames(packsMenuIndex(0) + packsMenuIndex(2))) ButtonToggle(PackNames(packsMenuIndex(0)))
End If End If
Else Else
isSelectedEnabled = False isSelectedEnabled = False

2
P3D/Screens/PC/StorageSystemScreen.vb
View File

@ -1189,7 +1189,7 @@ Public Class StorageSystemScreen
c = New Color(65, 65, 65, 255) c = New Color(65, 65, 65, 255)
End If End If
Dim pokeTexture = box.Pokemon(id).GetPokemon().GetMenuTexture() Dim pokeTexture = box.Pokemon(id).GetPokemon().GetMenuTexture()
Core.SpriteBatch.Draw(pokeTexture, New Rectangle(50 + x * 100 - CInt(pokeTexture.Width - 32), 200 + y * 84, pokeTexture.Width * 2, 64), c) Core.SpriteBatch.Draw(pokeTexture, New Rectangle(50 + x * 100 - CInt(pokeTexture.Width - 32), 200 + y * 84, pokeTexture.Width * 2, pokeTexture.Height * 2), c)
End If End If
Next Next
Else Else