using System;
using Server.Items;
using Server.Misc;
using Server.Mobiles;
using Server.Targeting;

namespace Server.Spells.Sixth
{
  public class ParalyzeFieldSpell : MagerySpell, ISpellTargetingPoint3D
  {
    private static SpellInfo m_Info = new SpellInfo(
      "Paralyze Field", "In Ex Grav",
      230,
      9012,
      false,
      Reagent.BlackPearl,
      Reagent.Ginseng,
      Reagent.SpidersSilk
    );

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

    public override SpellCircle Circle => SpellCircle.Sixth;

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

    public void Target(IPoint3D p)
    {
      if (!Caster.CanSee(p))
      {
        Caster.SendLocalizedMessage(500237); // Target can not be seen.
      }
      else if (SpellHelper.CheckTown(p, Caster) && CheckSequence())
      {
        SpellHelper.Turn(Caster, p);

        SpellHelper.GetSurfaceTop(ref p);

        int dx = Caster.Location.X - p.X;
        int dy = Caster.Location.Y - p.Y;
        int rx = (dx - dy) * 44;
        int ry = (dx + dy) * 44;

        bool eastToWest;

        if (rx >= 0 && ry >= 0)
          eastToWest = false;
        else if (rx >= 0)
          eastToWest = true;
        else if (ry >= 0)
          eastToWest = true;
        else
          eastToWest = false;

        Effects.PlaySound(p, Caster.Map, 0x20B);

        int itemID = eastToWest ? 0x3967 : 0x3979;

        TimeSpan duration = TimeSpan.FromSeconds(3.0 + Caster.Skills.Magery.Value / 3.0);

        for (int i = -2; i <= 2; ++i)
        {
          Point3D loc = new Point3D(eastToWest ? p.X + i : p.X, eastToWest ? p.Y : p.Y + i, p.Z);

          if (!SpellHelper.AdjustField(ref loc, Caster.Map, 12, false))
            continue;

          Item item = new InternalItem(Caster, itemID, loc, Caster.Map, duration);
          item.ProcessDelta();

          Effects.SendLocationParticles(EffectItem.Create(loc, Caster.Map, EffectItem.DefaultDuration), 0x376A, 9,
            10, 5048);
        }
      }

      FinishSequence();
    }

    [DispellableField]
    public class InternalItem : Item
    {
      private Mobile m_Caster;
      private DateTime m_End;
      private Timer m_Timer;

      public InternalItem(Mobile caster, int itemID, Point3D loc, Map map, TimeSpan duration) : base(itemID)
      {
        Visible = false;
        Movable = false;
        Light = LightType.Circle300;

        MoveToWorld(loc, map);

        if (caster.InLOS(this))
          Visible = true;
        else
          Delete();

        if (Deleted)
          return;

        m_Caster = caster;

        m_Timer = new InternalTimer(this, duration);
        m_Timer.Start();

        m_End = DateTime.UtcNow + duration;
      }

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

      public override bool BlocksFit => true;

      public override void OnAfterDelete()
      {
        base.OnAfterDelete();

        m_Timer?.Stop();
      }

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

        writer.Write(0); // version

        writer.Write(m_Caster);
        writer.WriteDeltaTime(m_End);
      }

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

        int version = reader.ReadInt();

        switch (version)
        {
          case 0:
          {
            m_Caster = reader.ReadMobile();
            m_End = reader.ReadDeltaTime();

            m_Timer = new InternalTimer(this, m_End - DateTime.UtcNow);
            m_Timer.Start();

            break;
          }
        }
      }

      public override bool OnMoveOver(Mobile m)
      {
        if (Visible && m_Caster != null && (!Core.AOS || m != m_Caster) &&
            SpellHelper.ValidIndirectTarget(m_Caster, m) && m_Caster.CanBeHarmful(m, false))
        {
          if (SpellHelper.CanRevealCaster(m))
            m_Caster.RevealingAction();

          m_Caster.DoHarmful(m);

          double duration;

          if (Core.AOS)
          {
            duration = 2.0 + ((int)(m_Caster.Skills.EvalInt.Value / 10) -
                              (int)(m.Skills.MagicResist.Value / 10));

            if (!m.Player)
              duration *= 3.0;

            if (duration < 0.0)
              duration = 0.0;
          }
          else
          {
            duration = 7.0 + m_Caster.Skills.Magery.Value * 0.2;
          }

          m.Paralyze(TimeSpan.FromSeconds(duration));

          m.PlaySound(0x204);
          m.FixedEffect(0x376A, 10, 16);

          (m as BaseCreature)?.OnHarmfulSpell(m_Caster);
        }

        return true;
      }

      private class InternalTimer : Timer
      {
        private Item m_Item;

        public InternalTimer(Item item, TimeSpan duration) : base(duration)
        {
          Priority = TimerPriority.OneSecond;
          m_Item = item;
        }

        protected override void OnTick()
        {
          m_Item.Delete();
        }
      }
    }
  }
}