anchor.diff:    with fWareBalance[aWT] do
     begin
       // Calculate when will be ware depleted
  -    Exhaustion := 999;
  +    Exhaustion := 99;
       if (ActualConsumption - Production > 0) then
         Exhaustion := gHands[fOwner].Stats.GetWareBalance(aWT) / (ActualConsumption - Production);
       HouseReqCnt := Ceil(( Max(ActualConsumption, FinalConsumption) - Production) / Max(0.0001, ProductionRate[aWT]*1.0));
  
positive.code:   //TWarfareDemands = array[WARFARE_MIN..WARFARE_MAX] of Single;
    TRequiredHousesArray = array[HOUSE_MIN..HOUSE_MAX] of Integer;
  
    TKMCityPredictor = class
    private
      fOwner: TKMHandIndex;
  
negative.code: uses
    Classes, Graphics, KromUtils, Math, SysUtils,
    KM_Defaults, KM_Points, KM_CommonClasses, KM_CommonTypes,
    KM_AISetup, KM_ResHouses, KM_ResWares;
  
  type
    TWareBalance = record
  