anchor.diff:      procedure GenerateBasicTiles(var TilesPartsArr: TTileParts; var A: TKMByte2Array);
       procedure GenerateHeight(aLocs: TKMPointArray; var TilesPartsArr: TTileParts; var A: TKMByte2Array; var TileTempl: TKMByte2Array);
       procedure GenerateObjects(var TilesPartsArr: TTileParts; var A: TKMByte2Array);
  +    procedure MineFinalFixer(var TilesPartsArr: TTileParts; var A: TKMByte2Array);
     public
       RMGSettings: TKMRMGSettings;
       constructor Create();
  
positive.code:       aTiles[K].Height := TilesPartsArr.Height[Y,X];
        aTiles[K].Obj := TilesPartsArr.Obj[Y,X];
        Include(aTiles[K].ChangeSet, tctTerrain);
        Include(aTiles[K].ChangeSet, tctRotation);
        Include(aTiles[K].ChangeSet, tctHeight);
        Include(aTiles[K].ChangeSet, tctObject);
        K := K + 1;
  
negative.code:   //}
    end;
  end;
  
  
  
  