anchor.diff:      FSpellBook: TStrings;
   
       function GetTightFormation: Boolean;
  +    function IsArtifactsStored: Boolean;
       function IsPrimarySkillsStored: Boolean;
       function IsSecondarySkillsStored: Boolean;
       function IsSpellBookStored: Boolean;
  
positive.code: 
  function TOwnedArmedObjectOptions.IsArmyStored: Boolean;
  begin
    Result := FArmy.Count > 0;
  end;
  
  constructor TOwnedArmedObjectOptions.Create(AObject: IMapObject);
  
negative.code: 
  function TGuardedObjectOptions.IsGuardsStored: Boolean;
  begin
    Result := not FGuards.IsEmpty;
  end;
  
  { TCreatureSet }
  