anchor.diff:  end;
   
   
  -function TKMTerrainPainter.GetTileCornersTerrainKinds(aCell: TKMPoint; aUseTempLand: Boolean;
  -                                                      aUseOnlyTileOwnTK: Boolean = False;
  -                                                      aUseOnlyNodeTK: Boolean = False): TKMTerrainKindsArray;
  +//Get tile corners terkinds (TKinds, based on TILE_CORNERS_TERRAIN_KINDS or generated mask)
  +function TKMTerrainPainter.GetTileOwnCornersTKinds(aCell: TKMPoint): TKMTerrainKindsArray;
  +begin
  +  Result := GetTileCornersTKinds(aCell, True);
  +end;
  +
  +
  +function TKMTerrainPainter.GetTileLandNodeTKinds(aCell: TKMPoint): TKMTerrainKindsArray;
  +begin
  +  Result := GetTileCornersTKinds(aCell, False, True);
  +end;
  +
  +
  +function TKMTerrainPainter.GetTileCornersTKinds(aCell: TKMPoint;
  +                                                      aGetOnlyTileCornersTK: Boolean = False;
  +                                                      aGetOnlyLandNodeTK: Boolean = False): TKMTerrainKindsArray;
   var
     TerKindFound: array [0..3] of Boolean;
   
  
positive.code:     fMapXc, fMapYc: Integer; //Cursor position cell
  
      function BrushAreaTerKindContains(aCell: TKMPoint): Boolean;
      function GetTileCornersTerrainKinds(aCell: TKMPoint; aUseTempLand: Boolean; aUseOnlyTileOwnTK: Boolean = False; aUseOnlyNodeTK: Boolean = False): TKMTerrainKindsArray;
      procedure CheckpointToTerrain;
      procedure BrushTile(const X, Y: Integer);
      procedure BrushTerrainTile(const X, Y: Integer; aTerKind: TKMTerrainKind);
  
negative.code:   Tile: TKMTerrainTileBasic;
  
  begin
    Assert(not (aGetOnlyTileCornersTK and aGetOnlyLandNodeTK)); //At least 1 of those parameters should be False
  
    SetLength(Result, 4);
  
    //Init with tkCustom
    for I := 0 to 3 do
    begin
      TerKindFound[I] := False;
      Result[I] := tkCustom;
    end;
  
    //Get tile corners TKinds based on LandTerKind
    if not aGetOnlyTileCornersTK then
    begin
      CheckTerKind(aCell.X,   aCell.Y,   0);
      CheckTerKind(aCell.X+1, aCell.Y,   1);
  