hedgewars/uVariables.pas
changeset 15689 02042ee48fde
parent 15687 63e2b7b2ec47
child 15897 d7b53d08ad9c
equal deleted inserted replaced
15688:10bcec19045c 15689:02042ee48fde
  2978     cAirMines       := 0;
  2978     cAirMines       := 0;
  2979     cSentries       := 0;
  2979     cSentries       := 0;
  2980     cExplosives     := 2;
  2980     cExplosives     := 2;
  2981 
  2981 
  2982     GameState       := Low(TGameState);
  2982     GameState       := Low(TGameState);
  2983     zoom            := cDefaultZoomLevel;
       
  2984     ZoomValue       := cDefaultZoomLevel;
       
  2985 
  2983 
  2986     if cDefaultChatScale < cMinChatScaleValue then
  2984     if cDefaultChatScale < cMinChatScaleValue then
  2987         cDefaultChatScale := cMinChatScaleValue
  2985         cDefaultChatScale := cMinChatScaleValue
  2988     else if cDefaultChatScale > cMaxChatScaleValue then
  2986     else if cDefaultChatScale > cMaxChatScaleValue then
  2989         cDefaultChatScale := cMaxChatScaleValue;
  2987         cDefaultChatScale := cMaxChatScaleValue;