anchor.diff:    KM_AISetup;
   
   type
  +  TKMCoreBalance = record
  +    StoreBalance, SchoolBalance, InnBalance,
  +    QuaryBalance, WoodBalance, SawmillBalance,
  +    BarracksBalance: Single;
  +    Balance: Single; //Resulting balance
  +    Text: string;
  +  end;
     TKMWareBalanceGold = record
       CoalTheory, GoldOreTheory, GoldTheory: Single;
       Production: Single; //How much do we produce
  
positive.code:     6:  TryBuildHouse(ht_Barracks);
    end;
  end;
  
  
  
  //Increase Gold production
  
negative.code:     fRoadBelowStore: Boolean;
      fWooden: Boolean;
  
      fDemandCore: TKMCoreBalance;
      fDemandGold: TKMWareBalanceGold;
      fDemandFood: TKMWareBalanceFood;
      fDemandWeaponry: TKMWareBalanceWeaponry;
  