hedgewars/uVariables.pas
changeset 14679 4eaeba349179
parent 14677 93429d8f6b3f
child 14681 bd43e703608b
equal deleted inserted replaced
14678:c96889bf5796 14679:4eaeba349179
   212     AmmoRect        : TSDL_Rect;
   212     AmmoRect        : TSDL_Rect;
   213     HHTexture       : PTexture;
   213     HHTexture       : PTexture;
   214     cMaxZoomLevel   : real;
   214     cMaxZoomLevel   : real;
   215     cMinZoomLevel   : real;
   215     cMinZoomLevel   : real;
   216     cZoomDelta      : real;
   216     cZoomDelta      : real;
       
   217     cZoomDeltaSmall : real;
   217     cMinMaxZoomLevelDelta : real;
   218     cMinMaxZoomLevelDelta : real;
   218 
   219 
   219 
   220 
   220     flagMakeCapture : boolean;
   221     flagMakeCapture : boolean;
   221     flagDumpLand    : boolean;
   222     flagDumpLand    : boolean;
  2629     UserZoom        := cDefaultZoomLevel;
  2630     UserZoom        := cDefaultZoomLevel;
  2630     zoom            := cDefaultZoomLevel;
  2631     zoom            := cDefaultZoomLevel;
  2631     ZoomValue       := cDefaultZoomLevel;
  2632     ZoomValue       := cDefaultZoomLevel;
  2632 
  2633 
  2633 {$IFDEF MOBILE}
  2634 {$IFDEF MOBILE}
  2634     cMaxZoomLevel:= 0.5;
  2635     cMaxZoomLevel   := 0.5;
  2635     cMinZoomLevel:= 3.5;
  2636     cMinZoomLevel   := 3.5;
  2636     cZoomDelta:=    0.20;
  2637     cZoomDelta      := 0.20;
       
  2638     cZoomDeltaSmall := 0.10;
  2637 {$ELSE}
  2639 {$ELSE}
  2638     cMaxZoomLevel:= 1.0;
  2640     cMaxZoomLevel   := 1.0;
  2639     cMinZoomLevel:= 3.0;
  2641     cMinZoomLevel   := 3.0;
  2640     cZoomDelta:=    0.25;
  2642     cZoomDelta      := 0.25;
       
  2643     cZoomDeltaSmall := 0.125;
  2641 {$ENDIF}
  2644 {$ENDIF}
  2642 
  2645 
  2643 {$IFDEF USE_VIDEO_RECORDING}
  2646 {$IFDEF USE_VIDEO_RECORDING}
  2644     RecPrefix          := '';
  2647     RecPrefix          := '';
  2645     cAVFormat          := '';
  2648     cAVFormat          := '';