160 

   160 

   161     CrosshairX      : LongInt;

   161     CrosshairX      : LongInt;

   162     CrosshairY      : LongInt;

   162     CrosshairY      : LongInt;

   163     CursorMovementX : LongInt;

   163     CursorMovementX : LongInt;

   164     CursorMovementY : LongInt;

   164     CursorMovementY : LongInt;

   165     cDrownSpeed     : hwFloat;

   166     cDrownSpeed     : hwFloat;

   166     cDrownSpeedf    : real;

   167     cDrownSpeedf    : real;

   167     cMaxWindSpeed   : hwFloat;

   168     cMaxWindSpeed   : hwFloat;

   168     cWindSpeed      : hwFloat;

   169     cWindSpeed      : hwFloat;

   169     cWindSpeedf     : real;

   170     cWindSpeedf     : real;

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

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

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

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

  2516 

  2517 

  2517     WaterOpacity:= $80;

  2518     WaterOpacity:= $80;

  2518 

  2519 

  2519     cDrownSpeed.QWordValue  := 257698038;   // 0.06

  2521     cDrownSpeed.QWordValue  := 257698038;   // 0.06

  2520     cDrownSpeedf            := 0.06;

  2522     cDrownSpeedf            := 0.06;

  2521     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025

  2523     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025

  2522     cWindSpeed.QWordValue   := 0;           // 0.0

  2524     cWindSpeed.QWordValue   := 0;           // 0.0

  2523     cWindSpeedf             := 0.0;

  2525     cWindSpeedf             := 0.0;