code:
:: Manage Personal Affairs [nobr]

<<set $nextButton = "Back", $nextLink = "Main", $showEncyclopedia = 0>>
<<run PCTitle()>>

<<set _ML = $marrying.length>>

<<if $cheatMode == 1>>
	//[[Cheat Edit Player|PCCheatMenu][$cheater = 1]]

//
<</if>>

You pause for a moment from your busy day to day life to return to <<if $masterSuite != 0>>$masterSuiteName<<else>>your room<</if>> to consider some things about yourself.

You take yourself in a full length mirror. You are <<if $activeSlave.race == "amerindian" || $activeSlave.race == "asian" || $activeSlave.race == "indo-aryan">>an<<else>>a<</if>> $PC.race <<if $PC.dick == 1 && $PC.vagina == 1>>futanari<<elseif $PC.dick == 1>>man<<else>>woman<</if>> with<<if $PC.markings == "freckles">> freckled<<elseif $PC.markings == "heavily freckled">> heavily freckled<</if>> <<print $PC.skin>> skin, $PC.hColor hair, $PC.eyeColor eyes and a perfect $PC.faceShape face.
<<if $PC.actualAge >= 65>>
	You're @@.orange;$PC.actualAge@@ and definitely feeling it.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge,@@ though perhaps it might be time to undo it.<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge,@@ now if only your body agreed with your looks.<</if>>
<<elseif $PC.actualAge >= 50>>
	You're @@.orange;$PC.actualAge@@ and starting to feel it.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge.@@<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge.@@<</if>>
<<elseif $PC.actualAge >= 35>>
	You're @@.orange;$PC.actualAge@@ and strong.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge@@ and reap the respect that comes with it.<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge@@ recapturing your youth.<</if>>
<<else>>
	You're @@.orange;$PC.actualAge@@ and full of vigor.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge@@ and reap the respect that comes with it.<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge,@@ even though society may find your looks uncomfortable.<</if>>
<</if>>
<<if ($playerAging != 0)>>Your birthday is <<if $PC.birthWeek == 51>>next week<<else>>in <<print 52-$PC.birthWeek>> weeks<</if>>.<</if>>
Looking down,
<<PlayerBoobs>>
<<PlayerBelly>>
<<if $PC.balls == 2 && $PC.belly < 5000>> Your pubic mound swells outward slightly due to your oversized prostate. <<elseif $PC.balls > 2 && $PC.belly < 10000>> Your pubic mound bulges outward noticeably thanks to your massive prostate. <</if>>
Beneath all that,
<<PlayerCrotch>>
Around back,
<<PlayerButt>>

<<if $playerSurgery == 0>>[[Visit your plastic surgeon.|Elective Surgery][$playerSurgery = 4]]<<elseif $playerSurgery == 1>>Your favorite plastic surgeon is booked solid for the next week.<<else>>Your favorite plastic surgeon is booked solid for the next $playerSurgery weeks.<</if>>

You have a number of contact lenses in various colors available.

	<<if $PC.origEye == $PC.eyeColor>>You aren't wearing contacts to change the color of your eyes.<<else>>[[Remove lenses|Manage Personal Affairs][$PC.eyeColor = $PC.origEye]]<</if>>
	<<if $PC.origEye != "blue">>| [[Blue|Manage Personal Affairs][$PC.eyeColor = "blue"]]<</if>>
	<<if $PC.origEye != "black">>| [[Black|Manage Personal Affairs][$PC.eyeColor = "black"]]<</if>>
	<<if $PC.origEye != "brown">>| [[Brown|Manage Personal Affairs][$PC.eyeColor = "brown"]]<</if>>
	<<if $PC.origEye != "green">>| [[Green|Manage Personal Affairs][$PC.eyeColor = "green"]]<</if>>
	<<if $PC.origEye != "turquoise">>| [[Turquoise|Manage Personal Affairs][$PC.eyeColor = "turquoise"]]<</if>>
	<<if $PC.origEye != "sky-blue">>| [[Sky-Blue|Manage Personal Affairs][$PC.eyeColor = "sky-blue"]]<</if>>
	<<if $PC.origEye != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.eyeColor = "hazel"]]<</if>>
	<<if $PC.origEye != "pale-grey">>| [[Pale-Grey|Manage Personal Affairs][$PC.eyeColor = "pale-grey"]]<</if>>
	<<if $PC.origEye != "white">>| [[White|Manage Personal Affairs][$PC.eyeColor = "white"]]<</if>>
	<<if $PC.origEye != "pink">>| [[Pink|Manage Personal Affairs][$PC.eyeColor = "pink"]]<</if>>
	<<if $PC.origEye != "amber">>| [[Amber|Manage Personal Affairs][$PC.eyeColor = "amber"]]<</if>>
	<<if $PC.origEye != "red">>| [[Red|Manage Personal Affairs][$PC.eyeColor = "red"]]<</if>>
	<<if $PC.origEye != "yellow">>| [[Yellow|Manage Personal Affairs][$PC.eyeColor = "yellow"]]<</if>>
	<<if $PC.origEye != "orange">>| [[Orange|Manage Personal Affairs][$PC.eyeColor = "orange"]]<</if>>

	<<if $PC.pupil == "circular">>You aren't wearing contacts to change the shape of your pupils.<<else>>[[Remove lenses|Manage Personal Affairs][$PC.pupil = "circular"]]<</if>>
	<<if $PC.pupil != "catlike">>| [[Catlike|Manage Personal Affairs][$PC.pupil = "catlike"]]<</if>>
	<<if $PC.pupil != "serpent-like">>| [[Serpent-Like|Manage Personal Affairs][$PC.pupil = "serpent-like"]]<</if>>
	<<if $PC.pupil != "devilish">>| [[Devilish|Manage Personal Affairs][$PC.pupil = "devilish"]]<</if>>
	<<if $PC.pupil != "demonic">>| [[Demonic|Manage Personal Affairs][$PC.pupil = "demonic"]]<</if>>
	<<if $PC.pupil != "hypnotic">>| [[Hypnotic|Manage Personal Affairs][$PC.pupil = "hypnotic"]]<</if>>
	<<if $PC.pupil != "heart-shaped">>| [[Heart-Shaped|Manage Personal Affairs][$PC.pupil = "heart-shaped"]]<</if>>
	<<if $PC.pupil != "wide-eyed">>| [[Wide-Eyed|Manage Personal Affairs][$PC.pupil = "wide-eyed"]]<</if>>
	<<if $PC.pupil != "almond-shaped">>| [[Almond-Shaped|Manage Personal Affairs][$PC.pupil = "almond-shaped"]]<</if>>
	<<if $PC.pupil != "bright">>| [[Bright|Manage Personal Affairs][$PC.pupil = "bright"]]<</if>>
	<<if $PC.pupil != "teary">>| [[Teary|Manage Personal Affairs][$PC.pupil = "teary"]]<</if>>
	<<if $PC.pupil != "vacant">>| [[Vacant|Manage Personal Affairs][$PC.pupil = "vacant"]]<</if>>
	<<if $PC.pupil != "star-shaped">>| [[Star-Shaped|Manage Personal Affairs][$PC.pupil = "star-shaped"]]<</if>>
	<<if $PC.pupil != "goat-like">>| [[Goat-Like|Manage Personal Affairs][$PC.pupil = "goat-like"]]<</if>>

	<<if $PC.sclerae == "white">>You aren't wearing contacts to change the color of your sclerae.<<else>>[[Remove lenses|Manage Personal Affairs][$PC.sclerae = "white"]]<</if>>
	<<if $PC.sclerae != "blue">>| [[Blue|Manage Personal Affairs][$PC.sclerae = "blue"]]<</if>>
	<<if $PC.sclerae != "black">>| [[Black|Manage Personal Affairs][$PC.sclerae = "black"]]<</if>>
	<<if $PC.sclerae != "brown">>| [[Brown|Manage Personal Affairs][$PC.sclerae = "brown"]]<</if>>
	<<if $PC.sclerae != "green">>| [[Green|Manage Personal Affairs][$PC.sclerae = "green"]]<</if>>
	<<if $PC.sclerae != "turquoise">>| [[Turquoise|Manage Personal Affairs][$PC.sclerae = "turquoise"]]<</if>>
	<<if $PC.sclerae != "sky-blue">>| [[Sky-Blue|Manage Personal Affairs][$PC.sclerae = "sky-blue"]]<</if>>
	<<if $PC.sclerae != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.sclerae = "hazel"]]<</if>>
	<<if $PC.sclerae != "pale-grey">>| [[Pale-Grey|Manage Personal Affairs][$PC.sclerae = "pale-grey"]]<</if>>
	<<if $PC.sclerae != "pink">>| [[Pink|Manage Personal Affairs][$PC.sclerae = "pink"]]<</if>>
	<<if $PC.sclerae != "amber">>| [[Amber|Manage Personal Affairs][$PC.sclerae = "amber"]]<</if>>
	<<if $PC.sclerae != "red">>| [[Red|Manage Personal Affairs][$PC.sclerae = "red"]]<</if>>
	<<if $PC.sclerae != "yellow">>| [[Yellow|Manage Personal Affairs][$PC.sclerae = "yellow"]]<</if>>
	<<if $PC.sclerae != "orange">>| [[Orange|Manage Personal Affairs][$PC.sclerae = "orange"]]<</if>>

You have a selection of hair dyes available.

	<<if $PC.origHColor == $PC.hColor>>Your hair is its natural color.<<else>>[[Remove dye|Manage Personal Affairs][$PC.hColor = $PC.origHColor]]<</if>>
	<<if $PC.origHColor != "auburn">>| [[Auburn|Manage Personal Affairs][$PC.hColor = "auburn"]]<</if>>
	<<if $PC.origHColor != "black">>| [[Hazel|Manage Personal Affairs][$PC.hColor = "black"]]<</if>>
	<<if $PC.origHColor != "blonde">>| [[Blonde|Manage Personal Affairs][$PC.hColor = "blonde"]]<</if>>
	<<if $PC.origHColor != "blue">>| [[Blue|Manage Personal Affairs][$PC.hColor = "blue"]]<</if>>
	<<if $PC.origHColor != "blue-violet">>| [[Blue-Violet|Manage Personal Affairs][$PC.hColor = "blue-violet"]]<</if>>
	<<if $PC.origHColor != "brown">>| [[Brown|Manage Personal Affairs][$PC.hColor = "brown"]]<</if>>
	<<if $PC.origHColor != "burgundy">>| [[Burgundy|Manage Personal Affairs][$PC.hColor = "burgundy"]]<</if>>
	<<if $PC.origHColor != "chestnut">>| [[Chestnut|Manage Personal Affairs][$PC.hColor = "chestnut"]]<</if>>
	<<if $PC.origHColor != "chocolate brown">>| [[Chocolate|Manage Personal Affairs][$PC.hColor = "chocolate brown"]]<</if>>
	<<if $PC.origHColor != "copper">>| [[Copper|Manage Personal Affairs][$PC.hColor = "copper"]]<</if>>
	<<if $PC.origHColor != "crimson">>| [[Crimson|Manage Personal Affairs][$PC.hColor = "crimson"]]<</if>>
	<<if $PC.origHColor != "dark blue">>| [[Dark Blue|Manage Personal Affairs][$PC.hColor = "dark blue"]]<</if>>
	<<if $PC.origHColor != "dark brown">>| [[Dark Brown|Manage Personal Affairs][$PC.hColor = "dark brown"]]<</if>>
	<<if $PC.origHColor != "dark orchid">>| [[Blue-Violet|Manage Personal Affairs][$PC.hColor = "dark orchid"]]<</if>>
	<<if $PC.origHColor != "ginger">>| [[Ginger|Manage Personal Affairs][$PC.hColor = "ginger"]]<</if>>
	<<if $PC.origHColor != "golden">>| [[Golden|Manage Personal Affairs][$PC.hColor = "golden"]]<</if>>
	<<if $PC.origHColor != "green">>| [[Green|Manage Personal Affairs][$PC.hColor = "green"]]<</if>>
	<<if $PC.origHColor != "green-yellow">>| [[Green-Yellow|Manage Personal Affairs][$PC.hColor = "green-yellow"]]<</if>>
	<<if $PC.origHColor != "grey">>| [[Grey|Manage Personal Affairs][$PC.hColor = "grey"]]<</if>>
	<<if $PC.origHColor != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.hColor = "hazel"]]<</if>>
	<<if $PC.origHColor != "jet black">>| [[Jet Black|Manage Personal Affairs][$PC.hColor = "jet black"]]<</if>>
	<<if $PC.origHColor != "pink">>| [[Pink|Manage Personal Affairs][$PC.hColor = "pink"]]<</if>>
	<<if $PC.origHColor != "platinum blonde">>| [[Platinum Blonde|Manage Personal Affairs][$PC.hColor = "platinum blonde"]]<</if>>
	<<if $PC.origHColor != "purple">>| [[Purple|Manage Personal Affairs][$PC.hColor = "purple"]]<</if>>
	<<if $PC.origHColor != "red">>| [[Red|Manage Personal Affairs][$PC.hColor = "red"]]<</if>>
	<<if $PC.origHColor != "sea green">>| [[Sea Green|Manage Personal Affairs][$PC.hColor = "sea green"]]<</if>>
	<<if $PC.origHColor != "silver">>| [[Silver|Manage Personal Affairs][$PC.hColor = "silver"]]<</if>>
	<<if $PC.origHColor != "strawberry-blonde">>| [[Strawberry-Blonde|Manage Personal Affairs][$PC.hColor = "strawberry-blonde"]]<</if>>
	<<if $PC.origHColor != "white">>| [[White|Manage Personal Affairs][$PC.hColor = "white"]]<</if>>

<<if $weddingPlanned > 0>>

	<<set _slave1 = getSlave($marrying[0])>>
	<<if _ML > 1>>
		<<if _ML >= 2>>
			<<set _slave2 = getSlave($marrying[1])>>
		<</if>>
		<<if _ML >= 3>>
			<<set _slave3 = getSlave($marrying[2])>>
		<</if>>
		<<if _ML == 4>>
			<<set _slave4 = getSlave($marrying[3])>>
		<</if>>
	<</if>>

/* yes, I am aware this looks horrendous - if you can find a way to clean this up, by all means */
	You have a wedding planned for this weekend; you are <<if $weddingPlanned == 1>>marrying<<elseif $weddingPlanned == 2>>sharing<<elseif $weddingPlanned == 3>>knocking up<</if>> <<print "[[SlaveFullName(_slave1)|Slave Interact][$activeSlave = _slave1]]">><<if _ML > 2>>, <<elseif _ML == 2>> and <<print "[[SlaveFullName(_slave2)|Slave Interact][$activeSlave = _slave2]]">><</if>><<if _ML > 2>><<print "[[SlaveFullName(_slave2)|Slave Interact][$activeSlave = _slave2]]">><<if _ML == 3>> and <<else>>, <</if>><<print "[[SlaveFullName(_slave3)|Slave Interact][$activeSlave = _slave3]]">><<if _ML == 4>> and <<print "[[SlaveFullName(_slave4)|Slave Interact][$activeSlave = _slave4]]">><</if>> <<if $weddingPlanned == 2>>with your honored guests<</if>><</if>>.
	[[Cancel it|Manage Personal Affairs][$weddingPlanned = -1, $marrying = []]]
<</if>>

<<if $FCTVreceiver > 0>>

	<<if $FCTVrate == 1>>
		You make sure to tune in to FCTV at least once a week. [[Watch every other week|Manage Personal Affairs][$FCTVrate = 2]] | [[Watch once a month|Manage Personal Affairs][$FCTVrate = 4]] | [[Ignore it|Manage Personal Affairs][$FCTVrate = -1]]
	<<elseif $FCTVrate == 2>>
		You make sure to tune in to FCTV at least every two weeks. [[Watch every week|Manage Personal Affairs][$FCTVrate = 1]] | [[Watch once a month|Manage Personal Affairs][$FCTVrate = 4]] | [[Ignore it|Manage Personal Affairs][$FCTVrate = -1]]
	<<elseif $FCTVrate == 4>>
		You make sure to check in on FCTV at least once a month. [[Watch every week|Manage Personal Affairs][$FCTVrate = 1]] | [[Watch every other week|Manage Personal Affairs][$FCTVrate = 2]] | [[Ignore it|Manage Personal Affairs][$FCTVrate = -1]]
	<<else>>
		You don't watch FCTV. [[Watch every week|Manage Personal Affairs][$FCTVrate = 1]] | [[Watch every other week|Manage Personal Affairs][$FCTVrate = 2]] | [[Watch once a month|Manage Personal Affairs][$FCTVrate = 4]]
	<</if>>
	<<if $saveImported > 0 && $FCTVremote == 0>>

You know TVs should have a remote. [[Buy one yourself|Manage Personal Affairs][$FCTVremote = 1, cashX(forceNeg(100*$upgradeMultiplierTrade), "capEx")]]
	<</if>>
<</if>>

You ponder what skills may be useful in running your arcology.

Trading:
<<if $PC.trading >= 100>>
	You are a master at economics and trading.
<<elseif $PC.trading >= 80>>
	You are an expert at economics and trading.
<<elseif $PC.trading >= 60>>
	You are skilled in economics and trading.
<<elseif $PC.trading >= 40>>
	You know some things about economics and trading.
<<elseif $PC.trading >= 20>>
	You are a beginner in economics.
<<elseif $PC.trading >= 0>>
	You know only the basics of trading.
<<elseif $PC.trading >= -20>>
	You know how to haggle a little.
<<elseif $PC.trading >= -40>>
	You know how to shop around.
<<elseif $PC.trading >= -60>>
	You know not to pay sticker price.
<<elseif $PC.trading >= -80>>
	People always give you discounts, but you never save any money.
<<else>>
	They said it was a bear market, so where are the bears?
<</if>>

Warfare:
<<if $PC.warfare >= 100>>
	You are a master of warfare.
<<elseif $PC.warfare >= 80>>
	You are an expert at tactics and strategy.
<<elseif $PC.warfare >= 60>>
	You are skilled in combat.
<<elseif $PC.warfare >= 40>>
	You know some things about combat.
<<elseif $PC.warfare >= 20>>
	You are a beginner in tactics and strategy.
<<elseif $PC.warfare >= 0>>
	You know only the basics of fighting.
<<elseif $PC.warfare >= -20>>
	You know how to hold a gun.
<<elseif $PC.warfare >= -40>>
	You know how to stab with a knife.
<<elseif $PC.warfare >= -60>>
	Go for the throat?
<<elseif $PC.warfare >= -80>>
	Just kick them in the balls, right?
<<else>>
	People like you are usually the first raped in a war.
<</if>>

Slaving:
<<if $PC.slaving >= 100>>
	You are a master slaver.
<<elseif $PC.slaving >= 80>>
	You are an expert at enslaving.
<<elseif $PC.slaving >= 60>>
	You are skilled in slaving.
<<elseif $PC.slaving >= 40>>
	You know some things about getting slaves.
<<elseif $PC.slaving >= 20>>
	You are a beginner in slaving.
<<elseif $PC.slaving >= 0>>
	You know only the basics of slaving.
<<elseif $PC.slaving >= -20>>
	You know how to avoid becoming a slave.
<<elseif $PC.slaving >= -40>>
	You know to read contracts before you sign them.
<<elseif $PC.slaving >= -60>>
	You know to be careful.
<<elseif $PC.slaving >= -80>>
	You know better than to trust anyone.
<<else>>
	It would be easy to enslave you.
<</if>>

Engineering:
<<if $PC.engineering >= 100>>
	You are a master engineer.
<<elseif $PC.engineering >= 80>>
	You are an expert at engineering.
<<elseif $PC.engineering >= 60>>
	You are skilled in engineering.
<<elseif $PC.engineering >= 40>>
	You know some things about engineering.
<<elseif $PC.engineering >= 20>>
	You are a beginner in engineering.
<<elseif $PC.engineering >= 0>>
	You know only the basics of engineering.
<<elseif $PC.engineering >= -20>>
	You can build a gingerbread house that doesn't collapse.
<<elseif $PC.engineering >= -40>>
	You can tie a tight knot, does that count?
<<elseif $PC.engineering >= -60>>
	Glue is your friend; lots of it.
<<elseif $PC.engineering >= -80>>
	You know better than to even try to build something.
<<else>>
	You can cook; that's sort of like building something, right?
<</if>>

Medicine:
<<if $PC.medicine >= 100>>
	You are a master surgeon.
<<elseif $PC.medicine >= 80>>
	You are an expert at medicine and surgery.
<<elseif $PC.medicine >= 60>>
	You are skilled in surgery.
<<elseif $PC.medicine >= 40>>
	You know some things about medicine.
<<elseif $PC.medicine >= 20>>
	You are a beginner in medicine.
<<elseif $PC.medicine >= 0>>
	You know the basics of treating injuries.
<<elseif $PC.medicine >= -20>>
	You can stop a wound from getting infected.
<<elseif $PC.medicine >= -40>>
	Gauze is your friend. Just keep wrapping.
<<elseif $PC.medicine >= -60>>
	You know how to apply a band-aid.
<<elseif $PC.medicine >= -80>>
	Cure-alls are wonderful. Why aren't they sold in stores, though?
<<else>>
	Alcohol makes pain go away, right?
<</if>>

Hacking:
<<if $PC.hacking >= 100>>
	You are a master of hacking.
<<elseif $PC.hacking >= 80>>
	You are an expert at hacking.
<<elseif $PC.hacking >= 60>>
	You are skilled in hacking.
<<elseif $PC.hacking >= 40>>
	You know some things about hacking.
<<elseif $PC.hacking >= 20>>
	You are a beginner in hacking.
<<elseif $PC.hacking >= 0>>
	You know only the basics of hacking.
<<elseif $PC.hacking >= -20>>
	You know how to click a mouse.
<<elseif $PC.hacking >= -40>>
	Enter does something?
<<elseif $PC.hacking >= -60>>
	Where is the "any" key?
<<elseif $PC.hacking >= -80>>
	You can push the power button, good job.
<<else>>
	This black box thingy is magical.
<</if>>

On formal occasions, you are announced as $PCTitle. By slaves, however, you prefer to be called <<= properMaster()>>.

<<if ndef $PC.customTitle>>

<<link "Set a custom title for slaves to address you">>
		<<replace "#result">>
			Custom title: <<textbox "$PC.customTitle" $PC.customTitle>>
			<<link "Apply">>
				<<replace "#result">>
					Your title is now $PC.customTitle.
					<<set $PC.customTitleLisp = lispReplace($PC.customTitle)>>
				<</replace>>
			<</link>>
		<</replace>>
	<</link>>
<<else>>

Your custom title is <<textbox "$PC.customTitle" $PC.customTitle>>
	<<link "Apply">>
		<<replace "#result">>
			Your title is now $PC.customTitle.
			<<set $PC.customTitleLisp = lispReplace($PC.customTitle)>>
		<</replace>>
	<</link>> |
	<<link "Stop using a custom title">>
		<<replace "#result">>
			You stop using a custom title
			<<set $PC.customTitle = undefined>>
			<<set $PC.customTitleLisp = undefined>>
		<</replace>>
	<</link>>
<</if>>

<<link "Rename yourself">>
	<<replace "#nameResult">>
	New name: <<textbox "_PCNamet" $PC.name>>
		<<link "Apply">>
			<<run repX(-500, "event")>>
			<<replace "#nameResult">>
				<<set $PC.name = _PCNamet>>
				You will now be known as <<= PlayerName()>>.
			<</replace>>
		<</link>>
	<</replace>>
<</link>> //Will cost you some reputation//

<<if $PC.degeneracy > 0>>

	__Rumors__

	<<if $PC.degeneracy > 100>>
		There are severe and devastating rumors about you spreading across the arcology.
	<<elseif $PC.degeneracy > 75>>
		There are severe rumors about you spreading across the arcology.
	<<elseif $PC.degeneracy > 50>>
		There are bad rumors about you spreading across the arcology.
	<<elseif $PC.degeneracy > 25>>
		There are rumors about you spreading across the arcology.
	<<elseif $PC.degeneracy > 10>>
		There are minor rumors about you spreading across the arcology.
	<<else>>
		The occasional rumor about you can be heard throughout the arcology.
	<</if>>

<</if>>

<<if $familyTesting == 1>>

			<<link "Pull up the file on your family tree.">>
				<<replace #familyTreeLink>>
					<<run renderFamilyTree($slaves, -1)>>
				<</replace>>
			<</link>>

	<<if totalPlayerRelatives($PC) > 0 || ($showMissingSlaves && ($PC.mother in $missingTable || $PC.father in $missingTable))>>
		<<PlayerFamily>>
	<</if>>
<</if>>

<<if $PC.vagina == 1>>

__Contraceptives and Fertility__

<<if $PC.preg < 6 && $PC.pregKnown == 1 && $PC.pregSource != -6>>
	Your period is late, so the first thing you do is test yourself for a potential pregnancy: @@.lime;you are pregnant.@@ <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0, $PC.pregWeek = 0>><<set WombFlush($PC)>><<print "You take a syringe filled with abortifacients and make yourself comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">>
    <</replace>><</link>>
<<elseif $PC.labor == 1>>
	You are beginning to feel contractions; you'll be giving birth soon.
<<elseif $PC.preg >= 39>>
	Your due date is looming, but your <<if $PC.pregType > 1>>children don't<<else>>child doesn't<</if>> seem to be interested in coming out just yet. [[Induce childbirth|Manage Personal Affairs][$PC.labor = 1]]
<<elseif $PC.pregKnown == 1 && $PC.pregSource != -6>>
	You're pregnant, something rather unbecoming for an arcology owner. <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregWeek = -2, $PC.pregType = 0, $PC.pregSource = 0, $PC.belly = 0, $PC.pregKnown = 0>><<set WombFlush($PC)>><<print "You take a syringe filled with abortifacients and make yourself comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">>
    <</replace>><</link>>
<</if>>

<<if $PC.births > 0>>

In total, you have given birth to:
<<if $PC.birthElite > 0>>

<<print $PC.birthElite>> bab<<if $PC.birthElite > 1>>ies<<else>>y<</if>> for the Societal Elite.
<</if>>
<<if $PC.birthMaster > 0>>

<<print $PC.birthMaster>> bab<<if $PC.birthMaster > 1>>ies<<else>>y<</if>> for your former master.
<</if>>
<<if $PC.birthClient > 0>>

<<print $PC.birthClient>> bab<<if $PC.birthClient > 1>>ies<<else>>y<</if>> from clients you've slept with.
<</if>>
<<if $PC.birthDegenerate > 0>>

<<print $PC.birthDegenerate>> bastard<<if $PC.birthDegenerate > 1>>s<</if>> from getting fucked by slaves.
<</if>>
<<if $PC.birthArcOwner > 0>>

<<print $PC.birthArcOwner>> bab<<if $PC.birthArcOwner > 1>>ies<<else>>y<</if>> from your time with male arcology owners.
<</if>>
<<if $PC.birthCitizen > 0>>

<<print $PC.birthCitizen>> bab<<if $PC.birthCitizen > 1>>ies<<else>>y<</if>> from sex with arcology citizens.
<</if>>
<<if $PC.birthOther > 0>>

<<print $PC.birthOther>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from sources you can't quite recall.
<</if>>
<<if $PC.birthSelf > 0>>

<<print $PC.birthSelf>> bab<<if $PC.birthSelf > 1>>ies<<else>>y<</if>> that <<if $PC.birthSelf > 1>>are<<else>>is<</if>> literally all you.
<</if>>
<<if $PC.birthLab > 0>>

<<print $PC.birthLab>> bab<<if $PC.birthLab > 1>>ies<<else>>y<</if>> specially designed in the lab.
<</if>>
<</if>>
<<if $PC.slavesKnockedUp > 0>>

	<<if $PC.dick == 1>>
		You've knocked up <<print num($PC.slavesKnockedUp)>> fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered <<print num($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>> as an arcology owner so far.
	<<else>>
		Before your sex change, you knocked up <<print num($PC.slavesKnockedUp)>> fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered <<print num($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>>.
	<</if>>
<<else>>
	<<if $PC.slavesFathered > 0>>

		<<if $PC.dick == 1>>
			You've fathered <<print num($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>> as an arcology owner so far.
		<<else>>
			Before your sex change, you fathered <<print num($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>>.
		<</if>>
	<</if>>
<</if>>

<<if $PC.preg >= 8>>
	You're currently <<print $PC.preg>> week<<if $PC.preg > 1>>s<</if>> pregnant, so contraception doesn't matter right now.
<<elseif $PC.preg >= 6>>
	You're having morning sickness.
<<elseif $PC.preg > 1>>
	You've missed your period. This could be bad.
<<elseif $PC.preg > 0 && $PC.pregSource != -6>>
	Your fertile pussy has been thoroughly seeded; there is a chance you are pregnant. <<link "Pop some morning after pills">><<set $PC.preg = 0, $PC.pregWeek = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0>><<set WombFlush($PC)>><<goto "Manage Personal Affairs">><</link>>
<<elseif $PC.pregWeek < 0>>
	You're still recovering from your recent pregnancy.
<<elseif $PC.preg == -2>>
	You're menopausal. Your time to bear children has passed.
<<elseif $PC.preg == -1>>
	You're currently on birth control.
	[[Stop taking it|Manage Personal Affairs][$PC.preg = 0]]
<<elseif $PC.preg == 0>>
	You're currently fertile.
	[[Start taking birth control|Manage Personal Affairs][$PC.preg = -1, $PC.fertDrugs = 0]]

	<<set _toSearch = $PC.refreshment.toLowerCase(), _fertRefresh = 0>>
	<<if _toSearch.indexOf("fertility") != -1>>
		<<set _fertRefresh = 1>>
	<</if>>
	<<if $PC.fertDrugs == 1>>
		You are currently taking fertility supplements<<if _fertRefresh == 1>>on top of the <<print $PC.refreshment>>s.<<else>>.<<if $PC.forcedFertDrugs > 0>> You feel a strange eagerness whenever you think of bareback sex.<</if>><</if>> [[Stop taking fertility drugs|Manage Personal Affairs][$PC.fertDrugs = 0]]
	<<else>>
		You are not on any fertility supplements<<if _fertRefresh == 1>>, other than the $PC.refreshment, of course.<<else>>.<<if $PC.forcedFertDrugs > 0>> You feel a strange eagerness whenever you think of bareback sex.<</if>><</if>> [[Start taking fertility drugs|Manage Personal Affairs][$PC.fertDrugs = 1]]
	<</if>>
<</if>>
<<if ($PC.preg > 0 && $pregnancyMonitoringUpgrade == 1)>>

[[Inspect pregnancy|Analyze PC Pregnancy]]
<</if>>
<<if $PC.preg >= 0 && $PC.vagina == 1>>

[[Harvest and implant an egg|Surrogacy Workaround][$donatrix = $PC, $impregnatrix = "Undecided", $receptrix = "Undecided", $nextLink = "Manage Personal Affairs"]]
<</if>>

<<if $arcologies[0].FSRestartDecoration >= 100>>
	<<if $playerBred == 0>>

		You are currently not bearing children for the Societal Elite.
		[[List your womb as available|Manage Personal Affairs][$playerBred = 1, $playerBredTube = 0]] | [[Sign up for artificial insemination|Manage Personal Affairs][$playerBred = 1, $playerBredTube = 1]]
	<<else>>
		Your womb is dedicated to carrying the Societal Elites' children.
		<<if $PC.birthElite > 0>>
			[[List your womb as unavailable|Manage Personal Affairs][$playerBred = 0]]
		<<else>>
			// You must bear at least one child for the Societal Elite before removing yourself from the breeding program. //
		<</if>>
	<</if>>
<</if>>

<<if $PC.preg == 0 && $PC.pregWeek == 0>>

	<<if $dairyPiping == 1 && ($cumSlaves > 0 || $arcologies[0].FSPastoralistLaw == 1)>>
		<<if $PC.cumTap == 0>>

			The tap connected to $dairyName has a variety of attachments, one of which being a very tantalizing dick-shaped nozzle. It looks like it would be a perfect fit for you, if you were curious, that is.

[[No one is looking...|FSelf]]
		<<else>>

			The tap connected to $dairyName is calling to you. Begging to let it fill you with cum again. If you wanted to try and go bigger, that is.

[[Sounds fun!|FSelf]]

<<link "You only want to get pregnant." "Manage Personal Affairs">><<set $PC.preg = 1, $PC.pregWeek = 1, $PC.pregSource = 0, $PC.pregKnown = 1>><<set $PC.pregType = setPregType($PC)>><<set WombImpregnate($PC, $PC.pregType, 0, 1)>><</link>>
		<</if>>
	<</if>>
	<<if $PC.vagina == 1 && $PC.dick == 1>>
		<<if $PC.birthSelf > 0>>

			Who better to impregnate you than you?

[[Impregnate yourself.|MpregSelf]]
		<<else>>

			You have an empty vagina, a working set of balls, and a strong craving for a hot creampie. Who better to give it to you than you?
			[[Grab an extra syringe.|MpregSelf]]
		<</if>>
	<</if>>

<</if>>

<<else>> /* no vagina */

<<if $PC.births > 0>>

	Before your sex change, you had given birth to:
	<<if $PC.birthElite > 0>>

<<print num($PC.birthElite)>> bab<<if $PC.birthElite > 1>>ies<<else>>y<</if>> for the Societal Elite.
	<</if>>
	<<if $PC.birthMaster > 0>>

<<print num($PC.birthMaster)>> bab<<if $PC.birthMaster > 1>>ies<<else>>y<</if>> for your former master.
	<</if>>
	<<if $PC.birthClient > 0>>

<<print num($PC.birthOther)>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from clients you've slept with.
	<</if>>
	<<if $PC.birthDegenerate > 0>>

<<print num($PC.birthDegenerate)>> bastard<<if $PC.birthDegenerate > 1>>s<</if>> from getting fucked by slaves.
	<</if>>
	<<if $PC.birthArcOwner > 0>>

<<print num($PC.birthArcOwner)>> bab<<if $PC.birthArcOwner > 1>>ies<<else>>y<</if>> from your time with male arcology owners.
	<</if>>
	<<if $PC.birthCitizen > 0>>

<<print num($PC.birthCitizen)>> bab<<if $PC.birthCitizen > 1>>ies<<else>>y<</if>> from sex with arcology citizens.
	<</if>>
	<<if $PC.birthFutaSis > 0>>

<<print num($PC.birthFutaSis)>> bab<<if $PC.birthFutaSis > 1>>ies<<else>>y<</if>> conceived during orgies with the Futanari Sisters.
	<</if>>
	<<if $PC.birthOther > 0>>

<<print num($PC.birthOther)>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from sources you can't quite recall.
	<</if>>
	<<if $PC.birthSelf > 0>>

<<print num($PC.birthSelf)>> bab<<if $PC.birthSelf > 1>>ies<<else>>y<</if>> that <<if $PC.birthSelf > 1>>were<<else>>was<</if>> literally all you.
	<</if>>
	<<if $PC.birthLab > 0>>

<<print $PC.birthLab>> bab<<if $PC.birthLab > 1>>ies<<else>>y<</if>> specially designed in the lab.
	<</if>>
<</if>>
<<if $PC.slavesKnockedUp > 0>>

		You've knocked up <<print num($PC.slavesKnockedUp)>> fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered <<print num($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>> as an arcology owner so far.
<<else>>
	<<if $PC.slavesFathered > 0>>

		You've fathered <<print num($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>> as an arcology owner so far.
	<</if>>
<</if>>

<</if>>

<<if $PC.lactation == 1>>

	__Lactation__

	Your breasts are laden with milk.
	<<if $playerGetsMilked == 2>>
		You are spending time with the penthouse milkers and making a quick ¤ from your efforts. [[Stop milking yourself|Manage Personal Affairs][$playerGetsMilked = 0]] | [[Stop using the milkers|Manage Personal Affairs][$playerGetsMilked = 1]]
	<<elseif $playerGetsMilked == 1>>
		You are taking the time to keep yourself lactating. [[Stop milking yourself|Manage Personal Affairs][$playerGetsMilked = 0]]<<if $servantMilkers == 1>> | [[Use the penthouse milkers|Manage Personal Affairs][$playerGetsMilked = 2]]<</if>>
	<<else>>
		You are currently letting nature run its course. [[Keep yourself milked|Manage Personal Affairs][$playerGetsMilked = 1]]<<if $servantMilkers == 1>> | [[Use the penthouse milkers|Manage Personal Affairs][$playerGetsMilked = 2]]<</if>>
	<</if>>
<</if>>

__Drugs__

<<if $PC.staminaPills == 1>>
	You are currently taking stamina enhancing pills in order to enjoy more slaves per week. [[Stop taking stamina enhancing drugs|Manage Personal Affairs][$PC.staminaPills = 0]]
<<else>>
	You are not on any stamina enhancers. [[More stamina means more sex|Manage Personal Affairs][$PC.staminaPills = 1]]
<</if>>

__Other Personal Business__
<<if $rep >= 10000>>

 [[Visit the Black Market|The Black Market]]
<<elseif $rep > 7500>>

 You lack the reputation to be invited to the underground Black Market.
<</if>>

<<if $propOutcome == 1 && $arcologies[0].FSRestart != "unset">>

	__Elite Breeder Qualifications__
	<<if ndef $activeStandard>>
		<<InitStandards>>
	<<else>>
		<<UpdateStandards>>
		<<BreedingStandards>>
	<</if>>
<</if>>


code:
:: Nueva Universidad de Libertad [nobr]

<<set $nextButton = "Back", $nextLink = "Buy Slaves", $returnTo = "Buy Slaves", $showEncyclopedia = 1, $encyclopedia = "Slave Schools">>
/* Multi-Purchase Support */
<<if ndef $newSlaves>><<set $newSlaves = []>><</if>>
<<if $newSlaves.length > 0>>
	<<set $nextButton = "Continue", $nextLink = "Bulk Slave Intro", $slaveMarket = "NUL", $returnTo = "Main", $newSlaveIndex = 0>>
<</if>>

//Nueva Universidad de Libertad is a unique slave school operating in the Free Cities. Its business model is to offer as close to asexuality as a sex slave can possess. All students have their sex organs surgically removed at a very young age, before the onset of puberty. This is followed by numerous cosmetic surgery alternations, alongside a steady regimen of hormone blockers, throughout their education. The result is an utterly physically androgynous slave. <<if $NUL.schoolUpgrade != 0>>

You have endowed the school with advanced training courses in <<if $NUL.schoolUpgrade == 1>>entertainment and conversation<<else>>the various sexual arts<</if>>. As a major financial supporter of the institution, you also receive a discount on them.<</if>>//

Nueva Universidad de Libertad offers a fresh graduate for inspection via video call. The interview takes place in said graduate's dormitory. The room is sparse and utilitarian, and immaculately clean. Likely by design, it looks like the set from an old sci-fi movie.

<<= generateMarketSlave("NUL")>>
<<set $slaveCost = slaveCost($activeSlave)>>
<<if $NUL.schoolSale != 0>>
	<<set $slaveCost = Math.trunc($slaveCost*0.5)>>
<<elseif $NUL.schoolUpgrade != 0>>
	<<set $slaveCost = Math.trunc($slaveCost*0.8)>>
<</if>>
<<if $slavesSeen > $slaveMarketLimit>><<set $slaveCost += Math.trunc($slaveCost*(($slavesSeen-$slaveMarketLimit)*0.1))>><</if>>

The price is <<print cashFormat($slaveCost)>>.<<if $slavesSeen > $slaveMarketLimit>> You have cast such a wide net for slaves this week that it is becoming more expensive to find more for sale. Your reputation helps determine your reach within the slave market.<</if>>

<<setLocalPronouns $activeSlave>>
<<buyingFromSchoolControls $NUL "slave" "slaves">>


code:
:: Organ Farm [nobr]

<<set $nextButton = "Back", $nextLink = "Manage Penthouse", $showEncyclopedia = 1, $encyclopedia = "The Pharmaceutical Fab.", _PCSkillCheck = Math.min($upgradeMultiplierMedicine, $HackingSkillMultiplier)>>

The Organ Farm

<<if $organFarmUpgrade > 2>>
	//The organ farm is running smoothly. It can rapidly grow tailored organs for implantation in slaves. It can easily produce altered variants should you obtain the data necessary to create them.//

<<elseif $organFarmUpgrade > 1>>
	//The organ farm is running smoothly. It can quickly grow tailored organs for implantation in slaves, though there will be side-effects. It can easily produce altered variants should you obtain the data necessary to create them.//

<<elseif ($organFarmUpgrade > 0)>>
	//The organ farm is running smoothly. It can grow tailored organs for implantation in slaves. It can easily produce altered variants should you obtain the data necessary to create them.//

<</if>>

<<if ($organFarmUpgrade < 3) && ($rep <= 10000*_PCSkillCheck)>>
	//You lack the reputation to access experimental organ farm parts//

<<elseif $dispensary == 0 && $organFarmUpgrade == 2>>
	//An upgraded pharmaceutical fabricator is required by the perfected organ farm//

<<elseif $dispensary == 0 && $organFarmUpgrade == 1>>
	//A pharmaceutical fabricator is required to produce the chemicals for the accelerated organ farm//

<<elseif $dispensaryUpgrade == 0 && $organFarmUpgrade == 2>>
	//The pharmaceutical fabricator must upgraded in order to produce the drugs required by the perfected organ farm//

<<elseif $organs.length > 0>>
	//The organ farm cannot be upgraded while it is use//

<<elseif ($organFarmUpgrade == 2) && ($rep > 10000*_PCSkillCheck)>>
	[[Upgrade the organ farm to the cutting edge model|Organ Farm][cashX(forceNeg(150000*_PCSkillCheck), "capEx"), $organFarmUpgrade = 3]]
	//Costs <<print cashFormat(150000*_PCSkillCheck)>>//

    //Will allow the organ farm to rapidly grow organs without risk to the implantee's health.//

<<elseif ($organFarmUpgrade == 1) && ($rep > 10000*_PCSkillCheck)>>
	[[Upgrade the organ farm with an experimental growth accelerator|Organ Farm][cashX(forceNeg(75000*_PCSkillCheck), "capEx"), $organFarmUpgrade = 2]]
	//Costs <<print cashFormat(75000*_PCSkillCheck)>>//

    //Will allow the organ farm to quickly grow organs. Implanted organs may cause health issues.//

<</if>>

Organ Production

<<if $organs.length > 0>>
	The following organs are being grown:
	<<for $i = 0; $i < $organs.length; $i++>>
		<<set $j = $slaveIndices[$organs[$i].ID]>>
		<<if def $j>>

			$slaves[$j].slaveName's $organs[$i].type,
			<<if $organFarmUpgrade == 1>>
				<<print $organs[$i].weeksToCompletion>>
			<<elseif $organFarmUpgrade == 2>>
				<<print Math.ceil($organs[$i].weeksToCompletion/2)>>
			<<elseif $organFarmUpgrade == 3>>
				<<print Math.ceil($organs[$i].weeksToCompletion/4)>>
			<</if>> weeks from completion.
		<<else>>
			@@.red;Error: organID not found.@@
		<</if>>
	<</for>>

<</if>>
<<if $incubatorSlaves > 0>>
	<<for $x = 0; $x < $incubatorOrgans.length; $x++>>
		<<for _w = 0; _w < $incubatorSlaves; _w++>>
			<<if $tanks[_w].ID == $incubatorOrgans[$x].ID>>

				$tanks[_w].slaveName's $incubatorOrgans[$x].type,
				<<if $incubatorOrgans[$x].weeksToCompletion <= 0>>
					ready to be implanted as soon as $he exits the incubator.
				<<else>>
					<<if $organFarmUpgrade == 1>>
						<<print $incubatorOrgans[$x].weeksToCompletion>>
					<<elseif $organFarmUpgrade == 2>>
						<<print Math.ceil($incubatorOrgans[$x].weeksToCompletion/2)>>
					<<elseif $organFarmUpgrade == 3>>
						<<print Math.ceil($incubatorOrgans[$x].weeksToCompletion/4)>>
					<</if>> weeks from completion.
				<</if>>
				<<break>>
			<</if>>
		<</for>>
	<</for>>

<</if>>
/* TODO: potentially allow organs to be implanted into children in the nursery
<<if $nurserySlaves > 0>>
	<<for $x = 0; $x < $nurseryOrgans.length; $x++>>
		<<for _w = 0; _w < $nurserySlaves; _w++>>
			<<if $cribs[_w].ID == $nurseryOrgans[$x].ID>>

				$cribs[_w].slaveName's $nurseryOrgans[$x].type,
				<<if $nurseryOrgans[$x].weeksToCompletion <= 0>>
					ready to be implanted as soon as $he exits the nursery.
				<<else>>
					<<if $organFarmUpgrade == 1>>
						<<print $nurseryOrgans[$x].weeksToCompletion>>
					<<elseif $organFarmUpgrade == 2>>
						<<print Math.ceil($nurseryOrgans[$x].weeksToCompletion/2)>>
					<<elseif $organFarmUpgrade == 3>>
						<<print Math.ceil($nurseryOrgans[$x].weeksToCompletion/4)>>
					<</if>> weeks from completion.
				<</if>>
				<<break>>
			<</if>>
		<</for>>
	<</for>>

<</if>>
*/

<<if $completedOrgans.length > 0>>

	Currently the following organs are completed and ready for implantation:
	<<for $i = 0; $i < $completedOrgans.length; $i++>>
		<<set $j = $slaveIndices[$completedOrgans[$i].ID]>>
		<<if def $j>>

$slaves[$j].slaveName's $completedOrgans[$i].type.
		<<else>>
			@@.red;Error: completedOrganID not found.@@
		<</if>>
	<</for>>

<</if>>

<<if ($youngerOvaries != 1) && ($rep <= 10000*_PCSkillCheck)>>
	//You lack the reputation to access designs for cloning fertile ovaries for menopausal slaves.//

<<elseif ($youngerOvaries != 1) && ($rep > 10000*_PCSkillCheck)>>
	[[Purchase designs for cloning fertile ovaries for menopausal slaves|Organ Farm][cashX(forceNeg(30000*_PCSkillCheck), "capEx"), $youngerOvaries = 1]]
	//Costs <<print cashFormat(30000*_PCSkillCheck)>>//

    //Will allow the growth of younger, fertile ovaries for menopausal slaves. Restored fertility will only last for a couple years at most.//

<<elseif ($youngerOvaries > 0)>>
	The organ farm is capable of growing fertile ovaries for postmenopausal slaves.

<</if>>

<<if $asexualReproduction == 1>>
	The organ farm is capable of growing modified ovary pairs capable of self-fertilization.

<</if>>

<<if $seePreg != 0 && $seeBestiality == 1 && $cheatMode == 1>>
	<<if $farmyardLabUpgrades.animalOvaries > 0>>
		<<if $animalOvaries < 1>>
			//You lack the required designs for cloning animal ovaries for slaves.//

		<<else>>
			The organ farm is capable of growing animal ovaries for slaves.

		<</if>>
	<</if>>

	<<if $farmyardLabUpgrades.animalTesticles > 0>>
		<<if $animalTesticles < 1>>
			//You lack the required designs for cloning animal testicles for slaves.//

		<<else>>
			The organ farm is capable of growing animal testicles for slaves.

		<</if>>
	<</if>>

	<<if $farmyardLabUpgrades.animalMpreg > 0 && $arcologies[0].FSGenderRadicalistResearch == 1>>
		<<if $animalMpreg < 1>>
			//You lack the required designs for cloning animal anal wombs and ovaries for slaves.//

		<<else>>
			The organ farm is capable of growing animal anal wombs and ovaries for slaves.

		<</if>>
	<</if>>
<</if>>

Future Societies Research

<<if $seePreg != 0>>
	<<if $arcologies[0].FSGenderRadicalistDecoration == 100>>
		<<if ($arcologies[0].FSGenderRadicalistResearch == 0)>>
			<<if ($rep >= 10000*_PCSkillCheck)>>
				[[Fund research into developing male pregnancy methods|Organ Farm][cashX(forceNeg(50000*_PCSkillCheck), "capEx"),$arcologies[0].FSGenderRadicalistResearch = 1]] //Costs <<print cashFormat(50000*_PCSkillCheck)>>. Will allow cloning and production of anal uteri and ovaries.//

			<<else>>
				// You lack the reputation to access the research necessary to develop anal uteri and ovaries. //

			<</if>>
		<<else>>
			The organ farm has been upgraded with schematics for modified uteri and ovaries.

		<</if>>
	<<elseif $arcologies[0].FSGenderRadicalistResearch == 1>>
		The organ farm has been upgraded with schematics for modified uteri and ovaries.

	<<else>>
		// Gender Radicalist focused research unavailable. //

	<</if>>
<</if>>