anchor.diff:    KM_ScriptingEvents, KM_Sound,
     KM_CommonUtils;
   
  +const
  +  //Maximum number of Demands we can place at once (stops the delivery queue from becoming clogged with 1500 items)
  +  MAX_RES_ORDERED = 10;
  +
   
   { TKMHouseMarket }
   constructor TKMHouseMarket.Create(aUID: Integer; aHouseType: TKMHouseType; PosX, PosY: Integer; aOwner: TKMHandID; aBuildState: TKMHouseBuildState);
  
positive.code: 
  //Player has changed the amount of order
  procedure TKMHouseMarket.SetResOrder(aId: Byte; aValue: Integer);
  const
    //Maximum number of Demands we can place at once (stops the delivery queue from becoming clogged with 1500 items)
    MAX_RES_ORDERED = 10;
  var
    resRequired, ordersAllowed, ordersRemoved, orderToDo, movedOut2In: Integer;
  begin
  
negative.code: 
  procedure TKMHouseMarket.ResAddToIn(aResource: TKMWareType; aCount: Integer = 1; aFromScript: Boolean = False);
  var
    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
  