hedgewars/hwengine.pas
changeset 11497 66f1cff4284b
parent 11486 2b30283a402c
child 11501 2d72489cc5b6
equal deleted inserted replaced
11496:df990633cb25 11497:66f1cff4284b
    97             RecountAllTeamsHealth;
    97             RecountAllTeamsHealth;
    98             GameState:= gsGame;
    98             GameState:= gsGame;
    99             end;
    99             end;
   100         gsConfirm, gsGame, gsChat:
   100         gsConfirm, gsGame, gsChat:
   101             begin
   101             begin
       
   102             // disable screenshot flash effect when about to make another screenshot
       
   103             if flagMakeCapture and (ScreenFade = sfFromWhite) then
       
   104                 ScreenFade:= sfNone;
   102             if not cOnlyStats then
   105             if not cOnlyStats then
   103                 // never place between ProcessKbd and DoGameTick - bugs due to /put cmd and isCursorVisible
   106                 // never place between ProcessKbd and DoGameTick - bugs due to /put cmd and isCursorVisible
   104                 DrawWorld(Lag);
   107                 DrawWorld(Lag);
   105             DoGameTick(Lag);
   108             DoGameTick(Lag);
   106             if not cOnlyStats then ProcessVisualGears(Lag);
   109             if not cOnlyStats then ProcessVisualGears(Lag);