124     cWaterLine       : LongInt;

   124     cWaterLine       : LongInt;

   125     cGearScrEdgesDist: LongInt;

   125     cGearScrEdgesDist: LongInt;

   126     isAudioMuted     : boolean;

   126     isAudioMuted     : boolean;

   127 

   127 

   128     // originally typed consts

   128     // originally typed consts

   130     IceColor            : LongWord;

   133     IceColor            : LongWord;

   131     IceEdgeColor        : LongWord;

   134     IceEdgeColor        : LongWord;

   132     WaterOpacity: byte;

   135     WaterOpacity: byte;

   133     SDWaterOpacity: byte;

   136     SDWaterOpacity: byte;

   134     GrayScale: Boolean;

   137     GrayScale: Boolean;

  2540     SDWaterColorArray[7]:= SDWaterColorArray[1];

  2543     SDWaterColorArray[7]:= SDWaterColorArray[1];

  2541 

  2544 

  2542     SDWaterOpacity:= $80;

  2545     SDWaterOpacity:= $80;

  2543 

  2546 

  2544     SDTint:= $80;

  2547     SDTint:= $80;

  2545     ExplosionBorderColor:= $FF808080;

  2551     ExplosionBorderColor:= $FF808080;

  2546     IceColor:= ($44 shl RShift) or ($97 shl GShift) or ($A9 shl BShift) or ($A0 shl AShift);

  2552     IceColor:= ($44 shl RShift) or ($97 shl GShift) or ($A9 shl BShift) or ($A0 shl AShift);

  2547     IceEdgeColor:= ($8A shl RShift) or ($AF shl GShift) or ($B2 shl BShift) or ($FF shl AShift);

  2553     IceEdgeColor:= ($8A shl RShift) or ($AF shl GShift) or ($B2 shl BShift) or ($FF shl AShift);

  2548 

  2554 

  2549     WaterOpacity:= $80;

  2555     WaterOpacity:= $80;