35     cNewScreenHeight   : LongInt     = 768;

    35     cNewScreenHeight   : LongInt     = 768;

    36     cScreenResizeDelay : LongWord    = 0;

    36     cScreenResizeDelay : LongWord    = 0;

    37     cBits           : LongInt     = 32;

    37     cBits           : LongInt     = 32;

    38     ipcPort         : Word        = 0;

    38     ipcPort         : Word        = 0;

    39     cFullScreen     : boolean     = false;

    39     cFullScreen     : boolean     = false;

    42     cLocaleFName    : shortstring = 'en.txt';

    40     cLocaleFName    : shortstring = 'en.txt';

    43     cLocale         : shortstring = 'en';

    41     cLocale         : shortstring = 'en';

    45     cTimerInterval  : LongInt     = 8;

    42     cTimerInterval  : LongInt     = 8;

    46     PathPrefix      : shortstring = './';

    43     PathPrefix      : shortstring = './';

    47     UserPathPrefix  : shortstring = './';

    44     UserPathPrefix  : shortstring = './';

    48     cShowFPS        : boolean     = false;

    45     cShowFPS        : boolean     = false;

    49     cFlattenFlakes  : boolean     = false;

    46     cFlattenFlakes  : boolean     = false;

    64     isCursorVisible : boolean;

    61     isCursorVisible : boolean;

    65     isTerminated    : boolean;

    62     isTerminated    : boolean;

    66     isInLag         : boolean;

    63     isInLag         : boolean;

    67     isPaused        : boolean;

    64     isPaused        : boolean;

    68 

    65 

    70     isInMultiShoot  : boolean;

    66     isInMultiShoot  : boolean;

    71     isSpeed         : boolean;

    67     isSpeed         : boolean;

    72     isFirstFrame    : boolean;

    68     isFirstFrame    : boolean;

    73 

    69 

    74     fastUntilLag    : boolean;

    70     fastUntilLag    : boolean;

   132     CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;

   128     CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;

   133     LAND_WIDTH       : Word;

   129     LAND_WIDTH       : Word;

   134     LAND_HEIGHT      : Word;

   130     LAND_HEIGHT      : Word;

   135     LAND_WIDTH_MASK  : LongWord;

   131     LAND_WIDTH_MASK  : LongWord;

   136     LAND_HEIGHT_MASK : LongWord;

   132     LAND_HEIGHT_MASK : LongWord;

   138 

   133 

   139     cLeftScreenBorder     : LongInt;

   134     cLeftScreenBorder     : LongInt;

   140     cRightScreenBorder    : LongInt;

   135     cRightScreenBorder    : LongInt;

   141     cScreenSpace          : Longword;

   136     cScreenSpace          : Longword;

   142 

   137 

   182     RealTicks       : Longword;

   177     RealTicks       : Longword;

   183     AttackBar       : LongInt;

   178     AttackBar       : LongInt;

   184 

   179 

   185     WaterColorArray : array[0..3] of HwColor4f;

   180     WaterColorArray : array[0..3] of HwColor4f;

   186     SDWaterColorArray : array[0..3] of HwColor4f;

   181     SDWaterColorArray : array[0..3] of HwColor4f;

   188     SDTint          : LongInt;

   182     SDTint          : LongInt;

   189 

   183 

   190     CursorPoint     : TPoint;

   184     CursorPoint     : TPoint;

   191     TargetPoint     : TPoint;

   185     TargetPoint     : TPoint;

   192 

   186 

  2545     SDWaterColorArray[2].b := 169;

  2539     SDWaterColorArray[2].b := 169;

  2546     SDWaterColorArray[2].a := 255;

  2540     SDWaterColorArray[2].a := 255;

  2547     SDWaterColorArray[1]:= SDWaterColorArray[0];

  2541     SDWaterColorArray[1]:= SDWaterColorArray[0];

  2548     SDWaterColorArray[3]:= SDWaterColorArray[2];

  2542     SDWaterColorArray[3]:= SDWaterColorArray[2];

  2549 

  2543 

  2551     SDTint:= $80;

  2544     SDTint:= $80;

  2552 

  2545 

  2553     cDrownSpeed.QWordValue  := 257698038;       // 0.06

  2546     cDrownSpeed.QWordValue  := 257698038;       // 0.06

  2554     cDrownSpeedf            := 0.06;

  2547     cDrownSpeedf            := 0.06;

  2555     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025

  2548     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025

  2613     isPaused        := false;

  2606     isPaused        := false;

  2614     isInMultiShoot  := false;

  2607     isInMultiShoot  := false;

  2615     isSpeed         := false;

  2608     isSpeed         := false;

  2616     fastUntilLag    := false;

  2609     fastUntilLag    := false;

  2617     isFirstFrame    := true;

  2610     isFirstFrame    := true;

  2619     autoCameraOn    := true;

  2611     autoCameraOn    := true;

  2620     cScriptName     := '';

  2612     cScriptName     := '';

  2621     cSeed           := '';

  2613     cSeed           := '';

  2622     cVolumeDelta    := 0;

  2614     cVolumeDelta    := 0;

  2623     cHasFocus       := true;

  2615     cHasFocus       := true;

  2636     // those values still are not perfect

  2628     // those values still are not perfect

  2637     cLeftScreenBorder:= round(-cMinZoomLevel * cScreenWidth);

  2629     cLeftScreenBorder:= round(-cMinZoomLevel * cScreenWidth);

  2638     cRightScreenBorder:= round(cMinZoomLevel * cScreenWidth + LAND_WIDTH);

  2630     cRightScreenBorder:= round(cMinZoomLevel * cScreenWidth + LAND_WIDTH);

  2639     cScreenSpace:= cRightScreenBorder - cLeftScreenBorder;

  2631     cScreenSpace:= cRightScreenBorder - cLeftScreenBorder;

  2640 

  2632 

  2646     vobFrameTicks:= 99999;

  2633     vobFrameTicks:= 99999;

  2647     vobFramesCount:= 4;

  2634     vobFramesCount:= 4;

  2648     vobCount:= 0;

  2635     vobCount:= 0;

  2649     vobVelocity:= 10;

  2636     vobVelocity:= 10;

  2650     vobFallSpeed:= 100;

  2637     vobFallSpeed:= 100;

  2674     cScreenWidth    := 1024;

  2661     cScreenWidth    := 1024;

  2675     cScreenHeight   := 768;

  2662     cScreenHeight   := 768;

  2676     cBits           := 32;

  2663     cBits           := 32;

  2677     ipcPort         := 0;

  2664     ipcPort         := 0;

  2678     cFullScreen     := false;

  2665     cFullScreen     := false;

  2681     cLocaleFName    := 'en.txt';

  2666     cLocaleFName    := 'en.txt';

  2683     cTimerInterval  := 8;

  2667     cTimerInterval  := 8;

  2684     PathPrefix      := './';

  2668     PathPrefix      := './';

  2685     UserPathPrefix  := './';

  2669     UserPathPrefix  := './';

  2686     cShowFPS        := false;

  2670     cShowFPS        := false;

  2687     cFlattenFlakes  := false;

  2671     cFlattenFlakes  := false;