tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Contentpack music fix 

When a song that didn't have an intro in the gamemode has one in a contentpack, the game didn't check for that. Now it does
This commit is contained in:
JappaWakkaP3D 2021-10-23 22:52:53 +02:00
parent 516ffff1a1
commit 0e49fbfd00
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
P3D/Resources/Sound/MusicManager.vb
View File

@ -114,7 +114,7 @@ Public Class LoopStream
End Class End Class
Public Class MusicManager Public Class MusicManager
Private Const DEFAULT_FADE_SPEED As Single = 0.02F Private Const DEFAULT_FADE_SPEED As Single = 0.03F
Private Const NO_MUSIC As String = "silence" Private Const NO_MUSIC As String = "silence"
Private Shared _songs As Dictionary(Of String, SongContainer) = New Dictionary(Of String, SongContainer)() Private Shared _songs As Dictionary(Of String, SongContainer) = New Dictionary(Of String, SongContainer)()
@ -513,23 +513,30 @@ Public Class MusicManager
Public Shared Function GetSong(songName As String) As SongContainer Public Shared Function GetSong(songName As String) As SongContainer
Dim key = GetSongName(songName) Dim key = GetSongName(songName)
Dim songFilePath = GameController.GamePath & GameModeManager.ActiveGameMode.ContentPath & "Songs\" & key Dim cContent As ContentManager = ContentPackManager.GetContentManager("Songs\" & key, ".ogg,.mp3,.wma")
Dim contentSongFilePath = GameController.GamePath & "\" & cContent.RootDirectory & "\Songs\" & key
Dim gamemodeSongFilePath = GameController.GamePath & GameModeManager.ActiveGameMode.ContentPath & "Songs\" & key
Dim defaultSongFilePath = GameController.GamePath & "\Content\" & "Songs\" & key Dim defaultSongFilePath = GameController.GamePath & "\Content\" & "Songs\" & key
Dim audiotype = "" Dim audiotype = ""
If _songs.ContainsKey(key) = True Then If _songs.ContainsKey(key) = True Then
Return _songs(key) Return _songs(key)
Else Else
If System.IO.File.Exists(songFilePath & ".ogg") = True Or System.IO.File.Exists(defaultSongFilePath & ".ogg") = True Then If System.IO.File.Exists(gamemodeSongFilePath & ".ogg") = True Or System.IO.File.Exists(defaultSongFilePath & ".ogg") = True Or System.IO.File.Exists(contentSongFilePath & ".ogg") = True Then
audiotype = ".ogg" audiotype = ".ogg"
ElseIf System.IO.File.Exists(songFilePath & ".mp3") = True Or System.IO.File.Exists(defaultSongFilePath & ".mp3") = True Then ElseIf System.IO.File.Exists(gamemodeSongFilePath & ".mp3") = True Or System.IO.File.Exists(defaultSongFilePath & ".mp3") = True Or System.IO.File.Exists(contentSongFilePath & ".mp3") = True Then
audiotype = ".mp3" audiotype = ".mp3"
ElseIf System.IO.File.Exists(songFilePath & ".wma") = True Or System.IO.File.Exists(defaultSongFilePath & ".wma") = True Then ElseIf System.IO.File.Exists(gamemodeSongFilePath & ".wma") = True Or System.IO.File.Exists(defaultSongFilePath & ".wma") = True Or System.IO.File.Exists(contentSongFilePath & ".wma") = True Then
audiotype = ".wma" audiotype = ".wma"
End If End If
End If End If
If File.Exists(songFilePath & audiotype) Then If File.Exists(contentSongFilePath & audiotype) Then
If AddSong(key, False) = True Then
Return _songs(key)
End If
ElseIf File.Exists(gamemodeSongFilePath & audiotype) Then
If AddSong(key, False) = True Then If AddSong(key, False) = True Then
Return _songs(key) Return _songs(key)
End If End If