ModernUO/Projects/UOContent/Skills/AnimalTaming.cs

467 lines
19 KiB
C#

using System;
using System.Collections.Generic;
using Server.Engines.Virtues;
using Server.Factions;
using Server.Mobiles;
using Server.Spells;
using Server.Spells.Necromancy;
using Server.Spells.Spellweaving;
using Server.Targeting;
namespace Server.SkillHandlers
{
public static class AnimalTaming
{
private static readonly HashSet<Mobile> m_BeingTamed = new();
public static bool DisableMessage { get; set; }
public static void Initialize()
{
SkillInfo.Table[(int)SkillName.AnimalTaming].Callback = OnUse;
}
public static TimeSpan OnUse(Mobile m)
{
m.RevealingAction();
m.Target = new InternalTarget();
m.RevealingAction();
if (!DisableMessage)
{
m.SendLocalizedMessage(502789); // Tame which animal?
}
return TimeSpan.FromSeconds(30);
}
public static bool CheckMastery(Mobile tamer, BaseCreature creature) =>
SummonFamiliarSpell.Table.TryGetValue(tamer, out var bc)
&& bc is DarkWolfFamiliar { Deleted: false }
&& creature is DireWolf or GreyWolf or TimberWolf or WhiteWolf or BakeKitsune;
public static bool MustBeSubdued(BaseCreature bc) =>
bc.Owners.Count <= 0 && bc.SubdueBeforeTame && bc.Hits > bc.HitsMax / 10;
public static void ScaleStats(BaseCreature bc, double scalar)
{
if (bc.RawStr > 0)
{
bc.RawStr = (int)Math.Max(1, bc.RawStr * scalar);
}
if (bc.RawDex > 0)
{
bc.RawDex = (int)Math.Max(1, bc.RawDex * scalar);
}
if (bc.RawInt > 0)
{
bc.RawInt = (int)Math.Max(1, bc.RawInt * scalar);
}
if (bc.HitsMaxSeed > 0)
{
bc.HitsMaxSeed = (int)Math.Max(1, bc.HitsMaxSeed * scalar);
bc.Hits = bc.Hits;
}
if (bc.StamMaxSeed > 0)
{
bc.StamMaxSeed = (int)Math.Max(1, bc.StamMaxSeed * scalar);
bc.Stam = bc.Stam;
}
}
public static void ScaleSkills(BaseCreature bc, double scalar)
{
ScaleSkills(bc, scalar, scalar);
}
public static void ScaleSkills(BaseCreature bc, double scalar, double capScalar)
{
for (var i = 0; i < bc.Skills.Length; ++i)
{
bc.Skills[i].Base *= scalar;
bc.Skills[i].Cap = Math.Max(100.0, bc.Skills[i].Cap * capScalar);
if (bc.Skills[i].Base > bc.Skills[i].Cap)
{
bc.Skills[i].Cap = bc.Skills[i].Base;
}
}
}
private class InternalTarget : Target
{
private bool m_SetSkillTime = true;
public InternalTarget() : base(Core.AOS ? 3 : 2, false, TargetFlags.None)
{
}
protected override void OnTargetFinish(Mobile from)
{
if (m_SetSkillTime)
{
from.NextSkillTime = Core.TickCount;
}
}
protected override void OnTarget(Mobile from, object targeted)
{
from.RevealingAction();
if (targeted is not Mobile mobile)
{
from.SendLocalizedMessage(502801); // You can't tame that!
return;
}
if (mobile is not BaseCreature creature)
{
// That being cannot be tamed.
mobile.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502469, from.NetState);
return;
}
if (!creature.Tamable)
{
// That creature cannot be tamed.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1049655, from.NetState);
return;
}
if (creature.Controlled)
{
// That animal looks tame already.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502804, from.NetState);
return;
}
if (from.Female && !creature.AllowFemaleTamer)
{
// That creature can only be tamed by males.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1049653, from.NetState);
return;
}
if (!from.Female && !creature.AllowMaleTamer)
{
// That creature can only be tamed by females.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1049652, from.NetState);
return;
}
if (creature is CuSidhe && from.Race != Race.Elf)
{
// You can't tame that!
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502801, from.NetState);
return;
}
if (from.Followers + creature.ControlSlots > from.FollowersMax)
{
from.SendLocalizedMessage(1049611); // You have too many followers to tame that creature.
return;
}
if (creature.Owners.Count >= BaseCreature.MaxOwners && !creature.Owners.Contains(from))
{
// This animal has had too many owners and is too upset for you to tame.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1005615, from.NetState);
return;
}
if (MustBeSubdued(creature))
{
// You must subdue this creature before you can tame it!
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1054025, from.NetState);
return;
}
if (!(CheckMastery(from, creature) || from.Skills.AnimalTaming.Value >= creature.MinTameSkill))
{
// You have no chance of taming this creature.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502806, from.NetState);
return;
}
if (creature is FactionWarHorse warHorse)
{
var faction = Faction.Find(from);
if (faction == null || faction != warHorse.Faction)
{
// You cannot tame this creature.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1042590, from.NetState);
return;
}
}
if (m_BeingTamed.Contains(creature))
{
// Someone else is already taming this.
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502802, from.NetState);
}
else if (creature.CanAngerOnTame && Utility.RandomDouble() < 0.95)
{
// You seem to anger the beast!
creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502805, from.NetState);
creature.PlaySound(creature.GetAngerSound());
creature.Direction = creature.GetDirectionTo(from);
if (creature.BardPacified && Utility.RandomDouble() < 0.75)
{
Timer.StartTimer(TimeSpan.FromSeconds(2.0), () => Pacify(creature));
}
else
{
creature.BardEndTime = Core.Now;
}
creature.BardPacified = false;
creature.AIObject?.DoMove(creature.Direction);
if (from is PlayerMobile pm &&
!(VirtueSystem.GetVirtues(pm)?.HonorActive == true ||
TransformationSpellHelper.UnderTransformation(pm, typeof(EtherealVoyageSpell))))
{
creature.Combatant = pm;
}
}
else
{
m_BeingTamed.Add(creature);
// You start to tame the creature.
from.LocalOverheadMessage(MessageType.Emote, 0x59, 1010597);
// *begins taming a creature.*
from.NonlocalOverheadMessage(MessageType.Emote, 0x59, 1010598);
new InternalTimer(from, creature, Utility.Random(3, 2)).Start();
m_SetSkillTime = false;
}
}
private static void Pacify(BaseCreature bc) => bc.BardPacified = true; // Should use bc.Pacify with an end time?
private class InternalTimer : Timer
{
private readonly BaseCreature m_Creature;
private readonly int m_MaxCount;
private readonly DateTime m_StartTime;
private readonly Mobile m_Tamer;
private int m_Count;
private bool m_Paralyzed;
public InternalTimer(Mobile tamer, BaseCreature creature, int count) : base(
TimeSpan.FromSeconds(3.0),
TimeSpan.FromSeconds(3.0),
count
)
{
m_Tamer = tamer;
m_Creature = creature;
m_MaxCount = count;
m_Paralyzed = creature.Paralyzed;
m_StartTime = Core.Now;
}
protected override void OnTick()
{
m_Count++;
var de = m_Creature.FindMostRecentDamageEntry(false);
var alreadyOwned = m_Creature.Owners.Contains(m_Tamer);
if (!m_Tamer.InRange(m_Creature, Core.AOS ? 7 : 6))
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// You are too far away to continue taming.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502795, m_Tamer.NetState);
Stop();
}
else if (!m_Tamer.CheckAlive())
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// You are dead, and cannot continue taming.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502796, m_Tamer.NetState);
Stop();
}
else if (!m_Tamer.CanSee(m_Creature) || !m_Tamer.InLOS(m_Creature) || !CanPath())
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// You do not have a clear path to the animal you are taming, and must cease your attempt.
m_Tamer.SendLocalizedMessage(1049654);
Stop();
}
else if (!m_Creature.Tamable)
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// That creature cannot be tamed.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1049655, m_Tamer.NetState);
Stop();
}
else if (m_Creature.Controlled)
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// That animal looks tame already.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502804, m_Tamer.NetState);
Stop();
}
else if (m_Creature.Owners.Count >= BaseCreature.MaxOwners && !m_Creature.Owners.Contains(m_Tamer))
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// This animal has had too many owners and is too upset for you to tame.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1005615, m_Tamer.NetState);
Stop();
}
else if (MustBeSubdued(m_Creature))
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// You must subdue this creature before you can tame it!
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 1054025, m_Tamer.NetState);
Stop();
}
else if (de?.LastDamage > m_StartTime)
{
m_BeingTamed.Remove(m_Creature);
m_Tamer.NextSkillTime = Core.TickCount;
// The animal is too angry to continue taming.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502794, m_Tamer.NetState);
Stop();
}
else if (m_Count < m_MaxCount)
{
m_Tamer.RevealingAction();
switch (Utility.Random(3))
{
case 0:
{
m_Tamer.PublicOverheadMessage(MessageType.Regular, 0x3B2, Utility.Random(502790, 4));
break;
}
case 1:
{
m_Tamer.PublicOverheadMessage(MessageType.Regular, 0x3B2, Utility.Random(1005608, 6));
break;
}
case 2:
{
m_Tamer.PublicOverheadMessage(MessageType.Regular, 0x3B2, Utility.Random(1010593, 4));
break;
}
}
if (!alreadyOwned) // Passively check animal lore for gain
{
m_Tamer.CheckTargetSkill(SkillName.AnimalLore, m_Creature, 0.0, 120.0);
}
if (m_Creature.Paralyzed)
{
m_Paralyzed = true;
}
}
else
{
m_Tamer.RevealingAction();
m_Tamer.NextSkillTime = Core.TickCount;
m_BeingTamed.Remove(m_Creature);
if (m_Creature.Paralyzed)
{
m_Paralyzed = true;
}
if (!alreadyOwned) // Passively check animal lore for gain
{
m_Tamer.CheckTargetSkill(SkillName.AnimalLore, m_Creature, 0.0, 120.0);
}
var minSkill = m_Creature.MinTameSkill + m_Creature.Owners.Count * 6.0;
if (minSkill > -24.9 && CheckMastery(m_Tamer, m_Creature))
{
minSkill = -24.9; // 50% at 0.0?
}
minSkill += 24.9;
if (CheckMastery(m_Tamer, m_Creature) || alreadyOwned ||
m_Tamer.CheckTargetSkill(SkillName.AnimalTaming, m_Creature, minSkill - 25.0, minSkill + 25.0))
{
if (m_Creature.Owners.Count == 0) // First tame
{
if (m_Creature is GreaterDragon)
{
ScaleSkills(m_Creature, 0.72, 0.90); // 72% of original skills trainable to 90%
// Greater dragons have a 90% cap reduction and 90% skill reduction on magery
m_Creature.Skills.Magery.Base = m_Creature.Skills.Magery.Cap;
}
else if (m_Paralyzed)
{
// 86% of original skills if they were paralyzed during the taming
ScaleSkills(m_Creature, 0.86);
}
else
{
ScaleSkills(m_Creature, 0.90); // 90% of original skills
}
if (m_Creature.StatLossAfterTame)
{
ScaleStats(m_Creature, 0.50);
}
}
if (alreadyOwned)
{
m_Tamer.SendLocalizedMessage(502797); // That wasn't even challenging.
}
else
{
// It seems to accept you as master.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502799, m_Tamer.NetState);
m_Creature.Owners.Add(m_Tamer);
}
m_Creature.SetControlMaster(m_Tamer);
m_Creature.IsBonded = false;
m_Creature.ControlTarget = m_Tamer;
m_Creature.ControlOrder = OrderType.Follow;
}
else
{
// You fail to tame the creature.
m_Creature.PrivateOverheadMessage(MessageType.Regular, 0x3B2, 502798, m_Tamer.NetState);
}
}
}
private bool CanPath()
{
IPoint3D p = m_Tamer;
return p != null && (m_Creature.InRange(new Point3D(p), 1) ||
new MovementPath(m_Creature, new Point3D(p)).Success);
}
}
}
}
}