hedgewars/uVariables.pas
changeset 4835 a6924450e694
parent 4808 7c3e5b52344a
child 4844 20b81fafd236
child 4845 9a0f5377c529
equal deleted inserted replaced
4834:3763a386a427 4835:a6924450e694
   124     AttackBar       : LongInt;
   124     AttackBar       : LongInt;
   125 
   125 
   126     WaterColorArray : array[0..3] of HwColor4f;
   126     WaterColorArray : array[0..3] of HwColor4f;
   127     SDWaterColorArray : array[0..3] of HwColor4f;
   127     SDWaterColorArray : array[0..3] of HwColor4f;
   128     SDMusic         : shortstring;
   128     SDMusic         : shortstring;
       
   129     SDTint          : LongInt;
   129 
   130 
   130     CursorPoint     : TPoint;
   131     CursorPoint     : TPoint;
   131     TargetPoint     : TPoint;
   132     TargetPoint     : TPoint;
   132 
   133 
   133     ScreenFade      : TScreenFade;
   134     ScreenFade      : TScreenFade;
  2069     bShowAmmoMenu: boolean;
  2070     bShowAmmoMenu: boolean;
  2070     bSelected: boolean;
  2071     bSelected: boolean;
  2071     bShowFinger: boolean;
  2072     bShowFinger: boolean;
  2072     Frames: Longword;
  2073     Frames: Longword;
  2073     WaterColor, DeepWaterColor: TSDL_Color;
  2074     WaterColor, DeepWaterColor: TSDL_Color;
       
  2075     SDSkyColor: TSDL_Color;
  2074     SkyOffset: LongInt;
  2076     SkyOffset: LongInt;
  2075     HorizontOffset: LongInt;
  2077     HorizontOffset: LongInt;
  2076 {$IFDEF COUNTTICKS}
  2078 {$IFDEF COUNTTICKS}
  2077     cntTicks: LongWord;
  2079     cntTicks: LongWord;
  2078 {$ENDIF}
  2080 {$ENDIF}
  2189     SDWaterColorArray[2].a := 255;
  2191     SDWaterColorArray[2].a := 255;
  2190     SDWaterColorArray[1]:= SDWaterColorArray[0];
  2192     SDWaterColorArray[1]:= SDWaterColorArray[0];
  2191     SDWaterColorArray[3]:= SDWaterColorArray[2];
  2193     SDWaterColorArray[3]:= SDWaterColorArray[2];
  2192 
  2194 
  2193     SDMusic:= 'main_theme.ogg';
  2195     SDMusic:= 'main_theme.ogg';
       
  2196     SDTint:= $80;
  2194 
  2197 
  2195     cDrownSpeed.QWordValue  := 257698038;       // 0.06
  2198     cDrownSpeed.QWordValue  := 257698038;       // 0.06
  2196     cDrownSpeedf            := 0.06;
  2199     cDrownSpeedf            := 0.06;
  2197     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025
  2200     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025
  2198     cWindSpeed.QWordValue   := 0;      // 0.0
  2201     cWindSpeed.QWordValue   := 0;      // 0.0