using Server.Engines.VeteranRewards;
using Server.Gumps;
using Server.Mobiles;
using Server.Network;
using Server.Targeting;

namespace Server.Items
{
  public class WeaponEngravingTool : Item, IUsesRemaining, IRewardItem
  {
    private bool m_IsRewardItem;

    private int m_UsesRemaining;

    [Constructible]
    public WeaponEngravingTool() : this(10)
    {
    }

    [Constructible]
    public WeaponEngravingTool(int uses) : base(0x32F8)
    {
      LootType = LootType.Blessed;
      Weight = 1.0;

      m_UsesRemaining = uses;
    }

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

    public override int LabelNumber => 1076158; // Weapon Engraving Tool

    [CommandProperty(AccessLevel.GameMaster)]
    public bool IsRewardItem
    {
      get => m_IsRewardItem;
      set
      {
        m_IsRewardItem = value;
        InvalidateProperties();
      }
    }

    [CommandProperty(AccessLevel.GameMaster)]
    public int UsesRemaining
    {
      get => m_UsesRemaining;
      set
      {
        m_UsesRemaining = value;
        InvalidateProperties();
      }
    }

    public virtual bool ShowUsesRemaining
    {
      get => true;
      set { }
    }

    public override void OnDoubleClick(Mobile from)
    {
      if (m_IsRewardItem && !RewardSystem.CheckIsUsableBy(from, this, null))
        return;

      if (m_UsesRemaining > 0)
      {
        from.SendLocalizedMessage(1072357); // Select an object to engrave.
        from.Target = new TargetWeapon(this);
      }
      else
      {
        if (from.Skills.Tinkering.Value == 0)
        {
          from.SendLocalizedMessage(
            1076179); // Since you have no tinkering skill, you will need to find an NPC tinkerer to repair this for you.
        }
        else if (from.Skills.Tinkering.Value < 75.0)
        {
          from.SendLocalizedMessage(
            1076178); // Your tinkering skill is too low to fix this yourself.  An NPC tinkerer can help you repair this for a fee.
        }
        else
        {
          Item diamond = from.Backpack.FindItemByType(typeof(BlueDiamond));

          if (diamond != null)
            from.SendGump(new ConfirmGump(this, null));
          else
            from.SendLocalizedMessage(
              1076166); // You do not have a blue diamond needed to recharge the engraving tool.
        }

        from.SendLocalizedMessage(1076163); // There are no charges left on this engraving tool.
      }
    }

    public override void GetProperties(ObjectPropertyList list)
    {
      base.GetProperties(list);

      if (m_IsRewardItem)
        list.Add(1076224); // 8th Year Veteran Reward

      if (ShowUsesRemaining)
        list.Add(1060584, m_UsesRemaining.ToString()); // uses remaining: ~1_val~
    }

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

      writer.Write(0); // version

      writer.Write(m_UsesRemaining);
      writer.Write(m_IsRewardItem);
    }

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

      int version = reader.ReadInt();

      m_UsesRemaining = reader.ReadInt();
      m_IsRewardItem = reader.ReadBool();
    }

    public virtual void Recharge(Mobile from, Mobile guildmaster)
    {
      if (from.Backpack != null)
      {
        Item diamond = from.Backpack.FindItemByType(typeof(BlueDiamond));

        if (guildmaster != null)
        {
          if (m_UsesRemaining <= 0)
          {
            if (diamond != null && Banker.Withdraw(from, 100000))
            {
              diamond.Consume();
              UsesRemaining = 10;
              guildmaster.Say(1076165); // Your weapon engraver should be good as new!
            }
            else
            {
              guildmaster.Say(
                1076167); // You need a 100,000 gold and a blue diamond to recharge the weapon engraver.
            }
          }
          else
          {
            guildmaster.Say(
              1076164); // I can only help with this if you are carrying an engraving tool that needs repair.
          }
        }
        else
        {
          if (from.Skills.Tinkering.Value == 0)
          {
            from.SendLocalizedMessage(
              1076179); // Since you have no tinkering skill, you will need to find an NPC tinkerer to repair this for you.
          }
          else if (from.Skills.Tinkering.Value < 75.0)
          {
            from.SendLocalizedMessage(
              1076178); // Your tinkering skill is too low to fix this yourself.  An NPC tinkerer can help you repair this for a fee.
          }
          else if (diamond != null)
          {
            diamond.Consume();

            if (Utility.RandomDouble() < from.Skills.Tinkering.Value / 100)
            {
              UsesRemaining = 10;
              from.SendLocalizedMessage(1076165); // Your weapon engraver should be good as new! ?????
            }
            else
            {
              from.SendLocalizedMessage(
                1076175); // You cracked the diamond attempting to fix the weapon engraver.
            }
          }
          else
          {
            from.SendLocalizedMessage(
              1076166); // You do not have a blue diamond needed to recharge the engraving tool.
          }
        }
      }
    }

    public static WeaponEngravingTool Find(Mobile from)
    {
      return from.Backpack?.FindItemByType(typeof(WeaponEngravingTool)) as WeaponEngravingTool;
    }

    private class TargetWeapon : Target
    {
      private WeaponEngravingTool m_Tool;

      public TargetWeapon(WeaponEngravingTool tool) : base(-1, true, TargetFlags.None)
      {
        m_Tool = tool;
      }

      protected override void OnTarget(Mobile from, object targeted)
      {
        if (m_Tool == null || m_Tool.Deleted)
          return;

        if (targeted is BaseWeapon item)
        {
          from.CloseGump(typeof(InternalGump));
          from.SendGump(new InternalGump(m_Tool, item));
        }
        else
        {
          from.SendLocalizedMessage(1072309); // The selected item cannot be engraved by this engraving tool.
        }
      }
    }

    private class InternalGump : Gump
    {
      private BaseWeapon m_Target;
      private WeaponEngravingTool m_Tool;

      public InternalGump(WeaponEngravingTool tool, BaseWeapon target) : base(0, 0)
      {
        m_Tool = tool;
        m_Target = target;

        Closable = true;
        Disposable = true;
        Dragable = true;
        Resizable = false;

        AddBackground(50, 50, 400, 300, 0xA28);

        AddPage(0);

        AddHtmlLocalized(50, 70, 400, 20, 1072359, 0x0, false, false); // <CENTER>Engraving Tool</CENTER>
        AddHtmlLocalized(75, 95, 350, 145, 1076229, 0x0, true,
          true); // Please enter the text to add to the selected object. Leave the text area blank to remove any existing text.  Removing text does not use a charge.
        AddButton(125, 300, 0x81A, 0x81B, (int)Buttons.Okay, GumpButtonType.Reply, 0);
        AddButton(320, 300, 0x819, 0x818, (int)Buttons.Cancel, GumpButtonType.Reply, 0);
        AddImageTiled(75, 245, 350, 40, 0xDB0);
        AddImageTiled(76, 245, 350, 2, 0x23C5);
        AddImageTiled(75, 245, 2, 40, 0x23C3);
        AddImageTiled(75, 285, 350, 2, 0x23C5);
        AddImageTiled(425, 245, 2, 42, 0x23C3);

        AddTextEntry(75, 245, 350, 40, 0x0, (int)Buttons.Text, "");
      }

      public override void OnResponse(NetState state, RelayInfo info)
      {
        if (m_Tool == null || m_Tool.Deleted || m_Target == null || m_Target.Deleted)
          return;

        if (info.ButtonID == (int)Buttons.Okay)
        {
          TextRelay relay = info.GetTextEntry((int)Buttons.Text);

          if (relay != null)
          {
            if (string.IsNullOrEmpty(relay.Text))
            {
              m_Target.EngravedText = null;
              state.Mobile.SendLocalizedMessage(1072362); // You remove the engraving from the object.
            }
            else
            {
              if (relay.Text.Length > 64)
                m_Target.EngravedText = Utility.FixHtml(relay.Text.Substring(0, 64));
              else
                m_Target.EngravedText = Utility.FixHtml(relay.Text);

              state.Mobile.SendLocalizedMessage(1072361); // You engraved the object.
              m_Target.InvalidateProperties();
              m_Tool.UsesRemaining -= 1;
              m_Tool.InvalidateProperties();
            }
          }
        }
        else
        {
          state.Mobile.SendLocalizedMessage(1072363); // The object was not engraved.
        }
      }

      private enum Buttons
      {
        Cancel,
        Okay,
        Text
      }
    }

    public class ConfirmGump : Gump
    {
      private WeaponEngravingTool m_Engraver;
      private Mobile m_Guildmaster;

      public ConfirmGump(WeaponEngravingTool engraver, Mobile guildmaster) : base(200, 200)
      {
        m_Engraver = engraver;
        m_Guildmaster = guildmaster;

        Closable = false;
        Disposable = true;
        Dragable = true;
        Resizable = false;

        AddPage(0);

        AddBackground(0, 0, 291, 133, 0x13BE);
        AddImageTiled(5, 5, 280, 100, 0xA40);

        if (guildmaster != null)
        {
          AddHtmlLocalized(9, 9, 272, 100, 1076169, 0x7FFF, false,
            false); // It will cost you 100,000 gold and a blue diamond to recharge your weapon engraver with 10 charges.
          AddHtmlLocalized(195, 109, 120, 20, 1076172, 0x7FFF, false, false); // Recharge it
        }
        else
        {
          AddHtmlLocalized(9, 9, 272, 100, 1076176, 0x7FFF, false,
            false); // You will need a blue diamond to repair the tip of the engraver.  A successful repair will give the engraver 10 charges.
          AddHtmlLocalized(195, 109, 120, 20, 1076177, 0x7FFF, false, false); // Replace the tip.
        }

        AddButton(160, 107, 0xFB7, 0xFB8, (int)Buttons.Confirm, GumpButtonType.Reply, 0);
        AddButton(5, 107, 0xFB1, 0xFB2, (int)Buttons.Cancel, GumpButtonType.Reply, 0);
        AddHtmlLocalized(40, 109, 100, 20, 1060051, 0x7FFF, false, false); // CANCEL
      }

      public override void OnResponse(NetState state, RelayInfo info)
      {
        if (m_Engraver == null || m_Engraver.Deleted)
          return;

        if (info.ButtonID == (int)Buttons.Confirm)
          m_Engraver.Recharge(state.Mobile, m_Guildmaster);
      }

      private enum Buttons
      {
        Cancel,
        Confirm
      }
    }
  }
}