anchor.diff:  procedure TKMHandAISetup.Save(SaveStream: TKMemoryStream);
   begin
     SaveStream.WriteA('AISetup');
  +  SaveStream.Write(NewAI);
     SaveStream.Write(Aggressiveness);
     SaveStream.Write(AutoAttack);
     SaveStream.Write(AutoBuild);
  
positive.code:   // Could be a record, but we want to have default values initialization in constructor
    TKMHandAISetup = class
    public
      Aggressiveness: Integer; //-1 means not used or default
      AutoAttack: Boolean;
      AutoRepair: Boolean;
  
negative.code:     function WarriorsPerMinute(aArmy: TArmyType): Single; overload;
      function WarriorsPerMinute: Single; overload;
  
      procedure ApplyAgressiveBuilderSetup(aNewAI: Boolean = False);
  
      procedure Save(SaveStream: TKMemoryStream);
      procedure Load(LoadStream: TKMemoryStream);
  