diff --git a/sanityCheck.sh b/sanityCheck.sh
index aff3320c6c76a3aad61a208a83f0caa636ca9709..0b793fee70c6c9a98a6bd4623c6d31c4886900ed 100755
--- a/sanityCheck.sh
+++ b/sanityCheck.sh
@@ -40,7 +40,7 @@ $GREP -e "<<.*[(][^<>)]*[(][^<>)]*)\?[^<>)]*>>" -- "src/*" | myprint "MissingClo
# Check for too many >>>. e.g.: <</if>>>
$GREP "<<[^<>]*[<>]\?[^<>]*>>>" -- "src/*.tw" | myprint "TooManyAngleBrackets"
# Check for wrong capitalization on 'activeslave' and other common typos
-$GREP -e "\$act" --and --not -e "\$\(activeSlave\|activeChild\|activeArcology\|activeStandard\|activeOrgan\|activeLimbs\|activeUnits\|activeCanine\|activeHooved\|activeFeline\|activeLurcher\)" -- "src/*" | myprint "WrongCapitilization"
+$GREP -e "\$act" --and --not -e "\$\(activeSlave\|activeChild\|activeArcology\|activeOrgan\|activeLimbs\|activeUnits\|activeCanine\|activeHooved\|activeFeline\|activeLurcher\)" -- "src/*" | myprint "WrongCapitalization"
# Check for strange spaces e.g. $slaves[$i]. lips
$GREP "\$slaves\[\$i\]\. " -- 'src/*' | myprint "MissingPropertyAfterSlaves"
# Check using refreshmentType instead of refreshment
diff --git a/src/pregmod/breederProposal.tw b/src/pregmod/breederProposal.tw
index 99e59b87b982a06988d13c4ba2e92a974cc99449..587504983564d15c9aebf7a2119f28c8b8429413 100644
--- a/src/pregmod/breederProposal.tw
+++ b/src/pregmod/breederProposal.tw
@@ -10,17 +10,14 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<if $eugenicsFullControl == 1>>
"That sounds like an acceptable proposal. We'll draft the standards for breeding stock and notify you shortly."
<<set $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<<elseif $PC.pregSource == -1 || $PC.pregSource == -6>>
"Since you are doing your part and carrying an Elite child, we will gladly reward you by granting your proposal. We shall decide upon the standards for breeding stock and notify you shortly."
<<set $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<<elseif $PC.counter.birthElite > 0>>
"Since you have carried children for our cause, we will gladly reward you by granting your proposal. We shall decide upon the standards for breeding stock and notify you shortly."
<<set $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<<elseif $PC.dick == 0>>
<<if $failedElite > 50>>
@@ -30,7 +27,6 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<replace "#result">>
"Good choice, _girlP. A selection of eligible donors will be provided to you; take your pick and bear our children. Or use a test tube, if that's more to your tastes."
<<set $playerBred = 1, $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</replace>>
<</link>>
@@ -49,7 +45,6 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<replace "#result">>
"Good choice, _girlP; your proposal is more important than your dignity after all, isn't it? A selection of eligible donors will be provided to you; take your pick and bear our children. Or use a test tube, if that's more to your tastes."
<<set $failedElite -= 50, $playerBred = 1, $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</replace>>
<</link>>
@@ -58,7 +53,6 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<replace "#result">>
"Yes, you have done much to further our cause. We respect the 'balls' on you, despite your lack of them. Very well, we shall set the standards for what shall qualify as breeding stock and our standards will be delivered to you shortly."
<<set $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</replace>>
<</link>>
@@ -81,7 +75,6 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<replace "#result">>
"Your contributions will be appreciated. We shall convene to decide the qualifications for a slave to become a breeder. We will inform you of them when we send the list of eligible donors to breed you. Or send you a test tube, if that's more to your tastes."
<<set $failedElite -= 50, $playerBred = 1, $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</replace>>
<</link>>
@@ -102,7 +95,6 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<replace "#result">>
"Your contributions will be appreciated. We shall convene to decide the qualifications for a slave to become a breeder. We will inform you of them when we send the list of eligible donors to breed you. Or send you a test tube, if that's more to your tastes."
<<set $playerBred = 1, $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</replace>>
<</link>>
@@ -110,7 +102,6 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<replace "#result">>
"Very well, if you wish to waste your gift, it is your prerogative. We shall convene to decide the qualifications for a slave to become a breeder and inform you upon completion."
<<set $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</replace>>
<</link>>
@@ -118,8 +109,7 @@ Within the hour, you are called before <<if $eugenicsFullControl == 1>>what's le
<<else>>
"We have read your proposal and agree. However, we shall set the standards for what shall qualify as breeding stock, not you. Our standards will be delivered to you shortly."
<<set $propOutcome = 1>>
- <<InitStandards>>
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<</if>>
<</if>>
-<br><br>
+<br><br>
\ No newline at end of file
diff --git a/src/pregmod/breedingTest.tw b/src/pregmod/breedingTest.tw
index 8eb2a76d8af3716b7e104b7c40b8ab9ece538a33..972b2fecd0357e3d949cf4e59ebae1ee4cfc7ae7 100644
--- a/src/pregmod/breedingTest.tw
+++ b/src/pregmod/breedingTest.tw
@@ -1,8 +1,4 @@
:: BreedingTest [nobr]
-<<set $nextButton = "Confirm changes", $nextLink = "AS Dump", $returnTo = "Slave Interact">>
-
-<<UpdateStandards>>
-<<BreedingStandards>>
-<br><br>
-<<BreedingEligibility>>
+<<set $nextButton = "Confirm changes", $nextLink = "Slave Interact">>
+<<print eliteBreedingExam(getSlave($AS))>>
\ No newline at end of file
diff --git a/src/pregmod/eliteBreedingExam.js b/src/pregmod/eliteBreedingExam.js
new file mode 100644
index 0000000000000000000000000000000000000000..cd91cfc011409ee4e8d917180c6c45d4bae262b3
--- /dev/null
+++ b/src/pregmod/eliteBreedingExam.js
@@ -0,0 +1,237 @@
+globalThis.eliteBreedingExam = function(slave = null) {
+ const eliteAngered = V.failedElite > 100;
+ const SlaveProfessionalismEstablished = V.arcologies[0].FSSlaveProfessionalism > 20;
+ const preferYounger= V.arcologies[0].FSYouthPreferentialist > 20;
+ const partyAnimal = V.arcologies[0].FSHedonisticDecadence > 20;
+ const cost = 5000;
+ let r = [], test, passing = 0, fixable;
+
+ const result = function() {
+ if (slave) {
+ if (test === true) {
+ return `<span class="lime">PASSED</span>`;
+ } else if (fixable) {
+ return `<span class="yellow">Within fixable range.</span>`
+ } else {
+ passing--;
+ return `<span class="red">FAILED</span>`;
+ }
+ }
+ return ``;
+ };
+
+ r.push(`For each slave be to examined, a fee of <span class='yellowgreen'>${cashFormat(cost)}</span> will be deducted from your account.`);
+ r.push(`Updates will be posted periodically. It is your responsibility to keep up to date.`);
+ r.push(`Failures will be sterilized. Please make sure your slave fits the following criteria before submitting them for testing. We shall not be held responsible for time wasted.`);
+ if (!slave) {
+ r.push(`Must be not; already be marked as a breeding slave, inside a fuckdoll suit, infertile and already with child.`);
+ } else {
+ r.push(`${slave.slaveName} is up for review:`);
+ }
+
+ if (slave) {
+ test = slave.intelligence + slave.intelligenceImplant >= (eliteAngered ? 95 : 50);
+ }
+ r.push(`Must be ${eliteAngered ? 'highly intelligent' : 'very smart'}. ${result()}`);
+
+ if (slave) {
+ test = Beauty(slave) >= (eliteAngered ? 120 : 100);
+ }
+ r.push(`Must be ${eliteAngered ? 'unbelievably' : ''} beautiful. ${result()}`);
+
+ if (slave) {
+ test = slave.face >= (eliteAngered ? 95 : 40);
+ }
+ r.push(`Their face must be ${eliteAngered ? 'breathtaking' : 'gorgeous'}. ${result()}`);
+
+ if (slave) {
+ test = slave.chem <= 20;
+ }
+ r.push(`Their health must not be overly impacted by drug use. ${result()}`);
+
+ if (slave) {
+ test = slave.addict === 0;
+ }
+ r.push(`They must not be addicted to drugs. ${result()}`);
+
+ if (V.arcologies[0].FSMaturityPreferentialist > 20 || V.arcologies[0].FSYouthPreferentialist > 20) {
+ const targetAge = 24;
+ if (slave) {
+ if (V.arcologies[0].FSMaturityPreferentialist > 20) {
+ test = slave.physicalAge > targetAge;
+ } else {
+ test = slave.physicalAge < targetAge;
+ }
+ }
+ r.push(`Must be ${preferYounger? 'younger' : 'older'} than ${targetAge}. ${result()}`);
+ }
+
+ if (V.arcologies[0].FSIntellectualDependency > 20) {
+ if (slave) {
+ test = slave.energy >= 100;
+ }
+ r.push(`Must be sexually receptive at all times. ${result()}`);
+ } else if (V.arcologies[0].FSSlaveProfessionalism > 20) {
+ if (slave) {
+ test = slave.skill.vaginal + slave.skill.anal + slave.skill.oral + slave.skill.entertainment + slave.skill.whoring >= (eliteAngered ? 500 : 400);
+ }
+ r.push(`Must be capable of mastering skills. ${result()}`);
+ if (slave) {
+ test = slave.accent <= 1;
+ }
+ r.push(`Must be capable of eloquent and accurate speech. ${result()}`);
+ }
+ if (V.arcologies[0].FSPetiteAdmiration > 20 || V.arcologies[0].FSStatuesqueGlorification > 20) {
+ const targetHeight = V.arcologies[0].FSPetiteAdmiration > 20 ? 150 : 186;
+ if (V.arcologies[0].FSPetiteAdmiration > 20) {
+ if (slave) {
+ test = (slave.height - (slave.heightImplant * 10)) < targetHeight;
+ }
+ r.push(`Must naturally be very short. (${targetHeight} cm) ${result()}`);
+ if (slave) {
+ test = (slave.height - (slave.heightImplant * 10)) < Height.mean(slave) - 15;
+ }
+ r.push(`Must naturally be very short for their age. ${result()}`);
+ } else if (V.arcologies[0].FSStatuesqueGlorification > 20) {
+ if (slave) {
+ test = (slave.height - (slave.heightImplant * 10)) > targetHeight;
+ }
+ r.push(`Must naturally be very tall. (${targetHeight} cm) ${result()}`);
+ }
+ }
+
+ if (V.arcologies[0].FSSupremacist > 20 || V.arcologies[0].FSSubjugationist > 20) {
+ const targetRace = V.arcologies[0].FSSupremacist > 20 ? V.arcologies[0].FSSupremacistRace : V.arcologies[0].FSSubjugationistRace;
+ if (slave) {
+ test = slave.race === targetRace;
+ }
+ r.push(`Must be ${targetRace}. ${result()}`);
+ }
+
+ if (V.arcologies[0].FSGenderRadicalist > 20) {
+ if (slave) {
+ test = slave.dick >= 1 && slave.balls >= 1;
+ }
+ r.push(`Must have a functional penis. ${result()}`);
+ } else if (V.arcologies[0].FSGenderFundamentalist > 20) {
+ if (slave) {
+ test = slave.dick === 0 && slave.balls === 0;
+ }
+ r.push(`Must be physically female. ${result()}`);
+ }
+ if (V.arcologies[0].FSPaternalist > 20) {
+ if (slave) {
+ test = slave.intelligenceImplant >= (SlaveProfessionalismEstablished ? 30 : 15);
+ }
+ r.push(`Must be ${SlaveProfessionalismEstablished ? 'well' : ''} educated. ${result()}`);
+ if (slave) {
+ test = slave.health.condition >= 60;
+ }
+ r.push(`Must be in good health. ${result()}`);
+ // } else if (V.arcologies[0].FSDegradationist > 20) {
+ }
+
+ if (SlaveProfessionalismEstablished) {
+ if (slave) {
+ test = slave.intelligenceImplant >= 15;
+ }
+ r.push(`Must be well educated. ${result()}`);
+ }
+
+ if (V.arcologies[0].FSBodyPurist > 20) {
+ if (slave) {
+ test = slave.chem <= (eliteAngered ? 0 : 15);
+ }
+ r.push(`Must have low carcinogen levels. ${result()}`);
+ if (slave) {
+ test = slave.boobsImplant + slave.buttImplant + slave.lipsImplant + slave.hipsImplant + slave.shouldersImplant === 0 && slave.faceImplant <= 5 && slave.bellyImplant === -1;
+ }
+ r.push(`Must be implant free. ${result()}`);
+ // } else if (V.arcologies[0].FSTransformationFetishist > 20) {
+ // idealSlave.chem = 20;
+ }
+ if (V.arcologies[0].FSSlimnessEnthusiast > 20) {
+ if (slave) {
+ test = slave.weight <= (partyAnimal ? 30 : 0);
+ }
+ if (partyAnimal) {
+ r.push(`May be no larger than "plush". ${result()}`);
+ } else {
+ r.push(`Must be thin. ${result()}`);
+ }
+ if (slave) {
+ test = slave.butt <= 2;
+ }
+ r.push(`Must have a trim rear. ${result()}`);
+ if (slave) {
+ test = slave.boobs <= 400;
+ }
+ r.push(`Must have a sleek chest. ${result()}`);
+ } else if (V.arcologies[0].FSAssetExpansionist > 20) {
+ if (slave) {
+ test = (slave.butt - slave.buttImplant) >= 6;
+ }
+ r.push(`Must have a naturally gigantic rear. ${result()}`);
+ if (slave) {
+ test = (slave.boobs - slave.boobsImplant) >= 1000;
+ }
+ r.push(`Must be naturally busty. ${result()}`);
+ }
+ if (V.arcologies[0].FSPastoralist > 20) {
+ if (slave) {
+ test = slave.lactation === 1;
+ }
+ r.push(`Must be lactating naturally. ${result()}`);
+ }
+ if (V.arcologies[0].FSPhysicalIdealist > 20) {
+ if (V.arcologies[0].FSPhysicalIdealistLaw === 1) {
+ const musclesMin = 20;
+ const musclesMax = 50;
+ if (slave) {
+ test = slave.weight <= 30;
+ }
+ r.push(`Must not be overweight. ${result()}`);
+ if (slave) {
+ test = between(slave.muscles, musclesMin, musclesMax);
+ fixable = (slave.muscles <= musclesMin && slave.muscles > musclesMax - musclesMin) || (slave.muscles >= musclesMax && slave.muscles < musclesMin + 30);
+ if (fixable && passing === 0) {
+ passing = 2;
+ }
+ }
+ r.push(`Must be fit, but not too muscular. ${result()}`);
+ } else {
+ if (slave) {
+ test = slave.muscles > 95;
+ }
+ r.push(`Must be extremely muscular. ${result()}`);
+ }
+ } else if (V.arcologies[0].FSHedonisticDecadence > 20) {
+ const targetWeight = V.arcologies[0].FSSlimnessEnthusiast > 20 ? 10 : 95;
+ if (slave) {
+ test = slave.weight > targetWeight;
+ }
+ if (V.arcologies[0].FSSlimnessEnthusiast > 20) {
+ r.push(`Must be more than "trim". ${result()}`);
+ } else {
+ r.push(`Must be big, soft and fat. ${result()}`);
+ }
+ }
+
+ if (slave) {
+ if (passing === 2) {
+ r.push(`The aforementioned slave has been deemed <span class="yellow">currently unsuitable</span> for breeding, but may be resubmitted after corrections are applied. We understand the subjective nature of "fit" and do not wish to preclude the use a viable breeder over such a trivial fix. A contraceptive routine has been applied to protect against "accidents" in the interim.`);
+ slave.preg = -1;
+ } else if (passing !== 0) {
+ r.push(`The aforementioned slave has been deemed <span class="red">unsuitable</span> for breeding.`);
+ slave.preg = -3;
+ } else {
+ r.push(`The aforementioned slave has been deemed <span class="green">worthy</span> of being used for breeding and has been marked as such. Please note the increased restrictions on breeding slaves.`);
+ r.push(`They are not permitted for public use or anything that may harm their growing child. The child within them is considered a member of the Elite class and as such, any harm that comes to them will result in severe penalties to the breeder's owner. Development of the child will be closely monitored; should the fetus be identified as not of the owner's blood (or any other member of the Elite class), said owner shall face severe fines.`);
+ slave.breedingMark = 1; slave.pregControl = "none";
+ removeJob(slave, slave.assignment);
+ }
+ cashX(-cost, "capEx");
+ }
+
+ return r.map(t => `<div>${t}</div>`).join("");
+};
diff --git a/src/pregmod/managePersonalAffairs.tw b/src/pregmod/managePersonalAffairs.tw
index 52b6c07af1dbee894aac3c5419aabf5cbd570da9..922e5d9ee74cdc460793f39be539c8a3021503f9 100644
--- a/src/pregmod/managePersonalAffairs.tw
+++ b/src/pregmod/managePersonalAffairs.tw
@@ -687,13 +687,5 @@
<<if $propOutcome == 1 && $arcologies[0].FSRestart != "unset">>
<h2>Elite Breeder Qualifications</h2>
-
- <p>
- <<if ndef $activeStandard>>
- <<InitStandards>>
- <<else>>
- <<UpdateStandards>>
- <<BreedingStandards>>
- <</if>>
- </p>
-<</if>>
+ <p> <<print eliteBreedingExam()>> </p>
+<</if>>
\ No newline at end of file
diff --git a/src/pregmod/widgets/pregmodWidgets.tw b/src/pregmod/widgets/pregmodWidgets.tw
index ae146851adc33459094d2142b7be5b9caaf17de9..28693e4366fe7096a109a0a75f727789430c0983 100644
--- a/src/pregmod/widgets/pregmodWidgets.tw
+++ b/src/pregmod/widgets/pregmodWidgets.tw
@@ -146,457 +146,6 @@
<<set _WivesALisp = lispReplace(_WivesA)>>
<</widget>>
-<<widget "InitStandards">>
-
-<<set $activeStandard = {age: 24, weightMax: 0, weightMin: 0, musclesMin: 0, musclesMax: 0, raceSup: "white", raceSub: "white", boobs: 0, boobsImplant: 0, lactation: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, face: 0, faceImplant: 0, lips: 15, lipsImplant: 0, chem: 0, addict: 0, intelligence: 0, intelligenceImplant: 0, bellyImplant: -1, beauty: 0, dick: 0, balls: 0, health: 0, skill: 0, accent: 0, height: 150, energy: 100}>>
-
-<<UpdateStandards>>
-<<BreedingStandards>>
-<</widget>>
-
-<<widget "UpdateStandards">>
-<<if $failedElite > 100>>
- <<set $activeStandard.intelligence = 95>>
- <<set $activeStandard.beauty = 120>>
- <<set $activeStandard.face = 95>>
-<<else>>
- <<set $activeStandard.intelligence = 50>>
- <<set $activeStandard.beauty = 100>>
- <<set $activeStandard.face = 40>>
-<</if>>
-<<if $arcologies[0].FSIntellectualDependency > 20>>
- <<set $activeStandard.energy = 100>>
-<<elseif $arcologies[0].FSSlaveProfessionalism > 20>>
- <<if $failedElite > 100>>
- <<set $activeStandard.skill = 500>>
- <<else>>
- <<set $activeStandard.skill = 400>>
- <</if>>
- <<set $activeStandard.accent = 1>>
-<</if>>
-<<if $arcologies[0].FSPetiteAdmiration > 20>>
- <<set $activeStandard.height = 150>>
-<<elseif $arcologies[0].FSStatuesqueGlorification > 20>>
- <<set $activeStandard.height = 185>>
-<</if>>
-<<set $activeStandard.chem = 20>>
-<<set $activeStandard.addict = 0>>
-<<if $arcologies[0].FSSupremacist > 20>>
- <<set $activeStandard.raceSup = $arcologies[0].FSSupremacistRace>>
-<</if>>
-<<if $arcologies[0].FSSubjugationist > 20>>
- <<set $activeStandard.raceSub = $arcologies[0].FSSubjugationistRace>>
-<</if>>
-<<if $arcologies[0].FSGenderRadicalist > 20>>
- <<set $activeStandard.dick = 1>>
- <<set $activeStandard.balls = 1>>
-<<elseif $arcologies[0].FSGenderFundamentalist > 20>>
- <<set $activeStandard.dick = 0>>
- <<set $activeStandard.balls = 0>>
-<</if>>
-<<if $arcologies[0].FSPaternalist > 20>>
- <<set $activeStandard.intelligenceImplant = 15>>
- <<set $activeStandard.health = 60>>
-<<elseif $arcologies[0].FSDegradationist > 20>>
- <<set $activeStandard.intelligenceImplant = 15>>
- <<set $activeStandard.health = 0>>
-<</if>>
-<<if $arcologies[0].FSSlaveProfessionalism > 20>>
- <<set $activeStandard.intelligenceImplant = 30>>
-<</if>>
-<<if $arcologies[0].FSBodyPurist > 20>>
- <<if $failedElite > 100>>
- <<set $activeStandard.chem = 0>>
- <<else>>
- <<set $activeStandard.chem = 15>>
- <</if>>
- <<set $activeStandard.boobsImplant = 0>>
- <<set $activeStandard.buttImplant = 0>>
- <<set $activeStandard.lipsImplant = 0>>
- <<set $activeStandard.hipsImplant = 0>>
- <<set $activeStandard.shouldersImplant = 0>>
- <<set $activeStandard.faceImplant = 5>>
- <<set $activeStandard.bellyImplant = -1>>
-<<elseif $arcologies[0].FSTransformationFetishist > 20>>
- <<set $activeStandard.chem = 20>>
-<</if>>
-<<if $arcologies[0].FSSlimnessEnthusiast > 20>>
- <<if $arcologies[0].FSHedonisticDecadence > 20>>
- <<set $activeStandard.weightMax = 30>>
- <<else>>
- <<set $activeStandard.weightMax = 0>>
- <</if>>
- <<set $activeStandard.butt = 2>>
- <<set $activeStandard.boobs = 400>>
-<<elseif $arcologies[0].FSAssetExpansionist > 20>>
- <<set $activeStandard.butt = 6>>
- <<set $activeStandard.boobs = 1000>>
-<</if>>
-<<if $arcologies[0].FSPastoralist > 20>>
- <<set $activeStandard.lactation = 1>>
-<</if>>
-<<if $arcologies[0].FSPhysicalIdealist > 20>>
- <<if $arcologies[0].FSPhysicalIdealistLaw == 1>>
- <<set $activeStandard.weightMax = 30>>
- <<set $activeStandard.musclesMin = 20>>
- <<set $activeStandard.musclesMax = 50>>
- <<else>>
- <<set $activeStandard.musclesMin = 95>>
- <</if>>
-<<elseif $arcologies[0].FSHedonisticDecadence > 20>>
- <<if $arcologies[0].FSSlimnessEnthusiast > 20>>
- <<set $activeStandard.weightMin = 10>>
- <<else>>
- <<set $activeStandard.weightMin = 95>>
- <</if>>
-<</if>>
-<</widget>>
-
-<<widget "BreedingStandards">>
-<br><br>
-In order to be eligible to be bred, the potential breeding bitch must first satisfy the following conditions:
-<<if $failedElite > 100>>
- <br>She must be of finest intelligence.
- <br>She must be unbelievably beautiful.
- <br>Her face must be breathtaking.
-<<else>>
- <br>She must be very smart.
- <br>She must be beautiful.
- <br>Her face must be gorgeous.
-<</if>>
-<br>Her health must not be overly impacted by drug use.
-<br>She must not be addicted to drugs.
-<<if $arcologies[0].FSPetiteAdmiration > 20>>
- <br>She must be very short. (150cm)
- <br>She must be very short for her age.
- <br>She must not have had height altering surgery to reach it.
-<<elseif $arcologies[0].FSStatuesqueGlorification > 20>>
- <br>She must be very tall. (186cm)
- <br>She must not have had height altering surgery to reach it.
-<</if>>
-<<if $arcologies[0].FSSupremacist > 20>>
- <br>She must be $arcologies[0].FSSupremacistRace.
-<</if>>
-<<if $arcologies[0].FSSubjugationist > 20>>
- <br>She must not be $arcologies[0].FSSubjugationistRace.
-<</if>>
-<<if $arcologies[0].FSGenderRadicalist > 20>>
- <br>She must have a functional penis.
-<<elseif $arcologies[0].FSGenderFundamentalist > 20>>
- <br>She must be physically female.
-<</if>>
-<<if $arcologies[0].FSPaternalist > 20>>
- <<if $arcologies[0].FSSlaveProfessionalism > 20>>
- <br>She must be well educated.
- <<else>>
- <br>She must be educated.
- <</if>>
- <br>She must be in good health.
-<<elseif $arcologies[0].FSSlaveProfessionalism > 20>>
- <br>She must be well educated.
-<</if>>
-<<if $arcologies[0].FSIntellectualDependency > 20>>
- <br>She must be sexually receptive at all times.
-<<elseif $arcologies[0].FSSlaveProfessionalism > 20>>
- <br>She must be capable of mastering her skills.
- <br>She must be capable of eloquent and accurate speech.
-<</if>>
-<<if $arcologies[0].FSBodyPurist > 20>>
- <br>She must have low carcinogen levels.
- <br>She must be implant free.
-<</if>>
-<<if $arcologies[0].FSMaturityPreferentialist > 20>>
- <br>She must be older than 24.
-<<elseif $arcologies[0].FSYouthPreferentialist > 20>>
- <br>She must be younger than 24.
-<</if>>
-<<if $arcologies[0].FSSlimnessEnthusiast > 20>>
- <<if $arcologies[0].FSHedonisticDecadence > 20>>
- <br>She may be no larger than "plush".
- <<else>>
- <br>She must be thin.
- <</if>>
- <br>She must have a trim rear.
- <br>She must have a sleek chest.
-<<elseif $arcologies[0].FSAssetExpansionist > 20>>
- <br>She must have a naturally gigantic rear.
- <br>She must be naturally busty.
-<</if>>
-<<if $arcologies[0].FSPastoralist > 20>>
- <br>She must be lactating naturally.
-<</if>>
-<<if $arcologies[0].FSPhysicalIdealist > 20>>
- <<if $arcologies[0].FSPhysicalIdealistLaw == 1>>
- <br>She must not be overweight.
- <br>She must be fit, but not too muscular.
- <<else>>
- <br>She must be extremely muscular.
- <</if>>
-
-<<elseif $arcologies[0].FSHedonisticDecadence > 20>>
- <<if $arcologies[0].FSSlimnessEnthusiast > 20>>
- <br>She must be more than "trim".
- <<else>>
- <br>She must be big, soft and fat.
- <</if>>
-<</if>>
-<br>For each slave examined, a fee of @@.yellowgreen;<<print cashFormat(5000)>>@@ will be deducted from your account.
-<br>Failures will be sterilized. Please make sure your slave fits the criteria before submitting them for testing. We shall not be held responsible for time wasted.
-<br>Updates will be posted periodically. It is your responsibility to keep up to date with current standards.
-<</widget>>
-
-<<widget "BreedingEligibility">>
- <<set _passing = 0>>
- <br><br>
- <<= getSlave($AS)>>.slaveName is up for review:
- <<if getSlave($AS).intelligence+getSlave($AS).intelligenceImplant >= $activeStandard.intelligence>>
- <br>$He @@.lime;PASSED@@ the intelligence test.
- <<else>>
- <br>$He @@.red;FAILED@@ the intelligence test.
- <<set _passing-->>
- <</if>>
- <<if Beauty(getSlave($AS)) >= $activeStandard.beauty>>
- <br>$He @@.lime;PASSED@@ the beauty test.
- <<else>>
- <br>$He @@.red;FAILED@@ the beauty test.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).face >= $activeStandard.face>>
- <br>$He @@.lime;PASSED@@ the facial attractiveness test.
- <<else>>
- <br>$He @@.red;FAILED@@ the facial attractiveness test.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).chem <= $activeStandard.chem>>
- <br>$He @@.lime;PASSED@@ the carcinogen test.
- <<else>>
- <br>$He @@.red;FAILED@@ the carcinogen test.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).addict <= $activeStandard.addict>>
- <br>$He @@.lime;PASSED@@ the drug test.
- <<else>>
- <br>$He @@.red;FAILED@@ the drug test.
- <<set _passing-->>
- <</if>>
- <<if $arcologies[0].FSSupremacist > 20>>
- <<if getSlave($AS).race == $activeStandard.raceSup>>
- <br>$He @@.lime;PASSED@@ racial testing.
- <<else>>
- <br>$He @@.red;FAILED@@ racial testing.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSSubjugationist > 20>>
- <<if getSlave($AS).race != $activeStandard.raceSub>>
- <br>$He @@.lime;PASSED@@ racial testing.
- <<else>>
- <br>$He @@.red;FAILED@@ racial testing.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSPetiteAdmiration > 20>>
- <<if (getSlave($AS).height-(getSlave($AS).heightImplant*10)) < $activeStandard.height>>
- <<if (getSlave($AS).height-(getSlave($AS).heightImplant*10)) < Height.mean(getSlave($AS))-15>>
- <br>$He @@.lime;MET@@ height requirements.
- <<else>>
- <br>$He @@.red;FAILED@@ to meet height requirements.
- <<set _passing-->>
- <</if>>
- <<else>>
- <br>$He @@.red;FAILED@@ to meet height requirements.
- <<set _passing-->>
- <</if>>
- <<elseif $arcologies[0].FSStatuesqueGlorification > 20>>
- <<if (getSlave($AS).height-(getSlave($AS).heightImplant*10)) > $activeStandard.height>>
- <br>$He @@.lime;MET@@ height requirements.
- <<else>>
- <br>$He @@.red;FAILED@@ to meet height requirements.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSGenderRadicalist > 20>>
- <<if getSlave($AS).dick >= $activeStandard.dick && getSlave($AS).balls >= $activeStandard.balls>>
- <br>$He @@.lime;PASSED@@ penis inspection.
- <<else>>
- <br>$He @@.red;FAILED@@ penis inspection.
- <<set _passing-->>
- <</if>>
- <<elseif $arcologies[0].FSGenderFundamentalist > 20>>
- <<if getSlave($AS).dick == $activeStandard.dick && getSlave($AS).balls == $activeStandard.balls>>
- <br>$He @@.lime;PASSED@@ genital inspection.
- <<else>>
- <br>$He @@.red;FAILED@@ genital inspection.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSPaternalist > 20>>
- <<if getSlave($AS).intelligenceImplant >= $activeStandard.intelligenceImplant>>
- <br>$He @@.lime;PASSED@@ educational trials.
- <<else>>
- <br>$He @@.red;FAILED@@ educational trials.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).health.condition >= $activeStandard.health>>
- <br>$He @@.lime;PASSED@@ health examinations.
- <<else>>
- <br>$He @@.red;FAILED@@ health examinations.
- <<set _passing-->>
- <</if>>
- <<elseif $arcologies[0].FSSlaveProfessionalism > 20>>
- <<if getSlave($AS).intelligenceImplant >= $activeStandard.intelligenceImplant>>
- <br>$He @@.lime;PASSED@@ educational trials.
- <<else>>
- <br>$He @@.red;FAILED@@ educational trials.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSIntellectualDependency > 20>>
- <<if getSlave($AS).energy >= $activeStandard.energy>>
- <br>$He @@.lime;PASSED@@ libido testing.
- <<else>>
- <br>$He @@.red;FAILED@@ libido testing.
- <<set _passing-->>
- <</if>>
- <<elseif $arcologies[0].FSSlaveProfessionalism > 20>>
- <<if getSlave($AS).skill.vaginal + getSlave($AS).skill.anal + getSlave($AS).skill.oral + getSlave($AS).skill.entertainment + getSlave($AS).skill.whoring >= $activeStandard.skill>>
- <br>$He @@.lime;PASSED@@ skill retention trials.
- <<else>>
- <br>$He @@.red;FAILED@@ skill retention trials.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).accent <= $activeStandard.accent>>
- <br>$He @@.lime;PASSED@@ $his speech test.
- <<else>>
- <br>$He @@.red;FAILED@@ $his speech test.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSBodyPurist > 20>>
- <<if getSlave($AS).chem <= $activeStandard.chem>>
- <br>$He @@.lime;PASSED@@ health examinations.
- <<else>>
- <br>$He @@.red;FAILED@@ health examinations.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).boobsImplant == 0 && getSlave($AS).buttImplant == 0 && getSlave($AS).lipsImplant == 0 && getSlave($AS).hipsImplant == 0 && getSlave($AS).shouldersImplant == 0 && getSlave($AS).faceImplant <= 5 && getSlave($AS).bellyImplant == -1>>
- <br>$He @@.lime;PASSED@@ implant examinations.
- <<else>>
- <br>$He @@.red;FAILED@@ implant examinations.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSMaturityPreferentialist > 20>>
- <<if getSlave($AS).physicalAge > $activeStandard.age>>
- <br>$He @@.lime;PASSED@@ age examinations.
- <<else>>
- <br>$He @@.red;FAILED@@ age examinations.
- <<set _passing-->>
- <</if>>
- <<elseif $arcologies[0].FSYouthPreferentialist > 20>>
- <<if getSlave($AS).physicalAge < $activeStandard.age>>
- <br>$He @@.lime;PASSED@@ age examinations.
- <<else>>
- <br>$He @@.red;FAILED@@ age examinations.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSSlimnessEnthusiast > 20>>
- <<if getSlave($AS).weight <= $activeStandard.weightMax>>
- <br>$He @@.lime;MET@@ weight limits.
- <<else>>
- <br>$He @@.red;EXCEEDED@@ weight limits.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).butt <= $activeStandard.butt>>
- <br>$He @@.lime;MET@@ ass measurements.
- <<else>>
- <br>$He @@.red;EXCEEDED@@ ass measurements.
- <<set _passing-->>
- <</if>>
- <<if getSlave($AS).boobs <= $activeStandard.boobs>>
- <br>$He @@.lime;MET@@ chest measurements.
- <<else>>
- <br>$He @@.red;EXCEEDED@@ chest measurements.
- <<set _passing-->>
- <</if>>
- <<elseif $arcologies[0].FSAssetExpansionist > 20>>
- <<if (getSlave($AS).butt - getSlave($AS).buttImplant) >= $activeStandard.butt>>
- <br>$He @@.lime;MET@@ ass measurements.
- <<else>>
- <br>$He @@.red;FAILED@@ to meet ass measurements.
- <<set _passing-->>
- <</if>>
- <<if (getSlave($AS).boobs - getSlave($AS).boobsImplant) >= $activeStandard.boobs>>
- <br>$He @@.lime;MET@@ chest measurements.
- <<else>>
- <br>$He @@.red;FAILED@@ to meet chest measurements.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSPastoralist > 20>>
- <<if getSlave($AS).lactation == $activeStandard.lactation>>
- <br>$He @@.lime;MET@@ milk production standards.
- <<elseif getSlave($AS).lactation > $activeStandard.lactation>>
- <br>$He @@.red;EXCEEDED@@ milk production standards.
- <<set _passing-->>
- <<else>>
- <br>$He @@.red;FAILED@@ to meet milk production standards.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if $arcologies[0].FSPhysicalIdealist > 20>>
- <<if $arcologies[0].FSPhysicalIdealistLaw == 1>>
- <<if $arcologies[0].FSSlimnessEnthusiast > 20>>
- <<if getSlave($AS).weight <= $activeStandard.weightMax>>
- <br>$He @@.lime;MET@@ weight limits.
- <<else>>
- <br>$He @@.red;EXCEEDED@@ weight limits.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<if getSlave($AS).muscles > $activeStandard.musclesMin && getSlave($AS).muscles < $activeStandard.musclesMax>>
- <br>$He @@.lime;MET@@ the required muscle standard.
- <<elseif (getSlave($AS).muscles <= $activeStandard.musclesMin && getSlave($AS).muscles > $activeStandard.musclesMin-20) || (getSlave($AS).muscles >= $activeStandard.musclesMax && getSlave($AS).muscles < $activeStandard.musclesMax+30)>>
- <br>$He @@.yellow;failed@@ to match the required muscle standard, but was deemed within fixable range.
- <<if _passing == 0>>
- <<set _passing = 2>>
- <</if>>
- <<else>>
- <br>$He @@.red;FAILED@@ to match the required muscle standard.
- <<set _passing-->>
- <</if>>
- <<else>>
- <<if getSlave($AS).muscles > $activeStandard.musclesMin>>
- <br>$He @@.lime;MET@@ the required muscle mass.
- <<else>>
- <br>$He @@.red;FAILED@@ to meet the required muscle mass.
- <<set _passing-->>
- <</if>>
- <</if>>
- <<elseif $arcologies[0].FSHedonisticDecadence > 20>>
- <<if getSlave($AS).weight > $activeStandard.weightMin>>
- <br>$He @@.lime;MET@@ the minimum weight limit.
- <<else>>
- <br>$He @@.red;failed@@ to meet minimum weight limits.
- <<set _passing-->>
- <</if>>
- <</if>>
- <br><br>
- <<if _passing == 2>>
- The slave known as "<<= SlaveFullName(getSlave($AS))>>" has been deemed @@.yellow;currently unsuitable@@ for breeding, but may be resubmitted after corrections are applied. We understand the subjective nature of "fit" and do not wish to preclude the use a viable breeder over such a trivial fix. $He has been placed on a contraceptive routine to protect against "accidents" in the interim.
- <<elseif _passing != 0>>
- The slave known as "<<= SlaveFullName(getSlave($AS))>>" has been deemed @@.red;unsuitable@@ for breeding and has been @@.green;sterilized@@ as per agreement.
- <<set getSlave($AS).preg = -3>>
- <<else>>
- The slave known as "<<= SlaveFullName(getSlave($AS))>>" has been deemed @@.green;worthy@@ of being used for breeding and has been marked as such. Please note the increased restrictions on breeding slaves.
- <br>They are not permitted for public use or anything that may harm their growing child. The child within them is considered a member of the Elite class and as such, any harm that comes to them will result in severe penalties to the breeder's owner. Development of the child will be closely monitored; should the fetus be identified as not of the owner's blood (or any other member of the Elite class), said owner shall face severe fines.
- <<set getSlave($AS).breedingMark = 1, getSlave($AS).pregControl = "none">>
- <</if>>
- <br>@@.yellowgreen;<<print cashFormat(5000)>>@@ has been deducted from your account as agreed.
- <<= removeJob(getSlave($AS), getSlave($AS).assignment)>>
-<</widget>>
-
<<widget "PlayerRace">>
<<replace #ethnicity>>
You're $PC.race.