Fixed all known, noticeable bugs related to music in the engine.

P3D/Overworld/OverworldScreen.vb

@@ -419,7 +419,7 @@ Public Class OverworldScreen
                 Level.IsRadioOn = False
             End If
 
-            MusicManager.Play(theme, True)
+            MusicManager.Play(theme, True) 'remove when debugging music
         End If
     End Sub
 

P3D/Resources/Sound/MusicManager.vb

@@ -119,7 +119,7 @@ Public Class MusicManager
                             _fadeIntoIntro = False
                             _introEndTime = Date.Now.AddSeconds(0) + song.Song.Duration
                             _isIntroStarted = True
-                            MediaPlayer.IsRepeating = False
+                            'MediaPlayer.IsRepeating = False
                         Else
                             MediaPlayer.IsRepeating = True
                         End If
@@ -263,7 +263,7 @@ Public Class MusicManager
                     ' setup the continue song
                     _introContinueSong = songName
                     ' do not repeat media player, do not want intro to loop
-                    MediaPlayer.IsRepeating = False
+                    'MediaPlayer.IsRepeating = False
 
                     If fadeSpeed > 0F Then
                         _isIntroStarted = False
@@ -279,9 +279,13 @@ Public Class MusicManager
 
                     ' load the next song so the end of the intro doesn't lag
                     GetSong(song)
-
+                Else
+                    _isIntroStarted = False
+                    _fadeIntoIntro = False
                 End If
-
+            Else
+                _isIntroStarted = False
+                _fadeIntoIntro = False
             End If
 
             ' intro was not requested or does not exist

P3D/Screens/BattleIntroScreen.vb

@@ -506,7 +506,7 @@
         Player.Temp.BeforeBattleLevelFile = Screen.Level.LevelFile
         Player.Temp.BeforeBattleFacing = Screen.Camera.GetPlayerFacingDirection()
         MusicManager.Play(MusicLoop, False, 0F)
-        MediaPlayer.IsRepeating = False
+        'MediaPlayer.IsRepeating = False
 
         If Not MusicManager.CurrentSong Is Nothing Then
             Me.duration = MusicManager.CurrentSong.Song.Duration