hedgewars/uGears.pas
changeset 1781 28f674367d68
parent 1780 9b26e9f6ee96
child 1782 e7589e37a6d6
--- a/hedgewars/uGears.pas	Fri Jan 30 19:26:32 2009 +0000
+++ b/hedgewars/uGears.pas	Sat Jan 31 11:58:09 2009 +0000
@@ -1107,6 +1107,7 @@
                                     hwRound(PHedgehog(Gear^.Hedgehog)^.Gear^.X) + WorldDx, hwRound(PHedgehog(Gear^.Hedgehog)^.Gear^.Y) + WorldDy);
                        DrawRotated(sprRopeHook, hwRound(RopePoints.ar[0].X) + WorldDx, hwRound(RopePoints.ar[0].Y) + WorldDy, 1, RopePoints.HookAngle)
                        end else
+                       if Gear^.Elasticity.QWordValue > 0 then
                        begin
                        DrawRopeLine(hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy,
                                     hwRound(PHedgehog(Gear^.Hedgehog)^.Gear^.X) + WorldDx, hwRound(PHedgehog(Gear^.Hedgehog)^.Gear^.Y) + WorldDy);