code:
:: Corporation Developments [nobr]
<<if ndef _NumGeneral || ndef _NumSlaves || ndef _NumEntrap || ndef _NumCapture || ndef _NumTrain || ndef _NumSurgery || ndef _NumPharma>>
<<set _NumGeneral = 1>>
<<set _NumSlaves = 1>>
<<set _NumEntrapment = 1>>
<<set _NumCapture = 1>>
<<set _NumTraining = 1>>
<<set _NumSurgery = 1>>
<<set _NumDrug = 1>>
<</if>>
__The Corporation__

<<set $seed to random(1,100)>>
<<set $corpPeopleEnslaved += 1>>

<<set $corpValue to ($generalAssets*$generalAssetPrice)+($slaveAssets*$slaveAssetPrice)+($entrapmentAssets*$entrapmentAssetPrice)+($captureAssets*$captureAssetPrice)+($trainingAssets*$trainingAssetPrice)+($surgicalAssets*$surgicalAssetPrice)+($drugAssets*$drugAssetPrice)>>
<<set $corpProfit = Math.trunc($corpValue*(random(7,15)/1000))>>
<<set $corpCash += $corpProfit>>
Your corporation made a profit of ¤$corpProfit last week.
<<if $mercenariesHelpCorp > 0>>
	The $mercenariesTitle assist it with difficult enslavement targets. Otherwise, it
	<<set $slaveAssets += $mercenaries*1000>>
	<<set $corpPeopleEnslaved += $mercenaries>>
<<else>>
	It
<</if>>
<<if $seed > 80>>
	was an outstanding week for corporate enslavement;
	<<set $slaveAssets += Math.trunc(($captureAssets+$entrapmentAssets)*0.09)>>
	<<set $corpPeopleEnslaved += Math.trunc(($captureAssets+$entrapmentAssets)*0.0009)>>
<<elseif $seed > 60>>
	was a great week for enslavement;
	<<set $slaveAssets += Math.trunc(($captureAssets+$entrapmentAssets)*0.07)>>
	<<set $corpPeopleEnslaved += Math.trunc(($captureAssets+$entrapmentAssets)*0.0007)>>
<<elseif $seed > 60>>
	was a good week for enslavement;
	<<set $slaveAssets += Math.trunc(($captureAssets+$entrapmentAssets)*0.05)>>
	<<set $corpPeopleEnslaved += Math.trunc(($captureAssets+$entrapmentAssets)*0.0005)>>
<<elseif $seed > 60>>
	was a mediocre week for enslavement;
	<<set $slaveAssets += Math.trunc(($captureAssets+$entrapmentAssets)*0.03)>>
	<<set $corpPeopleEnslaved += Math.trunc(($captureAssets+$entrapmentAssets)*0.0003)>>
<<else>>
	was a bad week for enslavement;
	<<set $slaveAssets += Math.trunc(($captureAssets+$entrapmentAssets)*0.01)>>
	<<set $corpPeopleEnslaved += Math.trunc(($captureAssets+$entrapmentAssets)*0.0001)>>
<</if>>
in total, the corporation has enslaved $corpPeopleEnslaved people.
<<if $slaveAssets < ($trainingAssets+$surgicalAssets+$drugAssets)>>
	The corporation has enough training and medical assets to rapidly improve its human holdings.
	<<set $slaveAssets = Math.trunc($slaveAssets*1.1)>>
<<elseif $slaveAssets < ($trainingAssets+$surgicalAssets+$drugAssets)*2>>
	The corporation uses its training and medical assets to improve its human holdings.
	<<set $slaveAssets = Math.trunc($slaveAssets*1.05)>>
<<else>>
	The corporation has only enough training and medical assets to maintain the value of its human holdings.
<</if>>
<<if $corpProfit*0.6 > ($personalShares+$publicShares)*3>>
	Since it is incredibly profitable, an massive dividend of ¤<<print Math.trunc(($corpProfit*0.6)/($personalShares+$publicShares))>> was paid out to stockholders; you received @@color:yellowgreen;¤<<print Math.trunc(($corpProfit*0.6)/($personalShares+$publicShares))*$personalShares>>.@@
	<<set $cash += Math.trunc(($corpProfit*0.6)/($personalShares+$publicShares))*$personalShares>>
	<<set $corpCash -= Math.trunc(($corpProfit*0.6)/($personalShares+$publicShares))*$personalShares>>
<<elseif $corpProfit > ($personalShares+$publicShares)*2.4>>
	Since it is extremely profitable, a huge dividend of ¤2/share was paid out to stockholders; you received @@color:yellowgreen;¤<<print $personalShares*2>>.@@
	<<set $cash += $personalShares*2>>
	<<set $corpCash -= ($personalShares+$publicShares)*2>>
<<elseif $corpProfit > ($personalShares+$publicShares)*1.5>>
	Since it is highly profitable, a large dividend of ¤1/share was paid out to stockholders; you received @@color:yellowgreen;¤$personalShares.@@
	<<set $cash += $personalShares>>
	<<set $corpCash -= ($personalShares+$publicShares)>>
<<elseif $corpProfit > ($personalShares+$publicShares)*0.8>>
	Since it is very profitable, a moderate dividend of ¤0.5/share was paid out to stockholders; you received @@color:yellowgreen;¤<<print $personalShares*0.5>>.@@
	<<set $cash += Math.trunc($personalShares*0.5)>>
	<<set $corpCash -= Math.trunc(($personalShares+$publicShares)*0.5)>>
<<elseif $corpProfit > ($personalShares+$publicShares)*0.4>>
	Since it is moderately profitable, a reasonable dividend of ¤0.2/share was paid out to stockholders; you received @@color:yellowgreen;¤<<print $personalShares*0.2>>.@@
	<<set $cash += Math.trunc($personalShares*0.2)>>
	<<set $corpCash -= Math.trunc(($personalShares+$publicShares)*0.2)>>
<<elseif $corpProfit > ($personalShares+$publicShares)*0.2>>
	Since it is acceptably profitable, a small dividend of ¤0.1/share was paid out to stockholders; you received @@color:yellowgreen;¤<<print $personalShares*0.1>>.@@
	<<set $cash += Math.trunc($personalShares*0.1)>>
	<<set $corpCash -= Math.trunc(($personalShares+$publicShares)*0.1)>>
<</if>>

<<set $seed to random(1,100)>>

<<if $corpValue > ($personalShares+$publicShares)*$sharePrice*1.1>>
	The market consensus is that your corporation is undervalued, driving share prices sharply up.
	<<set $sharePrice to (Math.trunc($sharePrice*random(115,125)))/100>>
<<elseif random(1,100) < $rep/30000>>
	Share prices in your corporation are driven up by your reputation.
	<<set $sharePrice to (Math.trunc($sharePrice*random(random(105,110),115)))/100>>
<<elseif $seed > 80>>
	Market volatility drives share prices up.
	<<set $sharePrice to (Math.trunc($sharePrice*random(random(105,110),115)))/100>>
<<elseif $seed < 20>>
	Market volatility drives share prices down.
	<<set $sharePrice to (Math.trunc($sharePrice*random(85,random(90,95))))/100>>
<<elseif $corpValue < ($personalShares+$publicShares)*$sharePrice*0.9>>
	The market consensus is that your corporation is overvalued, driving share prices sharply down.
	<<set $sharePrice to (Math.trunc($sharePrice*random(85,random(90,95))))/100>>
<</if>>

Shares in your corporation are trading at ¤$sharePrice:

<<if $oldSharePrice is $sharePrice>>
	no different from last week.
<<elseif $oldSharePrice > $sharePrice>>
	down <<print Math.trunc(($oldSharePrice-$sharePrice)*100)/100>> since last week.
<<else>>
	up <<print Math.trunc(($sharePrice - $oldSharePrice)*100)/100>> since last week.
<</if>>

<<set $oldSharePrice = Math.trunc($sharePrice)>>

You hold $personalShares shares personally while $publicShares are publicly held.

<<if $cash > 1000*$sharePrice>>
<<link "Purchase 1000 shares from the corporation">><<set $personalShares += 1000>><<set $cash -= 1000*$sharePrice>><<set $corpCash += 1000*$sharePrice>><<set $sharePrice to (Math.trunc($sharePrice*random(105,110)))/100>><<replace "#capitalize">><<print "You purchased 1000 shares from the corporation, driving the share price up slightly.">><</replace>><</link>> |
<</if>>
<<if $personalShares-1000 > $publicShares>>
	 <<link "Issue 1000 new shares">><<set $publicShares += 1000>><<set $corpCash += 1000*$sharePrice>><<set $sharePrice to (Math.trunc($sharePrice*random(90,95)))/100>><<replace "#capitalize">><<print "The corporation issued 1000 new shares, driving the share price down slightly.">><</replace>><</link>> |
<</if>>
<<if $personalShares-1000 > $publicShares>>
	 <<link "Sell 1000 of your shares">><<set $personalShares -= 1000>><<set $publicShares += 1000>><<set $cash += 1000*$sharePrice>><<set $sharePrice to (Math.trunc($sharePrice*random(90,95)))/100>><<replace "#capitalize">><<print "You sold 1000 shares, driving the share price down slightly.">><</replace>><</link>>
<<else>>
	 //You cannot give up majority control.//
<</if>>
<<if $publicShares > 1000>>
<<if $cash > 1000*$sharePrice>>
<<if $publicShares > $personalShares*0.2>>
	 | <<link "Buy 1000 publicly held shares">><<set $personalShares += 1000>><<set $publicShares -= 1000>><<set $cash -= 1000*$sharePrice>><<set $sharePrice to (Math.trunc($sharePrice*random(105,110)))/100>><<replace "#capitalize">><<print "You bought 1000 shares, driving the share price up slightly.">><</replace>><</link>>
<<else>>
	 | //You cannot make the corporation privately held.//
<</if>>
<</if>>
<</if>>

¤$corpCash in cash on hand.

<<if $generalAssetPrice > 10>>
	<<if random(1,100) > 50>>
	<<set $generalAssetPrice -= 1>>
	<<elseif random(1,100) > 50>>
	<<set $generalAssetPrice += 1>>
	<</if>>
<<elseif $generalAssetPrice < 4>>
	<<set $generalAssetPrice to 5>>
<<elseif $generalAssetPrice < 10>>
	<<if random(1,100) > 50>>
	<<set $generalAssetPrice += 1>>
	<<elseif random(1,100) > 50>>
	<<set $generalAssetPrice -= 1>>
	<</if>>
<<else>>
	<<if random(1,100) > 50>>
	<<set $generalAssetPrice += 1>>
	<<else>>
	<<set $generalAssetPrice -= 1>>
	<</if>>
<</if>>

¤<<print $generalAssetPrice*$generalAssets>> (<<print $generalAssets/500>> unit<<if $generalAssets/500 > 1>>s<</if>>) in general assets.
Prices are
<<if $generalAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $generalAssetPrice*500>>ea@@.
<<elseif $generalAssetPrice < 10>>
	@@color:gold;¤<<print $generalAssetPrice*500>>ea@@.
<<else>>
	¤<<print $generalAssetPrice*500>>ea.
<</if>>
| Trade Qty <<textbox "_NumGeneral" _NumGeneral>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumGeneral)) == false>>
		<<replace "#genAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumGeneral*$generalAssetPrice*500 < $corpCash>>
		<<set $generalAssets += _NumGeneral*500>>
		<<set $corpCash -= _NumGeneral*500*$generalAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#genAssets">>
			¤<<print $generalAssetPrice*$generalAssets>> (<<print $generalAssets/500>> unit<<if $generalAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#genAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $generalAssetPrice*500>>
		<<replace "#genAssetsPurchasing">> You can only buy <<print Math.floor($corpCash/($generalAssetPrice*500))>> more unit<<if Math.floor($corpCash/($generalAssetPrice*500)) > 1 >>s<</if>> of this asset. <</replace>>
	<<else>>
		<<replace "#genAssetsPurchasing">>
		There are insufficient funds for additional purchases.
		<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumGeneral)) == false>>
		<<replace "#genAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $generalAssets > 500 && (_NumGeneral*500) < $generalAssets>>
		<<set $generalAssets -= _NumGeneral*500>>
		<<set $corpCash += _NumGeneral*500*$generalAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#genAssets">>
			¤<<print $generalAssetPrice*$generalAssets>> (<<print $generalAssets/500>> unit<<if $generalAssets > 1>>s<</if>>)
		<</replace>>
		<<replace "#genAssetsPurchasing">>
		<</replace>>
	<<elseif $generalAssets > 500>>
		<<replace "#genAssetsPurchasing">>
			You can only sell <<print Math.floor(($generalAssets-500)/500)>> more unit<<if Math.floor(($generalAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#genAssetsPurchasing">>
			You cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<set $slaveAssetPrice = Math.trunc(10*$slaveCostFactor)>>

¤<<print $slaveAssetPrice*$slaveAssets>> (<<print Math.floor($slaveAssets/500)>> unit<<if Math.floor($slaveAssets/500) > 1>>s<</if>>) in slaves.
Prices are
<<if $slaveAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $slaveAssetPrice*500>>ea@@
<<elseif $slaveAssetPrice < 10>>
	@@color:gold;¤<<print $slaveAssetPrice*500>>ea@@
<<else>>
	¤<<print $slaveAssetPrice*500>>ea
<</if>>
| Trade Qty <<textbox "_NumSlaves" _NumSlaves>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumSlaves)) == false>>
		<<replace "#slaveAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumSlaves*$slaveAssetPrice*500 < $corpCash>>
		<<set $slaveAssets += _NumSlaves*500>>
		<<set $corpCash -= _NumSlaves*500*$slaveAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#slaveAssets">>
			¤<<print $slaveAssetPrice*$slaveAssets>> (<<print Math.floor($slaveAssets/500)>> unit<<if $slaveAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#slaveAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $slaveAssetPrice*500>>
		<<replace "#slaveAssetsPurchasing">> The corp can only buy <<print Math.floor($corpCash/($slaveAssetPrice*500))>> more unit<<if Math.floor($corpCash/($slaveAssetPrice*500)) > 1 >>s<</if>> of this asset. <</replace>>
	<<else>>
	<<replace "#slaveAssetsPurchasing">>
		There are insufficient funds for additional purchases.
	<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumSlaves)) == false>>
		<<replace "#slaveAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $slaveAssets >500 && (_NumSlaves*500) < $slaveAssets>>
		<<set $slaveAssets -= _NumSlaves*500>>
		<<set $corpCash += _NumSlaves*500*$slaveAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#slaveAssets">>
				¤<<print $slaveAssetPrice*$slaveAssets>>
					<<if $slaveAssetPrice*$slaveAssets < $slaveAssetPrice*500>>
					(<1 unit)
					<<else>>
					(<<print Math.floor($slaveAssets/500)>> unit<<if Math.floor($slaveAssets/500) > 1>>s<</if>>)
					<</if>>
		<</replace>>
		<<replace "#slaveAssetsPurchasing">>
		<</replace>>
	<<elseif $slaveAssets > 500>>
		<<replace "#slaveAssetsPurchasing">>
			The corp can only sell <<print Math.ceil(($slaveAssets-500)/500)>> more unit<<if Math.ceil(($slaveAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#slaveAssetsPurchasing">>
			The corp cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<if $entrapmentAssetPrice > 10>>
	<<if random(1,100) > 50>>
	<<set $entrapmentAssetPrice -= 1>>
	<<elseif random(1,100) > 50>>
	<<set $entrapmentAssetPrice += 1>>
	<</if>>
<<elseif $entrapmentAssetPrice < 4>>
	<<set $entrapmentAssetPrice to 5>>
<<elseif $entrapmentAssetPrice < 10>>
	<<if random(1,100) > 50>>
	<<set $entrapmentAssetPrice += 1>>
	<<elseif random(1,100) > 50>>
	<<set $entrapmentAssetPrice -= 1>>
	<</if>>
<<elseif $entrapmentAssetPrice == 10>>
	<<if random(1,100) > 50>>
	<<set $entrapmentAssetPrice += 1>>
	<<else>>
	<<set $entrapmentAssetPrice -= 1>>
	<</if>>
<<else>>
	<<set $entrapmentAssetPrice to 5>>
<</if>>

¤<<print $entrapmentAssetPrice*$entrapmentAssets>> (<<print Math.floor($entrapmentAssets/500)>> unit<<if Math.floor($entrapmentAssets/500) > 1>>s<</if>>) in legal enslavement assets.
Prices are
<<if $entrapmentAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $entrapmentAssetPrice*500>>ea@@
<<elseif $entrapmentAssetPrice < 10>>
	@@color:gold;¤<<print $entrapmentAssetPrice*500>>ea@@
<<else>>
	¤<<print $entrapmentAssetPrice*500>>ea
<</if>>
| Trade Qty <<textbox "_NumEntrapment" _NumEntrapment>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumEntrapment)) == false>>
		<<replace "#entrapmentAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumEntrapment*$entrapmentAssetPrice*500 < $corpCash>>
		<<set $entrapmentAssets += _NumEntrapment*500>>
		<<set $corpCash -= _NumEntrapment*500*$entrapmentAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#trapAssets">>
			¤<<print $entrapmentAssetPrice*$entrapmentAssets>> (<<print Math.floor($entrapmentAssets/500)>> unit<<if $entrapmentAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#entrapmentAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $entrapmentAssetPrice*500>>
		<<replace "#entrapmentAssetsPurchasing">> The corp can only buy <<print Math.floor($corpCash/($entrapmentAssetPrice*500))>> more unit<<if Math.floor($corpCash/($entrapmentAssetPrice*500)) > 1 >>s<</if>> this asset. <</replace>>
	<<else>>
	<<replace "#entrapmentAssetsPurchasing">>
		There are insufficient funds for additional purchases.
	<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumEntrapment)) == false>>
		<<replace "#entrapmentAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $entrapmentAssets > 500 && ((_NumEntrapment*500) < $entrapmentAssets)>>
		<<set $entrapmentAssets -= _NumEntrapment*500>>
		<<set $corpCash += _NumEntrapment*500*$entrapmentAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#trapAssets">>
			¤<<print $entrapmentAssetPrice*$entrapmentAssets>> (<<print Math.floor($entrapmentAssets/500)>> unit<<if Math.floor($entrapmentAssets/500) > 1>>s<</if>>)
		<</replace>>
		<<replace "#entrapmentAssetsPurchasing">>
		<</replace>>
	<<elseif $entrapmentAssets > 500>>
		<<replace "#entrapmentAssetsPurchasing">>
			The corp can only sell <<print Math.floor(($entrapmentAssets-500)/500)>> more unit<<if Math.floor(($entrapmentAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#entrapmentAssetsPurchasing">>
			The corp cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<if $captureAssetPrice > 10>>
	<<if random(1,100) > 50>>
	<<set $captureAssetPrice -= 1>>
	<<elseif random(1,100) > 50>>
	<<set $captureAssetPrice += 1>>
	<</if>>
<<elseif $captureAssetPrice < 4>>
	<<set $captureAssetPrice to 5>>
<<elseif $captureAssetPrice < 10>>
	<<if random(1,100) > 50>>
	<<set $captureAssetPrice += 1>>
	<<elseif random(1,100) > 50>>
	<<set $captureAssetPrice -= 1>>
	<</if>>
<<elseif $captureAssetPrice == 10>>
	<<if random(1,100) > 50>>
	<<set $captureAssetPrice += 1>>
	<<else>>
	<<set $captureAssetPrice -= 1>>
	<</if>>
<<else>>
	<<set $captureAssetPrice to 5>>
<</if>>

¤<<print $captureAssetPrice*$captureAssets>> (<<print Math.floor($captureAssets/500)>> unit<<if Math.floor($captureAssets/500) > 1>>s<</if>>) in conflict zone enslavement assets.
Prices are
<<if $captureAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $captureAssetPrice*500>>ea@@
<<elseif $captureAssetPrice < 10>>
	@@color:gold;¤<<print $captureAssetPrice*500>>ea@@
<<else>>
	¤<<print $captureAssetPrice*500>>ea
<</if>>
| Trade Qty <<textbox "_NumCapture" _NumCapture>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumCapture)) == false>>
		<<replace "#captureAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumCapture*$captureAssetPrice*500 < $corpCash>>
		<<set $captureAssets += _NumCapture*500>>
		<<set $corpCash -= _NumCapture*500*$captureAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#capAssets">>
			¤<<print $captureAssetPrice*$captureAssets>> (<<print Math.floor($captureAssets/500)>> unit<<if $captureAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#captureAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $captureAssetPrice*500>>
		<<replace "#captureAssetsPurchasing">> The corp can only buy <<print Math.floor($corpCash/($captureAssetPrice*500))>> more unit<<if Math.floor($corpCash/($captureAssetPrice*500)) > 1 >>s<</if>> of this asset. <</replace>>
	<<else>>
	<<replace "#captureAssetsPurchasing">>
		There are insufficient funds for additional purchases.
	<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumCapture)) == false>>
		<<replace "#captureAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $captureAssets > 500 && (_NumCapture*500) < $captureAssets>>
		<<set $captureAssets -= _NumCapture*500>>
		<<set $corpCash += _NumCapture*500*$captureAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#capAssets">>
			¤<<print $captureAssetPrice*$captureAssets>> (<<print Math.floor($captureAssets/500)>> unit<<if Math.floor($captureAssets/500) > 1>>s<</if>>)
		<</replace>>
		<<replace "#captureAssetsPurchasing">>
		<</replace>>
	<<elseif $captureAssets > 500>>
		<<replace "#captureAssetsPurchasing">>
			The corp can only sell <<print Math.floor(($captureAssets-500)/500)>> more unit<<if Math.floor(($captureAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#captureAssetsPurchasing">>
			The corp cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<if $trainingAssetPrice > 10>>
	<<if random(1,100) > 50>>
	<<set $trainingAssetPrice -= 1>>
	<<elseif random(1,100) > 50>>
	<<set $trainingAssetPrice += 1>>
	<</if>>
<<elseif $trainingAssetPrice < 4>>
	<<set $trainingAssetPrice to 5>>
<<elseif $trainingAssetPrice < 10>>
	<<if random(1,100) > 50>>
	<<set $trainingAssetPrice += 1>>
	<<elseif random(1,100) > 50>>
	<<set $trainingAssetPrice -= 1>>
	<</if>>
<<elseif $trainingAssetPrice > 5>>
	<<if random(1,100) > 50>>
	<<set $trainingAssetPrice += 1>>
	<<else>>
	<<set $trainingAssetPrice -= 1>>
	<</if>>
<<else>>
	<<set $trainingAssetPrice to 5>>
<</if>>

¤<<print $trainingAssetPrice*$trainingAssets>> (<<print Math.floor($trainingAssets/500)>> unit<<if Math.floor($trainingAssets/500) > 1>>s<</if>>) of slave training assets.
Prices are
<<if $trainingAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $trainingAssetPrice*500>>ea@@
<<elseif $trainingAssetPrice < 10>>
	@@color:gold;¤<<print $trainingAssetPrice*500>>ea@@
<<else>>
	¤<<print $trainingAssetPrice*500>>ea
<</if>>
| Trade Qty <<textbox "_NumTraining" _NumTraining>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumTraining)) == false>>
		<<replace "#trainingAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumTraining*$trainingAssetPrice*500 < $corpCash>>
		<<set $trainingAssets += _NumTraining*500>>
		<<set $corpCash -= _NumTraining*500*$trainingAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#trainAssets">>
			¤<<print $trainingAssetPrice*$trainingAssets>> (<<print Math.floor($trainingAssets/500)>> unit<<if $trainingAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#trainingAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $trainingAssetPrice*500>>
		<<replace "#trainingAssetsPurchasing">> The corp can only buy <<print Math.floor($corpCash/($trainingAssetPrice*500))>> more unit<<if Math.floor($corpCash/($trainingAssetPrice*500)) > 1 >>s<</if>> of this asset. <</replace>>
	<<else>>
	<<replace "#trainingAssetsPurchasing">>
		There are insufficient funds for additional purchases.
	<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumTraining)) == false>>
		<<replace "#trainingAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $trainingAssets > 500 && (_NumTraining*500) < $trainingAssets>>
		<<set $trainingAssets -= _NumTraining*500>>
		<<set $corpCash += _NumTraining*500*$trainingAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#trainAssets">>
			¤<<print $trainingAssetPrice*$trainingAssets>> (<<print Math.floor($trainingAssets/500)>> unit<<if Math.floor($trainingAssets/500) > 1>>s<</if>>)
		<</replace>>
		<<replace "#trainingAssetsPurchasing">>
		<</replace>>
	<<elseif $trainingAssets > 500>>
		<<replace "#trainingAssetsPurchasing">>
			The corp can only sell <<print Math.floor(($trainingAssets-500)/500)>> more unit<<if Math.floor(($trainingAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#trainingAssetsPurchasing">>
			The corp cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<if $surgicalAssetPrice > 10>>
	<<if random(1,100) > 50>>
	<<set $surgicalAssetPrice -= 1>>
	<<elseif random(1,100) > 50>>
	<<set $surgicalAssetPrice += 1>>
	<</if>>
<<elseif $surgicalAssetPrice < 4>>
	<<set $surgicalAssetPrice to 5>>
<<elseif $surgicalAssetPrice < 10>>
	<<if random(1,100) > 50>>
	<<set $surgicalAssetPrice += 1>>
	<<elseif random(1,100) > 50>>
	<<set $surgicalAssetPrice -= 1>>
	<</if>>
<<elseif $surgicalAssetPrice == 10>>
	<<if random(1,100) > 50>>
	<<set $surgicalAssetPrice += 1>>
	<<else>>
	<<set $surgicalAssetPrice -= 1>>
	<</if>>
<<else>>
	<<set $surgicalAssetPrice to 5>>
<</if>>

¤<<print $surgicalAssetPrice*$surgicalAssets>> (<<print Math.floor($surgicalAssets/500)>> unit<<if Math.floor($surgicalAssets/500) > 1>>s<</if>>) in surgical assets.
Prices are
<<if $surgicalAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $surgicalAssetPrice*500>>ea@@
<<elseif $surgicalAssetPrice < 10>>
	@@color:gold;¤<<print $surgicalAssetPrice*500>>ea@@
<<else>>
	¤<<print $surgicalAssetPrice*500>>ea
<</if>>
| Trade Qty <<textbox "_NumSurgery" _NumSurgery>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumSurgery)) == false>>
		<<replace "#surgicalAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumSurgery*$surgicalAssetPrice*500 < $corpCash>>
		<<set $surgicalAssets += _NumSurgery*500>>
		<<set $corpCash -= _NumSurgery*500*$surgicalAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#surgAssets">>
			¤<<print $surgicalAssetPrice*$surgicalAssets>> (<<print Math.floor($surgicalAssets/500)>> unit<<if $surgicalAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#surgicalAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $surgicalAssetPrice*500>>
		<<replace "#surgicalAssetsPurchasing">> The corp can only buy <<print Math.floor($corpCash/($surgicalAssetPrice*500))>> more unit<<if Math.floor($corpCash/($surgicalAssetPrice*500)) > 1 >>s<</if>> of this asset. <</replace>>
	<<else>>
	<<replace "#surgicalAssetsPurchasing">>
		There are insufficient funds for additional purchases.
	<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumSurgery)) == false>>
		<<replace "#surgicalAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $surgicalAssets >500 && (_NumSurgery*500) < $surgicalAssets>>
		<<set $surgicalAssets -= _NumSurgery*500>>
		<<set $corpCash += _NumSurgery*500*$surgicalAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#surgAssets">>
			¤<<print $surgicalAssetPrice*$surgicalAssets>> (<<print Math.floor($surgicalAssets/500)>> unit<<if Math.floor($surgicalAssets/500) > 1>>s<</if>>)
		<</replace>>
		<<replace "#surgicalAssetsPurchasing">>
		<</replace>>
	<<elseif $surgicalAssets > 500>>
		<<replace "#surgicalAssetsPurchasing">>
			The corp can only sell <<print Math.floor(($surgicalAssets-500)/500)>> more unit<<if Math.floor(($surgicalAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#surgicalAssetsPurchasing">>
			The corp cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<if $drugAssetPrice > 10>>
	<<if random(1,100) > 50>>
	<<set $drugAssetPrice -= 1>>
	<<elseif random(1,100) > 50>>
	<<set $drugAssetPrice += 1>>
	<</if>>
<<elseif $drugAssetPrice < 4>>
	<<set $drugAssetPrice to 5>>
<<elseif $drugAssetPrice < 10>>
	<<if random(1,100) > 50>>
	<<set $drugAssetPrice += 1>>
	<<elseif random(1,100) > 50>>
	<<set $drugAssetPrice -= 1>>
	<</if>>
<<elseif $drugAssetPrice == 10>>
	<<if random(1,100) > 50>>
	<<set $drugAssetPrice += 1>>
	<<else>>
	<<set $drugAssetPrice -= 1>>
	<</if>>
<<else>>
	<<set $drugAssetPrice to 5>>
<</if>>

¤<<print $drugAssetPrice*$drugAssets>> (<<print Math.floor($drugAssets/500)>> unit<<if Math.floor($drugAssets/500) > 1>>s<</if>>) in pharmaceutical assets.
Prices are
<<if $drugAssetPrice > 10>>
	@@color:yellowgreen;¤<<print $drugAssetPrice*500>>ea@@
<<elseif $drugAssetPrice < 10>>
	@@color:gold;¤<<print $drugAssetPrice*500>>ea@@
<<else>>
	¤<<print $drugAssetPrice*500>>ea
<</if>>
| Trade Qty <<textbox "_NumDrug" _NumDrug>><>
 : <<link "Buy">>
	<<if Number.isInteger(Number.parseFloat(_NumDrug)) == false>>
		<<replace "#drugAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif _NumDrug*$drugAssetPrice*500 < $corpCash>>
		<<set $drugAssets += _NumDrug*500>>
		<<set $corpCash -= _NumDrug*500*$drugAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#drugAssets">>
			¤<<print $drugAssetPrice*$drugAssets>> (<<print Math.floor($drugAssets/500)>> unit<<if $drugAssets/500 > 1>>s<</if>>)
		<</replace>>
		<<replace "#drugAssetsPurchasing">><</replace>>
	<<elseif $corpCash > $drugAssetPrice*500>>
		<<replace "#drugAssetsPurchasing">> The corp can only buy <<print Math.floor($corpCash/($drugAssetPrice*500))>> more unit<<if Math.floor($corpCash/($drugAssetPrice*500)) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
	<<replace "#drugAssetsPurchasing">>
		There are insufficient funds for additional purchases.
	<</replace>>
	<</if>>
<</link>>
| <<link "Sell">>
	<<if Number.isInteger(Number.parseFloat(_NumDrug)) == false>>
		<<replace "#drugAssetsPurchasing">>
		Please input a round number.
		<</replace>>
	<<elseif $drugAssets >500 && (_NumDrug*500) < $drugAssets>>
		<<set $drugAssets -= _NumDrug*500>>
		<<set $corpCash += _NumDrug*500*$drugAssetPrice>>
		<<replace "#cashOnHand">>
			¤<<print $corpCash>>
		<</replace>>
		<<replace "#drugAssets">>
			¤<<print $drugAssetPrice*$drugAssets>> (<<print Math.floor($drugAssets/500)>> unit<<if Math.floor($drugAssets/500) > 1>>s<</if>>)
		<</replace>>
		<<replace "#drugAssetsPurchasing">>
		<</replace>>
	<<elseif $drugAssets > 500>>
		<<replace "#drugAssetsPurchasing">>
			The corp can only sell <<print Math.floor(($drugAssets-500)/500)>> more unit<<if Math.floor(($drugAssets-500)/500) > 1 >>s<</if>> of this asset.
		<</replace>>
	<<else>>
		<<replace "#drugAssetsPurchasing">>
			The corp cannot sell any more of this asset.
		<</replace>>
	<</if>>
<</link>>

<<if $generalAssets >= 2000>>
	<<if $generalUpgradeBreaking == "unselected">>

The corporation has enough general expertise to specialize. Focus on breaking slaves with
		<<link "Brutality">><<set $generalUpgradeBreaking = "brutality">><<replace "#direction">>
<<print "You directed the corporation to train slaves with brutal force.">><</replace>><</link>>
		| <<link "Care">><<set $generalUpgradeBreaking = "care">><<replace "#direction">>
<<print "You directed the corporation to train slaves with loving care.">><</replace>><</link>>
		| <<link "No focus">><<set $generalUpgradeBreaking = "none">><<replace "#direction">>
<<print "You directed the corporation to focus on whatever training methods work best.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $generalAssets >= 5000>>
	<<if $generalUpgradeWeight == "unselected">>

The corporation has enough general expertise to specialize. Manage slaves' diets to an
		<<link "Attractive weight">><<set $generalUpgradeWeight = "attractive">><<replace "#direction">>
<<print "You directed the corporation to slim fat slaves and feed thin ones.">><</replace>><</link>>
		| <<link "No dieting">><<set $generalUpgradeWeight = "none">><<replace "#direction">>
<<print "You directed the corporation not to focus on slaves' weight.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $generalAssets >= 10000>>
	<<if $generalUpgradeMuscle == "unselected">>

The corporation has enough general expertise to specialize. Train slaves until their muscles are
		<<link "Toned">><<set $generalUpgradeMuscle = "toned">><<replace "#direction">>
<<print "You directed the corporation to train slaves until they're toned.">><</replace>><</link>>
		| <<link "Ripped">><<set $generalUpgradeMuscle = "ripped">><<replace "#direction">>
<<print "You directed the corporation to train slaves until they're ripped.">><</replace>><</link>>
		| <<link "No training">><<set $generalUpgradeMuscle = "none">><<replace "#direction">>
<<print "You directed the corporation not to focus on slaves' fitness.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $entrapmentAssets >= 2000>>
	<<if $entrapmentUpgradeDevotionOne == "unselected">>

The corporation is entrapping enough slaves to specialize. Focus on slaves with
		<<link "Obedience">><<set $entrapmentUpgradeDevotionOne = "obedience">><<replace "#direction">>
<<print "You directed the corporation to retain obedient slaves.">><</replace>><</link>>
		| <<link "No focus">><<set $entrapmentUpgradeDevotionOne = "none">><<replace "#direction">>
<<print "You directed the corporation to train slaves regardless of obedience.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $entrapmentAssets >= 5000>>
	<<if $entrapmentUpgradeDevotionTwo == "unselected">>

The corporation is entrapping enough slaves to specialize. Focus on slaves with
		<<link "Devotion">><<set $entrapmentUpgradeDevotionTwo = "devotion">><<replace "#direction">>
<<print "You directed the corporation to retain devoted slaves.">><</replace>><</link>>
		| <<link "No focus">><<set $entrapmentUpgradeDevotionTwo = "none">><<replace "#direction">>
<<print "You directed the corporation to train slaves regardless of devotion.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $entrapmentAssets >= 10000>>
	<<if $entrapmentUpgradeIntelligence == "unselected">>

The corporation is entrapping enough slaves to specialize. Focus on slaves who are
		<<link "Intelligent">><<set $entrapmentUpgradeIntelligence = "intelligent">><<replace "#direction">>
<<print "You directed the corporation to retain intelligent slaves.">><</replace>><</link>>
		| <<link "Stupid">><<set $entrapmentUpgradeIntelligence = "stupid">><<replace "#direction">>
<<print "You directed the corporation to retain stupid slaves.">><</replace>><</link>>
		| <<link "No focus">><<set $entrapmentUpgradeIntelligence = "none">><<replace "#direction">>
<<print "You directed the corporation to train slaves regardless of intelligence.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $captureAssets >= 2000>>
	<<if $seeDicks != 0>>
	<<if $captureUpgradeGender == "unselected">>

The corporation captures enough slaves to specialize. Focus on training slaves with
		<<link "Pussies">><<set $captureUpgradeGender = "XX">><<replace "#direction">>
<<print "You directed the corporation to retain slaves with pussies for training.">><</replace>><</link>>
		| <<link "Dicks">><<set $captureUpgradeGender = "XY">><<replace "#direction">>
<<print "You directed the corporation to retain slaves with dicks for training.">><</replace>><</link>>
		| <<link "No focus">><<set $captureUpgradeGender = "none">><<replace "#direction">>
<<print "You directed the corporation to retain any promising slave for training.">><</replace>><</link>>
	<</if>>
	<</if>>
<</if>>
<<if $captureAssets >= 5000>>
	<<if $captureUpgradeAge == "unselected">>

The corporation captures enough slaves to specialize. Focus on training slaves who are
		<<link "Younger">><<set $captureUpgradeAge = "young">><<replace "#direction">>
<<print "You directed the corporation to retain younger slaves for training.">><</replace>><</link>>
		| <<link "Older">><<set $captureUpgradeAge = "old">><<replace "#direction">>
<<print "You directed the corporation to retain older slaves for training.">><</replace>><</link>>
		| <<link "No focus">><<set $captureUpgradeAge = "none">><<replace "#direction">>
<<print "You directed the corporation to retain any promising slave for training.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $captureAssets >= 10000>>
	<<if $captureUpgradeRace == "unselected">>

The corporation captures enough slaves to specialize. Focus on training slaves who are
		<<link "White">><<set $captureUpgradeRace = "white">><<replace "#direction">>
<<print "You directed the corporation to retain white slaves for training.">><</replace>><</link>>
		| <<link "Asian">><<set $captureUpgradeRace = "asian">><<replace "#direction">>
<<print "You directed the corporation to retain asian slaves for training.">><</replace>><</link>>
		| <<link "Indo-aryan">><<set $captureUpgradeRace = "indo-aryan">><<replace "#direction">>
<<print "You directed the corporation to retain indo-aryan slaves for training.">><</replace>><</link>>
		| <<link "Latina">><<set $captureUpgradeRace = "latina">><<replace "#direction">>
<<print "You directed the corporation to retain latina slaves for training.">><</replace>><</link>>
		| <<link "middle eastern">><<set $captureUpgradeRace = "middle eastern">><<replace "#direction">>
<<print "You directed the corporation to retain Middle Eastern slaves for training.">><</replace>><</link>>
		| <<link "Black">><<set $captureUpgradeRace = "black">><<replace "#direction">>
<<print "You directed the corporation to retain black slaves for training.">><</replace>><</link>>
		| <<link "Pacific Islander">><<set $captureUpgradeRace = "pacific islander">><<replace "#direction">>
<<print "You directed the corporation to retain pacific islander slaves for training.">><</replace>><</link>>
		| <<link "Malay">><<set $captureUpgradeRace = "malay">><<replace "#direction">>
<<print "You directed the corporation to retain malay slaves for training.">><</replace>><</link>>
		| <<link "Amerindian">><<set $captureUpgradeRace = "amerindian">><<replace "#direction">>
<<print "You directed the corporation to retain amerindian slaves for training.">><</replace>><</link>>
		| <<link "Semitic">><<set $captureUpgradeRace = "semitic">><<replace "#direction">>
<<print "You directed the corporation to retain semitic slaves for training.">><</replace>><</link>>
		| <<link "Southern European">><<set $captureUpgradeRace = "southern European">><<replace "#direction">>
<<print "You directed the corporation to retain southern European slaves for training.">><</replace>><</link>>
		| <<link "Mixed Race">><<set $captureUpgradeRace = "mixed race">><<replace "#direction">>
<<print "You directed the corporation to retain mixed race slaves for training.">><</replace>><</link>>
		| <<link "No focus">><<set $captureUpgradeRace = "none">><<replace "#direction">>
<<print "You directed the corporation to retain any promising slave for training.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $trainingAssets >= 2000>>
	<<if $trainingUpgradeAccent == "unselected">>

The corporation has enough training expertise to specialize. Focus on linguistic training to
		<<link "Teach language">><<set $trainingUpgradeAccent = "accents">><<replace "#direction">>
<<print "You directed the corporation to teach slaves the lingua franca.">><</replace>><</link>>
		| <<link "Eliminate accents">><<set $trainingUpgradeAccent = "eliminate">><<replace "#direction">>
<<print "You directed the corporation to teach slaves perfect, unaccented language.">><</replace>><</link>>
		| <<link "No training">><<set $trainingUpgradeAccent = "none">><<replace "#direction">>
<<print "You directed the corporation not to focus on linguistic training.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $trainingAssets >= 5000>>
	<<if $trainingUpgradeEducation == "unselected">>

The corporation has enough training expertise to specialize. Train slaves with
		<<link "Basic educations">><<set $trainingUpgradeEducation = "basic">><<replace "#direction">>
<<print "You directed the corporation to focus on ensuring slaves are properly educated.">><</replace>><</link>>
		| <<link "No training">><<set $trainingUpgradeEducation = "none">><<replace "#direction">>
<<print "You directed the corporation to focus on getting slaves broken, not educated.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $trainingAssets >= 10000>>
	<<if $trainingUpgradeSexEd == "unselected">>

The corporation has enough training expertise to specialize. Train slaves' sexual knowledge to
		<<link "Competence">><<set $trainingUpgradeSexEd = "competence">><<replace "#direction">>
<<print "You directed the corporation to ensure slaves know basic sexual skills.">><</replace>><</link>>
		| <<link "Highly Skilled">><<set $trainingUpgradeSexEd = "highly skilled">><<replace "#direction">>
<<print "You directed the corporation to ensure slaves are sexually proficient.">><</replace>><</link>>
		| <<link "No training">><<set $trainingUpgradeSexEd = "none">><<replace "#direction">>
<<print "You directed the corporation to focus on getting slaves trained rather than skilled.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $surgicalAssets >= 2000>>
	<<if $surgicalUpgradeCosmetics == "unselected">>

The corporation has enough surgical expertise to specialize. Straightforward cosmetic procedures should be
		<<link "Applied">><<set $surgicalUpgradeCosmetics = "applied">><<replace "#direction">>
<<print "You directed the corporation to give slaves straightforward cosmetic surgeries.">><</replace>><</link>>
		| <<link "Not applied">><<set $surgicalUpgradeCosmetics = "none">><<replace "#direction">>
<<print "You directed the corporation to leave slaves surgically unaltered.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $surgicalAssets >= 5000>>
	<<if $surgicalUpgradeImplants == "unselected">>

The corporation has enough surgical expertise to specialize. Implants should be
		<<link "Applied">><<set $surgicalUpgradeImplants = "applied">><<replace "#direction">>
<<print "You directed the corporation to give slaves basic implants.">><</replace>><</link>>
		| <<link "Absurd">><<set $surgicalUpgradeImplants = "absurd">><<replace "#direction">>
<<print "You directed the corporation to give slaves absurd implants.">><</replace>><</link>>
		| <<link "Not applied">><<set $surgicalUpgradeImplants = "none">><<replace "#direction">>
<<print "You directed the corporation to leave slaves without implants.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $surgicalAssets >= 10000>>
	<<if $seeDicks != 0>>
	<<if $surgicalUpgradeGenitalia == "unselected">>

The corporation has enough surgical expertise to specialize. Slaves' genitals should be reconfigured to
		<<link "Futanari">><<set $surgicalUpgradeGenitalia = "futanari">><<replace "#direction">>
<<print "You directed the corporation to create futanari.">><</replace>><</link>>
		<<if $seeExtreme != 0>>
			| <<link "Remove balls">><<set $surgicalUpgradeGenitalia = "gelded">><<replace "#direction">>
<<print "You directed the corporation to remove slaves' balls.">><</replace>><</link>>
			| <<link "Mindbreak and remove limbs">><<set $surgicalUpgradeGenitalia = "fucknugget", $generalUpgradeBreaking = "none", $entrapmentUpgradeDevotionOne = "none", $entrapmentUpgradeDevotionTwo = "none", $trainingUpgradeAccent = "none", $trainingUpgradeEducation = "none", $trainingUpgradeSexEd = "none">><<replace "#direction">>
<<print "You directed the corporation to produce limbless, mindless slaves.">><</replace>><</link>>
		<</if>>
		| <<link "None">><<set $surgicalUpgradeGenitalia = "none">><<replace "#direction">>
<<print "You directed the corporation to leave slaves without major genital reconfiguration.">><</replace>><</link>>
	<</if>>
	<</if>>
<</if>>
<<if $drugAssets >= 2000>>
	<<if $drugUpgradeHormones == "unselected">>

The corporation has surplus pharmaceutical fabrication to specialize. Hormones should be applied to
		<<link "Feminize">><<set $drugUpgradeHormones = "XX">><<replace "#direction">>
<<print "You directed the corporation to treat slaves with female hormones.">><</replace>><</link>>
		| <<link "Masculinize">><<set $drugUpgradeHormones = "XY">><<replace "#direction">>
<<print "You directed the corporation to treat slaves with male hormones.">><</replace>><</link>>
		| <<link "Not applied">><<set $drugUpgradeHormones = "none">><<replace "#direction">>
<<print "You directed the corporation not to apply hormones.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $drugAssets >= 5000>>
	<<if $drugUpgradeInjectionOne == "unselected">>

The corporation has surplus pharmaceutical fabrication to specialize. Growth injections should be applied until T&A are grown to a
		<<link "Tasteful size">><<set $drugUpgradeInjectionOne = "tasteful">><<replace "#direction">>
<<print "You directed the corporation to grow slaves' assets to a moderate size.">><</replace>><</link>>
		| <<link "Huge size">><<set $drugUpgradeInjectionOne = "huge">><<replace "#direction">>
<<print "You directed the corporation to grow slaves' assets to a huge size.">><</replace>><</link>>
		| <<link "Not applied">><<set $drugUpgradeInjectionOne = "none">><<replace "#direction">>
<<print "You directed the corporation not to apply growth injections.">><</replace>><</link>>
	<</if>>
<</if>>
<<if $drugAssets >= 10000>>
	<<if $drugUpgradeInjectionTwo == "unselected">>

The corporation has surplus pharmaceutical fabrication to specialize. Advanced growth injections should be
		<<link "Supermassive">><<set $drugUpgradeInjectionTwo = "supermassive">><<replace "#direction">>
<<print "You directed the corporation to apply supermassive growth injections.">><</replace>><</link>>
		| <<link "Pastoral">><<set $drugUpgradeInjectionTwo = "pastoral">><<replace "#direction">>
<<print "You directed the corporation to apply growth injections focused on milk<<if $seeDicks > 0>> and cum<</if>> production.">><</replace>><</link>>
		| <<link "Not applied">><<set $drugUpgradeInjectionTwo = "none">><<replace "#direction">>
<<print "You directed the corporation not to apply advanced growth injections.">><</replace>><</link>>
	<</if>>
<</if>>


code:
:: Cosmetic Rules Assistant Settings [nobr]

<<set $nextButton to "Back">>
<<set $nextLink to "Rules Assistant">>
<<set $showEncyclopedia to 1>><<set $encyclopedia to "Personal Assistant">>

//Please use the 'no default setting' option to identify areas I should not address.//

__Rule $r Optometry options:__

Eyewear: ''$currentRule.eyewear.''

<<link "No default setting">>
<<set $currentRule.eyewear to "no default setting">>
<<RAChangeEyewear>>
<</link>>
| <<link "Correct with glasses">>
<<set $currentRule.eyewear to "correct with glasses">>
<<RAChangeEyewear>>
<</link>>
| <<link "Correct with contacts">>
<<set $currentRule.eyewear to "correct with contacts">>
<<RAChangeEyewear>>
<</link>>
| <<link "Universal glasses">>
<<set $currentRule.eyewear to "universal glasses">>
<<RAChangeEyewear>>
<</link>>
| <<link "Blur with glasses">>
<<set $currentRule.eyewear to "blur with glasses">>
<<RAChangeEyewear>>
<</link>>
| <<link "Blur with contacts">>
<<set $currentRule.eyewear to "blur with contacts">>
<<RAChangeEyewear>>
<</link>>

__Rule $r Cosmetic options:__

Eye coloring: ''$currentRule.eyeColor.''

<<link "No default eye color setting">>
<<set $currentRule.eyeColor to "no default setting">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Blue">>
<<set $currentRule.eyeColor to "blue">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Black">>
<<set $currentRule.eyeColor to "black">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Brown">>
<<set $currentRule.eyeColor to "brown">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Green">>
<<set $currentRule.eyeColor to "green">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Turquoise">>
<<set $currentRule.eyeColor to "turquoise">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Sky-blue">>
<<set $currentRule.eyeColor to "sky-blue">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Hazel">>
<<set $currentRule.eyeColor to "hazel">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Pale-grey">>
<<set $currentRule.eyeColor to "pale-grey">>
<<RAChangeEyecolor>>
<</link>>
| <<link "White">>
<<set $currentRule.eyeColor to "white">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Pink">>
<<set $currentRule.eyeColor to "pink">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Amber">>
<<set $currentRule.eyeColor to "amber">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Red">>
<<set $currentRule.eyeColor to "red">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Catlike">>
<<set $currentRule.eyeColor to "catlike">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Serpent-like">>
<<set $currentRule.eyeColor to "serpent-like">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Devilish">>
<<set $currentRule.eyeColor to "devilish">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Demonic">>
<<set $currentRule.eyeColor to "demonic">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Hypnotic">>
<<set $currentRule.eyeColor to "hypnotic">>
<<RAChangeEyecolor>>
<</link>>
| <<link "Heart-shaped">>
<<set $currentRule.eyeColor to "heart-shaped">>
<<RAChangeEyecolor>>
<</link>>

Makeup:

''
<<if $currentRule.makeup == 0>>
	makeup-free.
<<elseif $currentRule.makeup == 1>>
	minimal makeup.
<<elseif $currentRule.makeup is 2>>
	luxurious, expensive makeup.
<<elseif $currentRule.makeup is 3>>
	color-coordinated.
<<elseif $currentRule.makeup is 4>>
	garish.
<<else>>
	no default setting.
<</if>>
''

<<link "No default makeup setting">>
<<set $currentRule.makeup to "no default setting">>
<<RAChangeMakeup>>
<</link>>
| <<link "Makeup-free">>
<<set $currentRule.makeup to 0>>
<<RAChangeMakeup>>
<</link>>
| <<link "Nice">>
<<set $currentRule.makeup to 1>>
<<RAChangeMakeup>>
<</link>>
| <<link "Gorgeous">>
<<set $currentRule.makeup to 2>>
<<RAChangeMakeup>>
<</link>>
| <<link "Color-coordinate with hair">>
<<set $currentRule.makeup to 3>>
<<RAChangeMakeup>>
<</link>>
| <<link "Slutty">>
<<set $currentRule.makeup to 4>>
<<RAChangeMakeup>>
<</link>>

Nails:

''
<<if $currentRule.nails == 0>>
	clipped.
<<elseif $currentRule.nails == 1>>
	long and elegant.
<<elseif $currentRule.nails is 2>>
	color-coordinated.
<<elseif $currentRule.nails is 3>>
	sharp and claw-like.
<<elseif $currentRule.nails is 4>>
	bright and glittery.
<<elseif $currentRule.nails is 5>>
	garish.
<<else>>
	no default setting.
<</if>>
''

<<link "No default nails setting">>
<<set $currentRule.nails to "no default setting">>
<<RAChangeNails>>
<</link>>
| <<link "Clipped">>
<<set $currentRule.nails to 0>>
<<RAChangeNails>>
<</link>>
| <<link "Extended">>
<<set $currentRule.nails to 1>>
<<RAChangeNails>>
<</link>>
| <<link "Color-coordinate with hair">>
<<set $currentRule.nails to 2>>
<<RAChangeNails>>
<</link>>
| <<link "Sharp and claw-like">>
<<RAChangeNails>>
<<set $currentRule.nails to 3>>
<</link>>
| <<link "Bright and glittery">>
<<RAChangeNails>>
<<set $currentRule.nails to 4>><</link>>
| <<link "Hooker nails">>
<<RAChangeNails>>
<<set $currentRule.nails to 5>>
<</link>>

Hair color: ''$currentRule.hColor.''

<<link "No default hair color setting">>
<<set $currentRule.hColor to "no default setting">>
<<RAChangeHColor>>
<</link>>
| <<link "Blonde">>
<<set $currentRule.hColor to "blonde">>
<<RAChangeHColor>>
<</link>>
| <<link "Golden">>
<<set $currentRule.hColor to "golden">>
<<RAChangeHColor>>
<</link>>
| <<link "Platinum Blonde">>
<<set $currentRule.hColor to "platinum blonde">>
<<RAChangeHColor>>
<</link>>
| <<link "Strawberry-Blonde">>
<<set $currentRule.hColor to "strawberry-blonde">>
<<RAChangeHColor>>
<</link>>
| <<link "Copper">>
<<set $currentRule.hColor to "copper">>
<<RAChangeHColor>>
<</link>>
| <<link "Ginger">>
<<set $currentRule.hColor to "ginger">>
<<RAChangeHColor>>
<</link>>
| <<link "Red">>
<<set $currentRule.hColor to "red">>
<<RAChangeHColor>>
<</link>>
| <<link "Green">>
<<set $currentRule.hColor to "green">>
<<RAChangeHColor>>
<</link>>
| <<link "Blue">>
<<set $currentRule.hColor to "blue">>
<<RAChangeHColor>>
<</link>>
| <<link "Pink">>
<<set $currentRule.hColor to "pink">>
<<RAChangeHColor>>
<</link>>
| <<link "Dark Brown">>
<<set $currentRule.hColor to "dark brown">>
<<RAChangeHColor>>
<</link>>
| <<link "Brown">>
<<set $currentRule.hColor to "brown">>
<<RAChangeHColor>>
<</link>>
| <<link "Auburn">>
<<set $currentRule.hColor to "auburn">>
<<RAChangeHColor>>
<</link>>
| <<link "Burgundy">>
<<set $currentRule.hColor to "burgundy">>
<<RAChangeHColor>>
<</link>>
| <<link "Chocolate">>
<<set $currentRule.hColor to "chocolate">>
<<RAChangeHColor>>
<</link>>
| <<link "Chestnut">>
<<set $currentRule.hColor to "chestnut">>
<<RAChangeHColor>>
<</link>>
| <<link "Hazel">>
<<set $currentRule.hColor to "hazel">>
<<RAChangeHColor>>
<</link>>
| <<link "Black">>
<<set $currentRule.hColor to "black">>
<<RAChangeHColor>>
<</link>>
| <<link "Grey">>
<<set $currentRule.hColor to "grey">>
<<RAChangeHColor>>
<</link>>
| <<link "Silver">>
<<set $currentRule.hColor to "silver">>
<<RAChangeHColor>>
<</link>>
| <<link "White">>

<<set $currentRule.hColor to "white">>
<<RAChangeHColor>>
<</link>>

Hair style: ''$currentRule.hStyle.''

<<link "No default hair length setting">>
<<set $currentRule.hStyle to "no default setting">>
<<RAChangeHStyle>>
<</link>>
| <<link "Neat">>
<<set $currentRule.hStyle to "neat">>
<<RAChangeHStyle>>
<</link>>
| <<link "Shaved">>
<<set $currentRule.hStyle to "shaved",$currentRule.hLength to 0>>
<<RAChangeHStyle>>
<</link>>
| <<link "Trimmed short">>
<<set $currentRule.hStyle to "trimmed",$currentRule.hLength to 10>>
<<RAChangeHStyle>>
<</link>>
| <<link "Buzzcut">>
<<set $currentRule.hStyle to "buzzcut",$currentRule.hLength to 1>>
<<RAChangeHStyle>>
<</link>>
| <<link "Up">>
<<set $currentRule.hStyle to "up">>
<<RAChangeHStyle>>
<</link>>
| <<link "In a ponytail">>
<<set $currentRule.hStyle to "ponytail">>
<<RAChangeHStyle>>
<</link>>
| <<link "In a bun">>
<<set $currentRule.hStyle to "bun">>
<<RAChangeHStyle>>
<</link>>
| <<link "Curled">>
<<set $currentRule.hStyle to "curls">>
<<RAChangeHStyle>>
<</link>>
| <<link "Permed">>
<<set $currentRule.hStyle to "permed">>
<<RAChangeHStyle>>
<</link>>
| <<link "Luxurious">>
<<set $currentRule.hStyle to "luxurious">>
<<RAChangeHStyle>>
<</link>>
| <<link "Dreadlocks">>
<<set $currentRule.hStyle to "dreadlocks">>
<<RAChangeHStyle>>
<</link>>
| <<link "Cornrows">>
<<set $currentRule.hStyle to "cornrows">>
<<RAChangeHStyle>>
<</link>>
| <<link "Braided">>
<<set $currentRule.hStyle to "braided">>
<<RAChangeHStyle>>
<</link>>
| <<link "In tails">>
<<set $currentRule.hStyle to "tails">>
<<RAChangeHStyle>>
<</link>>
| <<link "Afro">>
<<set $currentRule.hStyle to "afro">>
<<RAChangeHStyle>>
<</link>>
| <<link "Shaved sides">>
<<set $currentRule.hStyle to "strip">>
<<RAChangeHStyle>>
<</link>>

<<if $currentRule.hStyle != "shaved">>

Hair length: ''$currentRule.hLength.''

<<link "No default hair length setting">>
<<set $currentRule.hLength to "no default setting">>
<<RAChangeHLength>>
<</link>>
| <<link "Very short">>
<<set $currentRule.hLength to 5>>
<<RAChangeHLength>>
<</link>>
| <<link "Short">>
<<set $currentRule.hLength to 10>>
<<RAChangeHLength>>
<</link>>
| <<link "Shoulder length">>
<<set $currentRule.hLength to 30>>
<<RAChangeHLength>>
<</link>>
| <<link "Long">>
<<set $currentRule.hLength to 60>>
<<RAChangeHLength>>
<</link>>
| <<link "Very long">>
<<set $currentRule.hLength = 100>>
<<RAChangeHLength>>
<</link>>
| <<link "Floor length">>
<<set $currentRule.hLength to 150>>
<<RAChangeHLength>>
<</link>>

<</if>>

Pubic hair color, when present: ''$currentRule.pubicHColor.''

<<link "No default pubic hair color setting">>
<<set $currentRule.pubicHColor to "no default setting">>
<<RAChangePHColor>>
<</link>>
| <<link "Blonde">>
<<set $currentRule.pubicHColor to "blonde">>
<<RAChangePHColor>>
<</link>>
| <<link "Golden">>
<<set $currentRule.pubicHColor to "golden">>
<<RAChangePHColor>>
<</link>>
| <<link "Platinum Blonde">>
<<set $currentRule.pubicHColor to "platinum blonde">>
<<RAChangePHColor>>
<</link>>
| <<link "Strawberry-Blonde">>
<<set $currentRule.pubicHColor to "strawberry-blonde">>
<<RAChangePHColor>>
<</link>>
| <<link "Copper">>
<<set $currentRule.pubicHColor to "copper">>
<<RAChangePHColor>>
<</link>>
| <<link "Ginger">>
<<set $currentRule.pubicHColor to "ginger">>
<<RAChangePHColor>>
<</link>>
| <<link "Red">>
<<set $currentRule.pubicHColor to "red">>
<<RAChangePHColor>>
<</link>>
| <<link "Green">>
<<set $currentRule.pubicHColor to "green">>
<<RAChangePHColor>>
<</link>>
| <<link "Blue">>
<<set $currentRule.pubicHColor to "blue">>
<<RAChangePHColor>>
<</link>>
| <<link "Pink">>
<<set $currentRule.pubicHColor to "pink">>
<<RAChangePHColor>>
<</link>>
| <<link "Dark Brown">>
<<set $currentRule.pubicHColor to "dark brown">>
<<RAChangePHColor>>
<</link>>
| <<link "Brown">>
<<set $currentRule.pubicHColor to "brown">>
<<RAChangePHColor>>
<</link>>
| <<link "Auburn">>
<<set $currentRule.pubicHColor to "auburn">>
<<RAChangePHColor>>
<</link>>
| <<link "Burgundy">>
<<set $currentRule.pubicHColor to "burgundy">>
<<RAChangePHColor>>
<</link>>
| <<link "Chocolate">>
<<set $currentRule.pubicHColor to "chocolate">>
<<RAChangePHColor>>
<</link>>
| <<link "Chestnut">>
<<set $currentRule.pubicHColor to "chestnut">>
<<RAChangePHColor>>
<</link>>
| <<link "Hazel">>
<<set $currentRule.pubicHColor to "hazel">>
<<RAChangePHColor>>
<</link>>
| <<link "Black">>
<<set $currentRule.pubicHColor to "black">>
<<RAChangePHColor>>
<</link>>
| <<link "Grey">>
<<set $currentRule.pubicHColor to "grey">>
<<RAChangePHColor>>
<</link>>
| <<link "Silver">>
<<set $currentRule.pubicHColor to "silver">>
<<RAChangePHColor>>
<</link>>
| <<link "White">>
<<set $currentRule.pubicHColor to "white">>
<<RAChangePHColor>>
<</link>>

Pubic hair style: ''$currentRule.pubicHStyle.''

<<link "No default pubic hair style setting">>
<<set $currentRule.pubicHStyle to "no default setting">>
<<RAChangePHStyle>>
<</link>>
| <<link "Hairless">>
<<set $currentRule.pubicHStyle to "hairless">>
<<RAChangePHStyle>>
<</link>>
| <<link "Waxed">>
<<set $currentRule.pubicHStyle to "waxed">>
<<RAChangePHStyle>>
<</link>>
| <<link "Landing strip">>
<<set $currentRule.pubicHStyle to "in a strip">>
<<RAChangePHStyle>>
<</link>>
| <<link "Neat">>
<<set $currentRule.pubicHStyle to "neat">>
<<RAChangePHStyle>>
<</link>>
| <<link "Bushy">>
<<set $currentRule.pubicHStyle to "bushy">>
<<RAChangePHStyle>>
<</link>>
| <<link "Bushy in front and clean in back">>
<<set $currentRule.pubicHStyle to "bushy in the front and neat in the rear">>
<<RAChangePHStyle>>
<</link>>

Underarm hair color, when present: ''$currentRule.underArmHColor.''

<<link "No default underarm hair color setting">>
<<set $currentRule.underArmHColor to "no default setting">>
<<RAChangeAHColor>>
<</link>>
| <<link "Blonde">>
<<set $currentRule.underArmHColor to "blonde">>
<<RAChangeAHColor>>
<</link>>
| <<link "Golden">>
<<set $currentRule.underArmHColor to "golden">>
<<RAChangeAHColor>>
<</link>>
| <<link "Platinum Blonde">>
<<set $currentRule.underArmHColor to "platinum blonde">>
<<RAChangeAHColor>>
<</link>>
| <<link "Strawberry-Blonde">>
<<set $currentRule.underArmHColor to "strawberry-blonde">>
<<RAChangeAHColor>>
<</link>>
| <<link "Copper">>
<<set $currentRule.underArmHColor to "copper">>
<<RAChangeAHColor>>
<</link>>
| <<link "Ginger">>
<<set $currentRule.underArmHColor to "ginger">>
<<RAChangeAHColor>>
<</link>>
| <<link "Red">>
<<set $currentRule.underArmHColor to "red">>
<<RAChangeAHColor>>
<</link>>
| <<link "Green">>
<<set $currentRule.underArmHColor to "green">>
<<RAChangeAHColor>>
<</link>>
| <<link "Blue">>
<<set $currentRule.underArmHColor to "blue">>
<<RAChangeAHColor>>
<</link>>
| <<link "Pink">>
<<set $currentRule.underArmHColor to "pink">>
<<RAChangeAHColor>>
<</link>>
| <<link "Dark Brown">>
<<set $currentRule.underArmHColor to "dark brown">>
<<RAChangeAHColor>>
<</link>>
| <<link "Brown">>
<<set $currentRule.underArmHColor to "brown">>
<<RAChangeAHColor>>
<</link>>
| <<link "Auburn">>
<<set $currentRule.underArmHColor to "auburn">>
<<RAChangeAHColor>>
<</link>>
| <<link "Burgundy">>
<<set $currentRule.underArmHColor to "burgundy">>
<<RAChangeAHColor>>
<</link>>
| <<link "Chocolate">>
<<set $currentRule.underArmHColor to "chocolate">>
<<RAChangeAHColor>>
<</link>>
| <<link "Chestnut">>
<<set $currentRule.underArmHColor to "chestnut">>
<<RAChangeAHColor>>
<</link>>
| <<link "Hazel">>
<<set $currentRule.underArmHColor to "hazel">>
<<RAChangeAHColor>>
<</link>>
| <<link "Black">>
<<set $currentRule.underArmHColor to "black">>
<<RAChangeAHColor>>
<</link>>
| <<link "Grey">>
<<set $currentRule.underArmHColor to "grey">>
<<RAChangeAHColor>>
<</link>>
| <<link "Silver">>
<<set $currentRule.underArmHColor to "silver">>
<<RAChangeAHColor>>
<</link>>
| <<link "White">>
<<set $currentRule.underArmHColor to "white">>
<<RAChangeAHColor>>
<</link>>

<<if ndef $currentRule.underArmHStyle>>
<<set $currentRule.underArmHStyle to "no default setting">>
<</if>>
Underarm hair style: ''$currentRule.underArmHStyle.''

<<link "No default underarm hair style setting">>
<<set $currentRule.underArmHStyle to "no default setting">>
<<RAChangeAHStyle>>
<</link>>
| <<link "Hairless">>
<<set $currentRule.underArmHStyle to "hairless">>
<<RAChangeAHStyle>>
<</link>>
| <<link "Waxed">>
<<set $currentRule.underArmHStyle to "waxed">>
<<RAChangeAHStyle>>
<</link>>
| <<link "Landing strip">>
<<set $currentRule.underArmHStyle to "shaved">>
<<RAChangeAHStyle>>
<</link>>
| <<link "Neat">>
<<set $currentRule.underArmHStyle to "neat">>
<<RAChangeAHStyle>>
<</link>>
| <<link "Bushy">>
<<set $currentRule.underArmHStyle to "bushy">>
<<RAChangeAHStyle>>
<</link>>

repo_name: DankWolf/fc


code:
:: Costs [nobr]

<<set $costs to ($brothel*$facilityCost)+($arcade*$facilityCost*0.5)+($club*$facilityCost)+($dairy*$facilityCost)+($incubator*$facilityCost*10)>>

<<set $costs += (0.2*$brothelUpgradeDrugs*$brothel*$facilityCost)+(0.2*$arcadeUpgradeInjectors*$arcade*$facilityCost)+(0.2*$arcadeUpgradeCollectors*$arcade*$facilityCost)+(0.2*$clubUpgradePDAs*$club*$facilityCost)+(0.2*$dairyFeedersUpgrade*$dairy*$facilityCost)+(0.1*$dairyPregUpgrade*$dairy*$facilityCost)+(0.2*$dairyStimulatorsUpgrade*$facilityCost)+(0.2*$servantsQuartersUpgradeMonitoring*$servantsQuarters*$facilityCost)+(0.2*$incubatorUpgradeWeight*$incubator*$facilityCost)+(0.2*$incubatorUpgradeMuscles*$incubator*$facilityCost)+(0.2*$incubatorUpgradeReproduction*$incubator*$facilityCost)+(0.5*$incubatorUpgradeSpeed*$incubator*$facilityCost)>>

<<if $dairy > 0>>
	<<set $costs += ($bioreactorsXY+$bioreactorsXX+$bioreactorsHerm+$bioreactorsBarren)*100>>
<</if>>

<<if $brothel > 0>>
	<<set $costs += $brothelAdsSpending>>
<</if>>
<<if $club > 0>>
	<<set $costs += $clubAdsSpending>>
<</if>>

<<if $incubator > 0>>
	<<set $costs += ($incubatorWeightSetting+$incubatorMusclesSetting+$incubatorReproductionSetting)*500>>
<</if>>

<<if ($masterSuitePregnancySlaveLuxuries == 1)>>
	<<set $costs += 500>>
<</if>>
<<if ($masterSuitePregnancyFertilitySupplements == 1)>>
	<<set $costs += 1000>>
<</if>>

<<set $costs += ($girls*(250+($economy*500)))>>

<<if $arcologies[0].FSRepopulationFocusLaw == 1 && $PC.preg > 4>>
	<<set $costs -= 500>>
<</if>>

<<if ($PC.career is "mercenary") || ($PC.career is "arcology owner")>>
	<<set $costs += ($mercenaries*500)>>
<<else>>
	<<set $costs += ($mercenaries*1000)>>
<</if>>

<<set $costs += $FSSpending>>

<<for $i to 0; $i < $slaves.length; $i++>>

<<if $slaves[$i].livingRules is "luxurious">>
	<<if $slaves[$i].relationship >= 4>>
	<<set $costs += ($rulesCost*3)>>
	<<else>>
	<<set $costs += ($rulesCost*4)>>
	<</if>>
<<elseif $slaves[$i].livingRules is "normal">>
	<<set $costs += ($rulesCost*2)>>
<<else>>
	<<set $costs += $rulesCost>>
<</if>>

<<set $costs += $foodCost*4>>
<<switch $slaves[$i].diet>>
<<case "fattening" "muscle building">>
	<<set $costs += $foodCost>>
<<case "restricted" "slimming">>
	<<set $costs -= $foodCost>>
<</switch>>
<<if $slaves[$i].weight > 50>>
	<<set $costs += $foodCost>>
<<elseif $slaves[$i].weight < -50>>
	<<set $costs -= $foodCost>>
<</if>>
<<if $slaves[$i].lactation > 0>>
	<<set $costs += $foodCost*$slaves[$i].lactation*(1+Math.trunc($slaves[$i].boobs/10000))>>
<</if>>
<<if $slaves[$i].preg > 5>>
	<<if $slaves[$i].assignment == "work in the dairy" && $dairyFeedersSetting > 0>>
	<<elseif ($slaves[$i].assignment == "serve in the master suite" || $slaves[$i].assignment == "be your concubine") && $masterSuiteUpgradePregnancy == 1>>
	<<else>>
		<<if $slaves[$i].pregControl == "speed up">>
			<<set $costs += $foodCost*$slaves[$i].pregType*3>>
		<<else>>
			<<set $costs += $foodCost*$slaves[$i].pregType>>
		<</if>>
	<</if>>
<</if>>

<<if ($slaves[$i].diet == "XX") || ($slaves[$i].diet == "XY")>>
	<<set $costs += 25>>
<<elseif ($slaves[$i].diet == "XXY")>>
	<<set $costs += 75>>
<</if>>

<<if $boobAccessibility != 1>>
	<<if ($slaves[$i].boobs > 7500)>>
	<<if ($slaves[$i].assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
	<<set $costs += 50>>
	<</if>>
	<</if>>
<</if>>

<<if $pregAccessibility != 1>>
	<<if ($slaves[$i].preg > 30 && $slaves[$i].pregType >= 2) || ($slaves[$i].preg > 20 and $slaves[$i].pregType >= 10) || ($slaves[$i].preg > 10 and $slaves[$i].pregType >= 20) || $slaves[$i].bellyImplant >= 10000>>
	<<if ($slaves[$i].assignment != "labor in the production line")>>
	<<set $Costs += 100>>
	<</if>>
	<</if>>
<</if>>

<<if $dickAccessibility != 1>>
	<<if ($slaves[$i].dick > 45)>>
	<<set $costs += 50>>
	<</if>>
<</if>>

<<if $ballsAccessibility != 1>>
	<<if ($slaves[$i].balls > 90)>>
	<<set $costs += 50>>
	<</if>>
<</if>>

<<if $buttAccessibility != 1>>
	<<if ($slaves[$i].butt > 15)>>
	<<set $costs += 50>>
	<</if>>
<</if>>

<<if $slaves[$i].boobs > 10000>>
<<if $slaves[$i].boobsImplantType == 1>>
	<<set $costs += 50>>
<</if>>
<</if>>
<<if $slaves[$i].butt > 10>>
<<if $slaves[$i].buttImplantType == 1>>
	<<set $costs += 50>>
<</if>>
<</if>>

<<if $slaves[$i].preg > 25>>
<<if $slaves[$i].universalRulesBirthing == 1>>
	<<set $costs += 50>>
<</if>>
<</if>>

<<if $CitizenRetirement == 1>>
	<<set $costs += 250>>
<</if>>

<<if ($slaves[$i].assignment is "be a servant") || ($slaves[$i].assignment is "work as a servant")>>
	<<if $slaves[$i].trust < -20>>
		<<set $costs -= ($rulesCost*4)>>
	<<elseif $slaves[$i].devotion < -20>>
		<<set $costs -= ($rulesCost*2)>>
	<<elseif $slaves[$i].devotion <= 20>>
		<<set $costs -= ($rulesCost*3)>>
	<<elseif $slaves[$i].devotion <= 50>>
		<<set $costs -= ($rulesCost*4)>>
	<<else>>
		<<set $costs -= ($rulesCost*5)>>
	<</if>>
	<<if ($slaves[$i].fetish is "submissive")>>
		<<set $costs -= ($rulesCost)>>
	<<elseif ($slaves[$i].fetish is "dom")>>
		<<set $costs += ($rulesCost)>>
	<</if>>
	<<if ($slaves[$i].relationship < -1)>>
		<<set $costs -= ($rulesCost)>>
	<</if>>
	<<if ($slaves[$i].energy < 20)>>
		<<set $costs -= ($rulesCost)>>
	<<elseif ($slaves[$i].energy < 40)>>
		<<set $costs -= ($rulesCost/2)>>
	<</if>>
	<<if ($slaves[$i].lactation > 0)>>
		<<set $costs -= 25>>
	<</if>>
<</if>>

<<if ($slaves[$i].amp != 0)>>
  <<if ($slaves[$i].amp == 1)>>
	<<set $costs += $rulesCost>>
  <<else>>
	<<set $costs += $rulesCost/2>>
  <</if>>
<<elseif !canWalk($slaves[$i])>>
  <<set $costs += $rulesCost>>
<</if>>

<<if !canSee($slaves[$i])>>
	<<set $costs += 50>>
<<elseif $slaves[$i].eyes <= -1>>
	<<if $slaves[$i].eyewear != "corrective glasses">>
	<<if $slaves[$i].eyewear != "corrective contacts">>
	<<set $costs += 25>>
	<</if>>
	<</if>>
<<elseif ($slaves[$i].eyewear is "blurring glasses") || ($slaves[$i].eyewear is "blurring contacts")>>
	<<set $costs += 25>>
<</if>>

<<if ($servantsQuartersUpgradeMonitoring == 1)>>
	<<if ($slaves[$i].assignment is "work as a servant")>>
	<<set $costs -= ($rulesCost)>>
	<</if>>
<</if>>

<<if ($slaves[$i].inflation == 3)>>
	<<if ($slaves[$i].inflationType == "water")>>
		<<set $costs += 100>>
	<</if>>
<<elseif ($slaves[$i].inflation == 2)>>
	<<if ($slaves[$i].inflationType == "water")>>
		<<set $costs += 50>>
	<</if>>
<<elseif ($slaves[$i].inflation == 1)>>
	<<if ($slaves[$i].inflationType == "water")>>
		<<set $costs += 25>>
	<</if>>
<</if>>

<<if ($slaves[$i].drugs is "female hormone injections") || ($slaves[$i].drugs is "male hormone injections")>>
	<<set $costs += ($drugsCost*5)>>
<<elseif ($slaves[$i].drugs is "anti-aging cream")>>
	<<set $costs += ($drugsCost*10)>>
<<elseif ($slaves[$i].drugs != "no drugs")>>
	<<set $costs += ($drugsCost*2)>>
<</if>>
<<if ($slaves[$i].curatives > 0)>>
	<<set $costs += $drugsCost+($slaves[$i].curatives*$drugsCost)>>
<<elseif ndef $slaves[$i].curatives>>
	<<set $slaves[$i].curatives to 0>>
<</if>>
<<if ($slaves[$i].aphrodisiacs > 0)>>
	<<set $costs += $drugsCost*$slaves[$i].aphrodisiacs>>
<<elseif ndef $slaves[$i].aphrodisiacs>>
	<<set $slaves[$i].aphrodisiacs to 0>>
<</if>>

<<set $costs += $drugsCost*Math.abs($slaves[$i].hormones)*0.5>>

<<if ($slaves[$i].preg == -1) && isFertile($slaves[$i])>>
	<<set $costs += $drugsCost*0.5>>
<</if>>

<<if ($studio == 1)>>
	<<set $costs += $slaves[$i].pornFameSpending>>
<</if>>

<</for>>

<<if $Recruiter != 0>>
	<<set $costs += 250>>
<</if>>
<<if $TSS.schoolPresent == 1>>
	<<set $costs += 1000>>
<</if>>
<<if $GRI.schoolPresent == 1>>
	<<set $costs += 1000>>
<</if>>
<<if $SCP.schoolPresent == 1>>
	<<set $costs += 1000>>
<</if>>
<<if $LDE.schoolPresent == 1>>
	<<set $costs += 1000>>
<</if>>
<<if $TGA.schoolPresent == 1>>
	<<set $costs += 1000>>
<</if>>
<<if
($TFS.schoolPresent == 1) && (($PC.dick == 0) || ($PC.vagina == 0) || ($PC.boobs == 0))>>
	<<set $costs += 1000>>
<</if>>
<<if $TSS.subsidize != 0>>
	<<set $costs += 1000>>
<</if>>
<<if $GRI.subsidize != 0>>
	<<set $costs += 1000>>
<</if>>
<<if $SCP.subsidize != 0>>
	<<set $costs += 1000>>
<</if>>
<<if $LDE.subsidize != 0>>
	<<set $costs += 1000>>
<</if>>
<<if $TGA.subsidize != 0>>
	<<set $costs += 1000>>
<</if>>
<<if $TFS.subsidize != 0>>
	<<set $costs += 1000>>
<</if>>

<<if $alwaysSubsidizeGrowth == 1>>
	<<set $costs += $policyCost>>
<</if>>
<<if $alwaysSubsidizeRep == 1>>
	<<set $costs += $policyCost>>
<</if>>

<<if $ProImmigrationCash == 1>>
	<<set $costs += $policyCost>>
<</if>>
<<if $AntiEnslavementCash == 1>>
	<<set $costs += $policyCost>>
<</if>>

<<if $CoursingAssociation == 1>>
	<<set $costs += 1000>>
<</if>>

<<if $PC.preg == -1>>
	<<set $costs += 25>>
<<elseif $PC.preg >= 16>>
	<<set $costs += 100>>
<</if>>

<<if $PC.career is "servant">>
	<<if $personalAttention == "upkeep">>
		<<if $PC.preg >= 20>>
			<<set $costs = ($costs*0.80)>>
		<<else>>
			<<set $costs = ($costs*0.75)>>
		<</if>>
	<<else>>
	<<set $costs = ($costs*0.90)>>
	<</if>>
<</if>>

<<if $costs < 0>>
	<<set $costs to 0>>
<<else>>
	<<set $costs = Math.trunc($costs)>>
<</if>>


code:
:: Costs Report

<<set $nextButton to "Back to Main">>\
<<set $nextLink to "Main">>\
\
//Your weekly costs are as follows.//
<<nobr>>

<<if $girls is 3>>
	Since you are accustomed to luxury, your __personal living expenses__ are ¤<<print ($girls*(250+($economy*500)))>>.
<<elseif $girls is 2>>
	Since you are used to living well, your __personal living expenses__ are ¤<<print ($girls*(250+($economy*500)))>>.
<<else>>
	Since you are used to a fairly normal life, your __personal living expenses__ are ¤<<print ($girls*(250+($economy*500)))>>.
<</if>>

<<if $arcologies[0].FSRepopulationFocusLaw == 1 && $PC.preg > 4>>

Rent promotion for being a pregnant citizen under ''Universal Pregnancy Subsidy:'' ¤500>>
<</if>>

<<if $PC.preg == -1>>

Your Contraceptives expenses: ¤25>>
<<elseif $PC.preg >= 16>>

Increased living expenses due to being pregnant : ¤100>>
<</if>>
<<if $mercenaries > 0>>
	<<if ($PC.career is "mercenary") || ($PC.career is "arcology owner")>>

__Mercenary__ expenses: ¤<<print ($mercenaries*500)>> //Reduced by your @@color:springgreen;mercenary contacts@@//
	<<else>>

__Mercenary__ expenses: ¤<<print ($mercenaries*1000)>>
	<</if>>
<</if>>
<<if $brothel > 0>>
	<<set $seed to 0>>
	<<if $brothel > 0>>
		<<set $seed to $brothelAdsSpending>>
	<</if>>

__Brothel__ maintenance: ¤<<print ($brothel*$facilityCost)+(0.2*$brothelUpgradeDrugs*$brothel*$facilityCost)>>
<</if>>
<<if $club > 0>>
	<<set $seed to 0>>
	<<if $club > 0>>
		<<set $seed to $clubAdsSpending>>
	<</if>>

__Club__ maintenance: ¤<<print ($club*$facilityCost)+(0.2*$clubUpgradePDAs*$club*$facilityCost)>>
<</if>>
<<if $arcade > 0>>

__Arcade__ maintenance: ¤<<print (0.5*$arcade*$facilityCost)+(0.2*$arcadeUpgradeInjectors*$arcade*$facilityCost)+(0.2*$arcadeUpgradeCollectors*$arcade*$facilityCost)>>
<</if>>
<<if $dairy > 0>>

__Dairy__ maintenance: ¤<<print ($dairy*$facilityCost)+(0.2*$dairyFeedersUpgrade*$dairy*$facilityCost)+(0.1*$dairyPregUpgrade*$dairy*$facilityCost)>>
	<<if $bioreactorsXY+$bioreactorsXX+$bioreactorsHerm+$bioreactorsBarren > 0>>

    Additional maintenance for milking machines upgraded with biological components: ¤<<print ($bioreactorsXY+$bioreactorsXX+$bioreactorsHerm+$bioreactorsBarren)*100>>
	<</if>>
<</if>>
<<if $collectionFacility > 0>>

__Collection Facility__ maintenance: ¤<<print ($collectionFacility*$facilityCost)+(0.2*$dairyStimulatorsUpgrade*$collectionFacility*$facilityCost)+(0.2*$collectionFacilityUpgradeMilkers*$collectionFacility*$facilityCost)>>
<</if>>
<<if ($servantsQuarters > 0) && ($servantsQuartersUpgradeMonitoring > 0)>>

__Servants' Quarters__ maintenance: ¤<<print (0.2*$servantsQuartersUpgradeMonitoring*$servantsQuarters*$facilityCost)>>
<</if>>
<<if $incubator > 0>>

__Incubation Facility__ maintenance and resource drain: ¤<<print (10*$incubator*$facilityCost)+(0.2*$incubatorUpgradeWeight*$incubator*$facilityCost)+(0.2*$incubatorUpgradeMuscles*$incubator*$facilityCost)+(0.2*$incubatorUpgradeReproduction*$incubator*$facilityCost)+(0.5*$incubatorUpgradeSpeed*$incubator*$facilityCost)>>
	<<if $incubatorWeightSetting+$incubatorMusclesSetting+$incubatorReproductionSetting > 0>>

    Additional monitoring and maintenance costs for growing children: ¤<<print (($incubatorWeightSetting+$incubatorMusclesSetting+$incubatorReproductionSetting)*500)>>
	<</if>>
<</if>>
<<if ($masterSuiteUpgradePregnancy == 1)>>

__Master Suite__ maintenance: ¤<<print ((500*$masterSuiteUpgradePregnancy) + (1000*$masterSuitePregnancyFertilitySupplements))>>
<</if>>
<<if $FSSpending != 0>>

__Society Shaping__ expenses: ¤$FSSpending
<</if>>
<<if $Recruiter != 0>>

__Recruiting__ expenses: ¤250
<</if>>
<<if $TSS.schoolPresent == 1>>

__The Slavegirl School__ branch campus upkeep: ¤1000
<</if>>
<<if $GRI.schoolPresent == 1>>

__Growth Research Institute__ subsidiary lab upkeep: ¤1000
<</if>>
<<if $SCP.schoolPresent == 1>>

__St. Claver Preparatory__ branch campus upkeep: ¤1000
<</if>>
<<if $LDE.schoolPresent == 1>>

__L'Encole des Enculees__ branch campus upkeep: ¤1000
<</if>>
<<if $TGA.schoolPresent == 1>>

__The Gymnasium-Academy__ branch campus upkeep: ¤1000
<</if>>
<<if ($TFS.schoolPresent == 1) && (($PC.dick == 0) || ($PC.vagina == 0) || ($PC.boobs == 0))>>

__The Futanari Sisters__ community upkeep: ¤1000
<</if>>
<<if $TSS.subsidize != 0>>

__The Slavegirl School__ branch campus influence: ¤1000
<</if>>
<<if $GRI.subsidize != 0>>

__Growth Research Institute__ subsidiary lab influence: ¤1000
<</if>>
<<if $SCP.subsidize != 0>>

__St. Claver Preparatory__ branch campus influence: ¤1000
<</if>>
<<if $LDE.subsidize != 0>>

__L'Encole des Enculees__ branch campus influence: ¤1000
<</if>>
<<if $TGA.subsidize != 0>>

__The Gymnasium-Academy__ branch campus influence: ¤1000
<</if>>
<<if $TFS.subsidize != 0>>

__The Futanari Sisters__ community influence: ¤1000
<</if>>

<<if $alwaysSubsidizeGrowth == 1>>

Weekly arcology growth subsidy: ¤$policyCost
<</if>>
<<if $alwaysSubsidizeRep == 1>>

Weekly self-promotion budget: $policyCost
<</if>>

<<if $ProImmigrationCash == 1>>

Pro-immigration promotion budget: $policyCost
<</if>>
<<if $AntiEnslavementCash == 1>>

Anti-enslavement charity budget: $policyCost
<</if>>

<<if $CoursingAssociation == 1>>

Coursing Association membership: ¤1000
<</if>>

<<for $i to 0; $i < $slaves.length; $i++>>
	<<set $individualCosts to 0>>
	''$slaves[$i].slaveName'':
	<<if $slaves[$i].livingRules is "luxurious">>
	<<if $slaves[$i].relationship >= 4>>

    Living expenses: ¤<<print ($rulesCost*3)>>
		<<set $individualCosts += ($rulesCost*3)>>
	<<else>>

    Living expenses: ¤<<print ($rulesCost*4)>>
		<<set $individualCosts += ($rulesCost*4)>>
	<</if>>
	<<elseif $slaves[$i].livingRules is "normal">>

    Living expenses: ¤<<print ($rulesCost*2)>>
		<<set $individualCosts += ($rulesCost*2)>>
	<<else>>

    Living expenses: ¤<<print ($rulesCost)>>
		<<set $individualCosts += $rulesCost>>
	<</if>>

    Basic slave food cost: ¤<<print $foodCost*4>>
	<<set $individualCosts += $foodCost*4>>
	<<switch $slaves[$i].diet>>
	<<case "fattening" "muscle building">>

    Heavy diet: ¤<<print $foodCost>>
		<<set $individualCosts += $foodCost>>
	<<case "restricted" "slimming">>

    Light diet: //reduced by// ¤<<print $foodCost>>
		<<set $individualCosts -= $foodCost>>
	<</switch>>
	<<if $slaves[$i].weight > 50>>

    Caloric adjustment for heavy weight: ¤<<print $foodCost>>
		<<set $individualCosts += $foodCost>>
	<<elseif $slaves[$i].weight < -50>>

    Caloric adjustment for light weight: //reduced by// ¤<<print $foodCost>>
		<<set $individualCosts -= $foodCost>>
	<</if>>
	<<if $slaves[$i].lactation > 0>>
	<<set $individualCosts += $foodCost>>
	<<if $slaves[$i].lactation > 0>>

    Food to support
		<<if $slaves[$i].lactation > 1>>heavy<<else>>natural<</if>> lactation from
		<<if Math.trunc($slaves[$i].boobs/10000) > 2>>absurd udders<<elseif Math.trunc($slaves[$i].boobs/10000) > 1>>enormous boobs<<else>>reasonable breasts<</if>>:
		¤<<print $foodCost*$slaves[$i].lactation*(1+Math.trunc($slaves[$i].boobs/10000))>>
		<<set $individualCosts += $foodCost*$slaves[$i].lactation*(1+Math.trunc($slaves[$i].boobs/10000))>>
	<</if>>
	<</if>>
	<<if $slaves[$i].preg > 5>>
		<<if $slaves[$i].assignment == "work in the dairy" && $dairyFeedersSetting > 0>>

    Extra feeding costs to support pregnancy are covered by dairy feeders.
		<<elseif ($slaves[$i].assignment == "serve in the master suite" || $slaves[$i].assignment == "be your concubine") && $masterSuiteUpgradePregnancy == 1>>

    Extra feeding costs to support pregnancy are covered by $masterSuiteName luxuries.
		<<else>>
			<<set _pAccMult = 1>>

    Extra feeding to support <<if $slaves[$i].pregControl == "speed up">>accelerated <<set _pAccMult = 3>><</if>>pregnancy: ¤<<print $foodCost*$slaves[$i].pregType*_pAccMult>>
			<<set $individualCosts += $foodCost*$slaves[$i].pregType*_pAccMult>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].diet == "XX") || ($slaves[$i].diet == "XY")>>

    Hormone enriched diet: ¤25
		<<set $individualCosts += 25>>
	<<elseif ($slaves[$i].diet == "XXY")>>

    Specialized hermaphrodite diet: ¤75
		<<set $individualCosts += 75>>
	<</if>>
	<<if $boobAccessibility != 1>>
	<<if ($slaves[$i].boobs > 7500)>>
	<<if ($slaves[$i].assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>

    Increased living expenses due to inconveniently huge boobs: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<</if>>
	<<if $pregAccessibility != 1>>
	<<if ($slaves[$i].preg > 30 && $slaves[$i].pregType >= 2) || ($slaves[$i].preg > 20 && $slaves[$i].pregType >= 10) || ($slaves[$i].preg > 10 && $slaves[$i].pregType >= 20) || $slaves[$i].bellyImplant >= 10000>>
	<<if ($slaves[$i].assignment != "labor in the production line")>>

    Increased living expenses due to an inconveniently huge belly: ¤100
	  <<set $individualCosts += 100>>
	<</if>>
	<</if>>
	<</if>>
	<<if $dickAccessibility != 1>>
	<<if ($slaves[$i].dick > 45)>>

    Increased living expenses due to an inconveniently huge penis: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<<if $ballsAccessibility != 1>>
	<<if ($slaves[$i].balls > 90)>>

    Increased living expenses due to inconveniently huge balls: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<<if $buttAccessibility != 1>>
	<<if ($slaves[$i].butt > 15)>>

    Increased living expenses due to an inconveniently huge butt: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<<if !canSee($slaves[$i])>>

    Increased living expenses due to lack of sight: ¤50
		<<set $individualCosts += 50>>
	<<elseif $slaves[$i].eyes <= -1>>

    Increased living expenses due to poor vision: ¤25
		<<set $individualCosts += 25>>
	<<elseif ($slaves[$i].eyewear is "blurring glasses") || ($slaves[$i].eyewear is "blurring contacts")>>

    Increased living expenses due to blurred vision: ¤25
		<<set $individualCosts += 25>>
	<</if>>
	<<if ($slaves[$i].amp != 0)>>
	  <<if ($slaves[$i].amp == 1)>>

    Increased living expenses due to limblessness: ¤$rulesCost
		<<set $individualCosts += $rulesCost>>
	  <<else>>

    Increased living expenses due to prosthetics: ¤<<print $rulesCost/2>>
		<<set $individualCosts += $rulesCost/2>>
	  <</if>>
	<<elseif !canWalk($slaves[$i])>>

    Increased living expenses due to immobility: ¤<<print $rulesCost>>
	  <<set $individualCosts += $rulesCost>>
	<</if>>
	<<if $slaves[$i].boobs > 10000>>
	<<if $slaves[$i].boobsImplantType == 1>>

    Maintenance cost for oversized string implants: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<<if $slaves[$i].butt > 10>>
	<<if $slaves[$i].buttImplantType == 1>>

    Maintenance cost for oversized string implants: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<<if $slaves[$i].preg > 25>>
	<<if $slaves[$i].universalRulesBirthing == 1>>

    Coverage cost for daily pregnancy scanning: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<</if>>
	<<if $CitizenRetirement == 1>>

    Retirement account payments: ¤250
	<<set $individualCosts += 250>>
	<</if>>
	<<if ($slaves[$i].inflation == 3)>>
	<<if ($slaves[$i].inflationType == "water")>>

    Costs of specially formulated water for enemas; 2 gallons: ¤100
		<<set $individualCosts += 100>>
	<</if>>
	<<elseif ($slaves[$i].inflation == 2)>>
	<<if ($slaves[$i].inflationType == "water")>>

    Costs of specially formulated water for enemas; 1 gallon: ¤50
		<<set $individualCosts += 50>>
	<</if>>
	<<elseif ($slaves[$i].inflation == 1)>>
	<<if ($slaves[$i].inflationType == "water")>>

    Costs of specially formulated water for enemas; 2 liters: ¤25
		<<set $individualCosts += 25>>
	<</if>>
	<</if>>
	<<if ($slaves[$i].drugs is "anti-aging cream")>>

    Anti-aging creams: ¤<<print ($drugsCost*10)>>
	<<elseif ($slaves[$i].drugs is "female hormone injections") || ($slaves[$i].drugs is "male hormone injections")>>

    Hormonal injections: ¤<<print ($drugsCost*5)>>
		<<set $individualCosts += ($drugsCost*3)>>
	<<elseif ($slaves[$i].drugs != "no drugs")>>

    Standard drugs: ¤<<print ($drugsCost*2)>>
		<<set $individualCosts += ($drugsCost*2)>>
	<</if>>
	<<if ($slaves[$i].curatives > 0)>>

    Health drugs: ¤<<print $drugsCost+($slaves[$i].curatives*$drugsCost)>>
		<<set $individualCosts += $drugsCost+($slaves[$i].curatives*$drugsCost)>>
	<</if>>
	<<if ($slaves[$i].aphrodisiacs > 0)>>

    Aphrodisiacs: ¤<<print ($drugsCost*$slaves[$i].aphrodisiacs)>>
		<<set $individualCosts += $drugsCost*$slaves[$i].aphrodisiacs>>
	<</if>>
	<<if ($slaves[$i].hormones != 0)>>

    Hormones: ¤<<print (Math.trunc($drugsCost*Math.abs($slaves[$i].hormones)*0.5))>>
		<<set $individualCosts += Math.trunc($drugsCost*Math.abs($slaves[$i].hormones)*0.5)>>
	<</if>>
	<<if ($slaves[$i].preg == -1) && isFertile($slaves[$i])>>

    Contraceptives: ¤<<print (Math.trunc($drugsCost*0.5))>>
		<<set $individualCosts += Math.trunc($drugsCost*0.5)>>
	<</if>>
	<<if ($studio == 1)>>
	<<if ($slaves[$i].pornFameSpending > 0)>>

    Publicity: ¤$slaves[$i].pornFameSpending
		<<set $individualCosts += $slaves[$i].pornFameSpending>>
	<</if>>
	<</if>>

        __Total__: ¤<<print ($individualCosts)>>

<</for>>

<<if $PC.career is "servant">>

Using your prior experience, you managed to lower your home's upkeep by <<if $personalAttention == "upkeep">><<if $PC.preg >= 20>>20%<<else>>25%<</if>><<else>>10%<</if>>.
<</if>>

<</nobr>>


code:
:: Coursing Association

<<nobr>>
<<set $nextButton to "Back to Main">>
<<set $nextLink to "Main">>
<<set $returnTo to "Coursing Association">>

You are a member of $arcologies[0].name's Coursing Association. Coursing is a Free Cities revival of the old sport of hunting rabbits and hares with sighthounds, with the typically Free Cities amendments that the hares are replaced by newly enslaved people, the sighthounds are replaced by trained slaves, and the killing of the hare is replaced by rape. Truly, a sport of gentlemen.

The chasing slaves are known as lurchers, the term once used for the sighthounds. They require speed most of all, but must also be able to tackle their quarry; lurchers with the ability and willingness to make a spectacle of molesting the hares can improve their owners' reputations.

<<if $Lurcher != 0>>
	$Lurcher.slaveName is assigned to compete as your lurcher.
<<else>>
	You have not selected a lurcher, meaning that you will not participate in coursing events.
<</if>>
//
<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, slaves assigned here can continue their usual duties.//

<<if $Lurcher != 0>>

''Fire your Lurcher:''
	<<set $Flag to 1>>
	<<include "Slave Summary">>
<</if>>

''Select a slave to course as a Lurcher:''
<<set $Flag to 0>>
<<include "Slave Summary">>
<<unset $Flag>>

<</nobr>>


code:
:: Custom Slave

<<set $nextButton to "Back">>\
<<set $nextLink to "Buy Slaves">>\
<<set $returnTo to "Buy Slaves">>\
<<set $showEncyclopedia to 1>><<set $encyclopedia to "Kidnapped Slaves">>\
<<if ($customSlave.dick == 0) && ($customSlave.vagina is -1)>><<set $customSlave.vagina to 0>><</if>>\
\
<<if $customSlaveOrdered == 0>>You work up a new slave order for posting where slave merchants can work to fulfill it.<<else>>You review your posted slave order.<</if>> <<if $assistant == 1>>As you work, $assistantName makes lewd comments about what she looks forward to doing to this new slave. <</if>>Your order requests a slave with the following characteristics:

<<nobr>>

<<if $customSlave.actualAge < 5>>3-4 years old.
<<elseif $customSlave.actualAge < 7>>5-6 years old.
<<elseif $customSlave.actualAge < 10>>7-9 years old.
<<elseif $customSlave.actualAge < 13>>10-12 years old.
<<elseif $customSlave.actualAge < 15>>13-14 years old.
<<elseif $customSlave.actualAge < 18>>15-17 years old.
<<elseif $customSlave.actualAge < 20>>18-19 years old.
<<elseif $customSlave.actualAge < 30>>20-29 years old.
<<elseif $customSlave.actualAge < 40>>30-39 years old.
<<else>>40+ years old.
<</if>>

<<if $minimumSlaveAge <= 3>>
<<link "3-4">>
	<<set $customSlave.actualAge to random(3,4)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<</if>>
<<if $minimumSlaveAge <= 5>>
<<link "5-6">>
	<<set $customSlave.actualAge to random(5,6)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<</if>>
<<if $minimumSlaveAge <= 7>>
<<link "7-9">>
	<<set $customSlave.actualAge to random(7,9)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<</if>>
<<if $minimumSlaveAge <= 10>>
<<link "10-12">>
	<<set $customSlave.actualAge to random(10,12)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<</if>>
<<if $minimumSlaveAge <= 13>>
<<link "13-14">>
	<<set $customSlave.actualAge to random(13,14)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<</if>>
<<if $minimumSlaveAge <= 15>>
<<link "15-17">>
	<<set $customSlave.actualAge to random(15,17)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<</if>>
<<link "18-19">>
	<<set $customSlave.actualAge to random(18,19)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<<link "20-29">>
	<<set $customSlave.actualAge to random(20,29)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<<link "30-39">>
	<<set $customSlave.actualAge to random(30,39)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
|
<<link "40+">>
	<<set $customSlave.actualAge to random(40,42)>>
	<<set $customSlave.physicalAge to $customSlave.actualAge>>
	<<set $customSlave.visualAge to $customSlave.actualAge>>
	<<CustomSlaveAge>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.health == 0>>Healthy.
<<else>>Extremely healthy.
<</if>>

<<link "Healthy">>
	<<set $customSlave.health = 0>>
	<<CustomSlaveHealth>>
<</link>>
|
<<link "Extremely healthy">>
	<<set $customSlave.health = 80>>
	<<CustomSlaveHealth>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.muscles <= 5>>Normal musculature.
<<elseif $customSlave.muscles <= 30>>Toned.
<<else>>Ripped.
<</if>>

<<link "Normal">>
	<<set $customSlave.muscles = 0>>
	<<CustomSlaveMuscles>>
<</link>>
|
<<link "Toned">>
	<<set $customSlave.muscles = 20>>
	<<CustomSlaveMuscles>>
<</link>>
|
<<link "Ripped">>
	<<set $customSlave.muscles = 50>>
	<<CustomSlaveMuscles>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.lips == 15>>Normal lips.
<<elseif $customSlave.lips == 35>>Plush lips.
<</if>>

<<link "Normal">>
	<<set $customSlave.lips to 15>>
	<<CustomSlaveLips>>
<</link>>
|
<<link "Plush">>
	<<set $customSlave.lips to 35>>
	<<CustomSlaveLips>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.height < 130>>Tiny.
<<elseif $customSlave.height < 150>>Petite.
<<elseif $customSlave.height < 160>>Short.
<<elseif $customSlave.height < 170>>Average height.
<<elseif $customSlave.height < 185>>Tall.
<<else>>Very tall.
<</if>>

<<link "Tiny">>
	<<set $customSlave.height to 125>>
	<<CustomSlaveHeight>>
<</link>>
|
<<link "Petite">>
	<<set $customSlave.height to 145>>
	<<CustomSlaveHeight>>
<</link>>
|
<<link "Short">>
	<<set $customSlave.height to 155>>
	<<CustomSlaveHeight>>
<</link>>
|
<<link "Average height">>
	<<set $customSlave.height to 165>>
	<<CustomSlaveHeight>>
<</link>>
|
<<link "Tall">>
	<<set $customSlave.height to 175>>
	<<CustomSlaveHeight>>
<</link>>
|
<<link "Very tall">>
	<<set $customSlave.height to 190>>
	<<CustomSlaveHeight>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.face < -1>>Very unattractive face.
<<elseif $customSlave.face is -1>>Unattractive face.
<<elseif $customSlave.face == 0>>Average face.
<<elseif $customSlave.face == 1>>Attractive face.
<<elseif $customSlave.face > 1>>Very attractive face.
<</if>>

<<link "Very unattractive">>
	<<set $customSlave.face to -2>>
	<<CustomSlaveFace>>
<</link>>
|
<<link "Unattractive">>
	<<set $customSlave.face to -1>>
	<<CustomSlaveFace>>
<</link>>
|
<<link "Average">>
	<<set $customSlave.face to 0>>
	<<CustomSlaveFace>>
<</link>>
|
<<link "Attractive">>
	<<set $customSlave.face to 1>>
	<<CustomSlaveFace>>
<</link>>
|
<<link "Very attractive">>
	<<set $customSlave.face to 2>>
	<<CustomSlaveFace>>
<</link>>
<</nobr>>
<<nobr>>

<<textbox "$customSlave.race" $customSlave.race "Custom Slave">>

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

<<textbox "$customSlave.skin" $customSlave.skin "Custom Slave">>

<<link "White">>
	<<set $customSlave.skin to "white">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Black">>
	<<set $customSlave.skin to "black">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Tanned">>
	<<set $customSlave.skin to "tanned">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Fair">>
	<<set $customSlave.skin to "fair">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Light brown">>
	<<set $customSlave.skin to "light brown">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Brown">>
	<<set $customSlave.skin to "brown">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Dark">>
	<<set $customSlave.skin to "dark">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Light">>
	<<set $customSlave.skin to "light">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Olive">>
	<<set $customSlave.skin to "olive">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Pale">>
	<<set $customSlave.skin to "pale">>
	<<CustomSlaveSkin>>
<</link>>
|
<<link "Extremely pale">>
	<<set $customSlave.skin to "extremely pale">>
	<<CustomSlaveSkin>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.boobs is 200>>Flat chest.
<<elseif $customSlave.boobs <= 500>>Healthy breasts.
<<else>>Big breasts.
<</if>>

<<link "Flat">>
	<<set $customSlave.boobs to 200>>
	<<CustomSlaveBoobs>>
<</link>>
|
<<link "Healthy">>
	<<set $customSlave.boobs to 500>>
	<<CustomSlaveBoobs>>
<</link>>
|
<<link "Big">>
	<<set $customSlave.boobs to 800>>
	<<CustomSlaveBoobs>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.butt == 1>>Flat buttocks.
<<elseif $customSlave.butt < 4>>Healthy buttocks.
<<else>>Huge buttocks.
<</if>>

<<link "Flat">>
	<<set $customSlave.butt to 1>>
	<<CustomSlaveButt>>
<</link>>
|
<<link "Healthy">>
	<<set $customSlave.butt to 3>>
	<<CustomSlaveButt>>
<</link>>
|
<<link "Huge">>
	<<set $customSlave.butt to 5>>
	<<CustomSlaveButt>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.vagina is -1>>No vagina.
<<elseif $customSlave.vagina == 0>>Vaginal virgin.
<<else>>Normal vagina.
<</if>>
<<if $customSlave.dick > 0>>
<<link "No vagina">>
	<<set $customSlave.vagina to -1, $customSlave.preg to -2, $customSlave.ovaries to 0>>
	<<CustomSlaveVagina>>
<</link>>
<<else>>//No vagina//
<</if>>

|
<<link "Vaginal virgin">>
	<<set $customSlave.vagina to 0, $customSlave.preg to -1, $customSlave.ovaries to 1>>
	<<CustomSlaveVagina>>
<</link>>
|
<<link "Normal">>
	<<set $customSlave.vagina to 1, $customSlave.preg to -1, $customSlave.ovaries to 1>>
	<<CustomSlaveVagina>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.dick == 0>>No penis.
<<elseif $customSlave.dick is 2>>Small penis.
<<else>>Large penis.
<</if>>

<<link "No penis">>
	<<set $customSlave.dick to 0,$customSlave.balls to 0,$customSlave.clit to 0>>
	<<CustomSlaveDick>>
	<<CustomSlaveClitBalls>>
	<<CustomSlaveVagina>>
<</link>>
|
<<link "Small penis">>
	<<set $customSlave.dick to 2,$customSlave.clit to 0>>
	<<CustomSlaveDick>>
	<<CustomSlaveClitBalls>>
	<<CustomSlaveVagina>>
<</link>>
|
<<link "Large penis">>
	<<set $customSlave.dick to 4,$customSlave.clit to 0>>
	<<CustomSlaveDick>>
	<<CustomSlaveClitBalls>>
	<<CustomSlaveVagina>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.dick > 0>>
<<if $customSlave.balls == 0>>No testicles.<<elseif $customSlave.balls is 3>>Small testicles.<<else>>Large testicles.<</if>>
<<link "No testicles">>
	<<set $customSlave.balls to 0,$customSlave.clit to 0>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Small testicles">>
	<<set $customSlave.balls to 2,$customSlave.clit to 0>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Large testicles">>
	<<set $customSlave.balls to 4,$customSlave.clit to 0>>
	<<CustomSlaveClitBalls>>
<</link>>
<<else>>
<<if $customSlave.clit == 0>>Normal clitoris.<<elseif $customSlave.clit == 0>>Big clitoris.<<else>>Enormous clitoris.<</if>>
<<link "Normal clitoris">>
	<<set $customSlave.clit to 0>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Big clitoris">>
	<<set $customSlave.clit to 1>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Enormous clitoris">>
	<<set $customSlave.clit to 2>>
	<<CustomSlaveClitBalls>>
<</link>>

<<if $customSlave.labia == 0>>Minimal labia<<elseif $customSlave.labia == 1>>Normal labia<<elseif $customSlave.labia is 2>>Huge labia.<<else>>Enormous labia.<</if>>
<<link "Minimal labia">>
	<<set $customSlave.labia to 0>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Normal labia">>
	<<set $customSlave.labia to 1>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Huge labia">>
	<<set $customSlave.labia to 2>>
	<<CustomSlaveClitBalls>>
<</link>>
|
<<link "Enormous labia">>
	<<set $customSlave.labia to 3>>
	<<CustomSlaveClitBalls>>
<</link>>
<</if>>

<</nobr>>
<<nobr>>

<<if $customSlave.anus == 0>>Anal virgin.
<<else>>Normal anus.
<</if>>

<<link "Anal virgin">>
	<<set $customSlave.anus to 0>>
	<<CustomSlaveAnus>>
<</link>>
|
<<link "Normal anus">>
	<<set $customSlave.anus to 1>>
	<<CustomSlaveAnus>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.analSkill <= 10>>Sexually unskilled.
<<elseif $customSlave.analSkill <= 10>>Basic sex skills.
<<else>>Sexual skilled.
<</if>>

<<link "Unskilled">>
	<<set $customSlave.analSkill = 0,$customSlave.oralSkill = 0,$customSlave.vaginalSkill = 0>>
	<<CustomSlaveSkills>>
<</link>>
|
<<link "Skilled">>
	<<set $customSlave.analSkill = 15,$customSlave.oralSkill = 15,$customSlave.vaginalSkill = 15>>
	<<CustomSlaveSkills>>
<</link>>
|
<<link "Expert">>
	<<set $customSlave.analSkill = 35,$customSlave.oralSkill = 35,$customSlave.vaginalSkill = 35>>
	<<CustomSlaveSkills>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.whoreSkill <= 10>>Unskilled at prostitution and entertainment.
<<elseif $customSlave.whoreSkill <= 10>>Basic skills at prostitution and entertainment.
<<else>>Skilled at prostitution and entertainment.
<</if>>

<<link "Unskilled">>
	<<set $customSlave.whoreSkill = 0,$customSlave.entertainSkill = 0>>
	<<CustomSlaveWhoreSkills>>
<</link>>
|
<<link "Skilled">>
	<<set $customSlave.whoreSkill = 15,$customSlave.entertainSkill = 15>>
	<<CustomSlaveWhoreSkills>>
<</link>>
|
<<link "Expert">>
	<<set $customSlave.whoreSkill = 35,$customSlave.entertainSkill = 35>>
	<<CustomSlaveWhoreSkills>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.combatSkill == 0>>Unskilled at combat.
<<else>>Skilled at combat.
<</if>>

<<link "Unskilled">>
	<<set $customSlave.combatSkill = 0>>
	<<CustomSlaveCombatSkills>>
<</link>>
|
<<link "Skilled">>
	<<set $customSlave.combatSkill = 1>>
	<<CustomSlaveCombatSkills>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.intelligence >= 3>>Brilliant.
<<elseif $customSlave.intelligence is 2>>Very smart..
<<elseif $customSlave.intelligence == 1>>Smart.
<<elseif $customSlave.intelligence == 0>>Average intelligence.
<<elseif $customSlave.intelligence is -1>>Stupid.
<<elseif $customSlave.intelligence is -2>>Very stupid.
<<else>>Moronic.
<</if>>

<<link "Brilliant">>
	<<set $customSlave.intelligence to 3>>
	<<CustomSlaveIntelligence>>
<</link>>
|
<<link "Very smart">>
	<<set $customSlave.intelligence to 2>>
	<<CustomSlaveIntelligence>>
<</link>>
|
<<link "Smart">>
	<<set $customSlave.intelligence to 1>>
	<<CustomSlaveIntelligence>>
<</link>>
|
<<link "Average intelligence">>
	<<set $customSlave.intelligence to 0>>
	<<CustomSlaveIntelligence>>
<</link>>
|
<<link "Stupid">>
	<<set $customSlave.intelligence to -1>>
	<<CustomSlaveIntelligence>>
<</link>>
|
<<link "Very stupid">>
	<<set $customSlave.intelligence to -2>>
	<<CustomSlaveIntelligence>>
<</link>>
|
<<link "Moronic">>
	<<set $customSlave.intelligence to -3>>
	<<CustomSlaveIntelligence>>
<</link>>
<</nobr>>
<<nobr>>

<<if $customSlave.intelligenceImplant == 1>>Educated.
<<else>>Uneducated.
<</if>>

<<link "Educated">>
	<<set $customSlave.intelligenceImplant to 1>>
	<<CustomSlaveEducation>>
<</link>>
|
<<link "Uneducated">>
	<<set $customSlave.intelligenceImplant to 0>>
	<<CustomSlaveEducation>>
<</link>>
<</nobr>>
<<nobr>>

Nationality: $customSlave.nationality.

<<for _i = 0; _i < $basenationalities.length; _i++>>
<<set _nation to $basenationalities[_i]>>

<<print "
<<link _nation>>
	<<set $customSlave.nationality to $basenationalities[" + _i + "]>>
	<<CustomSlaveNationality>>
<</link>>
">>
<<if _i < $basenationalities.length-1>>
|
<</if>>
<</for>>
<</nobr>>

<<nobr>>
<<if $customSlaveOrdered == 1>>
[[Withdraw custom slave order|Main][$customSlaveOrdered to 0]]
<<else>>
[[Post custom slave order|Main][$customSlaveOrdered to 1]]
<</if>>
<</nobr>>