- new option "PossibleScore": show max possible score in singscreen (toggle on/off with "S")

- fade the "ball" also
- fixed screensong preview volume
- update of acinerella

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

1 files changed, 13 insertions, 5 deletions

diff --git a/Game/Code/Menu/UDrawTexture.pas b/Game/Code/Menu/UDrawTexture.pas
index 5509b29c..128375d9 100644
--- a/Game/Code/Menu/UDrawTexture.pas
+++ b/Game/Code/Menu/UDrawTexture.pas
@@ -5,7 +5,9 @@ uses UTexture;
 

 procedure DrawLine(X1, Y1, X2, Y2, ColR, ColG, ColB: real);

 procedure DrawQuad(X, Y, W, H, ColR, ColG, ColB: real);

-procedure DrawTexture(Texture: TTexture);

+procedure DrawTexture(Texture: TTexture; Alph: real) overload;

+procedure DrawTexture(Texture: TTexture) overload;

+

 

 implementation

 uses gl;

@@ -30,16 +32,17 @@ begin
   glEnd;

 end;

 

-procedure DrawTexture(Texture: TTexture);

+procedure DrawTexture(Texture: TTexture; Alph: real);

 var

   x1, x2, x3, x4:       real;

   y1, y2, y3, y4:       real;

   xt1, xt2, xt3, xt4:   real;

   yt1, yt2, yt3, yt4:   real;

 begin

-  with Texture do begin

+  with Texture do

+  begin

     // rysuje paski gracza

-    glColor4f(ColR * Int, ColG * Int, ColB * Int, Alpha);

+    glColor4f(ColR * Int, ColG * Int, ColB * Int, Alpha*Alph);

     glEnable(GL_TEXTURE_2D);

     glEnable(GL_BLEND);

     glDepthRange(0, 10);

@@ -94,8 +97,13 @@ begin
       glTexCoord2f(TexX2*TexW, TexY1*TexH); glVertex3f(x4, y4, z);

     glEnd;

   end;

-  glDisable(GL_DEPTH_TEST); 

+  glDisable(GL_DEPTH_TEST);

   glDisable(GL_TEXTURE_2D);

 end;

 

+procedure DrawTexture(Texture: TTexture);

+begin

+  DrawTexture(Texture, 1);

+end;

+

 end.