using System;
using Server.Engines.ConPVP;
using Server.Items;
using Server.Spells.Fourth;
using Server.Spells.Necromancy;
using Server.Targeting;

namespace Server.Spells.Chivalry
{
  public class RemoveCurseSpell : PaladinSpell, ISpellTargetingMobile
  {
    private static SpellInfo m_Info = new SpellInfo(
      "Remove Curse", "Extermo Vomica",
      -1,
      9002
    );

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

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

    public override double RequiredSkill => 5.0;
    public override int RequiredMana => 20;
    public override int RequiredTithing => 10;
    public override int MantraNumber => 1060726; // Extermo Vomica

    public override bool CheckCast()
    {
      if (DuelContext.CheckSuddenDeath(Caster))
      {
        Caster.SendMessage(0x22, "You cannot cast this spell when in sudden death.");
        return false;
      }

      return base.CheckCast();
    }

    public override void OnCast()
    {
      Caster.Target = new SpellTargetMobile(this, TargetFlags.Beneficial, Core.ML ? 10 : 12);
    }

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

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

        /* Attempts to remove all Curse effects from Target.
         * Curses include Mage spells such as Clumsy, Weaken, Feeblemind and Paralyze
         * as well as all Necromancer curses.
         * Chance of removing curse is affected by Caster's Karma.
         */

        int chance;

        if (Caster.Karma < -5000)
          chance = 0;
        else if (Caster.Karma < 0)
          chance = (int)Math.Sqrt(20000 + Caster.Karma) - 122;
        else if (Caster.Karma < 5625)
          chance = (int)Math.Sqrt(Caster.Karma) + 25;
        else
          chance = 100;

        if (chance > Utility.Random(100))
        {
          m.PlaySound(0xF6);
          m.PlaySound(0x1F7);
          m.FixedParticles(0x3709, 1, 30, 9963, 13, 3, EffectLayer.Head);

          IEntity from = new Entity(Serial.Zero, new Point3D(m.X, m.Y, m.Z - 10), Caster.Map);
          IEntity to = new Entity(Serial.Zero, new Point3D(m.X, m.Y, m.Z + 50), Caster.Map);
          Effects.SendMovingParticles(from, to, 0x2255, 1, 0, false, false, 13, 3, 9501, 1, 0, EffectLayer.Head,
            0x100);

          StatMod mod = m.GetStatMod("[Magic] Str Offset");
          if (mod?.Offset < 0)
            m.RemoveStatMod("[Magic] Str Offset");

          mod = m.GetStatMod("[Magic] Dex Offset");
          if (mod?.Offset < 0)
            m.RemoveStatMod("[Magic] Dex Offset");

          mod = m.GetStatMod("[Magic] Int Offset");
          if (mod?.Offset < 0)
            m.RemoveStatMod("[Magic] Int Offset");

          m.Paralyzed = false;

          EvilOmenSpell.TryEndEffect(m);
          StrangleSpell.RemoveCurse(m);
          CorpseSkinSpell.RemoveCurse(m);
          CurseSpell.RemoveEffect(m);
          MortalStrike.EndWound(m);
          if (Core.ML) BloodOathSpell.RemoveCurse(m);
          MindRotSpell.ClearMindRotScalar(m);

          BuffInfo.RemoveBuff(m, BuffIcon.Clumsy);
          BuffInfo.RemoveBuff(m, BuffIcon.FeebleMind);
          BuffInfo.RemoveBuff(m, BuffIcon.Weaken);
          BuffInfo.RemoveBuff(m, BuffIcon.Curse);
          BuffInfo.RemoveBuff(m, BuffIcon.MassCurse);
          BuffInfo.RemoveBuff(m, BuffIcon.MortalStrike);
          BuffInfo.RemoveBuff(m, BuffIcon.Mindrot);

          // TODO: Should this remove blood oath? Pain spike?
        }
        else
        {
          m.PlaySound(0x1DF);
        }
      }

      FinishSequence();
    }
  }
}