ML quest system; first SVN release.

Secondary changes:
- Region fixes, mainly for New Haven.
- Recipe system changes.
- Enabled ML craftables.
- Dyeing/cutting restrictions for quest items.
- Moved IsInvulnerable from BaseVendor to BaseCreature.
- Moved RandomBrightHue to Utility.
- Items no longer decay when attached to a spawner.
- Quest item hue is now faked through packets, instead of overriding Hue.
- Re-enabled item drag effects for SA clients.
- Fixed AssignRandomFacialHair bug in Utility.
- Added random hue comments to Utility.

Scripts/Engines/MLQuests/Objectives/EscortObjective.cs

@@ -0,0 +1,289 @@
+using System;
+using Server;
+using Server.Engines.MLQuests;
+using Server.Mobiles;
+using Server.Gumps;
+using System.Collections.Generic;
+using Server.Misc;
+using Server.Items;
+
+namespace Server.Engines.MLQuests.Objectives
+{
+	public class EscortObjective : BaseObjective
+	{
+		private QuestArea m_Destination;
+
+		public QuestArea Destination
+		{
+			get { return m_Destination; }
+			set { m_Destination = value; }
+		}
+
+		public EscortObjective()
+			: this( null )
+		{
+		}
+
+		public EscortObjective( QuestArea destination )
+		{
+			m_Destination = destination;
+		}
+
+		public override bool CanOffer( BaseCreature quester, PlayerMobile pm )
+		{
+			BaseEscortable escortable = quester as BaseEscortable;
+
+			if ( quester.Controlled || ( escortable != null && escortable.IsBeingDeleted ) )
+				return false;
+
+			MLQuestContext context = MLQuestSystem.GetContext( pm );
+
+			if ( context != null )
+			{
+				foreach ( MLQuestInstance instance in context.QuestInstances )
+				{
+					if ( instance.Quest.IsEscort )
+					{
+						MLQuestSystem.Tell( quester, pm, 500896 ); // I see you already have an escort.
+						return false;
+					}
+				}
+			}
+
+			DateTime nextEscort = pm.LastEscortTime + BaseEscortable.EscortDelay;
+
+			// Note: On OSI Bravehorn doesn't check the time limit, but it does SET the last escort time... bug!
+			if ( nextEscort > DateTime.Now )
+			{
+				int minutes = (int)Math.Ceiling( ( nextEscort - DateTime.Now ).TotalMinutes );
+
+				if ( minutes == 1 )
+					MLQuestSystem.Tell( quester, pm, "You must rest 1 minute before we set out on this journey." );
+				else
+					MLQuestSystem.Tell( quester, pm, 1071195, minutes.ToString() ); // You must rest ~1_minsleft~ minutes before we set out on this journey.
+
+				return false;
+			}
+
+			return true;
+		}
+
+		public override void WriteToGump( Gump g, ref int y )
+		{
+			g.AddHtmlLocalized( 98, y, 312, 16, 1072206, 0x15F90, false, false ); // Escort to
+
+			if ( m_Destination.Name.Number > 0 )
+				g.AddHtmlLocalized( 173, y, 312, 20, m_Destination.Name.Number, 0xFFFFFF, false, false );
+			else if ( m_Destination.Name.String != null )
+				g.AddLabel( 173, y, 0x481, m_Destination.Name.String );
+
+			y += 16;
+		}
+
+		public override BaseObjectiveInstance CreateInstance( MLQuestInstance instance )
+		{
+			if ( instance == null || m_Destination == null )
+				return null;
+
+			return new EscortObjectiveInstance( this, instance );
+		}
+	}
+
+	public class EscortObjectiveInstance : BaseObjectiveInstance
+	{
+		private EscortObjective m_Objective;
+		private bool m_HasCompleted;
+		private Timer m_Timer;
+		private DateTime m_LastSeenEscorter;
+
+		public bool HasCompleted
+		{
+			get { return m_HasCompleted; }
+			set { m_HasCompleted = value; }
+		}
+
+		public EscortObjectiveInstance( EscortObjective objective, MLQuestInstance instance )
+			: base( instance, objective )
+		{
+			m_Objective = objective;
+			m_HasCompleted = false;
+			m_Timer = Timer.DelayCall( TimeSpan.FromSeconds( 5 ), TimeSpan.FromSeconds( 5 ), new TimerCallback( CheckDestination ) );
+			m_LastSeenEscorter = DateTime.Now;
+		}
+
+		public override bool IsCompleted()
+		{
+			// Once complete, it stays complete
+			return m_HasCompleted;
+		}
+
+		private void CheckDestination()
+		{
+			if ( m_HasCompleted ) // Completed by deserialization
+			{
+				StopTimer();
+				return;
+			}
+
+			MLQuestInstance instance = Instance;
+			BaseCreature escort = instance.Quester;
+			PlayerMobile pm = instance.Player;
+
+			if ( instance.Removed ) // Player cancelled or player died
+			{
+				Abandon();
+			}
+			else if ( m_Objective.Destination.Contains( escort ) ) // We've arrived!
+			{
+				m_HasCompleted = true;
+				CheckComplete();
+				InternalOnQuestCompleted();
+				StopTimer();
+			}
+			else if ( pm.Map != escort.Map || !pm.InRange( escort, 30 ) ) // Player abandoned us (range not verified)
+			{
+				if ( m_LastSeenEscorter + BaseEscortable.AbandonDelay <= DateTime.Now )
+					Abandon();
+			}
+			else // Player is still with us
+			{
+				m_LastSeenEscorter = DateTime.Now;
+			}
+		}
+
+		private void StopTimer()
+		{
+			if ( m_Timer != null )
+			{
+				m_Timer.Stop();
+				m_Timer = null;
+			}
+		}
+
+		public static void BeginFollow( BaseCreature quester, PlayerMobile pm )
+		{
+			quester.ControlSlots = 0;
+			quester.SetControlMaster( pm );
+
+			quester.ActiveSpeed = 0.1;
+			quester.PassiveSpeed = 0.2;
+
+			quester.ControlOrder = OrderType.Follow;
+			quester.ControlTarget = pm;
+
+			quester.CantWalk = false;
+			quester.CurrentSpeed = 0.1;
+		}
+
+		public static void EndFollow( BaseCreature quester )
+		{
+			quester.ActiveSpeed = 0.2;
+			quester.PassiveSpeed = 1.0;
+
+			quester.ControlOrder = OrderType.None;
+			quester.ControlTarget = null;
+
+			quester.CurrentSpeed = 1.0;
+
+			quester.SetControlMaster( null );
+
+			if ( quester is BaseEscortable )
+				( (BaseEscortable)quester ).BeginDelete();
+		}
+
+		public override void OnQuestAccepted()
+		{
+			MLQuestInstance instance = Instance;
+			PlayerMobile pm = instance.Player;
+
+			pm.LastEscortTime = DateTime.Now;
+
+			BeginFollow( instance.Quester, pm );
+		}
+
+		public void Abandon()
+		{
+			StopTimer();
+
+			MLQuestInstance instance = Instance;
+			BaseCreature quester = instance.Quester;
+			PlayerMobile pm = instance.Player;
+
+			if ( !quester.Deleted )
+			{
+				if ( !pm.Alive )
+					quester.Say( 500901 ); // Ack!  My escort has come to haunt me!
+				else
+					quester.Say( 500902 ); // My escort seems to have abandoned me!
+
+				EndFollow( quester );
+			}
+
+			// Note: this sound is sent twice on OSI (once here and once in Cancel())
+			//m_Player.SendSound( 0x5B3 ); // private sound
+			pm.SendLocalizedMessage( 1071194 ); // You have failed your escort quest...
+
+			if ( !instance.Removed )
+				instance.Cancel();
+		}
+
+		private void InternalOnQuestCompleted() // To make sure it's never executed twice (when combined with a CollectObjective for example)
+		{
+			MLQuestInstance instance = Instance;
+			PlayerMobile pm = instance.Player;
+			BaseCreature quester = instance.Quester;
+
+			quester.Say( 1042809, pm.Name ); // We have arrived! I thank thee, ~1_PLAYER_NAME~! I have no further need of thy services. Here is thy pay.
+
+			// Verified: auto double click goes here
+			MLQuestSystem.OnDoubleClick( quester, pm ); // Auto claim reward
+
+			if ( pm.Young || quester.Region.IsPartOf( "Haven Island" ) )
+				Titles.AwardFame( pm, 10, true );
+			else
+				VirtueHelper.AwardVirtue( pm, VirtueName.Compassion, ( quester is BaseEscortable && ( (BaseEscortable)quester ).IsPrisoner ) ? 400 : 200 );
+
+			EndFollow( quester );
+		}
+
+		public override void OnQuesterDeleted()
+		{
+			if ( IsCompleted() || Instance.Removed )
+				return;
+
+			Abandon();
+		}
+
+		public override void OnPlayerDeath()
+		{
+			// Note: OSI also cancels it when the quest is already complete
+			if ( /*IsCompleted() ||*/ Instance.Removed )
+				return;
+
+			Instance.Cancel();
+		}
+
+		public override void OnExpire()
+		{
+			Abandon();
+		}
+
+		public override void WriteToGump( Gump g, ref int y )
+		{
+			m_Objective.WriteToGump( g, ref y );
+
+			base.WriteToGump( g, ref y );
+
+			// No extra instance stuff printed for this objective
+		}
+
+		public override DataType ExtraDataType { get { return DataType.EscortObjective; } }
+
+		public override void Serialize( GenericWriter writer )
+		{
+			base.Serialize( writer );
+
+			writer.Write( m_HasCompleted );
+		}
+	}
+}