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/uGearsList.pas
changeset 7001 89488f5b99ca
parent 6982 8d41d22a291d
child 7010 10a0a31804f3 
--- a/hedgewars/uGearsList.pas	Wed May 02 19:36:23 2012 +0200
+++ b/hedgewars/uGearsList.pas	Wed May 02 22:12:58 2012 +0400
@@ -284,8 +284,8 @@
                 gear^.Density:= _1;
                 if (gear^.dY.QWordValue = 0) and (gear^.dX.QWordValue = 0) then
                     begin
-                    gear^.dY:= (getrandom - _0_8) * _0_03;
-                    gear^.dX:= (getrandom - _0_5) * _0_4
+                    gear^.dY:= (getrandomf - _0_8) * _0_03;
+                    gear^.dX:= (getrandomf - _0_5) * _0_4
                     end
                 end;
    gtFirePunch: begin
hedgewars