code:
:: Master Suite [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Master Suite", $showEncyclopedia = 1, $encyclopedia = "Master Suite", _SL = $slaves.length, _MsL = $MastSiIDs.length>>

<<SlaveIDSort $MastSiIDs>>

<<if $masterSuiteName != "the Master Suite">>
	<<set $masterSuiteNameCaps = $masterSuiteName.replace("the ", "The ")>>
<</if>>

<<set $masterSuiteAverageEnergy = 0, _masterSuiteAverageCum = 0, _masterSuiteAverageDick = 0, _masterSuiteAverageDom = 0, _masterSuiteAverageMilk = 0, _masterSuiteAveragePreg = 0, _masterSuiteAverageSadism = 0, _masterSuitePregnantSlaves = 0, _masterSuitePregnantSlavesMultiple = 0>>

<<if ($Concubine != 0 && $Concubine.pregKnown == 1)>>
	<<set _masterSuitePregnantSlaves++>>
	<<if $Concubine.pregType > 1>>
		<<set _masterSuitePregnantSlavesMultiple++>>
	<</if>>
<</if>>

<<if _MsL > 0>>
<<for _dI = 0; _dI < _MsL; _dI++>>
	<<set _i = $slaveIndices[$MastSiIDs[_dI]]>>
	<<set _Slave = $slaves[_i]>>

	<<if $masterSuiteUpgradeLuxury == 2>>
	<<if canAchieveErection(_Slave)>>
		<<set _masterSuiteAverageCum += _Slave.balls, _masterSuiteAverageDick += _Slave.dick>>
	<</if>>
	<<set _masterSuiteAverageMilk += _Slave.lactation*(_Slave.boobs-_Slave.boobsImplant), $masterSuiteAverageEnergy += _Slave.energy, _masterSuiteAveragePreg += _Slave.preg>>
	<<if _Slave.fetish == "dom">>
		<<set _masterSuiteAverageDom += _Slave.fetishStrength>>
	<<elseif _Slave.fetish == "submissive">>
		<<set _masterSuiteAverageDom -= _Slave.fetishStrength>>
	<<elseif _Slave.fetish == "sadist">>
		<<set _masterSuiteAverageSadism += _Slave.fetishStrength>>
	<<elseif _Slave.fetish == "masochist">>
		<<set _masterSuiteAverageSadism -= _Slave.fetishStrength>>
	<</if>>
	<</if>>
	<<if (_Slave.pregKnown == 1)>>
		<<set _masterSuitePregnantSlaves++>>
		<<if _Slave.pregType > 1>>
			<<set _masterSuitePregnantSlavesMultiple++>>
		<</if>>
	<</if>>
<</for>>
	<<set $masterSuiteAverageEnergy = $masterSuiteAverageEnergy/_MsL>>
	<<set _masterSuiteAverageMilk = _masterSuiteAverageMilk/_MsL>>
	<<set _masterSuiteAverageCum = _masterSuiteAverageCum/_MsL>>
	<<set _masterSuiteAverageDick = _masterSuiteAverageDick/_MsL>>
	<<set _masterSuiteAveragePreg = _masterSuiteAveragePreg/_MsL>>
	<<set _masterSuiteAverageDom = _masterSuiteAverageDom/_MsL>>
	<<set _masterSuiteAverageSadism = _masterSuiteAverageSadism/_MsL>>
<</if>>

<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
<<set _Tmult2 = Math.trunc(25000*$upgradeMultiplierArcology)>>
<<set _Tmult3 = Math.trunc(15000*$upgradeMultiplierArcology)>>
<<if $masterSuiteUpgradeLuxury == 1>>

$masterSuiteNameCaps is furnished
<<switch $masterSuiteDecoration>>
<<case "Roman Revivalist">>
	as a Roman emperor's apartment. There is a small shrine to the old gods the <<= properMaster()>> favors in a side room, and the flooring is erotic mosaic. Pride of place is given to a set of low couches placed together, capable of accommodating many nude bodies.
<<case "Aztec Revivalist">>
	as an Aztec cultural, spiritual and military leader of the city you're allowed great leniency. The <<= properMaster()>>'s room is created to gratify you as a true god of the people.
<<case "Egyptian Revivalist">>
	after the royal room of an ancient Egyptian palace. There is a small shrine to the old gods the <<= properMaster()>> favors in a side room, and linen hangings decorate the walls and ceiling. An imposing bed of sandalwood occupies the center of the room.
<<case "Edo Revivalist">>
	in the Spartan style of an Edo period castle's innermost rooms. Rice paper screens partition off many small cubicles around its large central space. There, around a low bed, there are many mats for servants to kneel around their <<= properMaster()>>.
<<case "Arabian Revivalist">>
	as a beguiling haze of Arabian decadence. There is a great gilded bed in the center of the space, piled with silk pillows for naked bodies to recline on. Gauzy curtains flutter in the warm, heady breeze.
<<case "Chinese Revivalist">>
	as though it were the innermost sanctum of the Forbidden City. A massive bed fills the central space. The walls are gorgeous gilded hand-carved screens, and heavy jade statues of favored gods crouch in the corners.
<<case "Chattel Religionist">>
	as a severe place of cold stone and hard wood. A single shaft of sunlight illuminates an enormous stone platform that serves as a bed where penitents give their bodies to their <<= properMaster()>>.
<<case "Degradationist">>
	with a gothic grandeur. Blood-red upholstery and hardwood menace crouch in the center of the space in the form of a massive poster bed with curtains of chain mail.
<<case "Repopulation Focus">>
	comfortably, with lots of cushions and seats for pregnant slaves to lounge on. Various specialized toys, as well as, lotions and creams are readily available. There's a huge, reinforced, low to the ground bed in the middle of the suite.
<<case "Eugenics">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls lots of fun. There's a huge bed in the middle of the suite, with hidden compartments containing condoms and spermicides.
<<case "Asset Expansionist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with stacked slaves as fun as possible. There's a huge bed in the middle of the suite, heavily reinforced.
<<case "Transformation Fetishist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with bimbo slaves as fun as possible. There's a huge bed in the middle of the suite, heavily reinforced.
<<case "Gender Radicalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls in the butt lots of fun. There's a huge bed in the middle of the suite, with straps to restrain slave girls who don't want to be fucked in the butt, but they're concealed for now.
<<case "Gender Fundamentalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls nice and enjoyable. There's a huge bed in the middle of the suite, with straps to restrain slave girls who don't want to be fucked, but they're concealed for now.
<<case "Physical Idealist">>
	as a shrine to the owner's body. Athletic trophies and photographs of past victories line the walls. There's a huge bed in the middle of the space, and there are mirrors almost everywhere, including on the ceiling over the bed.
<<case "Supremacist">>
	like the royal bedroom in a palace in the old countries of $arcologies[0].FSSupremacistRace people. A massive four-poster bed dominates the space.
<<case "Subjugationist">>
	like the royal bedroom in a palace in the old countries which favored $arcologies[0].FSSubjugationistRace slaves. A massive four-poster bed dominates the space.
<<case "Paternalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with slaves mutually enjoyable.
<<case "Pastoralist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants. The space is dominated by a massive, reinforced bed, built in sections so that part of it can be cleaned while cream-squirting cows cavort on the rest.
<<case "Maturity Preferentialist">>
	comfortably, with elegant sex toys and perfumed lubricants designed to appeal to mature sex slaves. The space is dominated by a broad, soft bed, well supplied with pillows. It's the perfect place to relax with a harem of MILFs.
<<case "Youth Preferentialist">>
	comfortably, with pastel-colored sex toys and flavored lubricants designed to appeal to eager young sex slaves. The space is dominated by a broad, reinforced bed, without cushions or sheets, which would just get in the way of energetic sex.
<<case "Body Purist" "Slimness Enthusiast">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with slaves mutually enjoyable. The space is dominated by a huge bed with soft sheets.
<<case "Hedonistic">>
	comfortably, with lots of lounges for a hefty slaves to relax on. <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>Platters of food and treats are readily available throughout the room and are<<else>>Slave food is readily available for your harem and platters of food for yourself are<</if>> never out of arm's reach. There's a huge, reinforced, low to the ground bed in the middle of the suite.
<<case "Intellectual Dependency">>
	comfortably, with lots of easy-to-clean leather and plentiful easy-to-use tools, toys, and lubricants to make sex with bimbo slaves as fun and simple as possible. There's a huge bed in the middle of the suite, heavily reinforced.
<<case "Slave Professionalism">>
	comfortably, with complex sex toys and tools designed to maximize pleasure when used by skilled hands. The space is dominated by a broad, soft bed, well supplied with pillows. The rest is dedicated to perfecting oneself and boosting <<= properMaster()>>'s status ever higher.
<<case "Petite Admiration">>
	comfortably, with plentiful tools, toys, lubricants and a bevy of stepping stools to accommodate even the shortest slave. There's a huge, reinforced, low to the ground bed in the middle of the suite.
<<case "Statuesque Glorification">>
	comfortably, though designed for slaves of the taller variety. Short slaves will find the furniture, and the room's centerpiece, a massive four-poster bed, woefully out of their reach.
<<default>>
	in a refined, yet practical style. It's dominated by a huge bed in which many slaves could serve their <<= properTitle()>> and then cuddle afterward.
<</switch>>

It is full of luxuries of all kinds. The slaves here live free of want or worry, and have everything except their freedom. Their only duties are to please you and look after the suite and one another.
<<if _MsL > 2>>
	It's busy with slaves, so many that they are able to rotate through keeping themselves perfect and ready for your pleasure. The slaves not on call at the moment are beautifying themselves, cleaning, or serving others.
	<<if (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple < 2)>>
	Many of the slaves are pregnant, and they walk around proudly displaying their bellies and the new slaves growing inside them.

	<<elseif (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple > 2) && $masterSuiteHyperPregnancy == 1>>
	Many of the slaves are heavily pregnant with multiple children, and they waddle around proudly displaying their distended bulging bellies and the next generation of slaves growing within them.

	<<elseif (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple > 2)>>
	Many of the slaves are pregnant with multiple children, and they walk around proudly displaying their distended bellies and the next generation of slaves growing within them.

	<</if>>
<<elseif _MsL > 0>>
	It's sparsely populated, so that the few slaves here have to work hard and quickly to ensure that an assortment of sex slaves is perfect and ready for your pleasure at any given moment.
<<else>>
	None of your slaves are serving here.
<</if>>

    [[Remodel the suite around a luxurious pit for group sex|Master Suite][cashX(forceNeg(_Tmult1), "capEx"), $masterSuiteUpgradeLuxury = 2]] //Costs <<print cashFormat(_Tmult1)>>; will encourage fucktoys to fuck each other//

<<elseif $masterSuiteUpgradeLuxury == 2>>

$masterSuiteNameCaps is furnished
<<switch $masterSuiteDecoration>>
<<case "Roman Revivalist">>
	as a Roman emperor's apartment. There is a small shrine to the old gods the <<= properTitle()>> favors in a side room, and the flooring is erotic mosaic.
<<case "Aztec Revivalist">>
	as an Aztec cultural, spiritual and military leader of the city you're allowed great leniency. The <<= properTitle()>>'s room is created to gratify you as a true god of the people.
<<case "Egyptian Revivalist">>
	after the royal room of an ancient Egyptian palace. There is a small shrine to the old gods the <<= properTitle()>> favors in a side room, and linen hangings decorate the walls and ceiling.
<<case "Edo Revivalist">>
	in the Spartan style of an Edo period castle's innermost rooms. Rice paper screens partition off many small cubicles around its large central space.
<<case "Arabian Revivalist">>
	as a beguiling haze of Arabian decadence. Gauzy curtains flutter in the warm, heady breeze.
<<case "Chinese Revivalist">>
	as though it were the innermost sanctum of the Forbidden City. The walls are gorgeous gilded hand-carved screens, and heavy jade statues of favored gods crouch in the corners.
<<case "Chattel Religionist">>
	as a severe place of cold stone and hard wood. A single shaft of sunlight illuminates the central space.
<<case "Degradationist">>
	with a gothic grandeur. Blood-red upholstery and hardwood menace decorate the walls.
<<case "Repopulation Focus">>
	comfortably, with lots of cushions and seats for a pregnant slaves to lounge on. There are various specialized toys, as well as, lotions and creams readily available.
<<case "Eugenics">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls lots of fun. Condoms and spermicides are readily available throughout the suite.
<<case "Asset Expansionist">>
	comfortably, with the convenience of massive-breasted slaves in mind. There are lots of handrails, cushions, and low tables, covered with creams, lubricants, and sex toys.
<<case "Transformation Fetishist">>
	comfortably, with the convenience of bimbos in mind. There are lots of makeup dressers with mirrors, stripper poles, and low tables, covered with creams, lubricants, and sex toys.
<<case "Gender Radicalist">>
	comfortably, with the convenience of dickgirls in mind. There are lots of makeup dressers with mirrors, stripper poles, and low tables, covered with creams, lubricants, and vibrating butt plugs.
<<case "Gender Fundamentalist">>
	comfortably, with the convenience and pleasure of slavegirls in mind. There are lots of makeup dressers with mirrors, soft divans, and low tables, covered with creams, lubricants, and vibrators.
<<case "Physical Idealist">>
	as a shrine to the owner's body. Athletic trophies and photographs of past victories line the walls. The entire area is filled with the heady odors of sweat, metabolites, and sex.
<<case "Supremacist">>
	like the royal bedroom in a palace in the old countries of $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
	like the royal bedroom in a palace in the old countries which favored $arcologies[0].FSSubjugationistRace slaves.
<<case "Paternalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with slaves mutually enjoyable.
<<case "Pastoralist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants, with a distinct focus on mammary intercourse.
<<case "Maturity Preferentialist">>
	comfortably, with elegant sex toys and perfumed lubricants designed to appeal to mature sex slaves.
<<case "Youth Preferentialist">>
	comfortably, with pastel-colored sex toys and flavored lubricants designed to appeal to eager young sex slaves.
<<case "Body Purist" "Slimness Enthusiast">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with slaves mutually enjoyable.
<<case "Hedonistic">>
	comfortably, with lots of lounges for a hefty slaves to relax on. <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>Platters of food and treats are readily available throughout the room and are<<else>>Slave food is readily available for your harem and platters of food for yourself are<</if>> never out of arm's reach.
<<case "Intellectual Dependency">>
	comfortably, with lots of easy-to-clean leather and plentiful easy-to-use tools, toys, and lubricants to make sex with bimbo slaves as fun and simple as possible.
<<case "Slave Professionalism">>
	comfortably, with complex sex toys and tools designed to maximize pleasure when used by skilled hands. The space is largely dedicated to perfecting oneself and boosting <<= properMaster()>>'s status ever higher.
<<case "Petite Admiration">>
	comfortably, with plentiful tools, toys, lubricants and a bevy of stepping stools to accommodate even the shortest slave.
<<case "Statuesque Glorification">>
	comfortably, though designed for slaves of the taller variety. Short slaves will find the furniture woefully out of their reach.
<<default>>
	in a refined, yet practical style.
<</switch>>

The true focus of the suite is, however, the fuckpit. This stepped depression in the middle of the floor
<<if _MsL > 3>>
	is filled by cushions and every slave in the suite who isn't sleeping, eating, or bathing.
	<<if $masterSuiteAverageEnergy > 90>>
		They're having energetic group sex; most of them are fucking and being fucked at the same time.
	<<elseif $masterSuiteAverageEnergy > 60>>
		They're having group sex; most of them are in active sexual contact with more than one partner.
	<<else>>
		They're having languid group sex; more than one slave is dozing while another plays with their body.
	<</if>>
	<<if $masterSuiteAverageEnergy > 90>>
		The pit features automated cleaning systems, which are quite necessary.
		<<if _masterSuiteAverageDick > 4>>
			With so many huge cocks in the fuckpit, every hole available is frequently fucked vigorously.
		<</if>>
		<<if _masterSuiteAverageCum > 4>>
			The slaves' bodies grow more coated with cum, and more of the white stuff drips from their holes, until they take a break for a shower.
		<</if>>
		<<if _masterSuiteAverageMilk > 4000>>
			Most of them cannot tear themselves away (or cannot escape) for a normal machine milking, so their tender, overfull breasts squirt milk whenever anyone touches them. The lowest level of the fuckpit is a pool of milk.
		<</if>>
	<</if>>
	<<if (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple < 2)>>
		Many of the slaves are pregnant, and more than one has her face buried in the cunt directly below a gravid belly while she lovingly massages her own.

	<<elseif (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple > 2) && $masterSuiteHyperPregnancy == 1>>
		Many of the slaves are heavily pregnant with multiple children, and more than one has her face buried in the cunt directly below a massively overburdened belly while she lovingly massages her own distended squirming stomach.

	<<elseif (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple > 2)>>
		Many of the slaves are pregnant with multiple children, and more than one has her face buried in the cunt directly below a grossly swollen belly while she lovingly massages her own distended stomach.

	<</if>>
<<elseif _MsL > 0>>
	has a few lonely-looking fucktoys in it, badly outnumbered by the cushions.
<<else>>
	is desolate and unpopulated.
<</if>>

    [[Refit the suite to the height of traditional opulence|Master Suite][cashX(forceNeg(_Tmult1), "capEx"), $masterSuiteUpgradeLuxury = 1]] //Costs <<print cashFormat(_Tmult1)>>; will focus the suite on you//

<<else>>

$masterSuiteNameCaps is furnished
<<switch $masterSuiteDecoration>>
<<case "Roman Revivalist">>
	as a Roman patrician's apartment. There is a small shrine to the old gods the <<= properTitle()>> favors in a side room, and the flooring is erotic mosaic.
<<case "Aztec Revivalist">>
	as an Aztec cultural, spiritual and military leader of the city you're allowed great leniency. The <<= properTitle()>>'s room is created to gratify you as a true god of the people.
<<case "Egyptian Revivalist">>
	after the best room of an ancient Egyptian mansion. There is a small shrine to the old gods the <<= properTitle()>> favors in a side room, and linen hangings decorate the walls and ceiling.
<<case "Edo Revivalist">>
	in the Spartan style of an Edo period mansion's innermost rooms. Rice paper screens divide it into subsections, each of which contains little more than a low bed.
<<case "Arabian Revivalist">>
	as a beguiling haze of Arabian decadence. Soft cushions are scattered across the floor and piled against the walls to provide something for dusky, naked bodies to recline on. Gauzy curtains partition the room into a number of cozy dens.
<<case "Chinese Revivalist">>
	like the mansion of a senior mandarin of ancient China. The walls are gorgeous hand-carved wooden screens, and heavy jade statues of favored gods crouch in the corners.
<<case "Chattel Religionist">>
	as a severe place of cold stone and hard wood. A single shaft of sunlight illuminates the bed where penitents give their bodies to their <<= properTitle()>>.
<<case "Repopulation Focus">>
	comfortably, with lots of cushions and seats for a pregnant slaves to lounge on. Various specialized toys, as well as, lotions and creams are readily available.
<<case "Eugenics">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls lots of fun. Condoms and spermicides are readily available throughout the suite.
<<case "Degradationist">>
	with a gothic grandeur. Blood-red upholstery and hardwood menace. There are numerous places where resistant slaves can be restrained.
<<case "Asset Expansionist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with stacked slaves as fun as possible.
<<case "Transformation Fetishist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with bimbo slaves as fun as possible.
<<case "Gender Radicalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls in the butt lots of fun. The straps to restrain slave girls who don't want to be fucked in the butt are concealed for now.
<<case "Gender Fundamentalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make fucking slave girls nice and enjoyable. The straps to restrain slave girls who don't want to be fucked are concealed for now.
<<case "Physical Idealist">>
	as a shrine to the owner's body. Athletic trophies and photographs of past victories line the walls. There are mirrors almost everywhere, including on the ceiling over the bed.
<<case "Supremacist">>
	like the master bedroom in a mansion in the old countries of $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
	like the master bedroom in a mansion in the old countries which favored $arcologies[0].FSSubjugationistRace slaves.
<<case "Paternalist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with slaves mutually enjoyable.
<<case "Pastoralist">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants. Everything that isn't waterproof is covered in plastic, to catch errant milk.
<<case "Maturity Preferentialist">>
	comfortably, with elegant sex toys and perfumed lubricants designed to appeal to mature sex slaves.
<<case "Youth Preferentialist">>
	comfortably, with pastel-colored sex toys and flavored lubricants designed to appeal to eager young sex slaves.
<<case "Body Purist" "Slimness Enthusiast">>
	comfortably, with lots of easy-to-clean leather and plentiful tools, toys, and lubricants to make sex with slaves mutually enjoyable.
<<case "Hedonistic">>
	comfortably, with lots of lounges for a hefty slaves to relax on. <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>Platters of food and treats are readily available throughout the room and are<<else>>Slave food is readily available for your harem and platters of food for yourself are<</if>> never out of arm's reach.
<<case "Intellectual Dependency">>
	comfortably, with lots of easy-to-clean leather and plentiful easy-to-use tools, toys, and lubricants to make sex with bimbo slaves as fun and simple as possible.
<<case "Slave Professionalism">>
	comfortably, with complex sex toys and tools designed to maximize pleasure when used by skilled hands. The space is largely dedicated to perfecting oneself and boosting <<= properMaster()>>'s status ever higher.
<<case "Petite Admiration">>
	comfortably, with plentiful tools, toys, lubricants and a bevy of stepping stools to accommodate even the shortest slave.
<<case "Statuesque Glorification">>
	comfortably, though designed for slaves of the taller variety. Short slaves will find the furniture woefully out of their reach.
<<default>>
	comfortably, as a fairly normal luxury suite. It is unusually large, to accommodate as large a stable of sex slaves as strikes your fancy.
<</switch>>

<<if _MsL > 2>>
	It's busy with slaves, so many that they are able to rotate through keeping themselves perfect and ready for your pleasure. The slaves not on call at the moment are beautifying themselves, cleaning, or serving others.
	<<if (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple < 2)>>
	Many of the slaves are pregnant, and they walk around proudly displaying their bellies and the new slaves growing inside them.

	<<elseif (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple > 2) && $masterSuiteHyperPregnancy == 1>>
	Many of the slaves are heavily pregnant with multiple children, and they waddle around proudly displaying their distended bulging bellies and the next generation of slaves growing within them.

	<<elseif (_masterSuitePregnantSlaves > 2) && (_masterSuitePregnantSlavesMultiple > 2)>>
	Many of the slaves are pregnant with multiple children, and they walk around proudly displaying their distended bellies and the next generation of slaves growing within them.

	<</if>>
<<elseif _MsL > 0>>
	It's sparsely populated, so that the few slaves here have to work hard and quickly to ensure that an assortment of sex slaves is perfect and ready for your pleasure at any given moment.
<<else>>
	None of your slaves are serving here.
<</if>>

    [[Refit the suite to the height of traditional opulence|Master Suite][cashX(forceNeg(_Tmult2), "capEx"), $masterSuiteUpgradeLuxury = 1]] //Costs <<print cashFormat(_Tmult2)>> and will focus the suite on you//

    [[Remodel the suite around a luxurious pit for group sex|Master Suite][cashX(forceNeg(_Tmult2), "capEx"), $masterSuiteUpgradeLuxury = 2]] //Costs <<print cashFormat(_Tmult2)>>; will encourage fucktoys to fuck each other//

<</if>>

$masterSuiteNameCaps has room for $masterSuite slaves to live comfortably<<if $masterSuiteUpgradeLuxury == 2>> in the moments when they're not in the fuckpit<<elseif $masterSuiteUpgradeLuxury == 1>> on its huge bed<</if>>. There <<if _MsL == 1>>is<<else>>are<</if>> currently _MsL slave<<if _MsL != 1>>s<</if>> in $masterSuiteName.
<<set _Tmult0 = Math.trunc($masterSuite*1000*$upgradeMultiplierArcology)>>
[[Expand the Master Suite|Master Suite][cashX(forceNeg(_Tmult0), "capEx"), $masterSuite += 2, $PC.skill.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>>//
<<if $Concubine == 0 && _MsL == 0>>
	| [[Decommission the Master Suite|Main][$masterSuite = 0, $masterSuiteUpgradeLuxury = 0, $masterSuitePregnancySlaveLuxuries = 0, $masterSuiteDecoration = "standard", $masterSuitePregnancyFertilityDrugs = 0, $masterSuitePregnancyFertilitySupplements = 0, $masterSuiteUpgradePregnancy = 0, $masterSuiteHyperPregnancy = 0]]
<</if>>

<<if _MsL > 0>>
	<<removeFacilityWorkers "masterSuite" "rest" "please you">>
<</if>>

<<if $seePreg != 0>>

	<<if $masterSuiteUpgradePregnancy == 1>>
		The master suite has been further upgraded to support fertile slaves and encourage slave pregnancy, providing additional rest areas, better access to amenities, and a dedicated birthing chamber.
		<<if $masterSuitePregnancySlaveLuxuries == 1>>
			Pregnant slaves are being ''given some luxuries'' to reduce stress. [[End the special treatment of pregnant slaves|Master Suite][$masterSuitePregnancySlaveLuxuries = 0]]

		<<else>>
			Pregnant slaves ''have no extra luxuries'' to reduce stress. [[Give pregnant slaves lighter duties|Master Suite][$masterSuitePregnancySlaveLuxuries = 1]] //Costs <<print cashFormat(500)>>/week//

		<</if>>
		<<if $masterSuitePregnancyFertilityDrugs == 1 || $masterSuiteHyperPregnancy == 1>>
			Fertile slaves ''are being given'' <<if $masterSuiteHyperPregnancy == 1>>super fertility drugs<<else>>fertility drugs<</if>>, encouraging impregnation and multiple pregnancy.<<if $masterSuiteHyperPregnancy == 1>> [[End the drug regime|Master Suite][$masterSuiteHyperPregnancy = 0, $masterSuitePregnancyFertilitySupplements = 0]]<<else>> [[End the drug regime|Master Suite][$masterSuitePregnancyFertilityDrugs = 0, $masterSuitePregnancyFertilitySupplements = 0]]<</if>>

		<<else>>
			Fertile slaves ''are not being given'' fertility drugs. [[Give fertility drugs to all fertile slaves|Master Suite][$masterSuitePregnancyFertilityDrugs = 1]]<<if $seeHyperPreg == 1 && $superFertilityDrugs == 1>> | [[Give hyper fertility drugs to all fertile slaves|Master Suite][$masterSuiteHyperPregnancy = 1]]<</if>>

		<</if>>
		<<if $masterSuitePregnancyFertilityDrugs == 0 && $masterSuiteHyperPregnancy == 0>>
			//Fertile slaves ''must be on fertility drugs'' to be given fertility supplements//

		<<elseif $masterSuitePregnancyFertilitySupplements == 0 && ($masterSuitePregnancyFertilityDrugs == 1 || $masterSuiteHyperPregnancy == 1)>>
			Fertile slaves ''are not being given'' fertility drug supplements. [[Give supplements to slaves on fertility drugs|Master Suite][$masterSuitePregnancyFertilitySupplements = 1]] //Costs <<print cashFormat(1000)>>/week//

		<</if>>
		<<if $masterSuitePregnancyFertilitySupplements == 1 && ($masterSuitePregnancyFertilityDrugs == 1 || $masterSuiteHyperPregnancy == 1)>>
			Fertile slaves ''are being given'' supplements to their fertility drugs, further enhancing the chances of multiple pregnancy. [[End the supplement regime|Master Suite][$masterSuitePregnancyFertilitySupplements = 0]]

		<</if>>
	<<else>>
		The master suite does not currently have special customizations to support slave pregnancy. [[Refit the suite to support and encourage slave pregnancy|Master Suite][cashX(forceNeg(_Tmult3), "capEx"), $masterSuiteUpgradePregnancy = 1]] //Costs <<print cashFormat(_Tmult3)>>//
	<</if>>
<</if>>

<<print App.UI.SlaveList.stdFacilityPage(App.Entity.facilities.masterSuite)>>

Rename $masterSuiteName: <<textbox "$masterSuiteName" $masterSuiteName "Master Suite">> //Use a noun or similar short phrase//

<<run App.UI.SlaveList.ScrollPosition.restore()>>


code:
:: Master Suite Report [nobr]

<<SlaveIDSort $MastSiIDs>>
<<set _DL = $MastSiIDs.length, _SL = $slaves.length, $legendaryAbolitionistID = 0, $masterSuiteAverageEnergy = 0, _masterSuiteAverageCum = 0, _masterSuiteAverageDick = 0, _masterSuiteAverageDom = 0, _masterSuiteAverageMilk = 0, _masterSuiteAveragePreg = 0, _masterSuiteAverageSadism = 0, _masterSuitePregnantSlaves = 0, _masterSuitePregnantSlavesMultiple = 0>>
<<if $Concubine != 0>>
	<<set _FLs = $slaveIndices[$Concubine.ID]>>

	<<if def _FLs>>
		/% Add the Concubine to the $MastSiIDs list at the front of the array, so that $he displays first %/
		<<set $MastSiIDs.unshift($Concubine.ID), _DL++>>
	<</if>>
<</if>>

<<if _DL > 0>>
	<<for _dI = 0; _dI < _DL; _dI++>>
		<<set $i = $slaveIndices[$MastSiIDs[_dI]]>>
		<<set $masterSuiteAverageEnergy += $slaves[$i].energy>>
		<<if $masterSuiteUpgradeLuxury == 2>>
		<<if canAchieveErection($slaves[$i])>>
			<<set _masterSuiteAverageCum += $slaves[$i].balls, _masterSuiteAverageDick += $slaves[$i].dick>>
		<</if>>
		<<set _masterSuiteAverageMilk += $slaves[$i].lactation*($slaves[$i].boobs-$slaves[$i].boobsImplant), _masterSuiteAveragePreg += $slaves[$i].pregKnown>>
		<<switch $slaves[$i].fetish>>
		<<case "dom">>
			<<set _masterSuiteAverageDom += $slaves[$i].fetishStrength>>
		<<case "submissive">>
			<<set _masterSuiteAverageDom -= $slaves[$i].fetishStrength>>
		<<case "sadist">>
			<<set _masterSuiteAverageSadism += $slaves[$i].fetishStrength>>
		<<case "masochist">>
			<<set _masterSuiteAverageSadism -= $slaves[$i].fetishStrength>>
		<</switch>>
		<</if>>
		<<if ($legendaryAbolitionistID == 0) && ($slaves[$i].devotion > 95) && ($slaves[$i].prestige == 0) && (($slaves[$i].origin == "You sentenced $him to enslavement as a punishment for attempted theft of a slave.") || ($slaves[$i].origin == "$He is an enslaved Daughter of Liberty.") || ($slaves[$i].origin === "You got $him at the Slave Shelter. $He is an enslaved Daughter of Liberty, caught some weeks after the failed coup. $His previous owner used $him as a punching bag and dart board, then when he was bored of $him tattooed obscenities all over $his body and threw $him away.") || ($slaves[$i].origin === "$He is an enslaved member of an anti-slavery extremist group.") || ($slaves[$i].career == "an antislavery activist"))>>
			<<set $legendaryAbolitionistID = $slaves[$i].ID>>
		<</if>>
	<</for>>
	<<set $masterSuiteAverageEnergy = $masterSuiteAverageEnergy/_DL>>
	<<set _masterSuiteAverageMilk = _masterSuiteAverageMilk/_DL>>
	<<set _masterSuiteAverageCum = _masterSuiteAverageCum/_DL>>
	<<set _masterSuiteAverageDick = _masterSuiteAverageDick/_DL>>
	<<set _masterSuiteAveragePreg = _masterSuiteAveragePreg/_DL>>
	<<set _masterSuiteAverageDom = _masterSuiteAverageDom/_DL>>
	<<set _masterSuiteAverageSadism = _masterSuiteAverageSadism/_DL>>

	    ''There <<if (_DL == 1)>>is one slave<<else>>are _DL slaves<</if>>
	seeing to your pleasure in the master suite.'' Such sexual opulence @@.green;improves@@ your reputation.
	<<if ($arcologies[0].FSEgyptianRevivalist > 0) && (_DL >= 5)>>
		Society @@.green;approves@@ of your keeping a large number of women. This advances the Egyptian revivalist ideal of multiple concubinage.
		<<= FutureSocieties.Change("EgyptianRevivalist", 2)>>
	<</if>>
	<<if (_masterSuitePregnantSlaves >= 1)>>
		The suite is supporting the pregnancies of the slaves
		<<if ($masterSuitePregnancyFertilityDrugs == 1 || $masterSuiteHyperPregnancy == 1)>>
			within, and is providing them with fertility drugs
			<<if ($masterSuitePregnancyFertilitySupplements == 1)>>
				and supplements to encourage impregnation.
			<<else>>
				to encourage impregnation.
			<</if>>
		<<else>>
		within.
		<</if>>
		<<if ($arcologies[0].FSHedonisticDecadence > 0)>>
			Society @@.green;approves@@ of the pampering your pregnant harem receives. This advances the ideal that everyone's desires should be fulfilled.
			<<= FutureSocieties.Change("Hedonistic", 1)>>
		<</if>>
	<</if>>
	<<if _DL > 1>>
		The level of sexual energy in the suite is
		<<if $masterSuiteUpgradeLuxury == 1>>
			<<if $masterSuiteAverageEnergy > 90>>
				intense. When you enter your luxurious retreat, you can set off pent-up orgasms with a touch.
			<<elseif $masterSuiteAverageEnergy > 60>>
				high; there is strong competition for your favors whenever you enter your retreat.
			<<else>>
				relatively normal; the slaves serve your pleasure before their own.
			<</if>>
		<<elseif $masterSuiteUpgradeLuxury == 2>>
			<<if $masterSuiteAverageEnergy > 90>>
				intense. Your slaves spend almost all their time in the fuckpit, having sex in a big pile.
			<<elseif $masterSuiteAverageEnergy > 60>>
				high; your slaves spend much of their time in the fuckpit, having sex with each other.
			<<else>>
				relatively normal; the slaves lounging in the fuckpit get each other off when they feel like it.
			<</if>>
			<<if _masterSuiteAverageCum > 4>>
				Unless it's right after an automated cleaning, everything in the fuckpit is spattered with cum.
			<</if>>
			<<if _masterSuiteAverageMilk > 4000>>
				There's so much lactation going on that the lowest level of the fuckpit is a pool of milk.
			<</if>>
		<<else>>
			relatively normal.
		<</if>>
	<</if>>

	<<for _dI = 0; _dI < _DL; _dI++>>
		<<set $i = $slaveIndices[$MastSiIDs[_dI]]>>
		<<setLocalPronouns $slaves[$i]>>

		/* 000-250-006 */
		<<if $seeImages && $seeReportImages>>

			<<= SlaveArt($slaves[$i], 0, 0)>>

		<</if>>
		/* 000-250-006 */
		<<if ($slaves[$i].assignment == "be your Concubine")>>
			<<set $Concubine = $slaves[_FLs]>>
			''Your concubine <<= SlaveFullName($Concubine)>> is serving you in $masterSuiteName.'' More than any other slave, $his sexual brilliance and physical appeal are @@.green;critical@@ to your reputation.

			<<if (($Concubine.prestigeDesc == "You bankrupted and enslaved $him in revenge for $his part in the attack on your arcology by the Daughters of Liberty.") && ($Concubine.newGamePlus == 0))>>
				$He was once your rival, and your relationship is widely thought to be @@.green;the perfect modern romance.@@
				<<run repX(500, "concubine", $Concubine)>>
			<<elseif ($Concubine.prestige > 0)>>
				<<run repX(500*$Concubine.prestige, "concubine", $Concubine)>>
				<<if $verboseDescriptions == 1>>
					Keeping such a prestigious slave as your concubine @@.green;adds to your fame.@@
					<<if $Concubine.prestigeDesc == "$He is a famed Free Cities whore, and commands top prices.">>
						When $he has a free moment, $he refines $his flexibility so that $he is prepared for any sexual position you can think of, and many more that $he researched just for your pleasure.
					<</if>>
					<<if $Concubine.prestigeDesc == "$He is a famed Free Cities slut, and can please anyone.">>
						When $he has a free moment, $he pretties $himself up so that $he may be as beautiful as possible to make you look even better.
					<</if>>
					<<if $Concubine.prestigeDesc == "$He is remembered for winning best in show as a cockmilker.">>
						<<if $Concubine.balls > 10 || $Concubine.prostate > 1>>
							$He does $his best to prevent $himself from making a mess when you don't want one. When $he has free time, $he researches new techniques to make use of $his huge loads to entertain you.
						<<elseif $Concubine.balls > 0>>
							When $he has a free moment, $he researches ways to increase the size of $his loads for you; $he dreams of the day $he show you just what $he was capable of.
						<<else>>
							$He wishes $he could blow huge loads for you, but without balls, there is little $he can do.
						<</if>>
					<</if>>
					<<if $Concubine.prestigeDesc == "$He is remembered for winning best in show as a dairy cow.">>
						<<if $Concubine.lactation > 1 || $Concubine.lactationAdaptation > 90>>
							$He does $his best to prevent $himself from making a mess when you don't want one. When $he has free time, $he researches new techniques to make use of $his excessive milk to entertain you.
						<<elseif $Concubine.lactation > 0>>
							$He does $his best to prevent $himself from making a mess when you don't want one. When $he has free time, $he researches new techniques to make use of $his breast milk to entertain you.
						<<else>>
							$He wishes $he could lactate for you, but $he has dried up since $his glory days.
						<</if>>
					<</if>>
					<<if $Concubine.prestigeDesc == "$He is remembered for winning best in show as a breeder.">>
						<<if $Concubine.bellyPreg >= 5000>>
							When $he has a free moment, $he refines $his flexibility so that $he can perform any sexual position possible for $him in $his motherly state. $He takes the time to look up new positions to work around $his growing pregnancy.
						<<elseif isFertile($Concubine) || $Concubine.preg > 0>>
							When $he has a free moment, $he refines $his flexibility so that $he is prepared for any sexual position you can think of, no matter how heavy $he becomes with children.
						<<else>>
							When $he has a free moment, $he researches ways to restore $his fertility; $he dreams of the day $he can carry <<if $PC.dick != 0>>your children<<else>>children for you<</if>>.
						<</if>>
					<</if>>
				<</if>>
			<</if>>
			<<if $Concubine.porn.prestige > 2>>
				<<run repX(800, "concubine", $Concubine)>>
				Having a porn star as your personal bed warmer @@.green;reflects on your standing.@@ Your citizens can only wonder at what kinky things happen behind closed doors.
			<<elseif $Concubine.porn.prestige > 1>>
				<<run repX(300, "concubine", $Concubine)>>
				Having a rising porn star as your personal bed warmer @@.green;reflects on your standing.@@
			<</if>>
			<<if ($Concubine.counter.oral + $Concubine.counter.anal + $Concubine.counter.vaginal + $Concubine.counter.mammary + $Concubine.counter.penetrative > 1000)>>
				<<if $verboseDescriptions == 1>>Many citizens <<if $Concubine.counter.publicUse > 10>>remember having had $him themselves, and <</if>>@@.green;respectfully@@ envy you $his exclusive company.<</if>>
				<<run repX(300, "concubine", $Concubine)>>
			<</if>>
			<<if $masterSuiteUpgradeLuxury > 0>>
				<<set $slaves[$i].rules.living = "luxurious", $slaves[$i].devotion += 4, $slaves[$i].trust += 4>>
			<<else>>
				<<set $slaves[$i].rules.living = "normal", $slaves[$i].devotion += 2, $slaves[$i].trust += 2>>
			<</if>>
			<<if $masterSuiteDecoration != "standard">>
				<<set $slaves[$i].devotion++>>
			<</if>>
			<<run repX(Beauty($Concubine) * 5 + ($Concubine.skill.vaginal || 0) + ($Concubine.skill.anal || 0) + ($Concubine.skill.oral || 0) + ($Concubine.skill.whoring || 0) + ($Concubine.skill.entertainment || 0), "concubine", $Concubine)>>
		<<else>> /* not Concubine */
			''__@@.pink;<<= SlaveFullName($slaves[$i])>>@@__''
			<<if $slaves[$i].choosesOwnAssignment == 2>>
				<<include "SA chooses own job">>
			<<else>>
				sees to your pleasure in $masterSuiteName.
			<</if>>
			/* Perform facility based rule changes */
			<<if ($masterSuiteUpgradeLuxury == 1)>>
				<<set $slaves[$i].rules.living = "luxurious">>
				<<if ($slaves[$i].devotion <= 95)>>
					<<set $slaves[$i].devotion += 2>>
				<</if>>
				<<if $masterSuiteDecoration != "standard">>
					<<set $slaves[$i].devotion++>>
				<</if>>
				<<if ($slaves[$i].trust < 60)>>
					<<set $slaves[$i].trust++>>
				<</if>>
			<<elseif ($masterSuiteUpgradeLuxury == 2)>>
				<<set $slaves[$i].rules.living = "luxurious">>
				<<if ($slaves[$i].energy > 90)>>
					<<if ($slaves[$i].devotion <= 95)>>
						<<set $slaves[$i].devotion += 2>>
					<</if>>
					<<if ($slaves[$i].trust <= 95)>>
						<<set $slaves[$i].trust += 2>>
					<</if>>
				<<else>>
					<<if ($slaves[$i].devotion <= 60)>>
						<<set $slaves[$i].devotion++>>
					<</if>>
					<<if ($slaves[$i].trust < 60)>>
						<<set $slaves[$i].trust++>>
					<</if>>
				<</if>>
			<<else>>
				<<set $slaves[$i].rules.living = "spare">>
				<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust >= -20)>>
					<<set $slaves[$i].devotion -= 2, $slaves[$i].trust -= 5>>
				<<elseif ($slaves[$i].devotion <= 60)>>
					<<set $slaves[$i].devotion += 2>>
				<<elseif ($slaves[$i].devotion > 60)>>
					<<set $slaves[$i].devotion -= 2>>
				<</if>>
				<<if ($slaves[$i].trust < 60)>>
					<<set $slaves[$i].trust++>>
				<</if>>
			<</if>>
		<</if>>
		/% Both Concubine and other slaves %/
		<<if $masterSuiteUpgradeLuxury == 2 && $masterSuiteAverageEnergy > random(50,90)>>
			<<set _energy = (Math.ceil($slaves[$i].energy/5)*7)>>
			<<run SimpleSexAct.Slave($slaves[$i], _energy)>>
			<<if canPenetrate($slaves[$i])>>
				<<set _fuckCount = (random(1,3)*_energy)>>
				<<set $slaves[$i].counter.penetrative += _fuckCount, $penetrativeTotal += _fuckCount>>
			<</if>>
			<<if $slaves[$i].nipples == "fuckable" && _masterSuiteAverageDick > 2>>
				<<set _fuckCount = (random(1,3)*_energy)>>
				<<set $slaves[$i].counter.mammary += _fuckCount, $mammaryTotal += _fuckCount>>
			<</if>>
			<<if ($slaves[$i].trust >= -20) && ($slaves[$i].devotion > -10) && ($slaves[$i].fetishStrength <= 95) && $slaves[$i].fetish != "mindbroken">>
				<<set _fetishChangeChance = fetishChangeChance($slaves[$i])>>
				<<if (_masterSuiteAverageMilk > 2000) && (_fetishChangeChance > random(0,50))>>
					<<if $slaves[$i].fetish == "boobs">>
						<<if $verboseDescriptions == 1>>$His<<else>>$slaves[$i].slaveName's<</if>> @@.lightcoral;boob fetish is strengthened@@ by the constant availability of milky nipples for $him to play with.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						<<if $verboseDescriptions == 1>>$He<<else>>$slaves[$i].slaveName<</if>> @@.lightcoral;acquires a boob fetish@@ after spending a lot of time in the fuckpit drinking from $his fellow fucktoys' tits.
						<<set $slaves[$i].fetish = "boobs", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAverageDick > 3) && ($slaves[$i].anus > 0) && (_fetishChangeChance > random(0,50))>>
					$He
					<<if $slaves[$i].fetish == "buttslut">>
						@@.lightcoral;sinks farther into anal pleasure,@@ since $he spends $his time in the fuckpit with at least one of the many available cocks up $his butt.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						@@.lightcoral;acquires an anal fetish@@ after helplessly orgasming at the mercy of your many fucktoys eager to shove their big stiff penises up $his ass.
						<<set $slaves[$i].fetish = "buttslut", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAverageCum > 3) && (_fetishChangeChance > random(0,50))>>
					$He
					<<if $slaves[$i].fetish == "cumslut">>
						@@.lightcoral;sinks farther into cum addiction,@@ since $he spends $his time in the fuckpit eagerly sucking down ejaculate, straight from the many sources.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						@@.lightcoral;acquires an oral fixation@@ after orally servicing your many fucktoys eager to blow their loads down $his throat.
						<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAveragePreg > 10) && (_fetishChangeChance > random(0,50))>>
					$He
					<<if $slaves[$i].fetish == "pregnancy">>
						@@.lightcoral;sinks farther into pregnancy obsession,@@ since $he never wants for a pregnant girl to make love to.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						@@.lightcoral;acquires a pregnancy fetish,@@ since many of $his sexual partners in the fuckpit are heavily pregnant.
						<<set $slaves[$i].fetish = "pregnancy", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAverageDom < 50) && (_fetishChangeChance > random(0,50))>>
					$He
					<<if $slaves[$i].fetish == "dom">>
						@@.lightcoral;becomes more dominant,@@ since there are so many subs in the fuckpit who beg $him to fuck them hard.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						@@.lightcoral;becomes sexually dominant@@ after having fun satisfying the many submissive fucktoys in the fuckpit who beg $him to top them.
						<<set $slaves[$i].fetish = "dom", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAverageDom > 50) && (_fetishChangeChance > random(0,50))>>
					$He
					<<if $slaves[$i].fetish == "submissive">>
						@@.lightcoral;becomes even more submissive,@@ since there are so many doms in the fuckpit that $he's often used by more than one at once.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						@@.lightcoral;becomes sexually submissive@@ after the many dominant slaves in the fuckpit hold $him down and use $him for their pleasure.
						<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAverageSadism < 50) && (_fetishChangeChance > random(0,50))>>
					$He
					<<if $slaves[$i].fetish == "sadist">>
						@@.lightcoral;becomes more sadistic,@@ since there are so many sluts in the fuckpit who will do anything for $him if $he'll only spank them.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						@@.lightcoral;becomes a bit of a sadist@@ after $he notices that so many of $his fellow fucktoys cum harder if $he gives them a good slap.
						<<set $slaves[$i].fetish = "sadist", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<<elseif (_masterSuiteAverageSadism > 50) && (_fetishChangeChance > random(0,50))>>
					<<if $slaves[$i].fetish == "masochist">>
						<<if $verboseDescriptions == 1>>$His<<else>>$slaves[$i].slaveName's<</if>> @@.lightcoral;pain addiction deepens,@@ since the fuckpit is full of ladies happy to fuck $him while $he screams.
						<<set $slaves[$i].fetishStrength += 4>>
					<<else>>
						<<if $verboseDescriptions == 1>>$He<<else>>$slaves[$i].slaveName<</if>> @@.lightcoral;learns masochism@@ after experiencing many orgasms under the exquisite sexual torture of the sadists in the fuckpit.
						<<set $slaves[$i].fetish = "masochist", $slaves[$i].fetishStrength = 65>>
					<</if>>
				<</if>>
			<</if>>
			<<if $slaves[$i].lactation > 0>>
				<<set $slaves[$i].lactationDuration = 2>>
				<<set $slaves[$i].boobs -= $slaves[$i].boobsMilk, $slaves[$i].boobsMilk = 0>>
			<</if>>
			<<if $slaves[$i].energy > 40 && $slaves[$i].energy < 95>>
				Being a constant part of the fuckpit orgy @@.green;greatly heightens $his libido.@@
				<<set $slaves[$i].energy += 2>>
			<</if>>
			<<set $slaves[$i].need -= 50>>
		<</if>>

		<<if $masterSuiteUpgradePregnancy == 1>>
			/* If they're not on fertility drugs and the toggle is active, stick them on (if they can take them). Otherwise take them off. */
			<<if ($masterSuitePregnancyFertilityDrugs == 1) && ($slaves[$i].drugs != "fertility drugs") && canGetPregnant($slaves[$i])>>
				<<set $slaves[$i].drugs = "fertility drugs">>
			<<elseif ($masterSuiteHyperPregnancy == 1) && ($slaves[$i].drugs != "super fertility drugs") && canGetPregnant($slaves[$i])>>
				<<set $slaves[$i].drugs = "super fertility drugs">>
			<<elseif ((($masterSuitePregnancyFertilityDrugs == 0) && ($slaves[$i].drugs == "fertility drugs")) || (($masterSuiteHyperPregnancy == 0) && ($slaves[$i].drugs == "super fertility drugs"))) || (!canGetPregnant($slaves[$i]) && ["fertility drugs", "super fertility drugs"].includes($slaves[$i].drugs))>>
				<<set $slaves[$i].drugs = "no drugs">>
			<</if>>
			/* We don't know they're pregnant for a month or so by game logic */
			<<if ($slaves[$i].pregKnown == 1)>>
				/* Once we know they're knocked up, get the counter going. */
				<<set _masterSuitePregnantSlaves += 1>>
				/* Don't know about twins/triplets etc until 10 weeks. Once we do, get the counter going */
				<<if ($slaves[$i].pregType > 1) && ($slaves[$i].preg >= $slaves[$i].pregData.normalBirth/1.33)>>
					<<set _masterSuitePregnantSlavesMultiple += 1>>
				<</if>>
				/* If they're preggo and in the upgraded suite, give them extra devotion. More if they're being given lighter duties. */
				<<if ($slaves[$i].devotion <= 100)>>
					<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
						<<set $slaves[$i].devotion += 2>>
					<<else>>
						<<set $slaves[$i].devotion += 5>>
					<</if>>
				<</if>>
				/* If they're preggo and in the upgraded suite, give them extra trust. More if they're being given lighter duties. */
				<<if ($slaves[$i].trust <= 100)>>
					<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
						<<set $slaves[$i].trust += 2>>
					<<else>>
						<<set $slaves[$i].trust += 5>>
					<</if>>
				<</if>>
				/* If they're preggo and in the upgraded suite, give them extra health. More if they're being given lighter duties. */
				<<if ($slaves[$i].health.condition < 100)>>
					<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
						<<run improveCondition($slaves[$i], 15)>>
					<<else>>
						<<run improveCondition($slaves[$i], 25)>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>

		<<if $verboseDescriptions == 1>>

    $He <<include "SA please you">>

			<<if $servantMilkers == 1 && $slaves[$i].lactation > 0 && $slaves[$i].fuckdoll == 0 && $slaves[$i].fetish != "mindbroken" && canWalk($slaves[$i]) && $slaves[$i].intelligence+$slaves[$i].intelligenceImplant >= -90>>
				When $his breasts begin to feel full and you aren't around, $he avails $himself to the penthouse milkers and
				<<set $servantMilkersMultiplier = 0.25>>
				<<run saGetMilked($slaves[$i])>>
				<<set $servantMilkersMultiplier = 1>>
				gives $milk liters of milk over the week, which is sold for @@.yellowgreen;<<print cashFormat($milkSale)>>.@@
			<</if>>

			<<= saChoosesOwnClothes($slaves[$i])>>
			<<include "SA rules">>
			<<include "SA diet">>
			<<include "SA long term effects">>
			<<include "SA drugs">>
			<<include "SA relationships">>
			<<include "SA rivalries">>

<<include "SA devotion">>
		<<else>>
			<<silently>>
			<<include "SA chooses own job">>
			<<include "SA please you">>
			<<if $servantMilkers == 1 && $slaves[$i].lactation > 0 && $slaves[$i].fuckdoll == 0 && $slaves[$i].fetish != "mindbroken" && canWalk($slaves[$i]) && $slaves[$i].intelligence+$slaves[$i].intelligenceImplant >= -90>>
				<<set $servantMilkersMultiplier = 0.25>>
				<<run saGetMilked($slaves[$i])>>
				<<set $servantMilkersMultiplier = 1>>
			<</if>>
			<<run saChoosesOwnClothes($slaves[$i])>>
			<<include "SA rules">>
			<<include "SA diet">>
			<<include "SA long term effects">>
			<<include "SA drugs">>
			<<include "SA relationships">>
			<<include "SA rivalries">>
			<<include "SA devotion">>
			<</silently>>
		<</if>>
		<<if $slaves[$i].health.condition < 80>>
			<<if $masterSuiteUpgradeLuxury == 1>>
				<<run improveCondition($slaves[$i], 20)>>
			<<else>>
				<<run improveCondition($slaves[$i], 10)>>
			<</if>>
		<</if>>

	<</for>>

	<<if $Concubine != 0 && def _FLs>>
		/% Remove the Concubine from the $MastSiIDs list %/
		<<set $Concubine = $slaves[_FLs]>>
		<<run $MastSiIDs.deleteAt(0), _DL-->>
	<</if>>

	<<if $arcologies[0].FSRestart != "unset" && $propOutcome != 1 && _masterSuitePregnantSlaves > 0 && $eugenicsFullControl != 1>>
		The Societal Elite know what you are doing with your bedslaves. @@.red;They do not approve.@@
		<<set $failedElite += 5*_masterSuitePregnantSlaves>>
	<</if>>

	<<if $masterSuiteDecoration != "standard">>

    $masterSuiteNameCaps's $masterSuiteDecoration atmosphere @@.hotpink;has a minor impact on your fucktoys.@@
	<</if>>
<</if>>
<<if _DL > 0 || $Concubine != 0>>

<</if>>

license: mit


code:
:: Matchmaking [nobr]

<<set $nextButton = "Back", $nextLink = "AS Dump">>

<<if $subSlave == 0>>

<<set $desc = SlaveTitle($eventSlave)>>
<<set _belly = bellyAdjective($eventSlave)>>
<<setLocalPronouns $eventSlave>>
<<setPlayerPronouns>>
<<setAssistantPronouns>>

/* 000-250-006 */
<<if $seeImages == 1>>

		<<= SlaveArt($eventSlave, 2, 0)>>

<</if>>
/* 000-250-006 */

You order $eventSlave.slaveName to come to your office. The <<if $eventSlave.relationship == -2>>worshipful<<else>>slutty<</if>> $desc arrives promptly, greets you correctly, and waits <<if $eventSlave.relationship == -2>>adoringly for a command<<else>>eagerly for you to fuck $him<</if>>. You consider the situation carefully.
<<if $eventSlave.relationship == -2>>
	$He's emotionally bonded to you, and loves you with all $his heart. $He would probably do anything you command and love you all the more for it. If you were to decide that you were tired of $his adoration, you could probably set $him up with another similarly broken slave. If you ordered them to love each other like they love you, they'd obey.
<<else>>
	$He's an emotional slut, and worships you and values $himself primarily in terms of sex. $He's such a perfect sex slave that $he'd probably fuck anyone or anything you told $him to, and love you all the more for giving $him the chance. If you were to decide that even a sex slave like $him needs a little more structure than constant omnisexual lust, you could probably set $him up with another universal slut.
<</if>>
Their relationship would probably be somewhat artificial at first, and they'd have to struggle at it, but after a period of adjustment, you'd have two worshipful slaves again, except that they'd be together. It'd definitely help if they had compatible behavioral quirks and sexual fetishes.

/* Nope
<<if ($MixedMarriage == 1)>>
<<if $eventSlave.relationship == -2>>
<<if ($weddingPlanned != 0)>>
You could marry $him yourself, but that would have to wait, since you already have a wedding planned this week.
<<else>>
Of course, you could marry $him yourself, since you've decided to enable marriage between slaves and owners in your domain. Marriage with $him wouldn't be binding, of course, since $he'd still be a slave. $He'd probably be pleased, however.

<<link "Marry $him">>
<<replace "#result">>

<<run Enunciate($eventSlave)>>
<<setSpokenLocalPronouns $eventSlave $eventSlave>>

<<set $weddingSlaveID = $eventSlave.ID>>

You tell $eventSlave.slaveName that you're going to marry $him. (A proposal, of course, would be inappropriate, even in so enlightened a place as your arcology.) You're not exactly lacking in ways to make <<if $eventSlave.actualAge > 30>>$women<<else>><<= $girl>>s<</if>> burst into tears, but this one is unusually effective. When $he's gotten $himself under control again, <<if !hasAnyArms($eventSlave)>>looking somewhat embarrassed that $he can't wipe $his own tears<<else>>distractedly cuffing away $his tears<</if>> and consciously breathing deeply,
<<if canTalk($eventSlave)>>
	$he says, "Thank you, <<Master>>. I am going to do my be<<s>>t to be a
	<<if ($eventSlave.fetishKnown == 1) && ($eventSlave.fetishStrength > 60)>>
		<<if ($eventSlave.fetish == "submissive")>>
			perfect <<s>>ubmi<<ss>>ive <<wife>> to you,
		<<elseif ($eventSlave.fetish == "cumslut")>>
			perfect oral <<wife>>,
		<<elseif ($eventSlave.fetish == "humiliation")>>
			hot <<wife>> for you,
		<<elseif ($eventSlave.fetish == "buttslut")>>
			perfect little anal <<wife>>,
		<<elseif ($eventSlave.fetish == "boobs")>>
			<<if $eventSlave.boobs > 800>>perfect big-boobed<<else>>perfect-boobed<</if>> <<wife>>
		<<elseif ($eventSlave.fetish == "pregnancy")>>
			perfect barefoot breeding <<wife>>,
		<<elseif ($eventSlave.fetish == "dom")>>
			perfect, you know, <<sh>>aring <<wife>> with other <<s>>lave<<s>>,
		<<elseif ($eventSlave.fetish == "sadist")>>
			perfect <<wife>> to u<<s>>e on other <<s>>lave<<s>>,
		<<elseif ($eventSlave.fetish == "masochist")>>
			good, beaten <<wife>>,
		<<else>>
			good <<wife>>,
		<</if>>
	<<else>>
		good <<wife>>,
	<</if>>
	<<Master>>. Oh, thank you, <<Master>>," $he blubbers, and starts crying again.
<<elseif hasAnyArms($eventSlave)>>
	$he shakily signs $his thanks twice in a row before breaking down again.
<<else>>
	$he painstakingly mouths $his thanks, since $he cannot speak or use hands to sign.
<</if>>
Despite $his devotion and trust, $he is still a slave, and probably knows that $his position could always change. This brings $him one step closer to true permanence, and $he knows it.

<<if $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> prompts you for wedding
<<if $assistant == 0>>
	instructions.
<<else>>
	instructions, _hisA
	<<if $assistantAppearance == "monstergirl">>
		monster<<= _girlA>> avatar appearing in a surprisingly conventional surplice that covers _himA up decently. All except for _hisA horns, which protrude from under the headpiece.
	<<elseif $assistantAppearance == "shemale">>
		shemale avatar appears in a collar patterned to look like a minister's, and absolutely nothing else, stroking _himselfA with anticipation.
	<<elseif $assistantAppearance == "amazon">>
		amazon avatar wearing a tribal shaman's cape and carrying a medicine stick adorned with all sorts of little charms and baubles.
	<<elseif $assistantAppearance == "businesswoman">>
		business<<= _womanA>> avatar looking rather severe in a minister's collar.
	<<elseif $assistantAppearance == "fairy">>
		fairy avatar looking incredibly silly, dressed in an oversized, disheveled priest's robes and looking rather smug about it.
	<<elseif $assistantAppearance == "pregnant fairy">>
		fairy avatar looking incredibly silly, dressed in an oversized, disheveled priest's robes stretched tight by _hisA pregnant belly and looking rather smug about it.
	<<elseif $assistantAppearance == "goddess">>
		goddess avatar completely unchanged, since _heA considers _hisA usual form perfectly appropriate for a marriage.
	<<elseif $assistantAppearance == "hypergoddess">>
		goddess avatar completely unchanged, since _heA considers _hisA usual form perfectly appropriate for a marriage.
	<<elseif $assistantAppearance == "loli">>
		_loliA avatar looking surprisingly mature in a minister's collar. Though, _heA would rather be the flower _girlA in this wedding.
	<<elseif $assistantAppearance == "preggololi">>
		_loliA avatar looking surprisingly mature in a minister's collar. Though, _heA would rather be the flower _girlA in this wedding.
	<<elseif $assistantAppearance == "schoolgirl">>
		school<<= _girlA>> avatar looking willfully absurd in a minister's collar and _hisA usual short plaid skirt.
	<<elseif $assistantAppearance == "angel">>
		angelic avatar looking, well, angelic in _hisA usual garb with an added minister's collar.
	<<elseif $assistantAppearance == "cherub">>
		angelic avatar looking absurd in _hisA oversized robe, complete with wingholes, and minister's collar.
	<<elseif $assistantAppearance == "incubus">>
		demonic avatar completely unchanged, since _heA considers _hisA usual form perfectly appropriate for a marriage, though _heA has made sure to be fully erect for the wedding.
	<<elseif $assistantAppearance == "succubus">>
		demonic avatar wearing nothing but a minister's collar. _HeA has brought several marital aids along with _himA to tease the bride and groom with.
	<<elseif $assistantAppearance == "imp">>
		demonic avatar looking absurd in _hisA oversized robe, complete with wingholes, and minister's collar.
	<<elseif $assistantAppearance == "witch">>
		witchy avatar looking rather formal in a fine robe and minister's collar.
	<<elseif $assistantAppearance == "ERROR_1606_APPEARANCE_FILE_CORRUPT">>
		twitching avatar completely unchanged, sans a bulbous ring of flesh around _hisA neck that sort of resembles a minister's collar.
	<<else>>
		symbol appearing in white.
	<</if>>
<</if>>

<<link "Just redesignate $him as your slave $wife">>
	<<replace "#result2">>
	You order $assistantName to simply redesignate $eventSlave.slaveName as your slave $wife.
	<<if $assistant == 0>>
		"Slave redesignated," _heA responds immediately. The thing is done.
	<<else>>
		<<if $assistantAppearance == "monstergirl">>
			_HisA avatar snaps _hisA fingers and shrugs off _hisA surplice, revealing _hisA tentacle hair, pale skin, and cocks once more.
		<<elseif $assistantAppearance == "shemale">>
			_HisA avatar snaps _hisA fingers and starts to masturbate more energetically.
		<<elseif $assistantAppearance == "amazon">>
			_HisA avatar gives _hisA medicine stick a shake.
		<<elseif $assistantAppearance == "businesswoman">>
			_HisA avatar snaps _hisA fingers.
		<<elseif ($assistantAppearance == "fairy") || ($assistantAppearance == "pregnant fairy")>>
			_HisA avatar claps _hisA hands twice, looking a bit disappointed at the lack of celebration.
		<<elseif $assistantAppearance == "goddess">>
			_HisA avatar makes a complex hand gesture, looking beatific.
		<<elseif $assistantAppearance == "hypergoddess">>
			_HisA avatar makes a complex hand gesture, looking beatific.
		<<elseif $assistantAppearance == "loli">>
			_HisA avatar claps _hisA hands together.
		<<elseif $assistantAppearance == "preggololi">>
			_HisA avatar claps _hisA hands together.
		<<elseif $assistantAppearance == "schoolgirl">>
			_HisA avatar snaps _hisA fingers and gives a little twirl.
		<<elseif $assistantAppearance == "angel">>
			_HisA avatar spreads _hisA wings and arms and emits a flash of light.
		<<elseif $assistantAppearance == "cherub">>
			_HisA avatar claps _hisA hands together, emitting a burst of light.
		<<elseif $assistantAppearance == "incubus">>
			_HisA avatar flicks the tip of _hisA penis and blows _hisA load towards the both of you.
		<<elseif $assistantAppearance == "succubus">>
			_HisA avatar starts to masturbate furiously and orgasms lewdly.
		<<elseif $assistantAppearance == "imp">>
			_HisA avatar claps _hisA hands together, emitting a burst of darkness.
		<<elseif $assistantAppearance == "witch">>
			_HisA avatar pulls out _hisA spell book and attempts a spell to bind you two; _heA manages to conjure a large ring around _himselfA, pinning _hisA arms to _hisA sides.
		<<elseif $assistantAppearance == "ERROR_1606_APPEARANCE_FILE_CORRUPT">>
			_HisA avatar splits open to reveal a number of tentacles and wraps them around each other.
		<<else>>
			_HisA symbol flashes.
		<</if>>
		"Done," _heA says.
	<</if>>
	<<set $eventSlave.relationship = -3>>
	<<if $PC.slaveSurname>>

		<<link "Give $him your surname">>
			<<replace "#surnaming">>
				<<set $eventSlave.slaveSurname = $PC.slaveSurname, $eventSlave.devotion += 5, $eventSlave.trust += 5>>
				You also command $assistantName to rename your new slave $wife $eventSlave.slaveName $eventSlave.slaveSurname. The new Mrs. $eventSlave.slaveSurname <<if canHear($eventSlave)>>hears<<else>>understands<</if>> this, of course, and breaks down again. Being brusquely redesignated as your slave $wife was such a sterile experience that $he wasn't sure it was real, and hearing that $he's to take your surname @@.mediumaquamarine;reassures $him@@ that it is. Not to mention, $he might be a $desc, but $he's still a $girl, and hearing that $he wouldn't get a decent wedding did disappoint $him, but this makes up for it. You might not be all that expressive, but @@.hotpink;$he's your $wife,@@ and that's what matters to $him.
				<<set $activeSlave = $eventSlave>>
			<</replace>>
		<</link>>

	<</if>>
	<<set $activeSlave = $eventSlave>>
	<</replace>>
<</link>>

<<link "Have your assistant marry $him to you">>
	<<replace "#result2">>
	You order $eventSlave.slaveName to go change into bridal lingerie. $He hurries off, still crying. When $he returns, $he's wearing
	<<if ($eventSlave.vagina == 0)>>
		white, since $he's a virgin.
	<<elseif ($eventSlave.pregKnown == 1)>>
		light pink, since $he is pregnant.
	<<elseif ($eventSlave.vagina < 0) && ($eventSlave.anus == 0)>>
		white, since $he's an anal virgin.
	<<elseif ($eventSlave.vagina < 0) && ($eventSlave.boobs > 500)>>
		electric blue, since $he's a shemale.
	<<elseif ($eventSlave.vagina < 0)>>
		pale blue, since $he's a sissy slave.
	<<elseif ($eventSlave.dick > 0)>>
		hot pink, since $he's a futa slave.
	<<else>>
		light pink, since $he's an experienced sex slave.
	<</if>>
	A flimsy veil covers $his head and shoulders.
	<<if ($eventSlave.boobs > 4000)>>
		On such short notice, no bridal bra for boobs of $his size was available, so $he's topless. Not a tragedy.
	<<elseif ($eventSlave.boobs > 1200)>>
		$His lacy bridal bra just barely restrains $his huge boobs, leaving the tops of $his areolae visible.
	<<elseif ($eventSlave.boobs > 400)>>
		$His lacy bridal bra flatters $his pretty breasts.
	<<else>>
		$His lacy bridal bra flatters $his pretty chest.
	<</if>>
	<<if $eventSlave.bellyPreg >= 600000>>
		$His expansive, squirming pregnant belly makes $his bridal wear particularly obscene.
	<<elseif ($eventSlave.bellyPreg >= 1500)>>
		$His _belly pregnant belly protrudes out the front of $his bridal wear.
	<<elseif ($eventSlave.bellyImplant >= 1500)>>
		$His _belly <<print $eventSlave.bellyImplant>>cc belly implant protrudes $His middle out the front of $his bridal wear.
	<<elseif ($eventSlave.bellyFluid >= 10000)>>
		$His hugely bloated, <<print $eventSlave.inflationType>>-filled belly protrudes out the front of $his bridal wear.
	<<elseif ($eventSlave.bellyFluid >= 5000)>>
		$His bloated, <<print $eventSlave.inflationType>>-stuffed belly protrudes out the front of $his bridal wear.
	<<elseif ($eventSlave.bellyFluid >= 1500)>>
		$His distended, <<print $eventSlave.inflationType>>-belly protrudes out the front of $his bridal wear.
	<</if>>
	<<if $eventSlave.chastityPenis == 1>>
		$His slave dick is hidden by its chastity cage.
	<<elseif canAchieveErection($eventSlave)>>
		<<if ($eventSlave.dick > 4) && ($eventSlave.belly >= 5000)>>
			$He's hugely erect, with $his lacy g-string only serving to hold $his dick agonizingly pressed against the bottom of $his _belly <<if $eventSlave.bellyPreg >= 3000>>pregnant <</if>>belly.
		<<elseif $eventSlave.dick > 4>>
			$He's hugely erect, with $his lacy g-string only serving to hold $his dick upright along $his belly.
		<<else>>
			$His erection tents the front of $his lacy g-string.
		<</if>>
	<<elseif ($eventSlave.dick > 0)>>
		<<if $eventSlave.dick > 10>>
			$His huge soft cock is allowed to dangle freely as no g-string could hope to contain it.
		<<elseif $eventSlave.dick > 4>>
			$His big soft cock forms a lewd mass, stuffed into $his lacy g-string.
		<<else>>
			$His lacy g-string perfectly conceals $his soft dick.
		<</if>>
	<<else>>
		<<if $eventSlave.clit > 1>>
			$His huge clit is quite hard, making $him shift uncomfortably as $his lacy g-string stimulates it.
		<<else>>
			$His lacy g-string is starting to look a bit moist in front.
		<</if>>
	<</if>>
	<<if $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> marries $him to you in a brief ceremony adapted for slaves and their owners. You place a simple steel ring on <<if hasAnyArms($eventSlave)>>$his finger<<else>>a string around $his neck<</if>>; $he does not reciprocate, since this marriage does not bind you.
	<<if $assistant == 0>>
		"The marriage protocol now requires you to <<if $PC.dick != 0>>fellate<<if $PC.vagina != -1>> and <</if>><</if>><<if $PC.vagina != -1>>perform cunnilingus on<</if>> the <<if $PC.title == 1>>groom<<else>>the bride<</if>>," $assistantName orders $him, and $he hurries to obey.
	<<else>>
		<<if $assistantAppearance == "monstergirl">>
			"To consecrate the ceremony," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar begins to play with _hisA dicks.
		<<elseif $assistantAppearance == "shemale">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar starts to jill off.
		<<elseif $assistantAppearance == "amazon">>
			"To complete this ritual," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar starts to jill off.
		<<elseif $assistantAppearance == "businesswoman">>
			"To consecrate the marriage," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>fellate<<else>>perform cunnilingus on<</if>> the <<if $PC.title == 1>>groom<<else>>the bride<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar sneaks a hand down _hisA suit skirt, blushing furiously.
		<<elseif $assistantAppearance == "fairy">>
			"To seal the deal," $assistantName concludes, "$eventSlave.slaveName, you gotta drink the <<if $PC.title == 1>>groom's <<else>>bride's <</if>><<if $PC.dick != 0>>semen<<if $PC.vagina != -1>> and pussy juices<</if>><<else>>pussy juices<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar spreads _hisA legs while still hovering in the air and masturbates eagerly through _hisA half-worn robes.
		<<elseif $assistantAppearance == "pregnant fairy">>
			"To seal the deal," $assistantName concludes, "$eventSlave.slaveName, you gotta drink the <<if $PC.title == 1>>groom's <<else>>bride's <</if>><<if $PC.dick != 0>>semen<<if $PC.vagina != -1>> and pussy juices<</if>><<else>>pussy juices<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's pregnant avatar curls while still hovering in the air and masturbates eagerly around _hisA large belly.
		<<elseif $assistantAppearance == "goddess">>
			"To consummate the marriage," $assistantName concludes, "$eventSlave.slaveName, you must now <<if $PC.dick != 0>>drink the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s seed<<else>>drink the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s female juices<</if>>." The slave complies eagerly. $assistantName's avatar looks on approvingly, cradling _hisA perpetual pregnancy.
		<<elseif $assistantAppearance == "hypergoddess">>
			"To consummate the marriage," $assistantName concludes, "$eventSlave.slaveName, you must now <<if $PC.dick != 0>>drink the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s seed<<else>>drink the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s female juices<</if>>." The slave complies eagerly. $assistantName's avatar looks on approvingly, cradling _hisA massive perpetual pregnancy.
		<<elseif $assistantAppearance == "loli">>
			"To consummate the marriage," $assistantName concludes, "$eventSlave.slaveName, you should now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s cock<<if $PC.vagina != -1>>and lick their cunny.<</if>><<else>>lick the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s cunny<</if>>." The slave complies eagerly. $assistantName's avatar sneaks a hand down _hisA dress, blushing furiously.
		<<elseif $assistantAppearance == "preggololi">>
			"To consummate the marriage," $assistantName concludes, "$eventSlave.slaveName, you should now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s lovely cock<<if $PC.vagina != -1>>and eat out their cunt.<</if>><<else>>lick the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s cunt<</if>>." The slave complies eagerly. $assistantName's avatar attempts to sneak a hand down _hisA dress, but is thwarted by _hisA belly. _HeA instead openly rubs _hisA crotch through the front of _hisA dress, blushing furiously.
		<<elseif $assistantAppearance == "schoolgirl">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, the rules say you should now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar starts to jill off.
		<<elseif $assistantAppearance == "angel">>
			"To consummate the marriage," $assistantName concludes, "$eventSlave.slaveName, you must now join <<= PlayerName()>> in their bedroom and consummate this marriage." The slave looks confused. "After the wedding ends, would be the time." $assistantName says, covering _hisA face in embarrassment at the thought.
		<<elseif $assistantAppearance == "cherub">>
			"To consummate the marriage," $assistantName concludes, "$eventSlave.slaveName, you should <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s cock<<if $PC.vagina != -1>>and lick their pussy,<</if>><<else>>lick the <<if $PC.title == 1>>groom<<else>>the bride<</if>>'s pussy<</if>>, in the privacy of <<= PlayerName()>>'s bedroom, of course." $assistantName hides _hisA face in _hisA hands at the thought.
		<<elseif $assistantAppearance == "incubus">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Enjoying the sight, $assistantName's avatar begins to furiously stroke its shaft.
		<<elseif $assistantAppearance == "succubus">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar pulls out a large dildo and begins ramming it into _hisA own pussy.
		<<elseif $assistantAppearance == "imp">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. Pleased by the sight, $assistantName's avatar hikes _hisA robe and vigorously rubs _hisA pussy.
		<<elseif $assistantAppearance == "witch">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. $assistantName's avatar begins to fidget at the sight, having summoned a vibrator beforehand and accidentally linked it to your pleasure.
		<<elseif $assistantAppearance == "ERROR_1606_APPEARANCE_FILE_CORRUPT">>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, you will now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. $assistantName's avatar begins to swell, drawing all its gained mass to its midsection. Its gravid middles splits vertically, allowing a new mass of flesh to fall to the floor, which quickly grows and reshapes itself into a spitting image of yourself. Meanwhile, the original twists into an image of $eventSlave.slaveName. $assistantName's two avatars begin copying you and $eventSlave.slaveName's actions perfectly.
		<<else>>
			"To get this marriage started," $assistantName concludes, "$eventSlave.slaveName, the rules say you should now <<if $PC.dick != 0>>suck the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s dick<<if $PC.vagina != -1>> and eat _hisP pussy<</if>><<else>>eat the <<if $PC.title == 1>>groom<<else>>bride<</if>>'s pussy<</if>>." The slave complies eagerly. With only a symbol to express _hisA approval, $assistantName is forced to content _himselfA with spinning the symbol and making it glow in time with your new slave $wife's efforts.
		<</if>>
		"Done," _heA says when you climax. "Enjoy your
		<<if ($eventSlave.fetishKnown == 1) && ($eventSlave.fetishStrength > 60)>>
			<<if ($eventSlave.fetish == "submissive")>>
				submissive slave $wife!"
			<<elseif ($eventSlave.fetish == "cumslut")>>
				slave $wife's mouth!"
			<<elseif ($eventSlave.fetish == "humiliation")>>
				exhibitionist slave $wife!"
			<<elseif ($eventSlave.fetish == "buttslut")>>
				slave $wife's butthole!"
			<<elseif ($eventSlave.fetish == "boobs")>>
				slave $wife's boobs!"
			<<elseif ($eventSlave.fetish == "pregnancy")>>
				breeder $wife!"
			<<elseif ($eventSlave.fetish == "dom")>>
				slave $wife's aggression!"
			<<elseif ($eventSlave.fetish == "sadist")>>
				slave $wife's sadistic tendencies!"
			<<elseif ($eventSlave.fetish == "masochist")>>
				slave $wife's pain!"
			<<else>>
				slave $wife!"
			<</if>>
		<<else>>
			slave $wife!"
		<</if>>
	<</if>>
	<<set $eventSlave.relationship = -3>>
	<<if $PC.slaveSurname>>

		<<link "Give $him your surname">>
			<<replace "#surnaming">>
				<<set $eventSlave.slaveSurname = $PC.slaveSurname, $eventSlave.devotion += 5, $eventSlave.trust += 5>>
				Before you get too distracted, you tell your lovely new $wife that $he's now to be known as $eventSlave.slaveName $eventSlave.slaveSurname. It would be an understatement to say $he's delighted. $He's a good $desc, but even $he has to retain a kernel of doubt about whether a marriage between an owner and a piece of property is really worth much. This @@.mediumaquamarine;reassures $him@@ that it is. $His special day probably wasn't exactly like $he might once have imagined it, but $he obviously thinks it's been @@.hotpink;very nice,@@ all things considered.
				<<if canTalk($eventSlave)>>"$eventSlave.slaveName $eventSlave.slaveSurname," $he murmurs to $himself occasionally, smiling.<</if>>
				<<set $activeSlave = $eventSlave>>
			<</replace>>
		<</link>>

	<</if>>
	<<set $activeSlave = $eventSlave>>
	<</replace>>
<</link>>
<<if $cash > 10000>>

Invite prominent citizens to a wedding (This will cost <<print cashFormat(10000)>>):

    <<link "Straightforward ceremony">>
		<<replace "#result2">>
		You order $assistantName to invite deserving citizens to a straightforward ceremony for a slave being married to a slaveowner, and to make the arrangement. The wedding will take place during the upcoming week.
		<<set $weddingPlanned = 1>>
		<<run cashX(-10000, "event")>>
		<</replace>>
	<</link>>
	<<if ($eventSlave.vagina != 0) && ($eventSlave.anus != 0) && ($eventSlave.breedingMark != 1 || $propOutcome == 0 || $eugenicsFullControl == 1 || $arcologies[0].FSRestart == "unset")>>

    <<link "Orgiastic ceremony">>
			<<replace "#result2">>
			You order $assistantName to invite deserving citizens to an orgiastic ceremony for a slave being married to a slaveowner, and to make the arrangements. The wedding orgy will take place during the upcoming week.
			<<set $weddingPlanned = 2>>
			<<run cashX(-10000, "event")>>
			<</replace>>
		<</link>> //This will involve the slave having sex with a very large number of citizens//
	<</if>>
	<<if isFertile($eventSlave) && ($PC.dick != 0)>>

    <<link "Impregnation ceremony">>
			<<replace "#result2">>
			You order $assistantName to invite deserving citizens to a ceremony for a fertile slave being married to a slaveowner, and to make the arrangements. The wedding will take place during the upcoming week.
			<<set $weddingPlanned = 3>>
			<<run cashX(-10000, "event")>>
			<</replace>>
		<</link>> //This will involve you impregnating the slave//
	<</if>>
<<else>>

//You cannot afford an elaborate ceremony//
<</if>>

<</replace>>
<</link>>
<</if>>
<</if>>
<</if>>
*/

<<if $seeImages == 1>>
<</if>>

__Put $him with another worshipful <<if $eventSlave.relationship == -2>>emotionally bonded slave<<else>>emotional slut<</if>>:__
<<print App.UI.SlaveList.slaveSelectionList(
	s => s.devotion >= 100 && s.relationship === $activeSlave.relationship && s.ID !== $activeSlave.ID,
	App.UI.SlaveList.SlaveInteract.stdInteract,
	null,
	(s, i) => App.UI.DOM.passageLink('Match them', 'Matchmaking', () => { variables().subSlave = App.Utils.slaveByIndex(i); })
)>>

<<else>>

/* 000-250-006 */
<<if $seeImages == 1>>

			<<= SlaveArt($eventSlave, 2, 0)>>

			<<= SlaveArt($subSlave, 2, 0)>>

<</if>>
/* 000-250-006 */

<<setLocalPronouns $subSlave 2>>

You decide to set $eventSlave.slaveName up with $subSlave.slaveName. Telling the former to wait, you have the latter hurry up to your office. When the <<if $eventSlave.relationship == -2>>slaves are waiting adoringly<<else>>sluts are waiting with barely concealed lust<</if>> in front of your desk together, you inform them of your decision.
<<if $eventSlave.relationship == -2>>
	You commend their love for you, and let them know that it's all right for it to continue, but command them to love each other, too. They look doubtful, but at your orders they obediently take each other by the hand, and share a kiss. It will do for now. You assign them to live together as much as possible for a few days, and inform them that you'll be limiting your personal contact with them during this period. They give you identical looks of horror, and fail to notice how much of a perfect couple they already are.
<<else>>
	You praise their total commitment to sexual slavery, and let them know they'll continue to be sex slaves, but tell them that it's time for them to settle down. They give you identical looks of horror, and fail to notice how much of a perfect couple they already are. Patiently, you explain that their sex lives will remain more or less unchanged; just because two slaves are together doesn't mean they can't and won't have sex with other people. They look doubtful, but cheer up when you inform them that they'll be spending a lot of alone time together for a few days.
<</if>>

Being ordered into a relationship would be difficult for anyone, but they're so obedient that @@.lightgreen;they do their best and make it work.@@ You ensure that they do, and your determined efforts to do so @@.mediumorchid;reduce their devotion to you,@@ though it's mostly by redirection towards each other. And in any case, they remain devoted enough, and will likely return to their earlier worshipfulness in a few weeks at most.
<<set _matched = 1>>
<<if ($eventSlave.fetish == "submissive") && ($subSlave.fetish == "dom")>>
	$subSlave.slaveName is a dom and $eventSlave.slaveName is a sub. It's a match out of bad fiction.
<<elseif ($subSlave.fetish == "submissive") && ($eventSlave.fetish == "dom")>>
	$eventSlave.slaveName is a dom and $subSlave.slaveName is a sub. It's a match out of bad fiction.
<<elseif ($eventSlave.fetish == "masochist") && ($subSlave.fetish == "sadist")>>
	$subSlave.slaveName is a sadist and $eventSlave.slaveName is a masochist. They're a perfect ouroboros of agony.
<<elseif ($subSlave.fetish == "masochist") && ($eventSlave.fetish == "sadist")>>
	$eventSlave.slaveName is a sadist and $subSlave.slaveName is a masochist. They're a perfect ouroboros of agony.
<<elseif ($eventSlave.fetish == "cumslut") && ($subSlave.balls > 0)>>
	$subSlave.slaveName has balls and $eventSlave.slaveName has the appetite to drain them of every drop of cum.
<<elseif ($subSlave.fetish == "cumslut") && ($eventSlave.balls > 0)>>
	$eventSlave.slaveName has balls and $subSlave.slaveName has the appetite to drain them of every drop of cum.
<<elseif ($eventSlave.fetish == "humiliation") && ($subSlave.fetish == "sadist")>>
	$eventSlave.slaveName loves to be humiliated, and $subSlave.slaveName can definitely get off on another $girl's shame.
<<elseif ($subSlave.fetish == "humiliation") && ($eventSlave.fetish == "sadist")>>
	$subSlave.slaveName loves to be humiliated, and $eventSlave.slaveName can definitely get off on another _girl2's shame.
<<elseif ($eventSlave.fetish == "buttslut") && ($subSlave.fetish == "dom")>>
	$subSlave.slaveName likes fucking other girls, so once $eventSlave.slaveName asks _him2 to just do it to $his ass all the time, they're both happy.
<<elseif ($subSlave.fetish == "buttslut") && ($eventSlave.fetish == "dom")>>
	$eventSlave.slaveName likes fucking other girls, so once $subSlave.slaveName asks $him to just do it to _his2 ass all the time, they're both happy.
<<elseif ($eventSlave.fetish == "boobs") && ($subSlave.boobs > 4000)>>
	$eventSlave.slaveName fetishized breasts so much that $he thinks $subSlave.slaveName's udders are one of the sexiest things $he's ever seen.
<<elseif ($subSlave.fetish == "boobs") && ($eventSlave.boobs > 4000)>>
	$subSlave.slaveName fetishized breasts so much that _he2 thinks $eventSlave.slaveName's udders are one of the sexiest things _he2's ever seen.
<<elseif ($eventSlave.fetish == "pregnancy") && ($subSlave.fetish == "pregnancy") && $subSlave.bellyPreg >= 300000 && $eventSlave.bellyPreg >= 300000>>
	$eventSlave.slaveName and $subSlave.slaveName are both enormously laden with children, much to the other's delight. They can't wait to explore each other's baby filled middle.
<<elseif ($eventSlave.fetish == "pregnancy") && ($subSlave.fetish == "pregnancy") && $subSlave.preg > $subSlave.pregData.normalBirth/2 && $eventSlave.preg > $eventSlave.pregData.normalBirth/2>>
	$eventSlave.slaveName and $subSlave.slaveName are both heavily pregnant, much to the other's delight.
<<elseif ($subSlave.fetish == "pregnancy") && $eventSlave.bellyPreg >= 300000>>
	$subSlave.slaveName fetishizes pregnant bellies so much that _he2 is awestruck by $eventSlave.slaveName's enormous, baby filled middle.
<<elseif ($eventSlave.fetish == "pregnancy") && $subSlave.bellyPreg >= 300000>>
	$eventSlave.slaveName fetishizes pregnant bellies so much that $he is awestruck by $subSlave.slaveName's enormous, baby filled middle.
<<elseif ($subSlave.fetish == "pregnancy") && $eventSlave.preg > $eventSlave.pregData.normalBirth/2>>
	$subSlave.slaveName fetishizes pregnant bellies so much that _he2 thinks $eventSlave.slaveName gravid middle is one of the sexiest things _he2's ever seen.
<<elseif ($eventSlave.fetish == "pregnancy") && $subSlave.preg > $subSlave.pregData.normalBirth/2>>
	$eventSlave.slaveName fetishizes pregnant bellies so much that $he thinks $subSlave.slaveName's gravid middle is one of the sexiest things $he's ever seen.
<<elseif ($eventSlave.fetish == "pregnancy") && ($subSlave.fetish == "pregnancy") && $subSlave.bellyPreg >= 100 && $eventSlave.bellyPreg >= 100>>
	$eventSlave.slaveName and $subSlave.slaveName are both pregnant and just beginning to show. They'll both be able to enjoy the other's swelling body.
<<elseif ($eventSlave.fetish == "pregnancy") && canAchieveErection($subSlave)>>
	$eventSlave.slaveName can indulge the fantasy that $he's getting pregnant each and every time $subSlave.slaveName cums inside $him.
<<elseif ($subSlave.fetish == "pregnancy") && canAchieveErection($eventSlave)>>
	$subSlave.slaveName can indulge the fantasy that _he2's getting pregnant each and every time $eventSlave.slaveName cums inside _him2.
<<else>>
	<<set _matched = 0>>
<</if>>
<<if _matched == 1>>
	Their sexual compatibility is excellent, and they @@.mediumaquamarine;trust you more@@ for matching them so perfectly.
	<<set $eventSlave.trust += 10>>
	<<set $subSlave.trust += 10>>
<<elseif $eventSlave.fetish == $subSlave.fetish>>
	They're a couple of
	<<switch $eventSlave.fetish>>
	<<case "submissive">>
		cringing submissives,
	<<case "cumslut">>
		hungry oral fiends,
	<<case "humiliation">>
		public sex aficionados,
	<<case "buttslut">>
		shameless anal whores,
	<<case "boobs">>
		breast obsessives,
	<<case "pregnancy">>
		breeding bitches,
	<<case "dom">>
		dominating spirits,
	<<case "sadist">>
		inveterate sadists,
	<<case "masochist">>
		pain sluts,
	<<default>>
		vanilla girls,
	<</switch>>
	and they bond over their shared sexual tastes, easing their acclimation to having another slave play a major role in their sex lives. They're almost as happy sharing stories about their past sexual exploits as they are actually having sex.
<<else>>
	Their fetishes aren't very compatible, and though as a couple of inventive nymphos they do their absolute best to fuck each other senseless, they @@.gold;trust you a less@@ out of doubt in the sexual match.
	<<set $eventSlave.trust -= 10>>
	<<set $subSlave.trust -= 10>>
<</if>>
<<if $eventSlave.behavioralQuirk == $subSlave.behavioralQuirk && $eventSlave.behavioralQuirk != "none">>
	They're both
	<<switch $eventSlave.behavioralQuirk>>
	<<case "confident">>
		confident, and soon come to an understanding that they'll be able to <<if $eventSlave.relationship == -2>>serve you better together<<else>>fuck third parties better as a pair<</if>>.
	<<case "cutting">>
		witty, and each quickly discovers that their new partner can hold up their end of a battle of quips. Their loving snippiness develops rapidly, and it's pretty cute.
	<<case "funny">>
		a little weird. It takes a while for them to adjust to how funny their new partner is, but they learn to support each other soon enough.
	<<case "adores women">>
		pretty crazy about ladies. They're both slave girls themselves, which helps, and they've also got a never-ending parade of female bodies to discuss together.
	<<case "adores men">>
		guy crazy. They discuss nothing else together, and their discussions frequently turn into makeouts and then mutual masturbation.
	<<case "fitness">>
		fitness fanatics, and being together feels natural for them, since they've already worked out together often enough.
	<<case "insecure">>
		very insecure. Perhaps unsurprisingly, they soon grow to depend on each other, each relying on their partner to support their low self-esteem.
	<<case "sinful">>
		<<if $arcologies[0].FSChattelReligionist == "unset">>
			eagerly sinful, and they grow close by opening up and sharing their fraught histories of faith with each other.
		<<else>>
			fanatical about being slave acolytes of the new faith, and their partnership is strengthened by their belief that it's divinely ordained.
		<</if>>
	<<case "advocate">>
		advocates for slavery. Not only do they share this, but they believe that your orders are good for them, including your order that they be together.
	<</switch>>
<<else>>
	They approach life as slaves differently, and it's @@.gold;tough for them to reconcile their differences over their values.@@
	<<set $eventSlave.trust -= 10>>
	<<set $subSlave.trust -= 10>>
<</if>>

<<set $subSlave.relationship = 4>>
<<set $subSlave.relationshipTarget = $eventSlave.ID>>
<<set $subSlave.devotion -= 20>>
<<set $eventSlave.relationship = 4>>
<<set $eventSlave.relationshipTarget = $subSlave.ID>>
<<set $eventSlave.devotion -= 20>>

<<set $slaves[$slaveIndices[$subSlave.ID]] = $subSlave>>

<<set $activeSlave = $eventSlave>>

<</if>>

<<set $activeSlave = $eventSlave>> /* this should be harmless, keyword should */


code:
:: Milkmaid Select [nobr]

<<set $nextButton = "Back", $nextLink = "Dairy", $showEncyclopedia = 1, $encyclopedia = "Milkmaid">>
<<if ($Milkmaid != 0)>>
	<<set $Milkmaid = getSlave($Milkmaid.ID)>>
	<<setLocalPronouns $Milkmaid>>
	''__@@.pink;<<= SlaveFullName($Milkmaid)>>@@__'' is serving as your Milkmaid.

$He will look after your livestock, helping them give milk<<if $seeDicks > 0>> and semen<</if>>.
<<else>>
	You have not selected a Milkmaid.
<</if>>

''Appoint a Milkmaid from your obedient slaves:''

[[None|Dairy][removeJob($Milkmaid, "be the Milkmaid")]]

<<print App.UI.SlaveList.facilityManagerSelection(App.Entity.facilities.dairy, "Dairy")>>


code:
:: Mother Daughter Workaround

Your new pair of slaves look frightened and uncertain, but seem encouraged by each other's presence.

<<run newSlave($activeSlave)>>

<<set _secondSlave = clone($activeSlave)>>
<<unset $activeSlave>>
<<if _secondSlave.slaveSurname>><<set _familyName = _secondSlave.slaveSurname>><</if>>
<<set _familyBirthSurname = _secondSlave.birthSurname>>
<<run nationalityToName(_secondSlave)>>
<<if _familyName>><<set _secondSlave.slaveSurname = _familyName>><</if>>
<<set _secondSlave.birthSurname = _familyBirthSurname>>
<<run nationalityToAccent(_secondSlave)>>

<<set _secondSlave.ID = _secondSlave.ID + 1000>>
<<set _secondSlave.devotion -= random(5,15)>>
<<set _secondSlave.oldDevotion = _secondSlave.devotion>>
<<set _secondSlave.trust -= random(5,15)>>
<<set _secondSlave.oldTrust = _secondSlave.trust>>
<<set _secondSlave.boobs -= 100>>
<<set _secondSlave.butt -= 1>>
<<set _secondSlave.vagina = either(0, 0, 0, 1)>>
<<set _secondSlave.counter.birthsTotal = 0>>

<<set $activeSlaveOneTimeMaxAge = Math.min(22, Math.max($minimumSlaveAge, _secondSlave.actualAge - 11))>>
<<set $activeSlaveOneTimeMinAge = Math.min(Math.max(8, $minimumSlaveAge), $activeSlaveOneTimeMaxAge)>>
<<if $pedo_mode == 1>><<set $activeSlaveOneTimeMinAge = $minimumSlaveAge>><</if>>
<<set _secondSlave.actualAge = random($activeSlaveOneTimeMinAge, $activeSlaveOneTimeMaxAge)>>
<<set _secondSlave.visualAge = _secondSlave.actualAge>>
<<set _secondSlave.physicalAge = _secondSlave.actualAge>>
<<set _secondSlave.ovaryAge = _secondSlave.actualAge>>

<<set WombFlush(_secondSlave)>>
<<if (($precociousPuberty == 1 && _secondSlave.actualAge < $fertilityAge) || _secondSlave.actualAge >= $fertilityAge) && $arcologies[0].FSRepopulationFocusSMR == 1>>
	<<set _secondSlave.preg = random(1,24)>>
	<<set _secondSlave.pregWeek = _secondSlave.preg>>
	<<set _secondSlave.pregKnown = 1>>
	<<set _secondSlave.pregType = setPregType(_secondSlave)>>
<</if>>
<<run SetBellySize(_secondSlave)>>

<<set _secondSlave.attrXX += random(-20,20)>>
<<set _secondSlave.attrXX = Math.clamp(_secondSlave.attrXX, 0, 100)>>
<<set _secondSlave.attrXY += random(-20,20)>>
<<set _secondSlave.attrXY = Math.clamp(_secondSlave.attrXY, 0, 100)>>
<<set _secondSlave.energy += random(-20,20)>>
<<set _secondSlave.fetishStrength = random(0,90)>>
<<set _secondSlave.fetish = either("buttslut", "cumslut", "dom", "humiliation", "masochist", "none", "none", "none", "none", "none", "none", "pregnancy", "sadist", "submissive")>>
<<set _secondSlave.behavioralFlaw = either("anorexic", "arrogant", "bitchy", "devout", "gluttonous", "hates men", "hates women", "hates women", "liberated", "masochist", "none", "none", "none", "odd")>>
<<if (_secondSlave.behavioralFlaw == "devout")>>
	<<set _secondSlave.sexualFlaw = either("apathetic", "none", "repressed", "shamefast")>>
<<else>>
	<<set _secondSlave.sexualFlaw = either("apathetic", "crude", "hates anal", "hates oral", "hates penetration", "idealistic", "judgemental", "none", "none", "none", "none", "repressed", "shamefast")>>
<</if>>

<<if $familyTesting == 1>>
	<<set _secondSlave.mother = _secondSlave.ID - 1000>>
<<else>>
	<<set _secondSlave.relation = "daughter">>
	<<set _secondSlave.relationTarget = _secondSlave.ID - 1000>>
<</if>>

<<if _secondSlave.boobs > 200>>
	<<set _secondSlave.boobs += random(-1, 1)*100>>
<</if>>

<<if _secondSlave.butt > 1>>
	<<set _secondSlave.butt += random(-1, 1)>>
<</if>>

<<if _secondSlave.physicalAge <= 15>>
	<<run AgeAdjustYoungRelative(_secondSlave)>>
<</if>>

<<run setHealth(_secondSlave, _secondSlave.health.condition + 20)>>

<<run newSlave(_secondSlave)>>