diff --git a/sanityCheck b/sanityCheck
index dc0328cde623ce8b13859db984a3291b3eb73472..e8e842b19766a9b04452b30f317e5af78755a42f 100755
--- a/sanityCheck
+++ b/sanityCheck
@@ -89,6 +89,13 @@ $GREP -i -E "\Wan (b|c|d|f|g|j|k|l|m|n|p|q|r|s|t|v|w|x|y|z)\w." -- src/*.tw | gr
 $GREP -i "\w$\w" -- src/*.tw | myprint "VarSignMidWord"
 # check for $ sign at beginning of macro
 $GREP '<<\s*\$' -- 'src/*'  | myprint "VarSignAtMacroStart"
+# check our custom option macro is either options,option,optionlt,optionlte,optiongt,optiongte,optiondefault
+$GREP -e '<<option' --and --not -e "<<option\(\|s\|lt\|lte\|gt\|gte\|default\)[ >]" -- 'src/*'  | myprint "OptionUnrecognized"
+# check our custom option macro is: <<option variable "somestring"
+$GREP -e "<<option[lg]te\? " --and --not -e "<<option[lg]te\?  *-\?[0-9]\+  *-\?[0-9]\+  *[\'\"].*[\'\"]" -- 'src/*' | grep -v src/js | myprint "OptionBadArguments"
+$GREP -e "<<optiondefault " --and --not -e "<<optiondefault  *\(-\?[0-9]\+\|[\'\"].*[\'\"]\|false\|true\)  *[\'\"].*[\'\"]" -- 'src/*' | grep -v src/js | myprint "OptionBadArguments"
+$GREP -e "<<option\([lg]t\?\|default\) *>" -- 'src/*' | grep -v src/js | myprint "OptionBadArguments"
+$GREP -e "<<option " --and --not -e "<<option  *\(-\?[0-9]\+\|[\'\"].*[\'\"]\|false\|true\)  *[\`\'\"].*[\'\"\`]" -- 'src/*' | grep -v src/js | myprint "OptionBadArguments"
 # check for missing ; before statement
 $GREP 'if $ ' -- 'src/*'  | myprint "missing ; before statement"
 $GREP 'elseif $ ' -- 'src/*'  | myprint "missing ; before statement"
@@ -96,6 +103,7 @@ $GREP 'elseif $ ' -- 'src/*'  | myprint "missing ; before statement"
 $GREP "<<[a-zA-Z]\([^\"'>]\|[^\"'>]>[^\"'>]\)*[a-zA-Z][.][^a-zA-Z]" | myprint "StrangeCharacterAfterDot"
 # Check for @@. instead of .@@
 $GREP -E "@@(\.|,|;|:)\s" -- src/*.tw | myprint "WrongSelectorPunctuation"
+$GREP "@@[a-z]\+;" -- 'src/*' | myprint "@@MisingDot"
 
 # Check that we do not have any variables that we use only once.   e.g.	 $onlyUsedOnce
 # Ignore  *Nationalities
diff --git a/src/events/intro/introSummary.tw b/src/events/intro/introSummary.tw
index 5a1bfad23f2e43a76a9c6c2d710d34d2fc20d6d1..7b74e11254965e628921cca2c5835622e95aaf8c 100644
--- a/src/events/intro/introSummary.tw
+++ b/src/events/intro/introSummary.tw
@@ -1275,7 +1275,7 @@ __''Mods''__
 			@@.cyan;ENABLED.@@ [[Disable|Intro Summary][$SF.Facility.Toggle = 0]]
 	<</if>> //Prep for future content.*/
 
-<br><br>
+<br>
 
 <<options $cyberMod>>
 	Cybernetics mod is
@@ -1288,8 +1288,6 @@ __''Mods''__
 <</options>>
 <br>
 
-
-<br><br>
 <<options $secExp>>
 	The Security Expansion Mod is
 	<<option 0 "Disable">>
diff --git a/src/gui/css/optionsMacro.tw b/src/gui/css/optionsMacro.tw
index 4dcd9ca43b78035b62ab0e9c930a480cd33a4d94..ddd7df49b185a7935167bd0544d90ec75b04d0d7 100644
--- a/src/gui/css/optionsMacro.tw
+++ b/src/gui/css/optionsMacro.tw
@@ -17,6 +17,7 @@
 	.optionDescription {
 		display: block;
 		width: unset;
+		text-align: left;
 	}
 
 	.optionMacro {
@@ -72,13 +73,23 @@
 	box-sizing: border-box;
 }
 
+.optionValue {
+	display: inline-flex;
+	flex-wrap: wrap;
+}
+
 .optionValue input {
 	padding: 3px;
 	background: linear-gradient(transparent,#222);
 	border: #555 solid 0.5px;
 	border-top-width: 0;
-	min-width: reset;
+	min-width: unset;
 	width: 140px;
+	height: 22px;
+}
+
+.optionMacroNumber input {
+	width: 50px;
 }
 
 .optionValue input:last-child {
diff --git a/src/js/optionsMacro.js b/src/js/optionsMacro.js
index 8fc97a6ff5ec9f62a3ee5c08a64108b84b21b273..166ba8b07e906bbc0c9c048b2080c11f1962e3c6 100644
--- a/src/js/optionsMacro.js
+++ b/src/js/optionsMacro.js
@@ -7,17 +7,25 @@
 	  <<comment>>
 		Some comment to add at the end
 	<</option>>
+
+	optionlt and optionslte lets you also specifiy a 'less than' or 'less than or
+	equal' value, to show an option as selected if it is less than this amount
+	(and not selected by a previous option)
+
+	<<optionlt "less than value" "value_to_set_varname_to" "English text to show user" "additional variables to set when clicked" "Extra english text to show, but not as a link">>
   */
 Macro.add('options', {
 	skipArgs : false,
-	tags	 : ['option', 'comment'],
+	tags	 : ['option', 'comment', 'optionlt', 'optionlte', 'optiongt', 'optiongte', 'optiondefault'],
 	handler  : function () {
 		try {
 			var currentOption = this.payload[0].args[0];
+			var currentOptionIsNumber = typeof currentOption === "number";
 			var variable = null;
 			var title = this.payload[0].contents || '';
 			var passageName = this.payload[0].args[1] || passage();
 			var found = false;
+			var found_index = 0;
 			var comment = null;
 			var hasMultipleOptionsWithSameValue = false;
 			var description = "";
@@ -44,9 +52,41 @@ Macro.add('options', {
 						if (this.payload[i].args[0] === currentOption) {
 							if (found) {
 								hasMultipleOptionsWithSameValue = true;
+							} else {
+								description = this.payload[i].contents;
+								found_index = i;
+								found = true;
 							}
+						}
+					} else if (this.payload[i].name === 'optionlt') {
+						if (!found && this.payload[i].args[0] > currentOption) {
+							description = this.payload[i].contents;
+							found = true;
+							found_index = i;
+						}
+					} else if (this.payload[i].name === 'optionlte') {
+						if (!found && this.payload[i].args[0] >= currentOption) {
+							description = this.payload[i].contents;
+							found = true;
+							found_index = i;
+						}
+					} else if (this.payload[i].name === 'optiongt') {
+						if (!found && this.payload[i].args[0] < currentOption) {
+							description = this.payload[i].contents;
+							found = true;
+							found_index = i;
+						}
+					} else if (this.payload[i].name === 'optiongte') {
+						if (!found && this.payload[i].args[0] <= currentOption) {
+							description = this.payload[i].contents;
+							found = true;
+							found_index = i;
+						}
+					} else if (this.payload[i].name === 'optiondefault') {
+						if (!found) {
 							description = this.payload[i].contents;
 							found = true;
+							found_index = i;
 						}
 					} else if (this.payload[i].name === 'comment') {
 						comment = this.payload[i].contents;
@@ -61,28 +101,32 @@ Macro.add('options', {
 			/* Now print out the list of options */
 			var output = "";
 			for (var i = 1, len = this.payload.length; i < len; ++i) {
-				if (this.payload[i].name === 'option') {
+				if (this.payload[i].name.startsWith('option')) {
 					var args = this.payload[i].args;
+					var hasComparitor = this.payload[i].name !== "option" && this.payload[i].name !== "optiondefault";
+					var argText = args[hasComparitor ? 2 : 1] || "";
 					if (args.length === 0) {
 						output += this.payload[i].contents.trim();
 					} else {
-						var extraComment = args[3] ? (' ' + args[3]) : '';
+						var extraComment = args[hasComparitor ? 4: 3];
+						extraComment = extraComment ? ' ' + extraComment : '';
 						// We use a very crude heuristic for styling 'Enable'
 						// and 'Disable' buttons differently.
-						const isEnableOption = args[1].startsWith("Enable") || args[1] === "Yes" || args[1].startsWith("Allow");
-						const isDisableOption = args[1].startsWith("Disable") || args[1] === "No" || args[1].startsWith("Deny");
+						const isEnableOption = argText && (argText.startsWith("Enable") || argText === "Yes" || argText.startsWith("Allow"));
+						const isDisableOption = argText && (argText.startsWith("Disable") || argText === "No" || argText.startsWith("Deny"));
 						var className = "optionMacroOption " + (isEnableOption ? "optionMacroEnable" : isDisableOption ? "optionMacroDisable" : "");
-						if (args[0] !== currentOption || hasMultipleOptionsWithSameValue) {
-							var onClickChange = args[2] ? (', ' + args[2]) : '';
-							output += '<span class="' + className + '">[[' + args[1] + extraComment + '|' + passageName + "][" + variable + " = " + JSON.stringify(args[0]) + onClickChange + "]]" + "</span>";
+						if (found_index !== i || hasMultipleOptionsWithSameValue) {
+							var onClickChange = args[hasComparitor ? 3 : 2];
+							onClickChange = onClickChange ? ', ' + onClickChange : '';
+							output += '<span class="' + className + '">[[' + argText + extraComment + '|' + passageName + "][" + variable + " = " + JSON.stringify(args[hasComparitor ? 1 : 0]) + onClickChange + "]]" + "</span>";
 						} else if (showSelectedOption) {
-							output +='<span class="optionMacroSelected ' + className + '">' + args[1] + extraComment + '</span>';
+							output +='<span class="optionMacroSelected ' + className + '">' + argText + extraComment + '</span>';
 						}
 					}
 				}
 			}
 			jQuery(this.output).wiki(
-				'<span class="optionMacro">' +
+				'<span class="optionMacro ' + (currentOptionIsNumber ? 'optionMacroNumber' : '') + '">' +
 					'<span class="optionDescription">' + title + ' ' + description + "</span>" +
 					'<span class="optionValue">' + output + "</span>" +
 					(comment ? '<span class="optionComment">//' + comment + "//</span>" : '') +
diff --git a/src/npc/startingGirls/startingGirls.tw b/src/npc/startingGirls/startingGirls.tw
index b1042a9cb24bb209a727a29ce8ae4c0b19b061b2..54be8507388a9f6e3708f46a25a99aa2237eea8d 100644
--- a/src/npc/startingGirls/startingGirls.tw
+++ b/src/npc/startingGirls/startingGirls.tw
@@ -425,1095 +425,1093 @@ __You are customizing this slave:__
 <<SaleDescription>>
 <<StartingGirlsCost>>
 <</link>>
+<hr>
+
+<<options $activeSlave.devotion>>
+	''Devotion:''
+	<<optionlt -95 -100 "Utterly hateful">>
+		@@.darkviolet;Utterly hateful.@@
+	<<optionlt -50 -70 "Hateful">>
+		@@.darkviolet;Hateful.@@
+	<<optionlt -20 -35 "Resistant">>
+		@@.mediumorchid;Resistant.@@
+	<<optionlte 20 0 "Ambivalent">>
+		@@.yellow;Ambivalent.@@
+	<<optionlte 50 35 "Accepting">>
+		@@.hotpink;Accepting.@@
+	<<optionlte 95 70 "Devoted">>
+		@@.deeppink;Devoted.@@
+	<<optiondefault 100 "Worshipful">>
+		@@.magenta;Worshipful.@@
+	<<option>>
+		<<textbox "$activeSlave.devotion" $activeSlave.devotion "Starting Girls">>
+	<<comment>>
+		<<if $activeSlave.devotion > 20>>
+			//@@.red;Starting slaves incur
+			<<if $activeSlave.devotion > 50>>
+				a severe cost penalty at very high
+			<<else>>
+				an additional cost penalty at high
+			<</if>>
+			levels of devotion. This slave's
+			<<if $activeSlave.actualAge >= 25>>
+				<<if $activeSlave.actualAge > 35>>advanced <</if>>
+				age decreases the penalty
+			<<else>>
+				young age requires paying the full penalty<</if>>
+			.@@//
+		<</if>>
+<</options>>
 
-<hr>''Devotion:''
-<span id="devotion">
-<<if $activeSlave.devotion < -95>>@@.darkviolet;Utterly hateful.@@
-<<elseif $activeSlave.devotion < -50>>@@.darkviolet;Hateful.@@
-<<elseif $activeSlave.devotion < -20>>@@.mediumorchid;Resistant.@@
-<<elseif $activeSlave.devotion <= 20>>@@.yellow;Ambivalent.@@
-<<elseif $activeSlave.devotion <= 50>>@@.hotpink;Accepting.@@
-<<elseif $activeSlave.devotion <= 95>>@@.deeppink;Devoted.@@
-<<else>>@@.magenta;Worshipful.@@
-<</if>>
-</span>
-<<link "Utterly hateful">><<set $activeSlave.devotion = -100>><<replace "#devotion">>@@.darkviolet;Utterly hateful.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Hateful">><<set $activeSlave.devotion = -70>><<replace "#devotion">>@@.darkviolet;Hateful.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Resistant">><<set $activeSlave.devotion = -35>><<replace "#devotion">>@@.mediumorchid;Resistant.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Ambivalent">><<set $activeSlave.devotion = 0>><<replace "#devotion">>@@.yellow;Ambivalent.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Accepting">><<set $activeSlave.devotion = 35>><<replace "#devotion">>@@.hotpink;Accepting.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Devoted">><<set $activeSlave.devotion = 70>><<replace "#devotion">>@@.deeppink;Devoted.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Worshipful">><<set $activeSlave.devotion = 100>><<replace "#devotion">>@@.magenta;Worshipful.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-<<textbox "$activeSlave.devotion" $activeSlave.devotion "Starting Girls">>
-<span id="devotionWarning"></span>
-
-<br>''Trust:''
-<span id="trust">
-<<if $activeSlave.trust < -95>>@@.goldenrod;Abjectly terrified.@@
-<<elseif $activeSlave.trust < -50>>@@.goldenrod;Terrified.@@
-<<elseif $activeSlave.trust < -20>>@@.gold;Frightened.@@
-<<elseif $activeSlave.trust <= 20>>@@.yellow;Fearful.@@
-<<elseif $activeSlave.trust <= 50>>@@.mediumaquamarine;Careful.@@
-<<elseif $activeSlave.trust <= 95>>@@.mediumseagreen;Trusting.@@
-<<else>>@@.seagreen;Absolute trust.@@
-<</if>>
-</span>
-<<link "Abjectly terrified">><<set $activeSlave.trust = -100>><<replace "#trust">>@@.goldenrod;Abjectly terrified.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Terrified">><<set $activeSlave.trust = -70>><<replace "#trust">>@@.goldenrod;Terrified.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Frightened">><<set $activeSlave.trust = -35>><<replace "#trust">>@@.gold;Frightened.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Fearful">><<set $activeSlave.trust = 0>><<replace "#trust">>@@.yellow;Fearful.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Careful">><<set $activeSlave.trust = 35>><<replace "#trust">>@@.mediumaquamarine;Careful.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Trusting">><<set $activeSlave.trust = 70>><<replace "#trust">>@@.mediumseagreen;Trusting.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Absolute trust">><<set $activeSlave.trust = 100>><<replace "#trust">>@@.seagreen;Absolute trust.@@<</replace>><<StartingGirlsCost>><</link>>
-<<textbox "$activeSlave.trust" $activeSlave.trust "Starting Girls">>
-
-<br>''Legal status:''
-<span id="legal">
-<<if $activeSlave.indenture > 0>>Indentured servant with <<textbox "$activeSlave.indenture" $activeSlave.indenture "Starting Girls">> weeks remaining.
-<<else>>Slave.
-<</if>>
-</span>
-<<link "Slave">><<set $activeSlave.indenture = -1, $activeSlave.indentureRestrictions = 0>><<replace "#legal">>Slave.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Indentured Servant">><<set $activeSlave.indenture = 52, $activeSlave.indentureRestrictions = 0>><<replace "#legal">>Indentured servant with <<textbox "$activeSlave.indenture" $activeSlave.indenture "Starting Girls">> weeks remaining.<</replace>><<StartingGirlsCost>><</link>>
-
-<<if $activeSlave.indenture > 0>>
-	<span id="restrictions">
-	<br>''Indenture restrictions:''
-	<<if $activeSlave.indentureRestrictions == 2>>Restrictive.
-	<<elseif $activeSlave.indentureRestrictions == 1>>Protective.
-	<<else>>None.
-	<</if>>
-	</span>
-	<<link "Restrictive">><<set $activeSlave.indentureRestrictions = 2>><<replace "#restrictions">>Restrictive.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Protective">><<set $activeSlave.indentureRestrictions = 1>><<replace "#restrictions">>Protective.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "None">><<set $activeSlave.indentureRestrictions = 0>><<replace "#restrictions">>None.<</replace>><<StartingGirlsCost>><</link>>
-<</if>>
 
-<br>''Voice:''
-<span id="voice">
-<<if $activeSlave.voice == 0>>Mute.
-<<elseif $activeSlave.voice == 1>>Deep.
-<<elseif $activeSlave.voice == 2>>Normal.
-<<elseif $activeSlave.voice == 3>>High.
-<</if>>
-</span>
-<<link "Mute">><<set $activeSlave.voice = 0>><<replace "#voice">>Mute.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Deep">><<set $activeSlave.voice = 1>><<replace "#voice">>Deep.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Normal">><<set $activeSlave.voice = 2>><<replace "#voice">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "High.">><<set $activeSlave.voice = 3>><<replace "#voice">>High.<</replace>><<StartingGirlsCost>><</link>>
+<br>
+<<options $activeSlave.trust>>
+	''Trust:''
+	<<optionlt -95 -100 "Abjectly terrified">>
+		@@.goldenrod;Abjectly terrified.@@
+	<<optionlt -50 -70 "Terrified">>
+		@@.goldenrod;Terrified.@@
+	<<optionlt -20 -35 "Frightened">>
+		@@.gold;Frightened.@@
+	<<optionlte 20 0 "Fearful">>
+		@@.yellow;Fearful.@@
+	<<optionlte 50 35 "Careful">>
+		@@.mediumaquamarine;Careful.@@
+	<<optionlte 95 70 "Trusting">>
+		@@.mediumseagreen;Trusting.@@
+	<<optiondefault 100 "Absolute trust">>
+		@@.seagreen;Absolute trust.@@
+	<<option>>
+		<<textbox "$activeSlave.trust" $activeSlave.trust "Starting Girls">>
+<</options>>
 
-&nbsp;&nbsp;&nbsp;&nbsp;
-<span id="language">
-<<if $activeSlave.voice != 0>>
-	''$language:''
-	<<if $activeSlave.accent == 0>>Unaccented.
-	<<elseif $activeSlave.accent == 1>>Pretty $activeSlave.nationality accent.
-	<<elseif $activeSlave.accent == 2>>Thick $activeSlave.nationality accent.
-	<<else>>Not fluent.
-	<</if>>
+<br>
+<<if $activeSlave.indenture == -1>>
+	<<options $activeSlave.indenture>>
+		''Legal status:''
+		<<option -1 "Slave" "$activeSlave.indentureRestrictions = 0">>
+			Slave.
+		<<optiondefault 52 "Indentured Servant" "$activeSlave.indentureRestrictions = 0">>
+	<</options>>
+<<else>>
+	<<options $activeSlave.indenture>>
+		''Legal status:'' Indentured servant
+		<<option -1 "Slave" "$activeSlave.indentureRestrictions = 0">>
+		<<optiondefault 52 "Indentured Servant" "$activeSlave.indentureRestrictions = 0">>
+		<<option>>
+			&nbsp;with <<textbox "$activeSlave.indenture" $activeSlave.indenture "Starting Girls">> weeks remaining.
+	<</options>>
+
+	<br>
+
+	<<options $activeSlave.indentureRestrictions>>
+		''Indenture restrictions:''
+		<<option 0 "None">>
+			None.
+		<<option 1 "Protective">>
+			Protective.
+		<<option 2 "Restrictive">>
+			Restrictive.
+	<</options>>
 <</if>>
-</span>
+<br>
+<<options $activeSlave.voice>>
+	''Voice:''
+	<<option 0 "Mute">>
+		Mute.
+	<<option 1 "Deep">>
+		Deep.
+	<<option 2 "Normal">>
+		Normal.
+	<<option 3 "High">>
+		High.
+<</options>>
+
 <<if $activeSlave.voice != 0>>
-	<<link "Unaccented">><<set $activeSlave.accent = 0>><<replace "#language">>Unaccented.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Accent">><<set $activeSlave.accent = 1>><<replace "#language">>Pretty $activeSlave.nationality accent.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Heavy accent">><<set $activeSlave.accent = 2>><<replace "#language">>Thick $activeSlave.nationality accent.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Poor">><<set $activeSlave.accent = 3>><<replace "#language">>Not fluent.<</replace>><<StartingGirlsCost>><</link>>
+	<br>
+	<<options $activeSlave.accent>>
+		''$language:''
+		<<option 0 "Unaccented">>
+			Unaccented.
+		<<option 1 `"Pretty " + $activeSlave.nationality + " accent"`>>
+			Pretty $activeSlave.nationality accent.
+		<<option 2 `"Thick " + $activeSlave.nationality + " accent"`>>
+			Thick $activeSlave.nationality accent.
+		<<optiondefault 3 "Not fluent">>
+			Not fluent.
+	<</options>>
 <</if>>
 
-<br>''Age:''
-<span id="age">
-<<textbox "$activeSlave.actualAge" $activeSlave.actualAge "Starting Girls">>
-</span>
+<br>
+<<options>>
+	''Age:''
+	<<option>>
+		<<textbox "$activeSlave.actualAge" $activeSlave.actualAge "Starting Girls">>
+	<<comment>>
+		&nbsp;&nbsp;&nbsp;
+		<<link `"Set height to average for a " + $activeSlave.actualAge + " year old"`>>
+			<<ResyncHeight $activeSlave>><<goto "Starting Girls">>
+		<</link>>
+<</options>>
 
-&nbsp;&nbsp;&nbsp;&nbsp;
-''Birth week:''
-<span id="birthWeek">
-<<textbox "$activeSlave.birthWeek" $activeSlave.birthWeek "Starting Girls">>
-</span>
+<br>
+<<options>>
+	''Birth week:''
+	<<option>>
+		<<textbox "$activeSlave.birthWeek" $activeSlave.birthWeek "Starting Girls">>
+<</options>>
+<br>
 
-&nbsp;&nbsp;&nbsp;&nbsp;
-''Genes:''
-@@.yellow;<span id="originalSex">$activeSlave.genes.</span>@@&nbsp;
-<<link "XX">><<set $activeSlave.genes = "XX">><<replace "#originalSex">>$activeSlave.genes.<</replace>><</link>>
- |
-<<link "XY">><<set $activeSlave.genes = "XY">><<replace "#originalSex">>$activeSlave.genes.<</replace>><</link>>
+<<options $activeSlave.genes>>
+	''Genes:''
+	<<option "XX" "XX" "$activeSlave.dick = 0, $activeSlave.balls = 0,$activeSlave.clit = 0,$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge, $activeSlave.pubertyXX=($activeSlave.pubertyAgeXX<$activeSlave.actualAge?1:0),$activeSlave.vagina=Math.max(0, $activeSlave.vagina),$activeSlave.boobs=Math.max(500,$activeSlave.boobs),  $activeSlave.balls=0, $activeSlave.scrotum=0, $activeSlave.prostate=0,$activeSlave.shoulders=either(-2,-1,0),$activeSlave.hips=either(-2,-1,0)">>
+		@@.yellow;XX@@ (Female)
+	<<option "XY" "XY" "$activeSlave.dick = 3, $activeSlave.vagina=-1, $activeSlave.preg = 0, WombFlush($activeSlave), $activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pubertyXY=($activeSlave.pubertyAgeXY<$activeSlave.actualAge?1:0), $activeSlave.pregType = 0, $activeSlave.pregSource = 0, $activeSlave.pregWeek = 0, $activeSlave.pregKnown = 0,$activeSlave.pubertyXX = 0,$activeSlave.pubertyAgeXX = $fertilityAge, $activeSlave.ovaries = 0, $activeSlave.boobs=0, $activeSlave.balls=3, $activeSlave.scrotum=3, $activeSlave.prostate=1,$activeSlave.shoulders=either(0,1,2),$activeSlave.hips=either(0,1,2)">>
+		@@.yellow;XY@@ (Male)
+<</options>>
 
 <<if $familyTesting == 1>>
 	<<editFamily>>
 <</if>>
 
-<br>''Health:''
-<span id="health">
-<<if $activeSlave.health == -40>>@@.red;Unhealthy.@@
-<<elseif $activeSlave.health == 0>>@@.yellow;Healthy.@@
-<<elseif $activeSlave.health == 40>>@@.green;Very healthy.@@
-<<else>>@@.green;Extremely healthy.@@
-<</if>>
-</span>
-<<link "Unhealthy">><<set $activeSlave.health = -40>><<replace "#health">>@@.red;Unhealthy.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Healthy">><<set $activeSlave.health = 0>><<replace "#health">>@@.yellow;Healthy.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very healthy">><<set $activeSlave.health = 40>><<replace "#health">>@@.green;Very healthy.@@<</replace>><<StartingGirlsCost>><</link>> |
- <<link "Extremely healthy">><<set $activeSlave.health = 80>><<replace "#health">>@@.green;Extremely healthy.@@<</replace>><<StartingGirlsCost>><</link>>
+<br>
+<<options $activeSlave.health>>
+	''Health:''
+	<<optionlt -20 -40 "Unhealthy">>
+		@@.red;Unhealthy.@@
+	<<optionlt 20 0 "Healthy">>
+		@@.yellow;Healthy.@@
+	<<optionlt 60 40 "Very healthy">>
+		@@.green;Very healthy.@@
+	<<optiondefault 80 "Extremely healthy">>
+		@@.green;Extremely healthy.@@
+<</options>>
+
+<br>
 
-&nbsp;&nbsp;&nbsp;&nbsp;
 <<if $seeExtreme == 1>>
-	''Limbs:''
-	<span id="amp">
-	<<if $activeSlave.amp == 1>>Amputee.
-	<<else>>Normal.
-	<</if>>
-	</span>
-	<<link "Normal">><<set $activeSlave.amp = 0>><<replace "#amp">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Amputee">><<set $activeSlave.amp = 1>><<replace "#amp">>Amputee.<</replace>><<StartingGirlsCost>><</link>>
-<</if>>
+	<<options $activeSlave.amp>>
+		''Limbs:''
+		<<option 0 "Normal">>
+			@@.green;Normal.@@
+		<<option 1 "Amputee">>
+			@@.red;Amputee.@@
+	<</options>>
+	<br>
+<</if>>
+
+<<options $activeSlave.muscles>>
+	''Muscles:''
+	<<optionlt -96 -97 "Frail">>
+		Frail.
+	<<optionlt -51 -66 "Very weak">>
+		Very weak.
+	<<optionlt -6 -41 "Weak">>
+		Weak.
+	<<optionlt 5 0 "Normal">>
+		Normal.
+	<<optionlt 30 20 "Toned">>
+		Toned.
+	<<optionlt 50 40 "Well built">>
+		Well built.
+	<<optionlt 95 65 "Quite muscular">>
+		Quite muscular.
+	<<optiondefault 96 "Ripped">>
+		Ripped.
+<</options>>
+<br>
 
-<br>''Muscles:''
-<span id="muscles">
-<<if $activeSlave.muscles > 95>>
-	Ripped.
-<<elseif $activeSlave.muscles > 50>>
-	Quite muscular.
-<<elseif $activeSlave.muscles > 30>>
-	Well built.
-<<elseif $activeSlave.muscles > 5>>
-	Toned.
-<<elseif $activeSlave.muscles > -6>>
-	Normal.
-<<elseif $activeSlave.muscles > -31>>
-	Weak.
-<<elseif $activeSlave.muscles > -96>>
-	Very weak.
-<<else>>
-	Frail.
-<</if>>
+<<options $activeSlave.waist>>
+	''Waist:''
+	<<optionlt -95 -100 "Absurd">>
+		Absurd.
+	<<optionlt -40 -55 "Hourglass">>
+		Hourglass.
+	<<optionlt -15 -25 "Feminine">>
+		Feminine.
+	<<optionlte 10 0 "Average">>
+		Average.
+	<<optionlte 40 15 "Unattractive">>
+		Unattractive.
+	<<optionlte 95 55 "Ugly">>
+		Ugly.
+	<<optiondefault 100 "Masculine">>
+		Masculine.
+<</options>>
 
-</span>
-<<link "Frail">><<set $activeSlave.muscles = -97>><<replace "#muscles">>Frail.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very weak">><<set $activeSlave.muscles = -66>><<replace "#muscles">>Very weak.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Weak">><<set $activeSlave.muscles = -41>><<replace "#muscles">>Rather weak.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Normal">><<set $activeSlave.muscles = 0>><<replace "#muscles">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Toned">><<set $activeSlave.muscles = 20>><<replace "#muscles">>Toned.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Well built">><<set $activeSlave.muscles = 40>><<replace "#muscles">>Well built.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Muscular">><<set $activeSlave.muscles = 65>><<replace "#muscles">>Muscular.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Ripped">><<set $activeSlave.muscles = 96>><<replace "#muscles">>Ripped.<</replace>><<StartingGirlsCost>><</link>>
-&nbsp;&nbsp;&nbsp;&nbsp;
-''Waist:''
-<span id="waist">
-<<if $activeSlave.waist > 95>>Masculine.
-<<elseif $activeSlave.waist > 40>>Ugly.
-<<elseif $activeSlave.waist > 10>>Unattractive.
-<<elseif $activeSlave.waist >= -10>>Average.
-<<elseif $activeSlave.waist >= -40>>Feminine.
-<<elseif $activeSlave.waist >= -95>>Hourglass.
-<<else>>Absurd.
-<</if>>
-</span>
-<<link "Absurd">><<set $activeSlave.waist = -100>><<replace "#waist">>Absurd.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Hourglass">><<set $activeSlave.waist = -55>><<replace "#waist">>Hourglass.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Feminine">><<set $activeSlave.waist = -15>><<replace "#waist">>Feminine.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Average">><<set $activeSlave.waist = 0>><<replace "#waist">>Average.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Unattractive">><<set $activeSlave.waist = 15>><<replace "#waist">>Unattractive.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Ugly">><<set $activeSlave.waist = 55>><<replace "#waist">>Ugly.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Masculine">><<set $activeSlave.waist = 100>><<replace "#waist">>Masculine.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Height:''
-<span id="height">
-<<if $activeSlave.height < 150>>Petite.
-<<elseif $activeSlave.height < 160>>Short.
-<<elseif $activeSlave.height < 170>>Average.
-<<elseif $activeSlave.height < 185>>Tall.
-<<else>>Very tall.
-<</if>>
-<<textbox "$activeSlave.height" $activeSlave.height "Starting Girls">> <<= heightToEitherUnit($activeSlave.height)>>
-</span>
+<br>
+<<options $activeSlave.height>>
+	''Height:'' <<= heightToEitherUnit($activeSlave.height)>>
+	<<optionlt 150 145 "Petite">>
+		Petite.
+	<<optionlt 160 155 "Short">>
+		Short.
+	<<optionlt 170 165 "Average">>
+		Average.
+	<<optionlt 185 180 "Tall">>
+		Tall.
+	<<optiondefault 190 "Very tall">>
+		Very tall.
+	<<option>>
+		<<textbox "$activeSlave.height" $activeSlave.height "Starting Girls">>cm
+	<<comment>>
+		&nbsp;&nbsp;&nbsp;<<link `"Set to average height of " + $activeSlave.actualAge + " year old"`>>
+			<<ResyncHeight $activeSlave>><<goto "Starting Girls">>
+		<</link>>
+<</options>>
 
-| <<link "Resync height with age">>
-	<<ResyncHeight $activeSlave>><<goto "Starting Girls">>
-<</link>>
+<br>
+<<options $activeSlave.weight>>
+	''Weight:''
+	<<optionlt -95 -100 "Emaciated">>
+		@@.red;Emaciated.@@
+	<<optionlt -30 -50 "Skinny">>
+		@@.red;Skinny.@@
+	<<optionlt -10 -20 "Thin">>
+		Thin.
+	<<optionlte 10 0 "Average">>
+		Average.
+	<<optionlte 30 20 "Plush">>
+		Plush.
+	<<optionlte 95 50 "Chubby">>
+		@@.red;Chubby.@@
+	<<optionlte 130 100 "Fat">>
+		@@.red;Fat.@@
+	<<optionlte 160 140 "Obese">>
+		@@.red;Obese.@@
+	<<optionlte 190 180 "Super obese">>
+		@@.red;Super obese.@@
+	<<optiondefault 200 "Dangerously obese">>
+		@@.red;Dangerously obese.@@
+<</options>>
 
-&nbsp;&nbsp;&nbsp;&nbsp;
-<br>''Weight:''
-<span id="weight">
-<<if $activeSlave.weight < -95>>@@.red;Emaciated.@@
-<<elseif $activeSlave.weight < -30>>@@.red;Skinny.@@
-<<elseif $activeSlave.weight < -10>>Thin.
-<<elseif $activeSlave.weight <= 10>>Average.
-<<elseif $activeSlave.weight <= 30>>Plush.
-<<elseif $activeSlave.weight <= 95>>@@.red;Chubby.@@
-<<elseif $activeSlave.weight <= 130>>@@.red;Fat.@@
-<<elseif $activeSlave.weight <= 160>>@@.red;Obese.@@
-<<elseif $activeSlave.weight <= 190>>@@.red;Super obese.@@
-<<else>>@@.red;Dangerously obese.@@
-<</if>>
-</span>
-<<link "Emaciated">><<set $activeSlave.weight = -100>><<replace "#weight">>@@.red;Emaciated.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Skinny">><<set $activeSlave.weight = -50>><<replace "#weight">>@@.red;Skinny.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Thin">><<set $activeSlave.weight = -20>><<replace "#weight">>Thin.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Average">><<set $activeSlave.weight = 0>><<replace "#weight">>Average.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Plush">><<set $activeSlave.weight = 20>><<replace "#weight">>Plush.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Chubby">><<set $activeSlave.weight = 50>><<replace "#weight">>@@.red;Chubby.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Fat">><<set $activeSlave.weight = 100>><<replace "#weight">>@@.red;Fat.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Obese">><<set $activeSlave.weight = 140>><<replace "#weight">>@@.red;Obese.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Super obese">><<set $activeSlave.weight = 180>><<replace "#weight">>@@.red;Super obese.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Dangerously obese">><<set $activeSlave.weight = 200>><<replace "#weight">>@@.red;Dangerously obese.@@<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Prestige:''
-<span id="prestige">
-<<if $activeSlave.prestige >= 3>>@@.green;World renowned.@@
-<<elseif $activeSlave.prestige >= 2>>@@.green;Regionally famous.@@
-<<elseif $activeSlave.prestige >= 1>>@@.green;Locally known.@@
-<<else>>None.
-<</if>>
-</span>
-<<link "None">><<set $activeSlave.prestige = 0>><<replace "#prestige">>None.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Locally known">><<set $activeSlave.prestige = 1>><<replace "#prestige">>@@.green;Locally known.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Regionally famous">><<set $activeSlave.prestige = 2>><<replace "#prestige">>@@.green;Regionally famous.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "World renowned">><<set $activeSlave.prestige = 3>><<replace "#prestige">>@@.green;World renowned.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-<span id="prestigeWarning"></span>
+<br>
+<<options $activeSlave.prestige>>
+	''Prestige:''
+	<<option 0 "None">>
+		None.
+	<<option 1 "Locally known">>
+		@@.green;Locally known.@@
+	<<option 2 "Regionally famous">>
+		@@.green;Regionally famous.@@
+	<<option 3 "World renowned">>
+		@@.green;World renowned.@@
+	<<comment>>
+		<<if $activeSlave.prestige>>
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;
+			//@@.red;Starting slaves incur an extreme cost penalty for prestige. This slave's
+			<<if $activeSlave.actualAge >= 25>>
+				<<if $activeSlave.actualAge > 35>>advanced <</if>>
+				age decreases the penalty
+			<<else>>
+				young age requires paying the full penalty
+			<</if>>.@@//
+		<</if>>
+<</options>>
 
 <br><br>
-<span id = "nationality">
-Her nationality is $activeSlave.nationality.
-<<link "Set custom nationality">>
-<<replace "#nationality">><<textbox "$activeSlave.nationality" $activeSlave.nationality>>
-<</replace>>
-<</link>>
-</span>
+<<options>>
+	Her nationality is $activeSlave.nationality.
+	<<option>>
+		<span id="nationality">
+			<<link "Set custom nationality...">>
+				<<replace "#nationality">>
+					<<textbox "$activeSlave.nationality" $activeSlave.nationality "Starting Girls">>
+				<</replace>>
+			<</link>>
+		</span>
+<</options>>
 <<if $seeRace == 1>>
-<br>''Ethnicity:'' <span id="ethnicity"><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">></span>
-
-<br>&nbsp;&nbsp;&nbsp;&nbsp;
-<<link "White">><<set $activeSlave.race = "white">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Black">><<set $activeSlave.race = "black">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Latina">><<set $activeSlave.race = "latina">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Asian">><<set $activeSlave.race = "asian">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Middle Eastern">><<set $activeSlave.race = "middle eastern">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Amerindian">><<set $activeSlave.race = "amerindian">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Southern European">><<set $activeSlave.race = "southern european">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Semitic">><<set $activeSlave.race = "semitic">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Malay">><<set $activeSlave.race = "malay">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Indo-Aryan">><<set $activeSlave.race = "indo-aryan">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Pacific Islander">><<set $activeSlave.race = "pacific islander">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Mixed Race">><<set $activeSlave.race = "mixed race">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</link>>
+	<br>
+	<<options $activeSlave.race>>
+		''Ethnicity:'' $activeSlave.race
+		<<option "white"             "White">>
+		<<option "black"             "Black">>
+		<<option "latina"            "Latina">>
+		<<option "asian"             "Asian">>
+		<<option "middle eastern"    "Middle Eastern">>
+		<<option "amerindian"        "Amerindian">>
+		<<option "southern european" "Southern European">>
+		<<option "semitic"           "Semitic">>
+		<<option "malay"             "Malay">>
+		<<option "indo-aryan"        "Indo-Aryan">>
+		<<option "pacific islander"  "Pacific Islander">>
+		<<option "mixed race"        "Mixed Race">>
+		<<option>>
+			<<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">>
+	<</options>>
 <</if>>
 
-<br>''Skin color:'' <span id="skin"><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">></span>
+<br>
+<<options $activeSlave.skin>>
+	''Skin color:'' $activeSlave.skin
+	<<option "pure white"     "Pure White">>
+	<<option "extremely pale" "Extremely Pale">>
+	<<option "pale"           "Pale">>
+	<<option "extremely fair" "Extremely Fair">>
+	<<option "very fair"      "Very Fair">>
+	<<option "fair"           "Fair">>
+	<<option "white"          "White">>
+	<<option "light"          "Light">>
+	<<option "lightened"      "Lightened">>
+	<<option "light olive"    "Light Olive">>
+	<<option "olive"          "Olive">>
+	<<option "natural"        "Natural">>
+	<<option "tanned"         "Tanned">>
+	<<option "bronzed"        "Bronzed">>
+	<<option "dark olive"     "Dark Olive">>
+	<<option "dark"           "Dark">>
+	<<option "light brown"    "Light Brown">>
+	<<option "brown"          "Brown">>
+	<<option "dark brown"     "Dark Brown">>
+	<<option "black"          "Black">>
+	<<option "ebony"          "Ebony">>
+	<<option "pure black"     "Pure Black">>
+	<<option>>
+		<<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">>
+<</options>>
 
-<br>&nbsp;&nbsp;&nbsp;&nbsp;
-<<link "Pure White">><<set $activeSlave.skin = "pure white">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Extremely Pale">><<set $activeSlave.skin = "extremely pale">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Pale">><<set $activeSlave.skin = "pale">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Extremely Fair">><<set $activeSlave.skin = "extremely fair">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very Fair">><<set $activeSlave.skin = "very fair">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Fair">><<set $activeSlave.skin = "fair">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "White">><<set $activeSlave.skin = "white">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Light">><<set $activeSlave.skin = "light">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Lightened">><<set $activeSlave.skin = "lightened">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Light Olive">><<set $activeSlave.skin = "light olive">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Olive">><<set $activeSlave.skin = "olive">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Natural">><<set $activeSlave.skin = "natural">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Tanned">><<set $activeSlave.skin = "tanned">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Bronzed">><<set $activeSlave.skin = "bronzed">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Dark Olive">><<set $activeSlave.skin = "dark olive">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Dark">><<set $activeSlave.skin = "dark">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Light Brown">><<set $activeSlave.skin = "light brown">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Brown">><<set $activeSlave.skin = "brown">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Dark Brown">><<set $activeSlave.skin = "dark brown">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Black">><<set $activeSlave.skin = "black">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Ebony">><<set $activeSlave.skin = "ebony">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>> |
-<<link "Pure Black">><<set $activeSlave.skin = "pure black">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Facial appearance:'' <span id="faceShape">$activeSlave.faceShape</span>.
-<<link "Normal">><<set $activeSlave.faceShape = "normal">><<replace "#faceShape">>$activeSlave.faceShape<</replace>><<StartingGirlsCost>><</link>> |
-<<if $seeDicks != 0>><<link "Masculine">><<set $activeSlave.faceShape = "masculine">><<replace "#faceShape">>$activeSlave.faceShape<</replace>><<StartingGirlsCost>><</link>> |<</if>>
-<<link "Androgynous">><<set $activeSlave.faceShape = "androgynous">><<replace "#faceShape">>$activeSlave.faceShape<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Cute">><<set $activeSlave.faceShape = "cute">><<replace "#faceShape">>$activeSlave.faceShape<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Sensual">><<set $activeSlave.faceShape = "sensual">><<replace "#faceShape">>$activeSlave.faceShape<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Exotic">><<set $activeSlave.faceShape = "exotic">><<replace "#faceShape">>$activeSlave.faceShape<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Facial attractiveness:''
-<span id="face">
-<<if $activeSlave.face < -95>>Very ugly.
-<<elseif $activeSlave.face < -40>>Ugly.
-<<elseif $activeSlave.face < -10>>Unattractive.
-<<elseif $activeSlave.face <= 10>>Average.
-<<elseif $activeSlave.face <= 40>>Attractive.
-<<elseif $activeSlave.face <= 95>>Beautiful.
-<<else>>Very beautiful.
-<</if>>
-</span>
-<<link "Very ugly">><<set $activeSlave.face = -100>><<replace "#face">>Very ugly.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Ugly">><<set $activeSlave.face = -55>><<replace "#face">>Ugly.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Unattractive">><<set $activeSlave.face = -15>><<replace "#face">>Unattractive.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Average">><<set $activeSlave.face = 0>><<replace "#face">>Average.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Attractive">><<set $activeSlave.face = 15>><<replace "#face">>Attractive.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Beautiful">><<set $activeSlave.face = 55>><<replace "#face">>Beautiful.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very beautiful">><<set $activeSlave.face = 100>><<replace "#face">>Very beautiful.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Lips:''
-<span id="lips">
-<<if $activeSlave.lips <= 10>>Thin.
-<<elseif $activeSlave.lips <= 20>>Normal.
-<<elseif $activeSlave.lips <= 40>>Pretty.
-<<elseif $activeSlave.lips <= 70>>Plush.
-<<elseif $activeSlave.lips <= 95>>Huge.
-<<else>>Facepussy.
-<</if>>
-</span>
-<<link "Thin">><<set $activeSlave.lips = 5>><<replace "#lips">>Thin.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Normal">><<set $activeSlave.lips = 15>><<replace "#lips">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Plush">><<set $activeSlave.lips = 25>><<replace "#lips">>Plush.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Big">><<set $activeSlave.lips = 55>><<replace "#lips">>Big.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Huge">><<set $activeSlave.lips = 85>><<replace "#lips">>Huge.<</replace>><<StartingGirlsCost>><</link>>
-<<if $seeExtreme == 1>>
- |
-<<link "Facepussy">><<set $activeSlave.lips = 100>><<replace "#lips">>Facepussy.<</replace>><<StartingGirlsCost>><</link>>
-<</if>>
-&nbsp;&nbsp;&nbsp;&nbsp;''Teeth:''
-<span id="teeth">
-<<if $activeSlave.teeth == "crooked">>Crooked.
-<<elseif $activeSlave.teeth == "gapped">>Gapped.
-<<elseif $activeSlave.teeth == "straightening braces">>Braces.
-<<elseif $activeSlave.teeth == "baby">>Baby.
-<<elseif $activeSlave.teeth == "mixed">>Mixed.
-<<else>>Straight.
-<</if>>
-</span>
+<br>
 
-<<if $activeSlave.physicalAge >= 12>>
-	<<link "Straight">><<set $activeSlave.teeth = "normal">><<replace "#teeth">>Straight.<</replace>><<StartingGirlsCost>><</link>> |
-<<elseif $activeSlave.physicalAge >= 6>>
-	<<link "Mixed">><<set $activeSlave.teeth = "mixed">><<replace "#teeth">>Mixed.<</replace>><<StartingGirlsCost>><</link>> |
+<br>
+<<if $seeDicks != 0>>
+	<<options $activeSlave.faceShape>>
+		''Facial appearance:'' $activeSlave.faceShape
+		<<option "normal" "Normal">>
+		<<option "masculine" "Masculine">>
+		<<option "androgynous" "Androgynous">>
+		<<option "cute" "Cute">>
+		<<option "sensual" "Sensual">>
+		<<option "exotic" "Exotic">>
+	<</options>>
 <<else>>
-	<<link "Baby">><<set $activeSlave.teeth = "baby">><<replace "#teeth">>Baby.<</replace>><<StartingGirlsCost>><</link>> |
+	<<options $activeSlave.faceShape>>
+		''Facial appearance:'' $activeSlave.faceShape
+		<<option "normal" "Normal">>
+		<<option "androgynous" "Androgynous">>
+		<<option "cute" "Cute">>
+		<<option "sensual" "Sensual">>
+		<<option "exotic" "Exotic">>
+	<</options>>
 <</if>>
-<<link "Crooked">><<set $activeSlave.teeth = "crooked">><<replace "#teeth">>Crooked.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Gapped">><<set $activeSlave.teeth = "gapped">><<replace "#teeth">>Gapped.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Braces">><<set $activeSlave.teeth = "straightening braces">><<replace "#teeth">>Braces.<</replace>><<StartingGirlsCost>><</link>>
+<br>
+<<options $activeSlave.face>>
+	''Facial attractiveness:''
+<<optionlt -95 -100 "Very ugly">>  Very ugly.
+<<optionlt -40 -55 "Ugly">>  Ugly.
+<<optionlt -10 -15 "Unattractive">>  Unattractive.
+<<optionlte 10 0 "Average">>  Average.
+<<optionlte 40 15 "Attractive">>  Attractive.
+<<optionlte 95 55 "Beautiful">>  Beautiful.
+<<optiondefault 100 "Very beautiful">>  Very beautiful.
+<</options>>
 
-<br>''Vision:''
-<span id="vision">
+<br>
 <<if $seeExtreme == 1>>
-	<<if $activeSlave.eyes == -2>>Blind.
-	<<elseif $activeSlave.eyes == -1>>Nearsighted.
-	<<else>>Normal.
+	<<options $activeSlave.lips>>
+		''Lips:''
+		<<optionlte 10 5 "Thin">>  Thin.
+		<<optionlte 20 15 "Normal">>  Normal.
+		<<optionlte 40 25 "Pretty">>  Pretty.
+		<<optionlte 70 55 "Plush">>  Plush.
+		<<optionlte 95 85 "Huge">>  Huge.
+		<<optiondefault 100 "Facepussy">> Facepussy.
+	<</options>>
+<<else>>
+	<<options $activeSlave.lips>>
+		''Lips:''
+		<<optionlte 10 5 "Thin">>  Thin.
+		<<optionlte 20 15 "Normal">>  Normal.
+		<<optionlte 40 25 "Pretty">>  Pretty.
+		<<optionlte 70 55 "Plush">>  Plush.
+		<<optionlte 95 85 "Huge">>  Huge.
+	<</options>>
+<</if>>
+<br>
+<<if $activeSlave.physicalAge >= 12>>
+	<<if $activeSlave.teeth == "baby" || $activeSlave.teeth == "mixed">>
+		<<set $activeSlave.teeth = "normal">>
+	<</if>>
+	<<options $activeSlave.teeth>>
+		''Teeth:'' $activeSlave.teeth
+		<<option "crooked" "Crooked">>
+		<<option "gapped" "Gapped">>
+		<<option "straightening braces" "Braces">>
+		<<optiondefault "normal" "Straight">>
+	<</options>>
+<<elseif $activeSlave.physicalAge >= 6>>
+	<<if $activeSlave.teeth == "baby" || $activeSlave.teeth == "normal" || $activeSlave.teeth == "">>
+		<<set $activeSlave.teeth = "mixed">>
 	<</if>>
+	<<options $activeSlave.teeth>>
+		''Teeth:'' $activeSlave.teeth
+		<<option "crooked" "Crooked">>
+		<<option "gapped" "Gapped">>
+		<<option "straightening braces" "Braces">>
+		<<option "mixed" "Mixed adult & child">>
+	<</options>>
 <<else>>
-<<if $activeSlave.eyes == -1>>Nearsighted.
-<<else>>Normal.
+	<<if $activeSlave.teeth == "mixed" || $activeSlave.teeth == "normal" || $activeSlave.teeth == "">>
+		<<set $activeSlave.teeth = "mixed">>
 	<</if>>
+	<<options $activeSlave.teeth>>
+		''Teeth:'' $activeSlave.teeth
+		<<option "crooked" "Crooked">>
+		<<option "gapped" "Gapped">>
+		<<option "straightening braces" "Braces">>
+		<<option "baby" "Baby">>
+	<</options>>
 <</if>>
-</span>
-<<link "Normal">><<set $activeSlave.eyes = 1>><<replace "#vision">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Nearsighted">><<set $activeSlave.eyes = -1>><<replace "#vision">>Nearsighted.<</replace>><<StartingGirlsCost>><</link>>
+<br>
 <<if $seeExtreme == 1>>
-|
-<<link "Blind">><<set $activeSlave.eyes = -2>><<replace "#vision">>Blind.<</replace>><<StartingGirlsCost>><</link>>
+	<<options $activeSlave.eyes>>
+		''Vision:''
+		<<option -2 "Blind">> Blind
+		<<option -1 "Nearsighted">> Nearsighted
+		<<optiondefault 0 "Normal">> Normal
+	<</options>>
+<<else>>
+	<<options $activeSlave.eyes>>
+		''Vision:''
+		<<option -1 "Nearsighted">> Nearsighted
+		<<optiondefault 0 "Normal">> Normal
+	<</options>>
 <</if>>
 
-<br>''Hearing:''
-<span id="hearing">
+<br>
 <<if $seeExtreme == 1>>
-	<<if $activeSlave.hears == -2>>Deaf.
-	<<elseif $activeSlave.hears == -1>>Hard of hearing.
-	<<else>>Normal.
-	<</if>>
+	<<options $activeSlave.hears>>
+		''Hearing:''
+		<<option -2 "Deaf">> Deaf
+		<<option -1 "Hard of hearing">> Hard of hearing
+		<<optiondefault 0 "Normal">> Normal
+	<</options>>
 <<else>>
-	<<if $activeSlave.hears == -1>>Hard of hearing.
-	<<else>>Normal.
-	<</if>>
+	<<options $activeSlave.hears>>
+		''Hearing:''
+		<<option -1 "Hard of hearing">> Hard of hearing
+		<<optiondefault 0 "Normal">> Normal
+	<</options>>
 <</if>>
-</span>
-<<link "Normal">><<set $activeSlave.hears = 0>><<replace "#hearing">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Hard Of Hearing">><<set $activeSlave.hears = -1>><<replace "#hearing">>Hard of hearing.<</replace>><<StartingGirlsCost>><</link>>
+
 <<if $seeExtreme == 1>>
-|
-<<link "Deaf">><<set $activeSlave.hears = -2>><<replace "#hearing">>Deaf.<</replace>><<StartingGirlsCost>><</link>>
+	<br>
+	<<options $activeSlave.smells>>
+		''Smell ability:''
+		<<option 0 "Normal">> Normal.
+		<<option -1 "None">> Unable to smell.
+	<</options>>
+
+	<br>
+	<<options >>
+		''Taste ability:''
+		<<option 0 "Normal">> Normal.
+		<<option -1 "None">> Unable to taste.
+	<</options>>
 <</if>>
+<br>
+<br>
+<<options $activeSlave.boobs>>
+	''Breasts:''
+	<<optionlte 200 200 "Flat">>  Flat.
+	<<optionlte 500 500 "Healthy">>  Healthy.
+	<<optionlte 800 800 "Large">>  Large.
+	<<optionlte 1200 1200 "Very Large">>  Very Large.
+	<<optionlte 2000 2000 "Huge">>  Huge.
+	<<optionlte 4000 4000 "Massive">>  Massive.
+	<<optionlte 6000 6000 "Monstrous">>  Monstrous.
+	<<optiondefault 8000 "Science experiment">>Science experiment.
+	<<option>>
+		<<textbox "$activeSlave.boobs" $activeSlave.boobs "Starting Girls">> CCs
+<</options>>
+<br>
 
-<<if $seeExtreme == 1>>
-<br>''Smell:''
-<span id="smell">
-	<<if $activeSlave.smells == -1>>None.
-	<<else>>Normal.
-	<</if>>
-</span>
-<<link "Normal">><<set $activeSlave.smells = 0>><<replace "#smell">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "None">><<set $activeSlave.smells = -1>><<replace "#smell">>None.<</replace>><<StartingGirlsCost>><</link>>
+<<options $activeSlave.lactation>>
+	''Lactation:''
+	<<option 2 "Artificial" "$activeSlave.lactationDuration = 2">> Artificial.
+	<<option 1 "Natural" "$activeSlave.lactationDuration = 2">> Natural.
+	<<option 0 "None" "$activeSlave.lactationDuration = 0">> None.
+<</options>>
 
-<br>''Taste:''
-<span id="taste">
-	<<if $activeSlave.tastes == -1>>None.
-	<<else>>Normal.
-	<</if>>
-</span>
-<<link "Normal">><<set $activeSlave.tastes = 0>><<replace "#taste">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "None">><<set $activeSlave.tastes = -1>><<replace "#taste">>None.<</replace>><<StartingGirlsCost>><</link>>
-<</if>>
+<br>
+<<options $activeSlave.nipples>>
+	''Nipples:'' $activeSlave.nipples
+	<<option "tiny"     "Tiny">>
+	<<option "cute"     "Cute">>
+	<<option "puffy"    "Puffy">>
+	<<option "inverted" "Inverted">>
+	<<option "huge"     "Huge">>
+<</options>>
+
+<<options $activeSlave.areolae>>
+	''Areolae:''
+	<<option 0 "Normal">> Normal.
+	<<option 1 "Large">> Large.
+	<<option 2 "Wide">> Wide.
+	<<option 3 "Huge">> Huge.
+	<<option 4 "Massive">> Massive.
+<</options>>
 
-<br><br>''Breasts:''
-<span id="boobs">
-<<if $activeSlave.boobs <= 200>>Flat.
-<<elseif $activeSlave.boobs <= 500>>Healthy.
-<<elseif $activeSlave.boobs <= 800>>Large.
-<<elseif $activeSlave.boobs <= 1200>>Very Large.
-<<elseif $activeSlave.boobs <= 2000>>Huge.
-<<elseif $activeSlave.boobs <= 4000>>Massive.
-<<elseif $activeSlave.boobs <= 6000>>Monstrous.
-<<else>>Science experiment.
-<</if>>
-<<textbox "$activeSlave.boobs" $activeSlave.boobs "Starting Girls">> CCs
-</span>
-&nbsp;&nbsp;&nbsp;&nbsp;''Lactation:''
-<span id="lactation">
-<<if $activeSlave.lactation == 2>>Artificial.
-<<elseif $activeSlave.lactation == 1>>Natural.
-<<else>>None.
-<</if>>
-</span>
-<<link "Artificial">><<set $activeSlave.lactation = 2, $activeSlave.lactationDuration = 2>><<replace "#lactation">>Artificial.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Natural">><<set $activeSlave.lactation = 1, $activeSlave.lactationDuration = 2>><<replace "#lactation">>Natural.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "None">><<set $activeSlave.lactation = 0, $activeSlave.lactationDuration = 0>><<replace "#lactation">>None.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Nipples:'' <span id="nipples">$activeSlave.nipples</span>.
-<<link "Tiny">><<set $activeSlave.nipples = "tiny">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Cute">><<set $activeSlave.nipples = "cute">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Puffy">><<set $activeSlave.nipples = "puffy">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Inverted">><<set $activeSlave.nipples = "inverted">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Huge">><<set $activeSlave.nipples = "huge">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</link>>
-&nbsp;&nbsp;&nbsp;&nbsp;''Areolae:''
-<span id="areolae">
-<<if $activeSlave.areolae == 1>>
-	Large.
-<<elseif $activeSlave.areolae == 2>>
-	Wide.
-<<elseif $activeSlave.areolae == 3>>
-	Huge.
-<<elseif $activeSlave.areolae == 4>>
-	Massive.
-<<else>>
-	Normal.
-<</if>>
-</span>
-<<link "Normal">><<set $activeSlave.areolae = 0>><<replace "#areolae">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Large">><<set $activeSlave.areolae = 1>><<replace "#areolae">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Wide">><<set $activeSlave.areolae = 2>><<replace "#areolae">>Wide.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Huge">><<set $activeSlave.areolae = 3>><<replace "#areolae">>Huge.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Massive">><<set $activeSlave.areolae = 4>><<replace "#areolae">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Shoulders:''
-<span id="shoulders">
-<<if $activeSlave.shoulders < -1>>Very narrow.
-<<elseif $activeSlave.shoulders < 0>>Narrow.
-<<elseif $activeSlave.shoulders > 1>>Very broad.
-<<elseif $activeSlave.shoulders > 0>>Broad.
-<<else>>Feminine.
-<</if>>
-</span>
-<<link "Very narrow">><<set $activeSlave.shoulders = -2>><<replace "#shoulders">>Very narrow.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Narrow">><<set $activeSlave.shoulders = -1>><<replace "#shoulders">>Narrow.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Normal">><<set $activeSlave.shoulders = 0>><<replace "#shoulders">>Feminine.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Broad">><<set $activeSlave.shoulders = 1>><<replace "#shoulders">>Broad.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very broad">><<set $activeSlave.shoulders = 2>><<replace "#shoulders">>Very broad.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Hips:''
-<span id="hips">
-<<if $activeSlave.hips < -1>>Very narrow.
-<<elseif $activeSlave.hips < 0>>Narrow.
-<<elseif $activeSlave.hips > 1>>Very broad.
-<<elseif $activeSlave.hips > 0>>Broad.
-<<else>>Normal.
-<</if>>
-</span>
-<<link "Very narrow">><<set $activeSlave.hips = -2>><<replace "#hips">>Very narrow.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Narrow">><<set $activeSlave.hips = -1>><<replace "#hips">>Narrow.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Normal">><<set $activeSlave.hips = 0>><<replace "#hips">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Broad">><<set $activeSlave.hips = 1>><<replace "#hips">>Broad.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very broad">><<set $activeSlave.hips = 2>><<replace "#hips">>Very broad.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Butt:''
-<span id="butt">
-<<if $activeSlave.butt == 0>>Flat.
-<<elseif $activeSlave.butt < 2>>Small.
-<<elseif $activeSlave.butt < 3>>Plump.
-<<elseif $activeSlave.butt < 4>>Big.
-<<elseif $activeSlave.butt < 5>>Huge.
-<<elseif $activeSlave.butt < 6>>Enormous.
-<<elseif $activeSlave.butt < 7>>Gigantic.
-<<else>>Massive.
-<</if>>
-</span>
-<<link "Flat">><<set $activeSlave.butt = 0>><<replace "#butt">>Flat.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Small">><<set $activeSlave.butt = 1>><<replace "#butt">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Plump">><<set $activeSlave.butt = 2>><<replace "#butt">>Plump.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Healthy">><<set $activeSlave.butt = 3>><<replace "#butt">>Big.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Huge">><<set $activeSlave.butt = 4>><<replace "#butt">>Huge.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Enormous">><<set $activeSlave.butt = 5>><<replace "#butt">>Enormous.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Gigantic">><<set $activeSlave.butt = 6>><<replace "#butt">>Gigantic.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Massive">><<set $activeSlave.butt = 7>><<replace "#butt">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Anus:''
-<span id="anus">
-<<if $activeSlave.anus == 0>>@@.lime;Virgin.@@
-<<elseif $activeSlave.anus == 1>>Normal.
-<<elseif $activeSlave.anus == 2>>Veteran.
-<<else>>Gaping.
-<</if>>
-</span>
-<<link "Anal virgin">><<set $activeSlave.anus = 0>><<replace "#anus">>@@.lime;Virgin.@@<</replace>><<StartingGirlsAnalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Normal">><<set $activeSlave.anus = 1>><<replace "#anus">>Normal.<</replace>><<StartingGirlsAnalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Veteran">><<set $activeSlave.anus = 2>><<replace "#anus">>Veteran.<</replace>><<StartingGirlsAnalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Gaping">><<set $activeSlave.anus = 3>><<replace "#anus">>Gaping.<</replace>><<StartingGirlsAnalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-
-<br>''Vagina:''
-<span id="vagina">
-<<if $activeSlave.vagina == -1>>//No vagina.//
-<<elseif $activeSlave.vagina == 0>>@@.lime;Virgin.@@
-<<elseif $activeSlave.vagina == 1>>Normal.
-<<elseif $activeSlave.vagina == 2>>Veteran.
-<<else>>Gaping.
-<</if>>
-</span>
-<<link "No vagina">><<set $activeSlave.vagina = -1, $activeSlave.preg = 0, WombFlush($activeSlave), $activeSlave.belly = 0,$activeSlave.bellyPreg = 0, $activeSlave.pregType = 0, $activeSlave.pregSource = 0, $activeSlave.pregWeek = 0, $activeSlave.pregKnown = 0,$activeSlave.pubertyXX = 0,$activeSlave.pubertyAgeXX = $fertilityAge, $activeSlave.ovaries = 0>><<replace "#vagina">>//No vagina.//<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Virgin">><<set $activeSlave.vagina = 0, $activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1>><<replace "#vagina">>@@.lime;Virgin.@@<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Normal">><<set $activeSlave.vagina = 1, $activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1>><<replace "#vagina">>Normal.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Veteran">><<set $activeSlave.vagina = 2, $activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1>><<replace "#vagina">>Veteran.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Gaping">><<set $activeSlave.vagina = 3, $activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1>><<replace "#vagina">>Gaping.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
+<br>
+<<options $activeSlave.shoulders>>
+	''Shoulders:''
+	<<option -2 "Very narrow">>  Very narrow.
+	<<option -1 "Narrow">> Narrow.
+	<<option 0 "Feminine">> Feminine.
+	<<option 1 "Broad">>Broad.
+	<<option 2 "Very broad">> Very broad.
+<</options>>
 
-<span id="vaginablock">
-<<if $activeSlave.vagina > -1>>
 <br>
+<<options $activeSlave.hips>>
+	''Hips:''
+	<<option -2 "Very narrow">>  Very narrow.
+	<<option -1 "Narrow">>  Narrow.
+	<<option 0 "Normal">> Normal.
+	<<option 1 "Broad">>Broad.
+	<<option 2 "Very broad">>Very broad.
+<</options>>
 
-<<if $activeSlave.dick == 0>>
-	''Clit:''
-	<span id="clit">
-	<<if $activeSlave.clit == 0>>Normal.
-	<<elseif $activeSlave.clit == 1>>Large.
-	<<else>>Huge.
+<br>
+<<options $activeSlave.butt>>
+	''Butt:''
+	<<option 0 "Flat">> Flat.
+	<<option 1 "Small">>  Small.
+	<<option 2 "Plump">>  Plump.
+	<<option 3 "Big">>  Big.
+	<<option 4 "Huge">>  Huge.
+	<<option 5 "Enormous">> Enormous.
+	<<option 6 "Gigantic">> Gigantic.
+	<<optiondefault 7 "Massive">> Massive.
+<</options>>
+
+<br>
+<<options $activeSlave.anus>>
+	''Anus:''
+	<<option 0 "Virgin">> @@.lime;Virgin@@.
+	<<option 1 "Normal">> Normal.
+	<<option 2 "Veteran">> Veteran.
+	<<optiondefault 3 "Gaping">> Gaping.
+<</options>>
+
+<br>
+<<options $activeSlave.vagina>>
+	''Vagina:''
+	<<option -1 "No vagina" "$activeSlave.preg = 0, WombFlush($activeSlave), $activeSlave.belly = 0,$activeSlave.bellyPreg = 0, $activeSlave.pregType = 0, $activeSlave.pregSource = 0, $activeSlave.pregWeek = 0, $activeSlave.pregKnown = 0,$activeSlave.pubertyXX = 0,$activeSlave.pubertyAgeXX = $fertilityAge, $activeSlave.ovaries = 0">>//No vagina//.
+	<<option 0 "Virgin" "$activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1">>@@.lime;Virgin@@.
+	<<option 1 "Normal" "$activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1">>Normal.
+	<<option 2 "Veteran" "$activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1">>Veteran.
+	<<optiondefault 3 "Gaping" "$activeSlave.preg = -1, $activeSlave.belly = 0, $activeSlave.bellyPreg = 0, $activeSlave.ovaries = 1">>Gaping.
+<</options>>
+<br>
+
+<<if $activeSlave.vagina > -1>>
+<br>
+	<<if $activeSlave.dick == 0>>
+		<<options $activeSlave.clit>>
+			''Clit:''
+			<<option 0 "Normal">>Normal.
+			<<option 1 "Large">>Large.
+			<<optiondefault 2 "Huge">>Huge.
+		<</options>>
+		<br>
 	<</if>>
-	</span>
-	<<link "Normal">><<set $activeSlave.clit = 0>><<replace "#clit">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Large">><<set $activeSlave.clit = 1>><<replace "#clit">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Huge">><<set $activeSlave.clit = 2>><<replace "#clit">>Huge.<</replace>><<StartingGirlsCost>><</link>>
-	&nbsp;&nbsp;&nbsp;&nbsp;
-<</if>>
-''Labia:''
-<span id="labia">
-<<if $activeSlave.labia == 2>>Huge.
-<<elseif $activeSlave.labia == 1>>Large.
-<<else>>Normal.
-<</if>>
-</span>
-<<link "Normal">><<set $activeSlave.labia = 0>><<replace "#labia">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Large">><<set $activeSlave.labia = 1>><<replace "#labia">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Huge">><<set $activeSlave.labia = 2>><<replace "#labia">>Huge.<</replace>><<StartingGirlsCost>><</link>>
-
-&nbsp;&nbsp;&nbsp;&nbsp;
-''Vaginal wetness:''
-<span id="wetness">
-<<if $activeSlave.vaginaLube == 0>>Dry.
-<<elseif $activeSlave.vaginaLube == 1>>Normal.
-<<else>>Excessive.
-<</if>>
-</span>
-<<link "Dry">><<set $activeSlave.vaginaLube = 0>><<replace "#wetness">>Dry.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Normal">><<set $activeSlave.vaginaLube = 1>><<replace "#wetness">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Excessive">><<set $activeSlave.vaginaLube = 2>><<replace "#wetness">>Excessive.<</replace>><<StartingGirlsCost>><</link>>
-
-<<if $seePreg != 0>>
-<br>''Pregnancy:''
-<span id="preg">
-<<if $activeSlave.preg > 39>>Ready to drop.
-<<elseif $activeSlave.preg > 30>>Advanced.
-<<elseif $activeSlave.preg > 20>>Showing.
-<<elseif $activeSlave.preg > 10>>Early.
-<<elseif $activeSlave.preg > -2>>None.
-<<else>>Barren.
-<</if>>
-</span>
-<<if $seeHyperPreg == 1 && $cheatMode == 1>>
-	<<link "Bursting at the seams">><<set $activeSlave.preg = 43,$activeSlave.pregType = 150,$activeSlave.pregWeek = 43,$activeSlave.pregKnown = 1,$activeSlave.belly = 2700000,$activeSlave.bellyPreg = 2700000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Ready to test extreme hyperpreg content.<</replace>><<StartingGirlsCost>><</link>> |
-<</if>>
-<<link "Completely Filled">><<set $activeSlave.preg = 43,$activeSlave.pregType = 8,$activeSlave.pregWeek = 43,$activeSlave.pregKnown = 1,$activeSlave.belly = 120000,$activeSlave.bellyPreg = 120000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Stuffed to capacity.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Ready to Drop">><<set $activeSlave.preg = 40,$activeSlave.pregType = 1,$activeSlave.pregWeek = 40,$activeSlave.pregKnown = 1,$activeSlave.belly = 15000,$activeSlave.bellyPreg = 15000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Ready to drop.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Advanced">><<set $activeSlave.preg = 34,$activeSlave.pregType = 1,$activeSlave.pregWeek = 34,$activeSlave.pregKnown = 1,$activeSlave.belly = 10000,$activeSlave.bellyPreg = 10000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Advanced.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Showing">><<set $activeSlave.preg = 27,$activeSlave.pregType = 1,$activeSlave.pregWeek = 27,$activeSlave.pregKnown = 1,$activeSlave.belly = 5000,$activeSlave.bellyPreg = 5000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Showing.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Early">><<set $activeSlave.preg = 12,$activeSlave.pregType = 1,$activeSlave.pregWeek = 12,$activeSlave.pregKnown = 1,$activeSlave.belly = 100,$activeSlave.bellyPreg = 100,$activeSlave.pubertyXX = 1>><<replace "#preg">>Early.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "None">><<set $activeSlave.preg = 0,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0>><<replace "#preg">>None.<</replace>><<run WombFlush($activeSlave)>><<StartingGirlsCost>><</link>> |
-<<link "Barren">><<set $activeSlave.preg = -2,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0>><<replace "#preg">>Barren.<</replace>><<run WombFlush($activeSlave)>><<StartingGirlsCost>><</link>>
-<br>''Puberty:''
-<span id="pub">
-<<if $activeSlave.pubertyXX == 1>>Postpubescent.
-<<else>>Prepubescent.
-<</if>>
-</span>
-<<textbox "$activeSlave.pubertyAgeXX" $activeSlave.pubertyAgeXX "Starting Girls">>
-<<link "Postpubescent">><<set $activeSlave.pubertyXX = 1>><<replace "#pub">>Postpubescent.<</replace>><<StartingGirlsCost>><</link>> | <<link "Prepubescent">><<set $activeSlave.pubertyXX = 0,$activeSlave.pubertyAgeXX = $fertilityAge,$activeSlave.preg = 0,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0>><<run WombFlush($activeSlave)>><<replace "#pub">>Prepubescent.<</replace>><<StartingGirlsCost>><</link>>
-<<if $PC.dick == 1>>
-	<br> ''Father:''
-	<span id="father">
-	<<if $activeSlave.pregSource == -1>>My child.
-	<<else>>
+	<<options $activeSlave.labia>>
+		''Labia:''
+		<<option 0 "Normal">>Normal.
+		<<option 1 "Large">>Large.
+		<<optiondefault 2 "Huge">>Huge.
+	<</options>>
+	<br>
+	<<options $activeSlave.vaginaLube>>
+		''Vaginal wetness:''
+		<<option 0 "Dry">> Dry.
+		<<option 1 "Normal">> Normal.
+		<<optiondefault 2 "Excessive">> Excessive.
+	<</options>>
+
+	<<if $seePreg != 0>>
+		/* This is only shown if slave has vagina */
+		<br>
+		<<options $activeSlave.pubertyXX>>
+			''Puberty:''
+			<<option 0 "Prepubescent" "$activeSlave.pubertyAgeXX = $fertilityAge,$activeSlave.preg = 0,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0, WombFlush($activeSlave)">> Prepubescent.
+			<<option 1 "Postpubescent">> Postpubescent.
+		<</options>>
+		<br>
+		<<options $activeSlave.pubertyAgeXX>>
+			''Age of puberty:''
+			<<option>>
+				<<textbox "$activeSlave.pubertyAgeXX" $activeSlave.pubertyAgeXX "Starting Girls">>
+		<</options>>
+		<br>
+		<<if $seeHyperPreg == 1 && $cheatMode == 1 && $activeSlave.pubertyXX == 1>>
+			<<options $activeSlave.preg>>
+				''Pregnancy:''
+				<<option 43 "Bursting at the seams" "$activeSlave.pregType = 150,$activeSlave.pregWeek = 43,$activeSlave.pregKnown = 1,$activeSlave.belly = 2700000,$activeSlave.bellyPreg = 2700000,$activeSlave.pubertyXX = 1">>Bursting at the seams
+				(Extreme hyper pregnancy!).
+				<<optiongt 40 42 "Completely Filled" "$activeSlave.pregType = 8,$activeSlave.pregWeek = 42,$activeSlave.pregKnown = 1,$activeSlave.belly = 120000,$activeSlave.bellyPreg = 120000,$activeSlave.pubertyXX = 1">> Completely Filled.
+				<<optiongt 39 40 "Ready to drop" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 40,$activeSlave.pregKnown = 1,$activeSlave.belly = 15000,$activeSlave.bellyPreg = 15000,$activeSlave.pubertyXX = 1">> Ready to drop.
+				<<optiongt 30 34 "Advanced" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 34,$activeSlave.pregKnown = 1,$activeSlave.belly = 10000,$activeSlave.bellyPreg = 10000,$activeSlave.pubertyXX = 1">> Advanced.
+				<<optiongt 20 27 "Showing" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 27,$activeSlave.pregKnown = 1,$activeSlave.belly = 5000,$activeSlave.bellyPreg = 5000,$activeSlave.pubertyXX = 1">> Showing.
+				<<optiongt 10 12 "Early" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 12,$activeSlave.pregKnown = 1,$activeSlave.belly = 100,$activeSlave.bellyPreg = 100,$activeSlave.pubertyXX = 1">> Early.
+				<<optiongt -2 0 "None" "$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0">> None.
+				<<optiondefault -2 "Barren" "$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0">>Barren.
+			<</options>>
+		<<elseif $activeSlave.pubertyXX == 1>>
+			<<options $activeSlave.preg>>
+				''Pregnancy:''
+				<<optiongt 40 42 "Completely Filled" "$activeSlave.pregType = 8,$activeSlave.pregWeek = 42,$activeSlave.pregKnown = 1,$activeSlave.belly = 120000,$activeSlave.bellyPreg = 120000,$activeSlave.pubertyXX = 1">> Completely Filled.
+				<<optiongt 39 40 "Ready to drop" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 40,$activeSlave.pregKnown = 1,$activeSlave.belly = 15000,$activeSlave.bellyPreg = 15000,$activeSlave.pubertyXX = 1">> Ready to drop.
+				<<optiongt 30 34 "Advanced" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 34,$activeSlave.pregKnown = 1,$activeSlave.belly = 10000,$activeSlave.bellyPreg = 10000,$activeSlave.pubertyXX = 1">> Advanced.
+				<<optiongt 20 27 "Showing" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 27,$activeSlave.pregKnown = 1,$activeSlave.belly = 5000,$activeSlave.bellyPreg = 5000,$activeSlave.pubertyXX = 1">> Showing.
+				<<optiongt 10 12 "Early" "$activeSlave.pregType = 1,$activeSlave.pregWeek = 12,$activeSlave.pregKnown = 1,$activeSlave.belly = 100,$activeSlave.bellyPreg = 100,$activeSlave.pubertyXX = 1">> Early.
+				<<optiongt -2 0 "None" "$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0">> None.
+				<<optiondefault -2 "Barren" "$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0">>Barren.
+			<</options>>
+		<</if>>
+		<<if $PC.dick > 0 && $activeSlave.preg > 0>>
+			<br>
+			<<options $activeSlave.pregSource>>
+				''Father of child:''
+				<<option -1 "My child">> Carrying my child.
+				<<option 0 "Other">> Not me.
+			<</options>>
+		<</if>>
 	<</if>>
-	</span>
-	<<link "Carrying my child">><<set $activeSlave.pregSource = -1>><<StartingGirlsCost>><<replace "#father">>My child.<</replace>><</link>> | <<link "Clear">><<set $activeSlave.pregSource = 0>><<replace "#father">><</replace>><<StartingGirlsCost>><</link>>
 <</if>>
-<</if>>
-<</if>>
-</span>
+<br>
 
-<span id="dickblock">
 <<if $seeDicks != 0 || $makeDicks == 1>>
-	<br>''Penis:''
-	<span id="dick">
-	<<if $activeSlave.dick == 0>>None.
-	<<elseif $activeSlave.dick == 1>>Tiny.
-	<<elseif $activeSlave.dick == 2>>Small.
-	<<elseif $activeSlave.dick == 3>>Normal.
-	<<elseif $activeSlave.dick == 4>>Large.
-	<<elseif $activeSlave.dick == 5>>Massive.
-	<<else>>Inhuman.<</if>>
-	</span>
-	<<link "No penis">><<set $activeSlave.dick = 0,$activeSlave.balls = 0,$activeSlave.clit = 0,$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge>><<replace "#dick">>None.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Tiny">><<set $activeSlave.dick = 1,$activeSlave.clit = 0>><<replace "#dick">>Tiny.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Small">><<set $activeSlave.dick = 2,$activeSlave.clit = 0>><<replace "#dick">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Normal">><<set $activeSlave.dick = 3,$activeSlave.clit = 0>><<replace "#dick">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Large">><<set $activeSlave.dick = 4,$activeSlave.clit = 0>><<replace "#dick">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Massive">><<set $activeSlave.dick = 5,$activeSlave.clit = 0>><<replace "#dick">>Massive.<</replace>><<StartingGirlsCost>><</link>>
+	<br>
+	<<options $activeSlave.dick>>
+		''Penis:''
+		<<option 0 "None" "$activeSlave.balls = 0,$activeSlave.clit = 0,$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge">> None.
+		<<option 1 "Tiny" "$activeSlave.clit = 0">> Tiny.
+		<<option 2 "Small" "$activeSlave.clit = 0">> Small.
+		<<option 3 "Normal" "$activeSlave.clit = 0">> Normal.
+		<<option 4 "Large" "$activeSlave.clit = 0">> Large.
+		<<optiondefault 5 "Massive" "$activeSlave.clit = 0">> Massive.
+	<</options>>
+
 	<<if $activeSlave.dick > 0>>
-		&nbsp;&nbsp;&nbsp;&nbsp;''Foreskin:''
-		<span id="foreskin">
-		<<if $activeSlave.foreskin == 0>>None.
-		<<elseif $activeSlave.foreskin == 1>>Tiny.
-		<<elseif $activeSlave.foreskin == 2>>Small.
-		<<elseif $activeSlave.foreskin == 3>>Normal.
-		<<elseif $activeSlave.foreskin == 4>>Large.
-		<<else>>Massive.<</if>>
-		</span>
-		<<if $seeCircumcision == 1>><<link "Circumcised">><<set $activeSlave.foreskin = 0>><<replace "#foreskin">>None.<</replace>><<StartingGirlsCost>><</link>> |<</if>>
-		<<link "Tiny">><<set $activeSlave.foreskin = 1>><<replace "#foreskin">>Tiny.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Small">><<set $activeSlave.foreskin = 2>><<replace "#foreskin">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Normal">><<set $activeSlave.foreskin = 3>><<replace "#foreskin">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Large">><<set $activeSlave.foreskin = 4>><<replace "#foreskin">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Massive">><<set $activeSlave.foreskin = 5>><<replace "#foreskin">>Massive.<</replace>><<StartingGirlsCost>><</link>>
+		<br>
+		<<if $seeCircumcision == 1>>
+			<<options $activeSlave.foreskin>>
+				''Foreskin:''
+				<<option 0 "Circumcised">> Circumcised.
+				<<option 1 "Tiny">> Tiny.
+				<<option 2 "Small">> Small.
+				<<option 3 "Normal">> Normal.
+				<<option 4 "Large">> Large.
+				<<optiondefault 5 "Massive">>Massive.
+			<</options>>
+		<<else>>
+			<<if $activeSlave.foreskin == 0>><<set $activeSlave.foreskin = 3>><</if>>
+			<<options $activeSlave.foreskin>>
+				''Foreskin:''
+				<<option 1 "Tiny">> Tiny.
+				<<option 2 "Small">> Small.
+				<<option 3 "Normal">> Normal.
+				<<option 4 "Large">> Large.
+				<<optiondefault 5 "Massive">>Massive.
+			<</options>>
+		<</if>>
 	<</if>>
-	<br>''Testicles:''
-	<span id="balls">
-	<<if $activeSlave.balls == 0>>None.
-	<<elseif $activeSlave.balls == 1>>Vestigial.
-	<<elseif $activeSlave.balls == 2>>Small.
-	<<elseif $activeSlave.balls == 3>>Normal.
-	<<elseif $activeSlave.balls == 4>>Large.
-	<<elseif $activeSlave.balls == 5>>Massive.
-	<<else>>Inhuman.<</if>>
-	</span>
-	<<link "No testicles">><<set $activeSlave.balls = 0,$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge>><<replace "#balls">>None.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Vestigial">><<set $activeSlave.balls = 1>><<replace "#balls">>Vestigial.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Small">><<set $activeSlave.balls = 2>><<replace "#balls">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Normal">><<set $activeSlave.balls = 3>><<replace "#balls">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Large">><<set $activeSlave.balls = 4>><<replace "#balls">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-	<<link "Massive">><<set $activeSlave.balls = 5>><<replace "#balls">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-	&nbsp;&nbsp;&nbsp;&nbsp;''Puberty:''<<textbox "$activeSlave.pubertyAgeXY" $activeSlave.pubertyAgeXY "Starting Girls">>
+	<br>
+	<<options $activeSlave.balls>>
+		''Testicles:''
+		<<option 0 "None" "$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge, $activeSlave.scrotum=0">> No testicles.
+		<<option 1 "Vestigial">> Vestigial.
+		<<option 2 "Small">> Small.
+		<<option 3 "Normal">> Normal.
+		<<option 4 "Large">> Large.
+		<<optiondefault 5 "Massive">> Massive.
+	<</options>>
+	<br>
+	<<options $activeSlave.pubertyAgeXY>>
+		''Age of Male Puberty:''
+		<<option>>
+			<<textbox "$activeSlave.pubertyAgeXY" $activeSlave.pubertyAgeXY "Starting Girls">>
+	<</options>>
 	<<if $activeSlave.balls > 0>>
-		&nbsp;&nbsp;&nbsp;&nbsp;''Ballsack:''
-		<span id="scrotum">
-		<<if $activeSlave.scrotum == 0>>None.
-		<<elseif $activeSlave.scrotum == 1>>Tiny.
-		<<elseif $activeSlave.scrotum == 2>>Small.
-		<<elseif $activeSlave.scrotum == 3>>Normal.
-		<<elseif $activeSlave.scrotum == 4>>Large.
-		<<elseif $activeSlave.scrotum == 5>>Massive.
-		<<else>>Inhuman.<</if>>
-		</span>
-		<<link "None">><<set $activeSlave.scrotum = 0>><<replace "#scrotum">>None.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Tiny">><<set $activeSlave.scrotum = 1>><<replace "#scrotum">>Tiny.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Small">><<set $activeSlave.scrotum = 2>><<replace "#scrotum">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Normal">><<set $activeSlave.scrotum = 3>><<replace "#scrotum">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Large">><<set $activeSlave.scrotum = 4>><<replace "#scrotum">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Massive">><<set $activeSlave.scrotum = 5>><<replace "#scrotum">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-		<br>''Puberty:''
-		<span id="Mpub">
-		<<if $activeSlave.pubertyXY == 1>>Postpubescent.
-		<<else>>Prepubescent.
-		<</if>>
-		</span>
-		<<link "Postpubescent">><<set $activeSlave.pubertyXY = 1>><<replace "#Mpub">>Postpubescent.<</replace>><<StartingGirlsCost>><</link>> | <<link "Prepubescent">><<set $activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge>><<replace "#Mpub">>Prepubescent.<</replace>><<StartingGirlsCost>><</link>>
+		<<options $activeSlave.scrotum>>
+			''Ballsack:''
+			<<option 0 "None">> None.
+			<<option 1 "Tiny">> Tiny.
+			<<option 2 "Small">> Small.
+			<<option 3 "Normal">> Normal.
+			<<option 4 "Large">> Large.
+			<<optiondefault 5 "Massive">> Massive.
+		<</options>>
+		<br>
+		<<options $activeSlave.pubertyXY>>
+			''Male Puberty:''
+			<<option 0 "Prepubescent" "$activeSlave.pubertyAgeXY = $potencyAge">> Prepubescent.
+			<<option 1 "Postpubescent">> Postpubescent.
+		<</options>>
 	<</if>>
 <</if>>
-</span>
 
-<br>''Prostate:''
-<span id="prostate">
-<<if $activeSlave.prostate == 1>>Has a prostate.
-<<else>>No prostate.
-<</if>>
-</span>
-<<link "Add Prostate">><<set $activeSlave.prostate = 1>><<replace "#prostate">>Has a prostate.<</replace>><<StartingGirlsCost>><</link>> | <<link "Remove Prostate">><<set $activeSlave.prostate = 0>><<replace "#prostate">>No prostate.<</replace>><<StartingGirlsCost>><</link>>
+<br>
+<<options $activeSlave.prostate>>
+	''Prostate:''
+	<<option 0 "No prostate">> No prostate.
+	<<option 1 "Has a prostate">> Has a prostate.
+<</options>>
 
-<br><br>
-<span id="analSkillsBlock">
-</span>
-<<timed 50ms>>
-	<<StartingGirlsAnalSkill>>
-<</timed>>
-&nbsp;&nbsp;&nbsp;&nbsp;
-''Oral sex:''
-<span id="oralSkill">
-<<if $activeSlave.oralSkill <= 10>>Unskilled.
-<<elseif $activeSlave.oralSkill <= 30>>@@.cyan;Basic.@@
-<<elseif $activeSlave.oralSkill <= 60>>@@.cyan;Skilled.@@
-<<else>>@@.cyan;Expert.@@
+<br>
+<<if $activeSlave.anus == 0>>
+	<<options>>
+		''Anal sex:''
+		<<option>>
+			//Anal virgins cannot be given anal skills//
+	<</options>>
+<<else>>
+	<<options $activeSlave.analSkill>>
+		''Anal sex:''
+		<<optionlte 10 0 "Unskilled">>Unskilled.
+		<<optionlte 30 15 "Basic">>@@.cyan;Basic.@@
+		<<optionlte 60 35 "Skilled">>@@.cyan;Skilled.@@
+		<<optiondefault 65 "Expert">>@@.cyan;Expert.@@
+	<</options>>
 <</if>>
-</span>
-<<link "Unskilled">><<set $activeSlave.oralSkill = 0>><<replace "#oralSkill">>Unskilled.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Basic">><<set $activeSlave.oralSkill = 15>><<replace "#oralSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Skilled">><<set $activeSlave.oralSkill = 35>><<replace "#oralSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Expert">><<set $activeSlave.oralSkill = 65>><<replace "#oralSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
+<br>
+
+<<options $activeSlave.oralSkill>>
+	''Oral sex:''
+	<<optionlte 10 0 "Unskilled">>  Unskilled.
+	<<optionlte 30 15 "Basic">>  @@.cyan;Basic.@@
+	<<optionlte 60 35 "Skilled">>  @@.cyan;Skilled.@@
+	<<optiondefault 65 "Expert">>@@.cyan;Expert.@@
+<</options>>
 
 <br>
-<span id="vaginalSkillsBlock">
-</span>
-<<timed 50ms>>
-	<<StartingGirlsVaginalSkill>>
-<</timed>>
-
-<br>''Prostitution:''
-<span id="whoreSkill">
-<<if $activeSlave.whoreSkill <= 10>>Unskilled.
-<<elseif $activeSlave.whoreSkill <= 30>>@@.cyan;Basic.@@
-<<elseif $activeSlave.whoreSkill <= 60>>@@.cyan;Skilled.@@
-<<else>>@@.cyan;Expert.@@
-<</if>>
-</span>
-<<link "Unskilled">><<set $activeSlave.whoreSkill = 0>><<replace "#whoreSkill">>Unskilled.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Basic">><<set $activeSlave.whoreSkill = 15>><<replace "#whoreSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Skilled">><<set $activeSlave.whoreSkill = 35>><<replace "#whoreSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Expert">><<set $activeSlave.whoreSkill = 65>><<replace "#whoreSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-&nbsp;&nbsp;&nbsp;&nbsp;''Entertainment:''
-<span id="entertainSkill">
-<<if $activeSlave.entertainSkill <= 10>>Unskilled.
-<<elseif $activeSlave.entertainSkill <= 30>>@@.cyan;Basic.@@
-<<elseif $activeSlave.entertainSkill <= 60>>@@.cyan;Skilled.@@
-<<else>>@@.cyan;Expert.@@
-<</if>>
-</span>
-<<link "Unskilled">><<set $activeSlave.entertainSkill = 0>><<replace "#entertainSkill">>Unskilled.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Basic">><<set $activeSlave.entertainSkill = 15>><<replace "#entertainSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Skilled">><<set $activeSlave.entertainSkill = 35>><<replace "#entertainSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Expert">><<set $activeSlave.entertainSkill = 65>><<replace "#entertainSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-
-<br>''Combat:''
-<span id="combatSkill">
-<<if $activeSlave.combatSkill == 0>>Unskilled.
-<<else>>@@.cyan;Skilled.@@
-<</if>>
-</span>
-<<link "Unskilled">><<set $activeSlave.combatSkill = 0>><<replace "#combatSkill">>Unskilled.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-<<link "Skilled">><<set $activeSlave.combatSkill = 1>><<replace "#combatSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-<span id="skillsWarning"></span>
-
-<br>''Intelligence:''
-<span id="intelligence">
-<<if $activeSlave.intelligence > 95>>@@.deepskyblue;Brilliant.@@
-<<elseif $activeSlave.intelligence > 50>>@@.deepskyblue;Very smart.@@
-<<elseif $activeSlave.intelligence > 15>>@@.deepskyblue;Smart.@@
-<<elseif $activeSlave.intelligence >= -15>>Average.
-<<elseif $activeSlave.intelligence >= -50>>@@.orangered;Stupid.@@
-<<elseif $activeSlave.intelligence >= -95>>@@.orangered;Very stupid.@@
-<<else>>@@.orangered;Moronic.@@
-<</if>>
-</span>
-<<link "Brilliant">><<set $activeSlave.intelligence = 100>><<replace "#intelligence">>@@.deepskyblue;Brilliant.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very smart">><<set $activeSlave.intelligence = 60>><<replace "#intelligence">>@@.deepskyblue;Very smart.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Smart">><<set $activeSlave.intelligence = 30>><<replace "#intelligence">>@@.deepskyblue;Smart.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Average intelligence">><<set $activeSlave.intelligence = 0>><<replace "#intelligence">>Average.<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Stupid">><<set $activeSlave.intelligence = -30>><<replace "#intelligence">>@@.orangered;Stupid.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Very stupid">><<set $activeSlave.intelligence = -60>><<replace "#intelligence">>@@.orangered;Very stupid.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Moronic">><<set $activeSlave.intelligence = -100>><<replace "#intelligence">>@@.orangered;Moronic.@@<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Education:''
-<span id="intelligenceImplant">
-<<if $activeSlave.intelligenceImplant >= 30>>@@.deepskyblue;Well educated.@@
-<<elseif $activeSlave.intelligenceImplant >= 15>>@@.deepskyblue;Educated.@@
-<<else>>Uneducated.
-<</if>>
-</span>
-<<link "Well educated">><<set $activeSlave.intelligenceImplant = 30>><<replace "#intelligenceImplant">>@@.deepskyblue;Well educated.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Educated">><<set $activeSlave.intelligenceImplant = 15>><<replace "#intelligenceImplant">>@@.deepskyblue;Educated.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Uneducated">><<set $activeSlave.intelligenceImplant = 0>><<replace "#intelligenceImplant">>Uneducated.<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Fetish:''
-<span id="fetishblock">
-<span id="fetish">
-<<if $activeSlave.fetishKnown == 1>>
-	<<if $activeSlave.fetish == "none">>
-		@@.pink;$activeSlave.fetish.@@
-	<<else>>
-		@@.lightcoral;$activeSlave.fetish.@@
-	<</if>>
+
+<<if $activeSlave.vagina == 0>>
+	<<options>>
+		''Vaginal sex:''
+		<<option>>
+			//Virgins cannot be given vaginal skills//
+	<</options>>
+<<elseif $activeSlave.vagina == -1>>
+	<<options>>
+		''Vaginal sex:''
+		<<option>>
+			//Must have a vagina to have vaginal skills//
+	<</options>>
 <<else>>
-	//Not known.//
-	<<link "Known">>
-		<<ToggleFetish 1>>
-	<</link>>
+	<<options $activeSlave.vagina>>
+		''Vaginal sex:''
+		<<optionlte 10 0  "Unskill">>Unskilled.
+		<<optionlte 30 15 "Basic">>@@.cyan;Basic.@@
+		<<optionlte 60 35 "Skilled">>@@.cyan;Skilled.@@
+		<<optiondefault 65 "Expert">>@@.cyan;Expert.@@
+	<</options>>
 <</if>>
-</span>
+
 <br>
-<<if $activeSlave.fetishKnown == 1>>
-	&nbsp;&nbsp;&nbsp;&nbsp;
-	<<link "Unknown">>
-		<<ToggleFetish 0>>
-	<</link>> |
-	<<link "None">>
-		<<set $activeSlave.fetish = "none", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Sub">>
-		<<set $activeSlave.fetish = "submissive", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Dom">>
-		<<set $activeSlave.fetish = "dom", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Cumslut">>
-		<<set $activeSlave.fetish = "cumslut", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Humiliation">>
-		<<set $activeSlave.fetish = "humiliation", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Buttslut">>
-		<<set $activeSlave.fetish = "buttslut", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Breasts">>
-		<<set $activeSlave.fetish = "boobs", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Pregnancy">>
-		<<set $activeSlave.fetish = "pregnancy", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Sadism">>
-		<<set $activeSlave.fetish = "sadist", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>> |
-	<<link "Masochism">>
-		<<set $activeSlave.fetish = "masochist", $activeSlave.fetishKnown = 1>>
-		<<ToggleFetish 1>>
-	<</link>>
-	<<if $seeExtreme == 1>>
-		| <<link "Mindbroken">>
-			<<set $activeSlave.fetish = "mindbroken", $activeSlave.fetishKnown = 1, $activeSlave.sexualFlaw = "none", $activeSlave.behavioralFlaw = "none", $activeSlave.sexualQuirk = "none", $activeSlave.sexualFlaw = "none">>
-			<<ToggleFetish 1>>
-		<</link>>
-	<</if>>
+<<options $activeSlave.whoreSkill>>
+	''Prostitution:''
+	<<optionlte 10 0 "Unskilled">>  Unskilled.
+	<<optionlte 30 15 "Basic">>  @@.cyan;Basic.@@
+	<<optionlte 60 35 "Skilled">>  @@.cyan;Skilled.@@
+	<<optiondefault 65 "Expert">>@@.cyan;Expert.@@
+<</options>>
+
+<<options $activeSlave.entertainSkill>>
+	''Entertainment:''
+	<<optionlte 10 0 "Unskilled">>  Unskilled.
+	<<optionlte 30 15 "Basic">>  @@.cyan;Basic.@@
+	<<optionlte 60 35 "Skilled">>  @@.cyan;Skilled.@@
+	<<optiondefault 65 "Expert">>@@.cyan;Expert.@@
+<</options>>
 
-<<if $activeSlave.fetish != "none">>
 <br>
-<span id="fetishStrength">
-	''Fetish strength:''
-	<<if $activeSlave.fetishStrength > 95>>
-		@@.lightcoral;High.@@
-	<<elseif $activeSlave.fetishStrength <= 60>>
-		@@.pink;Low.@@
-	<<else>>
-		@@.hotpink;Normal.@@
-	<</if>>
-	<<if $activeSlave.fetishStrength > 60>>
-		<<link "Decrease">>
-			<<ChangeFetishStrength 0>>
-		<</link>>
-	<</if>>
-	<<if ($activeSlave.fetishStrength > 60)>>|<</if>>
-	<<if $activeSlave.fetishStrength <= 95>>
-		<<link "Increase">>
-			<<ChangeFetishStrength 1>>
-		<</link>>
-	<</if>>
-</span>
-<</if>>
+<<options $activeSlave.combatSkill>>
+	''Combat:''
+	<<option 0 "Unskilled">>Unskilled
+	<<option 1 "Skilled">>@@.cyan;Skilled.@@
+<</options>>
+<br>
+<<if $activeSlave.whoreSkill+$activeSlave.entertainSkill+$activeSlave.vaginalSkill+$activeSlave.analSkill+$activeSlave.oralSkill+($activeSlave.combatSkill*100) > 200>>
+	<<options>>
+		<<option>>
+			//@@.red;Starting slaves incur
+			<<if $activeSlave.whoreSkill+$activeSlave.entertainSkill+$activeSlave.vaginalSkill+$activeSlave.analSkill+$activeSlave.oralSkill+($activeSlave.combatSkill*100) > 400>>
+					a severe cost penalty at for being highly
+			<<else>>
+					an additional cost penalty for being
+			<</if>>
+			skilled. This slave's
+			<<if $activeSlave.actualAge >= 25>>
+				<<if $activeSlave.actualAge > 35>>
+					advanced
+				<</if>>
+				age decreases the penalty
+			<<else>>
+				young age requires paying the full penalty
+			<</if>>.
+			@@//
+	<</options>>
+<</if>>
+
+
+<<options $activeSlave.intelligence>>
+	''Intelligence:''
+	<<optionlt -95 -100 "Moronic">>@@.orangered;Moronic.@@
+	<<optionlt -50 -60  "Very stupid">>@@.orangered;Very stupid.@@
+	<<optionlt -15 -30  "Stupid">>@@.orangered;Stupid.@@
+	<<optionlt  15  0   "Average">>Average.
+	<<optionlte 50  30  "Smart">>@@.deepskyblue;Smart.@@
+	<<optionlte 95  60  "Very smart">>@@.deepskyblue;Very smart.@@
+	<<optiondefault 100 "Brilliant">>@@.deepskyblue;Brilliant.@@
+<</options>>
 
-<</if>>
-</span>
+<br>
+<<options $activeSlave.intelligenceImplant>>
+	''Education:''
+	<<optionlt 15 0 "Uneducated">> Uneducated.
+	<<optionlt 30 15 "Educated">> @@.deepskyblue;Educated.@@
+	<<optiondefault 30 "Well educated">> @@.deepskyblue;Well educated.@@
+<</options>>
 
-<br>''Sexuality:''
-<span id="sexuality">
-<span id="attrXY">
-<<if $activeSlave.attrKnown == 1>>
-	<<if $activeSlave.attrXY <= 5>>
-		@@.red;Disgusted by men,@@
-	<<elseif $activeSlave.attrXY <= 15>>
-		@@.red;Turned off by men,@@
-	<<elseif $activeSlave.attrXY <= 35>>
-		@@.red;Not attracted to men,@@
-	<<elseif $activeSlave.attrXY <= 65>>
-		Indifferent to men,
-	<<elseif $activeSlave.attrXY <= 85>>
-		@@.green;Attracted to men,@@
-	<<elseif $activeSlave.attrXY <= 95>>
-		@@.green;Aroused by men,@@
-	<<else>>
-		@@.green;Passionate about men,@@
-	<</if>>
+<br>
+<<if $activeSlave.fetishKnown == 0>>
+	<<options $activeSlave.fetishKnown>>
+		''Fetish:''
+		<<option 0 "Unknown">>
+			//Not known.//
+		<<option 1 "Known">>
+	<</options>>
 <<else>>
-	//Not known.//
-<</if>>
-</span>
-<span id="attrXX">
-<<if $activeSlave.attrKnown == 1>>
-	<<if $activeSlave.attrXX <= 5>>
-		@@.red;disgusted by women.@@
-	<<elseif $activeSlave.attrXX <= 15>>
-		@@.red;turned off by women.@@
-	<<elseif $activeSlave.attrXX <= 35>>
-		@@.red;not attracted to women.@@
-	<<elseif $activeSlave.attrXX <= 65>>
-		indifferent to women.
-	<<elseif $activeSlave.attrXX <= 85>>
-		@@.green;attracted to women.@@
-	<<elseif $activeSlave.attrXX <= 95>>
-		@@.green;aroused by women.@@
+	<<if $seeExtreme != 1>>
+		<<options $activeSlave.fetish>>
+			''Fetish:''
+				<<if $activeSlave.fetish == "none">>
+					@@.pink;$activeSlave.fetish.@@
+				<<else>>
+					@@.lightcoral;$activeSlave.fetish.@@
+				<</if>>
+			<<option ""            "Unknown" "$activeSlave.fetish=either('boobs', 'buttslut', 'cumslut', 'dom', 'humiliation', 'masochist', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'pregnancy', 'sadist', 'submissive'),$activeSlave.fetishKnown=0">>
+			<<option "none"        "None">>
+			<<option "submissive"  "Sub">>
+			<<option "dom"         "Dom">>
+			<<option "cumslut"     "Cumslut">>
+			<<option "humiliation" "Humiliation">>
+			<<option "buttslut"    "Buttslut">>
+			<<option "boobs"       "Breasts">>
+			<<option "pregnancy"   "Pregnancy">>
+			<<option "sadist"      "Sadism">>
+			<<option "masochist"   "Masochism">>
+		<</options>>
 	<<else>>
-		@@.green;passionate about women.@@
+		<<options $activeSlave.fetish>>
+			''Fetish:''
+				<<if $activeSlave.fetish == "none">>
+					@@.pink;$activeSlave.fetish.@@
+				<<else>>
+					@@.lightcoral;$activeSlave.fetish.@@
+				<</if>>
+			<<option ""            "Unknown" "$activeSlave.fetish=either('boobs', 'buttslut', 'cumslut', 'dom', 'humiliation', 'masochist', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'none', 'pregnancy', 'sadist', 'submissive'),$activeSlave.fetishKnown=0">>
+			<<option "none"        "None">>
+			<<option "submissive"  "Sub">>
+			<<option "dom"         "Dom">>
+			<<option "cumslut"     "Cumslut">>
+			<<option "humiliation" "Humiliation">>
+			<<option "buttslut"    "Buttslut">>
+			<<option "boobs"       "Breasts">>
+			<<option "pregnancy"   "Pregnancy">>
+			<<option "sadist"      "Sadism">>
+			<<option "masochist"   "Masochism">>
+			<<option "mindbroken"  "Mindbroken" "$activeSlave.sexualFlaw = 'none', $activeSlave.behavioralFlaw = 'none', $activeSlave.sexualQuirk = 'none', $activeSlave.sexualFlaw = 'none'">>
+		<</options>>
 	<</if>>
-<</if>>
-</span>
-<<if $activeSlave.attrKnown == 1>>
-<<link "Unknown">>
-	<<ToggleSexuality 0>>
-<</link>>
+	/* fetish is known */
+	<<if $activeSlave.fetish != "none">>
+		<br>
+		<<options $activeSlave.fetishStrength>>
+			''Fetish strength:'' $activeSlave.fetishStrength
+			<<if $activeSlave.fetishStrength > 95>>
+				@@.lightcoral;High.@@
+			<<elseif $activeSlave.fetishStrength <= 60>>
+				@@.pink;Low.@@
+			<<else>>
+				@@.hotpink;Normal.@@
+			<</if>>
+			<<option>>
+				<<if $activeSlave.fetishStrength > 60>>
+					[[Decrease|Starting Girls][$activeSlave.fetishStrength -= 5]]
+					<<if $activeSlave.fetishStrength <= 95>>
+						&nbsp;|&nbsp;
+					<</if>>
+				<</if>>
+			<<option>>
+				<<if $activeSlave.fetishStrength <= 95>>
+					[[Increase|Starting Girls][$activeSlave.fetishStrength += 5]]
+				<</if>>
+		<</options>>
+	<</if>> /* Fetish != "none" */
+<</if>> /* fetishKnown */
+<br>
 
-<br>XY attraction:
-<span id="decreaseXY">
-	<<link "Decrease">>
-	<<ChangeAttr 1 0>>
-	<</link>>
-</span>
-<span id="increaseXY">
-|
-	<<link "Increase">>
-	<<ChangeAttr 1 1>>
-	<</link>>
-</span>
-| XX attraction:
-<span id="decreaseXX">
-	<<link "Decrease">>
-	<<ChangeAttr 0 0>>
-	<</link>>
-</span>
-<span id="increaseXX">
-|
-	<<link "Increase">>
-	<<ChangeAttr 0 1>>
-	<</link>>
-</span>
-<br>''Sex drive:''
-<span id="energy">
-<<if $activeSlave.energy == 100>>@@.green;Nympho!@@
-<<elseif $activeSlave.energy > 80>>@@.green;Sex addict.@@
-<<elseif $activeSlave.energy > 60>>@@.green;Powerful.@@
-<<elseif $activeSlave.energy > 40>>@@.yellow;Average.@@
-<<elseif $activeSlave.energy > 20>>@@.red;Poor.@@
-<<else>>@@.red;Frigid.@@<</if>>
-</span>
-<<link "Nympho">><<set $activeSlave.energy = 100, $activeSlave.attrKnown = 1>><<replace "#energy">>@@.green;Nympho!@@<</replace>><<StartingGirlsCost>><</link>>
-| <<link "Sex addict">><<set $activeSlave.energy = 85, $activeSlave.attrKnown = 1>><<replace "#energy">>@@.green;Sex addict.@@<</replace>><<StartingGirlsCost>><</link>>
-| <<link "Powerful">><<set $activeSlave.energy = 65, $activeSlave.attrKnown = 1>><<replace "#energy">>@@.green;Powerful.@@<</replace>><<StartingGirlsCost>><</link>>
-| <<link "Average">><<set $activeSlave.energy = 45, $activeSlave.attrKnown = 1>><<replace "#energy">>@@.yellow;Average.@@<</replace>><<StartingGirlsCost>><</link>>
-| <<link "Poor">><<set $activeSlave.energy = 25, $activeSlave.attrKnown = 1>><<replace "#energy">>@@.red;Poor.@@<</replace>><<StartingGirlsCost>><</link>>
-| <<link "Frigid">><<set $activeSlave.energy = 5, $activeSlave.attrKnown = 1>><<replace "#energy">>@@.red;Frigid.@@<</replace>><<StartingGirlsCost>><</link>>
+<<if $activeSlave.attrKnown == 0>>
+	<<options $activeSlave.attrKnown>>
+		''Sexuality:''
+		<<option 0 "Unknown">>
+			//Not known.//
+		<<option 1 "Known">>
+	<</options>>
 <<else>>
-	<<link "Known">>
-		<<ToggleSexuality 1>>
-	<</link>>
+	<<options $activeSlave.attrXY>>
+		''Sexuality:''
+			<<if $activeSlave.attrXY <= 5>>
+				@@.red;Disgusted by men,@@
+			<<elseif $activeSlave.attrXY <= 15>>
+				@@.red;Turned off by men,@@
+			<<elseif $activeSlave.attrXY <= 35>>
+				@@.red;Not attracted to men,@@
+			<<elseif $activeSlave.attrXY <= 65>>
+				Indifferent to men,
+			<<elseif $activeSlave.attrXY <= 85>>
+				@@.green;Attracted to men,@@
+			<<elseif $activeSlave.attrXY <= 95>>
+				@@.green;Aroused by men,@@
+			<<else>>
+				@@.green;Passionate about men,@@
+			<</if>>
+			<<if $activeSlave.attrXX <= 5>>
+				@@.red;disgusted by women.@@
+			<<elseif $activeSlave.attrXX <= 15>>
+				@@.red;turned off by women.@@
+			<<elseif $activeSlave.attrXX <= 35>>
+				@@.red;not attracted to women.@@
+			<<elseif $activeSlave.attrXX <= 65>>
+				indifferent to women.
+			<<elseif $activeSlave.attrXX <= 85>>
+				@@.green;attracted to women.@@
+			<<elseif $activeSlave.attrXX <= 95>>
+				@@.green;aroused by women.@@
+			<<else>>
+				@@.green;passionate about women.@@
+			<</if>>
+		<<option "" "Unknown" "$activeSlave.attrXX = random(0,100), $activeSlave.attrXY = random(0,100), $activeSlave.energy = random(1,90), $activeSlave.attrKnown = 0">>
+		<<option>>&nbsp;&nbsp;
+			XY (male) attraction:&nbsp;
+			<<if $activeSlave.attrXY > 0>>
+				[[Decrease|Starting Girls][$activeSlave.attrXY = Math.clamp($activeSlave.attrXY-10, 0, 100)]]
+				<<if $activeSlave.attrXY < 100>>
+					&nbsp;|&nbsp;
+				<</if>>
+			<</if>>
+		<<option>>
+			<<if $activeSlave.attrXY < 100>>
+				[[Increase|Starting Girls][$activeSlave.attrXY = Math.clamp($activeSlave.attrXY+10, 0, 100)]]
+			<</if>>
+		<<option>>&nbsp;&nbsp;
+			X (male) attraction:&nbsp;
+			<<if $activeSlave.attrXX > 0>>
+				[[Decrease|Starting Girls][$activeSlave.attrXX = Math.clamp($activeSlave.attrXX-10, 0, 100)]]
+				<<if $activeSlave.attrXX < 100>>
+					&nbsp;|&nbsp;
+				<</if>>
+			<</if>>
+		<<option>>
+			<<if $activeSlave.attrXX < 100>>
+				[[Increase|Starting Girls][$activeSlave.attrXX = Math.clamp($activeSlave.attrXX+10, 0, 100)]]
+			<</if>>
+	<</options>>
+	<br>
+	<<options $activeSlave.energy>>
+		''Sex drive:''
+		<<optionlte 20 5 "Frigid">>@@.red;Frigid.@@
+		<<optionlte 40 25 "Poor">>@@.red;Poor@@
+		<<optionlte 60 45 "Average">>@@.yellow;Average@@
+		<<optionlte 80 65 "Powerful">>@@.green;Powerful@@
+		<<optionlte 99 85 "Sex addict">>@@.green;Sex addict@@
+		<<optiondefault 100 "Nympho">>@@.green;Nympho!@@
+	<</options>>
 <</if>>
-</span>
 
-<br>''Behavioral Flaw:''
-<span id="behavioralFlaw">
-<<if $activeSlave.behavioralFlaw == "none">>
-	//$activeSlave.behavioralFlaw.//
-<<else>>
-	@@.red;$activeSlave.behavioralFlaw.@@
-<</if>>
-</span>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;
-<<link "None">><<set $activeSlave.behavioralFlaw = "none">><<replace "#behavioralFlaw">>//$activeSlave.behavioralFlaw.//<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Arrogant">><<set $activeSlave.behavioralFlaw = "arrogant">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Bitchy">><<set $activeSlave.behavioralFlaw = "bitchy">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Odd">><<set $activeSlave.behavioralFlaw = "odd">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Men">><<set $activeSlave.behavioralFlaw = "hates men">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Women">><<set $activeSlave.behavioralFlaw = "hates women">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Anorexic">><<set $activeSlave.behavioralFlaw = "anorexic">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Gluttonous">><<set $activeSlave.behavioralFlaw = "gluttonous">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Devout">><<set $activeSlave.behavioralFlaw = "devout">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Liberated">><<set $activeSlave.behavioralFlaw = "liberated">><<replace "#behavioralFlaw">>@@.red;$activeSlave.behavioralFlaw.@@<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Behavioral Quirk:''
-<span id="behavioralQuirk">
-<<if $activeSlave.behavioralQuirk == "none">>
-	//$activeSlave.behavioralQuirk.//
-<<else>>
-	@@.green;$activeSlave.behavioralQuirk.@@
-<</if>>
-</span>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;
-<<link "None">><<set $activeSlave.behavioralQuirk = "none">><<replace "#behavioralQuirk">>//$activeSlave.behavioralQuirk.//<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Confident">><<set $activeSlave.behavioralQuirk = "confident">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Cutting">><<set $activeSlave.behavioralQuirk = "cutting">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Funny">><<set $activeSlave.behavioralQuirk = "funny">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Men">><<set $activeSlave.behavioralQuirk = "adores men">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Women">><<set $activeSlave.behavioralQuirk = "adores women">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Insecure">><<set $activeSlave.behavioralQuirk = "insecure">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Fitness">><<set $activeSlave.behavioralQuirk = "fitness">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Sinful">><<set $activeSlave.behavioralQuirk = "sinful">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Advocate">><<set $activeSlave.behavioralQuirk = "advocate">><<replace "#behavioralQuirk">>@@.green;$activeSlave.behavioralQuirk.@@<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Sexual Flaw:''
-<span id="sexualFlaw">
-<<if $activeSlave.sexualFlaw == "none">>
-	//$activeSlave.sexualFlaw.//
-<<else>>
-	@@.red;$activeSlave.sexualFlaw.@@
-<</if>>
-</span>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;
-<<link "None">><<set $activeSlave.sexualFlaw = "none">><<replace "#sexualFlaw">>//$activeSlave.sexualFlaw.//<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Oral">><<set $activeSlave.sexualFlaw = "hates oral">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Anal">><<set $activeSlave.sexualFlaw = "hates anal">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Penetration">><<set $activeSlave.sexualFlaw = "hates penetration">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Repressed">><<set $activeSlave.sexualFlaw = "repressed">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Shamefast">><<set $activeSlave.sexualFlaw = "shamefast">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Apathetic">><<set $activeSlave.sexualFlaw = "apathetic">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Crude">><<set $activeSlave.sexualFlaw = "crude">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Judgemental">><<set $activeSlave.sexualFlaw = "judgemental">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Sexually idealistic">><<set $activeSlave.sexualFlaw = "idealistic">><<replace "#sexualFlaw">>@@.red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</link>>
-
-<br>''Sexual Quirk:''
-<span id="sexualQuirk">
-<<if $activeSlave.sexualQuirk == "none">>
-	//$activeSlave.sexualQuirk.//
-<<else>>
-	@@.green;$activeSlave.sexualQuirk.@@
-<</if>>
-</span>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;
-<<link "None">><<set $activeSlave.sexualQuirk = "none">><<replace "#sexualQuirk">>//$activeSlave.sexualQuirk.//<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Oral">><<set $activeSlave.sexualQuirk = "gagfuck queen">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Anal">><<set $activeSlave.sexualQuirk = "painal queen">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Penetration">><<set $activeSlave.sexualQuirk = "strugglefuck queen">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Perverted">><<set $activeSlave.sexualQuirk = "perverted">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Tease">><<set $activeSlave.sexualQuirk = "tease">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Caring">><<set $activeSlave.sexualQuirk = "caring">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Unflinching">><<set $activeSlave.sexualQuirk = "unflinching">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Size queen">><<set $activeSlave.sexualQuirk = "size queen">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>> |
-<<link "Romantic">><<set $activeSlave.sexualQuirk = "romantic">><<replace "#sexualQuirk">>@@.green;$activeSlave.sexualQuirk.@@<</replace>><<StartingGirlsCost>><</link>>
+<br>
+<<options $activeSlave.behavioralFlaw>>
+	''Behavioral Flaw:''
+		<<if $activeSlave.behavioralFlaw == "none">>
+			//$activeSlave.behavioralFlaw.//
+		<<else>>
+			@@.red;$activeSlave.behavioralFlaw.@@
+		<</if>>
+	<<option "none"        "None">>
+	<<option "arrogant"    "Arrogant">>
+	<<option "bitchy"      "Bitchy">>
+	<<option "odd"         "Odd">>
+	<<option "hates men"   "Men">>
+	<<option "hates women" "Women">>
+	<<option "anorexic"    "Anorexic">>
+	<<option "gluttonous"  "Gluttonous">>
+	<<option "devout"      "Devout">>
+	<<option "liberated"   "Liberated">>
+<</options>>
+<br>
+<<options $activeSlave.behavioralQuirk>>
+	''Behavioral Quirk:''
+		<<if $activeSlave.behavioralQuirk == "none">>
+			//$activeSlave.behavioralQuirk.//
+		<<else>>
+			@@.green;$activeSlave.behavioralQuirk.@@
+		<</if>>
+	<<option "none"         "None" >>
+	<<option "confident"    "Confident" >>
+	<<option "cutting"      "Cutting" >>
+	<<option "funny"        "Funny" >>
+	<<option "adores men"   "Men" >>
+	<<option "adores women" "Women" >>
+	<<option "insecure"     "Insecure" >>
+	<<option "fitness"      "Fitness" >>
+	<<option "sinful"       "Sinful" >>
+	<<option "advocate"     "Advocate" >>
+<</options>>
+<br>
+<<options $activeSlave.sexualFlaw>>
+	''Sexual Flaw:''
+		<<if $activeSlave.sexualFlaw == "none">>
+			//$activeSlave.sexualFlaw.//
+		<<else>>
+			@@.red;$activeSlave.sexualFlaw.@@
+		<</if>>
+	<<option "none" "None">>
+	<<option "hates oral" "Oral">>
+	<<option "hates anal" "Anal">>
+	<<option "hates penetration" "Penetration">>
+	<<option "repressed" "Repressed">>
+	<<option "shamefast" "Shamefast">>
+	<<option "apathetic" "Apathetic">>
+	<<option "crude" "Crude">>
+	<<option "judgemental" "Judgemental">>
+	<<option "idealistic" "Sexually idealistic">>
+<</options>>
 
 <br>
-<span id="finalize">
+<<options $activeSlave.sexualQuirk>>
+	''Sexual Quirk:''
+		<<if $activeSlave.sexualQuirk == "none">>
+			//$activeSlave.sexualQuirk.//
+		<<else>>
+			@@.green;$activeSlave.sexualQuirk.@@
+		<</if>>
+	<<option "none" "None">>
+	<<option "gagfuck queen" "Oral">>
+	<<option "painal queen" "Anal">>
+	<<option "strugglefuck queen" "Penetration">>
+	<<option "perverted" "Perverted">>
+	<<option "tease" "Tease">>
+	<<option "caring" "Caring">>
+	<<option "unflinching" "Unflinching">>
+	<<option "size queen" "Size queen">>
+	<<option "romantic" "Romantic">>
+<</options>>
+<br>
+
 <<StartingSlaveCost $activeSlave>>
 <<if $cash >= $slaveCost>>
 	<<if $activeSlave.prestige>>
@@ -1586,7 +1584,6 @@ Her nationality is $activeSlave.nationality.
 <</if>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 [[Discard this slave and continue|Acquisition]]
-</span>
 
 <br><br>__Archetypes:__&nbsp;&nbsp;&nbsp;&nbsp;//Convenient combinations of slave attributes//
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
@@ -1594,9 +1591,7 @@ Her nationality is $activeSlave.nationality.
 	<<set $archetyped = 1, $activeSlave.nationality = "Irish", $fixedNationality = "Irish">>
 	<<StartingGirlsWorkaround>>
 	<<set $activeSlave.race = "white", $activeSlave.eyeColor = "green", $activeSlave.skin = "fair", $activeSlave.hColor = "red", $activeSlave.pubicHColor = "red", $activeSlave.markings = "heavily freckled">>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-	<<StartingGirlsCost>>
+	<<goto "Starting Girls">>
 <</link>>
 //A beautiful flower from the Emerald Isle//
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
@@ -1604,27 +1599,21 @@ Her nationality is $activeSlave.nationality.
 	<<set $archetyped = 1, $activeSlave.nationality = "American", $fixedNationality = "American">>
 	<<StartingGirlsWorkaround>>
 	<<set $activeSlave.eyeColor = "blue", $activeSlave.skin = "tanned", $activeSlave.hColor = "blonde", $activeSlave.pubicHColor = "blonde", $activeSlave.markings = "none", $activeSlave.face = 95, $activeSlave.muscles = 20, $activeSlave.weight = -20, $activeSlave.height = Math.round(Height.forAge(190, $activeSlave))>>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-	<<StartingGirlsCost>>
+	<<goto "Starting Girls">>
 <</link>>
 //Tall, taut, and tan//
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 <<link "Novice">>
 	<<StartingGirlsWorkaround>>
 	<<set $activeSlave.analSkill = 0, $activeSlave.oralSkill = 0, $activeSlave.vaginalSkill = 0, $activeSlave.whoreSkill = 0, $activeSlave.entertainSkill = 0, $activeSlave.combatSkill = 0, $activeSlave.actualAge = 18, $activeSlave.visualAge = 18, $activeSlave.physicalAge = 18, $activeSlave.fetishKnown = 0, $activeSlave.attrKnown = 0>>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-	<<StartingGirlsCost>>
+	<<goto "Starting Girls">>
 <</link>>
 //Train your own and save//
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 <<link "Head Girl Prospect">>
 	<<StartingGirlsWorkaround>>
 	<<set $activeSlave.career = setup.HGCareers.random(), $activeSlave.actualAge = Math.clamp(36, 44, $activeSlave.actualAge), $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.intelligence = 70, $activeSlave.intelligenceImplant = 0>>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-	<<StartingGirlsCost>>
+	<<goto "Starting Girls">>
 <</link>>
 //Inexpensive potential to become a great right hand woman//
 <<if $seeExtreme != 0>>
@@ -1632,18 +1621,14 @@ Her nationality is $activeSlave.nationality.
 <<link "Wellspring">>
 	<<StartingGirlsWorkaround>>
 	<<set $activeSlave.analSkill = 0, $activeSlave.oralSkill = 0, $activeSlave.vaginalSkill = 0, $activeSlave.whoreSkill = 0, $activeSlave.entertainSkill = 0, $activeSlave.combatSkill = 0, $activeSlave.actualAge = 18, $activeSlave.visualAge = 18, $activeSlave.physicalAge = 18, $activeSlave.fetishKnown = 0, $activeSlave.attrKnown = 0, $activeSlave.health = 10, $activeSlave.intelligence = -100, $activeSlave.intelligenceImplant = 0, $activeSlave.vagina = 3, $activeSlave.anus = 3, $activeSlave.ovaries = 1, $activeSlave.dick = 5, $activeSlave.balls = 5, $activeSlave.prostate = 1, $activeSlave.lactation = 2, $activeSlave.lactationDuration = 2, $activeSlave.nipples = "huge", $activeSlave.boobs = 10000>>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-	<<StartingGirlsCost>>
+	<<goto "Starting Girls">>
 <</link>>
 //Capable of producing all kinds of useful fluids//
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 <<link "Onahole">>
 	<<StartingGirlsWorkaround>>
 	<<set $activeSlave.analSkill = 0, $activeSlave.oralSkill = 0, $activeSlave.vaginalSkill = 0, $activeSlave.whoreSkill = 0, $activeSlave.entertainSkill = 0, $activeSlave.combatSkill = 0, $activeSlave.fetish = "mindbroken", $activeSlave.amp = 1, $activeSlave.voice = 0, $activeSlave.eyes = 1, $activeSlave.hears = 0>>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-	<<StartingGirlsCost>>
+	<<goto "Starting Girls">>
 <</link>>
 //A living cocksleeve//
 <</if>>
@@ -1657,7 +1642,7 @@ Her nationality is $activeSlave.nationality.
 	<<link _nation>>
 		<<set $fixedNationality = setup.baseNationalities[" + _sg + "]>>
 		<<StartingGirlsWorkaround>>
-		<<StartingGirlsRefresh>>
+		<<goto 'Starting Girls'>>
 		<<SaleDescription>>
 	<</link>>
 	">>
diff --git a/src/utility/slaveCreationWidgets.tw b/src/utility/slaveCreationWidgets.tw
index fc445c9fda38d31ac0608564f74dee09da139bbc..a12a59a6fb45665a7e54dbe520d33365864d5896 100644
--- a/src/utility/slaveCreationWidgets.tw
+++ b/src/utility/slaveCreationWidgets.tw
@@ -31,653 +31,6 @@
 	<<set $activeSlave.boobs = Math.clamp(Math.trunc($activeSlave.boobs/50)*50, 0, 50000) || 200>>
 <</widget>>
 
-/%
- Call as <<StartingGirlsRefresh>>
-%/
-<<widget "StartingGirlsRefresh">>
-
-	<<replace "#devotion">>
-		@@.yellow;Ambivalent.@@
-	<</replace>>
-
-	<<replace "#trust">>
-		@@.yellow;Fearful.@@
-	<</replace>>
-
-	<<replace "#legal">>
-		Slave.
-	<</replace>>
-
-	<<replace "#voice">>
-		<<if $activeSlave.voice == 0>>Mute.
-		<<elseif $activeSlave.voice == 1>>Deep.
-		<<elseif $activeSlave.voice == 2>>Normal.
-		<<elseif $activeSlave.voice == 3>>High.
-		<</if>>
-	<</replace>>
-
-	<<replace "#language">>
-		''$language:''
-		<<if $activeSlave.voice == 0>>
-		<<elseif $activeSlave.accent == 0>>Unaccented.
-		<<elseif $activeSlave.accent == 1>>Pretty <<if $activeSlave.nationality == "a Cook Islander">>Cook Islander<<elseif $activeSlave.nationality == "a Liechtensteiner">>Liechtensteiner<<elseif $activeSlave.nationality == "a New Zealander">>New Zealander<<elseif $activeSlave.nationality == "a Solomon Islander">>Solomon Islander<<else>>$activeSlave.nationality<</if>> accent.
-		<<elseif $activeSlave.accent == 2>>Thick <<if $activeSlave.nationality == "a Cook Islander">>Cook Islander<<elseif $activeSlave.nationality == "a Liechtensteiner">>Liechtensteiner<<elseif $activeSlave.nationality == "a New Zealander">>New Zealander<<elseif $activeSlave.nationality == "a Solomon Islander">>Solomon Islander<<else>>$activeSlave.nationality<</if>> accent.
-		<<else>>Not fluent.
-		<</if>>
-	<</replace>>
-
-	<<replace "#age">>
-		<<textbox "$activeSlave.actualAge" $activeSlave.actualAge "Starting Girls">>
-	<</replace>>
-
-	<<replace "#health">>
-		@@.yellow;Healthy.@@
-	<</replace>>
-
-	<<replace "#originalSex">>
-		$activeSlave.genes.
-	<</replace>>
-
-	<<replace "#muscles">>
-		Normal.
-	<</replace>>
-
-	<<replace "#waist">>
-		Normal.
-	<</replace>>
-
-	<<if $seeExtreme == 1>>
-		<<replace "#amp">>
-			<<if $activeSlave.amp == 1>>Amputee.
-			<<else>>Normal.
-			<</if>>
-		<</replace>>
-	<</if>>
-
-	<<replace "#height">>
-		<<if $activeSlave.height < 150>>Petite.
-		<<elseif $activeSlave.height < 160>>Short.
-		<<elseif $activeSlave.height < 170>>Average.
-		<<elseif $activeSlave.height < 185>>Tall.
-		<<else>>Very tall.
-		<</if>>
-		<<textbox "$activeSlave.height" $activeSlave.height "Starting Girls">> <<= heightToEitherUnit($activeSlave.height)>>
-	<</replace>>
-
-	<<replace "#weight">>
-		<<if $activeSlave.weight < -95>>@@.red;Emaciated.@@
-		<<elseif $activeSlave.weight < -30>>@@.red;Skinny.@@
-		<<elseif $activeSlave.weight < -10>>Thin.
-		<<elseif $activeSlave.weight <= 10>>Average.
-		<<elseif $activeSlave.weight <= 30>>Plush.
-		<<elseif $activeSlave.weight <= 95>>@@.red;Chubby.@@
-		<<elseif $activeSlave.weight <= 130>>@@.red;Fat.@@
-		<<elseif $activeSlave.weight <= 160>>@@.red;Obese.@@
-		<<elseif $activeSlave.weight <= 190>>@@.red;Super obese.@@
-		<<else>>@@.red;Dangerously obese.@@
-		<</if>>
-	<</replace>>
-
-	<<if $seeRace == 1>>
-		<<replace "#ethnicity">>
-		<<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">>
-		<</replace>>
-	<</if>>
-
-	<<replace "#skin">>
-		<<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">>
-	<</replace>>
-
-	<<replace "#faceShape">>
-		$activeSlave.faceShape
-	<</replace>>
-
-	<<replace "#face">>
-		<<if $activeSlave.face < -95>>Very ugly.
-		<<elseif $activeSlave.face < -40>>Ugly.
-		<<elseif $activeSlave.face < -10>>Unattractive.
-		<<elseif $activeSlave.face <= 10>>Average.
-		<<elseif $activeSlave.face <= 40>>Attractive.
-		<<elseif $activeSlave.face <= 95>>Beautiful.
-		<<else>>Very beautiful.
-		<</if>>
-	<</replace>>
-
-	<<replace "#lips">>
-		<<if $activeSlave.lips <= 10>>Thin.
-		<<elseif $activeSlave.lips <= 20>>Normal.
-		<<elseif $activeSlave.lips <= 40>>Pretty.
-		<<elseif $activeSlave.lips <= 70>>Plush.
-		<<elseif $activeSlave.lips <= 95>>Huge.
-		<<else>>Facepussy.
-		<</if>>
-	<</replace>>
-
-	<<replace "#teeth">>
-		<<if $activeSlave.teeth == "crooked">>Crooked.
-		<<elseif $activeSlave.teeth == "gapped">>Gapped.
-		<<elseif $activeSlave.teeth == "straightening braces">>Braces.
-		<<elseif $activeSlave.teeth == "baby">>Baby.
-		<<elseif $activeSlave.teeth == "mixed">>Mixed.
-		<<else>>Straight.
-		<</if>>
-	<</replace>>
-
-	<<replace "#vision">>
-		<<if $seeExtreme == 1>>
-			<<if $activeSlave.eyes == -2>>Blind.
-			<<elseif $activeSlave.eyes == -1>>Nearsighted.
-			<<else>>Normal.
-			<</if>>
-		<<else>>
-			<<if $activeSlave.eyes == -1>>Nearsighted.
-			<<else>>Normal.
-			<</if>>
-		<</if>>
-	<</replace>>
-
-	<<replace "#hearing">>
-		<<if $seeExtreme == 1>>
-			<<if $activeSlave.hears == -2>>Deaf.
-			<<elseif $activeSlave.hears == -1>>Hard of hearing.
-			<<else>>Normal.
-			<</if>>
-		<<else>>
-			<<if $activeSlave.hears == -1>>Hard of hearing.
-			<<else>>Normal.
-			<</if>>
-		<</if>>
-	<</replace>>
-
-	<<replace "#boobs">>
-		<<if $activeSlave.boobs <= 200>>Flat.
-		<<elseif $activeSlave.boobs <= 500>>Healthy.
-		<<elseif $activeSlave.boobs <= 800>>Large.
-		<<elseif $activeSlave.boobs <= 1200>>Very Large.
-		<<elseif $activeSlave.boobs <= 2000>>Huge.
-		<<elseif $activeSlave.boobs <= 4000>>Massive.
-		<<elseif $activeSlave.boobs <= 6000>>Monstrous.
-		<<else>>Science experiment.
-		<</if>>
-		<<textbox "$activeSlave.boobs" $activeSlave.boobs "Starting Girls">> CCs
-	<</replace>>
-
-	<<replace "#lactation">>
-		<<if $activeSlave.lactation == 2>>Artificial.
-		<<elseif $activeSlave.lactation == 1>>Natural.
-		<<else>>None.
-		<</if>>
-	<</replace>>
-
-	<<replace "#nipples">>
-		$activeSlave.nipples
-	<</replace>>
-
-	<<replace "#areolae">>
-		<<if $activeSlave.areolae == 1>>
-		Large.
-		<<elseif $activeSlave.areolae == 2>>
-			Wide.
-		<<elseif $activeSlave.areolae == 3>>
-			Huge.
-		<<elseif $activeSlave.areolae == 4>>
-			Massive.
-		<<else>>
-			Normal.
-		<</if>>
-	<</replace>>
-
-	<<replace "#shoulders">>
-		<<if $activeSlave.shoulders < -1>>Very narrow.
-		<<elseif $activeSlave.shoulders < 0>>Narrow.
-		<<elseif $activeSlave.shoulders > 1>>Very broad.
-		<<elseif $activeSlave.shoulders > 0>>Broad.
-		<<else>>Feminine.
-		<</if>>
-	<</replace>>
-
-	<<replace "#hips">>
-		<<if $activeSlave.hips < -1>>Very narrow.
-		<<elseif $activeSlave.hips < 0>>Narrow.
-		<<elseif $activeSlave.hips > 1>>Very broad.
-		<<elseif $activeSlave.hips > 0>>Broad.
-		<<else>>Normal.
-		<</if>>
-	<</replace>>
-
-	<<replace "#butt">>
-		<<if $activeSlave.butt == 0>>Flat.
-		<<elseif $activeSlave.butt < 2>>Small.
-		<<elseif $activeSlave.butt < 3>>Plump.
-		<<elseif $activeSlave.butt < 4>>Big.
-		<<elseif $activeSlave.butt < 5>>Huge.
-		<<elseif $activeSlave.butt < 6>>Enormous.
-		<<elseif $activeSlave.butt < 7>>Gigantic.
-		<<else>>Massive.
-		<</if>>
-	<</replace>>
-
-	<<replace "#anus">>
-		<<if $activeSlave.anus == 0>>@@.lime;Virgin.@@
-		<<elseif $activeSlave.anus == 1>>Normal.
-		<<elseif $activeSlave.anus == 2>>Veteran.
-		<<else>>Gaping.
-		<</if>>
-	<</replace>>
-
-	<<replace "#vagina">>
-		<<if $activeSlave.vagina == -1>>//No vagina.//
-		<<elseif $activeSlave.vagina == 0>>@@.lime;Virgin.@@
-		<<elseif $activeSlave.vagina == 1>>Normal.
-		<<elseif $activeSlave.vagina == 2>>Veteran.
-		<<else>>Gaping.
-		<</if>>
-	<</replace>>
-
-	<<replace "#vaginablock">>
-		<<if $activeSlave.vagina > -1>>
-		<br>
-		&nbsp;&nbsp;&nbsp;&nbsp;
-		''Clit:''
-		<span id="clit">
-			<<if $activeSlave.clit == 0>>Normal.
-			<<elseif $activeSlave.clit == 1>>Large.
-			<<else>>Huge.
-			<</if>>
-		</span>
-		<<link "Normal">>
-			<<set $activeSlave.clit = 0>>
-			<<replace #clit>>
-				Normal.
-			<</replace>>
-		<</link>>
-		|
-		<<link "Large">>
-			<<set $activeSlave.clit = 1>>
-			<<replace #clit>>
-				Large.
-			<</replace>>
-		<</link>>
-		|
-		<<link "Huge">>
-			<<set $activeSlave.clit = 2>>
-			<<replace #clit>>
-				Huge.
-			<</replace>>
-		<</link>>
-		<</if>>
-		<br>
-		&nbsp;&nbsp;&nbsp;&nbsp;
-		''Labia:''
-		<span id="labia">
-			<<if $activeSlave.labia == 2>>Huge.
-			<<elseif $activeSlave.labia == 1>>Large.
-			<<else>>Normal.
-			<</if>>
-		</span>
-		<<link "Normal">>
-			<<set $activeSlave.labia = 0>>
-			<<replace #labia>>
-				Normal.
-			<</replace>>
-		<</link>>
-		|
-		<<link "Large">>
-			<<set $activeSlave.labia = 1>>
-			<<replace #labia>>
-				Large.
-			<</replace>>
-		<</link>>
-		|
-		<<link "Huge">>
-			<<set $activeSlave.labia = 2>>
-			<<replace #labia>>
-				Huge.
-			<</replace>>
-		<</link>>
-
-		<br>
-
-		''Vaginal wetness:''
-		<span id="wetness">
-		<<if $activeSlave.vaginaLube == 0>>Dry.
-		<<elseif $activeSlave.vaginaLube == 1>>Normal.
-		<<else>>Excessive.
-		<</if>>
-		</span>
-		<<link "Dry">><<set $activeSlave.vaginaLube = 0>><<replace "#wetness">>Dry.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Normal">><<set $activeSlave.vaginaLube = 1>><<replace "#wetness">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Excessive">><<set $activeSlave.vaginaLube = 2>><<replace "#wetness">>Excessive.<</replace>><<StartingGirlsCost>><</link>>
-
-		<br>
-
-		''Pregnancy:''
-		<span id="preg">
-		<<if $activeSlave.preg > 39>>Ready to drop.
-		<<elseif $activeSlave.preg > 30>>Advanced.
-		<<elseif $activeSlave.preg > 20>>Showing.
-		<<elseif $activeSlave.preg > 10>>Early.
-		<<elseif $activeSlave.preg > -2>>None.
-		<<else>>Barren.
-		<</if>>
-		</span>
-		<<link "Ready to Drop">><<set $activeSlave.preg = 40,$activeSlave.pregType = 1,$activeSlave.pregWeek = 40,$activeSlave.pregKnown = 1,$activeSlave.belly = 15000,$activeSlave.bellyPreg = 15000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Ready to drop.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Advanced">><<set $activeSlave.preg = 34,$activeSlave.pregType = 1,$activeSlave.pregWeek = 34,$activeSlave.pregKnown = 1,$activeSlave.belly = 10000,$activeSlave.bellyPreg = 10000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Advanced.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Showing">><<set $activeSlave.preg = 27,$activeSlave.pregType = 1,$activeSlave.pregWeek = 27,$activeSlave.pregKnown = 1,$activeSlave.belly = 5000,$activeSlave.bellyPreg = 5000,$activeSlave.pubertyXX = 1>><<replace "#preg">>Showing.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Early">><<set $activeSlave.preg = 12,$activeSlave.pregType = 1,$activeSlave.pregWeek = 12,$activeSlave.pregKnown = 1,$activeSlave.belly = 100,$activeSlave.bellyPreg = 100,$activeSlave.pubertyXX = 1>><<replace "#preg">>Early.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "None">><<set $activeSlave.preg = 0,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0>><<run WombFlush($activeSlave)>><<replace "#preg">>None.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Barren">><<set $activeSlave.preg = -2,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0>><<run WombFlush($activeSlave)>><<replace "#preg">>Barren.<</replace>><<StartingGirlsCost>><</link>>
-		<br>''Puberty:''
-		<span id="pub">
-		<<if $activeSlave.pubertyXX == 1>>Postpubescent.
-		<<else>>Prepubescent.
-		<</if>>
-		</span>
-		<<textbox "$activeSlave.pubertyAgeXX" $activeSlave.pubertyAgeXX "Starting Girls">>
-		<<link "Postpubescent">><<set $activeSlave.pubertyXX = 1>><<replace "#pub">>Postpubescent.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Prepubescent">><<set $activeSlave.pubertyXX = 0,$activeSlave.pubertyAgeXX = $fertilityAge,$activeSlave.preg = 0,$activeSlave.pregType = 0,$activeSlave.belly = 0,$activeSlave.bellyPreg = 0,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0>><<run WombFlush($activeSlave)>><<replace "#pub">>Prepubescent.<</replace>><<StartingGirlsCost>><</link>>
-		<<if $PC.dick == 1>>
-		<br> ''Father:''
-		<span id="father">
-		<<if $activeSlave.pregSource == -1>>My child.
-		<<else>>
-		<</if>>
-		</span>
-		<<link "Carrying my child">><<set $activeSlave.pregSource = -1>><<replace "#father">>My child.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Clear">><<set $activeSlave.pregSource = 0>><<replace "#father">><</replace>><<StartingGirlsCost>><</link>>
-		<</if>>
-	<</replace>>
-
-	<<replace "#dickblock">>
-	<<if $seeDicks != 0 || $makeDicks == 1>>
-		<br>''Penis:''
-		<span id="dick">
-		<<if $activeSlave.dick == 0>>None.
-		<<elseif $activeSlave.dick == 1>>Tiny.
-		<<elseif $activeSlave.dick == 2>>Small.
-		<<elseif $activeSlave.dick == 3>>Normal.
-		<<elseif $activeSlave.dick == 4>>Large.
-		<<else>>Massive.<</if>>
-		</span>
-		<<link "No penis">><<set $activeSlave.dick = 0,$activeSlave.balls = 0,$activeSlave.clit = 0,$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge>><<replace "#dick">>None.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Tiny">><<set $activeSlave.dick = 1,$activeSlave.clit = 0>><<replace "#dick">>Tiny.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Small">><<set $activeSlave.dick = 2,$activeSlave.clit = 0>><<replace "#dick">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Normal">><<set $activeSlave.dick = 3,$activeSlave.clit = 0>><<replace "#dick">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Large">><<set $activeSlave.dick = 4,$activeSlave.clit = 0>><<replace "#dick">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Massive">><<set $activeSlave.dick = 5,$activeSlave.clit = 0>><<replace "#dick">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-		<<if $activeSlave.dick > 0>>
-			&nbsp;&nbsp;&nbsp;&nbsp;''Foreskin:''
-			<span id="foreskin">
-			<<if $activeSlave.foreskin == 0>>None.
-			<<elseif $activeSlave.foreskin == 1>>Tiny.
-			<<elseif $activeSlave.foreskin == 2>>Small.
-			<<elseif $activeSlave.foreskin == 3>>Normal.
-			<<elseif $activeSlave.foreskin == 4>>Large.
-			<<else>>Massive.<</if>>
-			</span>
-			<<if $seeCircumcision == 1>><<link "Circumcised">><<set $activeSlave.foreskin = 0>><<replace "#foreskin">>None.<</replace>><<StartingGirlsCost>><</link>> |<</if>>
-			<<link "Tiny">><<set $activeSlave.foreskin = 1>><<replace "#foreskin">>Tiny.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Small">><<set $activeSlave.foreskin = 2>><<replace "#foreskin">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Normal">><<set $activeSlave.foreskin = 3>><<replace "#foreskin">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Large">><<set $activeSlave.foreskin = 4>><<replace "#foreskin">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Massive">><<set $activeSlave.foreskin = 5>><<replace "#foreskin">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-		<</if>>
-		<br>''Testicles:''
-		<span id="balls">
-		<<if $activeSlave.balls == 0>>None.
-		<<elseif $activeSlave.balls == 1>>Vestigial.
-		<<elseif $activeSlave.balls == 2>>Small.
-		<<elseif $activeSlave.balls == 3>>Normal.
-		<<elseif $activeSlave.balls == 4>>Large.
-		<<else>>Massive.<</if>>
-		</span>
-		<<link "No testicles">><<set $activeSlave.balls = 0,$activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge>><<replace "#balls">>None.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Vestigial">><<set $activeSlave.balls = 1>><<replace "#balls">>Vestigial.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Small">><<set $activeSlave.balls = 2>><<replace "#balls">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Normal">><<set $activeSlave.balls = 3>><<replace "#balls">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Large">><<set $activeSlave.balls = 4>><<replace "#balls">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-		<<link "Massive">><<set $activeSlave.balls = 5>><<replace "#balls">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-		&nbsp;&nbsp;&nbsp;&nbsp;''Puberty:''<<textbox "$activeSlave.pubertyAgeXY" $activeSlave.pubertyAgeXY "Starting Girls">>
-		<<if $activeSlave.balls > 0>>
-			&nbsp;&nbsp;&nbsp;&nbsp;''Ballsack:''
-			<span id="scrotum">
-			<<if $activeSlave.scrotum == 0>>None.
-			<<elseif $activeSlave.scrotum == 1>>Tiny.
-			<<elseif $activeSlave.scrotum == 2>>Small.
-			<<elseif $activeSlave.scrotum == 3>>Normal.
-			<<elseif $activeSlave.scrotum == 4>>Large.
-			<<else>>Massive.<</if>>
-			</span>
-			<<link "None">><<set $activeSlave.scrotum = 0>><<replace "#scrotum">>None.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Tiny">><<set $activeSlave.scrotum = 1>><<replace "#scrotum">>Tiny.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Small">><<set $activeSlave.scrotum = 2>><<replace "#scrotum">>Small.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Normal">><<set $activeSlave.scrotum = 3>><<replace "#scrotum">>Normal.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Large">><<set $activeSlave.scrotum = 4>><<replace "#scrotum">>Large.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Massive">><<set $activeSlave.scrotum = 5>><<replace "#scrotum">>Massive.<</replace>><<StartingGirlsCost>><</link>>
-			<br>''Puberty:''
-			<span id="Mpub">
-			<<if $activeSlave.pubertyXY == 1>>Postpubescent.
-			<<else>>Prepubescent.
-			<</if>>
-			</span>
-			<<link "Postpubescent">><<set $activeSlave.pubertyXY = 1>><<replace "#Mpub">>Postpubescent.<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Prepubescent">><<set $activeSlave.pubertyXY = 0,$activeSlave.pubertyAgeXY = $potencyAge>><<replace "#Mpub">>Prepubescent.<</replace>><<StartingGirlsCost>><</link>>
-		<</if>>
-	<</if>>
-	<</replace>>
-
-	<<replace "#prostate">>
-		<<if $activeSlave.prostate == 1>>Has a prostate.
-		<<else>>No prostate.
-		<</if>>
-	<</replace>>
-
-	<<replace "#analSkillsBlock">>
-		<<if $activeSlave.anus == 0>>
-			//Anal virgins cannot be given anal skills//
-		<<else>>
-			''Anal sex:''
-			<span id = "analSkill">
-			<<if $activeSlave.analSkill <= 10>>Unskilled.
-			<<elseif $activeSlave.analSkill <= 30>>@@.cyan;Basic.@@
-			<<elseif $activeSlave.analSkill <= 60>>@@.cyan;Skilled.@@
-			<<else>>@@.cyan;Expert.@@
-			<</if>>
-			</span>
-			<<if $activeSlave.anus < 3>><<link "Unskilled">><<set $activeSlave.analSkill = 0>><<replace "#analSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</link>> |<</if>>
-			<<link "Basic">><<set $activeSlave.analSkill = 15>><<replace "#analSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Skilled">><<set $activeSlave.analSkill = 35>><<replace "#analSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Expert">><<set $activeSlave.analSkill = 65>><<replace "#analSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><</link>>
-		<</if>>
-	<</replace>>
-
-	<<replace "#oralSkill">>
-		<<if $activeSlave.oralSkill <= 10>>Unskilled.
-		<<elseif $activeSlave.oralSkill <= 30>>@@.cyan;Basic.@@
-		<<elseif $activeSlave.oralSkill <= 60>>@@.cyan;Skilled.@@
-		<<else>>@@.cyan;Expert.@@
-		<</if>>
-	<</replace>>
-
-	<<replace "#vaginalSkillsBlock">>
-		<<if $activeSlave.vagina == 0>>
-			//Virgins cannot be given vaginal skills//
-		<<elseif $activeSlave.vagina == -1>>
-			//Must have a vagina to have vaginal skills//
-		<<else>>
-			''Vaginal sex:''
-			<span id = "vaginalSkill">
-			<<if $activeSlave.vaginalSkill <= 10>>Unskilled.
-			<<elseif $activeSlave.vaginalSkill <= 30>>@@.cyan;Basic.@@
-			<<elseif $activeSlave.vaginalSkill <= 60>>@@.cyan;Skilled.@@
-			<<else>>@@.cyan;Expert.@@
-			<</if>>
-			</span>
-			<<if $activeSlave.vagina < 3>><<link "Unskilled">><<set $activeSlave.vaginalSkill = 0>><<replace "#vaginalSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</link>> |<</if>>
-			<<link "Basic">><<set $activeSlave.vaginalSkill = 15>><<replace "#vaginalSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Skilled">><<set $activeSlave.vaginalSkill = 35>><<replace "#vaginalSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</link>> |
-			<<link "Expert">><<set $activeSlave.vaginalSkill = 65>><<replace "#vaginalSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><</link>>
-		<</if>>
-	<</replace>>
-
-	<<replace "#whoreSkill">>
-		<<if $activeSlave.whoreSkill <= 10>>Unskilled.
-		<<elseif $activeSlave.whoreSkill <= 30>>@@.cyan;Basic.@@
-		<<elseif $activeSlave.whoreSkill <= 60>>@@.cyan;Skilled.@@
-		<<else>>@@.cyan;Expert.@@
-		<</if>>
-	<</replace>>
-
-	<<replace "#entertainSkill">>
-		<<if $activeSlave.entertainSkill <= 10>>Unskilled.
-		<<elseif $activeSlave.entertainSkill <= 30>>@@.cyan;Basic.@@
-		<<elseif $activeSlave.entertainSkill <= 60>>@@.cyan;Skilled.@@
-		<<else>>@@.cyan;Expert.@@
-		<</if>>
-	<</replace>>
-
-	<<replace "#combatSkill">>
-		<<if $activeSlave.combatSkill == 0>>Unskilled.
-		<<else>>@@.cyan;Skilled.@@
-		<</if>>
-	<</replace>>
-
-	<<replace "#intelligence">>
-		<<if $activeSlave.intelligence > 95>>@@.deepskyblue;Brilliant.@@
-		<<elseif $activeSlave.intelligence > 50>>@@.deepskyblue;Very smart.@@
-		<<elseif $activeSlave.intelligence > 15>>@@.deepskyblue;Smart.@@
-		<<elseif $activeSlave.intelligence >= -15>>Average.
-		<<elseif $activeSlave.intelligence >= -50>>@@.orangered;Stupid.@@
-		<<elseif $activeSlave.intelligence >= -95>>@@.orangered;Very stupid.@@
-		<<else>>@@.orangered;Moronic.@@
-		<</if>>
-	<</replace>>
-
-	<<replace "#intelligenceImplant">>
-		<<if $activeSlave.intelligenceImplant >= 30>>@@.deepskyblue;Well educated.@@
-		<<elseif $activeSlave.intelligenceImplant >= 15>>@@.deepskyblue;Educated.@@
-		<<else>>Uneducated.
-		<</if>>
-	<</replace>>
-
-	<<if $activeSlave.fetishKnown == 1>>
-		<<ToggleFetish 1>>
-	<<else>>
-		<<ToggleFetish 0>>
-	<</if>>
-
-	<<if $activeSlave.attrKnown == 1>>
-		<<ToggleSexuality 1>>
-	<<else>>
-		<<ToggleSexuality 0>>
-	<</if>>
-
-	<<replace "#behavioralFlaw">>
-		<<if $activeSlave.behavioralFlaw == "none">>
-		//$activeSlave.behavioralFlaw.//
-		<<else>>
-			@@.red;$activeSlave.behavioralFlaw.@@
-		<</if>>
-	<</replace>>
-
-	<<replace "#sexualFlaw">>
-		<<if $activeSlave.sexualFlaw == "none">>
-			//$activeSlave.sexualFlaw.//
-		<<else>>
-			@@.red;$activeSlave.sexualFlaw.@@
-		<</if>>
-	<</replace>>
-<</widget>>
-
-/%
- Call as <<StartingGirlsWarnings>>
-%/
-<<widget "StartingGirlsWarnings">>
-	<<replace "#devotionWarning">>
-		<<if $activeSlave.devotion > 20>>
-			<br>&nbsp;&nbsp;&nbsp;&nbsp;
-			//@@.red;Starting slaves incur
-			<<if $activeSlave.devotion > 50>>
-				a severe cost penalty at very high
-			<<else>>
-				an additional cost penalty at high
-			<</if>>
-			levels of devotion. This slave's
-			<<if $activeSlave.actualAge >= 25>><<if $activeSlave.actualAge > 35>>advanced <</if>>age decreases the penalty<<else>>young age requires paying the full penalty<</if>>.@@//
-		<</if>>
-	<</replace>>
-	<<replace "#skillsWarning">>
-		<<if $activeSlave.whoreSkill+$activeSlave.entertainSkill+$activeSlave.vaginalSkill+$activeSlave.analSkill+$activeSlave.oralSkill+($activeSlave.combatSkill*100) > 200>>
-			<br>&nbsp;&nbsp;&nbsp;&nbsp;
-			//@@.red;Starting slaves incur
-			<<if $activeSlave.whoreSkill+$activeSlave.entertainSkill+$activeSlave.vaginalSkill+$activeSlave.analSkill+$activeSlave.oralSkill+($activeSlave.combatSkill*100) > 400>>
-				a severe cost penalty at for being highly
-			<<else>>
-				an additional cost penalty for being
-			<</if>>
-			skilled. This slave's
-			<<if $activeSlave.actualAge >= 25>><<if $activeSlave.actualAge > 35>>advanced <</if>>age decreases the penalty<<else>>young age requires paying the full penalty<</if>>.@@//
-		<</if>>
-	<</replace>>
-	<<replace "#prestigeWarning">>
-		<<if $activeSlave.prestige>>
-			<br>&nbsp;&nbsp;&nbsp;&nbsp;
-			//@@.red;Starting slaves incur an extreme cost penalty for prestige. This slave's
-			<<if $activeSlave.actualAge >= 25>><<if $activeSlave.actualAge > 35>>advanced <</if>>age decreases the penalty<<else>>young age requires paying the full penalty<</if>>.@@//
-		<</if>>
-	<</replace>>
-<</widget>>
-
-/%
- Call as <<StartingGirlsAnalSkill>>
-%/
-<<widget "StartingGirlsAnalSkill">>
-	<<replace "#analSkillsBlock">>
-		<<if $activeSlave.anus == 0>>
-		//Anal virgins cannot be given anal skills//
-		<<else>>
-		''Anal sex:''
-		<span id = "analSkill">
-		<<if $activeSlave.analSkill <= 10>>Unskilled.
-		<<elseif $activeSlave.analSkill <= 30>>@@.cyan;Basic.@@
-		<<elseif $activeSlave.analSkill <= 60>>@@.cyan;Skilled.@@
-		<<else>>@@.cyan;Expert.@@
-		<</if>>
-		</span>
-		<<if $activeSlave.anus < 3>><<link "Unskilled">><<set $activeSlave.analSkill = 0>><<replace "#analSkill">>Unskilled.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |<</if>>
-		<<link "Basic">><<set $activeSlave.analSkill = 15>><<replace "#analSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-		<<link "Skilled">><<set $activeSlave.analSkill = 35>><<replace "#analSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-		<<link "Expert">><<set $activeSlave.analSkill = 65>><<replace "#analSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-		<</if>>
-	<</replace>>
-<</widget>>
-
-/%
- Call as <<StartingGirlsVaginalSkill>>
-%/
-<<widget "StartingGirlsVaginalSkill">>
-	<<replace "#vaginalSkillsBlock">>
-		<<if $activeSlave.vagina == 0>>
-		//Virgins cannot be given vaginal skills//
-		<<elseif $activeSlave.vagina == -1>>
-		//Must have a vagina to have vaginal skills//
-		<<else>>
-		''Vaginal sex:''
-		<span id = "vaginalSkill">
-		<<if $activeSlave.vaginalSkill <= 10>>Unskilled.
-		<<elseif $activeSlave.vaginalSkill <= 30>>@@.cyan;Basic.@@
-		<<elseif $activeSlave.vaginalSkill <= 60>>@@.cyan;Skilled.@@
-		<<else>>@@.cyan;Expert.@@
-		<</if>>
-		</span>
-		<<if $activeSlave.anus < 3>><<link "Unskilled">><<set $activeSlave.vaginalSkill = 0>><<replace "#vaginalSkill">>Unskilled.<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |<</if>>
-		<<link "Basic">><<set $activeSlave.vaginalSkill = 15>><<replace "#vaginalSkill">>@@.cyan;Basic.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-		<<link "Skilled">><<set $activeSlave.vaginalSkill = 35>><<replace "#vaginalSkill">>@@.cyan;Skilled.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>> |
-		<<link "Expert">><<set $activeSlave.vaginalSkill = 65>><<replace "#vaginalSkill">>@@.cyan;Expert.@@<</replace>><<StartingGirlsCost>><<StartingGirlsWarnings>><</link>>
-		<</if>>
-	<</replace>>
-<</widget>>
-
 /%
  Call as <<SaleDescription>>
 %/
@@ -774,569 +127,6 @@
 <</replace>>
 <</widget>>
 
-/%
- Call as <<ToggleFetish 1>>
- $arg[0] is whether unknown or known.
-%/
-<<widget "ToggleFetish">>
-
-<<if ($args[0] == 0)>>
-	<<set $activeSlave.fetish = either("boobs", "buttslut", "cumslut", "dom", "humiliation", "masochist", "none", "none", "none", "none", "none", "none", "none", "none", "none", "none", "pregnancy", "sadist", "submissive"), $activeSlave.fetishKnown = 0>>
-	<<replace "#fetishblock">>
-		//Not known.//
-		<<link "Known">>
-			<<ToggleFetish 1>>
-		<</link>>
-	<</replace>>
-<<else>>
-	<<set $activeSlave.fetishKnown = 1>>
-		<<replace "#fetishblock">>
-		<span id="fetish">
-		<<if $activeSlave.fetishKnown == 1>>
-			<<if $activeSlave.fetish == "none">>
-				@@.pink;$activeSlave.fetish.@@
-			<<else>>
-				@@.lightcoral;$activeSlave.fetish.@@
-			<</if>>
-		<<else>>
-			//Not known.//
-			<<link "Known">>
-				<<ToggleFetish 1>>
-			<</link>>
-		<</if>>
-		</span>
-		<br>
-		<<if $activeSlave.fetishKnown == 1>>
-			<<link "Unknown">>
-				<<ToggleFetish 0>>
-			<<StartingGirlsCost>>
-		<</link>> |
-		<<link "None">>
-			<<set $activeSlave.fetish = "none", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Sub">>
-			<<set $activeSlave.fetish = "submissive", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Dom">>
-			<<set $activeSlave.fetish = "dom", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Cumslut">>
-			<<set $activeSlave.fetish = "cumslut", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Humiliation">>
-			<<set $activeSlave.fetish = "humiliation", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Buttslut">>
-			<<set $activeSlave.fetish = "buttslut", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Breasts">>
-			<<set $activeSlave.fetish = "boobs", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Pregnancy">>
-			<<set $activeSlave.fetish = "pregnancy", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Sadism">>
-			<<set $activeSlave.fetish = "sadist", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>> |
-		<<link "Masochism">>
-			<<set $activeSlave.fetish = "masochist", $activeSlave.fetishKnown = 1>>
-			<<ToggleFetish 1>>
-		<</link>>
-		<<if $seeExtreme == 1>>
-			| <<link "Mindbroken">>
-				<<set $activeSlave.fetish = "mindbroken", $activeSlave.fetishKnown = 1, $activeSlave.sexualFlaw = "none", $activeSlave.behavioralFlaw = "none", $activeSlave.sexualQuirk = "none", $activeSlave.sexualFlaw = "none">>
-				<<ToggleFetish 1>>
-			<</link>>
-		<</if>>
-
-		<<if $activeSlave.fetish != "none">>
-		<br>
-		<span id="fetishStrength">
-			''Fetish strength:''
-			<<if $activeSlave.fetishStrength > 95>>
-				@@.lightcoral;High.@@
-			<<elseif $activeSlave.fetishStrength <= 60>>
-				@@.pink;Low.@@
-			<<else>>
-				@@.hotpink;Normal.@@
-			<</if>>
-			<<if $activeSlave.fetishStrength > 60>>
-				<<link "Decrease">>
-					<<ChangeFetishStrength 0>>
-				<</link>>
-			<</if>>
-			<<if ($activeSlave.fetishStrength > 60)>>|<</if>>
-			<<if $activeSlave.fetishStrength <= 95>>
-				<<link "Increase">>
-					<<ChangeFetishStrength 1>>
-				<</link>>
-			<</if>>
-		</span>
-	<</if>>
-
-	<</if>>
-	<</replace>>
-<</if>>
-
-<</widget>>
-
-
-/%
- Call as <<ChangeFetishStrength 1>>
- $arg[0] is whether increase or decrease
-%/
-<<widget "ChangeFetishStrength">>
-
-<<if ($args[0] == 0)>>
-	<<set $activeSlave.fetishStrength -= 5, $activeSlave.fetishKnown = 1>>
-	<<replace "#fetishStrength">>
-		''Fetish strength:''
-		<<if $activeSlave.fetishStrength > 95>>
-			@@.lightcoral;High.@@
-		<<elseif $activeSlave.fetishStrength <= 60>>
-			@@.pink;Low.@@
-		<<else>>
-			@@.hotpink;Normal.@@
-		<</if>>
-
-		<<if $activeSlave.fetishStrength > 60>>
-			<<link "Decrease">>
-				<<ChangeFetishStrength 0>>
-			<</link>>
-		<</if>>
-		<<if ($activeSlave.fetishStrength > 60)>>|<</if>>
-		<<if $activeSlave.fetishStrength <= 95>>
-			<<link "Increase">>
-				<<ChangeFetishStrength 1>>
-			<</link>>
-		<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-
-<<else>>
-	<<set $activeSlave.fetishStrength += 5, $activeSlave.fetishKnown = 1>>
-	<<replace "#fetishStrength">>
-		''Fetish strength:''
-		<<if $activeSlave.fetishStrength > 95>>
-			@@.lightcoral;High.@@
-		<<elseif $activeSlave.fetishStrength <= 60>>
-			@@.pink;Low.@@
-		<<else>>
-			@@.hotpink;Normal.@@
-		<</if>>
-
-		<<if $activeSlave.fetishStrength > 60>>
-			<<link "Decrease">>
-				<<ChangeFetishStrength 0>>
-			<</link>>
-		<</if>>
-		<<if ($activeSlave.fetishStrength > 60)>>|<</if>>
-		<<if $activeSlave.fetishStrength <= 95>>
-			<<link "Increase">>
-				<<ChangeFetishStrength 1>>
-			<</link>>
-		<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-
-<</if>>
-
-<</widget>>
-
-/%
- Call as <<ToggleSexuality 1>>
- $arg[0] is whether unknown or known.
-%/
-<<widget "ToggleSexuality">>
-
-<<if ($args[0] == 0)>>
-
-	<<set $activeSlave.attrXX = random(0,100), $activeSlave.attrXY = random(0,100), $activeSlave.energy = random(1,90), $activeSlave.attrKnown = 0>>
-	<<StartingGirlsCost>>
-	<<replace "#sexuality">>
-		//Not known.//
-
-	<<link "Known">>
-		<<ToggleSexuality 1>>
-	<</link>>
-	<</replace>>
-<<else>>
-	<<set $activeSlave.attrKnown = 1>>
-	<<replace "#sexuality">>
-	<span id="attrXY">
-	<<if $activeSlave.attrKnown == 1>>
-		<<if $activeSlave.attrXY <= 5>>
-			@@.red;Disgusted by men,@@
-		<<elseif $activeSlave.attrXY <= 15>>
-			@@.red;Turned off by men,@@
-		<<elseif $activeSlave.attrXY <= 35>>
-			@@.red;Not attracted to men,@@
-		<<elseif $activeSlave.attrXY <= 65>>
-			Indifferent to men,
-		<<elseif $activeSlave.attrXY <= 85>>
-			@@.green;Attracted to men,@@
-		<<elseif $activeSlave.attrXY <= 95>>
-			@@.green;Aroused by men,@@
-		<<else>>
-			@@.green;Passionate about men,@@
-		<</if>>
-	<<else>>
-		//Not known.//
-	<</if>>
-	</span>
-	<span id="attrXX">
-	<<if $activeSlave.attrKnown == 1>>
-		<<if $activeSlave.attrXX <= 5>>
-			@@.red;disgusted by women.@@
-		<<elseif $activeSlave.attrXX <= 15>>
-			@@.red;turned off by women.@@
-		<<elseif $activeSlave.attrXX <= 35>>
-			@@.red;not attracted to women.@@
-		<<elseif $activeSlave.attrXX <= 65>>
-			indifferent to women.
-		<<elseif $activeSlave.attrXX <= 85>>
-			@@.green;attracted to women.@@
-		<<elseif $activeSlave.attrXX <= 95>>
-			@@.green;aroused by women.@@
-		<<else>>
-			@@.green;passionate about women.@@
-		<</if>>
-	<</if>>
-	</span>
-	<<if $activeSlave.attrKnown == 1>>
-	<<link "Unknown">>
-		<<ToggleSexuality 0>>
-	<</link>>
-
-	<br>
-
-	XY attraction:
-	<span id="decreaseXY">
-		<<link "Decrease">>
-		<<ChangeAttr 1 0>>
-		<</link>>
-	</span>
-	<span id="increaseXY">
-	|
-		<<link "Increase">>
-		<<ChangeAttr 1 1>>
-		<</link>>
-	</span>
-	&nbsp;&nbsp;&nbsp;&nbsp;
-	XX attraction:
-	<span id="decreaseXX">
-		<<link "Decrease">>
-		<<ChangeAttr 0 0>>
-		<</link>>
-	</span>
-	<span id="increaseXX">
-	|
-		<<link "Increase">>
-		<<ChangeAttr 0 1>>
-		<</link>>
-	</span>
-	<br>
-	''Sex drive:''
-	<span id="energy">
-		<<if $activeSlave.energy == 100>>@@.green;Nympho!@@
-		<<elseif $activeSlave.energy > 80>>@@.green;Sex addict.@@
-		<<elseif $activeSlave.energy > 60>>@@.green;Powerful.@@
-		<<elseif $activeSlave.energy > 40>>@@.yellow;Average.@@
-		<<elseif $activeSlave.energy > 20>>@@.red;Poor.@@
-		<<else>>@@.red;Frigid.@@<</if>>
-	</span>
-	<<link "Nympho">>
-		<<set $activeSlave.energy = 100, $activeSlave.attrKnown = 1>>
-		<<replace "#energy">>
-			@@.green;Nympho!@@
-		<</replace>>
-		<<StartingGirlsCost>>
-	<</link>>
-	| <<link "Sex addict">>
-		<<set $activeSlave.energy = 85, $activeSlave.attrKnown = 1>>
-		<<replace "#energy">>
-			@@.green;Sex addict.@@
-		<</replace>>
-		<<StartingGirlsCost>>
-	<</link>>
-	| <<link "Powerful">>
-		<<set $activeSlave.energy = 65, $activeSlave.attrKnown = 1>>
-		<<replace "#energy">>
-			@@.green;Powerful.@@
-		<</replace>>
-		<<StartingGirlsCost>>
-	<</link>>
-	| <<link "Average">>
-		<<set $activeSlave.energy = 45, $activeSlave.attrKnown = 1>>
-		<<replace "#energy">>
-			@@.yellow;Average.@@
-		<</replace>>
-		<<StartingGirlsCost>>
-	<</link>>
-	| <<link "Poor">>
-		<<set $activeSlave.energy = 25, $activeSlave.attrKnown = 1>>
-		<<replace "#energy">>
-			@@.red;Poor.@@
-		<</replace>>
-		<<StartingGirlsCost>>
-	<</link>>
-	| <<link "Frigid">>
-		<<set $activeSlave.energy = 5, $activeSlave.attrKnown = 1>>
-		<<replace "#energy">>
-			@@.red;Frigid.@@
-		<</replace>>
-		<<StartingGirlsCost>>
-	<</link>>
-	<<else>>
-		<<link "Known">>
-			<<ToggleSexuality 1>>
-		<</link>>
-	<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-<</if>>
-<</widget>>
-
-
-/%
- Call as <<ChangeAttr 1 1>>
- $arg[0] is whether XX or XY.
- $arg[1] is whether increase or decrease.
-%/
-<<widget "ChangeAttr">>
-
-<<if ($args[0] == 0) && ($args[1] == 0)>>
-	<<if $activeSlave.attrXX > 0>>
-		<<set $activeSlave.attrXX -= 10>>
-	<</if>>
-	<<set $activeSlave.attrXX = Math.clamp($activeSlave.attrXX, 0, 100)>>
-	<<set $activeSlave.attrKnown = 1>>
-	<<replace "#attrXX">>
-		<<if $activeSlave.attrXX <= 5>>
-			@@.red;disgusted by women.@@
-		<<elseif $activeSlave.attrXX <= 15>>
-			@@.red;turned off by women.@@
-		<<elseif $activeSlave.attrXX <= 35>>
-			@@.red;not attracted to women.@@
-		<<elseif $activeSlave.attrXX <= 65>>
-			indifferent to women.
-		<<elseif $activeSlave.attrXX <= 85>>
-			@@.green;attracted to women.@@
-		<<elseif $activeSlave.attrXX <= 95>>
-			@@.green;aroused by women.@@
-		<<else>>
-			@@.green;passionate about women.@@
-		<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-	<<if $activeSlave.attrXX == 100>>
-		<<replace "#increaseXX">>
-		<</replace>>
-		<<replace "#decreaseXX">>
-			<<link "Decrease">>
-			<<ChangeAttr 0 0>>
-			<</link>>
-		<</replace>>
-	<<elseif $activeSlave.attrXX == 0>>
-		<<replace "#decreaseXX">>
-			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
-		<</replace>>
-		<<replace "#increaseXX">>
-			<<link "Increase">>
-			<<ChangeAttr 0 1>>
-			<</link>>
-		<</replace>>
-	<<else>>
-		<<replace "#decreaseXX">>
-			<<link "Decrease">>
-			<<ChangeAttr 0 0>>
-			<</link>>
-		<</replace>>
-		<<replace "#increaseXX">>
-		|
-			<<link "Increase">>
-			<<ChangeAttr 0 1>>
-			<</link>>
-		<</replace>>
-	<</if>>
-<<elseif ($args[0] == 0) && ($args[1] == 1)>>
-	<<if $activeSlave.attrXX < 100>>
-		<<set $activeSlave.attrXX += 10>>
-	<</if>>
-	<<set $activeSlave.attrXX = Math.clamp($activeSlave.attrXX, 0, 100)>>
-	<<set $activeSlave.attrKnown = 1>>
-	<<replace "#attrXX">>
-		<<if $activeSlave.attrXX <= 5>>
-			@@.red;disgusted by women.@@
-		<<elseif $activeSlave.attrXX <= 15>>
-			@@.red;turned off by women.@@
-		<<elseif $activeSlave.attrXX <= 35>>
-			@@.red;not attracted to women.@@
-		<<elseif $activeSlave.attrXX <= 65>>
-			indifferent to women.
-		<<elseif $activeSlave.attrXX <= 85>>
-			@@.green;attracted to women.@@
-		<<elseif $activeSlave.attrXX <= 95>>
-			@@.green;aroused by women.@@
-		<<else>>
-			@@.green;passionate about women.@@
-		<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-	<<if $activeSlave.attrXX == 100>>
-		<<replace "#increaseXX">>
-		<</replace>>
-		<<replace "#decreaseXX">>
-			<<link "Decrease">>
-			<<ChangeAttr 0 0>>
-			<</link>>
-		<</replace>>
-	<<elseif $activeSlave.attrXX == 0>>
-		<<replace "#decreaseXX">>
-			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
-		<</replace>>
-		<<replace "#increaseXX">>
-			<<link "Increase">>
-			<<ChangeAttr 0 1>>
-			<</link>>
-		<</replace>>
-	<<else>>
-		<<replace "#decreaseXX">>
-			<<link "Decrease">>
-			<<ChangeAttr 0 0>>
-			<</link>>
-		<</replace>>
-		<<replace "#increaseXX">>
-		|
-			<<link "Increase">>
-			<<ChangeAttr 0 1>>
-			<</link>>
-		<</replace>>
-	<</if>>
-<<elseif ($args[0] == 1) && ($args[1] == 0)>>
-	<<if $activeSlave.attrXY > 0>>
-		<<set $activeSlave.attrXY -= 10>>
-	<</if>>
-
-	<<set $activeSlave.attrXY = Math.clamp($activeSlave.attrXY, 0, 100)>>
-	<<set $activeSlave.attrKnown = 1>>
-	<<replace "#attrXY">>
-		<<if $activeSlave.attrXY <= 5>>
-			@@.red;Disgusted by men,@@
-		<<elseif $activeSlave.attrXY <= 15>>
-			@@.red;Turned off by men,@@
-		<<elseif $activeSlave.attrXY <= 35>>
-			@@.red;Not attracted to men,@@
-		<<elseif $activeSlave.attrXY <= 65>>
-			Indifferent to men,
-		<<elseif $activeSlave.attrXY <= 85>>
-			@@.green;Attracted to men,@@
-		<<elseif $activeSlave.attrXY <= 95>>
-			@@.green;Aroused by men,@@
-		<<else>>
-			@@.green;Passionate about men,@@
-		<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-	<<if $activeSlave.attrXY == 100>>
-		<<replace "#increaseXY">>
-			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
-		<</replace>>
-		<<replace "#decreaseXY">>
-			<<link "Decrease">>
-				<<ChangeAttr 1 0>>
-			<</link>>
-		<</replace>>
-	<<elseif $activeSlave.attrXY == 0>>
-		<<replace "#decreaseXY">>
-			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
-		<</replace>>
-		<<replace "#increaseXY">>
-			<<link "Increase">>
-				<<ChangeAttr 1 1>>
-			<</link>>
-		<</replace>>
-	<<else>>
-		<<replace "#decreaseXY">>
-			<<link "Decrease">>
-				<<ChangeAttr 1 0>>
-			<</link>>
-		<</replace>>
-		<<replace "#increaseXY">>
-		|
-			<<link "Increase">>
-				<<ChangeAttr 1 1>>
-			<</link>>
-		<</replace>>
-	<</if>>
-<<elseif ($args[0] == 1) && ($args[1] == 1)>>
-	<<if $activeSlave.attrXY < 100>>
-		<<set $activeSlave.attrXY += 10>>
-	<</if>>
-	<<set $activeSlave.attrXY = Math.clamp($activeSlave.attrXY, 0, 100)>>
-	<<set $activeSlave.attrKnown = 1>>
-	<<replace "#attrXY">>
-		<<if $activeSlave.attrXY <= 5>>
-			@@.red;Disgusted by men,@@
-		<<elseif $activeSlave.attrXY <= 15>>
-			@@.red;Turned off by men,@@
-		<<elseif $activeSlave.attrXY <= 35>>
-			@@.red;Not attracted to men,@@
-		<<elseif $activeSlave.attrXY <= 65>>
-			Indifferent to men,
-		<<elseif $activeSlave.attrXY <= 85>>
-			@@.green;Attracted to men,@@
-		<<elseif $activeSlave.attrXY <= 95>>
-			@@.green;Aroused by men,@@
-		<<else>>
-			@@.green;Passionate about men,@@
-		<</if>>
-	<</replace>>
-	<<StartingGirlsCost>>
-
-	<<if $activeSlave.attrXY == 100>>
-		<<replace "#increaseXY">>
-			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
-		<</replace>>
-		<<replace "#decreaseXY">>
-			<<link "Decrease">>
-			<<ChangeAttr 1 0>>
-			<</link>>
-		<</replace>>
-	<<elseif $activeSlave.attrXY == 0>>
-		<<replace "#decreaseXY">>
-			&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
-		<</replace>>
-		<<replace "#increaseXY">>
-			<<link "Increase">>
-			<<ChangeAttr 1 1>>
-			<</link>>
-		<</replace>>
-	<<else>>
-		<<replace "#decreaseXY">>
-			<<link "Decrease">>
-			<<ChangeAttr 1 0>>
-			<</link>>
-		<</replace>>
-		<<replace "#increaseXY">>
-		|
-			<<link "Increase">>
-			<<ChangeAttr 1 1>>
-			<</link>>
-		<</replace>>
-	<</if>>
-<</if>>
-<</widget>>
-
 /%
  Call as <<CustomSlaveAge>>
 %/