ModernUO/Projects/Scripts/Spells/Mysticism/NetherCycloneSpell.cs

using System;
using System.Collections.Generic;

namespace Server.Spells.Mysticism
{
  public class NetherCycloneSpell : MysticSpell, ISpellTargetingPoint3D
  {
    private static SpellInfo m_Info = new SpellInfo(
      "Nether Cyclone", "Grav Hur",
      -1,
      9002,
      Reagent.MandrakeRoot,
      Reagent.Nightshade,
      Reagent.SulfurousAsh,
      Reagent.Bloodmoss
    );

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

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

    public override double RequiredSkill => 83.0;
    public override int RequiredMana => 50;

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

    public void Target(IPoint3D p)
    {
      if (SpellHelper.CheckTown(p, Caster) && CheckSequence())
      {
        /* Summons a gale of lethal winds that strikes all Targets within a radius around
         * the Target's Location, dealing chaos damage. In addition to inflicting damage,
         * each Target of the Nether Cyclone temporarily loses a percentage of mana and
         * stamina. The effectiveness of the Nether Cyclone is determined by a comparison
         * between the Caster's Mysticism and either Focus or Imbuing (whichever is greater)
         * skills and the Resisting Spells skill of the Target.
         */

        SpellHelper.Turn(Caster, p);

        if (p is Item item)
          p = item.GetWorldLocation();

        List<Mobile> targets = new List<Mobile>();

        Map map = Caster.Map;

        bool pvp = false;

        if (map != null)
        {
          PlayEffect(p, Caster.Map);

          foreach (Mobile m in map.GetMobilesInRange(new Point3D(p), 2))
          {
            if (m == Caster)
              continue;

            if (SpellHelper.ValidIndirectTarget(Caster, m) && Caster.CanBeHarmful(m, false) && Caster.CanSee(m))
            {
              if (!Caster.InLOS(m))
                continue;

              targets.Add(m);

              pvp |= m.Player;
            }
          }
        }

        int damage = GetNewAosDamage(51, 1, 5, pvp);
        double reduction = (GetBaseSkill(Caster) + GetBoostSkill(Caster)) / 1200.0;

        foreach (Mobile m in targets)
        {
          Caster.DoHarmful(m);
          SpellHelper.Damage(this, m, damage, 0, 0, 0, 0, 0, 100);

          double resistedReduction = reduction - m.Skills.MagicResist.Value / 800.0;

          m.Stam -= (int)(m.StamMax * resistedReduction);
          m.Mana -= (int)(m.ManaMax * resistedReduction);
        }
      }

      FinishSequence();
    }

    private static void PlayEffect(IPoint3D p, Map map)
    {
      Effects.PlaySound(p, map, 0x64F);

      PlaySingleEffect(p, map, -1, 1, -1, 1);
      PlaySingleEffect(p, map, -2, 0, -3, -1);
      PlaySingleEffect(p, map, -3, -1, -1, 1);
      PlaySingleEffect(p, map, 1, 3, -1, 1);
      PlaySingleEffect(p, map, -1, 1, 1, 3);
    }

    private static void PlaySingleEffect(IPoint3D p, Map map, int a, int b, int c, int d)
    {
      int x = p.X, y = p.Y, z = p.Z + 18;

      SendEffectPacket(p, map, new Point3D(x + a, y + c, z), new Point3D(x + a, y + c, z));
      SendEffectPacket(p, map, new Point3D(x + b, y + c, z), new Point3D(x + b, y + c, z));
      SendEffectPacket(p, map, new Point3D(x + b, y + d, z), new Point3D(x + b, y + d, z));
      SendEffectPacket(p, map, new Point3D(x + a, y + d, z), new Point3D(x + a, y + d, z));

      SendEffectPacket(p, map, new Point3D(x + b, y + c, z), new Point3D(x + a, y + c, z));
      SendEffectPacket(p, map, new Point3D(x + b, y + d, z), new Point3D(x + b, y + c, z));
      SendEffectPacket(p, map, new Point3D(x + a, y + d, z), new Point3D(x + b, y + d, z));
      SendEffectPacket(p, map, new Point3D(x + a, y + c, z), new Point3D(x + a, y + d, z));
    }

    private static void SendEffectPacket(IPoint3D p, Map map, Point3D orig, Point3D dest)
    {
      Effects.SendMovingEffect(p, orig, dest, map, 0x375A, 0, 0, false, false, 0x49A, 4);
    }
  }
}