ModernUO/Projects/UOContent/Spells/Necromancy/PainSpike.cs

using System;
using System.Collections.Generic;
using Server.Misc;
using Server.Targeting;

namespace Server.Spells.Necromancy;

public class PainSpikeSpell : NecromancerSpell, ITargetingSpell<Mobile>
{
    private static readonly SpellInfo _info = new(
        "Pain Spike",
        "In Sar",
        203,
        9031,
        Reagent.GraveDust,
        Reagent.PigIron
    );

    private static readonly Dictionary<Mobile, InternalTimer> _table = new();

    public PainSpikeSpell(Mobile caster, Item scroll = null) : base(caster, scroll, _info)
    {
    }

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

    public override double RequiredSkill => 20.0;
    public override int RequiredMana => 5;

    public override bool DelayedDamage => false;

    public static bool UnderEffect(Mobile m) => _table.ContainsKey(m);

    public void Target(Mobile m)
    {
        if (m == null)
        {
            return;
        }

        if (CheckHSequence(m))
        {
            SpellHelper.Turn(Caster, m);

            // SpellHelper.CheckReflect( (int)this.Circle, Caster, ref m ); //Irrelevent after AoS

            /* Temporarily causes intense physical pain to the target, dealing direct damage.
             * After 10 seconds the spell wears off, and if the target is still alive,
             * some of the Hit Points lost through Pain Spike are restored.
             */

            m.FixedParticles(0x37C4, 1, 8, 9916, 39, 3, EffectLayer.Head);
            m.FixedParticles(0x37C4, 1, 8, 9502, 39, 4, EffectLayer.Head);
            m.PlaySound(0x210);

            var damage = Math.Max((GetDamageSkill(Caster) - GetResistSkill(m)) / 10 + (m.Player ? 18 : 30), 1);
            m.CheckSkill(SkillName.MagicResist, 0.0, 120.0); // Skill check for gain

            var buffTime = TimeSpan.FromSeconds(10.0);

            if (!_table.TryGetValue(m, out var timer))
            {
                _table[m] = timer = new InternalTimer(m, damage);
                timer.Start();
            }
            else
            {
                damage = Utility.RandomMinMax(3, 7);
                timer.Delay += TimeSpan.FromSeconds(2.0);
                buffTime = timer.Next - Core.Now;
            }

            BuffInfo.AddBuff(m, new BuffInfo(BuffIcon.PainSpike, 1075667, buffTime, m, Convert.ToString((int)damage)));

            // TODO: Find a better way to do this
            StaminaSystem.DFA = DFAlgorithm.PainSpike;
            m.Damage((int)damage, Caster, ignoreEvilOmen: true);
            SpellHelper.DoLeech((int)damage, Caster, m);
            StaminaSystem.DFA = DFAlgorithm.Standard;

            // SpellHelper.Damage( this, m, damage, 100, 0, 0, 0, 0, Misc.DFAlgorithm.PainSpike );
            HarmfulSpell(m);
        }
    }

    public override void OnCast()
    {
        Caster.Target = new SpellTarget<Mobile>(this, TargetFlags.Harmful);
    }

    private class InternalTimer : Timer
    {
        private Mobile _mobile;
        private int _toRestore;

        public InternalTimer(Mobile m, double toRestore) : base(TimeSpan.FromSeconds(10.0))
        {

            _mobile = m;
            _toRestore = (int)toRestore;
        }

        protected override void OnTick()
        {
            _table.Remove(_mobile);

            if (_mobile.Alive && !_mobile.IsDeadBondedPet)
            {
                _mobile.Hits += _toRestore;
            }

            BuffInfo.RemoveBuff(_mobile, BuffIcon.PainSpike);
        }
    }
}