Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/GSHandlers.inc
changeset 3483 54ff8cbabaa6
parent 3480 c4c3f3512404
child 3484 3c65b1d979cd 
--- a/hedgewars/GSHandlers.inc	Fri May 28 13:04:11 2010 +0000
+++ b/hedgewars/GSHandlers.inc	Fri May 28 16:21:54 2010 +0000
@@ -3479,11 +3479,9 @@
         begin
             r0 := GetRandom(21);
             r1 := GetRandom(21);
+            doMakeExplosion(hwRound(Gear^.X) - 30 - r0, hwRound(Gear^.Y) + 40, 40 + r1, 0);
+            doMakeExplosion(hwRound(Gear^.X) + 30 + r1, hwRound(Gear^.Y) + 40, 40 + r0, 0);
             doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 80 + r0, EXPLAutoSound);
-            doMakeExplosion(hwRound(Gear^.X) - 30 - r0, hwRound(Gear^.Y) + 40, 40 + r1,
-            EXPLAutoSound);
-            doMakeExplosion(hwRound(Gear^.X) + 30 + r1, hwRound(Gear^.Y) + 40, 40 + r0,
-            EXPLAutoSound);
             Gear^.dY := -_1;
             Gear^.Pos := Gear^.Pos + 1;
         end
hedgewars