Fixed some bugs related to song intros duration.

P3D/Resources/Sound/MusicManager.vb

@@ -117,7 +117,7 @@ Public Class MusicManager
 
                         If _fadeIntoIntro Then
                             _fadeIntoIntro = False
-                            _introEndTime = Date.Now.AddSeconds(-1) + song.Duration
+                            _introEndTime = Date.Now.AddSeconds(0) + song.Duration
                             _isIntroStarted = True
                             MediaPlayer.IsRepeating = False
                         Else
@@ -271,7 +271,7 @@ Public Class MusicManager
                         FadeInto(introSong, fadeSpeed)
                     Else
                         _isIntroStarted = True
-                        _introEndTime = Date.Now.AddSeconds(-1) + introSong.Duration
+                        _introEndTime = Date.Now.AddSeconds(0) + introSong.Duration
                         Play(introSong)
                     End If
 

P3D/Screens/BattleIntroScreen.vb

@@ -505,7 +505,7 @@
         Player.Temp.BeforeBattlePosition = Screen.Camera.Position
         Player.Temp.BeforeBattleLevelFile = Screen.Level.LevelFile
         Player.Temp.BeforeBattleFacing = Screen.Camera.GetPlayerFacingDirection()
-        MusicManager.Play(MusicLoop)
+        MusicManager.Play(MusicLoop, False, 0F)
         MediaPlayer.IsRepeating = False
 
         If Not MusicManager.CurrentSong Is Nothing Then