equal
deleted
inserted
replaced
343 Gear^.Y:= Gear^.Y + Gear^.dY * Steps; |
343 Gear^.Y:= Gear^.Y + Gear^.dY * Steps; |
344 Gear^.Y:= Gear^.Y - cDrownSpeedf * Steps; |
344 Gear^.Y:= Gear^.Y - cDrownSpeedf * Steps; |
345 Gear^.dX := Gear^.dX / (1.001 * Steps); |
345 Gear^.dX := Gear^.dX / (1.001 * Steps); |
346 Gear^.dY := Gear^.dY / (1.001 * Steps); |
346 Gear^.dY := Gear^.dY / (1.001 * Steps); |
347 |
347 |
348 if (Gear^.FrameTicks <= Steps) or not CheckCoordInWater(round(Gear^.X), round(Gear^.Y)) then |
348 if (Gear^.FrameTicks <= Steps) or (not CheckCoordInWater(round(Gear^.X), round(Gear^.Y))) then |
349 DeleteVisualGear(Gear) |
349 DeleteVisualGear(Gear) |
350 else |
350 else |
351 dec(Gear^.FrameTicks, Steps) |
351 dec(Gear^.FrameTicks, Steps) |
352 end; |
352 end; |
353 |
353 |