equal
deleted
inserted
replaced
1711 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
1711 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
1712 if not (TestCollisionXwithXYShift(Gear, _0, -1, hwSign(Gear^.dX)) |
1712 if not (TestCollisionXwithXYShift(Gear, _0, -1, hwSign(Gear^.dX)) |
1713 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
1713 or TestCollisionYwithGear(Gear, -1)) then Gear^.Y:= Gear^.Y - _1; |
1714 end; |
1714 end; |
1715 |
1715 |
1716 FollowGear:= Gear |
1716 if (Ammo^.Kind <> gtFlame) or ((Ammo^.State and gsttmpFlag) = 0) then FollowGear:= Gear |
1717 end; |
1717 end; |
1718 end |
1718 end |
1719 end; |
1719 end; |
1720 end; |
1720 end; |
1721 if i <> 0 then SetAllToActive |
1721 if i <> 0 then SetAllToActive |