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/uGears.pas
changeset 4406 beb4de0af990
parent 4403 0dfe26f48ec1
child 4417 6bf00d99fc47 
--- a/hedgewars/uGears.pas	Sun Nov 21 12:11:50 2010 -0500
+++ b/hedgewars/uGears.pas	Sun Nov 21 13:13:42 2010 -0500
@@ -273,7 +273,7 @@
                 end;
         gtRope: begin
                 gear^.Radius:= 3;
-                gear^.Friction:= _450;
+                gear^.Friction:= _450 * _0_01 * cRopePercent;
                 RopePoints.Count:= 0;
                 end;
         gtMine: begin
hedgewars