using System;
using System.Collections.Generic;
using Server.ContextMenus;
using Server.Engines.BulkOrders;
using Server.Factions;
using Server.Items;
using Server.Misc;
using Server.Mobiles;
using Server.Network;
using Server.Regions;

namespace Server.Mobiles
{
  public enum VendorShoeType
  {
    None,
    Shoes,
    Boots,
    Sandals,
    ThighBoots
  }

  public abstract class BaseVendor : BaseCreature, IVendor
  {
    private const int MaxSell = 500;

    private static TimeSpan InventoryDecayTime = TimeSpan.FromHours(1.0);

    private List<IBuyItemInfo> m_ArmorBuyInfo = new List<IBuyItemInfo>();
    private List<IShopSellInfo> m_ArmorSellInfo = new List<IShopSellInfo>();

    public BaseVendor(string title = null)
      : base(AIType.AI_Vendor, FightMode.None, 2, 1, 0.5, 2)
    {
      LoadSBInfo();

      Title = title;
      InitBody();
      InitOutfit();

      //these packs MUST exist, or the client will crash when the packets are sent
      Container pack = new Backpack { Layer = Layer.ShopBuy, Movable = false, Visible = false };
      AddItem(pack);

      pack = new Backpack { Layer = Layer.ShopResale, Movable = false, Visible = false };
      AddItem(pack);

      LastRestock = DateTime.UtcNow;
    }

    public BaseVendor(Serial serial)
      : base(serial)
    {
    }

    protected abstract List<SBInfo> SBInfos{ get; }

    public override bool CanTeach => true;

    public override bool BardImmune => true;

    public override bool PlayerRangeSensitive => true;

    public virtual bool IsActiveVendor => true;
    public virtual bool IsActiveBuyer => IsActiveVendor; // response to vendor SELL
    public virtual bool IsActiveSeller => IsActiveVendor; // response to vendor BUY

    public virtual NpcGuild NpcGuild => NpcGuild.None;

    public override bool IsInvulnerable => true;

    public virtual DateTime NextTrickOrTreat{ get; set; }

    public override bool ShowFameTitle => false;

    public Container BuyPack
    {
      get
      {
        if (!(FindItemOnLayer(Layer.ShopBuy) is Container pack))
        {
          pack = new Backpack { Layer = Layer.ShopBuy, Visible = false };
          AddItem(pack);
        }

        return pack;
      }
    }

    public virtual bool IsTokunoVendor => Map == Map.Tokuno;

    public virtual VendorShoeType ShoeType => VendorShoeType.Shoes;

    public DateTime LastRestock{ get; set; }

    public virtual TimeSpan RestockDelay => TimeSpan.FromHours(1);

    public virtual void Restock()
    {
      LastRestock = DateTime.UtcNow;

      IBuyItemInfo[] buyInfo = GetBuyInfo();

      foreach (IBuyItemInfo bii in buyInfo)
        bii.OnRestock();
    }

    public virtual bool OnBuyItems(Mobile buyer, List<BuyItemResponse> list)
    {
      if (!IsActiveSeller)
        return false;

      if (!buyer.CheckAlive())
        return false;

      if (!CheckVendorAccess(buyer))
      {
        Say(501522); // I shall not treat with scum like thee!
        return false;
      }

      UpdateBuyInfo();

      // IBuyItemInfo[] buyInfo = this.GetBuyInfo();
      IShopSellInfo[] info = GetSellInfo();
      int totalCost = 0;
      List<BuyItemResponse> validBuy = new List<BuyItemResponse>(list.Count);
      bool bought;
      bool fromBank = false;
      bool fullPurchase = true;
      int controlSlots = buyer.FollowersMax - buyer.Followers;

      foreach (BuyItemResponse buy in list)
      {
        Serial ser = buy.Serial;
        int amount = buy.Amount;

        if (ser.IsItem)
        {
          Item item = World.FindItem(ser);

          if (item == null)
            continue;

          GenericBuyInfo gbi = LookupDisplayObject(item);

          if (gbi != null)
          {
            ProcessSinglePurchase(buy, gbi, validBuy, ref controlSlots, ref fullPurchase, ref totalCost);
          }
          else if (item != BuyPack && item.IsChildOf(BuyPack))
          {
            if (amount > item.Amount)
              amount = item.Amount;

            if (amount <= 0)
              continue;

            foreach (IShopSellInfo ssi in info)
              if (ssi.IsSellable(item))
                if (ssi.IsResellable(item))
                {
                  totalCost += ssi.GetBuyPriceFor(item) * amount;
                  validBuy.Add(buy);
                  break;
                }
          }
        }
        else if (ser.IsMobile)
        {
          Mobile mob = World.FindMobile(ser);

          if (mob == null)
            continue;

          GenericBuyInfo gbi = LookupDisplayObject(mob);

          if (gbi != null)
            ProcessSinglePurchase(buy, gbi, validBuy, ref controlSlots, ref fullPurchase, ref totalCost);
        }
      } //foreach

      if (fullPurchase && validBuy.Count == 0)
        SayTo(buyer, 500190); // Thou hast bought nothing!
      else if (validBuy.Count == 0)
        SayTo(buyer, 500187); // Your order cannot be fulfilled, please try again.

      if (validBuy.Count == 0)
        return false;

      bought = buyer.AccessLevel >= AccessLevel.GameMaster;

      Container cont = buyer.Backpack;
      if (!bought && cont != null)
      {
        if (cont.ConsumeTotal(typeof(Gold), totalCost))
          bought = true;
        else if (totalCost < 2000)
          SayTo(buyer, 500192); // Begging thy pardon, but thou canst not afford that.
      }

      if (!bought && totalCost >= 2000)
      {
        cont = buyer.FindBankNoCreate();
        if (cont?.ConsumeTotal(typeof(Gold), totalCost) == true)
        {
          bought = true;
          fromBank = true;
        }
        else
        {
          SayTo(buyer, 500191); //Begging thy pardon, but thy bank account lacks these funds.
        }
      }

      if (!bought)
        return false;

      buyer.PlaySound(0x32);

      cont = buyer.Backpack ?? buyer.BankBox;

      foreach (BuyItemResponse buy in validBuy)
      {
        Serial ser = buy.Serial;
        int amount = buy.Amount;

        if (amount < 1)
          continue;

        if (ser.IsItem)
        {
          Item item = World.FindItem(ser);

          if (item == null)
            continue;

          GenericBuyInfo gbi = LookupDisplayObject(item);

          if (gbi != null)
          {
            ProcessValidPurchase(amount, gbi, buyer, cont);
          }
          else
          {
            if (amount > item.Amount)
              amount = item.Amount;

            foreach (IShopSellInfo ssi in info)
              if (ssi.IsSellable(item))
                if (ssi.IsResellable(item))
                {
                  Item buyItem;
                  if (amount >= item.Amount)
                  {
                    buyItem = item;
                  }
                  else
                  {
                    buyItem = LiftItemDupe(item, item.Amount - amount) ?? item;
                  }

                  if (cont == null || !cont.TryDropItem(buyer, buyItem, false))
                    buyItem.MoveToWorld(buyer.Location, buyer.Map);

                  break;
                }
          }
        }
        else if (ser.IsMobile)
        {
          Mobile mob = World.FindMobile(ser);

          if (mob == null)
            continue;

          GenericBuyInfo gbi = LookupDisplayObject(mob);

          if (gbi != null)
            ProcessValidPurchase(amount, gbi, buyer, cont);
        }
      } //foreach

      if (fullPurchase)
      {
        if (buyer.AccessLevel >= AccessLevel.GameMaster)
          SayTo(buyer, true, "I would not presume to charge thee anything.  Here are the goods you requested.");
        else if (fromBank)
          SayTo(buyer, 1151638,
            totalCost
              .ToString()); //The total of your purchase is ~1_val~ gold, which has been drawn from your bank account.  My thanks for the patronage.
        else
          SayTo(buyer, 1151639,
            totalCost.ToString()); //The total of your purchase is ~1_val~ gold.  My thanks for the patronage.
      }
      else
      {
        if (buyer.AccessLevel >= AccessLevel.GameMaster)
          SayTo(buyer, true,
            "I would not presume to charge thee anything.  Unfortunately, I could not sell you all the goods you requested.");
        else if (fromBank)
          SayTo(buyer, true,
            "The total of thy purchase is {0} gold, which has been withdrawn from your bank account.  My thanks for the patronage.  Unfortunately, I could not sell you all the goods you requested.",
            totalCost);
        else
          SayTo(buyer, true,
            "The total of thy purchase is {0} gold.  My thanks for the patronage.  Unfortunately, I could not sell you all the goods you requested.",
            totalCost);
      }

      return true;
    }

    public virtual bool OnSellItems(Mobile seller, List<SellItemResponse> list)
    {
      if (!IsActiveBuyer)
        return false;

      if (!seller.CheckAlive())
        return false;

      if (!CheckVendorAccess(seller))
      {
        Say(501522); // I shall not treat with scum like thee!
        return false;
      }

      seller.PlaySound(0x32);

      IShopSellInfo[] info = GetSellInfo();
      IBuyItemInfo[] buyInfo = GetBuyInfo();
      int GiveGold = 0;
      int Sold = 0;

      foreach (SellItemResponse resp in list)
      {
        if (resp.Item.RootParent != seller || resp.Amount <= 0 || !resp.Item.IsStandardLoot() ||
            !resp.Item.Movable || resp.Item is Container container && container.Items.Count != 0)
          continue;

        foreach (IShopSellInfo ssi in info)
          if (ssi.IsSellable(resp.Item))
          {
            Sold++;
            break;
          }
      }

      if (Sold > MaxSell)
      {
        SayTo(seller, true, "You may only sell {0} items at a time!", MaxSell);
        return false;
      }

      if (Sold == 0) return true;

      foreach (SellItemResponse resp in list)
      {
        if (resp.Item.RootParent != seller || resp.Amount <= 0 || !resp.Item.IsStandardLoot() ||
            !resp.Item.Movable || resp.Item is Container container && container.Items.Count != 0)
          continue;

        foreach (IShopSellInfo ssi in info)
          if (ssi.IsSellable(resp.Item))
          {
            int amount = resp.Amount;

            if (amount > resp.Item.Amount)
              amount = resp.Item.Amount;

            if (ssi.IsResellable(resp.Item))
            {
              bool found = false;

              foreach (IBuyItemInfo bii in buyInfo)
                if (bii.Restock(resp.Item, amount))
                {
                  resp.Item.Consume(amount);
                  found = true;

                  break;
                }

              if (!found)
              {
                Container cont = BuyPack;

                if (amount < resp.Item.Amount)
                {
                  Item item = LiftItemDupe(resp.Item, resp.Item.Amount - amount);

                  if (item != null)
                  {
                    item.SetLastMoved();
                    cont.DropItem(item);
                  }
                  else
                  {
                    resp.Item.SetLastMoved();
                    cont.DropItem(resp.Item);
                  }
                }
                else
                {
                  resp.Item.SetLastMoved();
                  cont.DropItem(resp.Item);
                }
              }
            }
            else
            {
              if (amount < resp.Item.Amount)
                resp.Item.Amount -= amount;
              else
                resp.Item.Delete();
            }

            GiveGold += ssi.GetSellPriceFor(resp.Item) * amount;
            break;
          }
      }

      if (GiveGold > 0)
      {
        while (GiveGold > 60000)
        {
          seller.AddToBackpack(new Gold(60000));
          GiveGold -= 60000;
        }

        seller.AddToBackpack(new Gold(GiveGold));

        seller.PlaySound(0x0037); //Gold dropping sound

        if (SupportsBulkOrders(seller))
        {
          Item bulkOrder = CreateBulkOrder(seller, false);

          if (bulkOrder is LargeBOD largeBod)
            seller.SendGump(new LargeBODAcceptGump(seller, largeBod));
          else if (bulkOrder is SmallBOD smallBod)
            seller.SendGump(new SmallBODAcceptGump(seller, smallBod));
        }
      }
      //no cliloc for this?
      //SayTo( seller, true, "Thank you! I bought {0} item{1}. Here is your {2}gp.", Sold, (Sold > 1 ? "s" : ""), GiveGold );

      return true;
    }

    public virtual bool IsValidBulkOrder(Item item)
    {
      return false;
    }

    public virtual Item CreateBulkOrder(Mobile from, bool fromContextMenu)
    {
      return null;
    }

    public virtual bool SupportsBulkOrders(Mobile from)
    {
      return false;
    }

    public virtual TimeSpan GetNextBulkOrder(Mobile from)
    {
      return TimeSpan.Zero;
    }

    public virtual void OnSuccessfulBulkOrderReceive(Mobile from)
    {
    }

    public abstract void InitSBInfo();

    protected void LoadSBInfo()
    {
      LastRestock = DateTime.UtcNow;

      for (int i = 0; i < m_ArmorBuyInfo.Count; ++i)
        if (m_ArmorBuyInfo[i] is GenericBuyInfo buy)
          buy.DeleteDisplayEntity();

      SBInfos.Clear();

      InitSBInfo();

      m_ArmorBuyInfo.Clear();
      m_ArmorSellInfo.Clear();

      for (int i = 0; i < SBInfos.Count; i++)
      {
        SBInfo sbInfo = SBInfos[i];
        m_ArmorBuyInfo.AddRange(sbInfo.BuyInfo);
        m_ArmorSellInfo.Add(sbInfo.SellInfo);
      }
    }

    public virtual bool GetGender()
    {
      return Utility.RandomBool();
    }

    public virtual void InitBody()
    {
      InitStats(100, 100, 25);

      SpeechHue = Utility.RandomDyedHue();
      Hue = Race.Human.RandomSkinHue();

      if (Female = GetGender())
      {
        Body = 0x191;
        Name = NameList.RandomName("female");
      }
      else
      {
        Body = 0x190;
        Name = NameList.RandomName("male");
      }
    }

    public virtual int GetRandomHue()
    {
      switch (Utility.Random(5))
      {
        default:
        case 0: return Utility.RandomBlueHue();
        case 1: return Utility.RandomGreenHue();
        case 2: return Utility.RandomRedHue();
        case 3: return Utility.RandomYellowHue();
        case 4: return Utility.RandomNeutralHue();
      }
    }

    public virtual int GetShoeHue()
    {
      return 0.1 > Utility.RandomDouble() ? 0 : Utility.RandomNeutralHue();
    }

    public virtual void CheckMorph()
    {
      if (CheckGargoyle())
        return;

      if (CheckNecromancer())
        return;

      CheckTokuno();
    }

    public virtual bool CheckTokuno()
    {
      if (Map != Map.Tokuno)
        return false;

      NameList n = NameList.GetNameList(Female ? "tokuno female" : "tokuno male");

      if (!n.ContainsName(Name))
        TurnToTokuno();

      return true;
    }

    public virtual void TurnToTokuno()
    {
      Name = NameList.RandomName(Female ? "tokuno female" : "tokuno male");
    }

    public virtual bool CheckGargoyle()
    {
      Map map = Map;

      if (map != Map.Ilshenar)
        return false;

      if (!Region.IsPartOf("Gargoyle City"))
        return false;

      if (Body != 0x2F6 || (Hue & 0x8000) == 0)
        TurnToGargoyle();

      return true;
    }

    public virtual bool CheckNecromancer()
    {
      Map map = Map;

      if (map != Map.Malas)
        return false;

      if (!Region.IsPartOf("Umbra"))
        return false;

      if (Hue != 0x83E8)
        TurnToNecromancer();

      return true;
    }

    public override void OnAfterSpawn()
    {
      CheckMorph();
    }

    protected override void OnMapChange(Map oldMap)
    {
      base.OnMapChange(oldMap);

      CheckMorph();

      LoadSBInfo();
    }

    public virtual int GetRandomNecromancerHue()
    {
      switch (Utility.Random(20))
      {
        case 0: return 0;
        case 1: return 0x4E9;
        default: return Utility.RandomList(0x485, 0x497);
      }
    }

    public virtual void TurnToNecromancer()
    {
      for (int i = 0; i < Items.Count; ++i)
      {
        Item item = Items[i];
        if (item is BaseClothing || item is BaseWeapon || item is BaseArmor || item is BaseTool)
          item.Hue = GetRandomNecromancerHue();
      }

      HairHue = 0;
      FacialHairHue = 0;

      Hue = 0x83E8;
    }

    public virtual void TurnToGargoyle()
    {
      for (int i = 0; i < Items.Count; ++i)
      {
        Item item = Items[i];

        if (item is BaseClothing)
          item.Delete();
      }

      HairItemID = 0;
      FacialHairItemID = 0;

      Body = 0x2F6;
      Hue = Utility.RandomBrightHue() | 0x8000;
      Name = NameList.RandomName("gargoyle vendor");

      CapitalizeTitle();
    }

    public virtual void CapitalizeTitle()
    {
      string title = Title;

      if (title == null)
        return;

      string[] split = title.Split(' ');

      for (int i = 0; i < split.Length; ++i)
      {
        if (Insensitive.Equals(split[i], "the"))
          continue;

        if (split[i].Length > 1)
          split[i] = char.ToUpper(split[i][0]) + split[i].Substring(1);
        else if (split[i].Length > 0)
          split[i] = char.ToUpper(split[i][0]).ToString();
      }

      Title = string.Join(" ", split);
    }

    public virtual int GetHairHue()
    {
      return Race.RandomHairHue();
    }

    public virtual void InitOutfit()
    {
      switch (Utility.Random(3))
      {
        case 0:
          AddItem(new FancyShirt(GetRandomHue()));
          break;
        case 1:
          AddItem(new Doublet(GetRandomHue()));
          break;
        case 2:
          AddItem(new Shirt(GetRandomHue()));
          break;
      }

      switch (ShoeType)
      {
        case VendorShoeType.Shoes:
          AddItem(new Shoes(GetShoeHue()));
          break;
        case VendorShoeType.Boots:
          AddItem(new Boots(GetShoeHue()));
          break;
        case VendorShoeType.Sandals:
          AddItem(new Sandals(GetShoeHue()));
          break;
        case VendorShoeType.ThighBoots:
          AddItem(new ThighBoots(GetShoeHue()));
          break;
      }

      int hairHue = GetHairHue();

      Utility.AssignRandomHair(this, hairHue);
      Utility.AssignRandomFacialHair(this, hairHue);

      if (Female)
        switch (Utility.Random(6))
        {
          case 0:
            AddItem(new ShortPants(GetRandomHue()));
            break;
          case 1:
          case 2:
            AddItem(new Kilt(GetRandomHue()));
            break;
          case 3:
          case 4:
          case 5:
            AddItem(new Skirt(GetRandomHue()));
            break;
        }
      else
        switch (Utility.Random(2))
        {
          case 0:
            AddItem(new LongPants(GetRandomHue()));
            break;
          case 1:
            AddItem(new ShortPants(GetRandomHue()));
            break;
        }

      PackGold(100, 200);
    }

    public virtual void VendorBuy(Mobile from)
    {
      if (!IsActiveSeller)
        return;

      if (!from.CheckAlive())
        return;

      if (!CheckVendorAccess(from))
      {
        Say(501522); // I shall not treat with scum like thee!
        return;
      }

      if (DateTime.UtcNow - LastRestock > RestockDelay)
        Restock();

      UpdateBuyInfo();

      IBuyItemInfo[] buyInfo = GetBuyInfo();
      IShopSellInfo[] sellInfo = GetSellInfo();

      List<BuyItemState> list = new List<BuyItemState>(buyInfo.Length);
      Container cont = BuyPack;

      List<ObjectPropertyList> opls = new List<ObjectPropertyList>();

      for (int idx = 0; idx < buyInfo.Length; idx++)
      {
        IBuyItemInfo buyItem = buyInfo[idx];

        if (buyItem.Amount <= 0 || list.Count >= 250)
          continue;

        if (!(buyItem is GenericBuyInfo gbi))
          return;

        IEntity disp = gbi.GetDisplayEntity();

        list.Add(new BuyItemState(buyItem.Name, cont.Serial, disp?.Serial ?? (Serial)0x7FC0FFEE, buyItem.Price,
          buyItem.Amount, buyItem.ItemID, buyItem.Hue));

        if (disp is Item item)
          opls.Add(item.PropertyList);
        else if (disp is Mobile mobile)
          opls.Add(mobile.PropertyList);
      }

      List<Item> playerItems = cont.Items;

      for (int i = playerItems.Count - 1; i >= 0; --i)
      {
        if (i >= playerItems.Count)
          continue;

        Item item = playerItems[i];

        if (item.LastMoved + InventoryDecayTime <= DateTime.UtcNow)
          item.Delete();
      }

      for (int i = 0; i < playerItems.Count; ++i)
      {
        Item item = playerItems[i];

        int price = 0;
        string name = null;

        foreach (IShopSellInfo ssi in sellInfo)
          if (ssi.IsSellable(item))
          {
            price = ssi.GetBuyPriceFor(item);
            name = ssi.GetNameFor(item);
            break;
          }

        if (name != null && list.Count < 250)
        {
          list.Add(new BuyItemState(name, cont.Serial, item.Serial, price, item.Amount, item.ItemID, item.Hue));
          opls.Add(item.PropertyList);
        }
      }

      //one (not all) of the packets uses a byte to describe number of items in the list.  Osi = dumb.
      //if ( list.Count > 255 )
      //	Console.WriteLine( "Vendor Warning: Vendor {0} has more than 255 buy items, may cause client errors!", this );

      if (list.Count <= 0)
        return;

      list.Sort(new BuyItemStateComparer());

      SendPacksTo(from);

      NetState ns = from.NetState;

      if (ns == null)
        return;

      if (ns.ContainerGridLines)
        from.Send(new VendorBuyContent6017(list));
      else
        from.Send(new VendorBuyContent(list));

      from.Send(new VendorBuyList(this, list));

      if (ns.HighSeas)
        from.Send(new DisplayBuyListHS(this));
      else
        from.Send(new DisplayBuyList(this));

      from.Send(new MobileStatusExtended(from)); //make sure their gold amount is sent

      for (int i = 0; i < opls.Count; ++i)
        from.Send(opls[i]);

      SayTo(from, 500186); // Greetings.  Have a look around.
    }

    public virtual void SendPacksTo(Mobile from)
    {
      Item pack = FindItemOnLayer(Layer.ShopBuy);

      if (pack == null)
      {
        pack = new Backpack { Layer = Layer.ShopBuy, Movable = false, Visible = false };
        AddItem(pack);
      }

      from.Send(new EquipUpdate(pack));

      pack = FindItemOnLayer(Layer.ShopSell);

      if (pack != null)
        from.Send(new EquipUpdate(pack));

      pack = FindItemOnLayer(Layer.ShopResale);

      if (pack == null)
      {
        pack = new Backpack { Layer = Layer.ShopResale, Movable = false, Visible = false };
        AddItem(pack);
      }

      from.Send(new EquipUpdate(pack));
    }

    public virtual void VendorSell(Mobile from)
    {
      if (!IsActiveBuyer)
        return;

      if (!from.CheckAlive())
        return;

      if (!CheckVendorAccess(from))
      {
        Say(501522); // I shall not treat with scum like thee!
        return;
      }

      Container pack = from.Backpack;

      if (pack == null)
        return;

      IShopSellInfo[] info = GetSellInfo();

      List<SellItemState> list = new List<SellItemState>();

      foreach (IShopSellInfo ssi in info)
      {
        foreach (Item item in pack.FindItemsByType(ssi.Types))
        {
          if (item is Container container && container.Items.Count != 0)
            continue;

          if (item.IsStandardLoot() && item.Movable && ssi.IsSellable(item))
            list.Add(new SellItemState(item, ssi.GetSellPriceFor(item), ssi.GetNameFor(item)));
        }
      }

      if (list.Count > 0)
      {
        SendPacksTo(from);

        from.Send(new VendorSellList(this, list));
      }
      else
      {
        Say(true, "You have nothing I would be interested in.");
      }
    }

    public override bool OnDragDrop(Mobile from, Item dropped)
    {
      /* TODO: Thou art giving me? and fame/karma for gold gifts */

      SmallBOD smallBod = dropped as SmallBOD;
      LargeBOD largeBod = dropped as LargeBOD;

      if (!(smallBod != null || largeBod != null))
        return base.OnDragDrop(from, dropped);

      PlayerMobile pm = from as PlayerMobile;

      if (Core.ML && pm?.NextBODTurnInTime > DateTime.UtcNow)
      {
        SayTo(from, 1079976); // You'll have to wait a few seconds while I inspect the last order.
        return false;
      }

      if (!IsValidBulkOrder(dropped))
      {
        SayTo(from, 1045130); // That order is for some other shopkeeper.
        return false;
      }

      if (smallBod?.Complete == false || largeBod?.Complete == false)
      {
        SayTo(from, 1045131); // You have not completed the order yet.
        return false;
      }

      Item reward;
      int gold, fame;

      if (smallBod != null)
        smallBod.GetRewards(out reward, out gold, out fame);
      else
        largeBod.GetRewards(out reward, out gold, out fame);

      from.SendSound(0x3D);

      SayTo(from, 1045132); // Thank you so much!  Here is a reward for your effort.

      if (reward != null)
        from.AddToBackpack(reward);

      if (gold > 1000)
        from.AddToBackpack(new BankCheck(gold));
      else if (gold > 0)
        from.AddToBackpack(new Gold(gold));

      Titles.AwardFame(from, fame, true);

      OnSuccessfulBulkOrderReceive(from);

      if (Core.ML && pm != null)
        pm.NextBODTurnInTime = DateTime.UtcNow + TimeSpan.FromSeconds(10.0);

      dropped.Delete();
      return true;
    }

    private GenericBuyInfo LookupDisplayObject(object obj)
    {
      IBuyItemInfo[] buyInfo = GetBuyInfo();

      for (int i = 0; i < buyInfo.Length; ++i)
      {
        if (buyInfo[i] is GenericBuyInfo gbi && gbi.GetDisplayEntity() == obj)
          return gbi;
      }

      return null;
    }

    private void ProcessSinglePurchase(BuyItemResponse buy, IBuyItemInfo bii, List<BuyItemResponse> validBuy,
      ref int controlSlots, ref bool fullPurchase, ref int totalCost)
    {
      int amount = buy.Amount;

      if (amount > bii.Amount)
        amount = bii.Amount;

      if (amount <= 0)
        return;

      int slots = bii.ControlSlots * amount;

      if (controlSlots >= slots)
      {
        controlSlots -= slots;
      }
      else
      {
        fullPurchase = false;
        return;
      }

      totalCost += bii.Price * amount;
      validBuy.Add(buy);
    }

    private void ProcessValidPurchase(int amount, IBuyItemInfo bii, Mobile buyer, Container cont)
    {
      if (amount > bii.Amount)
        amount = bii.Amount;

      if (amount < 1)
        return;

      bii.Amount -= amount;

      IEntity o = bii.GetEntity();

      if (o is Item item)
      {
        if (item.Stackable)
        {
          item.Amount = amount;

          if (cont == null || !cont.TryDropItem(buyer, item, false))
            item.MoveToWorld(buyer.Location, buyer.Map);
        }
        else
        {
          item.Amount = 1;

          if (cont == null || !cont.TryDropItem(buyer, item, false))
            item.MoveToWorld(buyer.Location, buyer.Map);

          for (int i = 1; i < amount; i++)
          {
            if (bii.GetEntity() is Item newItem)
            {
              newItem.Amount = 1;

              if (cont == null || !cont.TryDropItem(buyer, newItem, false))
                newItem.MoveToWorld(buyer.Location, buyer.Map);
            }
          }
        }
      }
      else if (o is Mobile m)
      {
        m.Direction = (Direction)Utility.Random(8);
        m.MoveToWorld(buyer.Location, buyer.Map);
        m.PlaySound(m.GetIdleSound());

        if (m is BaseCreature bc)
        {
          bc.SetControlMaster(buyer);
          bc.ControlOrder = OrderType.Stop;
        }

        for (int i = 1; i < amount; ++i)
        {
          if (bii.GetEntity() is Mobile newMobile)
          {
            newMobile.Direction = (Direction)Utility.Random(8);
            newMobile.MoveToWorld(buyer.Location, buyer.Map);

            if (newMobile is BaseCreature newBc)
            {
              newBc.SetControlMaster(buyer);
              newBc.ControlOrder = OrderType.Stop;
            }
          }
        }
      }
    }

    public virtual bool CheckVendorAccess(Mobile from)
    {
      return Region.GetRegion<GuardedRegion>()?.CheckVendorAccess(this, from) != false ||
             Region != from.Region && from.Region.GetRegion<GuardedRegion>()?.CheckVendorAccess(this, from) != false;
    }

    public override void Serialize(GenericWriter writer)
    {
      base.Serialize(writer);

      writer.Write(1); // version

      List<SBInfo> sbInfos = SBInfos;

      for (int i = 0; sbInfos != null && i < sbInfos.Count; ++i)
      {
        SBInfo sbInfo = sbInfos[i];
        List<GenericBuyInfo> buyInfo = sbInfo.BuyInfo;

        for (int j = 0; buyInfo != null && j < buyInfo.Count; ++j)
        {
          GenericBuyInfo gbi = buyInfo[j];

          int maxAmount = gbi.MaxAmount;
          int doubled = 0;

          switch (maxAmount)
          {
            case 40:
              doubled = 1;
              break;
            case 80:
              doubled = 2;
              break;
            case 160:
              doubled = 3;
              break;
            case 320:
              doubled = 4;
              break;
            case 640:
              doubled = 5;
              break;
            case 999:
              doubled = 6;
              break;
          }

          if (doubled > 0)
          {
            writer.WriteEncodedInt(1 + j * sbInfos.Count + i);
            writer.WriteEncodedInt(doubled);
          }
        }
      }

      writer.WriteEncodedInt(0);
    }

    public override void Deserialize(GenericReader reader)
    {
      base.Deserialize(reader);

      int version = reader.ReadInt();

      LoadSBInfo();

      List<SBInfo> sbInfos = SBInfos;

      switch (version)
      {
        case 1:
        {
          int index;

          while ((index = reader.ReadEncodedInt()) > 0)
          {
            int doubled = reader.ReadEncodedInt();

            if (sbInfos != null)
            {
              index -= 1;
              int sbInfoIndex = index % sbInfos.Count;
              int buyInfoIndex = index / sbInfos.Count;

              if (sbInfoIndex >= 0 && sbInfoIndex < sbInfos.Count)
              {
                SBInfo sbInfo = sbInfos[sbInfoIndex];
                List<GenericBuyInfo> buyInfo = sbInfo.BuyInfo;

                if (buyInfo != null && buyInfoIndex >= 0 && buyInfoIndex < buyInfo.Count)
                {
                  GenericBuyInfo gbi = buyInfo[buyInfoIndex];

                  int amount = 20;

                  switch (doubled)
                  {
                    case 1:
                      amount = 40;
                      break;
                    case 2:
                      amount = 80;
                      break;
                    case 3:
                      amount = 160;
                      break;
                    case 4:
                      amount = 320;
                      break;
                    case 5:
                      amount = 640;
                      break;
                    case 6:
                      amount = 999;
                      break;
                  }

                  gbi.Amount = gbi.MaxAmount = amount;
                }
              }
            }
          }

          break;
        }
      }

      if (IsParagon)
        IsParagon = false;

      Timer.DelayCall(TimeSpan.Zero, CheckMorph);
    }

    public override void AddCustomContextEntries(Mobile from, List<ContextMenuEntry> list)
    {
      if (from.Alive && IsActiveVendor)
      {
        if (SupportsBulkOrders(from))
          list.Add(new BulkOrderInfoEntry(from, this));

        if (IsActiveSeller)
          list.Add(new VendorBuyEntry(from, this));

        if (IsActiveBuyer)
          list.Add(new VendorSellEntry(from, this));
      }

      base.AddCustomContextEntries(from, list);
    }

    public virtual IShopSellInfo[] GetSellInfo()
    {
      return m_ArmorSellInfo.ToArray();
    }

    public virtual IBuyItemInfo[] GetBuyInfo()
    {
      return m_ArmorBuyInfo.ToArray();
    }

    private class BulkOrderInfoEntry : ContextMenuEntry
    {
      private Mobile m_From;
      private BaseVendor m_Vendor;

      public BulkOrderInfoEntry(Mobile from, BaseVendor vendor)
        : base(6152)
      {
        m_From = from;
        m_Vendor = vendor;
      }

      public override void OnClick()
      {
        if (m_Vendor.SupportsBulkOrders(m_From))
        {
          TimeSpan ts = m_Vendor.GetNextBulkOrder(m_From);

          int totalSeconds = (int)ts.TotalSeconds;
          int totalHours = (totalSeconds + 3599) / 3600;
          int totalMinutes = (totalSeconds + 59) / 60;

          if (Core.SE ? totalMinutes == 0 : totalHours == 0)
          {
            m_From.SendLocalizedMessage(1049038); // You can get an order now.

            if (Core.AOS)
            {
              Item bulkOrder = m_Vendor.CreateBulkOrder(m_From, true);

              if (bulkOrder is LargeBOD bod)
                m_From.SendGump(new LargeBODAcceptGump(m_From, bod));
              else if (bulkOrder is SmallBOD smallBod)
                m_From.SendGump(new SmallBODAcceptGump(m_From, smallBod));
            }
          }
          else
          {
            int oldSpeechHue = m_Vendor.SpeechHue;
            m_Vendor.SpeechHue = 0x3B2;

            if (Core.SE)
              m_Vendor.SayTo(m_From, 1072058,
                totalMinutes.ToString()); // An offer may be available in about ~1_minutes~ minutes.
            else
              m_Vendor.SayTo(m_From, 1049039,
                totalHours.ToString()); // An offer may be available in about ~1_hours~ hours.

            m_Vendor.SpeechHue = oldSpeechHue;
          }
        }
      }
    }

    #region Faction

    public virtual int GetPriceScalar()
    {
      return 100 + Town.FromRegion(Region)?.Tax ?? 0;
    }

    public void UpdateBuyInfo()
    {
      int priceScalar = GetPriceScalar();

      foreach (IBuyItemInfo info in m_ArmorBuyInfo.ToArray())
        info.PriceScalar = priceScalar;
    }

    #endregion
  }
}

namespace Server.ContextMenus
{
  public class VendorBuyEntry : ContextMenuEntry
  {
    private BaseVendor m_Vendor;

    public VendorBuyEntry(Mobile from, BaseVendor vendor)
      : base(6103, 8)
    {
      m_Vendor = vendor;
      Enabled = vendor.CheckVendorAccess(from);
    }

    public override void OnClick()
    {
      m_Vendor.VendorBuy(Owner.From);
    }
  }

  public class VendorSellEntry : ContextMenuEntry
  {
    private BaseVendor m_Vendor;

    public VendorSellEntry(Mobile from, BaseVendor vendor)
      : base(6104, 8)
    {
      m_Vendor = vendor;
      Enabled = vendor.CheckVendorAccess(from);
    }

    public override void OnClick()
    {
      m_Vendor.VendorSell(Owner.From);
    }
  }
}

namespace Server
{
  public interface IShopSellInfo
  {
    //What do we sell?
    Type[] Types{ get; }

    //get display name for an item
    string GetNameFor(Item item);

    //get price for an item which the player is selling
    int GetSellPriceFor(Item item);

    //get price for an item which the player is buying
    int GetBuyPriceFor(Item item);

    //can we sell this item to this vendor?
    bool IsSellable(Item item);

    //does the vendor resell this item?
    bool IsResellable(Item item);
  }

  public interface IBuyItemInfo
  {
    int ControlSlots{ get; }

    int PriceScalar{ get; set; }

    //display price of the item
    int Price{ get; }

    //display name of the item
    string Name{ get; }

    //display hue
    int Hue{ get; }

    //display id
    int ItemID{ get; }

    //amount in stock
    int Amount{ get; set; }

    //max amount in stock
    int MaxAmount{ get; }

    //get a new instance of an object (we just bought it)
    IEntity GetEntity();

    //Attempt to restock with item, (return true if restock successful)
    bool Restock(Item item, int amount);

    //called when its time for the whole shop to restock
    void OnRestock();
  }
}