hedgewars/uVisualGears.pas
changeset 3994 486da687d76a
parent 3976 abaf741a4e21
child 4034 634a8c8682de
--- a/hedgewars/uVisualGears.pas	Sun Oct 24 10:11:30 2010 -0400
+++ b/hedgewars/uVisualGears.pas	Sun Oct 24 22:00:36 2010 +0200
@@ -172,8 +172,7 @@
                 end;
     vgtCloud: begin
                 Frame:= random(4);
-                dx:= 0.000005 * random(10000);
-                if random(2) = 0 then dx := -dx;
+                dx:= 0.5 + 0.1 * random(5); // how much the cloud will be affected by wind
                 timer:= random(4096);
                 end;
     vgtExplPart,