anchor.diff:        WT := Ware;
         if (RequiredHouses[ PRODUCTION[WT] ] > 0) then
         begin
  -        Priority := WareBalance[WT].Exhaustion - WareBalance[WT].Fraction * FRACTION_COEF;
  +        Priority := WareBalance[WT].Exhaustion - WareBalance[WT].Fraction * GA_BUILDER_ChooseHousesToBuild_FC;
           for I := Low(WareOrder) to High(WareOrder) do
             if (WT = wt_None) then
               break
  
positive.code:             Active := True;
              RemoveTreesMode := False;
              ShortcutMode := False;
              MaxReqWorkers := 3;
              RequiredWorkers := Min(MaxReqWorkers, FieldList.Count);
              CenterPoint := Loc;
              HouseType := aHT;
            end;
          end;
          // Reserve house place
  
negative.code:   if (MaxPlans > 0) then
    begin
      SelectHouse(FOOD_WARE);
      //if (MaxPlans > 0) then
        SelectHouse(WEAPON_WARE);
    end;
  end;
  
  