diff -r b6487d2c15ad -r 54e78c40970b hedgewars/VGSHandlers.inc --- a/hedgewars/VGSHandlers.inc Mon Dec 06 13:07:36 2010 -0500 +++ b/hedgewars/VGSHandlers.inc Mon Dec 06 21:15:41 2010 -0500 @@ -566,7 +566,11 @@ for i:= 0 to 31 do begin vg:= AddVisualGear(gX, gY, vgtFire); - if vg <> nil then vg^.State:= 1; + if vg <> nil then + begin + vg^.State:= gstTmpFlag; + inc(vg^.FrameTicks, vg^.FrameTicks) + end end; for i:= 0 to 8 do AddVisualGear(gX, gY, vgtExplPart); for i:= 0 to 8 do AddVisualGear(gX, gY, vgtExplPart2); @@ -604,7 +608,11 @@ for i:= 0 to 46 do begin vg:= AddVisualGear(gX, gY, vgtFire); - if vg <> nil then vg^.State:= 1; + if vg <> nil then + begin + vg^.State:= gstTmpFlag; + inc(vg^.FrameTicks, vg^.FrameTicks) + end end; for i:= 0 to 15 do AddVisualGear(gX, gY, vgtExplPart); for i:= 0 to 15 do AddVisualGear(gX, gY, vgtExplPart2);