hedgewars/uMisc.pas
changeset 3779 3351a017d4ad
parent 3774 af0e68ca273e
child 3784 75aa91bea32b
--- a/hedgewars/uMisc.pas	Sat Aug 28 00:30:29 2010 +0200
+++ b/hedgewars/uMisc.pas	Sat Aug 28 01:37:21 2010 +0200
@@ -25,6 +25,26 @@
 uses    SDLh, uConsts, uFloat, GLunit, Math;
 
 var
+/////// init flags ///////
+    cScreenWidth    : LongInt     = 1024;
+    cScreenHeight   : LongInt     = 768;
+    cBits           : LongInt     = 32;
+    //ipcPort is in uIO
+    cFullScreen     : boolean     = false;
+    isSoundEnabled  : boolean     = true;
+    isMusicEnabled  : boolean     = false;
+    cLocaleFName    : shortstring = 'en.txt';
+    cInitVolume     : LongInt     = 100;
+    cTimerInterval  : LongInt     = 8;
+    PathPrefix      : shortstring = './';
+    cShowFPS        : boolean     = false;
+    cAltDamage      : boolean     = true;
+    cReducedQuality : LongInt     = rqNone;
+    //userNick is in uChat
+    recordFileName  : shortstring = '';
+    cReadyDelay     : Longword    = 5000;
+//////////////////////////
+    
     isCursorVisible : boolean;
     isTerminated    : boolean;
     isInLag         : boolean;
@@ -42,7 +62,7 @@
     GameFlags       : Longword;
     TrainingFlags   : Longword;
     TurnTimeLeft    : Longword;
-    ReadyTimeLeft    : Longword;
+    ReadyTimeLeft   : Longword;
     cSuddenDTurns   : LongInt;
     cDamagePercent  : LongInt;
     cMineDudPercent : LongWord;
@@ -81,24 +101,6 @@
     LAND_HEIGHT_MASK : LongWord;
     cMaxCaptions     : LongInt;
 
-    // init flags
-    cScreenWidth    : LongInt = 1024;
-    cScreenHeight   : LongInt = 768;
-    cBits           : LongInt = 32;
-    //ipcPort is in uIO
-    cFullScreen     : boolean = false;
-    isSoundEnabled  : boolean = true;
-    isMusicEnabled  : boolean = false;
-    cLocaleFName    : shortstring = 'en.txt';
-    cInitVolume     : LongInt = 50;
-    cTimerInterval  : LongInt = 8;
-    PathPrefix: shortstring = './';
-    cShowFPS        : boolean = false;
-    cAltDamage      : boolean = true;
-    cReducedQuality : LongInt = rqNone;
-    //userNick is in uChat
-    recordFileName  : shortstring = '';
-
     cLeftScreenBorder     : LongInt;
     cRightScreenBorder    : LongInt;
     cScreenSpace          : LongInt;
@@ -111,7 +113,6 @@
     cVolumeDelta    : LongInt;
     cHasFocus       : boolean;
     cInactDelay     : Longword;
-    cReadyDelay     : Longword;
 
     bBetweenTurns   : boolean;
     cHealthDecrease : LongWord;
@@ -785,8 +786,7 @@
     cVolumeDelta    := 0;
     cHasFocus       := true;
     cInactDelay     := 1250;
-    cReadyDelay     := 5000;
-    ReadyTimeLeft    := 0;
+    ReadyTimeLeft   := 0;
 
     ScreenFade      := sfNone;
 
@@ -860,7 +860,7 @@
     isSoundEnabled  := true;
     isMusicEnabled  := false;
     cLocaleFName    := 'en.txt';
-    cInitVolume     := 50;
+    cInitVolume     := 100;
     cTimerInterval  := 8;
     PathPrefix := './';
     cShowFPS        := false;
@@ -868,6 +868,7 @@
     cReducedQuality := rqNone;
     //userNick is in uChat
     recordFileName  := '';
+    cReadyDelay     := 5000;
 end;
 
 end.