performance mode for videos: reducing lines on low fps

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2213 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 12 insertions, 1 deletions

diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas
index 3cfd2430..df291ec3 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -37,6 +37,7 @@ type
     MovieSize:      integer;

     MoviePreview:   integer;

     AspectCorrect:  integer;

+    PerformanceMode:integer;

 

     // Sound

     MicBoost:       integer;

@@ -136,7 +137,8 @@ const
   ISpectrograph:  array[0..1] of string = ('Off', 'On');

   IMovieSize:     array[0..3] of string = ('Half', 'Full', 'Preview only', 'Off');

   IMoviePreview:  array[0..1] of string = ('Off', 'On');

-  IAspectCorrect:    array[0..2] of String  = ('Stretch', 'Crop', 'LetterBox');

+  IAspectCorrect: array[0..2] of String  = ('Stretch', 'Crop', 'LetterBox');

+  IPerformanceMode:array[0..1] of string = ('Off', 'On');

 

   IMicBoost:      array[0..3] of string = ('Off', '+6dB', '+12dB', '+18dB');

   IClickAssist:   array[0..1] of string = ('Off', 'On');

@@ -361,6 +363,11 @@ begin
   for Pet := 0 to High(IAspectCorrect) do

     if Tekst = IAspectCorrect[Pet] then Ini.AspectCorrect := Pet;

 

+  // PerformanceMode

+  Tekst := IniFile.ReadString('Graphics', 'PerformanceMode', IPerformanceMode[1]);

+  for Pet := 0 to High(IPerformanceMode) do

+    if Tekst = IPerformanceMode[Pet] then Ini.PerformanceMode := Pet;

+

   // MicBoost

   Tekst := IniFile.ReadString('Sound',    'MicBoost',    'Off');

   for Pet := 0 to High(IMicBoost) do

@@ -686,6 +693,10 @@ begin
     Tekst := IAspectCorrect[Ini.AspectCorrect];

     IniFile.WriteString('Graphics', 'AspectCorrect', Tekst);

 

+    // PerformanceMode

+    Tekst := IPerformanceMode[Ini.PerformanceMode];

+    IniFile.WriteString('Graphics', 'PerformanceMode', Tekst);

+

     // MicBoost

     Tekst := IMicBoost[Ini.MicBoost];

     IniFile.WriteString('Sound',    'MicBoost',    Tekst);