anchor.diff:      BarracksBalance := HouseCount(ht_Barracks)    - Byte(P.Stats.GetWeaponsProduced > 0);
   
       Balance := Min([StoreBalance, SchoolBalance, InnBalance, BarracksBalance]);
  -    Text := Format
  +    fDemandCoreText := Format
         ('Core balance: %.2f (Store %.2f, School %.2f, Inn %.2f, Barracks %.2f)',
         [Balance, StoreBalance, SchoolBalance, InnBalance, BarracksBalance]);
     end;
  
positive.code:              and (not fCityPlanner.FindNearest(StoreLoc, 30, fnIron, T)
                 or not fCityPlanner.FindNearest(StoreLoc, 30, fnCoal, T));
  
    fWooden := True;
  end;
  
  
negative.code: begin
    LoadStream.Read(fOwner);
    LoadStream.Read(fRoadBelowStore);
    LoadStream.Read(fWooden);
  
    LoadStream.Read(fDemandCore, SizeOf(fDemandCore));
    LoadStream.Read(fDemandMaterials, SizeOf(fDemandMaterials));
    LoadStream.Read(fDemandGold, SizeOf(fDemandGold));
    LoadStream.Read(fDemandFood, SizeOf(fDemandFood));
    LoadStream.Read(fDemandWeaponry, SizeOf(fDemandWeaponry));
  
    fCityPlanner.Load(LoadStream);
    fPathFindingRoad.Load(LoadStream);
  