Overall look: ScoreBGs and playerboxes (p1, p2,..) are now drawn as colorized pngs. Notes are drawn with 3 textures instead of 2: bg_glow, notebg (unsung) and note hit (sung) - these are colorized pngs - textures will come in the following commit.

Known Bugs: - ScoreBGs are not yet drawn in playercolor (only affects player count > 3)
            - Phrasen bonus pop up, indexes are not yet filled with usable data, therefore textures are not yet loaded correctly
            - Linebonus not yet done

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@382 b956fd51-792f-4845-bead-9b4dfca2ff2c

4 files changed, 365 insertions, 597 deletions

diff --git a/Game/Code/Classes/UDraw.pas b/Game/Code/Classes/UDraw.pas
index 8945e591..8cfa8d7e 100644
--- a/Game/Code/Classes/UDraw.pas
+++ b/Game/Code/Classes/UDraw.pas
@@ -1,7 +1,7 @@
 unit UDraw;

 

 interface

-uses UThemes, ModiSDK, UGraphicClasses;

+uses UThemes, ModiSDK, UGraphicClasses, dialogs;

 

 procedure SingDraw;

 procedure SingModiDraw (PlayerInfo: TPlayerInfo);

@@ -13,14 +13,9 @@ procedure SingDrawCzesc(Left, Top, Right: real; NrCzesci: integer; Space: intege
 procedure SingDrawPlayerCzesc(X, Y, W: real; NrGracza: integer; Space: integer);

 procedure SingDrawPlayerBGCzesc(Left, Top, Right: real; NrCzesci, NrGracza: integer; Space: integer);

 

-// TimeBar mod

+// TimeBar 

 procedure SingDrawTimeBar();

-// eoa TimeBar mod

 

-{ for no use since we have UGraphicClasses

-procedure SingDrawStar(X, Y, A: real);

-procedure SingGoldenStar(X, Y, A: real);

-}

 // The Singbar

 procedure SingDrawSingbar(X, Y, W, H: real; Percent: integer);

 

@@ -52,15 +47,9 @@ var
   Starfr:   integer;

   StarfrG:   integer;

 

-

-

-  //SingBar Mod

+  //SingBar

   TickOld: cardinal;

   TickOld2:cardinal;

-  //end Singbar Mod

-

-

-

 

 const

   Przedz = 32;

@@ -208,8 +197,20 @@ var
   TempR:    real;

   R,G,B:    real;

 

+  PlayerNumber: Integer;

+

   GoldenStarPos : real;

 begin

+// We actually don't have a playernumber in this procedure, it should reside in NrCzesci - but it's always set to zero

+// So we exploit this behavior a bit - we give NrCzesci the playernumber, keep it in playernumber - and then we set NrCzesci to zero

+// This could also come quite in handy when we do the duet mode, cause just the notes for the player that has to sing should be drawn then

+// BUT this is not implemented yet, all notes are drawn! :D

+

+  PlayerNumber := NrCzesci + 1; // Player 1 is 0

+  NrCzesci     := 0;

+

+// exploit done

+

   glColor3f(1, 1, 1);

   glEnable(GL_TEXTURE_2D);

   glEnable(GL_BLEND);

@@ -225,19 +226,19 @@ begin
           // If Golden note Effect of then Change not Color

           begin

             case Wartosc of

-              1: glColor4f(1, 1, 1, 0.85);

-              2: glColor4f(1, 1, 0.3, 0.85); // no stars, paint yellow -> glColor4f(1, 1, 0.3, 0.85);

+              1: glColor4f(1, 1, 1, 1);   // We set alpha to 1, cause we can control the transparency through the png itself

+              2: glColor4f(1, 1, 0.3, 1); // no stars, paint yellow -> glColor4f(1, 1, 0.3, 0.85); - we could

             end; // case

           end //Else all Notes same Color

           else

-            glColor4f(1, 1, 1, 0.85);

-

+            glColor4f(1, 1, 1, 1);        // We set alpha to 1, cause we can control the transparency through the png itself

+                                          // Czesci == teil, element == piece, element | koniec == ende, schluss

           // lewa czesc  -  left part

           Rec.Left := (Start-Czesci[NrCzesci].Czesc[Czesci[NrCzesci].Akt].StartNote) * TempR + Left + 0.5 + 10*ScreenX;

           Rec.Right := Rec.Left + NotesW;

           Rec.Top := Top - (Ton-BaseNote)*Space/2 - NotesH;

           Rec.Bottom := Rec.Top + 2 * NotesH;

-          glBindTexture(GL_TEXTURE_2D, Tex_Left[Color].TexNum);

+          glBindTexture(GL_TEXTURE_2D, Tex_plain_Left[PlayerNumber].TexNum);

           glBegin(GL_QUADS);

             glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

             glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

@@ -249,12 +250,11 @@ begin
             GoldenStarPos := Rec.Left;

           //done

 

-

          // srodkowa czesc  -  middle part

         Rec.Left := Rec.Right;

-        Rec.Right := (Start+Dlugosc-Czesci[NrCzesci].Czesc[Czesci[NrCzesci].Akt].StartNote) * TempR + Left - NotesW - 0.5 + 10*ScreenX;

+        Rec.Right := (Start+Dlugosc-Czesci[NrCzesci].Czesc[Czesci[NrCzesci].Akt].StartNote) * TempR + Left - NotesW - 0.5 + 10*ScreenX;    // Dlugosc == länge

 

-        glBindTexture(GL_TEXTURE_2D, Tex_Mid[Color].TexNum);

+        glBindTexture(GL_TEXTURE_2D, Tex_plain_Mid[PlayerNumber].TexNum);

         glTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT );

         glTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT );

         glBegin(GL_QUADS);

@@ -268,7 +268,7 @@ begin
         Rec.Left := Rec.Right;

         Rec.Right := Rec.Right + NotesW;

 

-        glBindTexture(GL_TEXTURE_2D, Tex_Right[Color].TexNum);

+        glBindTexture(GL_TEXTURE_2D, Tex_plain_Right[PlayerNumber].TexNum);

         glBegin(GL_QUADS);

           glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

           glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

@@ -313,134 +313,100 @@ var
 //  G := 175/255;

 //  B := 247/255;

 

-

   glColor3f(1, 1, 1);

   glEnable(GL_TEXTURE_2D);

   glEnable(GL_BLEND);

   glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

-  if Player[NrGracza].IlNut > 0 then begin

-    TempR := W / (Czesci[0].Czesc[Czesci[0].Akt].Koniec - Czesci[0].Czesc[Czesci[0].Akt].StartNote);

-    for N := 0 to Player[NrGracza].HighNut do begin

-      with Player[NrGracza].Nuta[N] do begin

-        // lewa czesc

-        Rec.Left := X + (Start-Czesci[0].Czesc[Czesci[0].Akt].StartNote) * TempR + 0.5 + 10*ScreenX;

-        Rec.Right := Rec.Left + NotesW;

-

-

-       // Half size Notes Patch

-       if Hit then begin

-       NotesH2 := NotesH

-       end else begin

-       NotesH2 := int(NotesH * 0.65);

-       end; //if

-

-

-

-        //        if True then

-        Rec.Top    := Y - (Ton-Czesci[0].Czesc[Czesci[0].Akt].BaseNote)*Space/2 - NotesH2;

-        Rec.Bottom := Rec.Top + 2 *NotesH2;

-

-        glColor3f(1, 1, 1);

-        glBindTexture(GL_TEXTURE_2D, Tex_Left[NrGracza+1].TexNum);

-        glBegin(GL_QUADS);

-          glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

-          glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

-          glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom);

-          glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top);

-        glEnd;

-

-        // srodkowa czesc

-        Rec.Left := Rec.Right;

-        Rec.Right := X + (Start+Dlugosc-Czesci[0].Czesc[Czesci[0].Akt].StartNote) * TempR - NotesW - 0.5  + 10*ScreenX;

-        // (nowe)

-        if (Start+Dlugosc-1 = Czas.AktBeatD) then

-          Rec.Right := Rec.Right - (1-Frac(Czas.MidBeatD)) * TempR;

-

-        if Rec.Right <= Rec.Left then Rec.Right := Rec.Left;

-

-

-//        glColor3f(R, G, B);

-//        glBindTexture(GL_TEXTURE_2D, Tex_MidGray.TexNum);

-        glBindTexture(GL_TEXTURE_2D, Tex_Mid[NrGracza+1].TexNum);

-        glTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT );

-        glTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT );

-        glBegin(GL_QUADS);

-          glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

-          glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

-          glTexCoord2f(round((Rec.Right-Rec.Left)/32), 1); glVertex2f(Rec.Right, Rec.Bottom);

-          glTexCoord2f(round((Rec.Right-Rec.Left)/32), 0); glVertex2f(Rec.Right, Rec.Top);

-        glEnd;

-        glColor3f(1, 1, 1);

-

-        // prawa czesc

-        Rec.Left := Rec.Right;

-        Rec.Right := Rec.Right + NotesW;

-

-        glBindTexture(GL_TEXTURE_2D, Tex_Right[NrGracza+1].TexNum);

-        glBegin(GL_QUADS);

-          glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

-          glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

-          glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom);

-          glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top);

-        glEnd;

-

 

-

-        //Rec.Right := X + (Start+Dlugosc-Czesci[0].Czesc[Czesci[0].Akt].StartNote) * TempR - NotesW - 0.5  + 10*ScreenX;

-        //if (Start+Dlugosc-1 = Czas.AktBeatD) then

-        if Perfect and (Ini.EffectSing=1) then begin

-//          A := sqrt((1+sin(Music.Position * 3))/2);

-          A := 1 - 2*(Czas.Teraz - GetTimeFromBeat(Start+Dlugosc));

-          if not (Start+Dlugosc-1 = Czas.AktBeatD) then

-

-            //Star animation counter

-            //inc(Starfr);

-            //Starfr := Starfr mod 128;

-            GoldenRec.SavePerfectNotePos(Rec.Left, Rec.Top);

-          {  SingDrawStar(Rec.Left+2, Rec.Top+4, A);}

-        end;

-

-        // detekt

-{        Rec.Left := Round((Detekt-Czesci.Czesc[Czesci.Akt].Start) * TempR) + 130;

-        glColor3f(1, 0.2, 0.2);

-        glDisable(GL_BLEND);

-        glDisable(GL_TEXTURE_2D);

-        glBegin(GL_QUADS);

-          glVertex(Rec.Left,   Rec.Top-5);

-          glVertex(Rec.Left,   Rec.Bottom+5);

-          glVertex(Rec.Left+1, Rec.Bottom+5);

-          glVertex(Rec.Left+1, Rec.Top-5);

-        glEnd;

-        glColor3f(1, 1, 1);

-        glEnable(GL_BLEND);

-        glEnable(GL_TEXTURE_2D);}

-

-        // detekt + FFT length

-{        Rec.Right := (Detekt-Czesci.Czesc[Czesci.Akt].Start) * TempR + 130;

-        // TempR = dlugosc 1 kostki

-        // 60 * 4 / BPM  = czas w sekundach na 1 kostke, np. 0,4s

-        // 4096 / 44100 = czas jednego sampla FFT, np. 0,1s

-        // ile to ma kostek? np. 0.25

-        // (4096 / 44100) / (60 * 4 / BPM), np. 0,1s / 0,4s = 0.25

-        // * TempR = dlugosc sampla FFT

-        Rec.Left := Rec.Right - (Sound.n / 44100) / (60 * 4 / Muzyka.BPM) * TempR;

-

-        glColor3f(1, 0.2, 0.2);

-        glVertex(Rec.Left,   Rec.Top-4);

-        glVertex(Rec.Left,   Rec.Bottom+4);

-        glVertex(Rec.Right, Rec.Bottom+4);

-        glVertex(Rec.Right, Rec.Top-4);}

-

-      end; // with

-    end; // for

+  if Player[NrGracza].IlNut > 0 then

+    begin

+      TempR := W / (Czesci[0].Czesc[Czesci[0].Akt].Koniec - Czesci[0].Czesc[Czesci[0].Akt].StartNote);

+        for N := 0 to Player[NrGracza].HighNut do

+          begin

+            with Player[NrGracza].Nuta[N] do

+              begin

+                // Left part of note

+                Rec.Left := X + (Start-Czesci[0].Czesc[Czesci[0].Akt].StartNote) * TempR + 0.5 + 10*ScreenX;

+                Rec.Right := Rec.Left + NotesW;

+

+                // Draw it in half size, if not hit

+               if Hit then

+                 begin

+                   NotesH2 := NotesH

+                 end

+               else

+                 begin

+                   NotesH2 := int(NotesH * 0.65);

+                 end;

+

+                Rec.Top    := Y - (Ton-Czesci[0].Czesc[Czesci[0].Akt].BaseNote)*Space/2 - NotesH2;

+                Rec.Bottom := Rec.Top + 2 *NotesH2;

+

+                // draw the left part

+                glColor3f(1, 1, 1);

+                glBindTexture(GL_TEXTURE_2D, Tex_Left[NrGracza+1].TexNum);

+                glBegin(GL_QUADS);

+                  glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

+                  glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

+                  glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom);

+                  glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top);

+                glEnd;

+

+               // Middle part of the note

+               Rec.Left := Rec.Right;

+               Rec.Right := X + (Start+Dlugosc-Czesci[0].Czesc[Czesci[0].Akt].StartNote) * TempR - NotesW - 0.5  + 10*ScreenX;

+

+               // (nowe) - dunno

+               if (Start+Dlugosc-1 = Czas.AktBeatD) then

+                 Rec.Right := Rec.Right - (1-Frac(Czas.MidBeatD)) * TempR;

+               // the left note is more right than the right note itself, sounds weird - so we fix that xD

+               if Rec.Right <= Rec.Left then Rec.Right := Rec.Left;

+

+               // draw the middle part

+               glBindTexture(GL_TEXTURE_2D, Tex_Mid[NrGracza+1].TexNum);

+               glTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT );

+               glTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT );

+               glBegin(GL_QUADS);

+                 glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

+                 glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

+                 glTexCoord2f(round((Rec.Right-Rec.Left)/32), 1); glVertex2f(Rec.Right, Rec.Bottom);

+                 glTexCoord2f(round((Rec.Right-Rec.Left)/32), 0); glVertex2f(Rec.Right, Rec.Top);

+               glEnd;

+               glColor3f(1, 1, 1);

+

+               // the right part of the note

+               Rec.Left := Rec.Right;

+               Rec.Right := Rec.Right + NotesW;

+

+               glBindTexture(GL_TEXTURE_2D, Tex_Right[NrGracza+1].TexNum);

+               glBegin(GL_QUADS);

+                 glTexCoord2f(0, 0); glVertex2f(Rec.Left,  Rec.Top);

+                 glTexCoord2f(0, 1); glVertex2f(Rec.Left,  Rec.Bottom);

+                 glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom);

+                 glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top);

+               glEnd;

+

+            // Perfect note is stored

+            if Perfect and (Ini.EffectSing=1) then

+              begin

+                A := 1 - 2*(Czas.Teraz - GetTimeFromBeat(Start+Dlugosc));

+                  if not (Start+Dlugosc-1 = Czas.AktBeatD) then

+

+                  //Star animation counter

+                  //inc(Starfr);

+                  //Starfr := Starfr mod 128;

+                  GoldenRec.SavePerfectNotePos(Rec.Left, Rec.Top);

+              end;

+            end; // with

+        end; // for

     // eigentlich brauchen wir hier einen vergleich, um festzustellen, ob wir mit

     // singen schon weiter wären, als bei Rec.Right, _auch, wenn nicht gesungen wird_

 

     // passing on NrGracza... hope this is really something like the player-number, not only

     // some kind of weird index into a colour-table

 

-    if (Ini.EffectSing=1) then

-    GoldenRec.GoldenNoteTwinkle(Rec.Top,Rec.Bottom,Rec.Right, NrGracza);

+        if (Ini.EffectSing=1) then

+          GoldenRec.GoldenNoteTwinkle(Rec.Top,Rec.Bottom,Rec.Right, NrGracza);

   end; // if

 end;

 

@@ -523,64 +489,6 @@ begin
   end;

 end;

 

-{not used anymore tough we have UGraphicClasses

-procedure SingDrawStar(X, Y, A: real);

-var

-  TempR:    real;

-  W, H:     real;

-  Starframe: real;

-  begin

-  W := 32;

-  H := 32;

-

-// Golden Star Patch

-//  case Z of

-//    1: glColor4f(1, 1, 1, A);

-//    2: glColor4f(1, 1, 0.3, A);

-//  end; // case

-

-  glColor4f(1, 1, 1, A);

-  glEnable(GL_TEXTURE_2D);

-  glEnable(GL_BLEND);

-  glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

-  glBindTexture(GL_TEXTURE_2D, Tex_Note_Star.TexNum);

-

-  Starframe := 15 - ((GetTickCount div 33) mod 16);

-

-  glBegin(GL_QUADS);

-    glTexCoord2f((1/16) * Starframe, 0); glVertex2f(X-W, Y-H);

-    glTexCoord2f((1/16) * Starframe + (1/16), 0); glVertex2f(X-W, Y+H);

-    glTexCoord2f((1/16) * Starframe + (1/16), 1); glVertex2f(X+W, Y+H);

-    glTexCoord2f((1/16) * Starframe, 1); glVertex2f(X+W, Y-H);

-  glEnd;

-end;

-}

-

-{not used anymore tough we have UGraphicClasses

-procedure SingGoldenStar(X, Y, A: real);

-var

-  TempR:    real;

-  W, H:     real;

-  StarfrG2: real;

-  begin

-  W := 16;

-  H := 16;

-  glColor4f(1, 1, 0.3, A);

-  glEnable(GL_TEXTURE_2D);

-  glEnable(GL_BLEND);

-  glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

-  glBindTexture(GL_TEXTURE_2D, Tex_Note_Star.TexNum);

-  StarfrG2 := 15 - ((GetTickCount div 67) mod 16);

-  glBegin(GL_QUADS);

-    //x1

-    glTexCoord2f((1/16) * StarfrG2, 0); glVertex2f(X-W, Y-H);

-    glTexCoord2f((1/16) * StarfrG2 + (1/16), 0); glVertex2f(X-W, Y+H);

-    glTexCoord2f((1/16) * StarfrG2 + (1/16), 1); glVertex2f(X+W, Y+H);

-    glTexCoord2f((1/16) * StarfrG2, 1); glVertex2f(X+W, Y-H);

-  glEnd;

-end;

-}

-

 procedure SingDraw;

 var

   Pet:      integer;

@@ -598,16 +506,12 @@ var
   LyricTemp:  string;

   PetCz:    integer;

 

-

-

   //SingBar Mod

   A: Integer;

   E: Integer;

   I: Integer;

   //end Singbar Mod

 

-

-

 begin

   // positions

   if Ini.SingWindow = 0 then begin

@@ -739,51 +643,40 @@ begin
         else if I < 0 then Dec(Player[E].ScorePercent);

       end; //for

     end; //if

+

     if PlayersPlay = 1 then begin

-      //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

       SingDrawSingbar(Theme.Sing.StaticP1SingBar.x, Theme.Sing.StaticP1SingBar.y, Theme.Sing.StaticP1SingBar.w, Theme.Sing.StaticP1SingBar.h , Player[0].ScorePercent);

-   end;

+    end;

+

     if PlayersPlay = 2 then begin

-      //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

-      //SingDrawSingbar(620 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

       SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[0].ScorePercent);

       SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[1].ScorePercent);

-   end;

+    end;

+

     if PlayersPlay = 3 then begin

-      //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

-      //SingDrawSingbar(370 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

-      //SingDrawSingbar(670 + 10*ScreenX, 95, 100, 8, Player[2].ScorePercent);

       SingDrawSingbar(Theme.Sing.StaticP1ThreePSingBar.x, Theme.Sing.StaticP1ThreePSingBar.y, Theme.Sing.StaticP1ThreePSingBar.w, Theme.Sing.StaticP1ThreePSingBar.h , Player[0].ScorePercent);

       SingDrawSingbar(Theme.Sing.StaticP2MSingBar.x, Theme.Sing.StaticP2MSingBar.y, Theme.Sing.StaticP2MSingBar.w, Theme.Sing.StaticP2MSingBar.h , Player[1].ScorePercent);

       SingDrawSingbar(Theme.Sing.StaticP3SingBar.x, Theme.Sing.StaticP3SingBar.y, Theme.Sing.StaticP3SingBar.w, Theme.Sing.StaticP3SingBar.h , Player[2].ScorePercent);

     end;

+

     if PlayersPlay = 4 then begin

       if ScreenAct = 1 then begin

-      //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

-      //SingDrawSingbar(620 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

-      SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[0].ScorePercent);

-      SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[1].ScorePercent);

+        SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[0].ScorePercent);

+        SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[1].ScorePercent);

       end;

       if ScreenAct = 2 then begin

-      //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[2].ScorePercent);

-      //SingDrawSingbar(620 + 10*ScreenX, 95, 100, 8, Player[3].ScorePercent);

-      SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[2].ScorePercent);

-      SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[3].ScorePercent);

+        SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[2].ScorePercent);

+        SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[3].ScorePercent);

       end;

     end;

+

     if PlayersPlay = 6 then begin

       if ScreenAct = 1 then begin

-        //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

-        //SingDrawSingbar(370 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

-        //SingDrawSingbar(670 + 10*ScreenX, 95, 100, 8, Player[2].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP1ThreePSingBar.x, Theme.Sing.StaticP1ThreePSingBar.y, Theme.Sing.StaticP1ThreePSingBar.w, Theme.Sing.StaticP1ThreePSingBar.h , Player[0].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP2MSingBar.x, Theme.Sing.StaticP2MSingBar.y, Theme.Sing.StaticP2MSingBar.w, Theme.Sing.StaticP2MSingBar.h , Player[1].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP3SingBar.x, Theme.Sing.StaticP3SingBar.y, Theme.Sing.StaticP3SingBar.w, Theme.Sing.StaticP3SingBar.h , Player[2].ScorePercent);

      end;

       if ScreenAct = 2 then begin

-        //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[3].ScorePercent);

-        //SingDrawSingbar(370 + 10*ScreenX, 95, 100, 8, Player[4].ScorePercent);

-        //SingDrawSingbar(670 + 10*ScreenX, 95, 100, 8, Player[5].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP1ThreePSingBar.x, Theme.Sing.StaticP1ThreePSingBar.y, Theme.Sing.StaticP1ThreePSingBar.w, Theme.Sing.StaticP1ThreePSingBar.h , Player[3].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP2MSingBar.x, Theme.Sing.StaticP2MSingBar.y, Theme.Sing.StaticP2MSingBar.w, Theme.Sing.StaticP2MSingBar.h , Player[4].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP3SingBar.x, Theme.Sing.StaticP3SingBar.y, Theme.Sing.StaticP3SingBar.w, Theme.Sing.StaticP3SingBar.h , Player[5].ScorePercent);

@@ -798,53 +691,58 @@ begin
     if (A <> Tickold2) AND (Player[0].LineBonus_Visible) then begin

       Tickold2 := A;

       for E := 0 to (PlayersPlay - 1) do begin

-          //Change Alpha

-          Player[E].LineBonus_Alpha := Player[E].LineBonus_Alpha - 0.02;

+        //Change Alpha

+        Player[E].LineBonus_Alpha := Player[E].LineBonus_Alpha - 0.02;

           if Player[E].LineBonus_Alpha <= 0 then

             begin

               Player[E].LineBonus_Age := 0;

               Player[E].LineBonus_Visible := False

             end

           else

-          begin

-          inc(Player[E].LineBonus_Age, 1);

-          //Change Position

-          if (Player[E].LineBonus_PosX < Player[E].LineBonus_TargetX) then

-            Player[E].LineBonus_PosX := Player[E].LineBonus_PosX + (2 - Player[E].LineBonus_Alpha * 1.5)

-           else if (Player[E].LineBonus_PosX > Player[E].LineBonus_TargetX) then

-            Player[E].LineBonus_PosX := Player[E].LineBonus_PosX - (2 - Player[E].LineBonus_Alpha * 1.5);

-

-          if (Player[E].LineBonus_PosY < Player[E].LineBonus_TargetY) then

-            Player[E].LineBonus_PosY := Player[E].LineBonus_PosY + (2 - Player[E].LineBonus_Alpha * 1.5)

-          else if (Player[E].LineBonus_PosY > Player[E].LineBonus_TargetY) then

-            Player[E].LineBonus_PosY := Player[E].LineBonus_PosY - (2 - Player[E].LineBonus_Alpha * 1.5);

+            begin

+              inc(Player[E].LineBonus_Age, 1);

+              //Change Position

+                if (Player[E].LineBonus_PosX < Player[E].LineBonus_TargetX) then

+                    Player[E].LineBonus_PosX := Player[E].LineBonus_PosX + (2 - Player[E].LineBonus_Alpha * 1.5)

+                else if (Player[E].LineBonus_PosX > Player[E].LineBonus_TargetX) then

+                    Player[E].LineBonus_PosX := Player[E].LineBonus_PosX - (2 - Player[E].LineBonus_Alpha * 1.5);

 

-          end;

-      end;

-    end; //if

+                if (Player[E].LineBonus_PosY < Player[E].LineBonus_TargetY) then

+                    Player[E].LineBonus_PosY := Player[E].LineBonus_PosY + (2 - Player[E].LineBonus_Alpha * 1.5)

+                else if (Player[E].LineBonus_PosY > Player[E].LineBonus_TargetY) then

+                    Player[E].LineBonus_PosY := Player[E].LineBonus_PosY - (2 - Player[E].LineBonus_Alpha * 1.5);

 

-    if PlayersPlay = 1 then begin

+            end; // shift position of the pop up (if not dead)

+      end;       // loop - for all players

+    end;         // if - linebonus

+

+

+    if      PlayersPlay = 1 then begin

       SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

-   end

-   else if PlayersPlay = 2 then begin

+    end

+

+    else if PlayersPlay = 2 then begin

       SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

       SingDrawLineBonus( Player[1].LineBonus_PosX, Player[1].LineBonus_PosY, Player[1].LineBonus_Color, Player[1].LineBonus_Alpha, Player[1].LineBonus_Text, Player[1].LineBonus_Age);

    end

+

    else if PlayersPlay = 3 then begin

       SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

       SingDrawLineBonus( Player[1].LineBonus_PosX, Player[1].LineBonus_PosY, Player[1].LineBonus_Color, Player[1].LineBonus_Alpha, Player[1].LineBonus_Text, Player[1].LineBonus_Age);

       SingDrawLineBonus( Player[2].LineBonus_PosX, Player[2].LineBonus_PosY, Player[2].LineBonus_Color, Player[2].LineBonus_Alpha, Player[2].LineBonus_Text, Player[2].LineBonus_Age);

     end

+

    else if PlayersPlay = 4 then begin

       if ScreenAct = 1 then begin

-      SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

-      SingDrawLineBonus( Player[1].LineBonus_PosX, Player[1].LineBonus_PosY, Player[1].LineBonus_Color, Player[1].LineBonus_Alpha, Player[1].LineBonus_Text, Player[1].LineBonus_Age);

+        SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

+        SingDrawLineBonus( Player[1].LineBonus_PosX, Player[1].LineBonus_PosY, Player[1].LineBonus_Color, Player[1].LineBonus_Alpha, Player[1].LineBonus_Text, Player[1].LineBonus_Age);

       end;

       if ScreenAct = 2 then begin

-      SingDrawLineBonus( Player[2].LineBonus_PosX, Player[2].LineBonus_PosY, Player[2].LineBonus_Color, Player[2].LineBonus_Alpha, Player[2].LineBonus_Text, Player[2].LineBonus_Age);

-      SingDrawLineBonus( Player[3].LineBonus_PosX, Player[3].LineBonus_PosY, Player[3].LineBonus_Color, Player[3].LineBonus_Alpha, Player[3].LineBonus_Text, Player[3].LineBonus_Age);

+        SingDrawLineBonus( Player[2].LineBonus_PosX, Player[2].LineBonus_PosY, Player[2].LineBonus_Color, Player[2].LineBonus_Alpha, Player[2].LineBonus_Text, Player[2].LineBonus_Age);

+        SingDrawLineBonus( Player[3].LineBonus_PosX, Player[3].LineBonus_PosY, Player[3].LineBonus_Color, Player[3].LineBonus_Alpha, Player[3].LineBonus_Text, Player[3].LineBonus_Age);

       end;

     end;

+

     if PlayersPlay = 6 then begin

       if ScreenAct = 1 then begin

         SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

@@ -860,9 +758,7 @@ begin
   end;

   //PhrasenBonus - Line Bonus Mod End

 

-

-  // rysuje paski

-//  Log.LogStatus('Original notes', 'SingDraw');

+// Set the note heights according to the difficulty level

   case Ini.Difficulty of

     0:

       begin

@@ -881,10 +777,11 @@ begin
       end;

   end;

 

+// Draw the Notes

   if PlayersPlay = 1 then begin

-    SingDrawPlayerBGCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 0, 0, 15);

-    SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 0, 15);

-    SingDrawPlayerCzesc(Nr.Left + 20, Skin_P2_NotesB, Nr.Width - 40, 0, 15);

+    SingDrawPlayerBGCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 0, 0, 15);  // Background glow    - colorized in playercolor

+    SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 0, 15);             // Plain unsung notes - colorized in playercolor

+    SingDrawPlayerCzesc(Nr.Left + 20, Skin_P2_NotesB, Nr.Width - 40, 0, 15);       // imho the sung notes

   end;

 

   if (PlayersPlay = 2)  then begin

@@ -892,7 +789,7 @@ begin
     SingDrawPlayerBGCzesc(Nr.Left + 20, Skin_P2_NotesB, Nr.Right - 20, 0, 1, 15);

 

     SingDrawCzesc(NR.Left + 20, Skin_P1_NotesB, NR.Right - 20, 0, 15);

-    SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 0, 15);

+    SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 1, 15);

 

     SingDrawPlayerCzesc(Nr.Left + 20, Skin_P1_NotesB, Nr.Width - 40, 0, 15);

     SingDrawPlayerCzesc(Nr.Left + 20, Skin_P2_NotesB, Nr.Width - 40, 1, 15);

@@ -907,8 +804,8 @@ begin
     SingDrawPlayerBGCzesc(Nr.Left + 20, 370+95, Nr.Right - 20, 0, 2, 12);

 

     SingDrawCzesc(NR.Left + 20, 120+95, NR.Right - 20, 0, 12);

-    SingDrawCzesc(NR.Left + 20, 245+95, NR.Right - 20, 0, 12);

-    SingDrawCzesc(NR.Left + 20, 370+95, NR.Right - 20, 0, 12);

+    SingDrawCzesc(NR.Left + 20, 245+95, NR.Right - 20, 1, 12);

+    SingDrawCzesc(NR.Left + 20, 370+95, NR.Right - 20, 2, 12);

 

     SingDrawPlayerCzesc(Nr.Left + 20, 120+95, Nr.Width - 40, 0, 12);

     SingDrawPlayerCzesc(Nr.Left + 20, 245+95, Nr.Width - 40, 1, 12);

@@ -925,8 +822,14 @@ begin
       SingDrawPlayerBGCzesc(Nr.Left + 20, Skin_P2_NotesB, Nr.Right - 20, 0, 3, 15);

     end;

 

-    SingDrawCzesc(NR.Left + 20, Skin_P1_NotesB, NR.Right - 20, 0, 15);

-    SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 0, 15);

+    if ScreenAct = 1 then begin

+      SingDrawCzesc(NR.Left + 20, Skin_P1_NotesB, NR.Right - 20, 0, 15);

+      SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 1, 15);

+    end;

+    if ScreenAct = 2 then begin

+      SingDrawCzesc(NR.Left + 20, Skin_P1_NotesB, NR.Right - 20, 2, 15);

+      SingDrawCzesc(NR.Left + 20, Skin_P2_NotesB, NR.Right - 20, 3, 15);

+    end;

 

     if ScreenAct = 1 then begin

       SingDrawPlayerCzesc(Nr.Left + 20, Skin_P1_NotesB, Nr.Width - 40, 0, 15);

@@ -953,9 +856,16 @@ begin
       SingDrawPlayerBGCzesc(Nr.Left + 20, 370+95, Nr.Right - 20, 0, 5, 12);

     end;

 

-    SingDrawCzesc(NR.Left + 20, 120+95, NR.Right - 20, 0, 12);

-    SingDrawCzesc(NR.Left + 20, 245+95, NR.Right - 20, 0, 12);

-    SingDrawCzesc(NR.Left + 20, 370+95, NR.Right - 20, 0, 12);

+    if ScreenAct = 1 then begin

+      SingDrawCzesc(NR.Left + 20, 120+95, NR.Right - 20, 0, 12);

+      SingDrawCzesc(NR.Left + 20, 245+95, NR.Right - 20, 1, 12);

+      SingDrawCzesc(NR.Left + 20, 370+95, NR.Right - 20, 2, 12);

+    end;

+    if ScreenAct = 2 then begin

+      SingDrawCzesc(NR.Left + 20, 120+95, NR.Right - 20, 3, 12);

+      SingDrawCzesc(NR.Left + 20, 245+95, NR.Right - 20, 4, 12);

+      SingDrawCzesc(NR.Left + 20, 370+95, NR.Right - 20, 5, 12);

+    end;

 

     if ScreenAct = 1 then begin

       SingDrawPlayerCzesc(Nr.Left + 20, 120+95, Nr.Width - 40, 0, 12);

@@ -968,11 +878,11 @@ begin
       SingDrawPlayerCzesc(Nr.Left + 20, 370+95, Nr.Width - 40, 5, 12);

     end;

   end;

-

   glDisable(GL_BLEND);

   glDisable(GL_TEXTURE_2D);

 end;

 

+// q'n'd for using the game mode dll's

 procedure SingModiDraw (PlayerInfo: TPlayerInfo);

 var

   Pet:      integer;

@@ -990,16 +900,12 @@ var
   LyricTemp:  string;

   PetCz:    integer;

 

-

-

   //SingBar Mod

   A: Integer;

   E: Integer;

   I: Integer;

   //end Singbar Mod

 

-

-

 begin

   // positions

   if Ini.SingWindow = 0 then begin

@@ -1007,22 +913,17 @@ begin
   end else begin

     NR.Left := 20;

   end;

-  NR.Right := 780;

 

+  NR.Right := 780;

   NR.Width := NR.Right - NR.Left;

-  NR.WMid := NR.Width / 2;

-  NR.Mid := NR.Left + NR.WMid;

-

-  // background  //BG Fullsize Mod

-  //SingDrawBackground;

+  NR.WMid  := NR.Width / 2;

+  NR.Mid   := NR.Left + NR.WMid;

 

   // time bar

-//  Log.LogStatus('Time Bar', 'SingDraw');

   SingDrawTimeBar();

 

   if DLLMan.Selected.ShowNotes then

   begin

-    // rysuje paski pod nutami

     if PlayersPlay = 1 then

       SingDrawNoteLines(Nr.Left + 10*ScreenX, Skin_P2_NotesB - 105, Nr.Right + 10*ScreenX, 15);

     if (PlayersPlay = 2) or (PlayersPlay = 4) then begin

@@ -1037,7 +938,7 @@ begin
     end;

   end;

 

-    // rysuje tekst - new Lyric engine

+    // Lyric engine

     ScreenSingModi.LyricMain.Draw;

     ScreenSingModi.LyricSub.Draw;

 

@@ -1046,40 +947,30 @@ begin
     BarFrom := Czesci[0].Czesc[Czesci[0].Akt].StartNote - Czesci[0].Czesc[Czesci[0].Akt].Start;

     if BarFrom > 40 then BarFrom := 40;

     if (Czesci[0].Czesc[Czesci[0].Akt].StartNote - Czesci[0].Czesc[Czesci[0].Akt].Start > 8) and  // dluga przerwa //16->12 for more help bars and then 12->8 for even more

-      (Czesci[0].Czesc[Czesci[0].Akt].StartNote - Czas.MidBeat > 0) and                     // przed tekstem

-      (Czesci[0].Czesc[Czesci[0].Akt].StartNote - Czas.MidBeat < 40) then begin            // ale nie za wczesnie

-      BarWspol := (Czas.MidBeat - (Czesci[0].Czesc[Czesci[0].Akt].StartNote - BarFrom)) / BarFrom;

-      Rec.Left := NR.Left + BarWspol *

-  //      (NR.WMid - Czesci[0].Czesc[Czesci[0].Akt].LyricWidth / 2 * FS - 50);

-        (ScreenSingModi.LyricMain.ClientX - NR.Left - 50) + 10*ScreenX;

-      Rec.Right := Rec.Left + 50;

-      Rec.Top := Skin_LyricsT + 3;

-      Rec.Bottom := Rec.Top + 33;//SingScreen.LyricMain.Size * 3;

-{    // zapalanie

-    BarAlpha := (BarWspol*10) * 0.5;

-    if BarAlpha > 0.5 then BarAlpha := 0.5;

-

-    // gaszenie

-    if BarWspol > 0.95 then BarAlpha := 0.5 * (1 - (BarWspol - 0.95) * 20);}

-

-    //Change fuer Crazy Joker

-

-  glEnable(GL_TEXTURE_2D);

-  glEnable(GL_BLEND);

-  glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

-  glBindTexture(GL_TEXTURE_2D, Tex_Lyric_Help_Bar.TexNum);

-  glBegin(GL_QUADS);

-    glColor4f(1, 1, 1, 0);

-    glTexCoord2f(0, 0); glVertex2f(Rec.Left, Rec.Top);

-    glTexCoord2f(0, 1); glVertex2f(Rec.Left, Rec.Bottom);

-    glColor4f(1, 1, 1, 0.5);

-    glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom);

-    glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top);

-    glEnd;

-    glDisable(GL_BLEND);

+       (Czesci[0].Czesc[Czesci[0].Akt].StartNote - Czas.MidBeat > 0) and                     // przed tekstem

+       (Czesci[0].Czesc[Czesci[0].Akt].StartNote - Czas.MidBeat < 40) then begin            // ale nie za wczesnie

+         BarWspol := (Czas.MidBeat - (Czesci[0].Czesc[Czesci[0].Akt].StartNote - BarFrom)) / BarFrom;

+         Rec.Left := NR.Left + BarWspol * (ScreenSingModi.LyricMain.ClientX - NR.Left - 50) + 10*ScreenX;

+         Rec.Right := Rec.Left + 50;

+         Rec.Top := Skin_LyricsT + 3;

+         Rec.Bottom := Rec.Top + 33;//SingScreen.LyricMain.Size * 3;

+

+           glEnable(GL_TEXTURE_2D);

+           glEnable(GL_BLEND);

+           glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

+           glBindTexture(GL_TEXTURE_2D, Tex_Lyric_Help_Bar.TexNum);

+           glBegin(GL_QUADS);

+             glColor4f(1, 1, 1, 0);

+               glTexCoord2f(0, 0); glVertex2f(Rec.Left, Rec.Top);

+               glTexCoord2f(0, 1); glVertex2f(Rec.Left, Rec.Bottom);

+             glColor4f(1, 1, 1, 0.5);

+               glTexCoord2f(1, 1); glVertex2f(Rec.Right, Rec.Bottom);

+               glTexCoord2f(1, 0); glVertex2f(Rec.Right, Rec.Top);

+           glEnd;

+           glDisable(GL_BLEND);

     end;

 

-  // oscilloscope

+  // oscilloscope | the thing that moves when you yell into your mic (imho)

   if (((Ini.Oscilloscope = 1) AND (DLLMan.Selected.ShowRateBar_O)) AND (NOT DLLMan.Selected.ShowRateBar)) then begin

     if PlayersPlay = 1 then

       if PlayerInfo.Playerinfo[0].Enabled then

@@ -1138,80 +1029,69 @@ begin
   end

 

   //SingBar Mod

-  // was fürn sinn hattn der quark hier?

+  // seems like we don't want the flicker thing, we want the linebonus rating bar beneath the scores

   else if ((Ini.Oscilloscope = 2) AND (DLLMan.Selected.ShowRateBar_O)) OR (DLLMan.Selected.ShowRateBar) then begin

     A := GetTickCount div 33;

     if A <> Tickold then begin

       Tickold := A;

       for E := 0 to (PlayersPlay - 1) do begin //Set new Pos + Alpha

         I := Player[E].ScorePercentTarget - Player[E].ScorePercent;

-        if I > 0 then Inc(Player[E].ScorePercent)

-        else if I < 0 then Dec(Player[E].ScorePercent);

+          if      I > 0 then Inc(Player[E].ScorePercent)

+          else if I < 0 then Dec(Player[E].ScorePercent);

       end; //for

     end; //if

+

     if PlayersPlay = 1 then begin

       if PlayerInfo.Playerinfo[0].Enabled then

-        //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP1SingBar.x, Theme.Sing.StaticP1SingBar.y, Theme.Sing.StaticP1SingBar.w, Theme.Sing.StaticP1SingBar.h , Player[0].ScorePercent);

-   end;

+    end;

+

     if PlayersPlay = 2 then begin

       if PlayerInfo.Playerinfo[0].Enabled then

-        //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[0].ScorePercent);

       if PlayerInfo.Playerinfo[1].Enabled then

-        //SingDrawSingbar(620 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[1].ScorePercent);

-   end;

+    end;

+

     if PlayersPlay = 3 then begin

       if PlayerInfo.Playerinfo[0].Enabled then

-        //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP1ThreePSingBar.x, Theme.Sing.StaticP1ThreePSingBar.y, Theme.Sing.StaticP1ThreePSingBar.w, Theme.Sing.StaticP1ThreePSingBar.h , Player[0].ScorePercent);

       if PlayerInfo.Playerinfo[1].Enabled then

-        //SingDrawSingbar(370 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP2MSingBar.x, Theme.Sing.StaticP2MSingBar.y, Theme.Sing.StaticP2MSingBar.w, Theme.Sing.StaticP2MSingBar.h , Player[1].ScorePercent);

       if PlayerInfo.Playerinfo[2].Enabled then

-        //SingDrawSingbar(670 + 10*ScreenX, 95, 100, 8, Player[2].ScorePercent);

         SingDrawSingbar(Theme.Sing.StaticP3SingBar.x, Theme.Sing.StaticP3SingBar.y, Theme.Sing.StaticP3SingBar.w, Theme.Sing.StaticP3SingBar.h , Player[2].ScorePercent);

     end;

+

     if PlayersPlay = 4 then begin

       if ScreenAct = 1 then begin

         if PlayerInfo.Playerinfo[0].Enabled then

-          //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[0].ScorePercent);

         if PlayerInfo.Playerinfo[1].Enabled then

-          //SingDrawSingbar(620 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[1].ScorePercent);

       end;

       if ScreenAct = 2 then begin

         if PlayerInfo.Playerinfo[2].Enabled then

-          //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[2].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP1TwoPSingBar.x, Theme.Sing.StaticP1TwoPSingBar.y, Theme.Sing.StaticP1TwoPSingBar.w, Theme.Sing.StaticP1TwoPSingBar.h , Player[2].ScorePercent);

         if PlayerInfo.Playerinfo[3].Enabled then

-          //SingDrawSingbar(620 + 10*ScreenX, 95, 100, 8, Player[3].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP2RSingBar.x, Theme.Sing.StaticP2RSingBar.y, Theme.Sing.StaticP2RSingBar.w, Theme.Sing.StaticP2RSingBar.h , Player[3].ScorePercent);

       end;

     end;

+

     if PlayersPlay = 6 then begin

       if ScreenAct = 1 then begin

         if PlayerInfo.Playerinfo[0].Enabled then

-          //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[0].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP1ThreePSingBar.x, Theme.Sing.StaticP1ThreePSingBar.y, Theme.Sing.StaticP1ThreePSingBar.w, Theme.Sing.StaticP1ThreePSingBar.h , Player[0].ScorePercent);

         if PlayerInfo.Playerinfo[1].Enabled then

-          //SingDrawSingbar(370 + 10*ScreenX, 95, 100, 8, Player[1].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP2MSingBar.x, Theme.Sing.StaticP2MSingBar.y, Theme.Sing.StaticP2MSingBar.w, Theme.Sing.StaticP2MSingBar.h , Player[1].ScorePercent);

         if PlayerInfo.Playerinfo[2].Enabled then

-          //SingDrawSingbar(670 + 10*ScreenX, 95, 100, 8, Player[2].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP3SingBar.x, Theme.Sing.StaticP3SingBar.y, Theme.Sing.StaticP3SingBar.w, Theme.Sing.StaticP3SingBar.h , Player[2].ScorePercent);

       end;

       if ScreenAct = 2 then begin

         if PlayerInfo.Playerinfo[3].Enabled then

-          //SingDrawSingbar( 75 + 10*ScreenX, 95, 100, 8, Player[3].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP1ThreePSingBar.x, Theme.Sing.StaticP1ThreePSingBar.y, Theme.Sing.StaticP1ThreePSingBar.w, Theme.Sing.StaticP1ThreePSingBar.h , Player[3].ScorePercent);

         if PlayerInfo.Playerinfo[4].Enabled then

-          //SingDrawSingbar(370 + 10*ScreenX, 95, 100, 8, Player[4].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP2MSingBar.x, Theme.Sing.StaticP2MSingBar.y, Theme.Sing.StaticP2MSingBar.w, Theme.Sing.StaticP2MSingBar.h , Player[4].ScorePercent);

         if PlayerInfo.Playerinfo[5].Enabled then

-          //SingDrawSingbar(670 + 10*ScreenX, 95, 100, 8, Player[5].ScorePercent);

           SingDrawSingbar(Theme.Sing.StaticP3SingBar.x, Theme.Sing.StaticP3SingBar.y, Theme.Sing.StaticP3SingBar.w, Theme.Sing.StaticP3SingBar.h , Player[5].ScorePercent);

       end;

     end;

@@ -1227,43 +1107,42 @@ begin
           //Change Alpha

           Player[E].LineBonus_Alpha := Player[E].LineBonus_Alpha - 0.02;

 

-

           if Player[E].LineBonus_Alpha <= 0 then

             begin

-            Player[E].LineBonus_Age := 0;

-            Player[E].LineBonus_Visible := False

-

+              Player[E].LineBonus_Age := 0;

+              Player[E].LineBonus_Visible := False

             end

           else

-          begin

-          inc(Player[E].LineBonus_Age, 1);

-

-          //Change Position

-          if (Player[E].LineBonus_PosX < Player[E].LineBonus_TargetX) then

-            Player[E].LineBonus_PosX := Player[E].LineBonus_PosX + (2 - Player[E].LineBonus_Alpha * 1.5)

-           else if (Player[E].LineBonus_PosX > Player[E].LineBonus_TargetX) then

-            Player[E].LineBonus_PosX := Player[E].LineBonus_PosX - (2 - Player[E].LineBonus_Alpha * 1.5);

-

-          if (Player[E].LineBonus_PosY < Player[E].LineBonus_TargetY) then

-            Player[E].LineBonus_PosY := Player[E].LineBonus_PosY + (2 - Player[E].LineBonus_Alpha * 1.5)

-          else if (Player[E].LineBonus_PosY > Player[E].LineBonus_TargetY) then

-            Player[E].LineBonus_PosY := Player[E].LineBonus_PosY - (2 - Player[E].LineBonus_Alpha * 1.5);

-

-          end;

-      end;

-    end; //if

-

-    if PlayersPlay = 1 then begin

+            begin

+              inc(Player[E].LineBonus_Age, 1);

+              //Change Position

+              if (Player[E].LineBonus_PosX < Player[E].LineBonus_TargetX) then         // pop up has not yet reached it's position -> blend in

+                Player[E].LineBonus_PosX := Player[E].LineBonus_PosX + (2 - Player[E].LineBonus_Alpha * 1.5)

+              else if (Player[E].LineBonus_PosX > Player[E].LineBonus_TargetX) then    // pop up has reached it's position -> blend out

+                Player[E].LineBonus_PosX := Player[E].LineBonus_PosX - (2 - Player[E].LineBonus_Alpha * 1.5);

+

+              if (Player[E].LineBonus_PosY < Player[E].LineBonus_TargetY) then

+                Player[E].LineBonus_PosY := Player[E].LineBonus_PosY + (2 - Player[E].LineBonus_Alpha * 1.5)

+              else if (Player[E].LineBonus_PosY > Player[E].LineBonus_TargetY) then

+                Player[E].LineBonus_PosY := Player[E].LineBonus_PosY - (2 - Player[E].LineBonus_Alpha * 1.5);

+

+            end; // pop up still visible, has not reached it's position - move it

+      end;       // loop through all players

+    end;         // if it's time to draw them

+

+    if      PlayersPlay = 1 then begin

       if PlayerInfo.Playerinfo[0].Enabled then

         SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

-   end

-   else if PlayersPlay = 2 then begin

+    end

+

+    else if PlayersPlay = 2 then begin

       if PlayerInfo.Playerinfo[0].Enabled then

         SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

       if PlayerInfo.Playerinfo[1].Enabled then

         SingDrawLineBonus( Player[1].LineBonus_PosX, Player[1].LineBonus_PosY, Player[1].LineBonus_Color, Player[1].LineBonus_Alpha, Player[1].LineBonus_Text, Player[1].LineBonus_Age);

-   end

-   else if PlayersPlay = 3 then begin

+    end

+

+    else if PlayersPlay = 3 then begin

       if PlayerInfo.Playerinfo[0].Enabled then

         SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

       if PlayerInfo.Playerinfo[1].Enabled then

@@ -1271,7 +1150,8 @@ begin
       if PlayerInfo.Playerinfo[2].Enabled then

         SingDrawLineBonus( Player[2].LineBonus_PosX, Player[2].LineBonus_PosY, Player[2].LineBonus_Color, Player[2].LineBonus_Alpha, Player[2].LineBonus_Text, Player[2].LineBonus_Age);

     end

-   else if PlayersPlay = 4 then begin

+

+    else if PlayersPlay = 4 then begin

       if ScreenAct = 1 then begin

         if PlayerInfo.Playerinfo[0].Enabled then

           SingDrawLineBonus( Player[0].LineBonus_PosX, Player[0].LineBonus_PosY, Player[0].LineBonus_Color, Player[0].LineBonus_Alpha, Player[0].LineBonus_Text, Player[0].LineBonus_Age);

@@ -1285,6 +1165,7 @@ begin
           SingDrawLineBonus( Player[3].LineBonus_PosX, Player[3].LineBonus_PosY, Player[3].LineBonus_Color, Player[3].LineBonus_Alpha, Player[3].LineBonus_Text, Player[3].LineBonus_Age);

       end;

     end;

+

     if PlayersPlay = 6 then begin

       if ScreenAct = 1 then begin

         if PlayerInfo.Playerinfo[0].Enabled then

@@ -1304,11 +1185,9 @@ begin
       end;

     end;

   end;

-  //PhrasenBonus - Line Bonus Mod End

-

+//PhrasenBonus - Line Bonus Mod End

 

-  // rysuje paski

-//  Log.LogStatus('Original notes', 'SingDraw');

+// resize the notes according to the difficulty level

   case Ini.Difficulty of

     0:

       begin

@@ -1518,11 +1397,11 @@ begin;
 end;

 //end Singbar Mod

 

-//PhrasenBonus - Line Bonus Mod

+//PhrasenBonus - Line Bonus Pop Up

 procedure SingDrawLineBonus( const X, Y: Single; Color: TRGB; Alpha: Single; Text: string; Age: Integer);

 var

 Length, X2: Real; //Length of Text

-Size: Integer; //Size of Popup

+Size: Integer;    //Size of Popup

 begin

 if Alpha <> 0 then

 begin

@@ -1542,14 +1421,17 @@ SetFontPos (X + 50 - (Length / 2), Y + 12); //Position
 if Age < 5 then Size := Age * 10 else Size := 50;

 

   //Draw  Background

-  glColor4f(Color.R, Color.G, Color.B, Alpha); //Set Color

+  //glColor4f(Color.R, Color.G, Color.B, Alpha); //Set Color

+  glColor4f(1, 1, 1, Alpha);

+

+

   glEnable(GL_TEXTURE_2D);

   glEnable(GL_BLEND);

   //glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

 

 

   //New Method, Not Variable

-  glBindTexture(GL_TEXTURE_2D, Tex_SingLineBonusBack.TexNum);

+  glBindTexture(GL_TEXTURE_2D, Tex_SingLineBonusBack[2]);

 

   glBegin(GL_QUADS);

     glTexCoord2f(0, 0); glVertex2f(X + 50 - Size, Y + 25 - (Size/2));

diff --git a/Game/Code/Classes/UGraphic.pas b/Game/Code/Classes/UGraphic.pas
index a79a16a2..79f82438 100644
--- a/Game/Code/Classes/UGraphic.pas
+++ b/Game/Code/Classes/UGraphic.pas
@@ -80,13 +80,17 @@ var
   ScreenPopupError: TScreenPopupError;

 

   //Notes

-  Tex_Left:       array[0..6] of TTexture;

-  Tex_Mid:        array[0..6] of TTexture;

-  Tex_Right:      array[0..6] of TTexture;

+  Tex_Left:        array[0..6] of TTexture;   //rename to tex_note_left

+  Tex_Mid:         array[0..6] of TTexture;   //rename to tex_note_mid

+  Tex_Right:       array[0..6] of TTexture;   //rename to tex_note_right

 

-  Tex_BG_Left:    array[1..6] of TTexture;

-  Tex_BG_Mid:     array[1..6] of TTexture;

-  Tex_BG_Right:   array[1..6] of TTexture;

+  Tex_plain_Left:  array[1..6] of TTexture;   //rename to tex_notebg_left

+  Tex_plain_Mid:   array[1..6] of TTexture;   //rename to tex_notebg_mid

+  Tex_plain_Right: array[1..6] of TTexture;   //rename to tex_notebg_right

+

+  Tex_BG_Left:     array[1..6] of TTexture;   //rename to tex_noteglow_left

+  Tex_BG_Mid:      array[1..6] of TTexture;   //rename to tex_noteglow_mid

+  Tex_BG_Right:    array[1..6] of TTexture;   //rename to tex_noteglow_right

 

   Tex_Note_Star:  TTexture;

   Tex_Note_Perfect_Star: TTexture;

@@ -105,7 +109,7 @@ var
   //end Singbar Mod

 

   //PhrasenBonus - Line Bonus Mod

-  Tex_SingLineBonusBack: TTexture;

+  Tex_SingLineBonusBack: array[0..8] of TTexture;

   //End PhrasenBonus - Line Bonus Mod

 

 const

@@ -194,21 +198,25 @@ var
 begin

    // zaladowanie tekstur

   Log.LogStatus('Loading Textures', 'LoadTextures');

-  Tex_Left[0] :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayLeft')),  'BMP', 'Transparent', 0);

-  Tex_Mid[0] :=   Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayMid')),   'BMP', 'Plain', 0);

-  Tex_Right[0] := Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayRight')), 'BMP', 'Transparent', 0);

+  Tex_Left[0]  := Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayLeft')),  'BMP', 'Transparent', 0);     //brauch man die noch?

+  Tex_Mid[0]   := Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayMid')),   'BMP', 'Plain', 0);           //brauch man die noch?

+  Tex_Right[0] := Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayRight')), 'BMP', 'Transparent', 0);     //brauch man die noch?

 

   // P1-6

   for P := 1 to 6 do begin

     LoadColor(R, G, B, 'P' + IntToStr(P) + 'Light');

     Col := $10000 * Round(R*255) + $100 * Round(G*255) + Round(B*255);

-    Tex_Left[P] :=    Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayLeft')),  'BMP', 'Note Transparent', Col);

-    Tex_Mid[P] :=     Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayMid')),   'BMP', 'Note Plain', Col);

-    Tex_Right[P] :=   Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayRight')), 'BMP', 'Note Transparent', Col);

+    Tex_Left[P]        :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayLeft')),  'PNG', 'Colorized', Col);

+    Tex_Mid[P]         :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayMid')),   'PNG', 'Colorized', Col);

+    Tex_Right[P]       :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('GrayRight')), 'PNG', 'Colorized', Col);

+

+    Tex_plain_Left[P]  :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('NotePlainLeft')),  'PNG', 'Colorized', Col);

+    Tex_plain_Mid[P]   :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('NotePlainMid')),   'PNG', 'Colorized', Col);

+    Tex_plain_Right[P] :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('NotePlainRight')), 'PNG', 'Colorized', Col);

 

-    Tex_BG_Left[P] :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('NoteBGLeft')),  'BMP', 'Alpha Black Colored', Col);

-    Tex_BG_Mid[P] :=   Texture.LoadTexture(pchar(Skin.GetTextureFileName('NoteBGMid')),   'BMP', 'Alpha Black Colored', Col);

-    Tex_BG_Right[P] := Texture.LoadTexture(pchar(Skin.GetTextureFileName('NoteBGRight')), 'BMP', 'Alpha Black Colored', Col);

+    Tex_BG_Left[P]     := Texture.LoadTexture(pchar(Skin.GetTextureFileName('NoteBGLeft')),  'PNG', 'Colorized', Col);

+    Tex_BG_Mid[P]      := Texture.LoadTexture(pchar(Skin.GetTextureFileName('NoteBGMid')),   'PNG', 'Colorized', Col);

+    Tex_BG_Right[P]    := Texture.LoadTexture(pchar(Skin.GetTextureFileName('NoteBGRight')), 'PNG', 'Colorized', Col);

   end;

 

   Tex_Note_Perfect_Star := Texture.LoadTexture(pchar(Skin.GetTextureFileName('NotePerfectStar')), 'JPG', 'Font Black', 0);

@@ -227,8 +235,11 @@ begin
   Tex_SingBar_Front :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('SingBarFront')),   'JPG', 'Font', 0);

   //end Singbar Mod

 

-  //PhrasenBonus - Line Bonus Mod

-  Tex_SingLineBonusBack :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('LineBonusBack')), 'JPG', 'Font Black', 0);

+  //Line Bonus PopUp

+  for P := 0 to 9 do

+    begin

+      Tex_SingLineBonusBack[P] :=  Texture.LoadTexture(pchar(Skin.GetTextureFileName('LineBonusBack')), 'PNG', 'Colorized', $FFFFFF);

+    end;

   {//Set Texture to Font High

   Tex_SingLineBonusL.H := 32; Tex_SingLineBonusL.W := 8;

   Tex_SingLineBonusM.H := 32; //Tex_SingLineBonusM.TexW := Tex_SingLineBonusM.TexW/2;

diff --git a/Game/Code/Classes/UMain.pas b/Game/Code/Classes/UMain.pas
index 3a1c9dd4..98e1acb4 100644
--- a/Game/Code/Classes/UMain.pas
+++ b/Game/Code/Classes/UMain.pas
@@ -33,7 +33,7 @@ type
     LineBonus_Text:     string;

     LineBonus_Color:    TRGB;

     LineBonus_Age:      Integer;

-

+    LineBonus_Rating: Integer;

     //Variable vor Positioning -> Set on ScreenShow, different when Playercount Changes

     LineBonus_TargetX:  integer;

     LineBonus_TargetY:  integer;

diff --git a/Game/Code/Classes/UThemes.pas b/Game/Code/Classes/UThemes.pas
index b55a84dc..b883363f 100644
--- a/Game/Code/Classes/UThemes.pas
+++ b/Game/Code/Classes/UThemes.pas
@@ -12,65 +12,6 @@ type
     B:    single;

   end;

 

-  {TSkin = record

-    GrayLeft:       string;

-    GrayMid:        string;

-    GrayRight:      string;

-

-    NoteBGLeft:     string;

-    NoteBGMid:      string;

-    NoteBGRight:    string;

-

-    NoteStar:       string;

-

-    Ball:           string;

-

-

-

-    //SingBar Mod

-    SingBarBack:    string;

-    SingBarBar:     string;

-    SingBarFront:   string;

-    //end Singbar Mod

-

-    //PhrasenBonus - Line Bonus Mod

-    SingLineBonusBack:  string;

-    //PhrasenBonus - Line Bonus Mod

-

-

-

-    WelcomeBG:      string;

-

-    Background:     string;

-    ScoreBG:        string;

-    MainStart:      string;

-    MainEditor:     string;

-    MainOptions:    string;

-    MainExit:       string;

-    MainBar:        string;

-    Cursor:         string;

-

-    SongFade:       string;

-    SongCover:      string;

-    SongSelection:  string;

-

-    SelectSong:     string;

-    Button:         string;

-    Bar:            string;

-    P:              string;

-    Arrow:          string;

-    Arrow2:         string;

-    ButtonF:        string;

-    Star:           string;

-    Line:           string;

-

-//    ThemePath:    string;

-    SkinReg:      boolean;

-    SkinName:     string;

-    SkinPath:     string;

-    SkinColor:    integer;

-  end;}

-

   TThemeBackground = record

     Tex:  string;

   end;

@@ -315,7 +256,7 @@ type
 

     //TimeBar mod

     StaticTimeProgress:   TThemeStatic;

-    TextTimeText    :   TThemeText;

+    TextTimeText      :   TThemeText;

     //eoa TimeBar mod

 

     StaticP1:         TThemeStatic;

@@ -838,60 +779,6 @@ begin
 

   LoadTheme(FileName, Color);

 

-

-  {Skin.GrayLeft :=    'Left Gray.bmp';

-  Skin.GrayMid :=     'Mid Gray.bmp';

-  Skin.GrayRight :=   'Right Gray.bmp';

-

-  Skin.NoteBGLeft :=   'Note BG Left.bmp';

-  Skin.NoteBGMid :=    'Note BG Mid.bmp';

-  Skin.NoteBGRight :=  'Note BG Right.bmp';

-

-  Skin.NoteStar := 'Note Star.jpg';

-

-

-

-  //SingBar Mod

-  Skin.SingBarBack := 'Sing Bar Back.jpg';

-  Skin.SingBarBar := 'Sing Bar Bar.jpg';

-  Skin.SingBarFront := 'Sing Bar Front.jpg';

-  //end Singbar Mod

-

-  //PhrasenBonus - Line Bonus Mod

-  Skin.SingLineBonusBack := 'Line Bonus PopUp.jpg';

-

-

-

-

-{  Skin.WelcomeBG :=   SkinPath + 'Welcome BG.jpg';

-//  Skin.Background :=  SkinPath + 'Background.jpg';

-  Skin.ScoreBG :=     SkinPath + 'Score BG.jpg';

-//  Skin.GameStart :=   SkinPath + 'Game Start.jpg';

-//  Skin.Editor :=      SkinPath + 'Editor.jpg';

-//  Skin.Options :=     SkinPath + 'Options.jpg';

-//  Skin.Exit :=        SkinPath + 'Exit.jpg';

-

-  Skin.MainStart :=   SkinPath + 'Main Solo.jpg';

-  Skin.MainEditor :=  SkinPath + 'Main Multi.jpg';

-  Skin.MainOptions := SkinPath + 'Main Options.jpg';

-  Skin.MainExit :=    SkinPath + 'Main Exit.jpg';

-  Skin.MainBar :=     SkinPath + 'Main Bar.jpg';

-  Skin.Cursor :=      SkinPath + 'Main Cursor.jpg';

-

-  Skin.SongFade :=      SkinPath + 'Song Fade.jpg';}{

-  Skin.SongCover :=     'Song Cover.jpg';

-  {Skin.SongSelection := SkinPath + 'Song Selection.jpg';

-

-  Skin.SelectSong :=  SkinPath + 'Select Song.jpg';}{

-//  Skin.Button :=      SkinPath + 'MusicWheelItem song.jpg';

-  Skin.Bar :=         'Bar.jpg';

-{  Skin.P :=           SkinPath + 'P.jpg';

-  Skin.Arrow :=       SkinPath + 'Arrow.jpg';

-  Skin.Arrow2 :=      SkinPath + 'Arrow 2.jpg';}{

-  Skin.ButtonF :=     'Button.jpg';

-  Skin.Ball :=        'Ball3.bmp';

-{  Skin.Star :=        SkinPath + 'Star.bmp';

-  Skin.Line :=        SkinPath + 'Line.jpg';}

 end;

 

 

@@ -1144,51 +1031,51 @@ begin
       ThemeLoadText(Score.TextArtistTitle, 'ScoreTextArtistTitle');

 

       for I := 1 to 6 do begin

-        ThemeLoadStatics(Score.PlayerStatic[I], 'ScorePlayer' + IntToStr(I) + 'Static');

-        ThemeLoadTexts(Score.PlayerTexts[I],     'ScorePlayer' + IntToStr(I) + 'Text');

-

-        ThemeLoadText(Score.TextName[I], 'ScoreTextName' + IntToStr(I));

-        ThemeLoadText(Score.TextScore[I], 'ScoreTextScore' + IntToStr(I));

-        ThemeLoadText(Score.TextNotes[I], 'ScoreTextNotes' + IntToStr(I));

-        ThemeLoadText(Score.TextNotesScore[I], 'ScoreTextNotesScore' + IntToStr(I));

-        ThemeLoadText(Score.TextLineBonus[I], 'ScoreTextLineBonus' + IntToStr(I));

-        ThemeLoadText(Score.TextLineBonusScore[I], 'ScoreTextLineBonusScore' + IntToStr(I));

-        ThemeLoadText(Score.TextGoldenNotes[I], 'ScoreTextGoldenNotes' + IntToStr(I));

-        ThemeLoadText(Score.TextGoldenNotesScore[I], 'ScoreTextGoldenNotesScore' + IntToStr(I));

-        ThemeLoadText(Score.TextTotal[I], 'ScoreTextTotal' + IntToStr(I));

-        ThemeLoadText(Score.TextTotalScore[I], 'ScoreTextTotalScore' + IntToStr(I));

-

-        ThemeLoadStatic(Score.StaticBoxLightest[I], 'ScoreStaticBoxLightest' + IntToStr(I));

-        ThemeLoadStatic(Score.StaticBoxLight[I], 'ScoreStaticBoxLight' + IntToStr(I));

-        ThemeLoadStatic(Score.StaticBoxDark[I], 'ScoreStaticBoxDark' + IntToStr(I));

-

-        ThemeLoadStatic(Score.StaticBackLevel[I], 'ScoreStaticBackLevel' + IntToStr(I));

+        ThemeLoadStatics(Score.PlayerStatic[I],        'ScorePlayer' + IntToStr(I) + 'Static');

+        ThemeLoadTexts(Score.PlayerTexts[I],           'ScorePlayer' + IntToStr(I) + 'Text');

+

+        ThemeLoadText(Score.TextName[I],               'ScoreTextName'             + IntToStr(I));

+        ThemeLoadText(Score.TextScore[I],              'ScoreTextScore'            + IntToStr(I));

+        ThemeLoadText(Score.TextNotes[I],              'ScoreTextNotes'            + IntToStr(I));

+        ThemeLoadText(Score.TextNotesScore[I],         'ScoreTextNotesScore'       + IntToStr(I));

+        ThemeLoadText(Score.TextLineBonus[I],          'ScoreTextLineBonus'        + IntToStr(I));

+        ThemeLoadText(Score.TextLineBonusScore[I],     'ScoreTextLineBonusScore'   + IntToStr(I));

+        ThemeLoadText(Score.TextGoldenNotes[I],        'ScoreTextGoldenNotes'      + IntToStr(I));

+        ThemeLoadText(Score.TextGoldenNotesScore[I],   'ScoreTextGoldenNotesScore' + IntToStr(I));

+        ThemeLoadText(Score.TextTotal[I],              'ScoreTextTotal'            + IntToStr(I));

+        ThemeLoadText(Score.TextTotalScore[I],         'ScoreTextTotalScore'       + IntToStr(I));

+

+        ThemeLoadStatic(Score.StaticBoxLightest[I],    'ScoreStaticBoxLightest'    + IntToStr(I));

+        ThemeLoadStatic(Score.StaticBoxLight[I],       'ScoreStaticBoxLight'       + IntToStr(I));

+        ThemeLoadStatic(Score.StaticBoxDark[I],        'ScoreStaticBoxDark'        + IntToStr(I));

+

+        ThemeLoadStatic(Score.StaticBackLevel[I],      'ScoreStaticBackLevel'      + IntToStr(I));

         ThemeLoadStatic(Score.StaticBackLevelRound[I], 'ScoreStaticBackLevelRound' + IntToStr(I));

-        ThemeLoadStatic(Score.StaticLevel[I], 'ScoreStaticLevel' + IntToStr(I));

-        ThemeLoadStatic(Score.StaticLevelRound[I], 'ScoreStaticLevelRound' + IntToStr(I));

+        ThemeLoadStatic(Score.StaticLevel[I],          'ScoreStaticLevel'          + IntToStr(I));

+        ThemeLoadStatic(Score.StaticLevelRound[I],     'ScoreStaticLevelRound'     + IntToStr(I));

       end;

 

       // Top5

       ThemeLoadBasic(Top5, 'Top5');

       

-      ThemeLoadText(Top5.TextLevel, 'Top5TextLevel');

+      ThemeLoadText(Top5.TextLevel,       'Top5TextLevel');

       ThemeLoadText(Top5.TextArtistTitle, 'Top5TextArtistTitle');

       ThemeLoadStatics(Top5.StaticNumber, 'Top5StaticNumber');

-      ThemeLoadTexts(Top5.TextNumber, 'Top5TextNumber');

-      ThemeLoadTexts(Top5.TextName, 'Top5TextName');

-      ThemeLoadTexts(Top5.TextScore, 'Top5TextScore');

+      ThemeLoadTexts(Top5.TextNumber,     'Top5TextNumber');

+      ThemeLoadTexts(Top5.TextName,       'Top5TextName');

+      ThemeLoadTexts(Top5.TextScore,      'Top5TextScore');

 

       // Options

       ThemeLoadBasic(Options, 'Options');

 

-      ThemeLoadButton(Options.ButtonGame, 'OptionsButtonGame');

+      ThemeLoadButton(Options.ButtonGame,     'OptionsButtonGame');

       ThemeLoadButton(Options.ButtonGraphics, 'OptionsButtonGraphics');

-      ThemeLoadButton(Options.ButtonSound, 'OptionsButtonSound');

-      ThemeLoadButton(Options.ButtonLyrics, 'OptionsButtonLyrics');

-      ThemeLoadButton(Options.ButtonThemes, 'OptionsButtonThemes');

-      ThemeLoadButton(Options.ButtonRecord, 'OptionsButtonRecord');

+      ThemeLoadButton(Options.ButtonSound,    'OptionsButtonSound');

+      ThemeLoadButton(Options.ButtonLyrics,   'OptionsButtonLyrics');

+      ThemeLoadButton(Options.ButtonThemes,   'OptionsButtonThemes');

+      ThemeLoadButton(Options.ButtonRecord,   'OptionsButtonRecord');

       ThemeLoadButton(Options.ButtonAdvanced, 'OptionsButtonAdvanced');

-      ThemeLoadButton(Options.ButtonExit, 'OptionsButtonExit');

+      ThemeLoadButton(Options.ButtonExit,     'OptionsButtonExit');

 

       {{$IFDEF TRANSLATE}

       Options.Description[0] := Language.Translate('SING_OPTIONS_GAME');

@@ -1207,32 +1094,32 @@ begin
       // Options Game

       ThemeLoadBasic(OptionsGame, 'OptionsGame');

 

-      ThemeLoadSelect(OptionsGame.SelectPlayers, 'OptionsGameSelectPlayers');

-      ThemeLoadSelect(OptionsGame.SelectDifficulty, 'OptionsGameSelectDifficulty');

+      ThemeLoadSelect(OptionsGame.SelectPlayers,       'OptionsGameSelectPlayers');

+      ThemeLoadSelect(OptionsGame.SelectDifficulty,    'OptionsGameSelectDifficulty');

       ThemeLoadSelectSlide(OptionsGame.SelectLanguage, 'OptionsGameSelectSlideLanguage');

-      ThemeLoadSelect(OptionsGame.SelectTabs, 'OptionsGameSelectTabs');

-      ThemeLoadSelectSlide(OptionsGame.SelectSorting, 'OptionsGameSelectSlideSorting');

-      ThemeLoadSelect(OptionsGame.SelectDebug, 'OptionsGameSelectDebug');

-      ThemeLoadButton(OptionsGame.ButtonExit, 'OptionsGameButtonExit');

+      ThemeLoadSelect(OptionsGame.SelectTabs,          'OptionsGameSelectTabs');

+      ThemeLoadSelectSlide(OptionsGame.SelectSorting,  'OptionsGameSelectSlideSorting');

+      ThemeLoadSelect(OptionsGame.SelectDebug,         'OptionsGameSelectDebug');

+      ThemeLoadButton(OptionsGame.ButtonExit,          'OptionsGameButtonExit');

 

       // Options Graphics

       ThemeLoadBasic(OptionsGraphics, 'OptionsGraphics');

 

-      ThemeLoadSelect(OptionsGraphics.SelectFullscreen, 'OptionsGraphicsSelectFullscreen');

+      ThemeLoadSelect(OptionsGraphics.SelectFullscreen,           'OptionsGraphicsSelectFullscreen');

       ThemeLoadSelectSlide(OptionsGraphics.SelectSlideResolution, 'OptionsGraphicsSelectSlideResolution');

-      ThemeLoadSelect(OptionsGraphics.SelectDepth, 'OptionsGraphicsSelectDepth');

-      ThemeLoadSelect(OptionsGraphics.SelectOscilloscope, 'OptionsGraphicsSelectOscilloscope');

-      ThemeLoadSelect(OptionsGraphics.SelectLineBonus, 'OptionsGraphicsSelectLineBonus');

-      ThemeLoadSelect(OptionsGraphics.SelectMovieSize, 'OptionsGraphicsSelectMovieSize');

-      ThemeLoadButton(OptionsGraphics.ButtonExit, 'OptionsGraphicsButtonExit');

+      ThemeLoadSelect(OptionsGraphics.SelectDepth,                'OptionsGraphicsSelectDepth');

+      ThemeLoadSelect(OptionsGraphics.SelectOscilloscope,         'OptionsGraphicsSelectOscilloscope');

+      ThemeLoadSelect(OptionsGraphics.SelectLineBonus,            'OptionsGraphicsSelectLineBonus');

+      ThemeLoadSelect(OptionsGraphics.SelectMovieSize,            'OptionsGraphicsSelectMovieSize');

+      ThemeLoadButton(OptionsGraphics.ButtonExit,                 'OptionsGraphicsButtonExit');

 

       // Options Sound

       ThemeLoadBasic(OptionsSound, 'OptionsSound');

 

-      ThemeLoadSelect(OptionsSound.SelectMicBoost, 'OptionsSoundSelectMicBoost');

+      ThemeLoadSelect(OptionsSound.SelectMicBoost,    'OptionsSoundSelectMicBoost');

       ThemeLoadSelect(OptionsSound.SelectClickAssist, 'OptionsSoundSelectClickAssist');

-      ThemeLoadSelect(OptionsSound.SelectBeatClick, 'OptionsSoundSelectBeatClick');

-      ThemeLoadSelect(OptionsSound.SelectThreshold, 'OptionsSoundSelectThreshold');

+      ThemeLoadSelect(OptionsSound.SelectBeatClick,   'OptionsSoundSelectBeatClick');

+      ThemeLoadSelect(OptionsSound.SelectThreshold,   'OptionsSoundSelectThreshold');

       //Song Preview

       ThemeLoadSelectSlide(OptionsSound.SelectSlidePreviewVolume, 'OptionsSoundSelectSlidePreviewVolume');

       ThemeLoadSelectSlide(OptionsSound.SelectSlidePreviewFading, 'OptionsSoundSelectSlidePreviewFading');

@@ -1242,39 +1129,39 @@ begin
       // Options Lyrics

       ThemeLoadBasic(OptionsLyrics, 'OptionsLyrics');

 

-      ThemeLoadSelect(OptionsLyrics.SelectLyricsFont, 'OptionsLyricsSelectLyricsFont');

+      ThemeLoadSelect(OptionsLyrics.SelectLyricsFont,   'OptionsLyricsSelectLyricsFont');

       ThemeLoadSelect(OptionsLyrics.SelectLyricsEffect, 'OptionsLyricsSelectLyricsEffect');

-      ThemeLoadSelect(OptionsLyrics.SelectSolmization, 'OptionsLyricsSelectSolmization');

-      ThemeLoadButton(OptionsLyrics.ButtonExit, 'OptionsLyricsButtonExit');

+      ThemeLoadSelect(OptionsLyrics.SelectSolmization,  'OptionsLyricsSelectSolmization');

+      ThemeLoadButton(OptionsLyrics.ButtonExit,         'OptionsLyricsButtonExit');

 

       // Options Themes

       ThemeLoadBasic(OptionsThemes, 'OptionsThemes');

 

       ThemeLoadSelectSlide(OptionsThemes.SelectTheme, 'OptionsThemesSelectTheme');

-      ThemeLoadSelectSlide(OptionsThemes.SelectSkin, 'OptionsThemesSelectSkin');

+      ThemeLoadSelectSlide(OptionsThemes.SelectSkin,  'OptionsThemesSelectSkin');

       ThemeLoadSelectSlide(OptionsThemes.SelectColor, 'OptionsThemesSelectColor');

-      ThemeLoadButton(OptionsThemes.ButtonExit, 'OptionsThemesButtonExit');

+      ThemeLoadButton(OptionsThemes.ButtonExit,       'OptionsThemesButtonExit');

 

       // Options Record

       ThemeLoadBasic(OptionsRecord, 'OptionsRecord');

 

-      ThemeLoadSelectSlide(OptionsRecord.SelectSlideCard, 'OptionsRecordSelectSlideCard');

-      ThemeLoadSelectSlide(OptionsRecord.SelectSlideInput,  'OptionsRecordSelectSlideInput');

+      ThemeLoadSelectSlide(OptionsRecord.SelectSlideCard,     'OptionsRecordSelectSlideCard');

+      ThemeLoadSelectSlide(OptionsRecord.SelectSlideInput,    'OptionsRecordSelectSlideInput');

       ThemeLoadSelectSlide(OptionsRecord.SelectSlideChannelL, 'OptionsRecordSelectSlideChannelL');

       ThemeLoadSelectSlide(OptionsRecord.SelectSlideChannelR, 'OptionsRecordSelectSlideChannelR');

-      ThemeLoadButton(OptionsRecord.ButtonExit, 'OptionsRecordButtonExit');

+      ThemeLoadButton(OptionsRecord.ButtonExit,               'OptionsRecordButtonExit');

 

       //Options Advanced

       ThemeLoadBasic(OptionsAdvanced, 'OptionsAdvanced');

 

       ThemeLoadSelect       (OptionsAdvanced.SelectLoadAnimation, 'OptionsAdvancedSelectLoadAnimation');

-      ThemeLoadSelect       (OptionsAdvanced.SelectScreenFade, 'OptionsAdvancedSelectScreenFade');

-      ThemeLoadSelect       (OptionsAdvanced.SelectEffectSing, 'OptionsAdvancedSelectEffectSing');

-      ThemeLoadSelect       (OptionsAdvanced.SelectLineBonus, 'OptionsAdvancedSelectLineBonus');

-      ThemeLoadSelectSlide  (OptionsAdvanced.SelectOnSongClick, 'OptionsAdvancedSelectSlideOnSongClick');

-      ThemeLoadSelect       (OptionsAdvanced.SelectAskbeforeDel, 'OptionsAdvancedSelectAskbeforeDel');

-      ThemeLoadSelect       (OptionsAdvanced.SelectPartyPopup, 'OptionsAdvancedSelectPartyPopup');

-      ThemeLoadButton       (OptionsAdvanced.ButtonExit, 'OptionsAdvancedButtonExit');

+      ThemeLoadSelect       (OptionsAdvanced.SelectScreenFade,    'OptionsAdvancedSelectScreenFade');

+      ThemeLoadSelect       (OptionsAdvanced.SelectEffectSing,    'OptionsAdvancedSelectEffectSing');

+      ThemeLoadSelect       (OptionsAdvanced.SelectLineBonus,     'OptionsAdvancedSelectLineBonus');

+      ThemeLoadSelectSlide  (OptionsAdvanced.SelectOnSongClick,   'OptionsAdvancedSelectSlideOnSongClick');

+      ThemeLoadSelect       (OptionsAdvanced.SelectAskbeforeDel,  'OptionsAdvancedSelectAskbeforeDel');

+      ThemeLoadSelect       (OptionsAdvanced.SelectPartyPopup,    'OptionsAdvancedSelectPartyPopup');

+      ThemeLoadButton       (OptionsAdvanced.ButtonExit,          'OptionsAdvancedButtonExit');

 

       //error and check popup

       ThemeLoadBasic (ErrorPopup, 'ErrorPopup');

@@ -1381,41 +1268,41 @@ begin
       //Load Party Score DecoTextures Object

       PartyScore.DecoTextures.ChangeTextures := (ThemeIni.ReadInteger('PartyScoreDecoTextures', 'ChangeTextures', 0) = 1);

 

-      PartyScore.DecoTextures.FirstTexture   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'FirstTexture', '');

-      PartyScore.DecoTextures.FirstTyp   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'FirstTyp', 'Note Black');

-      PartyScore.DecoTextures.FirstColor   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'FirstColor', 'Black');

+      PartyScore.DecoTextures.FirstTexture   :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'FirstTexture', '');

+      PartyScore.DecoTextures.FirstTyp       :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'FirstTyp', 'Note Black');

+      PartyScore.DecoTextures.FirstColor     :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'FirstColor', 'Black');

 

-      PartyScore.DecoTextures.SecondTexture   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'SecondTexture', '');

-      PartyScore.DecoTextures.SecondTyp   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'SecondTyp', 'Note Black');

-      PartyScore.DecoTextures.SecondColor   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'SecondColor', 'Black');

+      PartyScore.DecoTextures.SecondTexture  :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'SecondTexture', '');

+      PartyScore.DecoTextures.SecondTyp      :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'SecondTyp', 'Note Black');

+      PartyScore.DecoTextures.SecondColor    :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'SecondColor', 'Black');

 

-      PartyScore.DecoTextures.ThirdTexture   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'ThirdTexture', '');

-      PartyScore.DecoTextures.ThirdTyp   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'ThirdTyp', 'Note Black');

-      PartyScore.DecoTextures.ThirdColor   :=  ThemeIni.ReadString('PartyScoreDecoTextures', 'ThirdColor', 'Black');

+      PartyScore.DecoTextures.ThirdTexture   :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'ThirdTexture', '');

+      PartyScore.DecoTextures.ThirdTyp       :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'ThirdTyp', 'Note Black');

+      PartyScore.DecoTextures.ThirdColor     :=  ThemeIni.ReadString('PartyScoreDecoTextures',  'ThirdColor', 'Black');

 

       ThemeLoadText (PartyScore.TextWinner, 'PartyScoreTextWinner');

 

       //Party Win

       ThemeLoadBasic(PartyWin, 'PartyWin');

 

-      ThemeLoadText (PartyWin.TextScoreTeam1, 'PartyWinTextScoreTeam1');

-      ThemeLoadText (PartyWin.TextScoreTeam2, 'PartyWinTextScoreTeam2');

-      ThemeLoadText (PartyWin.TextScoreTeam3, 'PartyWinTextScoreTeam3');

-      ThemeLoadText (PartyWin.TextNameTeam1, 'PartyWinTextNameTeam1');

-      ThemeLoadText (PartyWin.TextNameTeam2, 'PartyWinTextNameTeam2');

-      ThemeLoadText (PartyWin.TextNameTeam3, 'PartyWinTextNameTeam3');

+      ThemeLoadText (PartyWin.TextScoreTeam1,    'PartyWinTextScoreTeam1');

+      ThemeLoadText (PartyWin.TextScoreTeam2,    'PartyWinTextScoreTeam2');

+      ThemeLoadText (PartyWin.TextScoreTeam3,    'PartyWinTextScoreTeam3');

+      ThemeLoadText (PartyWin.TextNameTeam1,     'PartyWinTextNameTeam1');

+      ThemeLoadText (PartyWin.TextNameTeam2,     'PartyWinTextNameTeam2');

+      ThemeLoadText (PartyWin.TextNameTeam3,     'PartyWinTextNameTeam3');

 

-      ThemeLoadStatic (PartyWin.StaticTeam1, 'PartyWinStaticTeam1');

-      ThemeLoadStatic (PartyWin.StaticTeam1BG, 'PartyWinStaticTeam1BG');

+      ThemeLoadStatic (PartyWin.StaticTeam1,     'PartyWinStaticTeam1');

+      ThemeLoadStatic (PartyWin.StaticTeam1BG,   'PartyWinStaticTeam1BG');

       ThemeLoadStatic (PartyWin.StaticTeam1Deco, 'PartyWinStaticTeam1Deco');

-      ThemeLoadStatic (PartyWin.StaticTeam2, 'PartyWinStaticTeam2');

-      ThemeLoadStatic (PartyWin.StaticTeam2BG, 'PartyWinStaticTeam2BG');

+      ThemeLoadStatic (PartyWin.StaticTeam2,     'PartyWinStaticTeam2');

+      ThemeLoadStatic (PartyWin.StaticTeam2BG,   'PartyWinStaticTeam2BG');

       ThemeLoadStatic (PartyWin.StaticTeam2Deco, 'PartyWinStaticTeam2Deco');

-      ThemeLoadStatic (PartyWin.StaticTeam3, 'PartyWinStaticTeam3');

-      ThemeLoadStatic (PartyWin.StaticTeam3BG, 'PartyWinStaticTeam3BG');

+      ThemeLoadStatic (PartyWin.StaticTeam3,     'PartyWinStaticTeam3');

+      ThemeLoadStatic (PartyWin.StaticTeam3BG,   'PartyWinStaticTeam3BG');

       ThemeLoadStatic (PartyWin.StaticTeam3Deco, 'PartyWinStaticTeam3Deco');

 

-      ThemeLoadText (PartyWin.TextWinner, 'PartyWinTextWinner');

+      ThemeLoadText (PartyWin.TextWinner,        'PartyWinTextWinner');

 

       //Party Options

       ThemeLoadBasic(PartyOptions, 'PartyOptions');

@@ -1580,11 +1467,11 @@ begin
 

   ThemeStatic.X := ThemeIni.ReadInteger(Name, 'X', 0);

   ThemeStatic.Y := ThemeIni.ReadInteger(Name, 'Y', 0);

-  ThemeStatic.Z := ThemeIni.ReadFloat(Name, 'Z', 0);

+  ThemeStatic.Z := ThemeIni.ReadFloat  (Name, 'Z', 0);

   ThemeStatic.W := ThemeIni.ReadInteger(Name, 'W', 0);

   ThemeStatic.H := ThemeIni.ReadInteger(Name, 'H', 0);

 

-  ThemeStatic.Typ := ThemeIni.ReadString(Name, 'Type', '');

+  ThemeStatic.Typ   := ThemeIni.ReadString(Name, 'Type', '');

   ThemeStatic.Color := ThemeIni.ReadString(Name, 'Color', '');

 

   C := ColorExists(ThemeStatic.Color);

@@ -1600,7 +1487,7 @@ begin
   ThemeStatic.TexY2 := ThemeIni.ReadFloat(Name, 'TexY2', 1);

 

   //Reflection Mod

-  ThemeStatic.Reflection := (ThemeIni.ReadInteger(Name, 'Reflection', 0) = 1);

+  ThemeStatic.Reflection        := (ThemeIni.ReadInteger(Name, 'Reflection', 0) = 1);

   ThemeStatic.ReflectionSpacing := ThemeIni.ReadFloat(Name, 'ReflectionSpacing', 15);

 

   DecimalSeparator := ',';

@@ -1704,7 +1591,7 @@ begin
   ThemeButton.SelectW := ThemeIni.ReadInteger (Name, 'SelectW', ThemeButton.W);

 

   ThemeButton.DeSelectReflectionspacing := ThemeIni.ReadFloat(Name, 'DeSelectReflectionSpacing', ThemeButton.Reflectionspacing);

-  

+

   ThemeButton.Fade := (ThemeIni.ReadInteger(Name, 'Fade', 0) = 1);

   ThemeButton.FadeText := (ThemeIni.ReadInteger(Name, 'FadeText', 0) = 1);

 

@@ -2049,18 +1936,6 @@ begin
     //New Theme-Color Patch End

 

     end;

-

-  // pink

-//  Col := clRed;

-//  Color[C].ColR := (32 + Col and $FF) / (255 + 32);

-//  Color[C].ColG := (32 + Col div 256 and $FF) / (255 + 32);

-//  Color[C].ColB := (32 + Col div (256*256) and $FF) / (255 + 32);

-

-  // purple

-//  Color[C].ColR := 220/255;

-//  Color[C].ColG := 95/255;

-//  Color[C].ColB := 220/255;}

-

 end;

 

 function ColorSqrt(RGB: TRGB): TRGB;