ModernUO/Projects/Scripts/Spells/Spellweaving/AttuneWeapon.cs

using System;
using System.Collections.Generic;

namespace Server.Spells.Spellweaving
{
  public class AttuneWeaponSpell : ArcanistSpell
  {
    private static SpellInfo m_Info = new SpellInfo(
      "Attune Weapon", "Haeldril",
      -1
    );

    private static Dictionary<Mobile, ExpireTimer> m_Table = new Dictionary<Mobile, ExpireTimer>();

    public AttuneWeaponSpell(Mobile caster, Item scroll = null)
      : base(caster, scroll, m_Info)
    {
    }

    public override TimeSpan CastDelayBase => TimeSpan.FromSeconds(1.0);

    public override double RequiredSkill => 0.0;
    public override int RequiredMana => 24;

    public override bool CheckCast()
    {
      if (m_Table.ContainsKey(Caster))
      {
        Caster.SendLocalizedMessage(501775); // This spell is already in effect.
        return false;
      }

      if (Caster.CanBeginAction<AttuneWeaponSpell>())
        return base.CheckCast();

      Caster.SendLocalizedMessage(1075124); // You must wait before casting that spell again.
      return false;

    }

    public override void OnCast()
    {
      if (CheckSequence())
      {
        Caster.PlaySound(0x5C3);
        Caster.FixedParticles(0x3728, 1, 13, 0x26B8, 0x455, 7, EffectLayer.Waist);
        Caster.FixedParticles(0x3779, 1, 15, 0x251E, 0x3F, 7, EffectLayer.Waist);

        double skill = Caster.Skills.Spellweaving.Value;

        int damageAbsorb = (int)(18 + (skill - 10) / 10 * 3 + FocusLevel * 6);
        Caster.MeleeDamageAbsorb = damageAbsorb;

        TimeSpan duration = TimeSpan.FromSeconds(60 + FocusLevel * 12);

        ExpireTimer t = new ExpireTimer(Caster, duration);
        t.Start();

        m_Table[Caster] = t;

        Caster.BeginAction<AttuneWeaponSpell>();

        BuffInfo.AddBuff(Caster,
          new BuffInfo(BuffIcon.AttuneWeapon, 1075798, damageAbsorb.ToString(), duration, Caster));
      }

      FinishSequence();
    }

    public static void TryAbsorb(Mobile defender, ref int damage)
    {
      if (damage == 0 || !IsAbsorbing(defender) || defender.MeleeDamageAbsorb <= 0)
        return;

      int absorbed = Math.Min(damage, defender.MeleeDamageAbsorb);

      damage -= absorbed;
      defender.MeleeDamageAbsorb -= absorbed;

      defender.SendLocalizedMessage(1075127,
        $"{absorbed}\t{defender.MeleeDamageAbsorb}"); // ~1_damage~ point(s) of damage have been absorbed. A total of ~2_remaining~ point(s) of shielding remain.

      if (defender.MeleeDamageAbsorb <= 0)
        StopAbsorbing(defender, true);
    }

    public static bool IsAbsorbing(Mobile m) => m_Table.ContainsKey(m);

    public static void StopAbsorbing(Mobile m, bool message)
    {
      if (m_Table.TryGetValue(m, out ExpireTimer t))
        t.DoExpire(message);
    }

    private class ExpireTimer : Timer
    {
      private Mobile m_Mobile;

      public ExpireTimer(Mobile m, TimeSpan delay)
        : base(delay) =>
        m_Mobile = m;

      protected override void OnTick()
      {
        DoExpire(true);
      }

      public void DoExpire(bool message)
      {
        Stop();

        m_Mobile.MeleeDamageAbsorb = 0;

        if (message)
        {
          m_Mobile.SendLocalizedMessage(1075126); // Your attunement fades.
          m_Mobile.PlaySound(0x1F8);
        }

        m_Table.Remove(m_Mobile);

        DelayCall(TimeSpan.FromSeconds(120), delegate { m_Mobile.EndAction<AttuneWeaponSpell>(); });
        BuffInfo.RemoveBuff(m_Mobile, BuffIcon.AttuneWeapon);
      }
    }
  }
}