Forked from
pregmodfan / fc-pregmod
42795 commits behind the upstream repository.
-
Pregmodder authoredPregmodder authored
brothel.tw 12.86 KiB
:: Brothel [nobr]
<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Brothel", $showEncyclopedia = 1, $encyclopedia = "Brothel", $brothelSlaves = $BrothiIDs.length, $Flag = 0>>
<<if $brothelName != "the Brothel">>
<<set $brothelNameCaps = $brothelName.replace("the ", "The ")>>
<</if>>
<<brothelAssignmentFilter>>
$brothelNameCaps
<<switch $brothelDecoration>>
<<case "Roman Revivalist">>
is decorated as a Roman whorehouse. Refreshments are served at a bar, and someone is playing pipes in the back.
<<case "Aztec Revivalist">>
is decorated as an Aztec ode to fertility and nature. Clients may sacrifice a bit of blood to honor the goddess of Filth or to partake in a fertility ritual before joining the girl of their choosing.
<<case "Egyptian Revivalist">>
is decorated as an ancient Egyptian fertility temple. Customers are bade relax on couches next to running water so that slaves may dance to entice them.
<<case "Edo Revivalist">>
is furnished as an Edo period pleasure house, seedy by the standards of the time. Still, girls usually keep their clothes on until they lead patrons back behind the sliding paper screens, though this does not stop silhouettes of the activities within from being visible on them.
<<case "Arabian Revivalist">>
is furnished as an Arabian fleshmarket, with the merchandise standing on little platforms, prices visible. Customers are permitted to fondle before making a decision and dragging a girl back behind a curtain.
<<case "Chinese Revivalist">>
is furnished as an old Chinese pleasure house, with each girl set up in her own low room. They stand outside the doors, luring customers back one by one.
<<case "Chattel Religionist">>
is decorated as a place of carnal worship. The air is scented by censers, and the slaves here maintain an air of holiness even when being sodomized in public.
<<case "Degradationist">>
is decorated to look like a dungeon. The decor involves a lot of black leather and burnished steel, and the slaves on offer are mostly chained to beds and walls.
<<case "Repopulation Focus">>
is clean and full of soft couches and chairs for its' pregnant whores to lounge upon while showing off their assets. Several of the rooms are prepped to allow a whore to give birth in front of an audience. A supply of freshly squeezed breast milk is available on tap.
<<case "Eugenics">>
is decorated to look like a club. Loud music is playing, and the whores that aren't with customers are stripping and poledancing on a stage. Safe sex is greatly encouraged. The real action happens in several reserved rooms dedicated to society's best, since the loud music drowns out private conversations.
<<case "Asset Expansionist">>
is decorated to look like a club. Loud music is playing, and the whores that aren't with customers are stripping and poledancing on a stage.
<<case "Transformation Fetishist">>
is sterile and clean. Interactive screens on the walls list the whores and their modifications in clinical detail.
<<case "Gender Radicalist">>
is decorated to look like an old world bordello. The rich decor includes erotic photography and pornographic statuary, depicting every possible combination of human sexual congress.
<<case "Gender Fundamentalist">>
is decorated to look like an old world whorehouse. Screens on the walls are showing pornography starring the whores, with prices flashing after each sex act.
<<case "Physical Idealist">>
is decorated to look like a club. Loud music is playing, and the whores that aren't with customers are stripping on a stage. There is a distinct smell of sweat, and there is as much emphasis on the strippers' muscles as their breasts.
<<case "Supremacist">>
is decorated like an old world gentleman's club. The pictures on the wall depict degradation of every race on earth, except $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
is decorated to celebrate the degradation of $arcologies[0].FSSubjugationistRace whores. The whores greet customers in stereotypical $arcologies[0].FSSubjugationistRace accents.
<<case "Paternalist">>
is decorated to look like a trendy bar. Whores are encouraged to meet customers for a drink and get to know them a little before heading back into a private room.
<<case "Pastoralist">>
is decorated to look like a dairy. Though it isn't one, there is an intense sexual focus on boobs and lactation, and all the whores have their sizes and productivity proudly posted.
<<case "Maturity Preferentialist">>
is decorated to look like a refined bar. It has a row of sturdy backless barstools, perfect for a delectable selection of succulent MILFs to perch on.
<<case "Youth Preferentialist">>
is decorated to look like a the sort of bar old world students visit on spring break. Vapid music is playing, and when whores aren't with customers, they dance and make out with each other to attract some.
<<case "Body Purist">>
is decorated to look like an old world bordello. The rich decor includes erotic photography and pornographic statuary, depicting idealized human forms in the act of love.
<<case "Slimness Enthusiast">>
is decorated to look like an old world bordello. The rich decor includes erotic photography and pornographic statuary, depicting slim, girlish figures playing, dancing, and loving.
<<case "Hedonistic">>
is comfortable and full of soft couches and chairs for its' overweight whores to lounge upon between clients <<if $arcologies[0].HedonisticDecadenceResearch == 1>>and enjoy a plate of snacks<<else>>and enjoy a big cup of slave food<</if>>. The smells of fresh baked goods are pumped into the facility to mask the smell of sweat. It's not unusual for a client to fuck a whore right on her chosen couch, since the effort of moving is often too much.
<<default>>
is utilitarian. There's a businesslike foyer with an area for the merchandise to stand. Customers make their selection (or selections) and then lead the whores back into little rooms.
<</switch>>
<<if $brothelAdsSpending > 0>>
Screens outside the entrance are showing porn to advertise $brothelNameCaps.
<<if $brothelAdsOld == 1>>
The featured slave actresses are all MILFs.
<<elseif $brothelAdsOld == -1>>
The featured slave actresses are all nice and young.
<<elseif $brothelAdsOld == -2>>
The featured slave actresses are all teenagers.
<<elseif $brothelAdsOld == -3>>
The featured slave actresses are all lolis.
<<else>>
The featured slave actresses vary in age.
<</if>>
<<if $brothelAdsStacked == 1>>
Lots of bouncing breasts and butts
<<elseif $brothelAdsStacked == -1>>
Lots of trim breasts and shapely butts
<<else>>
A variety of breast and butt sizes and shapes
<</if>>
are on display, and
<<if $brothelAdsImplanted == 1>>
most of these are augmented by implants.
<<elseif $brothelAdsImplanted == -1>>
they're all natural.
<<else>>
some are augmented by implants.
<</if>>
<<if $brothelAdsPreg == 1>>
Most of slaves have firm, rounded bellies.
<<elseif $brothelAdsPreg == -1>>
Most of the slaves have firm, flat bellies.
<<else>>
Some of the slaves are pregnant.
<</if>>
<<if $brothelAdsModded == 1>>
Everything is heavily pierced and tattooed.
<<elseif $brothelAdsModded == -1>>
Everything is free of tattoos and piercings.
<<else>>
Some of these assets are tattooed and pierced, and some aren't.
<</if>>
The slaves in the ads are
<<if $brothelAdsXX == 1>>
sucking dick and taking cock in their pussies and asses.
<<elseif $brothelAdsXX == -1>>
sucking cock and being assfucked while their dicks flop around.
<<else>>
sucking dick and taking anal, and the ones that have pussies are being fucked there, too.
<</if>>
The ads are shown on media across $arcologies[0].name.
<<if ($brothelAdsXX == 1) && ($brothelAdsImplanted == 1) && ($brothelAdsStacked == 1)>>
As a result, $brothelName is known as the place to go if you want to rent a<<if ($brothelAdsPreg == 1)>>pregnant<</if>> bimbo's pussy.
<<elseif ($brothelAdsXX == 1) && ($brothelAdsOld == 1)>>
As a result, $brothelName is known as the place to go if you want to rent a<<if ($brothelAdsPreg == 1)>>pregnant<</if>> MILF's tits.
<<elseif ($brothelAdsXX == 1) && ($brothelAdsOld == -3)>>
As a result, $brothelName is known as the place to go if you want to rent<<if $brothelAdsPreg == 1>> a pregnant<</if>><<if $brothelAdsStacked == 1>><<if $brothelAdsPreg != 1>> an<</if>> oppai<</if>> loli.
<<elseif ($brothelAdsXX == 1) && ($brothelAdsPreg == 1)>>
As a result, $brothelName is known as the place to go if you want to pound some pregnant pussy.
<<elseif ($brothelAdsXX == -1) && ($brothelAdsStacked == 1)>>
As a result, $brothelName is known as the place to go if you want to rent a shemale's asspussy.
<<elseif ($brothelAdsXX == -1) && ($brothelAdsStacked == -1)>>
As a result, $brothelName is known as the place to go if you want to rent a trap's tight ass.
<</if>>
<</if>>
<<if $brothelSlaves > 2>>
$brothelNameCaps is bustling with activity. Customers are coming and going and slave girls are displaying themselves. When a slave catches a customer's eye, he leads her back into a little cubicle.
<<elseif $brothelSlaves > 0>>
$brothelNameCaps is working steadily. Customers are present and slave girls are on offer. When a slave catches a customer's eye, he leads her back into a little cubicle.
<<elseif $Madam != 0>>
$Madam.slaveName is alone in $brothelName, and has nothing to do but keep the place clean and plan future sales efforts.
<<else>>
$brothelNameCaps is empty and desolate.
<<link "Decommission the brothel">>
<<set $brothel = 0, $brothelUpgradeDrugs = 0, $brothelDecoration = "standard">>
<<for _i = 0; _i < $sectors.length; _i++>>
<<if $sectors[_i].type == "Brothel">>
<<set $sectors[_i].type = "Shops">><<break>>
<</if>>
<</for>>
<<goto "Main">>
<</link>>
<</if>>
<<set _Tmult0 = Math.trunc($brothel*1000*$upgradeMultiplierArcology)>>
<br>It can support $brothel whores. Currently $brothelSlaves whore at $brothelNameCaps.
[[Expand the brothel|Brothel][$cash -= _Tmult0, $brothel += 5, $PC.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>> and will increase upkeep costs//
<br>
<<if $brothelUpgradeDrugs == 1>>
It has been upgraded with aphrodisiac injection systems that monitor the whores and adjust dosage to keep them healthy but desperately horny and hopelessly addicted. The systems are currently applying a moderate dosage of aphrodisiac. [[Increase the aphrodisiac dosage|Brothel][$brothelUpgradeDrugs = 2]] | [[Disable the aphrodisiac injection systems|Brothel][$brothelUpgradeDrugs = 0.1]] //Will reduce upkeep costs if disabled, and raise them if increased//
<<elseif $brothelUpgradeDrugs == 2>>
It has been upgraded with aphrodisiac injection systems that monitor the whores and adjust dosage to keep them healthy but desperately horny and hopelessly addicted. The systems are currently applying an extreme dosage of aphrodisiac. [[Decrease the aphrodisiac dosage|Brothel][$brothelUpgradeDrugs = 1]] | [[Disable the aphrodisiac injection systems|Brothel][$brothelUpgradeDrugs = 0.1]] //Will reduce upkeep costs//
<<elseif $brothelUpgradeDrugs == 0.1>>
It has been upgraded with aphrodisiac injection systems that monitor the whores and adjust dosage to keep them healthy but desperately horny and hopelessly addicted. The systems are currently disabled. [[Enable them|Brothel][$brothelUpgradeDrugs = 1]] //Will increase upkeep costs//
<<else>>
<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
It is a standard brothel. [[Upgrade the brothel with aphrodisiac injection systems|Brothel][$cash -= _Tmult1, $brothelUpgradeDrugs = 0.1]] //Costs <<print cashFormat(_Tmult1)>> and will increase upkeep costs//
<</if>>
<br>$brothelNameCaps is
<<if $brothelAdsSpending > 0>>
the subject of an active ad campaign.
<<else>>
not being advertised.
<</if>>
<<link "Manage brothel advertisements">><<set $nextLink = passage(), $nextButton = "Back">><<goto "Brothel Advertisement">><</link>>
<!-- Statistics output -->
<<BrothelStatistics 1>>
<br><br>
<<if $Madam != 0>>
<<set $Flag = 2>>
<<include "Slave Summary">>
<<else>>
You do not have a slave serving as a Madam. [[Appoint one|Madam Select]]
<</if>>
<br><br>
<<if ($brothel <= $brothelSlaves)>>
''$brothelNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $brothelSlaves)>>
<<link "''Send a slave to $brothelName''">>
<<replace #ComingGoing>>
<<resetAssignmentFilter>>
<<set $Flag to 0>>
<<include "Slave Summary">>
<</replace>>
<</link>>
<</if>>
<<if $brothelSlaves > 0>>
| <<link "''Bring a slave out of $brothelName''">>
<<replace #ComingGoing>>
<<brothelAssignmentFilter>>
<<set $Flag = 1>>
<<include "Slave Summary">>
<<resetAssignmentFilter>>
<</replace>>
<</link>>
<<else>>
<br><br>//$brothelNameCaps is empty for the moment.<br>//
<</if>>
<br><br>
<<assignmentFilter >>
<span id="ComingGoing">
<<brothelAssignmentFilter>>
<<set $Flag = 1>>
<<include "Slave Summary">>
<<resetAssignmentFilter>>
</span>
<br><br>Rename $brothelName: <<textbox "$brothelName" $brothelName "Brothel">> //Use a noun or similar short phrase//