hedgewars/uGears.pas
changeset 6192 7c34bf4fbb54
parent 6189 d0d666503fd5
child 6252 8d598aa498b0
--- a/hedgewars/uGears.pas	Sun Oct 23 11:37:52 2011 +0400
+++ b/hedgewars/uGears.pas	Sun Oct 23 14:44:19 2011 -0400
@@ -300,10 +300,10 @@
                         dx.isNegative:= GetRandom(2) = 0;
                         dx.QWordValue:= GetRandom(100000000);
                         dy.isNegative:= false;
-                        dy.QWordValue:= GetRandom(70000000)
+                        dy.QWordValue:= GetRandom(70000000);
+                        if GetRandom(2) = 0 then dx := -dx
                         end;
                     State:= State or gstInvisible;
-                    if GetRandom(2) = 0 then dx := -dx;
                     Health:= random(vobFrameTicks);
                     Timer:= random(vobFramesCount);
                     Angle:= (random(2) * 2 - 1) * (1 + random(10000)) * vobVelocity