From abc2248a58321dccd0c48bf991c25b8c30b9184b Mon Sep 17 00:00:00 2001 From: Pregmodder <pregmodder@gmail.com> Date: Wed, 19 Feb 2020 03:31:28 -0500 Subject: [PATCH] saLiveWithHG.tw tweaks and additions --- src/uncategorized/saLiveWithHG.tw | 190 +++++++++++++++++++++--------- 1 file changed, 133 insertions(+), 57 deletions(-) diff --git a/src/uncategorized/saLiveWithHG.tw b/src/uncategorized/saLiveWithHG.tw index 02c73dfecc7..566ba58c518 100644 --- a/src/uncategorized/saLiveWithHG.tw +++ b/src/uncategorized/saLiveWithHG.tw @@ -11,6 +11,97 @@ <<setLocalPronouns $HeadGirl 2>> +/* run this up here so that it affects things better */ +<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> + <<set $HGTastes = 1>> +<<elseif $arcologies[0].FSRepopulationFocus != "unset">> + <<set $HGTastes = 4>> +<<elseif $arcologies[0].FSBodyPurist != "unset">> + <<set $HGTastes = 1>> +<<elseif $arcologies[0].FSDegradationist != "unset">> + <<set $HGTastes = 3>> +<<elseif $arcologies[0].FSAssetExpansionist != "unset">> + <<set $HGTastes = 3>> +<<elseif $arcologies[0].FSTransformationFetishist != "unset">> + <<set $HGTastes = 3>> +<<else>> + <<set $HGTastes = 2>> +<</if>> +<<set _diet = $slaves[$i].diet>> +<<if ($arcologies[0].FSRepopulationFocusPregPolicy == 1 || ($arcologies[0].FSRestart == "unset" && $HeadGirl.fetish == "pregnancy")) && canImpreg($slaves[$i], $HeadGirl) && ($dietFertility == 1)>> + <<if $slaves[$i].diet != "fertility">> + <<set $slaves[$i].diet = "fertility">> + <</if>> +<<elseif ($slaves[$i].weight < 100 && $arcologies[0].FSHedonisticDecadence >= 20) || ($slaves[$i].weight < -10)>> + <<if $slaves[$i].diet != "fattening">> + <<set $slaves[$i].diet = "fattening">> + <</if>> +<<elseif $slaves[$i].weight > 30 && $arcologies[0].FSHedonisticDecadence == "unset">> + <<if $slaves[$i].diet != "restricted">> + <<set $slaves[$i].diet = "restricted">> + <</if>> +<<elseif (($slaves[$i].muscles <= 95 && (($arcologies[0].FSPhysicalIdealist > 0 && $arcologies[0].FSPhysicalIdealistLaw == 0) || (($HeadGirl.fetish == "submissive" || $HeadGirl.fetish == "masochist") && $HeadGirl.fetishKnown == 1))) || ($slaves[$i].muscles <= 45 && ($arcologies[0].FSPhysicalIdealist > 0 && $arcologies[0].FSPhysicalIdealistLaw == 1)) || $slaves[$i].muscles <= 5) && !isAmputee($slaves[$i])>> + <<if $slaves[$i].diet != "muscle building">> + <<set $slaves[$i].diet = "muscle building">> + <</if>> +<<elseif $slaves[$i].balls > 0 && $HeadGirl.fetish == "cumslut" && $HeadGirl.fetishKnown == 1 && $cumProDiet == 1>> + <<if $slaves[$i].diet != "cum production">> + <<set $slaves[$i].diet = "cum production">> + <</if>> +<<else>> + <<if $slaves[$i].diet != "healthy">> + <<set $slaves[$i].diet = "healthy">> + <</if>> +<</if>> +<<set _hormones = $slaves[$i].hormones>> +<<if $HGSuiteHormones != 0 && $slaves[$i].hormones != 2>> + <<set $slaves[$i].hormones = 2>> +<</if>> +<<if $HGSuiteDrugs != 0>> + <<if ($slaves[$i].health.condition < 60)>> + <<set $slaves[$i].curatives = 2>> + <</if>> + <<if ($slaves[$i].lips <= 20)>> + <<set $slaves[$i].drugs = "lip injections">> + <<elseif $arcologies[0].FSSlaveProfessionalismResearch == 1 && $HGSuiteEquality != 0 && canImproveIntelligence($slaves[$i])>> + <<set $slaves[$i].drugs = "psychostimulants">> + <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 18>> + <<set $slaves[$i].drugs = "hyper butt injections">> + <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 8>> + <<set $slaves[$i].drugs = "butt injections">> + <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "cumslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].balls < 100 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>> + <<set $slaves[$i].drugs = "hyper testicle enhancement">> + <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "cumslut") && $slaves[$i].balls < 10 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>> + <<set $slaves[$i].drugs = "testicle enhancement">> + <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "masochist" || $HeadGirl.fetish == "submissive") && canImproveHeight($slaves[$i])>> + <<set $slaves[$i].drugs = "growth stimulants">> + <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "boobs") && ($slaves[$i].boobs < 8000)>> + <<if $arcologies[0].FSAssetExpansionistResearch == 1>> + <<set $slaves[$i].drugs = "hyper breast injections">> + <<else>> + <<set $slaves[$i].drugs = "breast injections">> + <</if>> + <<elseif canImpreg($slaves[$i], $HeadGirl) && $arcologies[0].FSRestart == "unset" && ($HGTastes == 4 || $HeadGirl.fetish == "pregnancy" || $arcologies[0].FSRepopulationFocusPregPolicy == 1)>> + <<set $slaves[$i].drugs = "fertility drugs">> + <<elseif $HGTastes > 1>> + <<if ($slaves[$i].lips <= 70)>> + <<set $slaves[$i].drugs = "lip injections">> + <<elseif ($slaves[$i].butt < $slaves[$i].boobs/1000)>> + <<set $slaves[$i].drugs = "butt injections">> + <<else>> + <<set $slaves[$i].drugs = "breast injections">> + <</if>> + <<else>> + <<set $slaves[$i].drugs = "no drugs">> + <</if>> + <<if ($slaves[$i].health.condition < 100)>> + <<set $slaves[$i].curatives = 2>> + <</if>> +<</if>> +<<if $slaves[$i].rules.living != "luxurious">> + <<set $slaves[$i].rules.living = "luxurious">> +<</if>> + <<if $slaves[$i].devotion > 20>> <<if $HGSlaveSuccess == 1>> looks after your Head Girl <<= SlaveFullName($HeadGirl)>> domestically and sexually, freeing _him2 to devote more of _his2 time to looking after your other slaves. @@ -337,11 +428,33 @@ $HeadGirl.slaveName knows better than to even consider getting knocked up by $slaves[$i].slaveName. <</if>> <<elseif $arcologies[0].FSRepopulationFocusPregPolicy == 1 && canImpreg($slaves[$i], $HeadGirl)>> - $HeadGirl.slaveName wastes no time in chasing the currents trend and hurries to @@.lime;impregnate@@ $slaves[$i].slaveName. + $HeadGirl.slaveName wastes no time in chasing the current trend and hurries to @@.lime;impregnate@@ $slaves[$i].slaveName. <<= knockMeUp($slaves[$i], 100, 2, $HeadGirl.ID, 1)>> - <<elseif $HeadGirl.fetish != "pregnancy" && $arcologies[0].FSRepopulationFocusPregPolicy == 0 && $slaves[$i].pregKnown == 1 && $slaves[$i].preg < 30 && $arcologies[0].FSRepopulationFocus == "unset" && $HGSuiteDrugs == 1>> - $HeadGirl.slaveName promptly aborts the child growing in $slaves[$i].slaveName since _he2 prefers _his2 <<= $girl>>s not harboring someone else's child or loaded down with _his2 own unwanted spawn. - <<run TerminatePregnancy($slaves[$i])>> + <<elseif $slaves[$i].pregKnown == 1>> + <<if $slaves[$i].breedingMark == 1>> + Since $slaves[$i].slaveName is marked as a breeding slave, $HeadGirl.slaveName feels it is _his duty to keep $his pregnancy safe. + <<elseif $slaves[$i].pregSource == -1>> + Since $slaves[$i].slaveName is bearing your child<<if $slaves[$i].pregType > 1>>ren<</if>>, $HeadGirl.slaveName feels _he has been tasked with keeping $his pregnancy safe. + <<elseif $HeadGirl.fetish == "pregnancy">> + $HeadGirl.slaveName + <<if $HeadGirl.fetishKnown == 1>> + <<if $slaves[$i].bellyPreg > 500>> + enjoys the swell of $slaves[$i].slaveName's baby bump, giving _him plenty of reason to keep $his pregnancy. + <<else>> + keeps $slaves[$i].slaveName pregnant so that _he may savor $his growth. + <</if>> + <<else>> + pays an unusual amount of attention to $slaves[$i].slaveName's pregnancy. + <</if>> + <<elseif $arcologies[0].FSRepopulationFocusPregPolicy == 0 && $arcologies[0].FSRepopulationFocus == "unset" && $HGSuiteDrugs == 1>> + <<if $slaves[$i].preg > $slaves[$i].pregData.normalBirth-2 && $slaves[$i].preg > $slaves[$i].pregData.minLiveBirth && $slaves[$i].broodmother === 0 && $slaves[$i].labor === 0>> + $HeadGirl.slaveName has no interest in a slut stuffed full of unwanted spawn, so _he promptly doses slaves[$i].slaveName with labor inducing agents to get $him back in fucking shape. + <<set $slaves[$i].labor = 1, $slaves[$i].induce = 1, $birthee = 1>> + <<else>> + $HeadGirl.slaveName promptly aborts the child growing in $slaves[$i].slaveName since _he2 prefers _his2 <<= $girl>>s not harboring someone else's child or loaded down with _his2 own unwanted spawn. + <<run TerminatePregnancy($slaves[$i])>> + <</if>> + <</if>> <</if>> <</if>> @@ -795,19 +908,24 @@ <</if>> <</if>> -<<if ($slaves[$i].weight < 100 && $arcologies[0].FSHedonisticDecadence >= 20) || ($slaves[$i].weight < -10)>> +<<if ($arcologies[0].FSRepopulationFocusPregPolicy == 1 || ($arcologies[0].FSRestart == "unset" && $HeadGirl.fetish == "pregnancy")) && canImpreg($slaves[$i], $HeadGirl) && ($dietFertility == 1)>> + $HeadGirl.slaveName thinks $slaves[$i].slaveName could do with a bigger bump <<if $arcologies[0].FSRepopulationFocusPregPolicy>>since pregnant <<= $girl>>s are all the rage in your arcology <</if>> + <<if _diet != "fertility">> + and assigns $him a diet to promote ovulation. + <<else>> + and keeps $him on $his fertility diet. + <</if>> +<<elseif ($slaves[$i].weight < 100 && $arcologies[0].FSHedonisticDecadence >= 20) || ($slaves[$i].weight < -10)>> $HeadGirl.slaveName thinks $slaves[$i].slaveName could use a little extra weight <<if $arcologies[0].FSHedonisticDecadence >= 20>>since plump <<= $girl>>s are all the rage in your arcology <</if>> - <<if $slaves[$i].diet != "fattening">> + <<if _diet != "fattening">> and assigns $him a diet to fatten $him up. - <<set $slaves[$i].diet = "fattening">> <<else>> and keeps $him on $his fattening diet. <</if>> <<elseif $slaves[$i].weight > 30 && $arcologies[0].FSHedonisticDecadence == "unset">> $HeadGirl.slaveName thinks $slaves[$i].slaveName is a little too porky - <<if $slaves[$i].diet != "restricted">> + <<if _diet != "restricted">> and puts $him on a diet. - <<set $slaves[$i].diet = "restricted">> <<else>> and keeps $him on $his diet. <</if>> @@ -822,106 +940,68 @@ <<else>> could use a bit of muscle <</if>> - <<if $slaves[$i].diet != "muscle building">> + <<if _diet != "muscle building">> and makes $him work out hard. - <<set $slaves[$i].diet = "muscle building">> <<else>> and keeps $him working out. <</if>> <<elseif $slaves[$i].balls > 0 && $HeadGirl.fetish == "cumslut" && $HeadGirl.fetishKnown == 1 && $cumProDiet == 1>> $HeadGirl.slaveName loves cum, so _he2 - <<if $slaves[$i].diet != "cum production">> + <<if _diet != "cum production">> puts - <<set $slaves[$i].diet = "cum production">> <<else>> keeps <</if>> $slaves[$i].slaveName on a diet designed to make $him cum harder and stronger. <<else>> $HeadGirl.slaveName thinks $slaves[$i].slaveName is fine as is - <<if $slaves[$i].diet != "healthy">> + <<if _diet != "healthy">> and puts $him on a normal diet. - <<set $slaves[$i].diet = "healthy">> <<else>> and keeps $him on $his healthy diet. <</if>> <</if>> -<<if $HGSuiteHormones != 0 && $slaves[$i].hormones != 2>> +<<if $HGSuiteHormones != 0 && _hormones != 2>> $HeadGirl.slaveName puts $slaves[$i].slaveName on intensive female hormones, since _he2 expects $him to act as the submissive, feminine partner. - <<set $slaves[$i].hormones = 2>> -<</if>> - -<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> - <<set $HGTastes = 1>> -<<elseif $arcologies[0].FSRepopulationFocus != "unset">> - <<set $HGTastes = 4>> -<<elseif $arcologies[0].FSBodyPurist != "unset">> - <<set $HGTastes = 1>> -<<elseif $arcologies[0].FSDegradationist != "unset">> - <<set $HGTastes = 3>> -<<elseif $arcologies[0].FSAssetExpansionist != "unset">> - <<set $HGTastes = 3>> -<<elseif $arcologies[0].FSTransformationFetishist != "unset">> - <<set $HGTastes = 3>> -<<else>> - <<set $HGTastes = 2>> <</if>> <<if $HGSuiteDrugs != 0>> <<if ($slaves[$i].health.condition < 60)>> $HeadGirl.slaveName gives $slaves[$i].slaveName curatives, since _he2 wants a shiningly healthy living partner. - <<set $slaves[$i].curatives = 2>> <</if>> <<if ($slaves[$i].lips <= 20)>> $HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since _he2 wants to get oral from plump, luscious lips. - <<set $slaves[$i].drugs = "lip injections">> + <<elseif $arcologies[0].FSSlaveProfessionalismResearch == 1 && $HGSuiteEquality != 0 && canImproveIntelligence($slaves[$i])>> + $HeadGirl.slaveName gives $slaves[$i].slaveName psychostimulants, since $him being smarter will benefit them both when $he is in charge. <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 18>> $HeadGirl.slaveName gives $slaves[$i].slaveName hyper ass injections, since _he2 never once thought it possible to fuck an ass as big as _he2 is. - <<set $slaves[$i].drugs = "hyper butt injections">> <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 8>> $HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since _he2 likes comfortable padding as _he2 fucks a butt. - <<set $slaves[$i].drugs = "butt injections">> <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "cumslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].balls < 100 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>> $HeadGirl.slaveName gives $slaves[$i].slaveName hyper testicle injections, since _he2 wants to swim in a river of cum. - <<set $slaves[$i].drugs = "hyper testicle enhancement">> <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "cumslut") && $slaves[$i].balls < 10 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>> $HeadGirl.slaveName gives $slaves[$i].slaveName testicle injections, since _he2 wants $slaves[$i].slaveName shooting bigger loads. - <<set $slaves[$i].drugs = "testicle enhancement">> <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "masochist" || $HeadGirl.fetish == "submissive") && canImproveHeight($slaves[$i])>> $HeadGirl.slaveName has a subconscious need to be hurt by the biggest, strongest $girl possible, so $he gives $slaves[$i].slaveName injections of growth stimulants to make $him grow taller. - <<set $slaves[$i].drugs = "growth stimulants">> <<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "boobs") && ($slaves[$i].boobs < 8000)>> $HeadGirl.slaveName gives $slaves[$i].slaveName <<if $arcologies[0].FSAssetExpansionistResearch == 1>>hyper <</if>> tit injections, since as far as _he2's concerned there's no such thing as too much boob. - <<if $arcologies[0].FSAssetExpansionistResearch == 1>> - <<set $slaves[$i].drugs = "hyper breast injections">> - <<else>> - <<set $slaves[$i].drugs = "breast injections">> - <</if>> <<elseif ($HGTastes == 4 || $HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], $HeadGirl) && $arcologies[0].FSRestart == "unset">> $HeadGirl.slaveName gives $slaves[$i].slaveName fertility enhancers, since _he2 wants to see $slaves[$i].slaveName heavy with child. - <<set $slaves[$i].drugs = "fertility drugs">> <<elseif $arcologies[0].FSRepopulationFocusPregPolicy == 1 && canImpreg($slaves[$i], $HeadGirl)>> $HeadGirl.slaveName gives $slaves[$i].slaveName fertility enhancers, since pregnancy is popular and _he2 wants $slaves[$i].slaveName to look hot. - <<set $slaves[$i].drugs = "fertility drugs">> <<elseif $HGTastes > 1>> <<if ($slaves[$i].lips <= 70)>> $HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since _he2 thinks $slaves[$i].slaveName should have lips so big $he can barely speak. - <<set $slaves[$i].drugs = "lip injections">> <<elseif ($slaves[$i].butt < $slaves[$i].boobs/1000)>> $HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since _he2 loves curves and thinks $slaves[$i].slaveName's butt needs the most work. - <<set $slaves[$i].drugs = "butt injections">> <<else>> $HeadGirl.slaveName gives $slaves[$i].slaveName boob injections, since _he2 loves curves and thinks $slaves[$i].slaveName's tits need the most work. - <<set $slaves[$i].drugs = "breast injections">> <</if>> - <<else>> - <<set $slaves[$i].drugs = "no drugs">> <</if>> <<else>> <<if ($slaves[$i].health.condition < 100)>> $HeadGirl.slaveName gives $slaves[$i].slaveName curatives, since _his2 assistant could be healthier. - <<set $slaves[$i].curatives = 2>> <</if>> <</if>> @@ -1005,10 +1085,6 @@ <</if>> <</if>> -<<if $slaves[$i].rules.living != "luxurious">> - <<set $slaves[$i].rules.living = "luxurious">> -<</if>> - <<if ($HeadGirl.relationshipTarget == $slaves[$i].ID)>> <<set ($HeadGirl.relationship = $slaves[$i].relationship)>> <</if>> -- GitLab