equal
deleted
inserted
replaced
2616 // remember original target location |
2616 // remember original target location |
2617 oy:= Gear^.Target.Y; |
2617 oy:= Gear^.Target.Y; |
2618 |
2618 |
2619 for y:= ty downto ty - ytol do |
2619 for y:= ty downto ty - ytol do |
2620 begin |
2620 begin |
2621 if TryPlaceOnLand(lx, y, sprHHTelepMask, 0, false, not hasBorder, 0) then |
2621 if TryPlaceOnLand(lx, y, sprHHTelepMask, 0, false, not hasBorder, false, 0) then |
2622 begin |
2622 begin |
2623 valid:= true; |
2623 valid:= true; |
2624 break; |
2624 break; |
2625 end; |
2625 end; |
2626 dec(Gear^.Target.Y); |
2626 dec(Gear^.Target.Y); |