From d6b4a558c70573e09bdec719006f100f7e2f695e Mon Sep 17 00:00:00 2001 From: pregmodfan <pregmodfan@cock.li> Date: Mon, 13 Mar 2017 00:00:17 +0200 Subject: [PATCH] pregnancy speed control check to supress seBirth if not needed, more testing, pregnancy control added to widget --- src/uncategorized/saDrugs.tw | 2 +- src/uncategorized/saLongTermEffects.tw | 4 ++-- src/utility/miscWidgets.tw | 15 +++++++++++++++ 3 files changed, 18 insertions(+), 3 deletions(-) diff --git a/src/uncategorized/saDrugs.tw b/src/uncategorized/saDrugs.tw index 68c82a7f4cd..30e4744a3d3 100644 --- a/src/uncategorized/saDrugs.tw +++ b/src/uncategorized/saDrugs.tw @@ -721,7 +721,7 @@ <</switch>> <<if $slaves[$i].pregControl == "slow gestation">> <<if $slaves[$i].preg > 30>> - She in late pregnancy term now. Slowing gestation agents @@color:red;can't supress labor@@ and her slow down agents regimen is ended to prevent health damage. + She in late pregnancy term now. Slowing gestation agents @@color:red;can't supress labor@@ and her regimen is ended to prevent health damage. <<set $slaves[$i].pregControl = "none">> <<elseif $slaves[$i].preg > 0>> Her belly feels very docile, gestation speed is @@color:yellow;greatly reduced@@. diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw index c0f0b795475..3d2b9a153f6 100644 --- a/src/uncategorized/saLongTermEffects.tw +++ b/src/uncategorized/saLongTermEffects.tw @@ -5946,10 +5946,10 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr <<set $burstee to 1>> <</if>> -<<if ($slaves[$i].preg > 30) && ($slaves[$i].pregType < 50) && (random(1,100) > 90)>> +<<if ($slaves[$i].preg > 30) && ($slaves[$i].pregType < 50) && (random(1,100) > 90) && $slaves[$i].pregControl != "labor supressors">> <<set $slaves[$i].labor to 1>> <<set $birthee to 1>> -<<elseif ($slaves[$i].preg > 35) && ($slaves[$i].pregType < 50)>> +<<elseif ($slaves[$i].preg > 35) && ($slaves[$i].pregType < 50) && $slaves[$i].pregControl != "labor supressors">> <<set $slaves[$i].labor to 1>> <<set $birthee to 1>> <<elseif ($slaves[$i].preg > 30) && ($slaves[$i].pregType is 50) && ($slaves[$i].assignment != "labor in the production line")>> diff --git a/src/utility/miscWidgets.tw b/src/utility/miscWidgets.tw index c195b88c757..5a0eb92229e 100644 --- a/src/utility/miscWidgets.tw +++ b/src/utility/miscWidgets.tw @@ -370,6 +370,21 @@ <</if>> <</if>> <</if>> +<<if ($activeSlave.preg > 1) && ($pregSpeedControl == 1) && ($seeHyperPreg == 1) && ($activeSlave.indentureRestrictions < 1)>> +<br> + __Pregnancy control__: <span id="pregControl"><<if $activeSlave.pregControl == "labor supressors">>Labor is supressed<<elseif $activeSlave.pregControl == "slow gestation">>Slowed gestation<<elseif $activeSlave.pregControl == "speed up">>Faster gestation<<else>>Normal gestation<</if>></span> + <<if ($activeSlave.breedingMark != 1) && ($activeSlave.preg >= 30)>> + <<click "Normal Birth">><<set $activeSlave.pregControl = "none">><<replace "#pregControl">>allowed normal birth<</replace>><</click>> + | + <<click "Supress Labor">><<set $activeSlave.pregControl = "labor supressors">><<replace "#pregControl">>labor will be supressed<</replace>><</click>> + <<elseif ($activeSlave.breedingMark != 1) && ($activeSlave.preg < 30)>> + <<click "Normal Gestation">><<set $activeSlave.pregControl = "none">><<replace "#pregControl">>normal gestation speed<</replace>><</click>> + | + <<click "Slow Gestation">><<set $activeSlave.pregControl = "slow gestation">><<replace "#pregControl">>slowed down gestation speed<</replace>><</click>> + | + <<click "Fast Gestation">><<set $activeSlave.pregControl = "speed up">><<replace "#pregControl">>scheduled for speed up gestation agents, but they can be used only in strictly controled environiments. Slave should be directed into the clinic.<</replace>><</click>> + <</if>> +<</if>> <</replace>> <</widget>> /% -- GitLab