anchor.diff:      property Deposits: TKMDeposits read fDeposits;
       property Selection: TKMSelection read fSelection;
       property Revealers[aIndex: Byte]: TKMPointTagList read GetRevealer;
  -    property MapTxtInfo: TKMMapTxtInfo read fMapTxtInfo;
       property VisibleLayers: TKMMapEdLayerSet read fVisibleLayers write fVisibleLayers;
   
       function OnlyAdvancedAIHand(aHandId: TKMHandID): Boolean;
  
positive.code: 
    fTerrainPainter := TKMTerrainPainter.Create;
    fSelection := TKMSelection.Create(fTerrainPainter);
    fMapTxtInfo := TKMMapTxtInfo.Create;
  
    fVisibleLayers := [mlObjects, mlHouses, mlUnits, mlOverlays, mlDeposits];
  
  
negative.code:   FreeAndNil(fTerrainPainter);
    FreeAndNil(fDeposits);
    FreeAndNil(fSelection);
  
    for I := Low(fRevealers) to High(fRevealers) do
      FreeAndNil(fRevealers[I]);
  