#W# Source and Scripts added. Added Scripts/Settings.cs to expose some basic tweak able settings.

Scripts/Engines/Ethics/Evil/Ethic.cs

@@ -0,0 +1,37 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+using Server.Factions;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class EvilEthic : Ethic
+	{
+		public EvilEthic()
+		{
+			m_Definition = new EthicDefinition(
+					0x455,
+					"Evil", "(Evil)",
+					"I am evil incarnate",
+					new Power[]
+					{
+						new UnholySense(),
+						new UnholyItem(),
+						new SummonFamiliar(),
+						new VileBlade(),
+						new Blight(),
+						new UnholyShield(),
+						new UnholySteed(),
+						new UnholyWord()
+					}
+				);
+		}
+
+		public override bool IsEligible( Mobile mob )
+		{
+			Faction fac = Faction.Find( mob );
+
+			return ( fac is Minax || fac is Shadowlords );
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Mobiles/UnholyFamiliar.cs

@@ -0,0 +1,86 @@
+using System;
+using Server;
+using Server.Ethics;
+using Server.Mobiles;
+
+namespace Server.Mobiles
+{
+	[CorpseName( "an evil corpse" )]
+	public class UnholyFamiliar : BaseCreature
+	{
+		public override bool IsDispellable { get { return false; } }
+		public override bool IsBondable { get { return false; } }
+
+		[Constructable]
+		public UnholyFamiliar()
+			: base( AIType.AI_Melee, FightMode.Closest, 10, 1, 0.2, 0.4 )
+		{
+			Name = "a dark wolf";
+			Body = 99;
+			BaseSoundID = 0xE5;
+
+			SetStr( 96, 120 );
+			SetDex( 81, 105 );
+			SetInt( 36, 60 );
+
+			SetHits( 58, 72 );
+			SetMana( 0 );
+
+			SetDamage( 11, 17 );
+
+			SetDamageType( ResistanceType.Physical, 100 );
+
+			SetResistance( ResistanceType.Physical, 20, 25 );
+			SetResistance( ResistanceType.Fire, 10, 20 );
+			SetResistance( ResistanceType.Cold, 5, 10 );
+			SetResistance( ResistanceType.Poison, 5, 10 );
+			SetResistance( ResistanceType.Energy, 10, 15 );
+
+			SetSkill( SkillName.MagicResist, 57.6, 75.0 );
+			SetSkill( SkillName.Tactics, 50.1, 70.0 );
+			SetSkill( SkillName.Wrestling, 60.1, 80.0 );
+
+			Fame = 2500;
+			Karma = 2500;
+
+			VirtualArmor = 22;
+
+			Tamable = false;
+			ControlSlots = 1;
+		}
+
+		public override int Meat { get { return 1; } }
+		public override int Hides { get { return 7; } }
+		public override FoodType FavoriteFood { get { return FoodType.Meat; } }
+		public override PackInstinct PackInstinct { get { return PackInstinct.Canine; } }
+
+		public UnholyFamiliar( Serial serial )
+			: base( serial )
+		{
+		}
+
+		public override string ApplyNameSuffix( string suffix )
+		{
+			if ( suffix.Length == 0 )
+				suffix = Ethic.Evil.Definition.Adjunct.String;
+			else
+				suffix = String.Concat( suffix, " ", Ethic.Evil.Definition.Adjunct.String );
+
+			return base.ApplyNameSuffix( suffix );
+		}
+
+		public override void Serialize( GenericWriter writer )
+		{
+			base.Serialize( writer );
+
+			writer.Write( (int) 0 ); // version
+		}
+
+		public override void Deserialize( GenericReader reader )
+		{
+			base.Deserialize( reader );
+
+			int version = reader.ReadInt();
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Mobiles/UnholySteed.cs

@@ -0,0 +1,91 @@
+using System;
+using Server;
+using Server.Mobiles;
+using Server.Ethics;
+
+namespace Server.Mobiles
+{
+	[CorpseName( "an unholy corpse" )]
+	public class UnholySteed : BaseMount
+	{
+		public override bool IsDispellable { get { return false; } }
+		public override bool IsBondable { get { return false; } }
+
+		public override bool HasBreath { get { return true; } }
+		public override bool CanBreath { get { return true; } }
+
+		[Constructable]
+		public UnholySteed()
+			: base( "a dark steed", 0x74, 0x3EA7, AIType.AI_Melee, FightMode.Aggressor, 10, 1, 0.2, 0.4 )
+		{
+			SetStr( 496, 525 );
+			SetDex( 86, 105 );
+			SetInt( 86, 125 );
+
+			SetHits( 298, 315 );
+
+			SetDamage( 16, 22 );
+
+			SetDamageType( ResistanceType.Physical, 40 );
+			SetDamageType( ResistanceType.Fire, 40 );
+			SetDamageType( ResistanceType.Energy, 20 );
+
+			SetResistance( ResistanceType.Physical, 55, 65 );
+			SetResistance( ResistanceType.Fire, 30, 40 );
+			SetResistance( ResistanceType.Cold, 30, 40 );
+			SetResistance( ResistanceType.Poison, 30, 40 );
+			SetResistance( ResistanceType.Energy, 20, 30 );
+
+			SetSkill( SkillName.MagicResist, 25.1, 30.0 );
+			SetSkill( SkillName.Tactics, 97.6, 100.0 );
+			SetSkill( SkillName.Wrestling, 80.5, 92.5 );
+
+			Fame = 14000;
+			Karma = -14000;
+
+			VirtualArmor = 60;
+
+			Tamable = false;
+			ControlSlots = 1;
+		}
+
+		public override FoodType FavoriteFood { get { return FoodType.FruitsAndVegies | FoodType.GrainsAndHay; } }
+
+		public UnholySteed( Serial serial )
+			: base( serial )
+		{
+		}
+
+		public override string ApplyNameSuffix( string suffix )
+		{
+			if ( suffix.Length == 0 )
+				suffix = Ethic.Evil.Definition.Adjunct.String;
+			else
+				suffix = String.Concat( suffix, " ", Ethic.Evil.Definition.Adjunct.String );
+
+			return base.ApplyNameSuffix( suffix );
+		}
+
+		public override void OnDoubleClick( Mobile from )
+		{
+			if ( Ethic.Find( from ) != Ethic.Evil )
+				from.SendMessage( "You may not ride this steed." );
+			else
+				base.OnDoubleClick( from );
+		}
+
+		public override void Serialize( GenericWriter writer )
+		{
+			base.Serialize( writer );
+
+			writer.Write( (int) 0 ); // version
+		}
+
+		public override void Deserialize( GenericReader reader )
+		{
+			base.Deserialize( reader );
+
+			int version = reader.ReadInt();
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/Blight.cs

@@ -0,0 +1,80 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+using Server.Spells;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class Blight : Power
+	{
+		public Blight()
+		{
+			m_Definition = new PowerDefinition(
+					15,
+					"Blight",
+					"Velgo Ontawl",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+			from.Mobile.BeginTarget( 12, true, Targeting.TargetFlags.None, new TargetStateCallback( Power_OnTarget ), from );
+			from.Mobile.SendMessage( "Where do you wish to blight?" );
+		}
+
+		private void Power_OnTarget( Mobile fromMobile, object obj, object state )
+		{
+			Player from = state as Player;
+
+			IPoint3D p = obj as IPoint3D;
+
+			if ( p == null )
+				return;
+
+			if ( !CheckInvoke( from ) )
+				return;
+
+			bool powerFunctioned = false;
+
+			SpellHelper.GetSurfaceTop( ref p );
+
+			foreach ( Mobile mob in from.Mobile.GetMobilesInRange( 6 ) )
+			{
+				if ( mob == from.Mobile || !SpellHelper.ValidIndirectTarget( from.Mobile, mob ) )
+					continue;
+
+				if ( mob.GetStatMod( "Holy Curse" ) != null )
+					continue;
+
+				if ( !from.Mobile.CanBeHarmful( mob, false ) )
+					continue;
+
+				from.Mobile.DoHarmful( mob, true );
+
+				mob.AddStatMod( new StatMod( StatType.All, "Holy Curse", -10, TimeSpan.FromMinutes( 30.0 ) ) );
+
+				mob.FixedParticles( 0x374A, 10, 15, 5028, EffectLayer.Waist );
+				mob.PlaySound( 0x1FB );
+
+				powerFunctioned = true;
+			}
+
+			if ( powerFunctioned )
+			{
+				SpellHelper.Turn( from.Mobile, p );
+
+				Effects.PlaySound( p, from.Mobile.Map, 0x1FB );
+
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You curse the area." );
+
+				FinishInvoke( from );
+			}
+			else
+			{
+				from.Mobile.FixedEffect( 0x3735, 6, 30 );
+				from.Mobile.PlaySound( 0x5C );
+			}
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/SummonFamiliar.cs

@@ -0,0 +1,47 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+using Server.Mobiles;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class SummonFamiliar : Power
+	{
+		public SummonFamiliar()
+		{
+			m_Definition = new PowerDefinition(
+					5,
+					"Summon Familiar",
+					"Trubechs Vingir",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+			if ( from.Familiar != null && from.Familiar.Deleted )
+				from.Familiar = null;
+
+			if ( from.Familiar != null )
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You already have an unholy familiar." );
+				return;
+			}
+
+			if ( ( from.Mobile.Followers + 1 ) > from.Mobile.FollowersMax )
+			{
+				from.Mobile.SendLocalizedMessage( 1049645 ); // You have too many followers to summon that creature.
+				return;
+			}
+
+			UnholyFamiliar familiar = new UnholyFamiliar();
+
+			if ( Mobiles.BaseCreature.Summon( familiar, from.Mobile, from.Mobile.Location, 0x217, TimeSpan.FromHours( 1.0 ) ) )
+			{
+				from.Familiar = familiar;
+
+				FinishInvoke( from );
+			}
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/UnholyItem.cs

@@ -0,0 +1,71 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+using Server.Items;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class UnholyItem : Power
+	{
+		public UnholyItem()
+		{
+			m_Definition = new PowerDefinition(
+					5,
+					"Unholy Item",
+					"Vidda K'balc",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+			from.Mobile.BeginTarget( 12, false, Targeting.TargetFlags.None, new TargetStateCallback( Power_OnTarget ), from );
+			from.Mobile.SendMessage( "Which item do you wish to imbue?" );
+		}
+
+		private void Power_OnTarget( Mobile fromMobile, object obj, object state )
+		{
+			Player from = state as Player;
+
+			Item item = obj as Item;
+
+			if ( item == null )
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You may not imbue that." );
+				return;
+			}
+
+			if ( item.Parent != from.Mobile )
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You may only imbue items you are wearing." );
+				return;
+			}
+
+			if ( ( item.SavedFlags & 0x300 ) != 0 )
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "That has already beem imbued." );
+				return;
+			}
+
+			bool canImbue = ( item is Spellbook || item is BaseClothing || item is BaseArmor || item is BaseWeapon ) && ( item.Name == null );
+
+			if ( canImbue )
+			{
+				if ( !CheckInvoke( from ) )
+					return;
+
+				item.Hue = Ethic.Evil.Definition.PrimaryHue;
+				item.SavedFlags |= 0x200;
+
+				from.Mobile.FixedEffect( 0x375A, 10, 20 );
+				from.Mobile.PlaySound( 0x209 );
+
+				FinishInvoke( from );
+			}
+			else
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You may not imbue that." );
+			}
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/UnholySense.cs

@@ -0,0 +1,94 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class UnholySense : Power
+	{
+		public UnholySense()
+		{
+			m_Definition = new PowerDefinition(
+					0,
+					"Unholy Sense",
+					"Drewrok Velgo",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+			Ethic opposition = Ethic.Hero;
+
+			int enemyCount = 0;
+
+			int maxRange = 18 + from.Power;
+
+			Player primary = null;
+
+			foreach ( Player pl in opposition.Players )
+			{
+				Mobile mob = pl.Mobile;
+
+				if ( mob == null || mob.Map != from.Mobile.Map || !mob.Alive )
+					continue;
+
+				if ( !mob.InRange( from.Mobile, Math.Max( 18, maxRange - pl.Power ) ) )
+					continue;
+
+				if ( primary == null || pl.Power > primary.Power )
+					primary = pl;
+
+				++enemyCount;
+			}
+
+			StringBuilder sb = new StringBuilder();
+
+			sb.Append( "You sense " );
+			sb.Append( enemyCount == 0 ? "no" : enemyCount.ToString() );
+			sb.Append( enemyCount == 1 ? " enemy" : " enemies" );
+
+			if ( primary != null )
+			{
+				sb.Append( ", and a strong presense" );
+
+				switch ( from.Mobile.GetDirectionTo( primary.Mobile ) )
+				{
+					case Direction.West:
+						sb.Append( " to the west." );
+						break;
+					case Direction.East:
+						sb.Append( " to the east." );
+						break;
+					case Direction.North:
+						sb.Append( " to the north." );
+						break;
+					case Direction.South:
+						sb.Append( " to the south." );
+						break;
+
+					case Direction.Up:
+						sb.Append( " to the north-west." );
+						break;
+					case Direction.Down:
+						sb.Append( " to the south-east." );
+						break;
+					case Direction.Left:
+						sb.Append( " to the south-west." );
+						break;
+					case Direction.Right:
+						sb.Append( " to the north-east." );
+						break;
+				}
+			}
+			else
+			{
+				sb.Append( '.' );
+			}
+
+			from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x59, false, sb.ToString() );
+
+			FinishInvoke( from );
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/UnholyShield.cs

@@ -0,0 +1,34 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class UnholyShield : Power
+	{
+		public UnholyShield()
+		{
+			m_Definition = new PowerDefinition(
+					20,
+					"Unholy Shield",
+					"Velgo K'blac",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+			if ( from.IsShielded )
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You are already under the protection of an unholy shield." );
+				return;
+			}
+
+			from.BeginShield();
+
+			from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You are now under the protection of an unholy shield." );
+
+			FinishInvoke( from );
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/UnholySteed.cs

@@ -0,0 +1,47 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+using Server.Mobiles;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class UnholySteed : Power
+	{
+		public UnholySteed()
+		{
+			m_Definition = new PowerDefinition(
+					30,
+					"Unholy Steed",
+					"Trubechs Yeliab",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+			if ( from.Steed != null && from.Steed.Deleted )
+				from.Steed = null;
+
+			if ( from.Steed != null )
+			{
+				from.Mobile.LocalOverheadMessage( Server.Network.MessageType.Regular, 0x3B2, false, "You already have an unholy steed." );
+				return;
+			}
+
+			if ( ( from.Mobile.Followers + 1 ) > from.Mobile.FollowersMax )
+			{
+				from.Mobile.SendLocalizedMessage( 1049645 ); // You have too many followers to summon that creature.
+				return;
+			}
+
+			Mobiles.UnholySteed steed = new Mobiles.UnholySteed();
+
+			if ( Mobiles.BaseCreature.Summon( steed, from.Mobile, from.Mobile.Location, 0x217, TimeSpan.FromHours( 1.0 ) ) )
+			{
+				from.Steed = steed;
+
+				FinishInvoke( from );
+			}
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/UnholyWord.cs

@@ -0,0 +1,23 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class UnholyWord : Power
+	{
+		public UnholyWord()
+		{
+			m_Definition = new PowerDefinition(
+					100,
+					"Unholy Word",
+					"Velgo Oostrac",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+		}
+	}
+}

Scripts/Engines/Ethics/Evil/Powers/VileBlade.cs

@@ -0,0 +1,23 @@
+using System;
+using System.Collections.Generic;
+using System.Text;
+
+namespace Server.Ethics.Evil
+{
+	public sealed class VileBlade : Power
+	{
+		public VileBlade()
+		{
+			m_Definition = new PowerDefinition(
+					10,
+					"Vile Blade",
+					"Velgo Reyam",
+					""
+				);
+		}
+
+		public override void BeginInvoke( Player from )
+		{
+		}
+	}
+}