equal
deleted
inserted
replaced
466 dec(Gear^.AdvBounce); |
466 dec(Gear^.AdvBounce); |
467 |
467 |
468 if isFalling and (Gear^.State and gstNoGravity = 0) then |
468 if isFalling and (Gear^.State and gstNoGravity = 0) then |
469 begin |
469 begin |
470 Gear^.dY := Gear^.dY + cGravity; |
470 Gear^.dY := Gear^.dY + cGravity; |
471 if (GameFlags and gfMoreWind <> 0) and |
471 if (GameFlags and gfMoreWind <> 0) and (TurnTimeLeft > 0) and |
472 ((xland or land) = 0) and |
472 ((xland or land) = 0) and |
473 ((Gear^.dX.QWordValue + Gear^.dY.QWordValue) > _0_02.QWordValue) then |
473 ((Gear^.dX.QWordValue + Gear^.dY.QWordValue) > _0_02.QWordValue) then |
474 Gear^.dX := Gear^.dX + cWindSpeed / Gear^.Density |
474 Gear^.dX := Gear^.dX + cWindSpeed / Gear^.Density |
475 end; |
475 end; |
476 |
476 |