# HG changeset patch
# User nemo
# Date 1267838772 0
# Node ID 1d9e0a541c6240d16a91c93cb852020f9c88f166
# Parent  b30e6350a22183c9e1fd8bad791a51a067651419
Stagger gear animations

diff -r b30e6350a221 -r 1d9e0a541c62 hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Sat Mar 06 01:21:44 2010 +0000
+++ b/hedgewars/uGears.pas	Sat Mar 06 01:26:12 2010 +0000
@@ -1590,7 +1590,7 @@
                                         end;
                          end;
       gtExplosives: begin
-                    i:= (GameTicks shr 6) mod 64;
+                    i:= (GameTicks shr 6 + Gear^.uid) mod 64;
                     if i > 18 then i:= 0;
                     if Gear^.State and gstAnimation = 0 then
                         DrawSprite(sprExplosives, hwRound(Gear^.X) - 24 + WorldDx, hwRound(Gear^.Y) - 24 + WorldDy, i)