:: Slave Shelter
 
<<nobr>>

<<set $nextButton to "Back">>
<<set $nextLink to "Buy Slaves">>
<<set $returnTo to "Buy Slaves">>
<<set $showEncyclopedia to 1>>
<<set $encyclopedia to "Kidnapped Slaves">>

<</nobr>>\
\
You contact the Slave Shelter to review the profile of the slave the Shelter is offering to a good <<if $PC.title == 1>>Master<<else>>Mistress<</if>> willing to pay the Shelter's nominal placement fee. The severe, tired-looking woman who answers your call hurries through the disclaimers. "All Shelter Slaves are provided as-is... the Shelter provides a single slave for placement each week... resale of Shelter slaves is contractually forbidden... we reserve the right to unannounced inspection of placed slaves... the Shelter follows up on reports of abuse or resale of its slaves..."

<<nobr>>

<<set _num to random(1,99)>>

<<if $shelterSlave == 0>>

<<set $origins to []>>

<<set $origins.push("She has never communicated anything about her background, since she arrived at the shelter with a broken mind.")>>
<<if $seeExtreme == 1>>
	<<set $origins.push("It's not clear why her previous owner cut her arms and legs off.")>>
	<<set $origins.push("Her owner purposely blinded her by dumping boiling water into her eyes.")>>
<</if>>
<<if _num > $seeDicks>>
	<<set $origins.push("Her previous owner gelded her and used her for anal abuse.")>>
	<<set $origins.push("Her background is obscure, but seems to have involved terrible abuse of her huge cock and balls.")>>
<</if>>
<<if _num < $seeDicks>>
	<<set $origins.push("Her holes were cruelly stretched by constant plug use.")>>
	<<set $origins.push("Her previous owner discarded her after many pregnancies.")>>
	<<set $origins.push("She was worn out by twenty years of brothel service.")>>
	<<set $origins.push("She was discarded after suffering a terrible reaction to growth hormone treatment.")>>
<</if>>

<<set $origin to $origins.random()>>
<<set $origins to $origin>>
<<set $origin to ("You got her at the Slave Shelter. " + $origin)>>

<<if $origin is "You got her at the Slave Shelter. She has never communicated anything about her background, since she arrived at the shelter with a broken mind.">>
	<<include "Generate New Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.devotion = random(-25,-45)>>
	<<set $shelterSlave.trust = random(-25,-45)>>
	<<set $shelterSlave.health = random(-30,-10)>>
	<<set $shelterSlave.anus to 3>>
	<<set $shelterSlave.oralSkill = 0>>
	<<set $shelterSlave.analSkill = 0>>
	<<set $shelterSlave.whoreSkill = 0>>
	<<set $shelterSlave.entertainSkill = 0>>
	<<set $shelterSlave.combatSkill = 0>>
	<<set $shelterSlave.intelligence to -2>>
	<<set $shelterSlave.intelligenceImplant to 0>>
	<<set $shelterSlave.behavioralFlaw to "none">>
	<<set $shelterSlave.sexualFlaw to "none">>
	<<set $shelterSlave.fetish to "mindbroken">>
	<<set $shelterSlave.fetishStrength = 0>>
<<elseif $origin is "You got her at the Slave Shelter. It's not clear why her previous owner cut her arms and legs off.">>
	<<include "Generate New Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.amp to 1>>
	<<set $shelterSlave.devotion = random(-100,-90)>>
	<<set $shelterSlave.trust = random(-100,-90)>>
	<<set $shelterSlave.health = random(-80,-60)>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "hates men", "hates women")>>
	<<set $shelterSlave.sexualFlaw to either("hates anal", "hates oral", "hates penetration", "apathetic")>>
<<elseif $origin is "You got her at the Slave Shelter. Her owner purposely blinded her by dumping boiling water into her eyes.">>
 	<<set $activeSlaveOneTimeMinAge to $minimumSlaveAge>>
 	<<set $activeSlaveOneTimeMaxAge to 22>>
	<<include "Generate New Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.eyes to -2>>
	<<set $shelterSlave.eyeColor to "milky white">>
	<<set $shelterSlave.customDesc to "She has an obvious burn across her eyes.">>
	<<set $shelterSlave.devotion to random(-100,-90)>>
	<<set $shelterSlave.trust to random(-100,-90)>>
	<<set $shelterSlave.health to random(-80,-60)>>
	<<set $shelterSlave.behavioralFlaw to "hates men">>
	<<set $shelterSlave.sexualFlaw to "hates oral">>
<<elseif $origin is "You got her at the Slave Shelter. Her previous owner gelded her and used her for anal abuse.">>
	<<set $activeSlaveOneTimeMinAge to 20>>
	<<set $activeSlaveOneTimeMaxAge to 42>>
	<<include "Generate XY Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.devotion  = random(-75,-60)>>
	<<set $shelterSlave.trust = random(-100,-75)>>
	<<set $shelterSlave.health = random(-50,-30)>>
	<<set $shelterSlave.face to random(-2,-1)>>
	<<set $shelterSlave.dick to random(1,2)>>
	<<set $shelterSlave.balls to 0>>
	<<set $shelterSlave.anus to 4>>
	<<set $shelterSlave.oralSkill = 0>>
	<<set $shelterSlave.analSkill = 15>>
	<<set $shelterSlave.whoreSkill = 0>>
	<<set $shelterSlave.entertainSkill = 0>>
	<<set $shelterSlave.combatSkill = 0>>
	<<set $shelterSlave.attrXY = random(40,60)>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "hates men", "anorexic", "gluttonous")>>
	<<set $shelterSlave.sexualFlaw to either("hates anal", "apathetic")>>
<<elseif $origin is "You got her at the Slave Shelter. Her background is obscure, but seems to have involved terrible abuse of her huge cock and balls.">>
	<<set $activeSlaveOneTimeMinAge to 20>>
	<<set $activeSlaveOneTimeMaxAge to 42>>
	<<include "Generate XY Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.devotion  = random(-75,-60)>>
	<<set $shelterSlave.trust = random(-100,-75)>>
	<<set $shelterSlave.health = random(-50,-30)>>
	<<set $shelterSlave.face to random(-2,-1)>>
	<<set $shelterSlave.dick to random(4,5)>>
	<<set $shelterSlave.balls to random(4,5)>>
	<<set $shelterSlave.anus to 0>>
	<<set $shelterSlave.oralSkill = 0>>
	<<set $shelterSlave.analSkill = 0>>
	<<set $shelterSlave.whoreSkill = 0>>
	<<set $shelterSlave.entertainSkill = 0>>
	<<set $shelterSlave.combatSkill = 0>>
	<<set $shelterSlave.energy to random(5,10)>>
	<<set $shelterSlave.attrXX = 0>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "hates women")>>
	<<set $shelterSlave.sexualFlaw to either("apathetic")>>
<<elseif $origin is "You got her at the Slave Shelter. Her holes were cruelly stretched by constant plug use.">>
	<<set $activeSlaveOneTimeMinAge to 20>>
	<<set $activeSlaveOneTimeMaxAge to 42>>
	<<include "Generate XX Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.devotion  = random(-75,-60)>>
	<<set $shelterSlave.trust = random(-100,-75)>>
	<<set $shelterSlave.health = random(-50,-30)>>
	<<set $shelterSlave.vagina to 4>>
	<<set $shelterSlave.anus to 4>>
	<<set $shelterSlave.oralSkill = 15>>
	<<set $shelterSlave.analSkill = 15>>
	<<set $shelterSlave.vaginalSkill = 15>>
	<<set $shelterSlave.whoreSkill = 0>>
	<<set $shelterSlave.entertainSkill = 0>>
	<<set $shelterSlave.combatSkill = 0>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "anorexic", "gluttonous")>>
	<<set $shelterSlave.sexualFlaw to either("hates penetration", "hates anal", "hates oral")>>
<<elseif $origin is "You got her at the Slave Shelter. Her previous owner discarded her after many pregnancies.">>
	<<if $pedo_mode == 1>>
		<<set $activeSlaveOneTimeMinAge to ($fertilityAge + 6)>>
		<<set $one_time_age_overrides_pedo_mode to 1>> /% Old enough to have been pregnant many times. %/
	<<else>>
		<<set $activeSlaveOneTimeMinAge to 30>>
		<<set $activeSlaveOneTimeMaxAge to 42>>
	<</if>>
	<<include "Generate XX Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a breeder">>
	<<set $shelterSlave.devotion  = random(-75,-60)>>
	<<set $shelterSlave.trust = random(-100,-75)>>
	<<set $shelterSlave.health = random(-50,-30)>>
	<<set $shelterSlave.preg to -2>>
	<<set $shelterSlave.birthsTotal to 13>>
	<<set $shelterSlave.bellySag to 10>>
	<<set $shelterSlave.vagina to 3>>
	<<set $shelterSlave.oralSkill = 0>>
	<<set $shelterSlave.analSkill = 0>>
	<<set $shelterSlave.vaginalSkill = 0>>
	<<set $shelterSlave.whoreSkill = 0>>
	<<set $shelterSlave.entertainSkill = 0>>
	<<set $shelterSlave.combatSkill = 0>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "hates men", "gluttonous")>>
	<<set $shelterSlave.sexualFlaw to either("hates penetration", "apathetic", "repressed")>>
<<elseif $origin is "You got her at the Slave Shelter. She was worn out by twenty years of brothel service.">>
	<<set $activeSlaveOneTimeMinAge to 32>>
	<<set $activeSlaveOneTimeMaxAge to 42>>
	<<set $one_time_age_overrides_pedo_mode to 1>> /% 20 years of brothel service. %/
	<<include "Generate XX Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a prostitute">>
	<<set $shelterSlave.devotion  = random(-75,-60)>>
	<<set $shelterSlave.trust = random(-100,-75)>>
	<<set $shelterSlave.health = random(-80,-60)>>
	<<set $shelterSlave.face to random(-2,-1)>>
	<<set $shelterSlave.preg to -2>>
	<<set $shelterSlave.vagina to 4>>
	<<set $shelterSlave.anus to 4>>
	<<set $shelterSlave.oralSkill = 35>>
	<<set $shelterSlave.analSkill = 35>>
	<<set $shelterSlave.vaginalSkill = 35>>
	<<set $shelterSlave.whoreSkill = 35>>
	<<set $shelterSlave.entertainSkill = 15>>
	<<set $shelterSlave.combatSkill = 0>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "hates men", "gluttonous", "anorexic")>>
	<<set $shelterSlave.sexualFlaw to either("hates penetration", "hates oral", "hates anal", "apathetic")>>
<<elseif $origin is "You got her at the Slave Shelter. She was discarded after suffering a terrible reaction to growth hormone treatment.">>
	<<include "Generate New Slave">>
	<<set $shelterSlave to $activeSlave>>
	<<set $shelterSlave.origin to $origin>>
	<<set $shelterSlave.career to "a slave">>
	<<set $shelterSlave.devotion  = random(-75,-60)>>
	<<set $shelterSlave.trust = random(-100,-75)>>
	<<set $shelterSlave.health = random(-80,-60)>>
	<<set $shelterSlave.chem = 1000>>
	<<if ($shelterSlave.dick > 0) && (random(1,2) == 1)>>
	<<set $shelterSlave.dick to random(5,6)>>
	<</if>>
	<<if ($shelterSlave.balls > 0) && (random(1,2) == 1)>>
	<<set $shelterSlave.balls to random(5,6)>>
	<</if>>
	<<if (random(1,3) == 1)>>
	<<set $shelterSlave.boobs += 100*random(10,30)>>
	<</if>>
	<<if (random(1,3) == 1)>>
	<<set $shelterSlave.butt += random(3,5)>>
	<</if>>
	<<set $shelterSlave.behavioralFlaw to either("odd", "gluttonous", "anorexic")>>
	<<set $shelterSlave.sexualFlaw to either("hates penetration", "hates oral", "hates anal", "apathetic")>>
<</if>>

<</if>>

<<set $slaveCost = 1000>>

<</nobr>>\
\
The placement fee is ¤<<print $slaveCost>>.

<<nobr>>
<<if $cash >= $slaveCost>>
	[[Buy her slave contract|New Slave Intro][$cash -= $slaveCost,$shelterSlaveBought to 1,$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
<<else>>
	//You lack the necessary funds to buy this slave.//
<</if>>
<</nobr>>

<<set $activeSlave to $shelterSlave>><<set $saleDescription to 1>><<include "Long Slave Description">><<set $saleDescription to 0>>

$origins
