anchor.diff:      (0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)
     );
   var
  -  X_0,Y_0,X_1,Y_1,X_2,Y_2,X0,X1,X2,Y0,Y1,Y2,sum: Integer;
  +  X_0,Y_0,X_1,Y_1,X_2,Y_2,X1,X2,Y1,Y2,sum: Integer;
     H1,H2: TInteger2Array;
  -  FillHeight: TKMFillBiome;
   begin
   
     H1 := LinearInterpolation(7,20);
  
positive.code:   // These functions secure smooth transitions
      procedure CellularAutomaton(var A: TKMByte2Array);
      function TileTemplate(var A: TKMByte2Array): TKMByte2Array;
      function TileTemplateCA(var A: TKMByte2Array; const Settings: Byte): TKMByte2Array;
      function TileTemplateOLD(var A: TKMByte2Array; const Settings: Byte): TKMByte2Array;
    // Generators of right rotated tiles and objects
      //procedure GenerateTilesOLD(var TilesPartsArr: TTileParts; var A: TKMByte2Array);
      procedure GenerateTiles(var TilesPartsArr: TTileParts; var A: TKMByte2Array; var B: TKMByte2Array);
  
negative.code: // aTiles = empty TKMTerrainTileBriefArray
  procedure TKMRandomMapGenerator.GenerateMap(var aTiles: TKMTerrainTileBriefArray);
  var
    Y, X, K: Integer;
    A,TileTemplateArr: TKMByte2Array;
    S: TInteger2Array;
    TilesPartsArr: TTileParts;
  
    //Queue: TKMQuickFlood;
  
    Locs: TKMPointArray;
  
  
  