rjw-genes/Source/Genes/ExtraGenitalia/Gene_NoAnus.cs

using Verse;
using rjw;
using RimWorld;

namespace RJW_Genes
{
    public class Gene_NoAnus : Gene
    {

        internal Hediff removed_anus;

        // TODO: This gene only works if another Gene was set specifying the genitalia. 
        // If it is added later, it still works, but on creation it needs a different 
        // TODO: If all Genitalia are removed by genes, RJW adds some to the pawns at spawn
        public override void PostMake()
        {
            base.PostMake();
            if (GenitaliaUtility.PawnStillNeedsGenitalia(pawn))
                Sexualizer.sexualize_pawn(pawn);

            if (removed_anus == null)
            {
                RemoveButStoreAnus();
            }
        }
        
        public override void PostAdd()
        {
            base.PostAdd();

            if (removed_anus == null)
            {
                RemoveButStoreAnus();
            }
        }

        public override void PostRemove()
        {
            base.PostRemove();
            if(removed_anus != null)    
                pawn.health.AddHediff(removed_anus);
        }

        internal void RemoveButStoreAnus()
        {
            var partBPR = Genital_Helper.get_anusBPR(pawn);
            Hediff anusToRemove = Genital_Helper.get_AllPartsHediffList(pawn).FindLast(x => GenitaliaChanger.IsAnus(x));

            if(anusToRemove != null)
            {
                removed_anus = anusToRemove;
                pawn.health.RemoveHediff(anusToRemove);
            }
        }

    }
}