hedgewars/uVariables.pas
changeset 10820 e86ba0e821a6
parent 10818 f642a28cab0c
child 10850 c76ea22ea249
equal deleted inserted replaced
10818:f642a28cab0c 10820:e86ba0e821a6
  2606     InitStepsFlags  := 0;
  2606     InitStepsFlags  := 0;
  2607     RealTicks       := 0;
  2607     RealTicks       := 0;
  2608     AttackBar       := 0; // 0 - none, 1 - just bar at the right-down corner, 2 - from weapon
  2608     AttackBar       := 0; // 0 - none, 1 - just bar at the right-down corner, 2 - from weapon
  2609     cCaseFactor     := 5;  {0..9}
  2609     cCaseFactor     := 5;  {0..9}
  2610     cLandMines      := 4;
  2610     cLandMines      := 4;
  2611     cAirMines       := 1000;
  2611     cAirMines       := 4;
  2612     cExplosives     := 2;
  2612     cExplosives     := 2;
  2613 
  2613 
  2614     GameState       := Low(TGameState);
  2614     GameState       := Low(TGameState);
  2615     zoom            := cDefaultZoomLevel;
  2615     zoom            := cDefaultZoomLevel;
  2616     ZoomValue       := cDefaultZoomLevel;
  2616     ZoomValue       := cDefaultZoomLevel;