equal
deleted
inserted
replaced
710 |
710 |
711 defaultPos:= false |
711 defaultPos:= false |
712 end |
712 end |
713 end else // not gstHHDriven |
713 end else // not gstHHDriven |
714 if (Gear^.Damage > 0) |
714 if (Gear^.Damage > 0) |
715 and ((Gear^.State or gstMoving) <> 0) then |
715 and (hwSqr(Gear^.dX) + hwSqr(Gear^.dY) > _0_003) then |
716 begin |
716 begin |
717 DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy, |
717 DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy, |
718 hwSign(Gear^.dX), |
718 hwSign(Gear^.dX), |
719 2, |
719 2, |
720 1, |
720 1, |