Added Generous Donor Cheatmode - default off

Source/Genes/Life_Force/Patches/Patch_SatisfyPersonal_LifeForceGain.cs

@@ -72,6 +72,14 @@ namespace RJW_Genes
 				if (GeneUtility.IsSexualDrainer(PawnWithLifeForce) 
 					&& !props.pawn.health.hediffSet.HasHediff(HediffDefOf.rjw_genes_succubus_drained) 
 					&& !GeneUtility.IsSexualDrainer(props.pawn))
+				{
+					if (GeneUtility.IsGenerousDonor(props.pawn) && RJW_Genes_Settings.rjw_genes_generous_donor_cheatmode)
+					{
+						// Cheatmode is on, do not drain but give life 
+						GeneUtility.OffsetLifeForce(GeneUtility.GetLifeForceGene(PawnWithLifeForce), LIFEFORCE_GAINED_FROM_DRAINER_GENE); 
+						if (RJW_Genes_Settings.rjw_genes_detailed_debug)
+							ModLog.Message($"{props.pawn.Name} was not (sexually) drained by {PawnWithLifeForce.Name}, because Cheatmode for Generous Donors is on");
+					} else
                     {
 						if (RJW_Genes_Settings.rjw_genes_detailed_debug)
 							ModLog.Message($"{props.pawn.Name} has been (sexually) drained by {PawnWithLifeForce.Name}");
@@ -80,6 +88,7 @@ namespace RJW_Genes
 					}
 				}
 			}
+		}
 
 		public static void TransferFertilin(SexProps props, float absorb_percentage = 1f)
 		{
@@ -90,19 +99,25 @@ namespace RJW_Genes
 			//Around quarter get ejected everytime pawn cums
 			float multiplier = Rand.Range(0.10f, 0.40f);
 
-
+			if (GeneUtility.IsGenerousDonor(props.pawn) && RJW_Genes_Settings.rjw_genes_generous_donor_cheatmode)
+			{
+				// Do nothing, Cheatmode is on
+				multiplier = 1;
+			} 
+			else 
+			{ 
 				//Create a new ferilin_lost hediff or increase it
 				if (fertilin_lost == null)
 				{
 					Hediff new_fertilin_lost = HediffMaker.MakeHediff(HediffDefOf.rjw_genes_fertilin_lost, props.pawn);
 					props.pawn.health.AddHediff(new_fertilin_lost);
 					new_fertilin_lost.Severity = multiplier;
-			}
+				} else
-			else
 				{
 					multiplier *= 1 - fertilin_lost.Severity;
 					fertilin_lost.Severity += multiplier;
 				}
+			}
 
 			multiplier *= absorb_percentage;
 			//Currently taking the sum of all penises, maybe I should just consider one at random

Source/Settings/RJW_Genes_Settings.cs

@@ -36,6 +36,9 @@ namespace RJW_Genes
 
             }
 
+            listing_Standard.Gap(5f);
+            listing_Standard.CheckboxLabeled("generous-donor cheatmode", ref rjw_genes_generous_donor_cheatmode, "When enabled, pawns with the 'generous donor' are not drained and not fertilin exhausted. Hence they can fuel succubi and incubi non-stop. This makes them drastically easier to keep, and you should not do it.", 0f, 1f);
+
             listing_Standard.Gap(5f);
             listing_Standard.CheckboxLabeled("detailed-debug", ref rjw_genes_detailed_debug, "Adds detailed information to the log about interactions and genes.", 0f, 1f);
             listing_Standard.End();
@@ -46,11 +49,14 @@ namespace RJW_Genes
             base.ExposeData();
             Scribe_Values.Look<float>(ref RJW_Genes_Settings.rjw_genes_fertilin_from_animals_factor, "rjw_genes_fertilin_from_animals_factor", RJW_Genes_Settings.rjw_genes_fertilin_from_animals_factor, true);
             Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_detailed_debug, "rjw_genes_detailed_debug", RJW_Genes_Settings.rjw_genes_detailed_debug, true);
+
             Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_sexdemon_visit, "rjw_genes_sexdemon_visit", RJW_Genes_Settings.rjw_genes_sexdemon_visit, true);
             Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_sexdemon_join_size_matters, "rjw_genes_sexdemon_join_size_matters", RJW_Genes_Settings.rjw_genes_sexdemon_join_size_matters, true);
             Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_sexdemon_visit_groups, "rjw_genes_sexdemon_groups", RJW_Genes_Settings.rjw_genes_sexdemon_visit_groups, true);
             Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_sexdemon_visit_succubi, "rjw_genes_sexdemon_succubi", RJW_Genes_Settings.rjw_genes_sexdemon_visit_succubi, true);
             Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_sexdemon_visit_incubi, "rjw_genes_sexdemon_incubi", RJW_Genes_Settings.rjw_genes_sexdemon_visit_incubi, true);
+
+            Scribe_Values.Look<bool>(ref RJW_Genes_Settings.rjw_genes_generous_donor_cheatmode, "rjw_genes_generous_donor_cheatmode", RJW_Genes_Settings.rjw_genes_generous_donor_cheatmode, true);
         }
 
         public static bool rjw_genes_detailed_debug = false;
@@ -62,5 +68,7 @@ namespace RJW_Genes
         public static bool rjw_genes_sexdemon_visit_groups = true;
         public static bool rjw_genes_sexdemon_visit_succubi = true;
         public static bool rjw_genes_sexdemon_visit_incubi = true;
+
+        public static bool rjw_genes_generous_donor_cheatmode = false;
     }
 }