hedgewars/uVariables.pas
changeset 15667 02042ee48fde
parent 15665 63e2b7b2ec47
child 15875 d7b53d08ad9c
equal deleted inserted replaced
15666:10bcec19045c 15667: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;