equal
deleted
inserted
replaced
429 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
429 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
430 if not (TestCollisionXwithXYShift(Gear, _0, -1, hwSign(Gear^.dX)) |
430 if not (TestCollisionXwithXYShift(Gear, _0, -1, hwSign(Gear^.dX)) |
431 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
431 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
432 end; |
432 end; |
433 |
433 |
434 if (not cArtillery) and (not TestCollisionXwithGear(Gear, hwSign(Gear^.dX))) then Gear^.X:= Gear^.X + SignAs(_1, Gear^.dX); |
434 if (not cArtillery) and ((Gear^.Message and gm_Precise) = 0) and (not TestCollisionXwithGear(Gear, hwSign(Gear^.dX))) then |
|
435 Gear^.X:= Gear^.X + SignAs(_1, Gear^.dX); |
|
436 |
435 SetAllHHToActive; |
437 SetAllHHToActive; |
436 |
438 |
437 if not TestCollisionYwithGear(Gear, 1) then |
439 if not TestCollisionYwithGear(Gear, 1) then |
438 begin |
440 begin |
439 Gear^.Y:= Gear^.Y + _1; |
441 Gear^.Y:= Gear^.Y + _1; |