X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fg_weapons.pas;h=0c8788129a170f7def99259fbbe97c1e43e92ce2;hp=504a1766747c7c54c1c206a10fc0b57566c2d20f;hb=20cbf5c1dd17b4fde0968bb6583d1c91914d5e49;hpb=2fc1afb15bf2071e20e5183d9a610d70632d06a1

diff --git a/src/game/g_weapons.pas b/src/game/g_weapons.pas
index 504a176..0c87881 100644
--- a/src/game/g_weapons.pas
+++ b/src/game/g_weapons.pas
@@ -1697,7 +1697,7 @@ end;
 
 procedure g_Weapon_Update();
 var
-  i, a, h, cx, cy, oldvx, oldvy: Integer;
+  i, a, h, cx, cy, oldvx, oldvy, tf: Integer;
   _id: DWORD;
   Anim: TAnimation;
   t: DWArray;
@@ -1943,7 +1943,12 @@ begin
                 ShotType := 0;
             end;
 
-            if g_Frames_Get(_id, 'FRAMES_FLAME') and (gTime mod 3 = 0) then
+            if Stopped = 0 then
+              tf := 2
+            else
+              tf := 3;
+
+            if (gTime mod tf = 0) and g_Frames_Get(_id, 'FRAMES_FLAME') then
             begin
               Anim := TAnimation.Create(_id, False, 2 + Random(2));
               Anim.Alpha := 0;