hedgewars/uMisc.pas
changeset 762 5ecf042f6113
parent 759 8da05b316d81
child 771 86fbe8753a7c
--- a/hedgewars/uMisc.pas	Sun Jan 27 13:35:56 2008 +0000
+++ b/hedgewars/uMisc.pas	Sun Jan 27 15:02:12 2008 +0000
@@ -55,10 +55,10 @@
     GameTicks     : LongWord = 0;
 
     cSkyColor     : Longword = 0;
-    cWaterColor   : Longword = $005ACE;
-    cWhiteColor   : Longword = $FFFFFF;
-    cConsoleSplitterColor : Longword = $FF0000;
-    cColorNearBlack       : Longword = 16;
+    cWaterColor   : Longword = $FF005ACE;
+    cWhiteColor   : Longword = $FFFFFFFF;
+    cConsoleSplitterColor : Longword = $FFFF0000;
+    cColorNearBlack       : Longword = $FF000010;
     cExplosionBorderColor : LongWord = $808080;
 
     cShowFPS      : boolean = true;
@@ -283,8 +283,8 @@
 if SDL_MustLock(surf) then
    SDL_UnlockSurface(surf);
 
-glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_NEAREST);
-glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_LINEAR)
+glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
+glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR)
 end;
 
 procedure FreeTexture(tex: PTexture);