anchor.diff:      procedure House_WoodcutterChange(Sender: TObject);
       procedure House_ArmorWSDeliveryToggle(Sender: TObject);
   
  -    procedure ShowCommonDemand(aHouse: TKMHouse; Base: Integer;var Line: Integer; var RowRes: Integer);
  -    procedure ShowCommonOutput(aHouse: TKMHouse; Base: Integer;var Line: Integer; var RowRes: Integer);
  -    procedure ShowCommonOrders(aHouse: TKMHouse; Base: Integer;var Line: Integer; var RowRes: Integer);
  +    procedure ShowCommonDemand(aHouse: TKMHouse; Base: Integer; var Line: Integer; var RowRes: Integer);
  +    procedure ShowCommonOutput(aHouse: TKMHouse; Base: Integer; var Line: Integer; var RowRes: Integer);
  +    procedure ShowCommonOrders(aHouse: TKMHouse; Base: Integer; var Line: Integer; var RowRes: Integer);
       procedure ShowTownHall(aHouse: TKMHouse);
       procedure ShowArmorWorkshop(aHouse: TKMHouse);
   
  
positive.code: end;
  
  
  procedure TKMGUIGameHouse.ShowCommonOrders(aHouse: TKMHouse; Base: Integer;var Line, RowRes: Integer);
  var I: Integer; Res: TKMWareType;
  begin
    //Show Orders
  
negative.code: end;
  
  
  procedure TKMGUIGameHouse.ShowCommonOutput(aHouse: TKMHouse; Base: Integer; var Line, RowRes: Integer);
  var
    I: Integer;
    HSpec: TKMHouseSpec;
  