hedgewars/GSHandlers.inc
changeset 355 40c68869899e
parent 351 29bc9c36ad5f
child 357 165a040e4cfa
--- a/hedgewars/GSHandlers.inc	Sun Jan 21 21:27:07 2007 +0000
+++ b/hedgewars/GSHandlers.inc	Sun Jan 21 21:31:10 2007 +0000
@@ -442,8 +442,8 @@
 
 if (HHGear^.Angle <> BTPrevAngle) then
    begin
-   Gear^.dX:= hwSign(HHGear^.dX) * _0_5;//hwSign(HHGear^.dX) * Sin(HHGear^.Angle * pi / cMaxAngle) * _0_5;
-   Gear^.dY:= 0;//Cos(HHGear^.Angle * pi / cMaxAngle) * (-0.5);
+   Gear^.dX:= hwSign(HHGear^.dX) * AngleSin(HHGear^.Angle) * _0_5;
+   Gear^.dY:= AngleCos(HHGear^.Angle) * ( - _0_5);
    BTPrevAngle:= HHGear^.Angle;
    b:= true
    end;