ModernUO/Scripts/Spells/Necromancy/MindRot.cs

using System;
using System.Collections;
using Server.Targeting;

namespace Server.Spells.Necromancy
{
  public class MindRotSpell : NecromancerSpell
  {
    private static SpellInfo m_Info = new SpellInfo(
      "Mind Rot", "Wis An Ben",
      203,
      9031,
      Reagent.BatWing,
      Reagent.PigIron,
      Reagent.DaemonBlood
    );

    private static Hashtable m_Table = new Hashtable();

    public MindRotSpell(Mobile caster, Item scroll) : base(caster, scroll, m_Info)
    {
    }

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

    public override double RequiredSkill => 30.0;
    public override int RequiredMana => 17;

    public override void OnCast()
    {
      Caster.Target = new InternalTarget(this);
    }

    public void Target(Mobile m)
    {
      if (HasMindRotScalar(m))
      {
        Caster.SendLocalizedMessage(1005559); // This spell is already in effect.
      }
      else if (CheckHSequence(m))
      {
        SpellHelper.Turn(Caster, m);

        /* Attempts to place a curse on the Target that increases the mana cost of any spells they cast,
         * for a duration based off a comparison between the Caster's Spirit Speak skill and the Target's Resisting Spells skill.
         * The effect lasts for ((Spirit Speak skill level - target's Resist Magic skill level) / 50 ) + 20 seconds.
         */

        m.Spell?.OnCasterHurt();

        m.PlaySound(0x1FB);
        m.PlaySound(0x258);
        m.FixedParticles(0x373A, 1, 17, 9903, 15, 4, EffectLayer.Head);

        TimeSpan duration =
          TimeSpan.FromSeconds(
            ((GetDamageSkill(Caster) - GetResistSkill(m)) / 5.0 + 20.0) * (m.Player ? 1.0 : 2.0));
        m.CheckSkill(SkillName.MagicResist, 0.0, 120.0); //Skill check for gain

        if (m.Player)
          SetMindRotScalar(Caster, m, 1.25, duration);
        else
          SetMindRotScalar(Caster, m, 2.00, duration);

        HarmfulSpell(m);
      }

      FinishSequence();
    }

    public static void ClearMindRotScalar(Mobile m)
    {
      if (!m_Table.ContainsKey(m))
        return;

      BuffInfo.RemoveBuff(m, BuffIcon.Mindrot);
      MRBucket tmpB = (MRBucket)m_Table[m];
      MRExpireTimer tmpT = tmpB.m_MRExpireTimer;
      tmpT.Stop();
      m_Table.Remove(m);
      m.SendLocalizedMessage(1060872); // Your mind feels normal again.
    }

    public static bool HasMindRotScalar(Mobile m)
    {
      return m_Table.ContainsKey(m);
    }

    public static bool GetMindRotScalar(Mobile m, ref double scalar)
    {
      if (!m_Table.ContainsKey(m))
        return false;

      MRBucket tmpB = (MRBucket)m_Table[m];
      scalar = tmpB.m_Scalar;
      return true;
    }

    public static void SetMindRotScalar(Mobile caster, Mobile target, double scalar, TimeSpan duration)
    {
      if (!m_Table.ContainsKey(target))
      {
        m_Table.Add(target, new MRBucket(scalar, new MRExpireTimer(caster, target, duration)));
        BuffInfo.AddBuff(target, new BuffInfo(BuffIcon.Mindrot, 1075665, duration, target));
        MRBucket tmpB = (MRBucket)m_Table[target];
        MRExpireTimer tmpT = tmpB.m_MRExpireTimer;
        tmpT.Start();
        target.SendLocalizedMessage(1074384);
      }
    }

    private class InternalTarget : Target
    {
      private MindRotSpell m_Owner;

      public InternalTarget(MindRotSpell owner) : base(Core.ML ? 10 : 12, false, TargetFlags.Harmful)
      {
        m_Owner = owner;
      }

      protected override void OnTarget(Mobile from, object o)
      {
        if (o is Mobile)
          m_Owner.Target((Mobile)o);
        else
          from.SendLocalizedMessage(1060508); // You can't curse that.
      }

      protected override void OnTargetFinish(Mobile from)
      {
        m_Owner.FinishSequence();
      }
    }
  }

  public class MRExpireTimer : Timer
  {
    private Mobile m_Caster;
    private DateTime m_End;
    private Mobile m_Target;

    public MRExpireTimer(Mobile caster, Mobile target, TimeSpan delay) : base(TimeSpan.FromSeconds(1.0),
      TimeSpan.FromSeconds(1.0))
    {
      m_Caster = caster;
      m_Target = target;
      m_End = DateTime.UtcNow + delay;
      Priority = TimerPriority.TwoFiftyMS;
    }

    public void RenewDelay(TimeSpan delay)
    {
      m_End = DateTime.UtcNow + delay;
    }

    public void Halt()
    {
      Stop();
    }

    protected override void OnTick()
    {
      if (m_Target.Deleted || !m_Target.Alive || DateTime.UtcNow >= m_End)
      {
        MindRotSpell.ClearMindRotScalar(m_Target);
        Stop();
      }
    }
  }

  public class MRBucket
  {
    public MRExpireTimer m_MRExpireTimer;

    public double m_Scalar;

    public MRBucket(double theScalar, MRExpireTimer theTimer)
    {
      m_Scalar = theScalar;
      m_MRExpireTimer = theTimer;
    }
  }
}