hedgewars/uVariables.pas
changeset 7974 7ac6699b6228
parent 7964 d00378a37dde
child 7980 7f8df51553a7
equal deleted inserted replaced
7972:0dffb91eeb82 7974:7ac6699b6228
   106 
   106 
   107     cTagsMask        : byte;
   107     cTagsMask        : byte;
   108     zoom             : GLfloat;
   108     zoom             : GLfloat;
   109     ZoomValue        : GLfloat;
   109     ZoomValue        : GLfloat;
   110 
   110 
   111     cWaterLine       : Word;
   111     cWaterLine       : LongWord;
   112     cGearScrEdgesDist: LongInt;
   112     cGearScrEdgesDist: LongInt;
   113     isAudioMuted     : boolean;
   113     isAudioMuted     : boolean;
   114 
   114 
   115     // originally typed consts
   115     // originally typed consts
   116     ExplosionBorderColor: LongWord;
   116     ExplosionBorderColor: LongWord;
   120 
   120 
   121     // originally from uConsts
   121     // originally from uConsts
   122     Pathz: array[TPathType] of shortstring;
   122     Pathz: array[TPathType] of shortstring;
   123     UserPathz: array[TPathType] of shortstring;
   123     UserPathz: array[TPathType] of shortstring;
   124     CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;
   124     CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;
   125     LAND_WIDTH       : Word;
   125     LAND_WIDTH       : LongWord;
   126     LAND_HEIGHT      : Word;
   126     LAND_HEIGHT      : LongWord;
   127     LAND_WIDTH_MASK  : LongWord;
   127     LAND_WIDTH_MASK  : LongWord;
   128     LAND_HEIGHT_MASK : LongWord;
   128     LAND_HEIGHT_MASK : LongWord;
   129 
   129 
   130     cLeftScreenBorder     : LongInt;
   130     cLeftScreenBorder     : LongInt;
   131     cRightScreenBorder    : LongInt;
   131     cRightScreenBorder    : LongInt;
   162     WeaponTooltipTex: PTexture;
   162     WeaponTooltipTex: PTexture;
   163     AmmoMenuTex     : PTexture;
   163     AmmoMenuTex     : PTexture;
   164     AmmoMenuInvalidated: boolean;
   164     AmmoMenuInvalidated: boolean;
   165     AmmoRect		: TSDL_Rect;
   165     AmmoRect		: TSDL_Rect;
   166     HHTexture       : PTexture;
   166     HHTexture       : PTexture;
       
   167     cMaxZoomLevel   : real;
       
   168     cMinZoomLevel   : real;
       
   169     cZoomDelta      : real;
       
   170     cMinMaxZoomLevelDelta : real;
   167 
   171 
   168 
   172 
   169     flagMakeCapture : boolean;
   173     flagMakeCapture : boolean;
   170 
   174 
   171     InitStepsFlags  : Longword;
   175     InitStepsFlags  : Longword;
  2630     cGravity                := cMaxWindSpeed * 2;
  2634     cGravity                := cMaxWindSpeed * 2;
  2631     cGravityf               := 0.00025 * 2;
  2635     cGravityf               := 0.00025 * 2;
  2632     cDamageModifier         := _1;
  2636     cDamageModifier         := _1;
  2633     TargetPoint             := cTargetPointRef;
  2637     TargetPoint             := cTargetPointRef;
  2634 
  2638 
       
  2639 {$IFDEF MOBILE}
       
  2640     cMaxZoomLevel:= 0.5;
       
  2641     cMinZoomLevel:= 3.5;
       
  2642     cZoomDelta:= 0.20;
       
  2643 {$ELSE}
       
  2644     cMaxZoomLevel:= 1.0;
       
  2645     cMinZoomLevel:= 3.0;
       
  2646     cZoomDelta:= 0.25;
       
  2647 {$ENDIF}
       
  2648 
       
  2649     cMinMaxZoomLevelDelta:= cMaxZoomLevel - cMinZoomLevel;
       
  2650 
  2635     // int, longint longword and byte
  2651     // int, longint longword and byte
  2636     CursorMovementX     := 0;
  2652     CursorMovementX     := 0;
  2637     CursorMovementY     := 0;
  2653     CursorMovementY     := 0;
  2638     GameTicks           := 0;
  2654     GameTicks           := 0;
  2639     CheckSum            := 0;
  2655     CheckSum            := 0;