From cbe91d537cbe8986c52d5689b618d307802d0ca3 Mon Sep 17 00:00:00 2001
From: mogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 20 Aug 2008 03:29:48 +0000
Subject: preparing the commit if projectM option integration

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1277 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Screens/UScreenSing.pas | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

(limited to 'Game/Code/Screens')

diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas
index f6c7adb5..8edd2be4 100644
--- a/Game/Code/Screens/UScreenSing.pas
+++ b/Game/Code/Screens/UScreenSing.pas
@@ -428,6 +428,7 @@ begin
   CurrentSong.VideoLoaded := False;
   fShowVisualization      := False;
   if (CurrentSong.Video <> '') and FileExists(CurrentSong.Path + CurrentSong.Video) then
+  //and not (TVisualizerOption(Ini.VisualizerOption) in [voOn, voWhenNoVideo]) then
   begin
     if (fCurrentVideoPlaybackEngine.Open(CurrentSong.Path + CurrentSong.Video)) then
     begin
@@ -438,6 +439,7 @@ begin
 
   // set background
   if (CurrentSong.Background <> '') and (CurrentSong.VideoLoaded = False) then
+  //and (TVisualizerOption(Ini.VisualizerOption) = voOff)  then
     try
       Tex_Background := Texture.LoadTexture(CurrentSong.Path + CurrentSong.Background);
     except
@@ -447,7 +449,17 @@ begin
     end
   else
     Tex_Background.TexNum := 0;
-
+  {**
+   * set visualization
+   *}
+  {*
+  if (TVisualizerOption(Ini.VisualizerOption) in [voOn, voWhenNoVideo]) then
+  begin
+    fShowVisualization := True;
+    fCurrentVideoPlaybackEngine := Visualization;
+    fCurrentVideoPlaybackEngine.play;
+  end;
+  *}
   // prepare lyrics timer
   LyricsState.Reset();
   LyricsState.SetCurrentTime(CurrentSong.Start);
-- 
cgit v1.2.3