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

Fix PacksMenu sound volume and freeze

Browse Source
This commit is contained in:
JappaWakka 2025-02-15 11:34:02 +01:00
parent 01a2487839
commit 2fd98316fe
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
P3D/Screens/NewOptionScreen.vb
View File

@ -351,7 +351,7 @@ Public Class NewOptionScreen
packsMenuIndex(2) -= 1 packsMenuIndex(2) -= 1
End If End If
If SelectPackNoiseDelay = 0 Then If SelectPackNoiseDelay = 0 Then
SoundManager.PlaySound("select", 0.0F, 0.0F, 0.5F, False) SoundManager.PlaySound("select")
SelectPackNoiseDelay = 10 SelectPackNoiseDelay = 10
End If End If
End If End If
@ -363,7 +363,7 @@ Public Class NewOptionScreen
packsMenuIndex(2) += 1 packsMenuIndex(2) += 1
End If End If
If SelectPackNoiseDelay = 0 Then If SelectPackNoiseDelay = 0 Then
SoundManager.PlaySound("select", 0.0F, 0.0F, 0.5F, False) SoundManager.PlaySound("select")
SelectPackNoiseDelay = 10 SelectPackNoiseDelay = 10
End If End If
End If End If
@ -374,7 +374,7 @@ Public Class NewOptionScreen
If MouseHandler.ButtonPressed(MouseHandler.MouseButtons.LeftButton) = True Then If MouseHandler.ButtonPressed(MouseHandler.MouseButtons.LeftButton) = True Then
packsMenuIndex(0) = i + packsMenuIndex(2) packsMenuIndex(0) = i + packsMenuIndex(2)
If SelectPackNoiseDelay = 0 Then If SelectPackNoiseDelay = 0 Then
SoundManager.PlaySound("select", 0.0F, 0.0F, 0.5F, False) SoundManager.PlaySound("select")
SelectPackNoiseDelay = 10 SelectPackNoiseDelay = 10
End If End If
End If End If
@ -447,7 +447,9 @@ Public Class NewOptionScreen
Private Sub UpdatePackInformationMenu() Private Sub UpdatePackInformationMenu()
If KeyBoardHandler.KeyPressed(KeyBindings.EscapeKey) Or KeyBoardHandler.KeyPressed(KeyBindings.BackKey1) Or KeyBoardHandler.KeyPressed(KeyBindings.BackKey2) Or MouseHandler.ButtonPressed(MouseHandler.MouseButtons.RightButton) Or ControllerHandler.ButtonPressed(Buttons.B) Then If KeyBoardHandler.KeyPressed(KeyBindings.EscapeKey) Or KeyBoardHandler.KeyPressed(KeyBindings.BackKey1) Or KeyBoardHandler.KeyPressed(KeyBindings.BackKey2) Or MouseHandler.ButtonPressed(MouseHandler.MouseButtons.RightButton) Or ControllerHandler.ButtonPressed(Buttons.B) Then
SwitchToContentPacks() If _pageClosing = False And _pageOpening = False Then
SwitchToContentPacks()
End If
End If End If
End Sub End Sub