ModernUO/Projects/Scripts/Items/Weapons/Staves/ShepherdsCrook.cs

using System;
using System.Linq;
using Server.Engines.CannedEvil;
using Server.Mobiles;
using Server.Network;
using Server.Targeting;

namespace Server.Items
{
  [Flippable(0xE81, 0xE82)]
  public class ShepherdsCrook : BaseStaff
  {
    [Constructible]
    public ShepherdsCrook() : base(0xE81) => Weight = 4.0;

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

    public override WeaponAbility PrimaryAbility => WeaponAbility.CrushingBlow;
    public override WeaponAbility SecondaryAbility => WeaponAbility.Disarm;

    public override int AosStrengthReq => 20;
    public override int AosMinDamage => 13;
    public override int AosMaxDamage => 15;
    public override int AosSpeed => 40;
    public override float MlSpeed => 2.75f;

    public override int OldStrengthReq => 10;
    public override int OldMinDamage => 3;
    public override int OldMaxDamage => 12;
    public override int OldSpeed => 30;

    public override int InitMinHits => 31;
    public override int InitMaxHits => 50;

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

      writer.Write(0); // version
    }

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

      int version = reader.ReadInt();

      if (Weight == 2.0)
        Weight = 4.0;
    }

    public override void OnDoubleClick(Mobile from)
    {
      from.SendLocalizedMessage(502464); // Target the animal you wish to herd.
      from.Target = new HerdingTarget();
    }

    private class HerdingTarget : Target
    {
      private static Type[] m_ChampTamables =
      {
        typeof(StrongMongbat), typeof(Imp), typeof(Scorpion), typeof(GiantSpider),
        typeof(Snake), typeof(LavaLizard), typeof(Drake), typeof(Dragon),
        typeof(Kirin), typeof(Unicorn), typeof(GiantRat), typeof(Slime),
        typeof(DireWolf), typeof(HellHound), typeof(DeathwatchBeetle),
        typeof(LesserHiryu), typeof(Hiryu)
      };

      public HerdingTarget() : base(10, false, TargetFlags.None)
      {
      }

      protected override void OnTarget(Mobile from, object targ)
      {
        if (targ is BaseCreature bc)
        {
          if (IsHerdable(bc))
          {
            if (bc.Controlled)
            {
              bc.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502467,
                from.NetState); // That animal looks tame already.
            }
            else
            {
              from.SendLocalizedMessage(502475); // Click where you wish the animal to go.
              from.Target = new InternalTarget(bc);
            }
          }
          else
          {
            from.SendLocalizedMessage(502468); // That is not a herdable animal.
          }
        }
        else
        {
          from.SendLocalizedMessage(502472); // You don't seem to be able to persuade that to move.
        }
      }

      private bool IsHerdable(BaseCreature bc)
      {
        if (bc.IsParagon)
          return false;

        if (bc.Tamable)
          return true;

        Map map = bc.Map;

        if (Region.Find(bc.Home, map) is ChampionSpawnRegion region)
        {
          ChampionSpawn spawn = region.ChampionSpawn;

          if (spawn?.IsChampionSpawn(bc) == true)
          {
            Type t = bc.GetType();

            return m_ChampTamables.Any(type => type == t);
          }
        }

        return false;
      }

      private class InternalTarget : Target
      {
        private BaseCreature m_Creature;

        public InternalTarget(BaseCreature c) : base(10, true, TargetFlags.None) => m_Creature = c;

        protected override void OnTarget(Mobile from, object targ)
        {
          if (targ is IPoint2D p)
          {
            double min = m_Creature.MinTameSkill - 30;
            double max = m_Creature.MinTameSkill + 30 + Utility.Random(10);

            if (max <= from.Skills.Herding.Value)
              m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502471,
                from.NetState); // That wasn't even challenging.

            if (from.CheckTargetSkill(SkillName.Herding, m_Creature, min, max))
            {
              if (!ReferenceEquals(p, from))
                p = new Point2D(p.X, p.Y);

              m_Creature.TargetLocation = p;
              from.SendLocalizedMessage(502479); // The animal walks where it was instructed to.
            }
            else
            {
              from.SendLocalizedMessage(502472); // You don't seem to be able to persuade that to move.
            }
          }
        }
      }
    }
  }
}