908             Gear^.dY:= _0;

   908             Gear^.dY:= _0;

   909         Gear^.State:= Gear^.State and (not gstCollision)

   909         Gear^.State:= Gear^.State and (not gstCollision)

   910         end;

   910         end;

   911     Gear^.State:= Gear^.State or gstMoving;

   911     Gear^.State:= Gear^.State or gstMoving;

   912     if (Gear^.State and gstHHDriven <> 0) and

   912     if (Gear^.State and gstHHDriven <> 0) and

   913        (not CurrentTeam^.ExtDriven) and (hwSqr(Gear^.dX) + hwSqr(Gear^.dY) > _0_003) then

   914        (not CurrentTeam^.ExtDriven) and (hwSqr(Gear^.dX) + hwSqr(Gear^.dY) > _0_003) then

   914         begin

   915         begin

   915         // TODO: why so aggressive at setting FollowGear when falling?

   916         // TODO: why so aggressive at setting FollowGear when falling?

   916         // because hog was being yanked out of frame by other stuff when doing a complicated jump/chute/saucer/roping.

   917         // because hog was being yanked out of frame by other stuff when doing a complicated jump/chute/saucer/roping.

   917         // added a couple more conditions to make it a bit less aggressive, at cost of possibly spectator failing to follow a maneuver

   918         // added a couple more conditions to make it a bit less aggressive, at cost of possibly spectator failing to follow a maneuver