3182 if ((Gear^.Pos = 3) and ((GameFlags and gfSolidLand) <> 0)) or (Gear^.Pos = 20) then // bounce up to 20 times (3 times on gameflagged solid land) before dropping past landscape

  3182 if ((Gear^.Pos = 3) and ((GameFlags and gfSolidLand) <> 0)) or (Gear^.Pos = 20) then // bounce up to 20 times (3 times on gameflagged solid land) before dropping past landscape

  3183     begin

  3183     begin

  3184     Gear^.dY:= Gear^.dY + cGravity * 3;

  3184     Gear^.dY:= Gear^.dY + cGravity * 3;

  3185     Gear^.Y:= Gear^.Y + Gear^.dY;

  3185     Gear^.Y:= Gear^.Y + Gear^.dY;

  3186     CheckGearDrowning(Gear);

  3186     CheckGearDrowning(Gear);

  3187     exit

  3188     exit

  3188     end;

  3189     end;

  3189 

  3190 

  3190 doStepFallingGear(Gear);

  3191 doStepFallingGear(Gear);

  3191 

  3192