code:
:: Manage Personal Affairs [nobr]

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

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 a $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 and $PC.eyeColor eyes.
<<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 is 51>>next week<<else>>in <<print 52-$PC.birthWeek>> weeks<</if>>.<</if>>
Looking down;
<<if $PC.boobsBonus > 2>>
	you have a @@.orange;pair of H-cup breasts.@@ <<if $PC.boobsImplant == 1>>They are big, round, and obviously implants. They barely move when you fuck your slaves<<else>>They are all natural, heavy, and a bit saggy though they have some perk to them. Once they get going, it's hard to make them stop<</if>>.<<if $PC.preg > 30 || $PC.births > 0>> Your breasts feel even more enormous lately; likely a side effect of your lactation.<</if>><<if $PC.markings == "freckles">> The tops of your breasts and your cleavage are lightly freckled.<<elseif $PC.markings == "heavily freckled">> They are covered in freckles, which are particularly dense in the cleft between them.<</if>>
<<elseif $PC.boobsBonus == 2>>
	you have a @@.orange;pair of G-cup breasts.@@ <<if $PC.boobsImplant == 1>>They are kind of rounded and much to perky for their size to pass as real. They have a bit of bounce to them as you fuck a slave<<else>>They are all natural and a little heavy. The bounce everywhere when you fuck your slaves<</if>>.<<if $PC.preg > 30 || $PC.births > 0>> Your breasts feel even more huge lately; likely a side effect of your lactation.<</if>><<if $PC.markings == "freckles">> The tops of your breasts and your cleavage are lightly freckled.<<elseif $PC.markings == "heavily freckled">> They are covered in freckles, which are particularly dense in the cleft between them.<</if>>
<<elseif $PC.boobsBonus == 1>>
	you have a @@.orange;pair of F-cup breasts.@@ <<if $PC.boobsImplant == 1>>They are nice, perky and not obviously implants. Though the way they move when you fuck a slave pins them as such<<else>>They are nice and perky, despite their size. They bounce lewdly as you fuck your slaves.<</if>>.<<if $PC.preg > 30 || $PC.births > 0>> Your breasts feel bigger lately; likely a side effect of your lactation.<</if>><<if $PC.markings == "freckles">> The tops of your breasts and your cleavage are lightly freckled.<<elseif $PC.markings == "heavily freckled">> They are covered in freckles, which are particularly dense in the cleft between them.<</if>>
<<elseif $PC.boobsBonus == -0.5>>
	you have a @@.orange;pair of D-cup breasts.@@ They are nice, perky and bounce pleasantly as you fuck your slaves.<<if $PC.preg > 30 || $PC.births > 0>> Your breasts feel bigger lately; likely a side effect of your lactation.<</if>><<if $PC.markings == "freckles">> The tops of your breasts and your cleavage are lightly freckled.<<elseif $PC.markings == "heavily freckled">> They are covered in freckles, which are particularly dense in the cleft between them.<</if>>
<<elseif $PC.boobsBonus == -1>>
	you have a @@.orange;pair of C-cup breasts.@@ They are nice and perky, with just a little bounce when you fuck your slaves.<<if $PC.preg > 30 || $PC.births > 0>> Your breasts feel bigger lately; likely a side effect of your lactation.<</if>><<if $PC.markings == "freckles">> The tops of your breasts and your cleavage are lightly freckled.<<elseif $PC.markings == "heavily freckled">> They are covered in freckles, which are particularly dense in the cleft between them.<</if>>
<<elseif $PC.boobs == 1>>
	you have a @@.orange;healthy pair of DD breasts.@@<<if $PC.preg > 30 || $PC.births > 0>> Your breasts feel fuller lately; likely a side effect of your lactation.<</if>><<if $PC.markings == "freckles">> The tops of your breasts and your cleavage are lightly freckled.<<elseif $PC.markings == "heavily freckled">> They are covered in freckles, which are particularly dense in the cleft between them.<</if>>
<<else>>
	you have a @@.orange;masculine chest.@@<<if $PC.preg > 30 || $PC.births > 0>> Your chest feels swollen; the beads of milk forming on your nipples tells you why.<</if>><<if $PC.markings == "freckles">>Your chest is covered in a light spray of freckles.<<elseif $PC.markings == "heavily freckled">>Your chest is covered in dense freckles.<</if>>
<</if>>
<<if $PC.preg > 0>>
	<<if $PC.belly >= 120000>>
		@@.red;Your belly is coated with stretch marks and is taut as a drum; you don't know how much more your poor womb can endure.@@ You can barely even leave your bed without a helping hand. Kicks can almost constantly be seen dotting its surface. You give it a pat for good measure, only encouraging your octuplets to squirm in excitement.<<if $PC.dick == 1>> You watch as your dick hardens from the prostate stimulation; you steady yourself for the coming orgasm.<</if>>
	<<elseif $PC.belly >= 105000>>
		You have trouble getting up and sitting down. Even standing while supporting your @@.orange;massive belly@@ has become an exhausting endeavor.
	<<elseif $PC.belly >= 90000>>
		You can @@.orange;barely reach around your gravid mass@@ any longer. Even the shortest waddle is exhausting.
	<<elseif $PC.belly >= 75000>>
		Your @@.orange;belly is starting to become worrying;@@ you feel over-filled at all times, and your children like to remind you just how full you are.
	<<elseif $PC.belly >= 60000>>
		You're @@.orange;definitely having multiples,@@ there is no denying it at this point. All you can do is try to relax and keep trying to stave off the stretch marks.
	<<elseif $PC.belly >= 45000>>
		You both look and feel enormous, your @@.orange;belly juts out so much now.@@ You've grown so much you now have trouble viewing yourself in mirror.
	<<elseif $PC.belly >= 30000>>
		Whenever you have the chance, you prefer to stay naked instead of stretching out your clothing with your @@.orange;giant pregnant belly.@@
	<<elseif $PC.belly >= 14000>>
		Your @@.orange;so gravid@@ you have trouble seeing the entirety of your huge belly.
	<<elseif $PC.belly >= 12000>>
		You can barely wrap your arms around your @@.orange;huge pregnant belly,@@ and when you do, your popped navel reminds you of the bun<<if $PC.pregType > 0>>s<</if>> in your oven.
	<<elseif $PC.belly >= 10000>>
		Your @@.orange;pregnancy has gotten quite huge,@@ none of your clothes fit it right.
	<<elseif $PC.belly >= 7000>>
		Your @@.orange;pregnant belly juts out annoyingly far,@@ just getting dressed is a pain now.
	<<elseif $PC.belly >= 5000>>
		Your @@.orange;belly has gotten quite large with child;@@ it is beginning to get the way of sex and business.
	<<elseif $PC.belly >= 1500>>
		Your @@.orange;belly is now large enough that there is no hiding it.@@
	<<elseif $PC.belly >= 500>>
		Your @@.orange;belly is rounded by your early pregnancy.@@
	<<elseif $PC.belly >= 250>>
		Your @@.orange;lower belly is beginning to stick out,@@ you're definitely pregnant.
	<<elseif $PC.belly >= 100>>
		Your @@.orange;belly is slightly swollen;@@ combined with your missed period, odds are you're pregnant.
	<<elseif $PC.belly < 100>>
		Your @@.red;period hasn't happened in some time,@@ you might be pregnant.
	<</if>>
	<<if $PC.preg >= 41>>
		You don't know why you even bother getting out of bed; you are @@.orange;overdue and ready to drop@@ at any time, making your life as arcology owner very difficult. You try to relax and enjoy your slaves, but you can only manage so much in this state.
	<<elseif $PC.preg >= 39>>
		You feel absolutely massive; your @@.orange;full-term belly@@ makes your life as arcology owner very difficult.
	<</if>>
<<elseif $PC.belly >= 1500>>
	Your belly is still very distended from your recent pregnancy.
<<elseif $PC.belly >= 500>>
	Your belly is still distended from your recent pregnancy.
<<elseif $PC.belly >= 250>>
	Your belly is still bloated from your recent pregnancy
<<elseif $PC.belly >= 100>>
	Your belly is still slightly swollen after your recent pregnancy.
<</if>>
<<if $PC.balls == 2 && $PC.belly < 5000>> Your pubic mound is 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;
<<if $PC.dick == 1 && $PC.vagina == 1>>
	an @@.orange;above average penis@@<<if $PC.balls > 2>> that is constantly streaming precum,<<elseif $PC.balls > 0>> that is constantly dripping precum,<</if>> and a pair of
	<<if $PC.ballsImplant > 3>>
		@@.orange;monstrous, heavy balls@@ roughly the size of small watermelons thanks to a combination of growth hormones and gel injections; it's impossible to sit normally, <<if $ballsAccessibility == 1>>but your penthouse has been redesigned with oversized balls in mind. There are plenty of chairs capable of handling you littering the penthouse<<else>> you rest on the edge of your chair, allowing your oversized balls to dangle precariously<</if>>. You've given up on wearing pants around the penthouse, and their bulging mass is so gargantuan that people assume they're fake, but every slave you fuck gets a distended belly from all the cum you pump into them. They make just about everything you do difficult: sitting, walking, fucking; but they certainly make life interesting.
	<<elseif $PC.ballsImplant == 3>>
		@@.orange;enormous, heavy balls@@ roughly the size of cantaloupes; it's difficult to sit normally, your clothes barely fit, and everyone probably assumes they are fake, but every slave you fuck gets a distinct slap with each thrust. They get in the way of nearly everything you do: sitting, walking, fucking; but they make life certainly interesting.
	<<elseif $PC.ballsImplant == 2>>
		@@.orange;huge balls@@ roughly the size of softballs; they are pretty heavy, but make sex and day-to-day affairs interesting.
	<<elseif $PC.ballsImplant == 1>>
		@@.orange;large balls;@@ you can certainly feel them as you move about.
	<<else>>
		@@.orange;normal, uneventful balls.@@
	<</if>>
	Tucked away beneath them; a
	<<if $PC.newVag == 1>>
		@@.orange;tight vagina.@@ Your pussy is very resilient, you shouldn't be able to stretch it out again.
	<<elseif $PC.career == "escort">>
		@@.red;very loose vagina.@@ Years of whoring will do that to a girl.
	<<elseif $PC.births >= 10>>
		@@.red;rather loose vagina,@@ stretched from your many children.
	<<elseif $PC.career == "servant">>
		@@.red;rather loose vagina.@@ Your master fucked you several times a day; him and his children have wreaked havoc upon your pussy.
	<<elseif $PC.births > 2>>
		@@.orange;loose vagina,@@ stretched from your several children.
	<<elseif $PC.career == "gang" || $PC.career == "celebrity" || $PC.career == "wealth">>
		@@.lime;reasonably tight vagina.@@ You've had some fun during your previous career.
	<<elseif $PC.births > 0>>
		@@.lime;reasonably tight vagina.@@ It's handled childbirth well enough.
	<<else>>
		@@.lime;tight vagina.@@ You're no virgin, but you've taken care of yourself.
	<</if>>
<<elseif $PC.dick == 1>>
	an @@.orange;above average penis@@<<if $PC.balls > 2>> that is constantly streaming precum,<<elseif $PC.balls > 0>> that is constantly dripping precum,<</if>> and a pair of
	<<if $PC.ballsImplant > 3>>
		@@.orange;monstrous, heavy balls@@ roughly the size of small watermelons thanks to a combination of growth hormones and gel injections; it's impossible to sit normally, <<if $ballsAccessibility == 1>>but your penthouse has been redesigned with oversized balls in mind. There are plenty of chairs capable of handling you littering the penthouse<<else>> you rest on the edge of your chair, allowing your oversized balls to dangle precariously<</if>>. You've given up on wearing pants around the penthouse, and their bulging mass is so gargantuan that people assume they're fake, but every slave you fuck gets a distended belly from all the cum you pump into them. They make just about everything you do difficult: sitting, walking, fucking; but they certainly make life interesting.
	<<elseif $PC.ballsImplant == 3>>
		@@.orange;enormous, heavy balls@@ roughly the size of cantaloupes; it's difficult to sit normally, your clothes barely fit, and everyone probably assumes they are fake, but every slave you fuck gets a distinct slap with each thrust. They get in the way of nearly everything you do: sitting, walking, fucking; but they make life certainly interesting.
	<<elseif $PC.ballsImplant == 2>>
		@@.orange;huge balls@@ roughly the size of softballs; they are pretty heavy, but make sex and day-to-day affairs interesting.
	<<elseif $PC.ballsImplant == 1>>
		@@.orange;large balls;@@ you can certainly feel them as you move about.
	<<else>>
		@@.orange;normal, uneventful balls.@@
	<</if>>
<<else>>
	a
	<<if $PC.newVag == 1>>
		@@.orange;tight vagina.@@ Your pussy is very resilient, you shouldn't be able to stretch it out again.
	<<elseif $PC.career == "escort">>
		@@.red;very loose vagina.@@ Years of whoring will do that to a girl.
	<<elseif $PC.births >= 10>>
		@@.red;rather loose vagina,@@ stretched from your many children.
	<<elseif $PC.career == "servant">>
		@@.red;rather loose vagina.@@ Your master fucked you several times a day; him and his children have wreaked havoc upon your pussy.
	<<elseif $PC.births > 2>>
		@@.orange;loose vagina,@@ stretched from your several children.
	<<elseif $PC.career == "gang" || $PC.career == "celebrity" || $PC.career == "wealth">>
		@@.lime;reasonably tight vagina.@@ You've had some fun during your previous career.
	<<elseif $PC.births > 0>>
		@@.lime;reasonably tight vagina.@@ It's handled childbirth well enough.
	<<else>>
		@@.lime;tight vagina.@@ You're no virgin, but you've taken care of yourself.
	<</if>>
<</if>>
Around back;
<<if $PC.butt > 2>>
	<<if $PC.buttImplant == 1>>
		an @@.orange;enormous, round, hard butt;@@ it is very obviously a pair of huge implants. They barely move at all when you walk or fuck, are difficult to cram into your clothing and you keep getting stuck in chairs, but you wouldn't have it any other way.<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
	<<else>>
		an @@.orange;enormous, jiggly butt.@@ It is always wobbling for some reason or another. It really fills out your clothing and practically consumes anything you sit on.<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
	<</if>>
<<elseif $PC.butt == 2>>
	<<if $PC.buttImplant == 1>>
		a @@.orange;huge, round, firm butt;@@ it's easily identifiable as fake.<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
	<<else>>
		a @@.orange;huge, soft butt.@@ It jiggles a lot as you move.<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
	<</if>>
<<elseif $PC.butt == 1>>
	<<if $PC.buttImplant == 1>>
		a @@.orange;big firm butt;@@ anyone that feels it can tell it's fake, but at a glance you can't tell otherwise.<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
	<<else>>
		a @@.orange;big butt.@@ It jiggles a little as you walk.<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
	<</if>>
<<else>>
	a @@.orange;sexy, but normal butt.@@<<if $PC.markings == "freckles">> Your lower back is covered in a light speckling of freckles alongside your upper butt.<<elseif $PC.markings == "heavily freckled">> Your freckles are particularly dense across your lower back and upper butt.<</if>>
<</if>>

<<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.<<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 != "catlike">>| [[Catlike|Manage Personal Affairs][$PC.eyeColor = "catlike"]]<</if>>
	<<if $PC.origEye != "serpent-like">>| [[Serpent-like|Manage Personal Affairs][$PC.eyeColor = "serpent-like"]]<</if>>
	<<if $PC.origEye != "devilish">>| [[Devilish|Manage Personal Affairs][$PC.eyeColor = "devilish"]]<</if>>
	<<if $PC.origEye != "demonic">>| [[Demonic|Manage Personal Affairs][$PC.eyeColor = "demonic"]]<</if>>
	<<if $PC.origEye != "hypnotic">>| [[Hypnotic|Manage Personal Affairs][$PC.eyeColor = "hypnotic"]]<</if>>
	<<if $PC.origEye != "heart-shaped">>| [[Heart-shaped|Manage Personal Affairs][$PC.eyeColor = "heart-shaped"]]<</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 != "blonde">>| [[Blonde|Manage Personal Affairs][$PC.hColor = "blonde"]]<</if>>
	<<if $PC.origHColor != "golden">>| [[Golden|Manage Personal Affairs][$PC.hColor = "golden"]]<</if>>
	<<if $PC.origHColor != "platinum blonde">>| [[Platinum Blonde|Manage Personal Affairs][$PC.hColor = "platinum blonde"]]<</if>>
	<<if $PC.origHColor != "strawberry-blonde">>| [[Strawberry-blonde|Manage Personal Affairs][$PC.hColor = "strawberry-blonde"]]<</if>>
	<<if $PC.origHColor != "copper">>| [[Copper|Manage Personal Affairs][$PC.hColor = "copper"]]<</if>>
	<<if $PC.origHColor != "ginger">>| [[Ginger|Manage Personal Affairs][$PC.hColor = "ginger"]]<</if>>
	<<if $PC.origHColor != "red">>| [[Red|Manage Personal Affairs][$PC.hColor = "red"]]<</if>>
	<<if $PC.origHColor != "crimson">>| [[Crimson|Manage Personal Affairs][$PC.hColor = "crimson"]]<</if>>
	<<if $PC.origHColor != "green">>| [[Green|Manage Personal Affairs][$PC.hColor = "green"]]<</if>>
	<<if $PC.origHColor != "blue">>| [[Blue|Manage Personal Affairs][$PC.hColor = "blue"]]<</if>>
	<<if $PC.origHColor != "pink">>| [[Pink|Manage Personal Affairs][$PC.hColor = "pink"]]<</if>>
	<<if $PC.origHColor != "dark brown">>| [[Dark Brown|Manage Personal Affairs][$PC.hColor = "dark brown"]]<</if>>
	<<if $PC.origHColor != "brown">>| [[Brown|Manage Personal Affairs][$PC.hColor = "brown"]]<</if>>
	<<if $PC.origHColor != "auburn">>| [[Auburn|Manage Personal Affairs][$PC.hColor = "auburn"]]<</if>>
	<<if $PC.origHColor != "burgundy">>| [[Burgundy|Manage Personal Affairs][$PC.hColor = "burgundy"]]<</if>>
	<<if $PC.origHColor != "chocolate brown">>| [[Chocolate|Manage Personal Affairs][$PC.hColor = "chocolate brown"]]<</if>>
	<<if $PC.origHColor != "chestnut">>| [[Chestnut|Manage Personal Affairs][$PC.hColor = "chestnut"]]<</if>>
	<<if $PC.origHColor != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.hColor = "hazel"]]<</if>>
	<<if $PC.origHColor != "black">>| [[Black|Manage Personal Affairs][$PC.hColor = "black"]]<</if>>
	<<if $PC.origHColor != "grey">>| [[Grey|Manage Personal Affairs][$PC.hColor = "grey"]]<</if>>
	<<if $PC.origHColor != "silver">>| [[Silver|Manage Personal Affairs][$PC.hColor = "silver"]]<</if>>
	<<if $PC.origHColor != "white">>| [[White|Manage Personal Affairs][$PC.hColor = "white"]]<</if>>

<<if $FCTVreceiver == 1>>

	<<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>>

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 bandaid.
<<elseif $PC.medicine >= -80>>
	Cure-alls are wonderful. Why aren't they sold in stores, though?
<<else>>
	Alcohol makes pain go away, right?
<</if>>

On formal occasions, you are announced as $PCTitle. By slaves, however, you prefer to be called <<if ndef $PC.customTitle>><<if $PC.title == 1>>Master<<else>>Mistress<</if>><<else>>$PC.customTitle, or $PC.customTitleLisp, by those slaves incapable of saying $PC.customTitle correctly<</if>>.

<<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 = $PC.customTitle, $PC.customTitleLisp = $PC.customTitleLisp.replace("ss", "th"), $PC.customTitleLisp = $PC.customTitleLisp.replace("S", "Th"), $PC.customTitleLisp = $PC.customTitleLisp.replace("s", "th")>>
				<</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 = $PC.customTitle, $PC.customTitleLisp = $PC.customTitleLisp.replace("ss", "th"), $PC.customTitleLisp = $PC.customTitleLisp.replace("S", "Th"), $PC.customTitleLisp = $PC.customTitleLisp.replace("s", "th")>>
		<</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">> //Will cost you some reputation//
	<<replace "#nameResult">>
	New name: <<textbox "_PCNamet" $PC.name>>
		<<link "Apply">>
			<<set $rep -= 500>>
			<<replace "#nameResult">>
				<<set $PC.name = _PCNamet>>
				You will now be known as <<PlayerName>>.
			<</replace>>
		<</link>>
	<</replace>>
<</link>>

<<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 #family>>

			<<run updateFamilyTree(null, $slaves, $PC)>>

		<</replace>>
	<</link>>

	<<if totalPlayerRelatives($PC) > 0>>
		<<PlayerFamily>>
	<</if>>
<</if>>

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

__Contraceptives and Fertility__

<<if $PC.preg < 6 && $PC.pregKnown == 1 && $PC.pregSource != -1>>
	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>><<print "You take a syringe filled with abortifacients and make your self 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 child doesn't seem to be interested in coming out just yet. [[Induce childbirth|Manage Personal Affairs][$PC.labor = 1]]
<<elseif $PC.pregKnown == 1 && $PC.pregSource != -1>>
	You're pregnant, something rather unbecoming for an arcology owner. <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.belly = 0, $PC.pregKnown = 0>><<print "You take a syringe filled with abortifacients and make your self 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 that male arcology owner.
<</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>>
<<if $PC.slavesKnockedUp > 0>>

	<<if $PC.dick == 1>>
		You've knocked up $PC.slavesKnockedUp fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered $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 $PC.slavesKnockedUp fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered $PC.slavesFathered new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>>.
	<</if>>
<<else>>
	<<if $PC.slavesFathered > 0>>

		<<if $PC.dick == 1>>
			You've fathered $PC.slavesFathered new slave<<if $PC.slavesFathered > 1>>s<</if>> as an arcology owner so far.
		<<else>>
			Before your sex change, you fathered $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 != -1>>
	Your fertile pussy has been thoroughly seeded, there is a chance you are pregnant. [[Pop some morning after pills|Manage Personal Affairs][$PC.preg = 0, $PC.pregKnown = 0, $PC.pregType = 0]]
<<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]]

	<<if $PC.fertDrugs == 1>>
		You are currently taking fertility supplements.<<if $PC.forcedFertDrugs > 0>> You feel a strange eagerness whenever you think of bareback sex.<</if>> [[Stop taking fertility drugs|Manage Personal Affairs][$PC.fertDrugs = 0]]
	<<else>>
		You are not on any fertility supplements.<<if $PC.forcedFertDrugs > 0>> You feel a strange eagerness whenever you think of bareback sex.<</if>> [[Start taking fertility drugs|Manage Personal Affairs][$PC.fertDrugs = 1]]
	<</if>>
<</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]]
	<<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>>

<<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]]

[[You only want to get pregnant.|Manage Personal Affairs][$PC.preg = 1, $PC.pregSource = 0]]
	<</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 $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.birthOther>> bab<<if $PC.birthOther > 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 that male arcology owner.
	<</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 were literally all you.
	<</if>>
<</if>>
<<if $PC.slavesKnockedUp > 0>>

		You've knocked up $PC.slavesKnockedUp fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered $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 $PC.slavesFathered new slave<<if $PC.slavesFathered > 1>>s<</if>> as an arcology owner so far.
	<</if>>
<</if>>

<</if>>

<<if $propOutcome == 1>>

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


code:
:: organFarmOptions [nobr]

<<set _newOrgan = {type: "0", weeksToCompletion: "0", ID: 0}>>
<<set $slaveOrgans = {
	penis: 0,
	testicles: 0,
	scrotum: 0,
	pigTesticles: 0,
	dogTesticles: 0,
	foreskin: 0,
	ovaries: 0,
	prostate: 0,
	pigOvaries: 0,
	dogOvaries: 0,
	eyes: 0,
	voicebox: 0,
	mpreg: 0,
	mpregPig: 0,
	mpregDog: 0}>>
<<for _i = 0; _i < $organs.length; _i++>>
	<<if $activeSlave.ID == $organs[_i].ID>>
		<<if $organs[_i].type == "penis">>
			<<set $slaveOrgans.penis = 1>>
		<<elseif $organs[_i].type == "testicles">>
			<<set $slaveOrgans.testicles = 1>>
		<<elseif $organs[_i].type == "scrotum">>
			<<set $slaveOrgans.scrotum = 1>>
		<<elseif $organs[_i].type == "pigTesticles">>
			<<set $slaveOrgans.pigTesticles = 1>>
		<<elseif $organs[_i].type == "dogTesticles">>
			<<set $slaveOrgans.dogTesticles = 1>>
		<<elseif $organs[_i].type == "foreskin">>
			<<set $slaveOrgans.foreskin = 1>>
		<<elseif $organs[_i].type == "ovaries">>
			<<set $slaveOrgans.ovaries = 1>>
		<<elseif $organs[_i].type == "prostate">>
			<<set $slaveOrgans.prostate = 1>>
		<<elseif $organs[_i].type == "pigOvaries">>
			<<set $slaveOrgans.pigOvaries = 1>>
		<<elseif $organs[_i].type == "dogOvaries">>
			<<set $slaveOrgans.dogOvaries = 1>>
		<<elseif $organs[_i].type == "eyes">>
			<<set $slaveOrgans.eyes = 1>>
		<<elseif $organs[_i].type == "voicebox">>
			<<set $slaveOrgans.voicebox = 1>>
		<<elseif $organs[_i].type == "mpreg">>
			<<set $slaveOrgans.mpreg = 1>>
		<<elseif $organs[_i].type == "mpregPig">>
			<<set $slaveOrgans.mpregPig = 1>>
		<<elseif $organs[_i].type == "mpregDog">>
			<<set $slaveOrgans.mpregDog = 1>>
		<</if>>
	<</if>>
<</for>>

The fabricator is ready to grow an organ for $object. Extract tissue to begin growing:
<<if $seeDicks != 0 || $makeDicks == 1>>
	<<if $slaveOrgans.penis != 1>>

		<<link "Penis">>
			<<set $cash -= 5000>>
			<<set _newOrgan = {type: "penis", weeksToCompletion: "5", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤5000 and will add a prostate if one is not already present//
	<</if>>
	<<if $slaveOrgans.testicles != 1>>

		<<link "Testicles">>
			<<set $cash -= 5000>>
			<<set _newOrgan = {type: "testicles", weeksToCompletion: "10", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤5000 and will add a prostate if one is not already present; requires a penis for successful implantation//
	<</if>>
	<<if $slaveOrgans.scrotum != 1>>
		<<if $activeSlave.scrotum == 0>>

			<<link "Scrotum">>
				<<set $cash -= 2500>>
				<<set _newOrgan = {type: "scrotum", weeksToCompletion: "5", ID: 0}>>
				<<set _newOrgan.ID = $activeSlave.ID>>
				<<set $organs.push(_newOrgan)>>
				<<goto "Remote Surgery">>
			<</link>> //Costs ¤2500 and requires balls for successful implantation//
		<</if>>
	<</if>>
	<<if $animalParts != 0>>
		<<if $slaveOrgans.pigTesticles != 1>>

			<<link "Pig testicles">>
				<<set $cash -= 5000>>
				<<set _newOrgan = {type: "pigTesticles", weeksToCompletion: "10", ID: 0}>>
				<<set _newOrgan.ID = $activeSlave.ID>>
				<<set $organs.push(_newOrgan)>>
				<<goto "Remote Surgery">>
			<</link>> //Costs ¤5000 and requires a penis for successful implantation//
		<</if>>
		<<if $slaveOrgans.dogTesticles != 1>>

			<<link "Dog testicles">>
				<<set $cash -= 5000>>
				<<set _newOrgan = {type: "dogTesticles", weeksToCompletion: "10", ID: 0}>>
				<<set _newOrgan.ID = $activeSlave.ID>>
				<<set $organs.push(_newOrgan)>>
				<<goto "Remote Surgery">>
			<</link>> //Costs ¤5000 and requires a penis for successful implantation//
		<</if>>
	<</if>>
	<<if $slaveOrgans.foreskin != 1>>
		<<if $activeSlave.foreskin <= 0>>

			<<link "Foreskin">>
				<<set $cash -= 2500>>
				<<set _newOrgan = {type: "foreskin", weeksToCompletion: "5", ID: 0}>>
				<<set _newOrgan.ID = $activeSlave.ID>>
				<<set $organs.push(_newOrgan)>>
				<<goto "Remote Surgery">>
			<</link>> //Costs ¤2500//
		<</if>>
	<</if>>
<</if>>
<<if $slaveOrgans.ovaries != 1>>

	<<link "Ovaries">>
		<<set $cash -= 10000>>
		<<set _newOrgan = {type: "ovaries", weeksToCompletion: "10", ID: 0}>>
		<<set _newOrgan.ID = $activeSlave.ID>>
		<<set $organs.push(_newOrgan)>>
		<<goto "Remote Surgery">>
	<</link>> //Costs ¤10000 and requires a vagina for successful implantation//
<</if>>
<<if $slaveOrgans.prostate != 1>>

	<<link "Prostate">>
		<<set $cash -= 5000>>
		<<set _newOrgan = {type: "prostate", weeksToCompletion: "5", ID: 0}>>
		<<set _newOrgan.ID = $activeSlave.ID>>
		<<set $organs.push(_newOrgan)>>
		<<goto "Remote Surgery">>
	<</link>> //Costs ¤5000 and does not require the presence any specific organ for successful implantation//
<</if>>
<<if $animalParts != 0>>
	<<if $slaveOrgans.pigOvaries != 1>>

			<<link "Pig ovaries">>
			<<set $cash -= 10000>>
			<<set _newOrgan = {type: "pigOvaries", weeksToCompletion: "10", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤10000 and requires a vagina for successful implantation//
	<</if>>
	<<if $slaveOrgans.pigOvaries != 1>>

		<<link "Dog ovaries">>
			<<set $cash -= 10000>>
			<<set _newOrgan = {type: "dogOvaries", weeksToCompletion: "10", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤10000 and requires a vagina for successful implantation//
	<</if>>
<</if>>
<<if $slaveOrgans.eyes != 1>>
	<<if $activeSlave.eyes <= -2 && $activeSlave.eyes != "implant">>

		<<link "Eyes">>
			<<set $cash -= 10000>>
			<<set _newOrgan = {type: "eyes", weeksToCompletion: "10", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤10000 and is imperfect - eyes will lack natural color//
	<</if>>
<</if>>
<<if $slaveOrgans.voicebox != 1>>
	<<if ($activeSlave.voice == 0)>>

		<<link "Vocal cords">>
			<<set $cash -= 5000>>
			<<set _newOrgan = {type: "voicebox", weeksToCompletion: "5", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤5000//
	<</if>>
<</if>>
<<if $arcologies[0].FSGenderRadicalistResearch == 1>>
	<<if $slaveOrgans.mpreg != 1>>

		<<link "Anal womb and ovaries">>
			<<set $cash -= 20000>>
			<<set _newOrgan = {type: "mpreg", weeksToCompletion: "10", ID: 0}>>
			<<set _newOrgan.ID = $activeSlave.ID>>
			<<set $organs.push(_newOrgan)>>
			<<goto "Remote Surgery">>
		<</link>> //Costs ¤20000 and the slave must not have female repoductive organs for successful implantation//
	<</if>>
	<<if $animalParts != 0>>
		<<if $slaveOrgans.mpregPig != 1>>

			<<link "Anal pig womb and ovaries">>
				<<set $cash -= 20000>>
				<<set _newOrgan = {type: "mpregPig", weeksToCompletion: "10", ID: 0}>>
				<<set _newOrgan.ID = $activeSlave.ID>>
				<<set $organs.push(_newOrgan)>>
				<<goto "Remote Surgery">>
			<</link>> //Costs ¤20000 and the slave must not have female repoductive organs for successful implantation//
		<</if>>
		<<if $slaveOrgans.mpregDog != 1>>

			<<link "Anal dog womb and ovaries">>
				<<set $cash -= 20000>>
				<<set _newOrgan = {type: "mpregDog", weeksToCompletion: "10", ID: 0}>>
				<<set _newOrgan.ID = $activeSlave.ID>>
				<<set $organs.push(_newOrgan)>>
				<<goto "Remote Surgery">>
			<</link>> //Costs ¤20000 and the slave must not have female repoductive organs for successful implantation//
		<</if>>
	<</if>>
<</if>>

<<if $organs.length > 0>>
	<<for _i = 0; _i < $organs.length; _i++>>
		<<if $organs[_i].ID == $activeSlave.ID>>

			$possessiveCap $organs[_i].type is expected to be ready in <<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.
		<</if>>
	<</for>>
<</if>>

<<if $completedOrgans.length > 0>>
	<<for _i = 0; _i < $completedOrgans.length; _i++>>
		<<if $completedOrgans[_i].ID == $activeSlave.ID>>

The fabricator has completed $possessive $completedOrgans[_i].type.
			<<if $completedOrgans[_i].type == "penis">>
				<<if $activeSlave.dick > 0>>

					ERROR: this slave already has a penis.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<if $activeSlave.prostate == 0>>
							<<set $activeSlave.prostate = 1>>
						<</if>>
						<<set $activeSlave.dick = 2>>
						<<set $activeSlave.clit = 0>>
						<<set $activeSlave.foreskin = $activeSlave.dick>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<set $surgeryType = "addDick">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "testicles">>
				<<if $activeSlave.balls > 0>>

					ERROR: this slave already has testicles.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.dick == 0>>

					ERROR: this slave lacks the penis necessary to accept testicles.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>

You can forgo standard procedure and implant testicles directly into $possessive abdomen.
					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<if $activeSlave.prostate > 1>><<set $activeSlave.prostate = 1>><</if>>
						<<set $activeSlave.balls = 2>>
						<<set $activeSlave.ballType = "human">>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXY == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyAgeXY = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyXY = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addTesticles">>
						<<goto "Surgery Degradation">>
					<</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<if $activeSlave.prostate == 0>>
							<<set $activeSlave.prostate = 1>>
						<</if>>
						<<set $activeSlave.balls = 2>>
						<<set $activeSlave.ballType = "human">>
						<<set $activeSlave.scrotum = 2>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXY == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyAgeXY = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyXY = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addBalls">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "pigTesticles">>
				<<if $activeSlave.balls > 0>>

					ERROR: this slave already has testicles.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.dick == 0>>

					ERROR: this slave lacks the penis necessary to accept testicles.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.balls = 3>>
						<<set $activeSlave.scrotum = 3>>
						<<set $activeSlave.ballType = "pig">>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXY == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyAgeXY = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyXY = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addPigBalls">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "dogTesticles">>
				<<if $activeSlave.balls > 0>>

					ERROR: this slave already has testicles.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.dick == 0>>

					ERROR: this slave lacks the penis necessary to accept testicles.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.balls = 2>>
						<<set $activeSlave.ballType = "dog">>
						<<set $activeSlave.scrotum = 2>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXY == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyAgeXY = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $potencyAge>>
									<<set $activeSlave.pubertyXY = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addDogBalls">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "scrotum">>
				<<if $activeSlave.scrotum > 0>>

					ERROR: this slave already has a scrotum.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.balls == 0>>

					ERROR: this slave lacks the balls necessary to accept a scrotum.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Graft on">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<set $activeSlave.scrotum = $activeSlave.balls>>
						<<set $activeSlave.health -= 10>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 10>>
						<</if>>
						<<set $surgeryType = "addScrotum">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "foreskin">>
				<<if $activeSlave.foreskin > 0>>

					ERROR: this slave already has a <<if $activeSlave.dick > 0>>foreskin<<else>>clitoral hood<</if>>.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Graft on">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<if $activeSlave.dick > 0>>
							<<set $activeSlave.foreskin = $activeSlave.penis>>
						<<else>>
							<<set $activeSlave.foreskin = $activeSlave.clit>>
						<</if>>
						<<set $activeSlave.health -= 10>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 10>>
						<</if>>
						<<set $surgeryType = "addForeskin">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "ovaries">>
				<<if $activeSlave.ovaries > 0>>

					ERROR: this slave already has ovaries.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.vagina < 0>>

					ERROR: this slave lacks the vagina necessary to accept ovaries.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.mpreg != 0 || $activeSlave.bellyImplant != -1>>

					ERROR: this slave's body cavity is filled with another organ.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<set $activeSlave.ovaries = 1>>
						<<set $activeSlave.eggType = "human">>
						<<set $activeSlave.preg = 0>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXX == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyAgeXX = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyXX = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addOvaries">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "pigOvaries">>
				<<if $activeSlave.ovaries > 0>>

					ERROR: this slave already has ovaries.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.vagina < 0>>

					ERROR: this slave lacks the vagina necessary to accept ovaries.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.mpreg != 0 || $activeSlave.bellyImplant != -1>>

					ERROR: this slave's body cavity is filled with another organ.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.ovaries = 1>>
						<<set $activeSlave.eggType = "pig">>
						<<set $activeSlave.preg = 0>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXX == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyAgeXX = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyXX = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addPigOvaries">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "dogOvaries">>
				<<if $activeSlave.ovaries > 0>>

					ERROR: this slave already has ovaries.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.vagina < 0>>

					ERROR: this slave lacks the vagina necessary to accept ovaries.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.mpreg != 0 || $activeSlave.bellyImplant != -1>>

					ERROR: this slave's body cavity is filled with another organ.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.ovaries = 1>>
						<<set $activeSlave.eggType = "dog">>
						<<set $activeSlave.preg = 0>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXX == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyAgeXX = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyXX = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "addDogOvaries">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "prostate">>
				<<if $activeSlave.prostate != 0>>

					ERROR: this slave already has a prostate.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<set $activeSlave.prostate = 1>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<set $surgeryType = "addProstate">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "eyes">>
				<<if $activeSlave.eyes > -2 && $activeSlave.origEye != "implant">>

					ERROR: this slave has working eyes.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<elseif $activeSlave.origEye == "implant">>

					<<link "Remove ocular implants and implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<set $stockpile.ocularImplant++>>
						<<set $activeSlave.eyes = 1>>
						<<set _oldEyes = $genePool.find(function(s) { return s.ID = $activeSlave.ID; })>>
						<<set $activeSlave.origEye = _oldEyes.origEye>>
						<<set $activeSlave.eyeColor = $activeSlave.origEye>>
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<set $surgeryType = "newEyes">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<set $activeSlave.eyes = 1>>
						<<set $activeSlave.eyeColor = $activeSlave.origEye>>
						/* no way to salvage original eye color */
						<<set $activeSlave.health -= 20>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<set $surgeryType = "unblind">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "mpreg">>
				<<if ($activeSlave.ovaries != 0) && ($activeSlave.vagina > -1) && ($activeSlave.mpreg != 0)>>

					ERROR: this slave has existing reproductive completedOrgans.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.mpreg = 1>>
						<<set $activeSlave.eggType = "human">>
						<<set $activeSlave.preg = 0>>
						<<set $activeSlave.health -= 40>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXX == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyAgeXX = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyXX = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "mpreg">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "mpregPig">>
				<<if ($activeSlave.ovaries != 0) && ($activeSlave.vagina > -1) && ($activeSlave.mpreg != 0)>>

					ERROR: this slave has existing reproductive completedOrgans.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.mpreg = 1>>
						<<set $activeSlave.eggType = "pig">>
						<<set $activeSlave.preg = 0>>
						<<set $activeSlave.health -= 40>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXX == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyAgeXX = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyXX = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "mpregPig">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<<elseif $completedOrgans[_i].type == "mpregDog">>
				<<if ($activeSlave.ovaries != 0) && ($activeSlave.vagina > -1) && ($activeSlave.mpreg != 0)>>

					ERROR: this slave has existing reproductive completedOrgans.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>>
							<<if $activeSlave.ID == $completedOrgans[$i].ID>>
							<<set $completedOrgans.deleteAt($i)>>
							<<break>>
							<</if>>
						<</for>>
						<<set $activeSlave.mpreg = 1>>
						<<set $activeSlave.eggType = "dog">>
						<<set $activeSlave.preg = 0>>
						<<set $activeSlave.health -= 40>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 20>>
						<</if>>
						<<if $activeSlave.pubertyXX == 0>>
							<<if $precociousPuberty == 1>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyAgeXX = ($activeSlave.physicalAge+1)>>
								<</if>>
							<<else>>
								<<if $activeSlave.physicalAge >= $fertilityAge>>
									<<set $activeSlave.pubertyXX = 1>>
								<</if>>
							<</if>>
						<</if>>
						<<set $surgeryType = "mpregDog">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>

			<<else>>
				<<if $activeSlave.voice > 0>>

					ERROR: this slave is not mute.
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<<else>>

					<<link "Implant">>
						<<set $cash -= $surgeryCost>>
						<<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>>
						<<if $activeSlave.ovaries == 1 && $activeSlave.hormoneBalance >= 200>>
							<<set $activeSlave.voice = 3>>
						<<elseif ($activeSlave.balls > 0) || ($activeSlave.hormoneBalance < -20)>>
							<<set $activeSlave.voice = 1>>
						<<else>>
							<<set $activeSlave.voice = 2>>
						<</if>>
						<<set $activeSlave.health -= 10>>
						<<if $organFarmUpgrade == 2>>
							<<set $activeSlave.chem += 10>>
						<</if>>
						<<set $surgeryType = "restoreVoice">>
						<<goto "Surgery Degradation">>
					<</link>>
					|
					<<link "Discard">><<for $i = 0; $i < $completedOrgans.length; $i++>><<if $activeSlave.ID == $completedOrgans[$i].ID>><<set $completedOrgans.deleteAt($i)>><<break>><</if>><</for>><<goto "Remote Surgery">><</link>>
				<</if>>
			<</if>>
		<</if>>
	<</for>> /* for of the $completedOrgans loop */
<</if>>

repo_name: GammaXai/fc

license: mit


code:
:: P Bodyswap Reveal [nobr]

<<set $nextButton = "Continue", $nextLink = "Random Nonindividual Event">>

<<set $bodyswapAnnounced = 1>>

You receive countless messages throughout the day; mostly worthless spam, several uninteresting business offers and the occasional enslavement request. This one catches your eye however. It's an offer from a top surgeon who has recently been experimenting with radical new surgeries. You've been loosely following their work for the last few weeks, ever since they successfully transferred the brain from one slave to another with minimal side effects, and it seems they are now offering their work to anyone with a surgical suite capable of performing the surgery and willing to undertake the risk.

It's an interesting offer and your remote surgery will suffice should you want to change up your slaves' bodies more than any drug or implant ever could. You'll need a slave to place their brain into, however. Perhaps one the mindless slaves from the Flesh Heap will suit your needs.


code:
:: PC Appearance Intro [nobr]

Race and appearance are largely irrelevant in the free cities; there are only the free and the enslaved.

//Appearance only, no effect on gameplay (unless you make a big deal out of it).//

@@.orange;What nationality are you?@@

You are $PC.nationality.

<<textbox "$PC.nationality" $PC.nationality "PC Appearance Intro">>//Capitalize it//

@@.orange;What race are you?@@

You're $PC.race.

<<link "White">>
	<<set $PC.race = "white">>
	<<PlayerRace>>
<</link>>
|
<<link "Asian">>
	<<set $PC.race = "asian">>
	<<PlayerRace>>
<</link>>
|
<<link "Latina">>
	<<set $PC.race = "latina">>
	<<PlayerRace>>
<</link>>
|
<<link "Middle Eastern">>
	<<set $PC.race = "middle eastern">>
	<<PlayerRace>>
<</link>>
|
<<link "Black">>
	<<set $PC.race = "black">>
	<<PlayerRace>>
<</link>>
|
<<link "Semitic">>
	<<set $PC.race = "semitic">>
	<<PlayerRace>>
<</link>>
|
<<link "Southern European">>
	<<set $PC.race = "southern european">>
	<<PlayerRace>>
<</link>>
|
<<link "Indo-aryan">>
	<<set $PC.race = "indo-aryan">>
	<<PlayerRace>>
<</link>>
|
<<link "Amerindian">>
	<<set $PC.race = "amerindian">>
	<<PlayerRace>>
<</link>>
|
<<link "Pacific Islander">>
	<<set $PC.race = "pacific islander">>
	<<PlayerRace>>
<</link>>
|
<<link "Malay">>
	<<set $PC.race = "malay">>
	<<PlayerRace>>
<</link>>
|
<<link "Mixed race">>
	<<set $PC.race = "mixed race">>
	<<PlayerRace>>
<</link>>

@@.orange;What is your skin tone?@@

You have $PC.skin skin.

<<link "White">>
	<<set $PC.skin = "white">>
	<<PlayerSkin>>
<</link>>
|
<<link "Fair">>
	<<set $PC.skin = "fair">>
	<<PlayerSkin>>
<</link>>
|
<<link "Light">>
	<<set $PC.skin = "light">>
	<<PlayerSkin>>
<</link>>
|
<<link "Dark">>
	<<set $PC.skin = "dark">>
	<<PlayerSkin>>
<</link>>
|
<<link "Olive">>
	<<set $PC.skin = "olive">>
	<<PlayerSkin>>
<</link>>
|
<<link "Black">>
	<<set $PC.skin = "black">>
	<<PlayerSkin>>
<</link>>
|
<<link "Brown">>
	<<set $PC.skin = "brown">>
	<<PlayerSkin>>
<</link>>
|
<<link "Light Brown">>
	<<set $PC.skin = "light brown">>
	<<PlayerSkin>>
<</link>>
|
<<link "Pale">>
	<<set $PC.skin = "pale">>
	<<PlayerSkin>>
<</link>>
|
<<link "Extremely Pale">>
	<<set $PC.skin = "extremely pale">>
	<<PlayerSkin>>
<</link>>

@@.orange;Some people have freckles.@@

	<<if $PC.markings == "none">>
		Your skin is pure and clear of any freckles.
	<<elseif $PC.markings == "freckles">>
		You have some freckles on your cheeks and elsewhere.
	<<elseif $PC.markings == "heavily freckled">>
		You have dense freckles on your cheeks and elsewhere.
	<</if>>

<<link "No Freckles">>
	<<set $PC.markings = "none">>
	<<PlayerMarkings>>
<</link>>
|
<<link "Light Freckles">>
	<<set $PC.markings = "freckles">>
	<<PlayerMarkings>>
<</link>>
|
<<link "Heavy Freckles">>
	<<set $PC.markings = "heavily freckled">>
	<<PlayerMarkings>>
<</link>>

@@.orange;What color are your eyes?@@

You have $PC.eyeColor eyes.

<<textbox "$PC.eyeColor" $PC.eyeColor "PC Appearance Intro">>

@@.orange;What color is your hair?@@

You have $PC.hColor hair.

<<textbox "$PC.hColor" $PC.hColor "PC Appearance Intro">>

[[Finish player character customization|PC Experience Intro]]


code:
:: PC Preg Intro [nobr]

You have a working female reproductive system, and thus, a menstrual cycle. Women already face hardships as slaveowners and arcology owners, and being pregnant, coupled with a strong societal aversion to the dominant being penetrated, leads most pregnant owners to find themselves in dire situations. As an added precaution, since nothing stops an owner from hooking up with another owner, contraceptives are common amongst free women.

@@.orange;What's your stance on taking contraceptives?@@

You're
<<if $PC.preg == -1>>
	not interested in being a mother.
	[[Risky|PC Preg Intro][$PC.preg = 0]]
<<elseif $PC.preg == 0>>
	fertile and you know the risks.
	[[Safe|PC Preg Intro][$PC.preg = -1]] | [[About that...|PC Preg Intro][$PC.preg = 10]]
<<else>>
	already pregnant.
	[[Fertile|PC Preg Intro][$PC.preg = 0]]
<</if>>

//Being or becoming pregnant will raise difficulty.//

@@.orange;Hormones can be an interesting thing, how do they affect you?@@

You're
<<if $PC.pregMood == 1>>
	gentle and motherly when you're hormonal.
	[[Normal|PC Preg Intro][$PC.pregMood = 0]] | [[Aggressive|PC Preg Intro][$PC.pregMood = 2]]
<<elseif $PC.pregMood == 0>>
	in complete control of yourself.
	[[Motherly|PC Preg Intro][$PC.pregMood = 1]] | [[Aggressive|PC Preg Intro][$PC.pregMood = 2]]
<<else>>
	aggressive and domineering when you're hormonal.
	[[Normal|PC Preg Intro][$PC.pregMood = 0]] | [[Motherly|PC Preg Intro][$PC.pregMood = 1]]
<</if>>

//Hormone induced moods may alter some sex scenes, as well as change slaves' reactions to you.//

[[Confirm player character customization|PC Appearance Intro]]


code:
:: PC Skin Workaround [nobr]

<<set $nextButton = "Get in", $nextLink = "PC Surgery Degradation">>

You can enter any color for your skin to be changed to. Once you have chosen, you just have to get in and let the machine do its thing.
<br><<textbox "$PC.skin" $PC.skin "PC Surgery Degradation">>