anchor.diff:    FLAG_ATTAINABLE = 1 shl 7;
     FLAGS_KNOWN_ATTAINABLE = FLAG_KNOWN_PATH or FLAG_ATTAINABLE;
     FLAGS_CLEAN_MASK = Integer(not ($1f shl 3));
  -  FLAG_EXCLUDED_COORDINATES = Cardinal((1 shl 31) + (1 shl 15));
     PATHLESS_TILE_WEIGHT = High(Cardinal) shr 1;
   
     {$ifdef LARGEINT}
  
positive.code:   // hot pool parameters
    with TTileMapPtr(Store.Self).FNodes.HotPool do
    begin
      LockedExcluded := (Cardinal(Store.HotPool.Next.Coordinates) and FLAG_EXCLUDED_COORDINATES = FLAG_EXCLUDED_COORDINATES);
      Unattainable := (NodeFlags and FLAG_ATTAINABLE = 0);
      KnownPathNode := Node;
    end;
  
negative.code: {$ifdef CPFDBG}
  function TTileMap.CellInformation(const X, Y: Word): string;
  const
    STAR: array[Boolean] of string = ('', '*');
  var
    Cell: PCPFCell;
  