Kissable.cs

using System;
using XRL.Core;
using XRL.UI;
using System.Linq;
using System.Collections.Generic;
using System.Reflection;
using Qud.API;
using XRL.World.Effects;
using XRL.Rules;
using XRL.World.Parts;
using XRL.World.Anatomy;


namespace XRL.World.Parts
{
	[Serializable]
	public class acegiak_Kissable : IPart
	{

		[NonSerialized]
		public List<acegiak_KissingPreference> preferences = null;



		public acegiak_Kissable()
		{
			
		}


		public override bool SameAs(IPart p)
		{
			return false;
		}

		public override bool AllowStaticRegistration()
		{
			return true;
		}

		// 	public override bool FireEvent(Event E){
        //     if (E.ID == "GetInventoryActions")
		// 	{
		// 		if(ParentObject.pBrain.GetFeeling(E.GetGameObjectParameter("Owner")) > 0){
		// 			E.GetParameter<EventParameterGetInventoryActions>("Actions").AddAction("Kiss", 'k',  false, "&Wk&yiss", "InvCommandKiss");
		// 		}
		// 	}
		// 	if (E.ID == "InvCommandKiss" && Kiss(E.GetGameObjectParameter("Owner")))
		// 	{
		// 		if(ParentObject.pBrain.GetFeeling(E.GetGameObjectParameter("Owner")) > 0){
		// 			E.RequestInterfaceExit();
		// 		}
		// 	}

		// 	return base.FireEvent(E);
		// }
		public override bool WantEvent(int ID, int cascade)
		{
			if (!base.WantEvent(ID, cascade) && ID != GetInventoryActionsEvent.ID)
			{
				return ID == InventoryActionEvent.ID;
			}
			return true;
		}
		public override bool HandleEvent(GetInventoryActionsEvent E)
		{
			if(ParentObject.pBrain.GetFeeling(E.Actor) > 0){

				E.AddAction("Kiss", "kiss", "Kiss", null, 'k',  false, 10);
			
			}
			return base.HandleEvent(E);
		}


		public override bool HandleEvent(InventoryActionEvent E)
		{
			if (E.Command == "Kiss" && ParentObject.pBrain.GetFeeling(E.Actor) > 0 && Kiss(E.Actor))
			{
				E.RequestInterfaceExit();
			}			return base.HandleEvent(E);

		}
		public void KissBuff(GameObject who){
			if(!who.HasEffect("acegiak_EffectGay")){
				who.ApplyEffect(new acegiak_EffectGay());
			}
		}

		public bool Kiss(GameObject who)
		{
            
                if (!hasPart(ParentObject,"face")){
					if (who.IsPlayer())
					{
						Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&y doesn't have a face.");
					}
					return true;
                }
				if (!hasPart(who,"face")){
					if (who.IsPlayer())
					{
						Popup.Show("You don't have a face.");
					}
					return true;
                }

			string beguiled = "";
			string hbeguiled = " &Mkissed you back&y.";
			if(ParentObject.GetIntProperty("BeguilingBonusApplied") >0){
				beguiled = "\n"+ParentObject.It+ParentObject.GetVerb("quake")+" with fear and manic ecstasy.";
				hbeguiled = " could not resist.";
			}else{
                
				if (ParentObject.pBrain.GetFeeling(who) < 20)
				{
					if (who.IsPlayer())
					{
						Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&y" + ParentObject.GetVerb("shy") + " away from you.");
					}
					ParentObject.pBrain.AdjustFeeling(who,-5);

					if(ParentObject.pBrain.GetFeeling(who) < 0){
						Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&Y is upset by your advances!");
					}
					return true;
				}
				if(!isAttractedTo(who)){
					if (who.IsPlayer())
					{
						Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&Y isn't attracted to you.");
					}
					ParentObject.pBrain.AdjustFeeling(who,-10);

					if(ParentObject.pBrain.GetFeeling(who) < 0){
						Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&Y is upset by your advances!");
					}
					return true;
				}
				
			}

			if(ParentObject.GetPart<acegiak_Romancable>() != null){

				if(ParentObject.GetPart<acegiak_Romancable>().patience<=0){
					ParentObject.pBrain.AdjustFeeling(who,-5);
					Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&Y doesn't want to kiss you right now.");

					if(ParentObject.pBrain.GetFeeling(who) < 0){
						Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&Y is upset by your advances!");
					}
				}
				ParentObject.GetPart<acegiak_Romancable>().patience--;
			}


            
			string verb = "kiss";
			GameObject parentObject = ParentObject;
			IPart.XDidYToZ(who, verb, parentObject);
			if (who.IsPlayer())
			{
				if (ParentObject.HasPropertyOrTag("SpecialKissResponse"))
				{
					Popup.Show(ParentObject.GetTag("SpecialKissResponse"));
				}
				else
				{
					KissBuff(who);
					Popup.Show(ParentObject.The + ParentObject.DisplayNameOnlyDirect + "&y " + ParentObject.GetPropertyOrTag("KissResponse", "&Mkisses you back") + "."+beguiled);
					JournalAPI.AddAccomplishment("&y You kissed "+ParentObject.a + ParentObject.DisplayNameOnlyDirect +" and "+ParentObject.it+hbeguiled, "general", null);
				}
			}
			ParentObject.Heartspray();
			if(ParentObject.pBrain.GetFeeling(who) < 50){
					ParentObject.pBrain.AdjustFeeling(who,10);
			}
			who.UseEnergy(1000, "Kissing");
			ParentObject.FireEvent(Event.New("ObjectKissed", "Object", ParentObject, "Kisser", who));
			return true;
		}

		public void havePreference(){
			if(preferences == null){
				preferences = new List<acegiak_KissingPreference>();

				List<acegiak_KissingPreference> possible = new List<acegiak_KissingPreference>();

				if(GameObjectFactory.Factory == null || GameObjectFactory.Factory.BlueprintList == null){
					return;
				}
				foreach (GameObjectBlueprint blueprint in GameObjectFactory.Factory.BlueprintList)
				{
					if (!blueprint.IsBaseBlueprint() && blueprint.DescendsFrom("KissingPreference"))
					{
						//IPart.AddPlayerMessage(blueprint.Name);
						GameObject sample = GameObjectFactory.Factory.CreateSampleObject(blueprint.Name);
						if(sample.HasTag("classname") && sample.GetTag("classname") != null && sample.GetTag("classname") != ""){
                    		acegiak_KissingPreference preference = Activator.CreateInstance(Type.GetType(sample.GetTag("classname")),ParentObject) as acegiak_KissingPreference;
							possible.Add(preference);
						}
					}
				}
				int count = Stat.Rnd2.Next(5);
				for(int i = 0; i<count;i++){
					int w = Stat.Rnd2.Next(possible.Count());
					preferences.Add(possible[w]);
				}
			}
		}

		public float attractionAmount(GameObject kisser){
			havePreference();
			float sum = 0; 
			IPart.AddPlayerMessage("" + ParentObject.the + ParentObject.DisplayNameOnly + "&c examines you.");
			List<string> many = new List<string>();
			foreach(acegiak_KissingPreference pref in preferences){
				acegiak_KissingPreferenceResult output = pref.attractionAmount(ParentObject,kisser);
				sum += output.amount;
				if(kisser.IsPlayer() && !many.Contains(output.explanation)){
					IPart.AddPlayerMessage("" + ParentObject.the + ParentObject.DisplayNameOnly + " "+output.explanation+".");
				}
				many.Add(output.explanation);
			}
			return sum;
		}


        public bool isAttractedTo(GameObject kisser){
			float sum = attractionAmount(kisser);
            if(sum > 0){
                return true;
            }
            return false;
        }

        private bool hasPart(GameObject GO, string partname){
            Body part = GO.GetPart<Body>();
            if (part == null)
            {
				return false;
            }

			BodyPart bpart = part.GetBody();

			return bpart != null;
        }

		private bool partHasPart(BodyPart part, string partname){
			if(part.Type == partname){
				return true;
			}
			foreach(BodyPart subpart in part.Parts){
				if(subpart != part && partHasPart(subpart,partname)){
					return true;
				}
			}
			return false;
		}

		// public Conversation InjectRomance(Conversation conversation){

		// 	if(conversation == null
		// 		|| conversation.NodesByID == null
		// 		|| ! conversation.NodesByID.ContainsKey("Start")
		// 		|| conversation.NodesByID["Start"].Choices == null){
		// 			return conversation;
		// 	}
			
		// 	ConversationChoice returntostart = new ConversationChoice();
		// 	returntostart.Text = "Ok.";
		// 	returntostart.GotoID = "Start";

		// 	ConversationNode aboutme = new ConversationNode();
		// 	aboutme.ID = "acegiak_aboutme";
		// 	aboutme.Text = "I like long walks on the beach where sometimes I look back and there's only one set of footprints";
		// 	aboutme.Choices.Add(returntostart);

		// 	ConversationChoice romanticEnquiry = new ConversationChoice();
		// 	romanticEnquiry.Text = "Tell me a little about yourself.";
		// 	romanticEnquiry.GotoID = "acegiak_about";
			
		// 	conversation.NodesByID["Start"].Choices.Add(romanticEnquiry);
		// 	conversation.AddNode(aboutme);

		// 	return conversation;
		// }


	


		// SaveData is called when the game is ready to save this object, so we override it here.
        public override void SaveData(SerializationWriter Writer)
        {
			this.havePreference();


			if(Writer == null){
				throw new Exception("The Writer is null!");
			}
			if(preferences == null){
				throw new Exception("The preferences list is null!");
			}


			this.preferences.RemoveAll(d=>d==null);

            // We have to call base.SaveData to save all normally serialized fields on our class
            base.SaveData(Writer);
			
            // Writing out the number of items in this list lets us know how many items we need to read back in on Load
            Writer.Write(preferences.Count);
            foreach (acegiak_KissingPreference preference in preferences)
            {
				preference.Save(Writer);
            }


        }

        // Load data is called when loading the save game, we also need to override this
        public override void LoadData(SerializationReader Reader)
        {
            // Load our normal data
            base.LoadData(Reader);


			this.preferences = new List<acegiak_KissingPreference>();


			if(Reader == null){
				throw new Exception("The Reader is null!");
			}
			if(preferences == null){
				throw new Exception("The preferences list is null!");
			}

			if(this == null){
				throw new Exception("This is null!");
			}


            // Read the number we wrote earlier telling us how many items there were
            int arraySize = Reader.ReadInt32();
            for (int i = 0; i < arraySize; i++)
            {
               
                acegiak_KissingPreference.Read(Reader,this);
                // Similar to above, if we had a basic type in our list, we would instead use the Reader.Read function specific to our object type.
            }

        }

	}
}