code:
:: Club Advertisement [nobr]

<<switch $clubDecoration>>
<<case "Roman Revivalist">>
	$clubNameCaps is decorated like a Roman villa's entertainment rooms. There is a lot of white stone, plaster, and terracotta.
<<case "Aztec Revivalist">>
	$clubNameCaps is decorated with obsidian figures inserted in the lime walls and giant oak pillars that give a homey feeling to the otherwise cold building.
<<case "Egyptian Revivalist">>
	$clubNameCaps is decorated like a room in an ancient Egyptian palace. There are columns of warm stone and pools of clear water full of aquatic plants.
<<case "Edo Revivalist">>
	$clubNameCaps is furnished as an Edo period theater. Performances of the traditional Japanese arts can be seen here, though more modern dancing happens in the evenings. In either case, geisha girls are present and willing.
<<case "Arabian Revivalist">>
	$clubNameCaps is designed like an open plaza in an Arabian palace, with a raised stage in the center for erotic dancing. Diaphanous, flowing curtains billow across the space, dispersing the narcotic smoke billowing from a score of hookahs.
<<case "Chinese Revivalist">>
	$clubNameCaps is furnished as an old Chinese disorderly house. It's intentionally packed in so that closeness and good cheer is obligatory here; prominent citizens share tables while their hangers-on jostle for room.
<<case "Chattel Religionist">>
	$clubNameCaps isn't a religious establishment, but it almost looks like one. It's clean and proper, with beams of natural light that come down to highlight holy sex slaves' bodies.
<<case "Degradationist">>
	$clubNameCaps has a perverted, debauched appearance. The décor is utilitarian so it can be cleaned easily, and the reason is obvious. Many patrons have brought their own slaves to publicly rape here.
<<case "Repopulation Focus">>
	$clubNameCaps has a gaudy appearance. There are lots of deep soft chairs for pregnant patrons and slaves to rest in and screens showing girls with large bellies lining the walls.
<<case "Eugenics">>
	$clubNameCaps has a gaudy appearance. There are screens lining the walls discouraging unprotected slave sex. The real action happens in the several exclusive rooms reserved for society's best.
<<case "Asset Expansionist">>
	$clubNameCaps has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing off big tits and plush asses.
<<case "Transformation Fetishist">>
	$clubNameCaps has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing off huge fake tits and plastic dick sucking lips.
<<case "Gender Radicalist">>
	$clubNameCaps has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing closeups of cocks fucking every imaginable orifice.
<<case "Gender Fundamentalist">>
	$clubNameCaps has an old world appearance, a decidedly throwback atmosphere harking back to the glory days of cultures past.
<<case "Physical Idealist">>
	$clubNameCaps isn't a gym, but it smells like one. The dancing is rough and competitive, and the drinks are rich with protein.
<<case "Supremacist">>
	$clubNameCaps is decorated like an upper-class gentleman's club in the old countries of $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
	$clubNameCaps is decorated like an upper-class gentleman's club in the old countries which favored $arcologies[0].FSSubjugationistRace slaves.
<<case "Paternalist">>
	$clubNameCaps is handsome and well-kept, even romantic. Though the slaves here are sex slaves, every provision is made to encourage them to enjoy themselves.
<<case "Body Purist">>
	$clubNameCaps is gorgeous, decorated and kept in the height of fashionable night establishment style. The music is cutting edge and everything and everyone is elegant.
<<case "Slimness Enthusiast">>
	$clubNameCaps is distinctly gaudy, with lots of sugary drinks on offer. The music and décor are of a decidedly bubblegum quality.
<<case "Pastoralist">>
	$clubNameCaps is decorated to resemble a frontier disorderly house. The drinks are pounded straight, and there's a set of swinging doors for bad men to part dramatically as they enter.
<<case "Maturity Preferentialist">>
	$clubNameCaps is surprisingly elegant. The music consists of refined remixes of traditional dance music, offering slaves and citizens the chance to dance beautifully together.
<<case "Youth Preferentialist">>
	$clubNameCaps is deafeningly loud. There's a bright light show running, offering staccato glimpses of the scene out on the dance floor.
<<case "Hedonistic">>
	$clubNameCaps has a gaudy appearance. The dance floor is extra large to accommodate its extra wide dancers, though bodies grinding against each other is an inevitability. Plenty of roomy, comfortable booths encircle the room for an exhausted citizen to relax with his plush dance partner, and a wide selection of greasy food accompanies the drinks. <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>Platters of food are complementary for feeding slaves<<else>>Feeders are available in the booths to feed tired slaves<</if>> while they get fondled.
<<case "Intellectual Dependency">>
	$clubNameCaps is distinctly gaudy and easy for slaves to move around in. The dancing is as energetic and sexual, and the drinks sugary and sweet.
<<case "Slave Professionalism">>
	$clubNameCaps is decorated like an upper-class gentleman's club. It is where a true courtesan works their craft.
<<case "Petite Admiration">>
	$clubNameCaps has a gaudy appearance. The dance floor is surrounded by raised platforms so even the shortest slave can be seen by the crowd.
<<case "Statuesque Glorification">>
	$clubNameCaps has a tiered appearance. The booths and bar are positioned overlooking the dance floor so patrons may loom over the dancing slaves even when seated.
<</switch>>

<<if $clubAdsSpending > 0>>
	Screens outside the entrance are showing softcore music videos to advertise $clubName.
	<<if $clubAdsOld == 1>>
		The featured strippers are all MILFs.
	<<elseif $clubAdsOld == -1>>
		The featured strippers are all nice and young.
	<<elseif $clubAdsOld == -2>>
		The featured strippers are all teenagers.
	<<elseif $clubAdsOld == -3>>
		The featured strippers are all lolis.
	<<else>>
		The featured strippers vary in age.
	<</if>>
	<<if $clubAdsStacked == 1>>
		Lots of bouncing breasts and butts
	<<elseif $clubAdsStacked == -1>>
		Lots of trim breasts and shapely butts
	<<else>>
		A variety of breast and butt sizes and shapes
	<</if>>
	are on display, and
	<<if $clubAdsImplanted == 1>>
		most of these are augmented by implants.
	<<elseif $clubAdsImplanted == -1>>
		they're all natural.
	<<else>>
		some are augmented by implants.
	<</if>>
	<<if $seePreg == 1>>
		<<if $clubAdsPreg == 1>>
			Most of strippers have firm, rounded bellies.
		<<elseif $clubAdsPreg == -1>>
			Most of the strippers have firm, flat bellies.
		<<else>>
			Some of the strippers are pregnant.
		<</if>>
	<</if>>
	<<if $clubAdsModded == 1>>
		Everything is heavily pierced and tattooed.
	<<elseif $clubAdsModded == -1>>
		Everything is free of tattoos and piercings.
	<<else>>
		Some of these assets are tattooed and pierced, and some aren't.
	<</if>>
	The strippers get naked quickly, and show off
	<<if $clubAdsXX == 1>>
		their pussies and assholes.
	<<elseif $clubAdsXX == -1>>
		their assholes.
	<<else>>
		their holes.
	<</if>>
<</if>>

<<if $clubAdsSpending >= 5000>>
	Advertisements based on these scenes run constantly in media across $arcologies[0].name, and there's an active merchandising campaign underway to promote your club and its girls.
<<elseif $clubAdsSpending >= 4000>>
	Advertisements based on these scenes run constantly in media across $arcologies[0].name.
<<elseif $clubAdsSpending >= 3000>>
	Advertisements based on these scenes are run in media across $arcologies[0].name.
<<elseif $clubAdsSpending >= 2000>>
	Advertisements based on these scenes run regularly in arcology media.
<<elseif $clubAdsSpending >= 1000>>
	Advertisements based on these scenes run occasionally in arcology media.
<<else>>
	$arcologies[0].name has a robust internal media that could be used to bring patrons into the club.
<</if>>

You are spending @@.red;<<print cashFormat($clubAdsSpending)>>@@ each week to advertise $clubName.

<<if $clubAdsSpending > 900>>
	<<link "Decrease">><<set $clubAdsSpending -= 1000>><<goto "Club Advertisement">><</link>> |
<<else>>
	Decrease |
<</if>>
<<if $clubAdsSpending < 5000>>
	<<link "Increase">><<set $clubAdsSpending += 1000>><<goto "Club Advertisement">><</link>>
<<else>>
	Increase
<</if>>

__Design Club Ad Campaign__ //Will replace relevant variety bonuses//

Asset size:
<<if $clubAdsStacked != 1>><<link "Stacked">><<set $clubAdsStacked = 1>><<goto "Club Advertisement">><</link>> | <<else>>Stacked | <</if>>
<<if $clubAdsStacked != -1>><<link "Slim">><<set $clubAdsStacked = -1>><<goto "Club Advertisement">><</link>> | <<else>>Slim | <</if>>
<<if $clubAdsStacked != 0>><<link "Variety">><<set $clubAdsStacked = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

Asset origin:
<<if $clubAdsImplanted != 1>><<link "Implants">><<set $clubAdsImplanted = 1>><<goto "Club Advertisement">><</link>> | <<else>>Implants | <</if>>
<<if $clubAdsImplanted != -1>><<link "All natural">><<set $clubAdsImplanted = -1>><<goto "Club Advertisement">><</link>> | <<else>>All natural | <</if>>
<<if $clubAdsImplanted != 0>><<link "Variety">><<set $clubAdsImplanted = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

Body mods:
<<if $clubAdsModded != 1>><<link "Modded">><<set $clubAdsModded = 1>><<goto "Club Advertisement">><</link>> | <<else>>Modded | <</if>>
<<if $clubAdsModded != -1>><<link "Unmodded">><<set $clubAdsModded = -1>><<goto "Club Advertisement">><</link>> | <<else>>Unmodded | <</if>>
<<if $clubAdsModded != 0>><<link "Variety">><<set $clubAdsModded = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

Age:
<<if $clubAdsOld != 1>><<link "MILF">><<set $clubAdsOld = 1>><<goto "Club Advertisement">><</link>> | <<else>>MILF | <</if>>
<<if $clubAdsOld != -1>><<link "Young">><<set $clubAdsOld = -1>><<goto "Club Advertisement">><</link>> | <<else>>Young | <</if>>
<<if $minimumSlaveAge < 18>>
	<<if $clubAdsOld != -2>><<link "Teen">><<set $clubAdsOld = -2>><<goto "Club Advertisement">><</link>> | <<else>>Teen | <</if>>
<</if>>
<<if $minimumSlaveAge < 13>>
	<<if $clubAdsOld != -3>><<link "Loli">><<set $clubAdsOld = -3>><<goto "Club Advertisement">><</link>> | <<else>>Loli | <</if>>
<</if>>
<<if $clubAdsOld != 0>><<link "Variety">><<set $clubAdsOld = 0>><<goto "Club Advertisement">><</link>> <<else>>Variety<</if>>

<<if $seePreg != 0>>
	Pregnancy:
	<<if $clubAdsPreg != 1>><<link "Gravid">><<set $clubAdsPreg = 1>><<goto "Club Advertisement">><</link>> | <<else>>Gravid | <</if>>
	<<if $clubAdsPreg != -1>><<link "None">><<set $clubAdsPreg = -1>><<goto "Club Advertisement">><</link>> | <<else>>None | <</if>>
	<<if $clubAdsPreg != 0>><<link "Variety">><<set $clubAdsPreg = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

<</if>>

<<if $seeDicks != 0>>
	Genitalia:
	<<if $clubAdsXX != 1>><<link "Pussies">><<set $clubAdsXX = 1>><<goto "Club Advertisement">><</link>> | <<else>>Pussies | <</if>>
	<<if $clubAdsXX != -1>><<link "Dicks">><<set $clubAdsXX = -1>><<goto "Club Advertisement">><</link>> | <<else>>Dicks | <</if>>
	<<if $clubAdsXX != 0>><<link "Variety">><<set $clubAdsXX = 0>><<goto "Club Advertisement">><</link>> <<else>>Variety<</if>>

<</if>>


code:
:: Club Report [nobr]

<<SlaveIDSort $ClubiIDs>>
<<set _DL = $ClubiIDs.length, _SL = $slaves.length, $clubBonuses = 0, $legendaryEntertainerID = 0, _FLsFetish = 0>>
<<set $legendaryWombID = 0>>
<<set _implanted =0, _modded = 0, _old = 0, _pure = 0, _slim = 0, _stacked = 0, _unmodded = 0, _XX = 0, _XY = 0, _young = 0, _pregYes = 0, _pregNo = 0, _minBonus = 50, _maxBonus = 150>>

<<set $facility = $facility || {}, $facility.club = initFacilityStatistics($facility.club)>>

<<if $DJ != 0>>
	<<set _FLs = $slaveIndices[$DJ.ID]>>

	<<if ($slaves[_FLs].health.condition < -80)>>
		<<run improveCondition($slaves[_FLs], 20)>>
	<<elseif $slaves[_FLs].health.condition < -40>>
		<<run improveCondition($slaves[_FLs], 15)>>
	<<elseif $slaves[_FLs].health.condition < 0>>
		<<run improveCondition($slaves[_FLs], 10)>>
	<<elseif $slaves[_FLs].health.condition < 90>>
		<<run improveCondition($slaves[_FLs], 7)>>
	<</if>>
	<<if $slaves[_FLs].devotion <= 60>>
		<<set $slaves[_FLs].devotion += 5>>
	<</if>>
	<<if $slaves[_FLs].trust < 60>>
		<<set $slaves[_FLs].trust += 3>>
	<</if>>
	<<if $slaves[_FLs].fetishStrength <= 95>>
		<<if $slaves[_FLs].fetish != "humiliation">>
			<<if fetishChangeChance($slaves[_FLs]) > random(0,100)>>
				<<set _FLsFetish = 1, $slaves[_FLs].fetishKnown = 1, $slaves[_FLs].fetish = "humiliation">>
			<</if>>
		<<elseif $slaves[_FLs].fetishKnown == 0>>
			<<set _FLsFetish = 1, $slaves[_FLs].fetishKnown = 1>>
		<<else>>
			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
		<</if>>
	<</if>>
	<<if $slaves[_FLs].rules.living != "luxurious">>
		<<set $slaves[_FLs].rules.living = "luxurious">>
	<</if>>
	/% Make sure we have registered living expenses as for any other slave %/
	<<run getSlaveStatisticData($DJ, $facility.club)>>
	<<set $DJ = $slaves[_FLs]>>
	<<setLocalPronouns $DJ>>
	    <<= SlaveFullName($DJ)>> is performing as the DJ.
	<<if $DJ.relationship == -3 && $DJ.devotion > 50>>
		$He tries $his best to be your energetic, cheerful $wife.
	<</if>>
	<<if (_FLsFetish == 1)>>
		$He's expected to be the innovative, beautiful DJ spinning beats one minute, and come out of $his booth to grind on the floor the next; $he enjoys the interplay, and finds greater @@.lightcoral;pleasure in exhibitionism.@@
	<<elseif (_FLsFetish == 2)>>
		Every day $he gets to enjoy hundreds of stares on $his skin, and @@.lightsalmon;becomes more of an exhibitionist.@@
	<</if>>
	<<if getBestVision($DJ) === 0>>
		$His lack of eyesight doesn't slow $him down; rather, it strengthens $his other senses. $His tracks have a distinct sound, since $he experiences noise as $his sight.
	<</if>>
	<<if ($DJ.skill.entertainment <= 10)>>
		Though $DJ.slaveName does $his best to lead on the club, with $his lack of skill $he can do little.
	<<elseif ($DJ.skill.entertainment <= 30)>>
		$DJ.slaveName's basic skills marginally @@.green;improve@@ the atmosphere in $clubName.
	<<elseif ($DJ.skill.entertainment <= 60)>>
		$DJ.slaveName's skills @@.green;improve@@ the atmosphere in $clubName.
	<<elseif ($DJ.skill.entertainment < 100)>>
		$DJ.slaveName's skills greatly @@.green;improve@@ the atmosphere in $clubName.
	<<elseif ($DJ.skill.entertainment >= 100)>>
		$DJ.slaveName's mastery immensely @@.green;improves@@ the atmosphere in $clubName.
	<</if>>
	<<if ($DJ.muscles > 5) && ($DJ.muscles <= 95)>>
		$His toned body helps $him lead $his fellow club sluts by letting $him dance all night.
	<</if>>
	<<if ($DJ.intelligence+$DJ.intelligenceImplant > 15)>>
		$He's smart enough to make an actual contribution to the music, greatly enhancing the entire experience.
	<</if>>
	<<if ($DJ.face > 95)>>
		$His great beauty is a further draw, even when $he's in $his DJ booth, but especially when $he comes out to dance.
	<</if>>
	<<if setup.DJCareers.includes($DJ.career)>>
		$He has musical experience from $his life before $he was a slave, a grounding that gives $his tracks actual depth.
	<<elseif $DJ.skill.DJ >= $masteredXP>>
		$He has musical experience from working for you, giving $his tracks actual depth.
	<<else>>
		<<set $slaves[_FLs].skill.DJ += random(1,Math.ceil(($DJ.intelligence+$DJ.intelligenceImplant)/15) + 8)>>
	<</if>>
	<<if (_DL + $clubSlavesGettingHelp < 10)>>
		<<set $i = _FLs>> /* apply following SA passages to facility leader */
		<<if ($legendaryEntertainerID == 0) && ($slaves[_FLs].prestige == 0) && ($slaves[_FLs].skill.entertainment >= 100) && ($slaves[_FLs].devotion > 50)>>
			<<set $legendaryEntertainerID = $slaves[_FLs].ID>>
		<</if>>

    Since $he doesn't have enough sluts in $clubName to make it worthwhile for $him to be on stage 24/7, $he spends $his extra time slutting it up $himself. $He has sex with $slaves[$i].sexAmount citizens, @@.green;pleasing them immensely,@@ since it's more appealing to fuck the DJ than some club slut.
		<<if $showEWD != 0>>

    $He <<= saServeThePublic($slaves[$i])>>
		<<else>>
			<<run saServeThePublic($slaves[$i])>>
		<</if>>
	<</if>>
	<<if (_DL > 0)>>

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

<<if (_DL > 0)>>
	<<set _possibleBonuses = 0>>
	    <<if (_DL != 1)>>''The _DL slaves pleasing citizens in $clubName''<<else>>''The one slave pleasing citizens in $clubName''<</if>> worked hard to @@.green;increase your reputation@@ this week.
<</if>>

<<if ($DJ != 0)>>
	<<set $i = _FLs>> /* apply following SA passages to facility leader */
	<<if $showEWD != 0>>

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

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

		<</if>>
		/* 000-250-006 */
		''__@@.pink;<<= SlaveFullName($slaves[_FLs])>>@@__'' is performing as the DJ in $clubName.

		<<= 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>>
		<<set _chosenClothes = 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>>
	<<set $DJ = $slaves[_FLs]>>
	<<if isSlim($slaves[_FLs])>>
		<<set _slim += 1>>
	<</if>>
	<<if isStacked($slaves[_FLs])>>
		<<set _stacked += 1>>
	<</if>>
	<<if isYoung($slaves[_FLs])>>
		<<set _young += 1>>
	<<else>>
		<<set _old += 1>>
	<</if>>
	<<if SlaveStatsChecker.isModded($slaves[_FLs])>>
		<<set _modded += 1>>
	<<elseif SlaveStatsChecker.isUnmodded($slaves[_FLs])>>
		<<set _unmodded += 1>>
	<</if>>
	<<if isXY($slaves[_FLs])>>
		<<set _XY += 1>>
	<<else>>
		<<set _XX += 1>>
	<</if>>
	<<if isPure($slaves[_FLs])>>
		<<set _pure += 1>>
	<<else>>
		<<set _implanted += 1>>
	<</if>>
	<<if isPreg($slaves[_FLs])>>
		<<set _pregYes += 1>>
	<<elseif isNotPreg($slaves[_FLs])>>
		<<set _pregNo += 1>>
	<</if>>
<</if>>

<<if (_DL > 0)>>
	<<for _dI = 0; _dI < _DL; _dI++>>
		<<set $i = $slaveIndices[$ClubiIDs[_dI]]>>
		<<setLocalPronouns $slaves[$i]>>
		<<if ($legendaryEntertainerID == 0) && ($slaves[$i].prestige == 0) && ($slaves[$i].skill.entertainment >= 100) && ($slaves[$i].devotion > 50)>>
			<<set $legendaryEntertainerID = $slaves[$i].ID>>
		<</if>>
		<<if ($legendaryWombID == 0) && (!isAmputee($slaves[$i])) && ($slaves[$i].preg > $slaves[$i].pregData.normalBirth/1.33) && ($slaves[$i].broodmother == 0) && ($slaves[$i].eggType == "human") && ($slaves[$i].counter.births > 10) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
			<<set $legendaryWombID = $slaves[$i].ID>>
		<</if>>
		<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust >= -20)>>
			<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
		<<elseif ($slaves[$i].devotion < 45)>>
			<<set $slaves[$i].devotion += 4>>
		<<elseif ($slaves[$i].devotion > 50)>>
			<<set $slaves[$i].devotion -= 4>>
		<</if>>

		<<if ($slaves[$i].trust < 30)>>
			<<set $slaves[$i].trust += 5>>
		<</if>>

		<<if ($slaves[$i].health.condition < -80)>>
			<<run improveCondition($slaves[$i], 20)>>
		<<elseif ($slaves[$i].health.condition < -40)>>
			<<run improveCondition($slaves[$i], 15)>>
		<<elseif ($slaves[$i].health.condition < 0)>>
			<<run improveCondition($slaves[$i], 10)>>
		<<elseif ($slaves[$i].health.condition < 90)>>
			<<run improveCondition($slaves[$i], 7)>>
		<</if>>

		<<if $slaves[$i].rules.living != "normal">>
			<<set $slaves[$i].rules.living = "normal">>
		<</if>>

		<<if $showEWD != 0>>

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

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

			<</if>>
			/* 000-250-006 */
			''__@@.pink;<<= SlaveFullName($slaves[$i])>>@@__''
			<<if $slaves[$i].choosesOwnAssignment == 2>>
				<<include "SA chooses own job">>
			<<else>>
				is serving in $clubName.
			<</if>>

    $He <<= saServeThePublic($slaves[$i])>>

			<<= 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">>
			<<run saServeThePublic($slaves[$i])>>
			<<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 isSlim($slaves[$i])>>
			<<set _slim += 1>>
		<</if>>
		<<if isStacked($slaves[$i])>>
			<<set _stacked += 1>>
		<</if>>
		<<if isYoung($slaves[$i])>>
			<<set _young += 1>>
		<<else>>
			<<set _old += 1>>
		<</if>>
		<<if SlaveStatsChecker.isModded($slaves[$i])>>
			<<set _modded += 1>>
		<<elseif SlaveStatsChecker.isUnmodded($slaves[$i])>>
			<<set _unmodded += 1>>
		<</if>>
		<<if isXY($slaves[$i])>>
			<<set _XY += 1>>
		<<else>>
			<<set _XX += 1>>
		<</if>>
		<<if isPure($slaves[$i])>>
			<<set _pure += 1>>
		<<else>>
			<<set _implanted += 1>>
		<</if>>
		<<if isPreg($slaves[$i])>>
			<<set _pregYes += 1>>
		<<elseif isNotPreg($slaves[$i])>>
			<<set _pregNo += 1>>
		<</if>>
	<</for>>

	<<if $clubAdsSpending != 0>>
		An ad campaign is getting citizens into the club every night, and sluts that match it gratify patrons.
	<</if>>

	<<if $clubAdsSpending != 0>>
		<<if $clubAdsStacked == 1>>
			Its advertisements feature stacked girls.
			<<set _ads = 1>>
		<<elseif $clubAdsStacked == -1>>
			Its advertisements feature slim girls.
			<<set _ads = -1>>
		<<else>>
			Its advertisements feature a variety of girls, some that are slim and some others that are stacked.
			<<set _ads = 0>>
		<</if>>
	<</if>>
	<<if ($arcologies[0].FSAssetExpansionist != "unset") && ($arcologies[0].FSAssetExpansionist >= 80)>>
		Most customers prefer stacked girls.
		<<set _pref = 1>>
	<<elseif ($arcologies[0].FSSlimnessEnthusiast != "unset") && ($arcologies[0].FSSlimnessEnthusiast >= 80) >>
		Most customers prefer slim girls.
		<<set _pref = -1>>
	<<else>>
		<<if ($arcologies[0].FSAssetExpansionist == "unset") && ($arcologies[0].FSSlimnessEnthusiast == "unset")>>
			<<if ($clubAdsSpending == 0) || ($clubAdsStacked == 0)>>
				<<set _possibleBonuses++>>
				<<if (_slim > 0) && (_stacked > 0) && (Math.abs(_slim-_stacked) <= (_DL/3))>>
				<<set $clubBonuses++>>
				<<run repX(_DL*random(5,10), "club")>>
				There is a @@.green;wide@@ variety of slim and stacked slaves working the club.
				<</if>>
			<</if>>
		<</if>>
		Most customers don't have preferences for either slim or stacked slaves.
		<<set _pref = 0>>
	<</if>>
	<<if (_slim > (_DL/2))>>
		<<set _girls = -1>>
		Most of the slaves in the club are slim.
	<<elseif (_stacked > (_DL/2))>>
		<<set _girls = 1>>
		Most of the slaves in the club are stacked.
	<<else>>
		<<set _girls = 0>>
		The slaves in the club vary in slimness.
	<</if>>
	<<if _pref == 0>> /*customers don't care*/
	<<elseif ($clubAdsSpending > 0)>>
		<<if (_ads == _pref) && (_girls == _ads)>>
			<<set _adsIncome = _DL*random(20,30), $facility.club.adsIncome += _adsIncome, _clubBonuses++>>
			<<run cashX(_adsIncome, "clubAds")>>
			Its advertising for <<if _ads == 1>>stacked <<elseif _ads == -1>>slim <</if>>girls matched most customers' preferences and the girls in the club matched its advertisements. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<elseif (_ads == _pref) && (_girls != _ads)>>
			Its advertising for <<if _ads == 1>>stacked <<elseif _ads == -1>>slim <</if>>girls matched most customers preferences, but the girls in the club did not. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<<elseif (_girls == _pref) && (_girls != _ads)>>
			The <<if _girls == 1>>stacked <<elseif _girls == -1>>slim <</if>>girls in the club did not match its advertisements, but since the girls in the club matched most customers preferences for <<if _pref == 1>>stacked <<elseif _pref == -1>>slim <</if>>girls, your reputation was not affected.
		<<elseif (_girls != _pref)>>
			Some customers were put off since the <<if _girls == 1>>stacked <<elseif _girls == -1>>slim <</if>>girls there did not match their preferences for <<if _pref == 1>>stacked <<elseif _pref == -1>>slim <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<<else>>
		<<if (_girls == _pref)>>
			The <<if _girls == 1>>stacked <<elseif _girls == -1>>slim <</if>>girls in the club match most customers' preferences for <<if _pref == 1>>stacked <<elseif _pref == -1>>slim <</if>>girls. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<else>>
			Some customers were put off since the <<if _girls == 1>>stacked <<elseif _girls == -1>>slim <</if>>girls there did not match their preferences for <<if _pref == 1>>stacked <<elseif _pref == -1>>slim <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<</if>>

	<<if ($clubAdsSpending > 0)>>
		<<if $clubAdsModded == 1>>
			Its advertisements feature girls that are heavily pierced and tattooed.
			<<set _ads = 1>>
		<<elseif $clubAdsModded == -1>>
			Its advertisements feature girls that free from piercings and tattoos.
			<<set _ads = -1>>
		<<else>>
			Its advertisements feature some girls that are tattooed and pierced, and some that aren't.
			<<set _ads = 0>>
		<</if>>
	<</if>>
	<<if ($arcologies[0].FSDegradationist != "unset") && ($arcologies[0].FSDegradationist >= 80)>>
		Most customers prefer heavily pierced and tattooed girls.
		<<set _pref = 1>>
	<<elseif ($arcologies[0].FSBodyPurist != "unset") && ($arcologies[0].FSBodyPurist >= 80) >>
		Most customers prefer natural girls.
		<<set _pref = -1>>
	<<else>>
		<<if ($arcologies[0].FSDegradationist == "unset") && ($arcologies[0].FSBodyPurist == "unset")>>
			<<if ($clubAdsSpending == 0) || ($clubAdsModded == 0)>>
				<<set _possibleBonuses++>>
				<<if (_modded > 0) && (_unmodded > 0) && (Math.abs(_modded-_unmodded) <= (_DL/3))>>
				<<set $clubBonuses++>>
				<<run repX(_DL*random(5,10), "club")>>
				There are @@.green;both@@ heavily pierced and tattooed slaves and slaves with more natural bodies filling the club.
				<</if>>
			<</if>>
		<</if>>
		Most customers don't have preferences for either natural or heavily body modded girls.
		<<set _pref = 0>>
	<</if>>
	<<if (_modded > (_DL/2))>>
		<<set _girls = 1>>
		Most of the slaves in the club are heavily pierced and tattooed.
	<<elseif (_unmodded > (_DL/2))>>
		<<set _girls = -1>>
		Most of the slaves in the club have natural unmodded bodies.
	<<else>>
		<<set _girls = 0>>
		Some girls in the club have piercings or tattoos, some do not and others have both.
	<</if>>
	<<if _pref == 0>> /*customers don't care*/
	<<elseif ($clubAdsSpending > 0)>>
		<<if (_ads == _pref) && (_girls == _ads)>>
			<<set _adsIncome = _DL*random(20,30), $facility.club.adsIncome += _adsIncome, _clubBonuses++>>
			<<run cashX(_adsIncome, "clubAds")>>
			Its advertising for <<if _ads == 1>>heavily modded <<elseif _ads == -1>>natural bodied <</if>>girls matched most customers' preferences and the girls in the club matched its advertisements. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<elseif (_ads == _pref) && (_girls != _ads)>>
			Its advertising for <<if _ads == 1>>heavily modded <<elseif _ads == -1>>natural bodied <</if>>girls matched most customers preferences, but the girls in the club did not. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<<elseif (_girls == _pref) && (_girls != _ads)>>
			The <<if _girls == 1>>heavily modded <<elseif _girls == -1>>natural bodied <</if>>girls in the club did not match its advertisements, but since the girls in the club matched most customers preferences for <<if _pref == 1>>heavily modded <<elseif _pref == -1>>natural bodied <</if>>girls, your reputation was not affected.
		<<elseif (_girls != _pref)>>
			Some customers were put off since the <<if _girls == 1>>heavily modded <<elseif _girls == -1>>natural bodied <</if>>girls there did not match most customers preferences for <<if _pref == 1>>heavily modded <<elseif _pref == -1>>natural bodied <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<<else>>
		<<if (_girls == _pref)>>
			The <<if _girls == 1>>heavily modded <<elseif _girls == -1>>natural bodied <</if>>girls in the club match most customers' preferences for <<if _pref == 1>>heavily modded <<elseif _pref == -1>>natural unmodded <</if>>girls. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<else>>
			Some customers were put off since the <<if _girls == 1>>heavily modded <<elseif _girls == -1>>natural bodied <</if>>girls there did not match most customers preferences for <<if _pref == 1>>heavily modded <<elseif _pref == -1>>natural bodied <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<</if>>

	<<if ($clubAdsSpending > 0)>>
		<<if $clubAdsImplanted == 1>>
			Its advertisements feature girls that are augmented by implants or improved surgically.
			<<set _ads = 1>>
		<<elseif $clubAdsImplanted == -1>>
			Its advertisements feature girls that have all natural bodies.
			<<set _ads = -1>>
		<<else>>
			Its advertisements feature some girls that are surgically improved and implanted and some that are all-natural.
			<<set _ads = 0>>
		<</if>>
	<</if>>
	<<if ($arcologies[0].FSTransformationFetishist != "unset") && ($arcologies[0].FSTransformationFetishist >= 80)>>
		Most customers prefer heavily implanted and surgically enhanced girls.
		<<set _pref = 1>>
	<<elseif ($arcologies[0].FSBodyPurist != "unset") && ($arcologies[0].FSBodyPurist >= 80) >>
		Most customers prefer all-natural girls.
		<<set _pref = -1>>
	<<else>>
		<<if ($arcologies[0].FSTransformationFetishist == "unset") && ($arcologies[0].FSBodyPurist == "unset")>>
			<<if ($clubAdsSpending == 0) || ($clubAdsImplanted == 0)>>
				<<set _possibleBonuses++>>
				<<if (_implanted > 0) && (_pure > 0) && (Math.abs(_implanted-_pure) <= (_DL/3))>>
				<<set $clubBonuses++>>
				<<run repX(_DL*random(5,10), "club")>>
				Citizens in $clubName can easily find @@.yellowgreen;both@@ all-natural girls, and slaves whose beauty has been improved by surgical means.
				<</if>>
			<</if>>
		<</if>>
		Most customers don't have preferences for either all-natural or surgically enhanced and implanted girls.
		<<set _pref = 0>>
	<</if>>
	<<if (_implanted > (_DL/2))>>
		<<set _girls = 1>>
		Most of the slaves in the club are heavily implanted or surgically enhanced.
	<<elseif (_pure > (_DL/2))>>
		<<set _girls = -1>>
		Most of the slaves in the club have naturally pure bodies.
	<<else>>
		<<set _girls = 0>>
		The slaves in the club vary in body modification.
	<</if>>
	<<if _pref == 0>> /*customers don't care*/
	<<elseif ($clubAdsSpending > 0)>>
		<<if (_ads == _pref) && (_girls == _ads)>>
			<<set _adsIncome = _DL*random(20,30), $facility.club.adsIncome += _adsIncome, _clubBonuses++>>
			<<run cashX(_adsIncome, "clubAds")>>
			Its advertising for <<if _ads == 1>>implanted or surgically improved <<elseif _ads == -1>>naturally pure <</if>>girls matched most customers' preferences and the girls in the club matched its advertisements. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<elseif (_ads == _pref) && (_girls != _ads)>>
			Its advertising for <<if _ads == 1>>implanted or surgically improved <<elseif _ads == -1>>naturally pure <</if>>girls matched most customers preferences, but the girls in the club did not. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<<elseif (_girls == _pref) && (_girls != _ads)>>
			The <<if _girls == 1>>implanted or surgically improved <<elseif _girls == -1>>naturally pure <</if>>girls in the club did not match its advertisements, but since the girls in the club matched most customers preferences for <<if _pref == 1>>implanted or surgically improved <<elseif _pref == -1>>naturally pure <</if>>girls, your reputation was not affected.
		<<elseif (_girls != _pref)>>
			Some customers were put off since the <<if _girls == 1>>implanted and surgically improved <<elseif _girls == -1>>naturally pure <</if>>girls there did not match their preferences for <<if _pref == 1>>implanted or surgically improved <<elseif _pref == -1>>naturally pure <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<<else>>
		<<if (_girls == _pref)>>
			The <<if _girls == 1>>implanted or surgically improved <<elseif _girls == -1>>naturally pure <</if>>girls in the club match most customers' preferences for <<if _pref == 1>>implanted or surgically improved <<elseif _pref == -1>>natural unmodded <</if>>girls. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<else>>
			Some customers were put off since the <<if _girls == 1>>implanted and surgically improved <<elseif _girls == -1>>naturally pure <</if>>girls there did not match their preferences for <<if _pref == 1>>implanted or surgically improved <<elseif _pref == -1>>naturally pure <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<</if>>

	<<if ($seeDicks != 0)>>

		<<if ($clubAdsSpending > 0)>>
			<<if ($clubAdsXX == 1)>>
				Its advertisements feature girls with female genitalia.
				<<set _ads = 1>>
			<<elseif ($clubAdsXX == -1)>>
				Its advertisements feature girls with male genitalia.
				<<set _ads = -1>>
			<<else>>
				Its advertisements feature a variety of girls with both male and female genitalia.
				<<set _ads = 0>>
			<</if>>
		<</if>>
		<<if ($arcologies[0].FSGenderFundamentalist != "unset") && ($arcologies[0].FSGenderFundamentalist >= 80)>>
			Most customers prefer girls with pussies.
			<<set _pref = 1>>
		<<elseif ($arcologies[0].FSGenderRadicalist != "unset") && ($arcologies[0].FSGenderRadicalist >= 80)>>
			Most customers prefer girls with dicks.
			<<set _pref = -1>>
		<<else>>
			<<if ($clubAdsSpending == 0) || ($clubAdsXX == 0)>>
				<<set _possibleBonuses++>>
				<<if (_XX > 0) && (_XY > 0) && (Math.abs(_XX-_XY) <= (_DL/3))>>
					<<set $clubBonuses++>>
					<<run repX(_DL*random(5,10), "club")>>
					The club offers a @@.green;mix@@ of sluts that can appeal to varied tastes in genitalia.
				<</if>>
			<</if>>
			Most customers don't have preferences for either girls with dicks or girls with pussies.
			<<set _pref = 0>>
		<</if>>
		<<if (_XX > (_DL/2))>>
			<<set _girls = 1>>
			Most of the slaves in the club have female genitalia.
		<<elseif (_XY > (_DL/2))>>
			Most of the slaves in the club have male genitalia.
			<<set _girls = -1>>
		<<else>>
			<<set _girls = 0>>
			The slaves in the club vary in genitalia.
		<</if>>
		<<if _pref == 0>> /*customers don't care*/
		<<elseif ($clubAdsSpending > 0) >>
			<<if (_ads == _pref) && (_girls == _ads)>>
				<<set _adsIncome = _DL*random(20,30), $facility.club.adsIncome += _adsIncome, _clubBonuses++>>
				<<run cashX(_adsIncome, "clubAds")>>
				Its advertising for girls <<if _ads == 1>>with pussies <<elseif _ads == -1>>with dicks <</if>> matches most customers' preferences as advertised. Your @@.green;reputation@@ increased slightly as a result.
				<<run repX(random(_minBonus,_maxBonus), "club")>>
			<<elseif (_ads == _pref) && (_girls != _ads)>>
				Its advertising for girls <<if _ads == 1>>with pussies <<elseif _ads == -1>>with dicks <</if>> matched most customers preferences, but the girls in the club are not as advertised. Your @@.red;reputation@@ dropped slightly as a result.
				<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
			<<elseif (_girls == _pref) && (_girls != _ads)>>
				The girls <<if _girls == 1>> with pussies<<elseif _girls == -1>> with dicks<</if>>in the club did not match the advertisements, but since the girls in the club matched most customers preferences for girls<<if _pref == 1>> with pussies<<elseif _pref == -1>> with dicks<</if>>, your reputation was not affected.
			<<elseif (_girls != _pref)>>
				Some customers were put off since the girls <<if _girls == 1>>with female genitalia <<elseif _girls == -1>>with male genitalia <</if>> did not match their preferences for girls<<if _pref == 1>> with pussies<<elseif _pref == -1>> with dicks<</if>>. Your @@.red;reputation@@ dropped slightly as a result.
				<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
			<</if>>
		<<else>>
			<<if (_girls == _pref)>>
				The girls in the club match most customers preferences for girls <<if _girls == 1>>with female genitalia <<elseif _girls == -1>>with male genitalia <</if>>. Your @@.green;reputation@@ increased slightly as a result.
				<<run repX(random(_minBonus,_maxBonus), "club")>>
			<<else>>
				Some customers were put off since the girls <<if _girls == 1>>with female genitalia <<elseif _girls == -1>>with male genitalia <</if>> did not match their preferences for girls<<if _pref == 1>> with pussies<<elseif _pref == -1>> with dicks<</if>>. Your @@.red;reputation@@ dropped slightly as a result.
				<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
			<</if>>
		<</if>>
	<</if>>

	<<if ($clubAdsSpending > 0)>>
		<<switch ($clubAdsOld)>>
			<<case 1>>
				Its advertisements feature mature slaves.
				<<set _ads = 1>>
			<<case -1>>
				Its advertisements feature young slaves.
				<<set _ads = -1>>
			<<case -2>>
				Its advertisements feature teenagers.
				<<set _ads = -1>>
			<<case -3>>
				Its advertisements feature lolis.
				<<set _ads = -1>>
			<<default>>
				Its advertisements feature slaves of a variety of ages.
				<<set _ads = 0>>
		<</switch>>
	<</if>>
	<<if ($arcologies[0].FSMaturityPreferentialist != "unset") && ($arcologies[0].FSMaturityPreferentialist >= 80)>>
		Most customers prefer mature girls.
		<<set _pref = 1>>
	<<elseif ($arcologies[0].FSYouthPreferentialist != "unset") && ($arcologies[0].FSYouthPreferentialist >= 80)>>
		Most customers prefer young girls.
		<<set _pref = -1>>
	<<else>>
		<<if ($arcologies[0].FSMaturityPreferentialist == "unset") && ($arcologies[0].FSYouthPreferentialist == "unset")>>
			<<if ($clubAdsSpending == 0) || ($clubAdsOld == 0)>>
				<<set _possibleBonuses++>>
				<<if (_young > 0) && (_old > 0) && (Math.abs(_young-_old) <= (_DL/3))>>
					<<set $clubBonuses++>>
					<<run repX(_DL*random(5,10), "club")>>
					There are girls @@.green;both@@ young and mature in $clubName.
				<</if>>
			<</if>>
		<</if>>
		Most customers don't have preferences for either mature or young girls.
		<<set _pref = 0>>
	<</if>>
	<<if (_old > (_DL/2))>>
		<<set _girls = 1>>
		Most of the slaves in the club are mature.
	<<elseif (_young > (_DL/2))>>
		<<set _girls = -1>>
		Most of the slaves in the club are young.
	<<else>>
		<<set _girls = 0>>
		The slaves in the club vary in age.
	<</if>>
	<<if _pref == 0>> /*customers don't care*/
	<<elseif ($clubAdsSpending > 0)>>
		<<if (_ads == _pref) && (_girls == _ads)>>
			<<set _adsIncome = _DL*random(20,30), $facility.club.adsIncome += _adsIncome, _clubBonuses++>>
			<<run cashX(_adsIncome, "clubAds")>>
			Its advertising matches most customers' age preferences and the girls in the club match the ages as advertised. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<elseif (_ads == _pref) && (_girls != _ads)>>
			Its advertising matched most customers age preferences, but the girls in the club do not. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<<elseif (_girls == _pref) && (_girls != _ads)>>
			The ages of girls in the club did not match the ages as advertised, but since the girls in the club matched most customers age preferences, your reputation was not affected.
		<<elseif (_girls != _pref) && (_girls == _ads)>>
			Some customers were put off since the ages of girls there did not match their preferences. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<<else>>
		<<if (_girls == _pref)>>
			The girls in the club match most customers' age preferences. Your @@.green;reputation@@ increased slightly as a result.
			<<run repX(random(_minBonus,_maxBonus), "club")>>
		<<else>>
			Some customers were put off since the ages of girls there did not match their preferences. Your @@.red;reputation@@ dropped slightly as a result.
			<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
		<</if>>
	<</if>>

	<<if $seePreg == 1>>

		<<if ($clubAdsSpending > 0)>>
			<<if $clubAdsPreg == 1>>
				Its advertisements feature girls that are clearly pregnant.
				<<set _ads = 1>>
			<<elseif $clubAdsPreg == -1>>
				Its advertisements feature girls that have flat, usually firm, bellies.
				<<set _ads = -1>>
			<<else>>
				Its advertisements feature some girls that are pregnant.
				<<set _ads = 0>>
			<</if>>
		<</if>>
		<<if ($arcologies[0].FSRepopulationFocus != "unset") && ($arcologies[0].FSRepopulationFocus >= 80)>>
			Most customers prefer their girls rounded with child.
			<<set _pref = 1>>
		<<elseif ($arcologies[0].FSRestart != "unset") && ($arcologies[0].FSRestart >= 80) >>
			Most customers prefer girls that aren't gravid.
			<<set _pref = -1>>
		<<else>>
			<<if ($arcologies[0].FSRepopulationFocus == "unset") && ($arcologies[0].FSRestart == "unset")>>
				<<if ($clubAdsSpending == 0) || ($clubAdsPreg == 0)>>
					<<set _possibleBonuses++>>
					<<if (_pregYes > 0) && (_pregNo > 0) && (Math.abs(_pregYes-_pregNo) <= (_DL/3))>>
						<<set $clubBonuses++>>
						<<run repX(_DL*random(5,10), "club")>>
						There is a @@.green;wide@@ selection of slaves with a variety of middles working the club.
					<</if>>
				<</if>>
			<</if>>
			Most customers don't have preferences for either big-bellied or flat-bellied girls.
			<<set _pref = 0>>
		<</if>>
		<<if (_pregNo > (_DL/2))>>
			<<set _girls = -1>>
			Most of the slaves in the club sport flat bellies.
		<<elseif (_pregYes > (_DL/2))>>
			<<set _girls = 1>>
			Most of the slaves in the club sport gravid middles.
		<<else>>
			<<set _girls = 0>>
			The slaves in the club vary in belly type.
		<</if>>
		<<if (_pref == 0)>> /*customers don't care*/
		<<elseif ($clubAdsSpending > 0)>>
			<<if (_ads == _pref) && (_girls == _ads)>>
				<<set _adsIncome = _DL*random(20,30), $facility.club.adsIncome += _adsIncome, _clubBonuses++>>
				<<run cashX(_adsIncome, "clubAds")>>
				Its advertising for <<if _ads == 1>>pregnant <<elseif _ads == -1>>flat-bellied <</if>>girls matched most customers' preferences and the girls in the club matched its advertisements. Your @@.green;reputation@@ increased slightly as a result.
				<<run repX(random(_minBonus,_maxBonus), "club")>>
			<<elseif (_ads == _pref) && (_girls != _ads)>>
				Its advertising for <<if _ads == 1>>pregnant <<elseif _ads == -1>>flat-bellied <</if>>girls matched most customers preferences, but the girls in the club did not. Your @@.red;reputation@@ dropped slightly as a result.
				<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
			<<elseif (_girls == _pref) && (_girls != _ads)>>
				The <<if _girls == 1>>pregnant <<elseif _girls == -1>>flat-bellied <</if>>girls in the club did not match its advertisements, but since the girls in the club matched most customers preferences for <<if _pref == 1>>fecund <<elseif _pref == -1>>flat-bellied <</if>>girls, your reputation was not affected.
			<<elseif (_girls != _pref)>>
				Some customers were put off since the <<if _girls == 1>>pregnant <<elseif _girls == -1>>flat-bellied <</if>>girls in the club did not match their preferences for <<if _pref == 1>>fecund <<elseif _pref == -1>>flat-bellied <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
				<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
			<</if>>
		<<else>>
			<<if (_girls == _pref)>>
				The <<if _girls == 1>>pregnant <<elseif _girls == -1>>flat-bellied <</if>>girls in the club match most customers' preferences for <<if _pref == 1>>fecund <<elseif _pref == -1>>flat-bellied <</if>>girls. Your @@.green;reputation@@ increased slightly as a result.
				<<run repX(random(_minBonus,_maxBonus), "club")>>
			<<else>>
				Some customers were put off since the <<if _girls == 1>>pregnant <<elseif _girls == -1>>flat-bellied <</if>>girls in the club did not match their preferences for <<if _pref == 1>>fecund <<elseif _pref == -1>>flat-bellied <</if>>girls. Your @@.red;reputation@@ dropped slightly as a result.
				<<run repX(forceNeg(random(_minBonus,_maxBonus)), "club")>>
			<</if>>
		<</if>>
	<</if>>

	<<if (_possibleBonuses > 0) && ($clubBonuses >= _possibleBonuses)>>
		<<run repX(_DL*random(10,15), "club")>>

		There is a ''@@.green;perfect variety@@'' of slaves serving the public from $clubName.
	<<else>>

		$clubNameCaps does not offer enough variety to satisfy all visitors.
	<</if>>

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

    $clubNameCaps's customers enjoy @@.green;having sex in $clubDecoration surroundings.@@
	<</if>>

	<<ClubStatistics 0>>
	<<timed 50ms>>
		<<replace #clubstats>>
			<<ClubStatistics 1>>
		<</replace>>
	<</timed>>
<</if>>

<<if _DL > 0 || $DJ != 0>>

<</if>>

repo_name: IchthysdeKilt/fc

license: mit


code:
:: Complete Catalog [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Main">>

//This is the complete catalog of slaves that you can acquire from other slaveowners. Most of these slaves are not for sale, so persuading their owners to part with them will be extremely expensive.//

<<for $i = 0; $i < $heroSlaves.length; $i++>>
	<<if $i > 0>> | <</if>>
	<<if $heroSlaves[$i].ID == $activeSlave.ID>>
		//$heroSlaves[$i].slaveName//
	<<else>>
		<<print "[[$heroSlaves[$i].slaveName|Complete Catalog][$activeSlave = App.Utils.getHeroSlave($heroSlaves[" + $i + "], $baseHeroSlave)]]">>
	<</if>>
<</for>>

<<if ndef $activeSlave.pubicHColor>>
	<<set $activeSlave.pubicHColor = $activeSlave.hColor>>
<</if>>
<<if ndef $activeSlave.underArmHColor>>
	<<set $activeSlave.underArmHColor = $activeSlave.hColor>>
<</if>>
<<if $activeSlave.override_Race != 1>>
	<<set $activeSlave.origRace = $activeSlave.race>>
<</if>>
<<if $activeSlave.override_Eye_Color != 1>>
	<<run resetEyeColor($activeSlave, "both")>>
<</if>>
<<if $activeSlave.override_H_Color != 1>>
	<<set $activeSlave.hColor = getGeneticHairColor($activeSlave)>>
<</if>>
<<if $activeSlave.override_Arm_H_Color != 1>>
	<<set $activeSlave.underArmHColor = getGeneticHairColor($activeSlave)>>
<</if>>
<<if $activeSlave.override_Pubic_H_Color != 1>>
	<<set $activeSlave.pubicHColor = getGeneticHairColor($activeSlave)>>
<</if>>
<<if $activeSlave.override_Brow_H_Color != 1>>
	<<set $activeSlave.eyebrowHColor = getGeneticHairColor($activeSlave)>>
<</if>>
<<if $activeSlave.override_Skin != 1>>
	<<set $activeSlave.skin = getGeneticSkinColor($activeSlave)>>
<</if>>
<<run SetBellySize($activeSlave)>>
<<set $specialSlavesPriceOverride = 1>>
<<run nationalityToAccent($activeSlave)>>
<<if $familyTesting == 1>>
	/* special slaves exceptions to keep siblings sensible */
	<<if $activeSlave.mother == -9999 && $activeSlave.father == -9998>> /* The twins — Camille & Kennerly */
		<<for _k = 0; _k < $slaves.length; _k++>>
			<<if areSisters($slaves[_k], $activeSlave) > 0>>
				<<set $activeSlave.actualAge = $slaves[_k].actualAge, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.ovaryAge = $activeSlave.actualAge, $activeSlave.birthWeek = $slaves[_k].birthWeek>>
			<</if>>
		<</for>>
	<</if>>
	<<if $activeSlave.mother == -9997 && $activeSlave.father == -9996>> /* The siblings — Elisa & Martin */
		<<for _k = 0; _k < $slaves.length; _k++>>
			<<if areSisters($slaves[_k], $activeSlave) > 0>>
				<<if $activeSlave.birthName == "Elisa">>
					<<set $activeSlave.actualAge = $slaves[_k].actualAge-1, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.ovaryAge = $activeSlave.actualAge>>
				<<elseif $activeSlave.birthName == "Martin">>
					<<set $activeSlave.actualAge = $slaves[_k].actualAge+1, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.ovaryAge = $activeSlave.actualAge>>
				<</if>>
			<</if>>
		<</for>>
	<</if>>
	<<if $activeSlave.mother == -9995 && $activeSlave.father == -9994>> /* The fruit siblings — Green & Purple Grape */
		<<for _k = 0; _k < $slaves.length; _k++>>
			<<if areSisters($slaves[_k], $activeSlave) > 0>>
				<<if $activeSlave.birthName == "Green Grape">>
					<<set $activeSlave.actualAge = $slaves[_k].actualAge-5, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.ovaryAge = $activeSlave.actualAge>>
				<<elseif $activeSlave.birthName == "Purple Grape">>
					<<set $activeSlave.actualAge = $slaves[_k].actualAge+5, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.ovaryAge = $activeSlave.actualAge>>
				<</if>>
			<</if>>
		<</for>>
	<</if>>
<</if>>

<<set $saleDescription = 1>>
<<include "Long Slave Description">>
<<set $slaveCost = slaveCost($activeSlave)>>
<<set $slaveCost = (10*Math.trunc(($slaveCost/10)*2))>>
<<if $slaveCost < 40000>>
	<<set $slaveCost += random(20000,60000)>>
<</if>>
<<set $specialSlavesPriceOverride = 0>>

The offered price is <<print cashFormat($slaveCost)>>.

<<link "Buy $his slave contract" "New Slave Intro">>
	<<set $activeSlave.weekAcquired = $week, $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Main", $specialSlave = 1>>
	<<run cashX(forceNeg($slaveCost), "slaveTransfer", $activeSlave)>>
<</link>>


code:
:: Concubine Select [nobr]

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

$He will take the lead in seeing to your pleasure.
<<else>>
	You have not selected a Concubine.
<</if>>

''Appoint a Concubine from your devoted slaves:''

[[None|Concubine Workaround][$i = -1]]

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


code:
:: Concubine Workaround [silently]

<<if $Concubine != 0>>
	<<= removeJob($Concubine, "be your Concubine")>>
<</if>>
<<if $i > -1>>
	<<= assignJob($slaves[$i], "be your Concubine")>>
	<<set $slaves[$i].rules.living = "luxurious">>
	<<set $Concubine = $slaves[$i]>>
<</if>>

<<goto "Master Suite">>


code:
:: Costs Budget [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", _arcologyCosts = 0>>

<<if def $lastWeeksCashIncome>>
	<<set $lastWeeksCashIncome.Total = 0>>
	<<set $lastWeeksCashExpenses.Total = 0>>
	<<set $lastWeeksCashProfits.Total = 0>>
<</if>>

<<if ndef $showAllEntries>>
	<<set $showAllEntries = {costsBudget: 0, repBudget: 0}>>
<</if>>

//Here you can view many of the financial details of your arcology, <<= properTitle()>>. The detailed list of slaves and their costs (food, hormones) that you may remember can now be found in the "Slave maintenance" link. Other links will allow you to directly control areas of your arcology to adjust spending to suit your tastes.//

<<if $lineSeparations == 0>>
<<else>>
<</if>>

<<if $difficultySwitch == 1>>
	//The Local Economy score effects some prices in your ecology. The lower the score, the higher the prices. The base score is ''100''.//

		@@.yellowgreen;Global Economy@@
	| <<print $economy>>

	<<if ($cheatMode) && ($cheatModeM)>>
		<<set _Teconomy = $economy>>
		<<textbox "_Teconomy" _Teconomy>>
		<<link "Apply">>
		<<set $economy = Math.trunc(Number(_Teconomy)) || $economy, $cheater = 1>>
		<<replace "#economy">>
		@@.yellowgreen;Global Economy@@
		| <<print $economy>>
		<</replace>>
		<</link>>
	<</if>>

		@@.yellowgreen;Local Economy@@
	| <<print $localEcon>>

	<<if ($cheatMode) && ($cheatModeM)>>
		<<set _TlocalEcon = $localEcon>>
		<<textbox "_TlocalEcon" _TlocalEcon>>
		<<link "Apply">>
		<<set $localEcon = Math.trunc(Number(_TlocalEcon)) || $localEcon, $cheater = 1>>
		<<replace "#localEcon">>
		@@.yellowgreen;Local Economy@@
		| <<print $localEcon>>
		<</replace>>
		<</link>>
	<</if>>

 The current score is
	<<if $localEcon > 100>>
		<<set _econPercent = Math.trunc(1000-100000/$localEcon)/10>>
		reducing prices by @@.green;''<<print _econPercent>>%.''@@
	<<elseif $localEcon == 100>>
		equal to the base score. There are no price modifications.
	<<else>>
		<<set _econPercent = Math.trunc(100000/$localEcon-1000)/10>>
		increasing prices by @@.red;''<<print _econPercent>>%.''@@
	<</if>>

<<if $lineSeparations == 0>>

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

//Your weekly costs are as follows://
<<options $showAllEntries.costsBudget>>
	<<option 0 "Normal">>
	<<option 1 "Show Empty Entries">>
<</options>>

/* Table of Totals */
<<if ndef $lastWeeksCashIncome>>
	Financial data currently unavailable.
<<else>>

<>

Penthouse

		Income
		Expense
		Totals

	<<print budgetLine("whore", "Whores")>>

	<<print budgetLine("rest", "Resting")>>

	<<print budgetLine("houseServant", "House servants")>>

	<<print budgetLine("confined", "Confined")>>

	<<print budgetLine("publicServant", "Public servants")>>

	<<print budgetLine("classes", "Classes")>>

	<<print budgetLine("milked", "Milked")>>

	<<print budgetLine("gloryhole", "Gloryhole")>>

Structures

	<<print budgetLine("brothel", "<<if $brothel>>[[$brothelNameCaps|Brothel][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$brothelNameCaps<</if>> ($BrothiIDs.length slaves)")>>

	<<print budgetLine("whoreBrothel", "Brothel whores")>>

	<<print budgetLine("brothelAds", "<<if $brothel>>[[Brothel ads|Brothel Advertisement][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>Brothel ads<</if>> also increase the income of whoring slaves in \"jobs.\"")>>

	<<if $brothel > 0>>

	<</if>>

	<<print budgetLine("club", "<<if $club>>[[$clubNameCaps|Club][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$clubNameCaps<</if>> ($ClubiIDs.length slaves)")>>

	<<print budgetLine("clubAds", "<<if $club>>[[Club ads|Club Advertisement][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>Club ads<</if>>")>>

	<<if $club > 0>>

	<</if>>

	<<print budgetLine("arcade", "<<if $arcade>>[[$arcadeNameCaps|Arcade][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$arcadeNameCaps<</if>> ($ArcadeiIDs.length slaves)")>>

	<<print budgetLine("gloryholeArcade", "Arcade slaves")>>

	<<if $arcade > 0>>

	<</if>>

	<<print budgetLine("dairy", "<<if $dairy>>[[$dairyNameCaps|Dairy][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$dairyNameCaps<</if>> ($DairyiIDs.length slaves)")>>

	<<print budgetLine("milkedDairy", "Dairy cows")>>

	<<if $dairy > 0>>

	<</if>>

	<<print budgetLine("servantsQuarters", "<<if $servantsQuarters>>[[Servants' Quarters][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>Servants' Quarters<</if>> ($ServQiIDs.length slaves)")>>

	<<print budgetLine("masterSuite", "<<if $masterSuite>>[[Master Suite][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>Master Suite<</if>> ($MastSiIDs.length slaves)")>>

	<<print budgetLine("school", "<<if $schoolroom>>[[$schoolroomNameCaps|Schoolroom][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$schoolroomNameCaps<</if>> ($SchlRiIDs.length slaves)")>>

	<<print budgetLine("spa", "<<if $spa>>[[$spaNameCaps|Spa][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$spaNameCaps<</if>> ($SpaiIDs.length slaves)")>>

	<<print budgetLine("clinic", "<<if $clinic>>[[$clinicNameCaps|Clinic][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$clinicNameCaps<</if>> ($CliniciIDs.length slaves)")>>

	<<print budgetLine("cellblock", "<<if $cellblock>>[[$cellblockNameCaps|Cellblock][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$cellblockNameCaps<</if>> ($CellBiIDs.length slaves)")>>

	<<print budgetLine("lab", "<<if $researchLab.level > 0>>[[Prosthetic Lab][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>Prosthetic Lab<</if>> maintenance")>>

	<<print budgetLine("incubator", "<<if $incubator>>[[$incubatorNameCaps|Incubator][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$incubatorNameCaps<</if>> ($incubatorSlaves slaves)")>>

	<<print budgetLine("nursery", "<<if $nursery>>[[$nurseryNameCaps|Nursery][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$nurseryNameCaps<</if>> ($NurseryiIDs.length slaves)")>>

	<<print budgetLine("farmyard", "<<if $farmyard>>[[$farmyardNameCaps|Farmyard][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$farmyardNameCaps<</if>> ($FarmyardiIDs.length slaves)")>>

	<<print budgetLine("pit", "<<if $pit>>[[$pitNameCaps|Pit][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]<<else>>$pitNameCaps<</if>> ($fighterIDs.length slaves)")>>

	<<print budgetLine("environment", "Environment")>>

	<<print budgetLine("weather",
				"<<if $lastWeeksCashExpenses.weather < 0 && $weatherCladding == 0>>
					Weather is causing @@.red;expensive damage.@@ Consider a protective [[upgrade|Manage Arcology][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]].
				<<else>>
					Weather
				<</if>>")>>

Slaves

	<<print budgetLine("slaveUpkeep", "[[Slave maintenance|Costs Report Slaves][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] ($slaves.length slaves)")>>

	<<print budgetLine("extraMilk", "Extra milk")>>

	<<print budgetLine("slaveTransfer", "Selling/buying major slaves")>>

	<<print budgetLine("menialTransfer", "Menials: [[Assistant's|Personal assistant options][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] flipping")>>

	<<print budgetLine("fuckdollsTransfer", "Fuckdolls: [[Assistant's|Personal assistant options][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] flipping")>>

	<<print budgetLine("menialBioreactorsTransfer", "Bioreactors: [[Assistant's|Personal assistant options][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] flipping")>>

	<<print budgetLine("babyTransfer", "Selling/buying babies")>>

	<<print budgetLine("menialTrades", "[[Menials|Buy Slaves]]: labor")>>

	<<print budgetLine("fuckdolls", "Fuckdolls")>>

	<<print budgetLine("menialBioreactors", "Menials: bioreactors")>>

	<<print budgetLine("porn", "Porn")>>

	<<print budgetLine("recruiter", "[[Recruiter|Recruiter Select]]")>>

	<<print budgetLine("menialRetirement", "Menials retiring")>>

	<<print budgetLine("slaveMod", "Slave modification")>>

	<<print budgetLine("slaveSurgery", "Slave surgery")>>

	<<print budgetLine("birth", "Slave surgery")>>

Finance

	<<print budgetLine("personalBusiness", "Personal business")>>

	<<print budgetLine("personalLivingExpenses",
		"<<if $PC.rules.living == \"luxurious\">>
			Since you are accustomed to luxury, your personal living expenses are:
		<<elseif $PC.rules.living == \"normal\">>
			Since you are used to living well, your personal living expenses are:
		<<else>>
			Since you are used to a fairly normal life, your personal living expenses are:
		<</if>>
		")>>

	<<print budgetLine("PCtraining", "
				<<if ($personalAttention == \"trading\")>>
					[[Trading trainer|Personal Attention Select][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] fees
				<<elseif ($personalAttention == \"warfare\")>>
					[[Warfare trainer|Personal Attention Select][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] fees
				<<elseif ($personalAttention == \"slaving\")>>
					[[Slaving trainer|Personal Attention Select][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] fees
				<<elseif ($personalAttention == \"engineering\")>>
					[[Engineering trainer|Personal Attention Select][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] fees
				<<elseif ($personalAttention == \"medicine\")>>
					[[Medicine trainer|Personal Attention Select][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] fees
				<<elseif ($personalAttention == \"hacking\")>>
					[[Hacking trainer|Personal Attention Select][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] fees
				<</if>>
			")>>

	<<print budgetLine("PCmedical", "Your medical expenses")>>

	<<print budgetLine("PCskills", "Your skills")>>

	<<print budgetLine("rents",
			"Your [[rents|Manage Arcology]]
			<<if $lastWeeksCashExpenses.rents < 0>>
				and bribes
			<</if>>
		")>>

	<<print budgetLine("stocks", "Stock dividends on ($personalShares/<<print ($publicShares + $personalShares)>> shares).")>>

	<<print budgetLine("stocksTraded", "Stock trading")>>

	<<print budgetLine("fines", "Fines")>>

	<<print budgetLine("event", "Events")>>

	<<print budgetLine("war", "Arcology conflict")>>

	<<print budgetLine("capEx", "Capital expenses")>>

	<<print budgetLine("cheating", "CHEATING")>>

Policies

	<<print budgetLine("policies", "[[Policies]]")>>
	<<print budgetLine("edicts", "<<if $secExpEnabled>>[[Edicts|edicts]]<<else>>Edicts<</if>>")>>

	<<print budgetLine("futureSocieties", "[[Society shaping|Future Society][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]")>>

	<<print budgetLine("schoolBacking",
				"<<if $TSS.subsidize != 0>>[[The Slavegirl School|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $GRI.subsidize != 0>>[[Growth Research Institute|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] subsidiary lab influence
				<<elseif $SCP.subsidize != 0>>[[St. Claver Preparatory|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $LDE.subsidize != 0>>[[L'Encole des Enculees|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $TGA.subsidize != 0>>[[The Gymnasium-Academy|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $TCR.subsidize != 0>>[[The Cattle Ranch|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $HA.subsidize != 0>>[[Hippolyta Academy|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $NUL.subsidize != 0>>[[Nueva Universidad de Libertad|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus influence
				<<elseif $TFS.subsidize != 0>>[[The Futanari Sisters|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] community influence
				<<elseif $TSS.schoolPresent == 1>>[[The Slavegirl School|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<elseif $GRI.schoolPresent == 1>>[[Growth Research Institute|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] subsidiary lab upkeep
				<<elseif $SCP.schoolPresent == 1>>[[St. Claver Preparatory|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<elseif $LDE.schoolPresent == 1>>[[L'Encole des Enculees|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<elseif $TGA.schoolPresent == 1>>[[The Gymnasium-Academy|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<elseif $TCR.schoolPresent == 1>>[[The Cattle Ranch|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<elseif $HA.schoolPresent == 1>>[[Hippolyta Academy|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<elseif $NUL.schoolPresent == 1>>[[Nueva Universidad de Libertad|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]] branch campus upkeep
				<<else>> Unknown school expense
				<</if>>
			")>>

	<<print budgetLine("citizenOrphanage", "Education of $citizenOrphanageTotal of your slaves\' children in citizen schools")>>

	<<print budgetLine("privateOrphanage", "Private tutelage of $privateOrphanageTotal of your slaves\' children")>>

	<<print budgetLine("mercenaries",
			"Security: <<if $barracks>>[[$mercenariesTitle|Barracks][$nextButton = \"Back to Budget\", $nextLink = \"Costs Budget\"]]
			<<else>>Mercenaries
//@@.red;Cost increased by the lack of an armory to house them.@@//<</if>>
			<<if ($PC.skill.warfare >= 100) || ($PC.career == \"arcology owner\")>>
//Cost reduced by your @@.springgreen;mercenary contacts.@@//<</if>>
		")>>

	<<print budgetLine("securityExpansion", "Security expansion")>>

	<<print budgetLine("specialForces", "Special forces")>>

	<<print budgetLine("peacekeepers", "Peacekeepers<<if State.variables.peacekeepers.undermining !== 0>>, including undermining<</if>>")>>

Budget Report

		Tracked totals

			<<set $lastWeeksCashIncome.Total = hashSum($lastWeeksCashIncome)>>
			<<if $lastWeeksCashIncome.Total > 0>>
				@@.yellowgreen;+<<print cashFormat(Math.trunc($lastWeeksCashIncome.Total))>>@@
			<<else>>
				@@.red;-<<print cashFormat(Math.abs(Math.trunc($lastWeeksCashIncome.Total)))>>@@
			<</if>>

			<<set $lastWeeksCashExpenses.Total = hashSum($lastWeeksCashExpenses)>>
			<<if $lastWeeksCashExpenses.Total > 0>>
				@@.yellowgreen;+<<print cashFormat(Math.trunc($lastWeeksCashExpenses.Total))>>@@
			<<else>>
				@@.red;-<<print cashFormat(Math.abs(Math.trunc($lastWeeksCashExpenses.Total)))>>@@
			<</if>>

			<<set $lastWeeksCashProfits.Total = ($lastWeeksCashIncome.Total + $lastWeeksCashExpenses.Total)>>
			/* each "profit" item is calculated on this sheet, and there's two ways to generate a profit total: the difference of the income and expense totals, and adding all the profit items. If they aren't the same, I probably forgot to properly add an item's profit calculation to this sheet.*/
			<<if $lastWeeksCashProfits.Total != hashSum($lastWeeksCashProfits) - $lastWeeksCashProfits.Total>>/* Profits includes the total number of profits, so we have to subtract it back out */
				<<print (cashFormat(Math.trunc(hashSum($lastWeeksCashProfits)-$lastWeeksCashProfits.Total)))>>

				@@.red;Fix profit calc
@@
			<</if>>
			<<if $lastWeeksCashProfits.Total > 0>>
				@@.yellowgreen;+<<print cashFormat(Math.trunc($lastWeeksCashProfits.Total))>>@@
			<<else>>
				@@.red;-<<print cashFormat(Math.abs(Math.trunc($lastWeeksCashProfits.Total)))>>@@
			<</if>>

		Expenses budget for week <<print ($week+1)>>

		<<if $costs < 0>>
				@@.yellowgreen;+<<print cashFormat($costs)>>@@
			<<else>>
				@@.red;<<print cashFormat($costs)>>@@
			<</if>>

		Last week actuals

		<<if ($cash-$cashLastWeek) > 0>>
				@@.yellowgreen;+<<print cashFormat($cash-$cashLastWeek)>>@@
			<<else>>
				@@.red;<<print cashFormat($cash-$cashLastWeek)>>@@
			<</if>>

	<<if ($cash-$cashLastWeek) == $lastWeeksCashProfits.Total>>

			@@.green;The books are balanced, <<= properTitle()>>!@@

	<<else>>

			Transaction tracking off by:

			/*<<print ($lastWeeksCashExpenses.Total + $costs)>>*/
			<<if (($cash-$cashLastWeek) - $lastWeeksCashProfits.Total) > 0>>
					@@.yellowgreen;+<<print cashFormat(($cash-$cashLastWeek) - $lastWeeksCashProfits.Total)>>@@
				<<elseif (($cash-$cashLastWeek) - $lastWeeksCashProfits.Total) == 0>>
					<<print cashFormat((($cash-$cashLastWeek) - $lastWeeksCashProfits.Total))>>
				<<else>>
					@@.red;-<<print cashFormat(Math.abs(($cash-$cashLastWeek) - $lastWeeksCashProfits.Total))>>@@
				<</if>>

	<</if>>

<</if>>

<<if ndef $lastWeeksCashErrors>>
	<<set $lastWeeksCashErrors = "Errors: ">>
<</if>>

<<if $lastWeeksCashErrors !== "Errors: ">>
	<<link "Reset">>
		<<set $lastWeeksCashErrors = "Errors: ">>
	<</link>>
	@@.red;<<print $lastWeeksCashErrors>>@@
<</if>>