hedgewars/GSHandlers.inc
changeset 6452 7c6f9b6672dc
parent 6450 14224c9b4594
child 6453 11c578d30bd3
equal deleted inserted replaced
6450:14224c9b4594 6452:7c6f9b6672dc
  4039         iscake:= (iterator^.Kind = gtCake);
  4039         iscake:= (iterator^.Kind = gtCake);
  4040 
  4040 
  4041         // won't port stuff that does not move towards the front/portal entrance
  4041         // won't port stuff that does not move towards the front/portal entrance
  4042         if iscake then
  4042         if iscake then
  4043         begin
  4043         begin
  4044             if not ((iterator^.X - Gear^.X)*ox + (iterator^.Y - Gear^.Y)*oy).isNegative then
  4044             if not (((iterator^.X - Gear^.X)*ox + (iterator^.Y - Gear^.Y)*oy).isNegative) then
  4045                 continue;
  4045                 continue;
  4046         end
  4046         end
  4047         else
  4047         else
  4048             if not (Gear^.dX*ox + Gear^.dY*oy).isNegative then
  4048             if not (Gear^.dX*ox + Gear^.dY*oy).isNegative then
  4049                 continue;
  4049                 continue;