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/VGSHandlers.inc
changeset 3706 a79784328c03
parent 3704 ed2b9c7fb260
child 3751 a70c61c076ae 
--- a/hedgewars/VGSHandlers.inc	Mon Aug 02 00:48:15 2010 +0200
+++ b/hedgewars/VGSHandlers.inc	Mon Aug 02 01:07:51 2010 +0200
@@ -114,9 +114,11 @@
 Gear^.X:= Gear^.X + Gear^.dX * Steps;
 
 Gear^.Y:= Gear^.Y + Gear^.dY * Steps;
-Gear^.dY:= Gear^.dY + cGravityf * Steps;
+Gear^.dY:= Gear^.dY + cGravityf * Steps / 2;
 
-Gear^.Angle:= round(Gear^.Angle + Steps) mod cMaxAngle;
+Gear^.Angle:= Gear^.Angle + (Gear^.Frame + 1) * Steps / 10;
+while Gear^.Angle > cMaxAngle do
+    Gear^.Angle:= Gear^.Angle - cMaxAngle;
 
 if Gear^.FrameTicks <= Steps then
     DeleteVisualGear(Gear)
hedgewars