diff --git a/src/cheats/mod_editSlaveCheatNew.tw b/src/cheats/mod_editSlaveCheatNew.tw
index 07e537764086039d19d81b76bf798009608cd38f..5984424033fe065ec0a3658a16d754af18edb5f6 100644
--- a/src/cheats/mod_editSlaveCheatNew.tw
+++ b/src/cheats/mod_editSlaveCheatNew.tw
@@ -5,110 +5,12 @@
 <<set $tempSlave = clone($activeSlave)>>
 <<setLocalPronouns $tempSlave>>
 
-<<widget COptions>>
+/* args[0] = new Value, arg[1] = Variable to be set, args[2] = Flip Variable to hide the section again, args[3] = Spotname */
+<<widget setVar>>
 	<<link "[$args[0]]">>
-	<<replace #career>>
-		<<set $tempSlave.career = $args[0]>>
-		<<set _carR = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget NOptions>>
-	<<link "[$args[0]]">>
-	<<replace #nation>>
-		<<set $tempSlave.nationality = $args[0]>>
-		<<set _natR = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget H1Options>>
-	<<link "[$args[0]]">>
-	<<replace #hcol1>>
-		<<set $tempSlave.hColor = $args[0]>>
-		<<set _hcol1R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget H2Options>>
-	<<link "[$args[0]]">>
-	<<replace #hcol2>>
-		<<set $tempSlave.origHColor = $args[0]>>
-		<<set _hcol2R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget H3Options>>
-	<<link "[$args[0]]">>
-	<<replace #hcol3>>
-		<<set $tempSlave.pubicHColor = $args[0]>>
-		<<set _hcol3R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget H4Options>>
-	<<link "[$args[0]]">>
-	<<replace #hcol4>>
-		<<set $tempSlave.underArmHColor = $args[0]>>
-		<<set _hcol4R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget H5Options>>
-	<<link "[$args[0]]">>
-	<<replace #hcol5>>
-		<<set $tempSlave.eyebrowHColor = $args[0]>>
-		<<set _hcol5R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget E1Options>>
-	<<link "[$args[0]]">>
-	<<replace #ecol1>>
-		<<set $tempSlave.eyeColor = $args[0]>>
-		<<set _ecol1R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget E2Options>>
-	<<link "[$args[0]]">>
-	<<replace #ecol2>>
-		<<set $tempSlave.origEye = $args[0]>>
-		<<set _ecol2R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget E3Options>>
-	<<link "[$args[0]]">>
-	<<replace #ecol3>>
-		<<set $tempSlave.geneticQuirks.heterochromia = $args[0]>>
-		<<set _ecol3R = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget POptions>>
-	<<link "[$args[0]]">>
-	<<replace #ppil>>
-		<<set $tempSlave.origEye = $args[0]>>
-		<<set _ppilR = 0>>
-	<</replace>>
-	<</link>>
-<</widget>>
-
-<<widget ScOptions>>
-	<<link "[$args[0]]">>
-	<<replace #sclr>>
-		<<set $tempSlave.origEye = $args[0]>>
-		<<set _sclrR = 0>>
+	<<replace $args[3]>>
+		<<print '<<set ' + $args[1] + ' to $args[0]>>'>>
+		<<print '<<set ' + $args[2] + ' to 0>>'>>
 	<</replace>>
 	<</link>>
 <</widget>>
@@ -240,691 +142,691 @@
 				<br>''Current Career: (@@.yellow;$tempSlave.career@@)''<br>
 
 				<br>Grateful Careers<br>
-				<<COptions "a beggar" >>
+				<<setVar "a beggar" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a drug mule" >>
+				<<setVar "a drug mule" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a peddler" >>
+				<<setVar "a peddler" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a pick-pocket" >>
+				<<setVar "a pick-pocket" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a prisoner" >>
+				<<setVar "a prisoner" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a refugee" >>
+				<<setVar "a refugee" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a shut-in" >>
+				<<setVar "a shut-in" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a street urchin" >>
+				<<setVar "a street urchin" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a student from a boarding school" >>
+				<<setVar "a student from a boarding school" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a sweatshop worker" >>
+				<<setVar "a sweatshop worker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a thief" >>
+				<<setVar "a thief" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an orphan" >>
+				<<setVar "an orphan" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "from a lower class family" >>
+				<<setVar "from a lower class family" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "homeless" >>
+				<<setVar "homeless" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "unemployed" >>
+				<<setVar "unemployed" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Menial Careers<br>
-				<<COptions "a baker" >>
+				<<setVar "a baker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a blacksmith" >>
+				<<setVar "a blacksmith" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bus driver" >>
+				<<setVar "a bus driver" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a butcher" >>
+				<<setVar "a butcher" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a candlestick maker" >>
+				<<setVar "a candlestick maker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a carpenter" >>
+				<<setVar "a carpenter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cashier" >>
+				<<setVar "a cashier" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a chauffeur" >>
+				<<setVar "a chauffeur" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cobbler" >>
+				<<setVar "a cobbler" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a construction worker" >>
+				<<setVar "a construction worker" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a courier" >>
+				<<setVar "a courier" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a croupier" >>
+				<<setVar "a croupier" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a delivery woman" >>
+				<<setVar "a delivery woman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a driller" >>
+				<<setVar "a driller" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dropout" >>
+				<<setVar "a dropout" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a factory worker" >>
+				<<setVar "a factory worker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a farm laborer" >>
+				<<setVar "a farm laborer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a firefighter" >>
+				<<setVar "a firefighter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a fisherwoman" >>
+				<<setVar "a fisherwoman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a florist" >>
+				<<setVar "a florist" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a gardener" >>
+				<<setVar "a gardener" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a gravedigger" >>
+				<<setVar "a gravedigger" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a janitor" >>
+				<<setVar "a janitor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a launderer" >>
+				<<setVar "a launderer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a lumberjack" >>
+				<<setVar "a lumberjack" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mail carrier" >>
+				<<setVar "a mail carrier" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mechanic" >>
+				<<setVar "a mechanic" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a messenger" >>
+				<<setVar "a messenger" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a miner" >>
+				<<setVar "a miner" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a nun" >>
+				<<setVar "a nun" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a paper girl" >>
+				<<setVar "a paper girl" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a part-time farm laborer" >>
+				<<setVar "a part-time farm laborer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a pilot" >>
+				<<setVar "a pilot" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a plumber" >>
+				<<setVar "a plumber" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a private" >>
+				<<setVar "a private" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a programmer" >>
+				<<setVar "a programmer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a receptionist" >>
+				<<setVar "a receptionist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a referee" >>
+				<<setVar "a referee" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a repairman" >>
+				<<setVar "a repairman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a ride attendant" >>
+				<<setVar "a ride attendant" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a roadie" >>
+				<<setVar "a roadie" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a sailor" >>
+				<<setVar "a sailor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a seamstress" >>
+				<<setVar "a seamstress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a service worker" >>
+				<<setVar "a service worker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a street vendor" >>
+				<<setVar "a street vendor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a student" >>
+				<<setVar "a student" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a student from a private school" >>
+				<<setVar "a student from a private school" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a student from a public school" >>
+				<<setVar "a student from a public school" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a switchboard operator" >>
+				<<setVar "a switchboard operator" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a tailor" >>
+				<<setVar "a tailor" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a taxi driver" >>
+				<<setVar "a taxi driver" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a terrorist" >>
+				<<setVar "a terrorist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a tour guide" >>
+				<<setVar "a tour guide" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a train conductor" >>
+				<<setVar "a train conductor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a truck driver" >>
+				<<setVar "a truck driver" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a welder" >>
+				<<setVar "a welder" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a whaler" >>
+				<<setVar "a whaler" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an apprentice" >>
+				<<setVar "an apprentice" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an arcade attendant" >>
+				<<setVar "an arcade attendant" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an electrician" >>
+				<<setVar "an electrician" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "an engineer" >>
+				<<setVar "an engineer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an exterminator" >>
+				<<setVar "an exterminator" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an installation technician" >>
+				<<setVar "an installation technician" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an intern" >>
+				<<setVar "an intern" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Entertainment Careers<br>
-				<<COptions "a ballerina" >>
+				<<setVar "a ballerina" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a blogger" >>
+				<<setVar "a blogger" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a camgirl" >>
+				<<setVar "a camgirl" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a camwhore" >>
+				<<setVar "a camwhore" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cheerleader" >>
+				<<setVar "a cheerleader" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a child actress" >>
+				<<setVar "a child actress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a clown" >>
+				<<setVar "a clown" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cocktail waitress" >>
+				<<setVar "a cocktail waitress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a comedian" >>
+				<<setVar "a comedian" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a gymnast" >>
+				<<setVar "a gymnast" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a journalist" >>
+				<<setVar "a journalist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a local news anchor" >>
+				<<setVar "a local news anchor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a magician's assistant" >>
+				<<setVar "a magician's assistant" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a medium" >>
+				<<setVar "a medium" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mime" >>
+				<<setVar "a mime" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a painter" >>
+				<<setVar "a painter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a party girl" >>
+				<<setVar "a party girl" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a photographer" >>
+				<<setVar "a photographer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a poet" >>
+				<<setVar "a poet" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a racing driver" >>
+				<<setVar "a racing driver" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a sculptor" >>
+				<<setVar "a sculptor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a stage magician" >>
+				<<setVar "a stage magician" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a street performer" >>
+				<<setVar "a street performer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a student athlete" >>
+				<<setVar "a student athlete" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a stuntwoman" >>
+				<<setVar "a stuntwoman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a video game streamer" >>
+				<<setVar "a video game streamer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a waitress" >>
+				<<setVar "a waitress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a weathergirl" >>
+				<<setVar "a weathergirl" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a wrestler" >>
+				<<setVar "a wrestler" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a writer" >>
+				<<setVar "a writer" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "an acrobat" >>
+				<<setVar "an acrobat" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an actress" >>
+				<<setVar "an actress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an animator" >>
+				<<setVar "an animator" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an artist" >>
+				<<setVar "an artist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an athlete" >>
+				<<setVar "an athlete" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Whore Careers<br>
-				<<COptions "a child prostitute" >>
+				<<setVar "a child prostitute" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a criminal" >>
+				<<setVar "a criminal" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cum dump" >>
+				<<setVar "a cum dump" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a Futanari Sister" >>
+				<<setVar "a Futanari Sister" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a juvenile delinquent" >>
+				<<setVar "a juvenile delinquent" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mail-order bride" >>
+				<<setVar "a mail-order bride" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a meat toilet" >>
+				<<setVar "a meat toilet" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mistress" >>
+				<<setVar "a mistress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a model" >>
+				<<setVar "a model" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a pageant star" >>
+				<<setVar "a pageant star" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a pirate" >>
+				<<setVar "a pirate" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a porn star" >>
+				<<setVar "a porn star" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a prostitute" >>
+				<<setVar "a prostitute" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a reality show star" >>
+				<<setVar "a reality show star" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a saleswoman" >>
+				<<setVar "a saleswoman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a serial divorcee" >>
+				<<setVar "a serial divorcee" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a stripper" >>
+				<<setVar "a stripper" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a trophy wife" >>
+				<<setVar "a trophy wife" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an escort" >>
+				<<setVar "an escort" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an exotic dancer" >>
+				<<setVar "an exotic dancer" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Servant Careers<br>
-				<<COptions "a butler" >>
+				<<setVar "a butler" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cook" >>
+				<<setVar "a cook" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a handmaiden" >>
+				<<setVar "a handmaiden" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a housewife" >>
+				<<setVar "a housewife" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a maid" >>
+				<<setVar "a maid" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a shrine maiden" >>
+				<<setVar "a shrine maiden" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>HeadGirl Careers<br>
-				<<COptions "a captain" >>
+				<<setVar "a captain" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a corporate executive" >>
+				<<setVar "a corporate executive" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a director" >>
+				<<setVar "a director" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dominatrix" >>
+				<<setVar "a dominatrix" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a gang leader" >>
+				<<setVar "a gang leader" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a judge" >>
+				<<setVar "a judge" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a lawyer" >>
+				<<setVar "a lawyer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a leading arcology citizen" >>
+				<<setVar "a leading arcology citizen" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a military officer" >>
+				<<setVar "a military officer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a model-UN star" >>
+				<<setVar "a model-UN star" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a noblewoman" >>
+				<<setVar "a noblewoman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a politician" >>
+				<<setVar "a politician" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a Queen" >>
+				<<setVar "a Queen" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a slaver" >>
+				<<setVar "a slaver" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a student council president" >>
+				<<setVar "a student council president" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Madam Careers<br>
-				<<COptions "a banker" >>
+				<<setVar "a banker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a business owner" >>
+				<<setVar "a business owner" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a businessman" >>
+				<<setVar "a businessman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a camp counselor" >>
+				<<setVar "a camp counselor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a club manager" >>
+				<<setVar "a club manager" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a hotel manager" >>
+				<<setVar "a hotel manager" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a landlady" >>
+				<<setVar "a landlady" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a madam" >>
+				<<setVar "a madam" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a manager" >>
+				<<setVar "a manager" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a park ranger" >>
+				<<setVar "a park ranger" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a pimp" >>
+				<<setVar "a pimp" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a procuress" >>
+				<<setVar "a procuress" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a stockbroker" >>
+				<<setVar "a stockbroker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an innkeeper" >>
+				<<setVar "an innkeeper" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>DJ Careers<br>
-				<<COptions "a classical dancer" >>
+				<<setVar "a classical dancer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a classical musician" >>
+				<<setVar "a classical musician" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dancer" >>
+				<<setVar "a dancer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a house DJ" >>
+				<<setVar "a house DJ" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a marching band leader" >>
+				<<setVar "a marching band leader" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a musician" >>
+				<<setVar "a musician" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a radio show host" >>
+				<<setVar "a radio show host" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an aspiring pop star" >>
+				<<setVar "an aspiring pop star" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an idol" >>
+				<<setVar "an idol" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an orchestra conductor" >>
+				<<setVar "an orchestra conductor" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Bodyguard Careers<br>
-				<<COptions "a bodyguard" >>
+				<<setVar "a bodyguard" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a boxer" >>
+				<<setVar "a boxer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bully hunter" >>
+				<<setVar "a bully hunter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a child soldier" >>
+				<<setVar "a child soldier" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a hitman" >>
+				<<setVar "a hitman" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a kunoichi" >>
+				<<setVar "a kunoichi" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a law enforcement officer" >>
+				<<setVar "a law enforcement officer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a military brat" >>
+				<<setVar "a military brat" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a prince" >>
+				<<setVar "a prince" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a revolutionary" >>
+				<<setVar "a revolutionary" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a sniper" >>
+				<<setVar "a sniper" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a soldier" >>
+				<<setVar "a soldier" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a transporter" >>
+				<<setVar "a transporter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an assassin" >>
+				<<setVar "an assassin" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an MS pilot" >>
+				<<setVar "an MS pilot" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "captain of the kendo club" >>
+				<<setVar "captain of the kendo club" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "in a militia" >>
+				<<setVar "in a militia" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "spec ops" >>
+				<<setVar "spec ops" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Wardeness Careers<br>
-				<<COptions "a bouncer" >>
+				<<setVar "a bouncer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bounty hunter" >>
+				<<setVar "a bounty hunter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bully" >>
+				<<setVar "a bully" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a chief of police" >>
+				<<setVar "a chief of police" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a gang member" >>
+				<<setVar "a gang member" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a hall monitor" >>
+				<<setVar "a hall monitor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mercenary" >>
+				<<setVar "a mercenary" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a police detective" >>
+				<<setVar "a police detective" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a police officer" >>
+				<<setVar "a police officer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a prison guard" >>
+				<<setVar "a prison guard" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a prison warden" >>
+				<<setVar "a prison warden" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a private detective" >>
+				<<setVar "a private detective" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a security guard" >>
+				<<setVar "a security guard" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a street thug" >>
+				<<setVar "a street thug" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an enforcer" >>
+				<<setVar "an enforcer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an orderly" >>
+				<<setVar "an orderly" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Nurse Careers<br>
-				<<COptions "a chemist" >>
+				<<setVar "a chemist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a chiropractor" >>
+				<<setVar "a chiropractor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a coroner" >>
+				<<setVar "a coroner" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dentist" >>
+				<<setVar "a dentist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a doctor" >>
+				<<setVar "a doctor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a hospital volunteer" >>
+				<<setVar "a hospital volunteer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a medic" >>
+				<<setVar "a medic" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a medical student" >>
+				<<setVar "a medical student" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a midwife" >>
+				<<setVar "a midwife" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mortician" >>
+				<<setVar "a mortician" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a nurse" >>
+				<<setVar "a nurse" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a paramedic" >>
+				<<setVar "a paramedic" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a pharmacist" >>
+				<<setVar "a pharmacist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a physician" >>
+				<<setVar "a physician" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a school nurse" >>
+				<<setVar "a school nurse" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a school nurse's assistant" >>
+				<<setVar "a school nurse's assistant" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a surgeon" >>
+				<<setVar "a surgeon" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Attendant Careers<br>
-				<<COptions "a barber" >>
+				<<setVar "a barber" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cosmetologist" >>
+				<<setVar "a cosmetologist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a counselor" >>
+				<<setVar "a counselor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dispatch officer" >>
+				<<setVar "a dispatch officer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a fortune teller" >>
+				<<setVar "a fortune teller" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a groomer" >>
+				<<setVar "a groomer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a latchkey kid" >>
+				<<setVar "a latchkey kid" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a lifeguard" >>
+				<<setVar "a lifeguard" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a masseuse" >>
+				<<setVar "a masseuse" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a mediator" >>
+				<<setVar "a mediator" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a personal trainer" >>
+				<<setVar "a personal trainer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a police negotiator" >>
+				<<setVar "a police negotiator" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a psychologist" >>
+				<<setVar "a psychologist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a therapist" >>
+				<<setVar "a therapist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a yoga instructor" >>
+				<<setVar "a yoga instructor" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Matron Careers<br>
-				<<COptions "a babysitter" >>
+				<<setVar "a babysitter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a nanny" >>
+				<<setVar "a nanny" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a practitioner" >>
+				<<setVar "a practitioner" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a wet nurse" >>
+				<<setVar "a wet nurse" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an au pair" >>
+				<<setVar "an au pair" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Milkmaid Careers<br>
-				<<COptions "a cowgirl" >>
+				<<setVar "a cowgirl" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dairy worker" >>
+				<<setVar "a dairy worker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a farmer's daughter" >>
+				<<setVar "a farmer's daughter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a milkmaid" >>
+				<<setVar "a milkmaid" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a rancher" >>
+				<<setVar "a rancher" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a shepherd" >>
+				<<setVar "a shepherd" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a veterinarian" >>
+				<<setVar "a veterinarian" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Farmer Careers<br>
-				<<COptions "a beekeeper" >>
+				<<setVar "a beekeeper" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bullfighter" >>
+				<<setVar "a bullfighter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a farmer" >>
+				<<setVar "a farmer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a farmhand" >>
+				<<setVar "a farmhand" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a rancher" >>
+				<<setVar "a rancher" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a rodeo star" >>
+				<<setVar "a rodeo star" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a zookeeper" >>
+				<<setVar "a zookeeper" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Stewardess Careers<br>
-				<<COptions "a barista" >>
+				<<setVar "a barista" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bartender" >>
+				<<setVar "a bartender" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a brewer" >>
+				<<setVar "a brewer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a bureaucrat" >>
+				<<setVar "a bureaucrat" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a caregiver" >>
+				<<setVar "a caregiver" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a charity worker" >>
+				<<setVar "a charity worker" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a club treasurer" >>
+				<<setVar "a club treasurer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a concierge" >>
+				<<setVar "a concierge" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a housekeeper" >>
+				<<setVar "a housekeeper" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a housesitter" >>
+				<<setVar "a housesitter" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a lemonade stand operator" >>
+				<<setVar "a lemonade stand operator" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a personal assistant" >>
+				<<setVar "a personal assistant" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a professional bartender" >>
+				<<setVar "a professional bartender" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a secretary" >>
+				<<setVar "a secretary" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a wedding planner" >>
+				<<setVar "a wedding planner" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an air hostess" >>
+				<<setVar "an air hostess" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an architect" >>
+				<<setVar "an architect" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an editor" >>
+				<<setVar "an editor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an estate agent" >>
+				<<setVar "an estate agent" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an investor" >>
+				<<setVar "an investor" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "an office worker" >>
+				<<setVar "an office worker" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Schoolteacher Careers<br>
-				<<COptions "a child prodigy" >>
+				<<setVar "a child prodigy" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a coach" >>
+				<<setVar "a coach" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dean" >>
+				<<setVar "a dean" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a historian" >>
+				<<setVar "a historian" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a librarian" >>
+				<<setVar "a librarian" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a principal" >>
+				<<setVar "a principal" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a private instructor" >>
+				<<setVar "a private instructor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a professor" >>
+				<<setVar "a professor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a scholar" >>
+				<<setVar "a scholar" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a scientist" >>
+				<<setVar "a scientist" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a teacher" >>
+				<<setVar "a teacher" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a teacher's pet" >>
+				<<setVar "a teacher's pet" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a teaching assistant" >>
+				<<setVar "a teaching assistant" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an archaeologist" >>
+				<<setVar "an archaeologist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an astronaut" >>
+				<<setVar "an astronaut" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "an economist" >>
+				<<setVar "an economist" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Recruiter Careers<br>
-				<<COptions "a club recruiter" >>
+				<<setVar "a club recruiter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a college scout" >>
+				<<setVar "a college scout" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a con artist" >>
+				<<setVar "a con artist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a cult leader" >>
+				<<setVar "a cult leader" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a girl scout" >>
+				<<setVar "a girl scout" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a military recruiter" >>
+				<<setVar "a military recruiter" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a missionary" >>
+				<<setVar "a missionary" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a political activist" >>
+				<<setVar "a political activist" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a princess" >>
+				<<setVar "a princess" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a spy" >>
+				<<setVar "a spy" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "a talent scout" >>
+				<<setVar "a talent scout" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "retired" >>
+				<<setVar "retired" "$tempSlave.career" "_carR" "#career">>
 				<br>
 
 				<br>Others<br>
-				<<COptions "a bioreactor" >>
+				<<setVar "a bioreactor" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a breeder" >>
+				<<setVar "a breeder" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a breeding bull" >>
+				<<setVar "a breeding bull" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dairy cow" >>
+				<<setVar "a dairy cow" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a dairy slave" >>
+				<<setVar "a dairy slave" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a Fuckdoll" >>
+				<<setVar "a Fuckdoll" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a producer" >>
+				<<setVar "a producer" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a slave" >>
+				<<setVar "a slave" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "a slave since birth" >>
+				<<setVar "a slave since birth" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "being homeschooled by her parents" >>
+				<<setVar "being homeschooled by her parents" "$tempSlave.career" "_carR" "#career">>
 				<br>
-				<<COptions "from a middle class family" >>
+				<<setVar "from a middle class family" "$tempSlave.career" "_carR" "#career">>
 				<<print " | ">>
-				<<COptions "from an upper class family" >>
+				<<setVar "from an upper class family" "$tempSlave.career" "_carR" "#career">>
 				<br>
 			<</replace>>
 	<<else>>
@@ -945,449 +847,449 @@
 			<<set _natR =1>>
 			<br>Current Nationality : @@.yellow;$tempSlave.nationality@@ <br>
 				<br>Non-Nations<br>
-				<<NOptions "Slave" >>
+				<<setVar "Slave" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Stateless" >>
+				<<setVar "Stateless" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>North America<br>
-				<<NOptions "American" >>
+				<<setVar "American" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Antiguan" >>
+				<<setVar "Antiguan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Aruban" >>
+				<<setVar "Aruban" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bahamian" >>
+				<<setVar "Bahamian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Barbadian" >>
+				<<setVar "Barbadian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Belizean" >>
+				<<setVar "Belizean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bermudian" >>
+				<<setVar "Bermudian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Canadian" >>
+				<<setVar "Canadian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Costa Rican" >>
+				<<setVar "Costa Rican" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Cuban" >>
+				<<setVar "Cuban" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Curaçaoan" >>
+				<<setVar "Curaçaoan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Dominican" >>
+				<<setVar "Dominican" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Dominiquais" >>
+				<<setVar "Dominiquais" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Greenlandic" >>
+				<<setVar "Greenlandic" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Grenadian" >>
+				<<setVar "Grenadian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Guatemalan" >>
+				<<setVar "Guatemalan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Haitian" >>
+				<<setVar "Haitian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Honduran" >>
+				<<setVar "Honduran" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Jamaican" >>
+				<<setVar "Jamaican" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kittitian" >>
+				<<setVar "Kittitian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Mexican" >>
+				<<setVar "Mexican" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Nicaraguan" >>
+				<<setVar "Nicaraguan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Panamanian" >>
+				<<setVar "Panamanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Puerto Rican" >>
+				<<setVar "Puerto Rican" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Saint Lucian" >>
+				<<setVar "Saint Lucian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Salvadoran" >>
+				<<setVar "Salvadoran" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Trinidadian" >>
+				<<setVar "Trinidadian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Vincentian" >>
+				<<setVar "Vincentian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>South America<br>
-				<<NOptions "Argentinian" >>
+				<<setVar "Argentinian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bolivian" >>
+				<<setVar "Bolivian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Brazilian" >>
+				<<setVar "Brazilian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Chilean" >>
+				<<setVar "Chilean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Colombian" >>
+				<<setVar "Colombian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Ecuadorian" >>
+				<<setVar "Ecuadorian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "French Guianan" >>
+				<<setVar "French Guianan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Guyanese" >>
+				<<setVar "Guyanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Paraguayan" >>
+				<<setVar "Paraguayan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Peruvian" >>
+				<<setVar "Peruvian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Peruvian" >>
+				<<setVar "Peruvian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Surinamese" >>
+				<<setVar "Surinamese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Uruguayan" >>
+				<<setVar "Uruguayan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Venezuelan" >>
+				<<setVar "Venezuelan" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>Europe<br>
-				<<NOptions "Albanian" >>
+				<<setVar "Albanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Andorran" >>
+				<<setVar "Andorran" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Austrian" >>
+				<<setVar "Austrian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Belarusian" >>
+				<<setVar "Belarusian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Belgian" >>
+				<<setVar "Belgian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bosnian" >>
+				<<setVar "Bosnian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "British" >>
+				<<setVar "British" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bulgarian" >>
+				<<setVar "Bulgarian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Catalan" >>
+				<<setVar "Catalan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Croatian" >>
+				<<setVar "Croatian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Czech" >>
+				<<setVar "Czech" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Danish" >>
+				<<setVar "Danish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Dutch" >>
+				<<setVar "Dutch" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Estonian" >>
+				<<setVar "Estonian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Finnish" >>
+				<<setVar "Finnish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "French" >>
+				<<setVar "French" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "German" >>
+				<<setVar "German" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Greek" >>
+				<<setVar "Greek" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Hungarian" >>
+				<<setVar "Hungarian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Icelandic" >>
+				<<setVar "Icelandic" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Irish" >>
+				<<setVar "Irish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Italian" >>
+				<<setVar "Italian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kosovan" >>
+				<<setVar "Kosovan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Latvian" >>
+				<<setVar "Latvian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "a Liechtensteiner" >>
+				<<setVar "a Liechtensteiner" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Lithuanian" >>
+				<<setVar "Lithuanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Luxembourgian" >>
+				<<setVar "Luxembourgian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Macedonian" >>
+				<<setVar "Macedonian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Maltese" >>
+				<<setVar "Maltese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Moldovan" >>
+				<<setVar "Moldovan" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Monégasque" >>
+				<<setVar "Monégasque" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Montenegrin" >>
+				<<setVar "Montenegrin" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Norwegian" >>
+				<<setVar "Norwegian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Polish" >>
+				<<setVar "Polish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Portuguese" >>
+				<<setVar "Portuguese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Romanian" >>
+				<<setVar "Romanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Russian" >>
+				<<setVar "Russian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Sammarinese" >>
+				<<setVar "Sammarinese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Scottish" >>
+				<<setVar "Scottish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Serbian" >>
+				<<setVar "Serbian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Slovak" >>
+				<<setVar "Slovak" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Slovene" >>
+				<<setVar "Slovene" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Spanish" >>
+				<<setVar "Spanish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Swedish" >>
+				<<setVar "Swedish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Swiss" >>
+				<<setVar "Swiss" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Ukrainian" >>
+				<<setVar "Ukrainian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Vatican" >>
+				<<setVar "Vatican" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>Asia<br>
-				<<NOptions "Bangladeshi" >>
+				<<setVar "Bangladeshi" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bhutanese" >>
+				<<setVar "Bhutanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bruneian" >>
+				<<setVar "Bruneian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Burmese" >>
+				<<setVar "Burmese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Cambodian" >>
+				<<setVar "Cambodian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Chinese" >>
+				<<setVar "Chinese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "East Timorese" >>
+				<<setVar "East Timorese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Filipina" >>
+				<<setVar "Filipina" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Indian" >>
+				<<setVar "Indian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Indonesian" >>
+				<<setVar "Indonesian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Japanese" >>
+				<<setVar "Japanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kazakh" >>
+				<<setVar "Kazakh" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Korean" >>
+				<<setVar "Korean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kyrgyz" >>
+				<<setVar "Kyrgyz" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Laotian" >>
+				<<setVar "Laotian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Malaysian" >>
+				<<setVar "Malaysian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Maldivian" >>
+				<<setVar "Maldivian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Mongolian" >>
+				<<setVar "Mongolian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Nepalese" >>
+				<<setVar "Nepalese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Pakistani" >>
+				<<setVar "Pakistani" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Singaporean" >>
+				<<setVar "Singaporean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Sri Lankan" >>
+				<<setVar "Sri Lankan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Taiwanese" >>
+				<<setVar "Taiwanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Tajik" >>
+				<<setVar "Tajik" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Thai" >>
+				<<setVar "Thai" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Tibetan" >>
+				<<setVar "Tibetan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Turkmen" >>
+				<<setVar "Turkmen" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Uzbek" >>
+				<<setVar "Uzbek" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Vietnamese" >>
+				<<setVar "Vietnamese" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>Middle East<br>
-				<<NOptions "Afghan" >>
+				<<setVar "Afghan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Armenian" >>
+				<<setVar "Armenian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Azerbaijani" >>
+				<<setVar "Azerbaijani" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bahraini" >>
+				<<setVar "Bahraini" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Cypriot" >>
+				<<setVar "Cypriot" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Egyptian" >>
+				<<setVar "Egyptian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Emirati" >>
+				<<setVar "Emirati" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Georgian" >>
+				<<setVar "Georgian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Iranian" >>
+				<<setVar "Iranian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Iraqi" >>
+				<<setVar "Iraqi" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Israeli" >>
+				<<setVar "Israeli" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Jordanian" >>
+				<<setVar "Jordanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kurdish" >>
+				<<setVar "Kurdish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kuwaiti" >>
+				<<setVar "Kuwaiti" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Lebanese" >>
+				<<setVar "Lebanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Omani" >>
+				<<setVar "Omani" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Palestinian" >>
+				<<setVar "Palestinian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Qatari" >>
+				<<setVar "Qatari" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Saudi" >>
+				<<setVar "Saudi" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Syrian" >>
+				<<setVar "Syrian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Turkish" >>
+				<<setVar "Turkish" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Yemeni" >>
+				<<setVar "Yemeni" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>Africa<br>
-				<<NOptions "Algerian" >>
+				<<setVar "Algerian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Angolan" >>
+				<<setVar "Angolan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Beninese" >>
+				<<setVar "Beninese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Bissau-Guinean" >>
+				<<setVar "Bissau-Guinean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Burkinabé" >>
+				<<setVar "Burkinabé" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Burundian" >>
+				<<setVar "Burundian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Cameroonian" >>
+				<<setVar "Cameroonian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Cape Verdean" >>
+				<<setVar "Cape Verdean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Central African" >>
+				<<setVar "Central African" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Chadian" >>
+				<<setVar "Chadian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Comorian" >>
+				<<setVar "Comorian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Congolese" >>
+				<<setVar "Congolese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Djiboutian" >>
+				<<setVar "Djiboutian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Equatoguinean" >>
+				<<setVar "Equatoguinean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Eritrean" >>
+				<<setVar "Eritrean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Ethiopian" >>
+				<<setVar "Ethiopian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Gabonese" >>
+				<<setVar "Gabonese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Gambian" >>
+				<<setVar "Gambian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Ghanan" >>
+				<<setVar "Ghanan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Guinean" >>
+				<<setVar "Guinean" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Ivorian" >>
+				<<setVar "Ivorian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Kenyan" >>
+				<<setVar "Kenyan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Liberian" >>
+				<<setVar "Liberian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Libyan" >>
+				<<setVar "Libyan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Malagasy" >>
+				<<setVar "Malagasy" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Malawian" >>
+				<<setVar "Malawian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Malian" >>
+				<<setVar "Malian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Mauritanian" >>
+				<<setVar "Mauritanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Mauritian" >>
+				<<setVar "Mauritian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Moroccan" >>
+				<<setVar "Moroccan" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Mosotho" >>
+				<<setVar "Mosotho" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Motswana" >>
+				<<setVar "Motswana" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Mozambican" >>
+				<<setVar "Mozambican" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Namibian" >>
+				<<setVar "Namibian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Nigerian" >>
+				<<setVar "Nigerian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Nigerien" >>
+				<<setVar "Nigerien" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Rwandan" >>
+				<<setVar "Rwandan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Sahrawi" >>
+				<<setVar "Sahrawi" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "São Toméan" >>
+				<<setVar "São Toméan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Senegalese" >>
+				<<setVar "Senegalese" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Seychellois" >>
+				<<setVar "Seychellois" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Sierra Leonean" >>
+				<<setVar "Sierra Leonean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Somali" >>
+				<<setVar "Somali" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "South African" >>
+				<<setVar "South African" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "South Sudanese" >>
+				<<setVar "South Sudanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Sudanese" >>
+				<<setVar "Sudanese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Swazi" >>
+				<<setVar "Swazi" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Tanzanian" >>
+				<<setVar "Tanzanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Togolese" >>
+				<<setVar "Togolese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Tunisian" >>
+				<<setVar "Tunisian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "Ugandan" >>
+				<<setVar "Ugandan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Zairian" >>
+				<<setVar "Zairian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Zambian" >>
+				<<setVar "Zambian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Zimbabwean" >>
+				<<setVar "Zimbabwean" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 
 				<br>Australia<br>
-				<<NOptions "Australian" >>
+				<<setVar "Australian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "a Cook Islander" >>
+				<<setVar "a Cook Islander" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Fijian" >>
+				<<setVar "Fijian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "French Polynesian" >>
+				<<setVar "French Polynesian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Guamanian" >>
+				<<setVar "Guamanian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "I-Kiribati" >>
+				<<setVar "I-Kiribati" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Marshallese" >>
+				<<setVar "Marshallese" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Micronesian" >>
+				<<setVar "Micronesian" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Nauruan" >>
+				<<setVar "Nauruan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "New Caledonian" >>
+				<<setVar "New Caledonian" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
-				<<NOptions "a New Zealander" >>
+				<<setVar "a New Zealander" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Ni-Vanuatu" >>
+				<<setVar "Ni-Vanuatu" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Niuean" >>
+				<<setVar "Niuean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Palauan" >>
+				<<setVar "Palauan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Papua New Guinean" >>
+				<<setVar "Papua New Guinean" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Samoan" >>
+				<<setVar "Samoan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "a Solomon Islander" >>
+				<<setVar "a Solomon Islander" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Tongan" >>
+				<<setVar "Tongan" "$tempSlave.nationality" "_natR" "#nation">>
 				<<print " | ">>
-				<<NOptions "Tuvaluan" >>
+				<<setVar "Tuvaluan" "$tempSlave.nationality" "_natR" "#nation">>
 				<br>
 			<</replace>>
 	<<else>>
@@ -1571,24 +1473,24 @@
 <<widget FaceTab>>
 	<br>
 	''Face (-100 to 100): ''
-	<<if $tempSlave.face >= 100>>@@.yellow;Very Beautiful@@
-	<<elseif $tempSlave.face >= 55>>@@.yellow;Beautiful@@
-	<<elseif $tempSlave.face >= 15>>@@.yellow;Attractive@@
-	<<elseif $tempSlave.face >= 0>>@@.yellow;Pretty@@
-	<<elseif $tempSlave.face >= -15>>@@.yellow;Unattractive@@
-	<<elseif $tempSlave.face >= -55>>@@.yellow;Ugly@@
+	<<if $tempSlave.face >= 96>>@@.yellow;Mind blowing@@
+	<<elseif $tempSlave.face >= 41>>@@.yellow;Gorgeous@@
+	<<elseif $tempSlave.face >= 11>>@@.yellow;Very pretty@@
+	<<elseif $tempSlave.face >= -10>>@@.yellow;Attractive@@
+	<<elseif $tempSlave.face >= -41>>@@.yellow;Unattractive@@
+	<<elseif $tempSlave.face >= -95>>@@.yellow;Ugly@@
 	<<else>>@@.yellow;Very Ugly@@
 	<</if>>
 	<<textbox "$tempSlave.face" $tempSlave.face>>
 	<br>
 	<<radiobutton "$tempSlave.face" -100>> Very Ugly
-	<<radiobutton "$tempSlave.face" -55>> Ugly
-	<<radiobutton "$tempSlave.face" -15>> Unattractive
-	<<radiobutton "$tempSlave.face" 0>> Pretty
-	<<radiobutton "$tempSlave.face" 15>> Attractive
-	<<radiobutton "$tempSlave.face" 55>> Beautiful
-	<<radiobutton "$tempSlave.face" 100>> Very Beautiful
-	<br><br>
+	<<radiobutton "$tempSlave.face" -65>> Ugly
+	<<radiobutton "$tempSlave.face" -35>> Unattractive
+	<<radiobutton "$tempSlave.face" 0>> Attractive
+	<<radiobutton "$tempSlave.face" 35>> Very pretty
+	<<radiobutton "$tempSlave.face" 65>> Gorgeous
+	<<radiobutton "$tempSlave.face" 100>> Mind blowing
+	<br>
 
 	''Face Shape: @@.yellow;$tempSlave.faceShape@@ ''
 	<br>
@@ -1598,14 +1500,14 @@
 	<<radiobutton "$tempSlave.faceShape" "cute">> Cute
 	<<radiobutton "$tempSlave.faceShape" "sensual">> Sensual
 	<<radiobutton "$tempSlave.faceShape" "exotic">> Exotic
-	<br><br>
+	<br>
 
 	''Face Implant (0 to 100):''
-	<<if $tempSlave.faceImplant < 6>> None
-	<<elseif $tempSlave.faceImplant > 95>> Uncanny Valley
-	<<elseif $tempSlave.faceImplant > 60>> Heavily Reworked
-	<<elseif $tempSlave.faceImplant > 30>> Noticeable Work
-	<<else>> Subtle Improvements
+	<<if $tempSlave.faceImplant == 100 >> Uncanny Valley
+	<<elseif $tempSlave.faceImplant >= 65 >> Heavily Reworked
+	<<elseif $tempSlave.faceImplant >= 35 >> Noticeable Work
+	<<elseif $tempSlave.faceImplant >= 15 >> Subtle Improvements
+	<<else>> None
 	<</if>>
 	<br>
 	<<textbox "$tempSlave.faceImplant" $tempSlave.faceImplant>>
@@ -1623,6 +1525,16 @@
 	<<radiobutton "$tempSlave.markings" "heavily freckled">> Heavy Freckles
 	<<radiobutton "$tempSlave.markings" "beauty mark">> Beauty Mark
 	<<radiobutton "$tempSlave.markings" "birthmark">> Birth Mark
+	<br>
+	''Horn Type: @@.yellow;$tempSlave.horn@@ ''
+	<br>
+	<<radiobutton "$tempSlave.horn" "none">> None
+	<<radiobutton "$tempSlave.horn" "curved succubus horns">> Succubus
+	<<radiobutton "$tempSlave.horn" "backswept horns">> Backswept
+	<<radiobutton "$tempSlave.horn" "one long oni horn">> One Oni Horn
+	<<radiobutton "$tempSlave.horn" "two long oni horns">> Two Oni Horns
+	<<radiobutton "$tempSlave.horn" "small horns">> Small Horns
+	<<radiobutton "$tempSlave.horn" "cow horns">> Bovine
 	<br><br>
 
 	''Sense of Hearing:''
@@ -1637,7 +1549,7 @@
 	<<radiobutton "$tempSlave.hears" -2>> Deaf
 	<br>
 
-	''Ear Implants (none: 0 | exist: 1):''
+	''Cochlear implant (none: 0 | exist: 1):''
 	<<if $tempSlave.earImplant == 1>>
 		@@.yellow;exist@@
 	<<checkbox "$tempSlave.earImplant" 0 1 checked>>
@@ -1645,7 +1557,7 @@
 		@@.yellow;none@@
 	<<checkbox "$tempSlave.earImplant" 0 1>>
 	<</if>>
-	<br><br>
+	<br>
 
 	''Ear Shape: @@.yellow;$tempSlave.earShape@@ ''
 	<br>
@@ -1655,7 +1567,7 @@
 	<<radiobutton "$tempSlave.earShape" "pointy">> Small Elf Ears
 	<<radiobutton "$tempSlave.earShape" "elven">> Long Elf Ears
 	<<radiobutton "$tempSlave.earShape" "ushi">> Bovine
-	<br><br>
+	<br>
 
 	''Kemonomimi Ear Type: @@.yellow;$tempSlave.earT@@ ''
 	<br>
@@ -1675,18 +1587,6 @@
 	<<radiobutton "$tempSlave.smells" 0>> Normal
 	<<radiobutton "$tempSlave.smells" -1>> None
 	<br><br>
-
-	''Horn Type: @@.yellow;$tempSlave.horn@@ ''
-	<br>
-	<<radiobutton "$tempSlave.horn" "none">> None
-	<<radiobutton "$tempSlave.horn" "curved succubus horns">> Succubus
-	<<radiobutton "$tempSlave.horn" "backswept horns">> Backswept
-	<<radiobutton "$tempSlave.horn" "one long oni horn">> One Oni Horn
-	<<radiobutton "$tempSlave.horn" "two long oni horns">> Two Oni Horns
-	<<radiobutton "$tempSlave.horn" "small horns">> Small Horns
-	<<radiobutton "$tempSlave.horn" "cow horns">> Bovine
-	<br><br>
-
 <</widget>>
 
 <<widget HairTab>>
@@ -1740,34 +1640,34 @@
 			<<replace "#hcol1">>
 				<<set _hcol1R = 1>>
 				<br>
-				<<H1Options "blonde" >>
-				<<H1Options "golden" >>
-				<<H1Options "platinum blonde" >>
-				<<H1Options "strawberry-blonde" >>
-				<<H1Options "copper" >>
-				<<H1Options "ginger" >>
-				<<H1Options "red" >>
-				<<H1Options "green" >>
-				<<H1Options "pink" >>
-				<<H1Options "dark brown" >>
+				<<setVar "blonde" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "golden" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "platinum blonde" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "strawberry-blonde" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "copper" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "ginger" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "red" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "green" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "pink" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "dark brown" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
 				<br>
-				<<H1Options "brown" >>
-				<<H1Options "auburn" >>
-				<<H1Options "burgundy" >>
-				<<H1Options "chocolate brown" >>
-				<<H1Options "chestnut" >>
-				<<H1Options "hazel" >>
-				<<H1Options "jet black" >>
-				<<H1Options "black" >>
-				<<H1Options "grey" >>
-				<<H1Options "silver" >>
-				<<H1Options "white" >>
-				<<H1Options "blue-violet" >>
-				<<H1Options "purple" >>
-				<<H1Options "dark orchid" >>
-				<<H1Options "sea green" >>
-				<<H1Options "green-yellow" >>
-				<<H1Options "dark blue" >>
+				<<setVar "brown" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "auburn" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "burgundy" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "chocolate brown" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "chestnut" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "hazel" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "jet black" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "black" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "grey" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "silver" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "white" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "blue-violet" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "purple" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "dark orchid" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "sea green" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "green-yellow" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
+				<<setVar "dark blue" "$tempSlave.hColor" "_hcol1R" "#hcol1">>
 				<br>
 			<</replace>>
 		<<else>>
@@ -1787,34 +1687,34 @@
 			<<replace "#hcol2">>
 				<<set _hcol2R = 1>>
 				<br>
-				<<H2Options "blonde" >>
-				<<H2Options "golden" >>
-				<<H2Options "platinum blonde" >>
-				<<H2Options "strawberry-blonde" >>
-				<<H2Options "copper" >>
-				<<H2Options "ginger" >>
-				<<H2Options "red" >>
-				<<H2Options "green" >>
-				<<H2Options "pink" >>
-				<<H2Options "dark brown" >>
+				<<setVar "blonde" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "golden" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "platinum blonde" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "strawberry-blonde" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "copper" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "ginger" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "red" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "green" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "pink" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "dark brown" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
 				<br>
-				<<H2Options "brown" >>
-				<<H2Options "auburn" >>
-				<<H2Options "burgundy" >>
-				<<H2Options "chocolate brown" >>
-				<<H2Options "chestnut" >>
-				<<H2Options "hazel" >>
-				<<H2Options "jet black" >>
-				<<H2Options "black" >>
-				<<H2Options "grey" >>
-				<<H2Options "silver" >>
-				<<H2Options "white" >>
-				<<H2Options "blue-violet" >>
-				<<H2Options "purple" >>
-				<<H2Options "dark orchid" >>
-				<<H2Options "sea green" >>
-				<<H2Options "green-yellow" >>
-				<<H2Options "dark blue" >>
+				<<setVar "brown" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "auburn" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "burgundy" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "chocolate brown" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "chestnut" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "hazel" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "jet black" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "black" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "grey" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "silver" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "white" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "blue-violet" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "purple" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "dark orchid" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "sea green" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "green-yellow" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
+				<<setVar "dark blue" "$tempSlave.origHColor" "_hcol2R" "#hcol2">>
 				<br>
 			<</replace>>
 		<<else>>
@@ -1832,34 +1732,34 @@
 			<<replace "#hcol5">>
 				<<set _hcol5R = 1>>
 				<br>
-				<<H5Options "blonde" >>
-				<<H5Options "golden" >>
-				<<H5Options "platinum blonde" >>
-				<<H5Options "strawberry-blonde" >>
-				<<H5Options "copper" >>
-				<<H5Options "ginger" >>
-				<<H5Options "red" >>
-				<<H5Options "green" >>
-				<<H5Options "pink" >>
-				<<H5Options "dark brown" >>
+				<<setVar "blonde" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "golden" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "platinum blonde" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "strawberry-blonde" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "copper" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "ginger" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "red" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "green" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "pink" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "dark brown" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
 				<br>
-				<<H5Options "brown" >>
-				<<H5Options "auburn" >>
-				<<H5Options "burgundy" >>
-				<<H5Options "chocolate brown" >>
-				<<H5Options "chestnut" >>
-				<<H5Options "hazel" >>
-				<<H5Options "jet black" >>
-				<<H5Options "black" >>
-				<<H5Options "grey" >>
-				<<H5Options "silver" >>
-				<<H5Options "white" >>
-				<<H5Options "blue-violet" >>
-				<<H5Options "purple" >>
-				<<H5Options "dark orchid" >>
-				<<H5Options "sea green" >>
-				<<H5Options "green-yellow" >>
-				<<H5Options "dark blue" >>
+				<<setVar "brown" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "auburn" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "burgundy" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "chocolate brown" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "chestnut" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "hazel" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "jet black" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "black" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "grey" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "silver" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "white" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "blue-violet" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "purple" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "dark orchid" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "sea green" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "green-yellow" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
+				<<setVar "dark blue" "$tempSlave.eyebrowHColor" "_hcol5R" "#hcol5">>
 				<br>
 			<</replace>>
 		<<else>>
@@ -1899,34 +1799,34 @@
 			<<replace "#hcol3">>
 				<<set _hcol3R = 1>>
 				<br>
-				<<H3Options "blonde" >>
-				<<H3Options "golden" >>
-				<<H3Options "platinum blonde" >>
-				<<H3Options "strawberry-blonde" >>
-				<<H3Options "copper" >>
-				<<H3Options "ginger" >>
-				<<H3Options "red" >>
-				<<H3Options "green" >>
-				<<H3Options "pink" >>
-				<<H3Options "dark brown" >>
+				<<setVar "blonde" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "golden" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "platinum blonde" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "strawberry-blonde" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "copper" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "ginger" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "red" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "green" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "pink" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "dark brown" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
 				<br>
-				<<H3Options "brown" >>
-				<<H3Options "auburn" >>
-				<<H3Options "burgundy" >>
-				<<H3Options "chocolate brown" >>
-				<<H3Options "chestnut" >>
-				<<H3Options "hazel" >>
-				<<H3Options "jet black" >>
-				<<H3Options "black" >>
-				<<H3Options "grey" >>
-				<<H3Options "silver" >>
-				<<H3Options "white" >>
-				<<H3Options "blue-violet" >>
-				<<H3Options "purple" >>
-				<<H3Options "dark orchid" >>
-				<<H3Options "sea green" >>
-				<<H3Options "green-yellow" >>
-				<<H3Options "dark blue" >>
+				<<setVar "brown" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "auburn" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "burgundy" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "chocolate brown" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "chestnut" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "hazel" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "jet black" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "black" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "grey" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "silver" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "white" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "blue-violet" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "purple" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "dark orchid" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "sea green" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "green-yellow" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
+				<<setVar "dark blue" "$tempSlave.pubicHColor" "_hcol3R" "#hcol3">>
 				<br>
 			<</replace>>
 		<<else>>
@@ -1953,34 +1853,34 @@
 			<<replace "#hcol4">>
 				<<set _hcol4R = 1>>
 				<br>
-				<<H4Options "blonde" >>
-				<<H4Options "golden" >>
-				<<H4Options "platinum blonde" >>
-				<<H4Options "strawberry-blonde" >>
-				<<H4Options "copper" >>
-				<<H4Options "ginger" >>
-				<<H4Options "red" >>
-				<<H4Options "green" >>
-				<<H4Options "pink" >>
-				<<H4Options "dark brown" >>
+				<<setVar "blonde" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "golden" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "platinum blonde" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "strawberry-blonde" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "copper" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "ginger" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "red" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "green" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "pink" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "dark brown" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
 				<br>
-				<<H4Options "brown" >>
-				<<H4Options "auburn" >>
-				<<H4Options "burgundy" >>
-				<<H4Options "chocolate brown" >>
-				<<H4Options "chestnut" >>
-				<<H4Options "hazel" >>
-				<<H4Options "jet black" >>
-				<<H4Options "black" >>
-				<<H4Options "grey" >>
-				<<H4Options "silver" >>
-				<<H4Options "white" >>
-				<<H4Options "blue-violet" >>
-				<<H4Options "purple" >>
-				<<H4Options "dark orchid" >>
-				<<H4Options "sea green" >>
-				<<H4Options "green-yellow" >>
-				<<H4Options "dark blue" >>
+				<<setVar "brown" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "auburn" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "burgundy" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "chocolate brown" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "chestnut" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "hazel" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "jet black" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "black" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "grey" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "silver" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "white" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "blue-violet" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "purple" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "dark orchid" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "sea green" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "green-yellow" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
+				<<setVar "dark blue" "$tempSlave.underArmHColor" "_hcol4R" "#hcol4">>
 				<br>
 			<</replace>>
 		<<else>>
@@ -2004,155 +1904,307 @@
 
 <<widget EyesTab>>
 	<br>
-	''$His eyes are currently @@.yellow;$tempSlave.eyeColor@@ in color''
+	''Right Eye: ''<br>
+	<<if $tempSlave.eye.right == null>>''There is no right eye''<br>
+	<<link "[Add a new Eye]">>
+	<<replace "#spot">>
+		<<set $tempSlave.eye.right = {iris: $tempSlave.eye.origColor, pupil: "circular", sclera: "white", type: 1, vision: 2}>>
+		<<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>><<set _sclrRR = 0>><<set _sclrRL = 0>>
+		<<set _eyesR = 0>>
+	<</replace>>
+	<</link>><br><br>
+	<<else>>
+	''$His right eye is currently @@.yellow;$tempSlave.eye.right.iris@@ in color''
 	<<link "Eye Colors">>
-		<<if (ndef _ecol1R) || (_ecol1R == 0) >>
-			<<replace "#ecol1">>
-				<<set _ecol1R = 1>>
+		<<if (ndef _ecol1RR) || (_ecol1RR == 0) >>
+			<<replace "#ecol1RR">>
+				<<set _ecol1RR = 1>>
 				<br>
-				<<E1Options "blue" >>
-				<<E1Options "black" >>
-				<<E1Options "brown" >>
-				<<E1Options "green" >>
-				<<E1Options "turquoise" >>
-				<<E1Options "sky-blue" >>
-				<<E1Options "pale-grey" >>
-				<<E1Options "white" >>
-				<<E1Options "pink" >>
-				<<E1Options "amber" >>
-				<<E1Options "red" >>
+				<<setVar "blue" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "black" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "brown" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "green" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "turquoise" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "sky-blue" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "hazel" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "pale-grey" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "white" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "pink" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "amber" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "red" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+			<</replace>>
+		<<else>>
+			<<replace "#ecol1RR">>
+				<<set _ecol1RR = 0>>
+			<</replace>>
+		<</if>>
+	<</link>>
+	<span id=ecol1RR></span>
+	<br>Custom eye color: <<textbox "$tempSlave.eye.right.iris" $tempSlave.eye.right.iris>>
+	<br>
+	''$His right pupil is @@.yellow;$tempSlave.eye.right.pupil@@ in shape''
+	<<link "Pupil Shape">>
+		<<if (ndef _ppilRR) || (_ppilRR == 0) >>
+			<<replace "#ppilRR">>
+				<<set _ppilRR = 1>>
 				<br>
+				<<setVar "circular" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "catlike" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "serpent-like" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "devilish" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "demonic" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "hypnotic" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "heart-shaped" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "wide-eyed" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "almond-shaped" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "bright" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "teary" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "vacant" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "star-shaped" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
+				<<setVar "goat-like" "$tempSlave.eye.right.pupil" "_ppilRR" "#ppilRR">>
 			<</replace>>
 		<<else>>
-			<<replace "#ecol1">>
-				<<set _ecol1R = 0>>
+			<<replace "#ppilRR">>
+				<<set _ppilRR = 0>>
 			<</replace>>
 		<</if>>
 	<</link>>
-	<span id=ecol1></span>
-	<br>Custom eye color: <<textbox "$tempSlave.eyeColor" $tempSlave.eyeColor>>
+	<span id=ppilRR></span>
+	<br>Custom pupil shape: <<textbox "$tempSlave.eye.right.pupil" $tempSlave.eye.right.pupil>>
+	<br>
+	''$His right sclera is @@.yellow;$tempSlave.eye.right.sclera@@ in color''
+	<<link "Sclera Colors">>
+		<<if (ndef _sclrRR) || (_sclrRR == 0) >>
+			<<replace "#sclrRR">>
+				<<set _sclrRR = 1>>
+				<br>
+				<<setVar "white" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "blue" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "black" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "brown" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "green" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "turquoise" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "sky-blue" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "hazel" "$tempSlave.eye.right.iris" "_ecolRR" "#ecol1RR">>
+				<<setVar "pale-grey" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "pink" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "amber" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "red" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "yellow" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+				<<setVar "orange" "$tempSlave.eye.right.sclera" "_sclrRR" "#sclrRR">>
+			<</replace>>
+		<<else>>
+			<<replace "#sclrRR">>
+				<<set _sclrRR = 0>>
+			<</replace>>
+		<</if>>
+	<</link>>
+	<span id=sclrRR></span>
+	<br>Custom sclera color: <<textbox "$tempSlave.eye.right.sclera" $tempSlave.eye.right.sclera>>
 	<br><br>
-	''$His original eyecolor is @@.yellow;$tempSlave.origEye@@''
+	''$His vision on the right eye is :''
+	<<switch $tempSlave.eye.right.vision>>
+	<<case 0>>@@.yellow;Blind@@
+	<<case 1>>@@.yellow;Nearsighted@@
+	<<case 2>>@@.yellow;Normal@@
+	<</switch>>
+	<br>
+	<<radiobutton "$tempSlave.eye.right.vision" 2>> Normal
+	<<radiobutton "$tempSlave.eye.right.vision" 1>> Nearsighted
+	<<radiobutton "$tempSlave.eye.right.vision" 0>> Blind
+	<br>
+	''$He has a ''
+	<<if $tempSlave.eye.right.type == 1>>@@.yellow;normal@@
+	<<elseif $tempSlave.eye.right.type == 2>>@@.yellow;glass@@
+	<<else>>@@.yellow;cybernetic@@
+	<</if>> right eye.
+	<br>
+	<<radiobutton "$tempSlave.eye.right.type" 1>> Normal
+	<<radiobutton "$tempSlave.eye.right.type" 2>> Glass
+	<<radiobutton "$tempSlave.eye.right.type" 3>> Cybernetic
+	<br>
+	<<link "[Remove the eye]">>
+	<<replace "#spot">>
+		<<set $tempSlave.eye.right = null>>
+		<<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>><<set _sclrRR = 0>><<set _sclrRL = 0>>
+		<<set _eyesR = 0>>
+	<</replace>>
+	<</link>>
+	<br><br><</if>>
+	''Left Eye: '' <br>
+	<<if $tempSlave.eye.left == null>>''There is no left eye''<br>
+	<<link "[Add a new Eye]">>
+	<<replace "#spot">>
+		<<set $tempSlave.eye.left = {iris: $tempSlave.eye.origColor, pupil: "circular", sclera: "white", type: 1, vision: 2}>>
+		<<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>><<set _sclrRR = 0>><<set _sclrRL = 0>>
+		<<set _eyesR = 0>>
+	<</replace>>
+	<</link>><br>
+	<br><br>
+	<<else>>
+	''$His left eye is currently @@.yellow;$tempSlave.eye.left.iris@@ in color''
 	<<link "Eye Colors">>
-		<<if (ndef _ecol2R) || (_ecol2R == 0) >>
-			<<replace "#ecol2">>
-				<<set _ecol2R = 1>>
-				<br>
-				<<E2Options "blue" #ecol2 _ecol2R >>
-				<<E2Options "black" #ecol2 _ecol2R >>
-				<<E2Options "brown" #ecol2 _ecol2R >>
-				<<E2Options "green" #ecol2 _ecol2R >>
-				<<E2Options "turquoise" #ecol2 _ecol2R >>
-				<<E2Options "sky-blue" #ecol2 _ecol2R >>
-				<<E2Options "pale-grey" #ecol2 _ecol2R >>
-				<<E2Options "white" #ecol2 _ecol2R >>
-				<<E2Options "pink" #ecol2 _ecol2R >>
-				<<E2Options "amber" #ecol2 _ecol2R >>
-				<<E2Options "red" #ecol2 _ecol2R >>
+		<<if (ndef _ecol1RL) || (_ecol1RL == 0) >>
+			<<replace "#ecol1RL">>
+				<<set _ecol1RL = 1>>
 				<br>
+				<<setVar "blue" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "black" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "brown" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "green" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "turquoise" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "sky-blue" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "hazel" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "pale-grey" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "white" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "pink" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "amber" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
+				<<setVar "red" "$tempSlave.eye.left.iris" "_ecol1RL" "#ecol1RL">>
 			<</replace>>
 		<<else>>
-			<<replace "#ecol2">>
-				<<set _ecol2R = 0>>
+			<<replace "#ecol1RL">>
+				<<set _ecol1RL = 0>>
 			<</replace>>
 		<</if>>
 	<</link>>
-	<span id=ecol2></span>
-	<br>Custom eye color: <<textbox "$tempSlave.origEye" $tempSlave.origEye>>
-	<br><br>
-	''$His pupils are @@.yellow;$tempSlave.pupil@@ in shape''
+	<span id=ecol1RL></span>
+	<br>Custom eye color: <<textbox "$tempSlave.eye.left.iris" $tempSlave.eye.left.iris>>
+	<br>
+	''$His left pupil is @@.yellow;$tempSlave.eye.left.pupil@@ in shape''
 	<<link "Pupil Shape">>
-		<<if (ndef _ppilR) || (_ppilR == 0) >>
-			<<replace "#ppil">>
-				<<set _ppilR = 1>>
-				<br>
-				<<POptions "circular" >>
-				<<POptions "catlike" >>
-				<<POptions "serpent-like" >>
-				<<POptions "devilish" >>
-				<<POptions "demonic" >>
-				<<POptions "hypnotic" >>
-				<<POptions "heart-shaped" >>
-				<<POptions "wide-eyed" >>
-				<<POptions "almond-shaped" >>
-				<<POptions "bright" >>
-				<<POptions "teary" >>
-				<<POptions "vacant" >>
-				<<POptions "star-shaped" >>
+		<<if (ndef _ppilRL) || (_ppilRL == 0) >>
+			<<replace "#ppilRL">>
+				<<set _ppilRL = 1>>
 				<br>
+				<<setVar "circular" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "catlike" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "serpent-like" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "devilish" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "demonic" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "hypnotic" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "heart-shaped" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "wide-eyed" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "almond-shaped" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "bright" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "teary" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "vacant" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "star-shaped" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
+				<<setVar "goat-like" "$tempSlave.eye.left.pupil" "_ppilRL" "#ppilRL">>
 			<</replace>>
 		<<else>>
-			<<replace "#ppil">>
-				<<set _ppilR = 0>>
+			<<replace "#ppilRL">>
+				<<set _ppilRL = 0>>
 			<</replace>>
 		<</if>>
 	<</link>>
-	<span id=ppil></span>
-	<br>Custom pupil shape: <<textbox "$tempSlave.pupil" $tempSlave.pupil>>
-	<br><br>
-	''$His sclerae are @@.yellow;$tempSlave.sclerae@@ in color''
+	<span id=ppilRL></span>
+	<br>Custom pupil shape: <<textbox "$tempSlave.eye.left.pupil" $tempSlave.eye.left.pupil>>
+	<br>
+	''$His left sclerae is @@.yellow;$tempSlave.eye.left.sclera@@ in color''
 	<<link "Sclera Colors">>
-		<<if (ndef _sclrR) || (_sclrR == 0) >>
-			<<replace "#sclr">>
-				<<set _sclrR = 1>>
-				<br>
-				<<ScOptions "white" >>
-				<<ScOptions "blue" >>
-				<<ScOptions "black" >>
-				<<ScOptions "brown" >>
-				<<ScOptions "green" >>
-				<<ScOptions "turquoise" >>
-				<<ScOptions "sky-blue" >>
-				<<ScOptions "pale-grey" >>
-				<<ScOptions "pink" >>
-				<<ScOptions "amber" >>
-				<<ScOptions "red" >>
+		<<if (ndef _sclrRL) || (_sclrRL == 0) >>
+			<<replace "#sclrRL">>
+				<<set _sclrRL = 1>>
 				<br>
+				<<setVar "white" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "blue" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "black" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "brown" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "green" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "turquoise" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "sky-blue" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "pale-grey" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "pink" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "amber" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "red" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "yellow" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
+				<<setVar "orange" "$tempSlave.eye.left.sclera" "_sclrRL" "#sclrRL">>
 			<</replace>>
 		<<else>>
-			<<replace "#sclr">>
-				<<set _sclrR = 0>>
+			<<replace "#sclrRL">>
+				<<set _sclrRL = 0>>
 			<</replace>>
 		<</if>>
 	<</link>>
-	<span id=sclr></span>
-	<br>Custom sclera color: <<textbox "$tempSlave.sclerae" $tempSlave.sclerae>>
+	<span id=sclrRL></span>
+	<br>Custom sclera color: <<textbox "$tempSlave.eye.left.sclera" $tempSlave.eye.left.sclera>>
 	<br><br>
-	''$His vision is :''
-	<<switch $tempSlave.eyes>>
-	<<case -2>>@@.yellow;Blind@@
-	<<case -1>>@@.yellow;Nearsighted@@
-	<<case 1>>@@.yellow;Normal@@
+	''$His vision on the left eye is :''
+	<<switch $tempSlave.eye.left.vision>>
+	<<case 0>>@@.yellow;Blind@@
+	<<case 1>>@@.yellow;Nearsighted@@
+	<<case 2>>@@.yellow;Normal@@
 	<</switch>>
 	<br>
-	<<radiobutton "$tempSlave.eyes" 1>> Normal
-	<<radiobutton "$tempSlave.eyes" -1>> Nearsighted
-	<<radiobutton "$tempSlave.eyes" -2>> Blind
+	<<radiobutton "$tempSlave.eye.left.vision" 2>> Normal
+	<<radiobutton "$tempSlave.eye.left.vision" 1>> Nearsighted
+	<<radiobutton "$tempSlave.eye.left.vision" 0>> Blind
 	<br>
-	''$He has ''
-	<<if $tempSlave.eyesImplant == 0>>normal<<else>>artificial<</if>> eyes.
+	''$He has a ''
+	<<if $tempSlave.eye.left.type == 1>>@@.yellow;normal@@
+	<<elseif $tempSlave.eye.left.type == 2>>@@.yellow;glass@@
+	<<else>>@@.yellow;cybernetic@@
+	<</if>> left eye.
 	<br>
-	<<radiobutton "$tempSlave.eyesImplant" 0>> Normal
-	<<radiobutton "$tempSlave.eyesImplant" 1>> Artificial
+	<<radiobutton "$tempSlave.eye.left.type" 1>> Normal
+	<<radiobutton "$tempSlave.eye.left.type" 2>> Glass
+	<<radiobutton "$tempSlave.eye.left.type" 3>> Cybernetic
 	<br>
+	<<link "[Remove the eye]">>
+	<<replace "#spot">>
+		<<set $tempSlave.eye.left = null>>
+		<<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>><<set _sclrRR = 0>><<set _sclrRL = 0>>
+		<<set _eyesR = 0>>
+	<</replace>>
+	<</link>>
+	<br><br>
+	<</if>>
+	''$His original eyecolor is @@.yellow;$tempSlave.eye.origColor@@''
+	<<link "Eye Colors">>
+		<<if (ndef _ecol2R) || (_ecol2R == 0) >>
+			<<replace "#ecol2">>
+				<<set _ecol2R = 1>>
+				<br>
+				<<setVar "blue" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "black" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "brown" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "green" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "turquoise" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "sky-blue" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "hazel" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "pale-grey" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "white" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "pink" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "amber" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+				<<setVar "red" "$tempSlave.eye.origColor" "_ecol2R" "#ecol2">>
+			<</replace>>
+		<<else>>
+			<<replace "#ecol2">>
+				<<set _ecol2R = 0>>
+			<</replace>>
+		<</if>>
+	<</link>>
+	<span id=ecol2></span>
+	<br>Custom eye color: <<textbox "$tempSlave.eye.origColor" $tempSlave.eye.origColor>>
+	<br><br>
 <</widget>>
 
 <<widget MouthTab>>
 	<br>
 	''Lips (0 to 100): ''
-	<<if $tempSlave.lips >= 100>> @@.yellow;Enormous facepussy@@
-	<<elseif $tempSlave.lips >= 85 >>@@.yellow;Huge@@
-	<<elseif $tempSlave.lips >= 65 >>@@.yellow;Big@@
-	<<elseif $tempSlave.lips >= 35 >>@@.yellow;Plush@@
-	<<elseif $tempSlave.lips >= 15 >>@@.yellow;Normal@@
+	<<if $tempSlave.lips >= 96>> @@.yellow;Enormous facepussy@@
+	<<elseif $tempSlave.lips >= 71 >>@@.yellow;Huge@@
+	<<elseif $tempSlave.lips >= 41 >>@@.yellow;Plush@@
+	<<elseif $tempSlave.lips >= 21 >>@@.yellow;Pretty@@
+	<<elseif $tempSlave.lips >= 11 >>@@.yellow;Normal@@
 	<<else>>@@.yellow;Thin@@
 	<</if>>
 	<<textbox "$tempSlave.lips" $tempSlave.lips>>
 	<br>
-	<<radiobutton "$tempSlave.lips" 0>> Thin
+	<<radiobutton "$tempSlave.lips" 5>> Thin
 	<<radiobutton "$tempSlave.lips" 15>> Normal
-	<<radiobutton "$tempSlave.lips" 35>> Plush
-	<<radiobutton "$tempSlave.lips" 65>> Big
+	<<radiobutton "$tempSlave.lips" 30>> Pretty
+	<<radiobutton "$tempSlave.lips" 55>> Plush
 	<<radiobutton "$tempSlave.lips" 85>> Huge
 	<<radiobutton "$tempSlave.lips" 100>> Enormous facepussy
 	<br>
@@ -2214,19 +2266,24 @@
 
 	<br>
 
-	''Voice OP: ''
-	<<if $tempSlave.voiceImplant == -2>>@@.yellow;Much Lower@@
-	<<elseif $tempSlave.voiceImplant == -1>>@@.yellow;Lower@@
+	''Voice Implant: ''
+	<<if $tempSlave.voiceImplant == -1>>@@.yellow;Low@@
 	<<elseif $tempSlave.voiceImplant == 0>>@@.yellow;None@@
-	<<elseif $tempSlave.voiceImplant == 1>>@@.yellow;Higher@@
-	<<else>>@@.yellow;Much Higher@@<</if>>
+	<<else>>@@.yellow;High@@
+	<</if>>
 	<br>
-	<<radiobutton "$tempSlave.voiceImplant" -2>> Much Lower
-	<<radiobutton "$tempSlave.voiceImplant" -1>> Lower
 	<<radiobutton "$tempSlave.voiceImplant" 0>> None
-	<<radiobutton "$tempSlave.voiceImplant" 1>> Higher
-	<<radiobutton "$tempSlave.voiceImplant" 2>> Much Higher
+	<<radiobutton "$tempSlave.voiceImplant" 1>> High
+	<<radiobutton "$tempSlave.voiceImplant" -1>> Low
+	<br>
+	''Cybernetic Voicebox: ''
+	<<if $tempSlave.electrolarynx == 0>>@@.yellow;None@@
+	<<else>>@@.yellow;Implanted@@
+	<</if>>
 	<br>
+	<<radiobutton "$tempSlave.electrolarynx" 0>> None
+	<<radiobutton "$tempSlave.electrolarynx" 1>> Implanted
+	<br><br>
 
 	''Sense of Taste: ''
 	<<switch $tempSlave.tastes>>
@@ -2262,31 +2319,8 @@
 		<<radiobutton "$tempSlave.hormoneBalance" 300>> Extremely feminine
 		<<radiobutton "$tempSlave.hormoneBalance" 400>> Overwhelmingly feminine
 
-	<br>
-	// Cannot modify limbs currently //
-	/* TODO convert */
-	/*
-	''Amputated: ''
-	<<switch $tempSlave.amp>>
-	<<case 1>>@@.yellow;Amputated@@
-	<<case 0>>@@.yellow;Healthy Human Limbs@@
-	<<case -1>>@@.yellow;Basic prosthetic limbs@@
-	<<case -2>>@@.yellow;Sexy prosthetic limbs@@
-	<<case -3>>@@.yellow;Beauty prosthetic limbs@@
-	<<case -4>>@@.yellow;Combat prosthetic limbs@@
-	<<case -5>>@@.yellow;Cybernetic limbs@@
-	<</switch>>
-	<br>
-	<<radiobutton "$tempSlave.amp" 0>> Normal
-	<<radiobutton "$tempSlave.amp" 1>> Amputated
-	<<radiobutton "$tempSlave.amp" -1>> Basic prosthetic limbs
-	<<radiobutton "$tempSlave.amp" -2>> Sexy prosthetic limbs
-	<<radiobutton "$tempSlave.amp" -3>> Beauty prosthetic limbs
-	<<radiobutton "$tempSlave.amp" -4>> Combat prosthetic limbs
-	<<radiobutton "$tempSlave.amp" -5>> Cybernetic limbs
-*/
-	<br>
-	''Prostetic limb Interface:''
+	<br><br>
+	''Prostetic limb interface:''
 	<<if $tempSlave.PLimb == 0>>@@.yellow;No Interface@@
 	<<elseif $tempSlave.PLimb == 1>>@@.yellow;Basic Interface@@
 	<<else>>@@.yellow;Advanced Interface@@<</if>>
@@ -2294,23 +2328,179 @@
 	<<radiobutton "$tempSlave.PLimb" 0>> No Interface
 	<<radiobutton "$tempSlave.PLimb" 1>> Basic Interface
 	<<radiobutton "$tempSlave.PLimb" 2>> Advanced Interface
-
-	<br><br>
-	''Prostetic tail Interface:''
+	<br>
+	''$Her left arm is currently: ''
+	<<if $tempSlave.arm.left == null>>
+		<<print "None">><br>
+	<<link "[add an arm]">>
+	<<replace "#spot">>
+		<<set $tempSlave.arm.left = {type: 1}>>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<<else>>
+	<<switch $tempSlave.arm.left.type>>
+		<<case 1>>@@.yellow;Natural@@
+		<<case 2>>@@.yellow;Basic@@
+		<<case 3>>@@.yellow;Sex@@
+		<<case 4>>@@.yellow;Beauty@@
+		<<case 5>>@@.yellow;Combat@@
+		<<case 6>>@@.yellow;Cybernetic@@
+	<</switch>>
+	<br>
+	<<radiobutton "$tempSlave.arm.left.type" 1>> Natural
+	<<radiobutton "$tempSlave.arm.left.type" 2>> Basic
+	<<radiobutton "$tempSlave.arm.left.type" 3>> Sex
+	<<radiobutton "$tempSlave.arm.left.type" 4>> Beauty
+	<<radiobutton "$tempSlave.arm.left.type" 5>> Combat
+	<<radiobutton "$tempSlave.arm.left.type" 6>> Cybernetic
+	<br>
+	<<link "[Remove the arm]">>
+	<<replace "#spot">>
+		<<set $tempSlave.arm.left = null>>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<</if>>
+	''$Her right arm is currently: ''
+	<<if $tempSlave.arm.right == null>>
+		<<print "None">><br>
+	<<link "[add an arm]">>
+	<<replace "#spot">>
+		<<set $tempSlave.arm.right = {type: 1}>>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<<else>>
+	<<switch $tempSlave.arm.right.type>>
+		<<case 1>>@@.yellow;Natural@@
+		<<case 2>>@@.yellow;Basic@@
+		<<case 3>>@@.yellow;Sex@@
+		<<case 4>>@@.yellow;Beauty@@
+		<<case 5>>@@.yellow;Combat@@
+		<<case 6>>@@.yellow;Cybernetic@@
+	<</switch>>
+	<br>
+	<<radiobutton "$tempSlave.arm.right.type" 1>> Natural
+	<<radiobutton "$tempSlave.arm.right.type" 2>> Basic
+	<<radiobutton "$tempSlave.arm.right.type" 3>> Sex
+	<<radiobutton "$tempSlave.arm.right.type" 4>> Beauty
+	<<radiobutton "$tempSlave.arm.right.type" 5>> Combat
+	<<radiobutton "$tempSlave.arm.right.type" 6>> Cybernetic
+	<br>
+	<<link "[Remove the arm]">>
+	<<replace "#spot">>
+		<<set $tempSlave.arm.right = null >>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<</if>>
+	''$Her left leg is currently: ''
+	<<if $tempSlave.leg.left == null>>
+		<<print "None">><br>
+	<<link "[add a leg]">>
+	<<replace "#spot">>
+		<<set $tempSlave.leg.left = {type: 1}>>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<<else>>
+	<<switch $tempSlave.leg.left.type>>
+		<<case 1>>@@.yellow;Natural@@
+		<<case 2>>@@.yellow;Basic@@
+		<<case 3>>@@.yellow;Sex@@
+		<<case 4>>@@.yellow;Beauty@@
+		<<case 5>>@@.yellow;Combat@@
+		<<case 6>>@@.yellow;Cybernetic@@
+	<</switch>>
+	<br>
+	<<radiobutton "$tempSlave.leg.left.type" 1>> Natural
+	<<radiobutton "$tempSlave.leg.left.type" 2>> Basic
+	<<radiobutton "$tempSlave.leg.left.type" 3>> Sex
+	<<radiobutton "$tempSlave.leg.left.type" 4>> Beauty
+	<<radiobutton "$tempSlave.leg.left.type" 5>> Combat
+	<<radiobutton "$tempSlave.leg.left.type" 6>> Cybernetic
+	<br>
+	<<link "[Remove the leg]">>
+	<<replace "#spot">>
+		<<set $tempSlave.leg.left = null >>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<</if>>
+	''$Her right leg is currently: ''
+	<<if $tempSlave.leg.right == null>>
+		<<print "None">><br>
+	<<link "[add a leg]">>
+	<<replace "#spot">>
+		<<set $tempSlave.leg.right = {type: 1}>>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<<else>>
+	<<switch $tempSlave.leg.right.type>>
+		<<case 1>>@@.yellow;Natural@@
+		<<case 2>>@@.yellow;Basic@@
+		<<case 3>>@@.yellow;Sex@@
+		<<case 4>>@@.yellow;Beauty@@
+		<<case 5>>@@.yellow;Combat@@
+		<<case 6>>@@.yellow;Cybernetic@@
+	<</switch>>
+	<br>
+	<<radiobutton "$tempSlave.leg.right.type" 1>> Natural
+	<<radiobutton "$tempSlave.leg.right.type" 2>> Basic
+	<<radiobutton "$tempSlave.leg.right.type" 3>> Sex
+	<<radiobutton "$tempSlave.leg.right.type" 4>> Beauty
+	<<radiobutton "$tempSlave.leg.right.type" 5>> Combat
+	<<radiobutton "$tempSlave.leg.right.type" 6>> Cybernetic
+	<br>
+	<<link "[Remove the leg]">>
+	<<replace "#spot">>
+		<<set $tempSlave.leg.right = null >>
+		<<set _bodyR = 0>>
+	<</replace>>
+	<</link>>
+	<br>
+	<</if>>
+	<br>
+	''Prostetic tail interface:''
 	<<if $tempSlave.PTail == 1>>@@.yellow;Installed@@
 	<<else>>@@.yellow;Not Installed@@<</if>>
 	<br>
 	<<radiobutton "$tempSlave.PTail" 0>> Not Installed
 	<<radiobutton "$tempSlave.PTail" 1>> Installed
 	<br>
-	''Tail Currently Installed: @@.yellow;$tempSlave.tail@@ ''
+	''Tail currently installed: ''
+	<<switch $tempSlave.tail>>
+		<<case "none">>@@.yellow;No tail@@
+		<<case "mod">>@@.yellow;Modular@@
+		<<case "sex">>@@.yellow;Sex@@
+		<<case "combat">>@@.yellow;Combat@@
+	<</switch>>
 	<br>
 	<<radiobutton "$tempSlave.tail" "none">> None
 	<<radiobutton "$tempSlave.tail" "mod">> Modular
 	<<radiobutton "$tempSlave.tail" "combat">> Combat
 	<<radiobutton "$tempSlave.tail" "sex">> Pleasure
 	<br>
-	''Kemonomimi Tail Shape: @@.yellow;$tempSlave.tailShape@@ ''
+	''Kemonomimi Tail Shape: ''
+	<<switch $tempSlave.tailShape>>
+		<<case "none">>@@.yellow;None@@
+		<<case "neko">>@@.yellow;Cat@@
+		<<case "inu">>@@.yellow;Dog@@
+		<<case "kit">>@@.yellow;Fox@@
+		<<case "kitsune">>@@.yellow;3 tailed fox@@
+		<<case "tanuki">>@@.yellow;Tanuki@@
+		<<case "ushi">>@@.yellow;Bovine@@
+	<</switch>>
+	@@.yellow;$tempSlave.tailShape@@ ''
 	<br>
 	//Set current tail to Modular before changing this//
 	<<radiobutton "$tempSlave.tailShape" "none">> None
@@ -2320,7 +2510,9 @@
 	<<radiobutton "$tempSlave.tailShape" "kitsune">> 3 Fox Tails
 	<<radiobutton "$tempSlave.tailShape" "tanuki">> Tanuki
 	<<radiobutton "$tempSlave.tailShape" "ushi">> Bovine
-
+	<br>
+	''Tail Color: ''@@.yellow;$tempSlave.tailColor@@<br>
+	<<textbox "$tempSlave.tailColor" $tempSlave.tailColor>>
 	<br><br>
 	''Fuckdoll: (0-100)''
 	<<if $tempSlave.fuckdoll < 15>>@@.yellow;Not a Fuckdoll@@
@@ -2344,20 +2536,22 @@
 	''Muscles (-100 to 100):''
 	<<if $tempSlave.muscles <= -96>>@@.yellow;Frail@@
 	<<elseif $tempSlave.muscles <= -31>>@@.yellow;Very Weak@@
-	<<elseif $tempSlave.muscles <= -6>>@@.yellow;Rather Weak@@
-	<<elseif $tempSlave.muscles <= 5>>@@.yellow;Soft@@
-	<<elseif $tempSlave.muscles <= 30>>@@.yellow;Well Built@@
+	<<elseif $tempSlave.muscles <= -6>>@@.yellow;Weak@@
+	<<elseif $tempSlave.muscles <= 5>>@@.yellow;None@@
+	<<elseif $tempSlave.muscles <= 30>>@@.yellow;Toned@@
+	<<elseif $tempSlave.muscles <= 50>>@@.yellow;Fit@@
 	<<elseif $tempSlave.muscles <= 95>>@@.yellow;Quite Muscular@@
 	<<else>>@@.yellow;Extremely Muscular@@ <</if>>
 	<<textbox "$tempSlave.muscles" $tempSlave.muscles>>
 	<br>
 	<<radiobutton "$tempSlave.muscles" -98>> Frail
 	<<radiobutton "$tempSlave.muscles" -63>> Very Weak
-	<<radiobutton "$tempSlave.muscles" -18>> Rather Weak
-	<<radiobutton "$tempSlave.muscles" 0>> Soft
-	<<radiobutton "$tempSlave.muscles" 17>> Well Built
-	<<radiobutton "$tempSlave.muscles" 62>> Quite Muscular
-	<<radiobutton "$tempSlave.muscles" 97>> Extremely Muscular
+	<<radiobutton "$tempSlave.muscles" -18>> Weak
+	<<radiobutton "$tempSlave.muscles" 0>> None
+	<<radiobutton "$tempSlave.muscles" 17>> Toned
+	<<radiobutton "$tempSlave.muscles" 40>> Fit
+	<<radiobutton "$tempSlave.muscles" 70>> Muscular
+	<<radiobutton "$tempSlave.muscles" 100>> Extremely Muscular
 	<br><br>
 
 	''Weight (-100 to 200):''
@@ -3640,17 +3834,17 @@
 			<<replace "#ecol3">>
 				<<set _ecol3R = 1>>
 				<br>
-				<<E3Options "blue" >>
-				<<E3Options "black" >>
-				<<E3Options "brown" >>
-				<<E3Options "green" >>
-				<<E3Options "turquoise" >>
-				<<E3Options "sky-blue" >>
-				<<E3Options "pale-grey" >>
-				<<E3Options "white" >>
-				<<E3Options "pink" >>
-				<<E3Options "amber" >>
-				<<E3Options "red" >>
+				<<setVar "blue" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "black" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "brown" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "green" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "turquoise" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "sky-blue" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "pale-grey" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "white" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "pink" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "amber" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
+				<<setVar "red" "$tempSlave.geneticQuirks.heterochromia" "_ecol3R" "#ecol3">>
 				<br>
 			<</replace>>
 		<<else>>
@@ -4295,7 +4489,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 1>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 			<<NameTab>>
 			<<FamilyTab>>
 			<<NationalTab>>
@@ -4337,7 +4532,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<NameTab>>
 	<</replace>>
 <<else>>
@@ -4355,7 +4551,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<FamilyTab>>
 	<</replace>>
 <<else>>
@@ -4373,7 +4570,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<NationalTab>>
 	<</replace>>
 <<else>>
@@ -4391,7 +4589,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<AgeTab>>
 	<</replace>>
 <<else>>
@@ -4409,7 +4608,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<DevoTab>>
 	<</replace>>
 <<else>>
@@ -4427,7 +4627,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<FaceTab>>
 	<</replace>>
 <<else>>
@@ -4445,7 +4646,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<HairTab>>
 	<</replace>>
 <<else>>
@@ -4463,7 +4665,8 @@
 		<<set _descR = 0>><<set _eyesR = 1>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<EyesTab>>
 	<</replace>>
 <<else>>
@@ -4481,7 +4684,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 1>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<MouthTab>>
 	<</replace>>
 <<else>>
@@ -4499,7 +4703,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 1>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<BodyTab>>
 	<</replace>>
 <<else>>
@@ -4517,7 +4722,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 1>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<BellyTab>>
 	<</replace>>
 <<else>>
@@ -4535,7 +4741,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 1>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<BreastsTab>>
 	<</replace>>
 <<else>>
@@ -4553,7 +4760,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 1>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<ButtTab>>
 	<</replace>>
 <<else>>
@@ -4571,7 +4779,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 1>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<VagTab>>
 	<</replace>>
 <<else>>
@@ -4589,7 +4798,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 1>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<PenisTab>>
 	<</replace>>
 <<else>>
@@ -4607,7 +4817,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 1>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<SkillsTab>>
 	<</replace>>
 <<else>>
@@ -4625,7 +4836,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 1>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<InteliTab>>
 	<</replace>>
 <<else>>
@@ -4643,7 +4855,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 1>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<FetSexTab>>
 	<</replace>>
 <<else>>
@@ -4661,7 +4874,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 1>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<FlaQuiTab>>
 	<</replace>>
 <<else>>
@@ -4679,7 +4893,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 1>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<GenQuiTab>>
 	<</replace>>
 <<else>>
@@ -4697,7 +4912,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 1>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<StatisticTab>>
 	<</replace>>
 <<else>>
@@ -4715,7 +4931,8 @@
 		<<set _descR = 1>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<br>
 		<<PrestTab>>
 	<</replace>>
@@ -4734,7 +4951,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 1>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<TattoTab>>
 	<</replace>>
 <<else>>
@@ -4752,7 +4970,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 0>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 1>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<BrandTab>>
 	<</replace>>
 <<else>>
@@ -4770,7 +4989,8 @@
 		<<set _descR = 0>><<set _eyesR = 0>><<set _mouthR = 0>><<set _bodyR = 0>><<set _titsR = 0>><<set _buttR = 0>><<set _vagR = 0>><<set _genqR = 0>>
 		<<set _dickR = 0>><<set _skillsR = 0>><<set _intR = 0>><<set _sexR = 0>><<set _flawR = 0>><<set _tatsR = 0>><<set _piercR = 1>><<set _ecol3R = 0>>
 		<<set _sAllR = 0>><<set _natR = 0>><<set _carR = 0>><<set _bellyR = 0>><<set _useR = 0>><<set _brandR = 0>><<set _hcol5R = 0>><<set _hcol4R = 0>>
-		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1R = 0>><<set _ecol2R = 0>><<set _ppilR = 0>><<set _sclrR = 0>>
+		<<set _hcol3R = 0>><<set _hcol2R = 0>><<set _hcol1R = 0>><<set _ecol1RR = 0>><<set _ecol1RL = 0>><<set _ecol2R = 0>><<set _ppilRR = 0>><<set _ppilRL = 0>>
+		<<set _sclrRR = 0>><<set _sclrRL = 0>>
 		<<PiercTab>>
 	<</replace>>
 <<else>>