equal
deleted
inserted
replaced
879 if (land and lfBouncy = 0) or (Gear^.State and gstCollision <> 0) then |
879 if (land and lfBouncy = 0) or (Gear^.State and gstCollision <> 0) then |
880 Gear^.dY:= _0; |
880 Gear^.dY:= _0; |
881 Gear^.State:= Gear^.State and not gstCollision |
881 Gear^.State:= Gear^.State and not gstCollision |
882 end; |
882 end; |
883 Gear^.State:= Gear^.State or gstMoving; |
883 Gear^.State:= Gear^.State or gstMoving; |
884 if (CurrentHedgehog^.Gear = Gear) and (CurrentHedgehog^.Gear^.State and gstHHDriven <> 0) and |
884 if (Gear^.State and gstHHDriven <> 0) and |
885 (not CurrentTeam^.ExtDriven) and (hwSqr(Gear^.dX) + hwSqr(Gear^.dY) > _0_003) then |
885 (not CurrentTeam^.ExtDriven) and (hwSqr(Gear^.dX) + hwSqr(Gear^.dY) > _0_003) then |
886 begin |
886 begin |
887 // TODO: why so aggressive at setting FollowGear when falling? |
887 // TODO: why so aggressive at setting FollowGear when falling? |
888 // because hog was being yanked out of frame by other stuff when doing a complicated jump/chute/saucer/roping. |
888 // because hog was being yanked out of frame by other stuff when doing a complicated jump/chute/saucer/roping. |
889 // added a couple more conditions to make it a bit less aggressive, at cost of possibly spectator failing to follow a maneuver |
889 // added a couple more conditions to make it a bit less aggressive, at cost of possibly spectator failing to follow a maneuver |