anchor.diff:  
   procedure TKMHouseMarket.ResAddToIn(aResource: TKMWareType; aCount: Integer = 1; aFromScript: Boolean = False);
   var
  -  resRequired, ordersToDo: Integer;
  +  ordersAllowed, ordersToDo: Integer;
   begin
     //If user cancelled the exchange (or began new one with different resources already)
     //then incoming resourced should be added to Offer list immediately
  
positive.code:   KM_ScriptingEvents, KM_Sound,
    KM_CommonUtils;
  
  
  { TKMHouseMarket }
  constructor TKMHouseMarket.Create(aUID: Integer; aHouseType: TKMHouseType; PosX, PosY: Integer; aOwner: TKMHandID; aBuildState: TKMHouseBuildState);
  
negative.code: 
  //Player has changed the amount of order
  procedure TKMHouseMarket.SetResOrder(aId: Byte; aValue: Integer);
  var
    resRequired, ordersAllowed, ordersRemoved, orderToDo, movedOut2In: Integer;
  begin
  