Browse Source

Merge remote-tracking branch 'CroWke/master'

KevinSmarts 5 years ago
parent
commit
efb3b8e25c
2 changed files with 265 additions and 217 deletions
  1. 253 205
      locations/body.qsrc
  2. 12 12
      locations/obj_din.qsrc

+ 253 - 205
locations/body.qsrc

@@ -10,56 +10,49 @@
 if pcs_throat = 0:
 	thpic = 0
 	$pcs_throat = 'You have a chaste <a href="exec:view''images/pc/body/throat/th0.jpg''">mouth</a>.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'virgin'
+	$pcdesc_throatrandom = 'virgin'
 	$pcdesc_throat = 'virgin'
 	$pcdesc_throatwordy = 'virginal, unused'
 	$throattipe = 'virgin'
 elseif pcs_throat <= 5:
 	thpic = 1
 	$pcs_throat = 'You have an extremely inexperienced <a href="exec:view''images/pc/body/throat/th1.jpg''">mouth</a>.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'narrow'
+	$pcdesc_throatrandom = 'narrow'
 	$pcdesc_throat = 'narrow'
 	$pcdesc_throatwordy = 'reluctant, gag-prone'
 	$throattipe = 'narrow'
 elseif pcs_throat <= 10:
 	thpic = 2
 	$pcs_throat = 'Your slightly-experienced mouth leads to a sensitive <a href="exec:view''images/pc/body/throat/th2.jpg''">throat</a> with an easily-triggered gag reflex.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'delicate'
+	$pcdesc_throatrandom = 'delicate'
 	$pcdesc_throat = 'delicate'
 	$pcdesc_throatwordy = 'delicate, barely-experienced'
 	$throattipe = 'delicate'
 elseif pcs_throat <= 15:
 	thpic = 3
 	$pcs_throat = 'You have an experienced mouth and fairly practiced <a href="exec:view''images/pc/body/throat/th3.jpg''">throat</a>.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'fairly practiced'
+	$pcdesc_throatrandom = 'fairly practiced'
 	$pcdesc_throat = 'fairly practiced'
 	$pcdesc_throatwordy = 'fairly practiced'
 	$throattipe = 'fairly practiced'
 elseif pcs_throat <= 25:
 	thpic = 4
 	$pcs_throat = 'You have a willing mouth and trained <a href="exec:view''images/pc/body/throat/th4.jpg''">throat</a>.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'well-trained'
+	$pcdesc_throatrandom = 'well-trained'
 	$pcdesc_throat = 'well-trained'
 	$pcdesc_throatwordy = 'experienced, well-trained and eager'
 	$throattipe = 'well-trained'
 elseif pcs_throat <= 35:
 	thpic = 5
 	$pcs_throat = 'Your deep tunnel of a <a href="exec:view''images/pc/body/throat/th5.jpg''">throat</a> may adopt any member.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'capacious'
+	$pcdesc_throatrandom = 'capacious'
 	$pcdesc_throat = 'capacious'
 	$pcdesc_throatwordy = 'seasoned, effortlessly-plumbed'
 	$throattipe = 'capacious'
 else
 	thpic = 6
 	$pcs_throat = 'Your gag reflex is completely absent and your <a href="exec:view''images/pc/body/throat/th6.jpg''">throat</a> has seen nearly as much cock as it has food.'
-	rand_throat = rand(0)
-	if rand_throat = 0:$pcdesc_throatrandom = 'bottomless'
+	$pcdesc_throatrandom = 'bottomless'
 	$pcdesc_throat = 'bottomless'
 	$pcdesc_throatwordy = 'elastic, oft-fucked'
 	$throattipe = 'bottomless'
@@ -71,8 +64,7 @@ if pcs_breath = 1:$pcs_throat += ' Last you checked, your breath smelled fresh a
 if pcs_vag = 0:
 	puspic = 0
 	$pcs_vag = 'Your virgin <a href="exec:view''images/pc/body/pussy/vag0.jpg''">pussy</a> still has its hymen intact.'
-	rand_pussy = rand(0)
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'virgin'
+	$pcdesc_pussyrandom = 'virgin'
 	$pcdesc_pussy = 'virgin'
 	$pcdesc_pussywordy = 'virgin'
 	$vaginatipe = 'virgin'
@@ -80,9 +72,13 @@ elseif pcs_vag <= 5:
 	puspic = 1
 	$pcs_vag = 'You have an inexperienced <a href="exec:view''images/pc/body/pussy/vag1.jpg''">pussy</a>.'
 	rand_pussy = rand(0,2)
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'narrow'
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'vice-like'
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'inexperienced'
+	if rand_pussy = 0:
+		$pcdesc_pussyrandom = 'narrow'
+	elseif rand_pussy = 1:
+		$pcdesc_pussyrandom = 'vice-like'
+	elseif rand_pussy = 2:
+		$pcdesc_pussyrandom = 'inexperienced'
+	end
 	$pcdesc_pussy = 'narrow'
 	$pcdesc_pussywordy = 'squeezingly tight and narrow'
 	$vaginatipe = 'narrow'
@@ -90,8 +86,11 @@ elseif pcs_vag <= 10:
 	puspic = 2
 	$pcs_vag = 'You have a tight <a href="exec:view''images/pc/body/pussy/vag1.jpg''">pussy</a>.'
 	rand_pussy = rand(0,1)
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'snug'
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'tight'
+	if rand_pussy = 0:
+		$pcdesc_pussyrandom = 'snug'
+	elseif rand_pussy = 1:
+		$pcdesc_pussyrandom = 'tight'
+	end
 	$pcdesc_pussy = 'tight'
 	$pcdesc_pussywordy = 'youthfully tight'
 	$vaginatipe = 'tight'
@@ -99,9 +98,13 @@ elseif pcs_vag <= 15:
 	puspic = 3
 	$pcs_vag = 'Your <a href="exec:view''images/pc/body/pussy/vag1.jpg''">vagina</a> is used to taking normal sized insertions.'
 	rand_pussy = rand(0,2)
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'elastic'
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'practiced'
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'snug, if easily pliable'
+	if rand_pussy = 0:
+		$pcdesc_pussyrandom = 'elastic'
+	elseif rand_pussy = 1:
+		$pcdesc_pussyrandom = 'practiced'
+	elseif rand_pussy = 2:
+		$pcdesc_pussyrandom = 'snug, if easily pliable'
+	end
 	$pcdesc_pussy = 'pliable'
 	$pcdesc_pussywordy = 'seasoned, pliable and tight'
 	$vaginatipe = 'pliable'
@@ -109,10 +112,15 @@ elseif pcs_vag <= 25:
 	puspic = 4
 	$pcs_vag = 'You have a well-developed <a href="exec:view''images/pc/body/pussy/vag1.jpg''">vagina</a>.'
 	rand_pussy = rand(0,3)
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'welcoming'
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'invitingly ready'
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'amply-practiced'
-	if rand_pussy = 3:$pcdesc_pussyrandom = 'plenty experienced'
+	if rand_pussy = 0:
+		$pcdesc_pussyrandom = 'welcoming'
+	elseif rand_pussy = 1:
+		$pcdesc_pussyrandom = 'invitingly ready'
+	elseif rand_pussy = 2:
+		$pcdesc_pussyrandom = 'amply-practiced'
+	elseif rand_pussy = 3:
+		$pcdesc_pussyrandom = 'plenty experienced'
+	end
 	$pcdesc_pussy = 'experienced'
 	$pcdesc_pussywordy = 'experienced, welcoming'
 	$vaginatipe = 'experienced'
@@ -120,10 +128,15 @@ elseif pcs_vag <= 35:
 	puspic = 5
 	$pcs_vag = 'Your regularly-fucked <a href="exec:view''images/pc/body/pussy/vag2.jpg''">playground</a> can take most things you force up there.'
 	rand_pussy = rand(0,3)
-	if rand_pussy = 0:$pcdesc_pussyrandom = 'eager and hungry'
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'routinely-fucked'
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'cock-starved'
-	if rand_pussy = 3:$pcdesc_pussyrandom = 'seemingly constantly-fucked'
+	if rand_pussy = 0:
+		$pcdesc_pussyrandom = 'eager and hungry'
+	elseif rand_pussy = 1:
+		$pcdesc_pussyrandom = 'routinely-fucked'
+	elseif rand_pussy = 2:
+		$pcdesc_pussyrandom = 'cock-starved'
+	elseif rand_pussy = 3:
+		$pcdesc_pussyrandom = 'seemingly constantly-fucked'
+	end
 	$pcdesc_pussy = 'oft-fucked'
 	$pcdesc_pussywordy = 'well-trained, oft-fucked'
 	$vaginatipe = 'oft-fucked'
@@ -132,8 +145,11 @@ else
 	$pcs_vag = 'Your poor little <a href="exec:view''images/pc/body/pussy/vag2.jpg''">pussy</a> is so used to being over-stuffed that it takes a huge member just to get off.'
 	rand_pussy = rand(0,2)
 	if rand_pussy = 0:$pcdesc_pussyrandom = 'always-ready'
-	if rand_pussy = 1:$pcdesc_pussyrandom = 'near daily-stuffed'
-	if rand_pussy = 2:$pcdesc_pussyrandom = 'overeager, ever-popular'
+	elseif rand_pussy = 1:
+		$pcdesc_pussyrandom = 'near daily-stuffed'
+	elseif rand_pussy = 2:
+		$pcdesc_pussyrandom = 'overeager, ever-popular'
+	end
 	$pcdesc_pussy = 'overeager'
 	$pcdesc_pussywordy = 'cock-tamed and ever-ready'
 	$vaginatipe = 'overeager'
@@ -144,8 +160,7 @@ if analplugIN = 0:
 	if pcs_ass = 0:
 		anpic = 0
 		$pcs_ass = 'You have a virgin <a href="exec:view''images/pc/body/anus/0.jpg''">anus</a>.'
-		rand_anus = rand(0)
-		if rand_anus = 0:$pcdesc_anusrandom = 'virgin'
+		$pcdesc_anusrandom = 'virgin'
 		$pcdesc_anus = 'virgin'
 		$pcdesc_anuswordy = 'virgin'
 		$anustipe = 'virgin'
@@ -153,9 +168,13 @@ if analplugIN = 0:
 		anpic = 1
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/1.jpg''">anus</a> is barely used, and looking at it none would know it was used for sex.'
 		rand_anus = rand(0,2)
-		if rand_anus = 0:$pcdesc_anusrandom = 'tight'
-		if rand_anus = 1:$pcdesc_anusrandom = 'snug'
-		if rand_anus = 2:$pcdesc_anusrandom = 'tightly-clenching'
+		if rand_anus = 0:
+			$pcdesc_anusrandom = 'tight'
+		elseif rand_anus = 1:
+			$pcdesc_anusrandom = 'snug'
+		elseif rand_anus = 2:
+			$pcdesc_anusrandom = 'tightly-clenching'
+		end
 		$pcdesc_anus = 'tight'
 		$pcdesc_anuswordy = 'tight, scarcely-used'
 		$anustipe = 'tight'
@@ -163,9 +182,13 @@ if analplugIN = 0:
 		anpic = 2
 		$pcs_ass = 'Your pliable <a href="exec:view''images/pc/body/anus/2.jpg''">anus</a> has the shape of an asterisk.'
 		rand_anus = rand(0,2)
-		if rand_anus = 0:$pcdesc_anusrandom = 'flexible'
-		if rand_anus = 1:$pcdesc_anusrandom = 'slightly experienced'
-		if rand_anus = 2:$pcdesc_anusrandom = 'pliable'
+		if rand_anus = 0:
+			$pcdesc_anusrandom = 'flexible'
+		elseif rand_anus = 1:
+			$pcdesc_anusrandom = 'slightly experienced'
+		elseif rand_anus = 2:
+			$pcdesc_anusrandom = 'pliable'
+		end
 		$pcdesc_anus = 'flexible'
 		$pcdesc_anuswordy = 'flexible, still-snug'
 		$anustipe = 'flexible'
@@ -173,9 +196,13 @@ if analplugIN = 0:
 		anpic = 3
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/3.jpg''">anus</a> is usually slightly parted, it has been used quite often.'
 		rand_anus = rand(0,2)
-		if rand_anus = 0:$pcdesc_anusrandom = 'stretchy'
-		if rand_anus = 1:$pcdesc_anusrandom = 'experienced'
-		if rand_anus = 2:$pcdesc_anusrandom = 'welcomingly ready'
+		if rand_anus = 0:
+			$pcdesc_anusrandom = 'stretchy'
+		elseif rand_anus = 1:
+			$pcdesc_anusrandom = 'experienced'
+		elseif rand_anus = 2:
+			$pcdesc_anusrandom = 'welcomingly ready'
+		end
 		$pcdesc_anus = 'stretchy'
 		$pcdesc_anuswordy = 'stretchy, regularly-fucked'
 		$anustipe = 'stretchy'
@@ -183,9 +210,13 @@ if analplugIN = 0:
 		anpic = 4
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/4.jpg''">anus</a> often looks like a wide hole; anyone would think that the only thing you do is anal sex.'
 		rand_anus = rand(0,2)
-		if rand_anus = 0:$pcdesc_anusrandom = 'loose'
-		if rand_anus = 1:$pcdesc_anusrandom = 'casually open'
-		if rand_anus = 2:$pcdesc_anusrandom = 'routinely-fucked'
+		if rand_anus = 0:
+			$pcdesc_anusrandom = 'loose'
+		elseif rand_anus = 1:
+			$pcdesc_anusrandom = 'casually open'
+		elseif rand_anus = 2:
+			$pcdesc_anusrandom = 'routinely-fucked'
+		end
 		$pcdesc_anus = 'loose'
 		$pcdesc_anuswordy = 'loose, open'
 		$anustipe = 'loose'
@@ -193,9 +224,13 @@ if analplugIN = 0:
 		anpic = 5
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/5.jpg''">anus</a> genuinely doesn''t fully close on its own anymore. You could put a fist through it and it would scarcely stretch at all.'
 		rand_anus = rand(0,2)
-		if rand_anus = 0:$pcdesc_anusrandom = 'gaping'
-		if rand_anus = 1:$pcdesc_anusrandom = 'yawning'
-		if rand_anus = 2:$pcdesc_anusrandom = 'obscenely yawning'
+		if rand_anus = 0:
+			$pcdesc_anusrandom = 'gaping'
+		elseif rand_anus = 1:
+			$pcdesc_anusrandom = 'yawning'
+		elseif rand_anus = 2:
+			$pcdesc_anusrandom = 'obscenely yawning'
+		end
 		$pcdesc_anus = 'gaping'
 		$pcdesc_anuswordy = 'gaping, seemingly constantly-fucked'
 		$anustipe = 'gaping'
@@ -203,52 +238,39 @@ if analplugIN = 0:
 		anpic = 6
 		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/6.jpg''">anus</a> is almost completely wrecked. Even with conscious effort it''s hard to close it.'
 		rand_anus = rand(0,4)
-		if rand_anus = 0:$pcdesc_anusrandom = 'destroyed'
-		if rand_anus = 1:$pcdesc_anusrandom = 'demolished'
-		if rand_anus = 2:$pcdesc_anusrandom = 'uselessly loose'
-		if rand_anus = 3:$pcdesc_anusrandom = 'ruined'
-		if rand_anus = 4:$pcdesc_anusrandom = 'wrecked'
+		if rand_anus = 0:
+			$pcdesc_anusrandom = 'destroyed'
+		elseif rand_anus = 1:
+			$pcdesc_anusrandom = 'demolished'
+		elseif rand_anus = 2:
+			$pcdesc_anusrandom = 'uselessly loose'
+		elseif rand_anus = 3:
+			$pcdesc_anusrandom = 'ruined'
+		elseif rand_anus = 4:
+			$pcdesc_anusrandom = 'wrecked'
+		end
 		$pcdesc_anus = 'destroyed'
 		$pcdesc_anuswordy = 'absolutely fuck-wrecked'
 		$anustipe = 'destroyed'
 	end
 !! This below was originally missing even the original reference for $anustipe, so I added it in simplistically. Also, tanga means panties, or more specifically, a thong. A lot of duplication on descriptions, but not much to change, the logic is for images.
-	elseif analplugIN = 1 and $pantyworntype ! 'none':
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/analplug.jpg''">anus</a> is currently filled with your butt plug.'
-		rand_anus = rand(0)
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
-		$pcdesc_anus = 'plugged'
-		$pcdesc_anuswordy = 'plug-stuffed'
-		$anustipe = 'plugged'
-elseif analplugIN = 1 and $pantyworntype = 'none':
-	if pirsG = 1 and pirsGL = 1:
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirscligub.jpg''">anus</a> is currently filled with your butt plug.'
-		rand_anus = rand(0)
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
-		$pcdesc_anus = 'plugged'
-		$pcdesc_anuswordy = 'plug-stuffed'
-		$anustipe = 'plugged'
-	elseif pirsG ! 1 and pirsGL = 1:
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsclit.jpg''">anus</a> is currently filled with your butt plug.'
-		rand_anus = rand(0)
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
-		$pcdesc_anus = 'plugged'
-		$pcdesc_anuswordy = 'plug-stuffed'
-		$anustipe = 'plugged'
-	elseif pirsG = 1 and pirsGL ! 1:
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsring.jpg''">anus</a> is currently filled with your butt plug.'
-		rand_anus = rand(0)
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
-		$pcdesc_anus = 'plugged'
-		$pcdesc_anuswordy = 'plug-stuffed'
-		$anustipe = 'plugged'
+else
+	$pcdesc_anusrandom = 'plugged'
+	$pcdesc_anus = 'plugged'
+	$pcdesc_anuswordy = 'plug-stuffed'
+	$anustipe = 'plugged'
+	if $pantyworntype ! 'none':
+		$pcs_ass = 'Your <a href="exec:view''images/pc/body/analplug.jpg''">anus</a> is currently filled with your butt plug.'	
 	else
-		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugnotanga.jpg''">anus</a> is currently filled with your butt plug.'
-		rand_anus = rand(0)
-		if rand_anus = 0:$pcdesc_anusrandom = 'plugged'
-		$pcdesc_anus = 'plugged'
-		$pcdesc_anuswordy = 'plug-stuffed'
-		$anustipe = 'plugged'
+		if pirsG = 1 and pirsGL = 1:
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirscligub.jpg''">anus</a> is currently filled with your butt plug.'
+		elseif pirsG ! 1 and pirsGL = 1:
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsclit.jpg''">anus</a> is currently filled with your butt plug.'
+		elseif pirsG = 1 and pirsGL ! 1:
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugpirsring.jpg''">anus</a> is currently filled with your butt plug.'
+		else
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/analplugnotanga.jpg''">anus</a> is currently filled with your butt plug.'
+		end
 	end
 end
 
@@ -313,8 +335,11 @@ if dounspell = 0:
 		pcdesc_breastimplantcheck = 1
 	!! This triggers if they have fake breasts, but they are not obviously, blatantly fake breasts. In fact, this should be what triggers most of the time with a PC who has implants, given average cases.
 	elseif pcs_bustdisparity < 1 and silicone > 0:
-		if pcs_cupsize <= 30:$pcdesc_breastsword = 'breasts'
-		if pcs_cupsize > 30:$pcdesc_breastsword = 'tits'
+		if pcs_cupsize <= 30:
+			$pcdesc_breastsword = 'breasts'
+		else
+			$pcdesc_breastsword = 'tits'
+		end
 		$pcdesc_breastsqualifier = ''
 		$pcdesc_breastsqualifierinsertive = ''
 		pcdesc_breastimplantcheck = 1
@@ -328,85 +353,136 @@ if dounspell = 0:
 	end
 	
 !! These will not be used below, but can be referenced by descriptive writers in case they want to be able to quickly reference whether or not the PC has implants, as in "He reaches up and cups your<<$pcdesc_breastsfakeinsertive>> breasts."
-	if pcdesc_breastimplantcheck = 1:$pcdesc_breastsfakeinsertive = ' fake'
-	if pcdesc_breastimplantcheck = 0:$pcdesc_breastsfakeinsertive = ''
-	
+	if pcdesc_breastimplantcheck = 1:
+		$pcdesc_breastsfakeinsertive = ' fake'
+	else
+		$pcdesc_breastsfakeinsertive = ''
+	end
 
 	if pcs_cupsize <= 5:
 		tits = 0
 		$titsize = 'AA cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'tiny'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'barely-there'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'tiny'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'barely-there'
+		end
 		!! Honestly, I am not even sure it is possible to have silicone and be this small. But just in case...
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'scarcely-augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'tiny, mosquito-bite <<$pcdesc_breastsword>>'
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'scarcely-augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'tiny, mosquito-bite <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'tiny'
 	elseif pcs_cupsize <= 10:
 		tits = 1
 		$titsize = 'A cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'petite'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'smaller than a handful'
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'barely modified<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'petite, puffy little <<$pcdesc_breastsword>>'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'petite'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'smaller than a handful'
+		end
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'barely modified<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'petite, puffy little <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'petite'
 	elseif pcs_cupsize <= 15:
 		tits = 2
 		$titsize = 'B cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'small'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'sporty'
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'small, subtly augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'small, handful-sized <<$pcdesc_breastsword>>'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'small'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'sporty'
+		end
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'small, subtly augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'small, handful-sized <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'small'
 	elseif pcs_cupsize <= 20:
 		tits = 3
 		$titsize = 'C cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'ample'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'average-sized'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'ample'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'average-sized'
+		end
 		!! At this point PCs should now be able to get the bolted-on look, so we need to be a bit more careful to avoid contradictions in descriptive phrasing. It is OK to have some repetition here for a cup size or two.
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'ample, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'ample, handful-sized <<$pcdesc_breastsword>>'
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'ample, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'ample, handful-sized <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'ample'
 	elseif pcs_cupsize <= 25:
 		tits = 4
 		$titsize = 'D cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'full'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'hefty'
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'full, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'jiggly, womanly full <<$pcdesc_breastsword>>'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'full'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'hefty'
+		end
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'full, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'jiggly, womanly full <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'full'
 	elseif pcs_cupsize <= 30:
 		tits = 5
 		$titsize = 'E cup'
 		rand_breasts = rand(0,2)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'generous'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'heavy'
-		if rand_breasts = 2:$pcdesc_breastsrandom = 'fairly large'
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'heavy, fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'soft, generously-sized <<$pcdesc_breastsword>>'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'generous'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'heavy'
+		elseif rand_breasts = 2:
+			$pcdesc_breastsrandom = 'fairly large'
+		end
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'heavy, fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'soft, generously-sized <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'generous'
 	elseif pcs_cupsize <= 35:
 		!! From F cup and onward, breasts are now automatically referred to as tits, since that is how most others will see them. It is a subtle sexualisation, but it should be one that matches with the pre-generated descriptions from here on out.
 		tits = 6
 		$titsize = 'F cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'big'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'large'
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'big, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'big, jiggly and sizeable <<$pcdesc_breastsword>>'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'big'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'large'
+		end
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'big, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'big, jiggly and sizeable <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'big'
 	elseif pcs_cupsize <= 40:
 		tits = 7
 		$titsize = 'G cup'
 		rand_breasts = rand(0,1)
-		if rand_breasts = 0:$pcdesc_breastsrandom = 'considerably large'
-		if rand_breasts = 1:$pcdesc_breastsrandom = 'quite large'
-		if pcdesc_breastimplantcheck = 1:$pcdesc_breastswordy = 'considerably large, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-		if pcdesc_breastimplantcheck = 0:$pcdesc_breastswordy = 'quite large and jiggly <<$pcdesc_breastsword>>'
+		if rand_breasts = 0:
+			$pcdesc_breastsrandom = 'considerably large'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'quite large'
+		end
+		if pcdesc_breastimplantcheck = 1:
+			$pcdesc_breastswordy = 'considerably large, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pcdesc_breastswordy = 'quite large and jiggly <<$pcdesc_breastsword>>'
+		end
 		$pcdesc_breasts = 'considerably large'
 	elseif pcs_cupsize <= 45:
 		tits = 8
@@ -550,19 +626,16 @@ end
 if curly <= 0:
 	$curly = 'straight, slightly wavy '
 	!! Not a lot of variety here, I know -- it is for future compatibility, so everything can have be reached in the same fashion.
-	rand_hairtexture = rand(0)
-	rand_hairword = rand(0)
-	if rand_hairtexture = 0:$pcdesc_hairtexturerandom = 'straight'
-	if rand_hairword = 0:$pcdesc_hairwordrandom = 'locks'
+	$pcdesc_hairtexturerandom = 'straight'
+	$pcdesc_hairwordrandom = 'locks'
 	$pcdesc_hairtexturewordy = 'straight, slightly wavy'
 	$pcdesc_hairwordwordy = 'locks'
 	$pcdesc_hairtexture = 'straight'
 	$pcdesc_hairword = 'locks'
 else
 	$curly = 'curly '
-	rand_hairtexture = rand(0)
 	rand_hairword = rand(0,1)
-	if rand_hairtexture = 0:$pcdesc_hairtexturerandom = 'curly'
+	$pcdesc_hairtexturerandom = 'curly'
 	if rand_hairword = 0:$pcdesc_hairwordrandom = 'curls'
 	if rand_hairword = 1:$pcdesc_hairwordrandom = 'ringlets'
 	$pcdesc_hairtexturewordy = 'playfully curly'
@@ -574,8 +647,7 @@ end
 !! If you are baffled by the need for a forehead descriptor here, it is primarily just for writing about cumshots. I honestly cannot think of another use case. Other variables largely just for compatibility.
 if hbangs <= 0:
 	$hbangs = ''
-	rand_bangs = rand(0)
-	if rand_bangs = 0:$pcdesc_foreheadrandom = 'forehead'
+	$pcdesc_foreheadrandom = 'forehead'
 	$pcdesc_foreheadwordy = 'forehead'
 	$pcdesc_forehead = 'forehead'
 else
@@ -665,8 +737,7 @@ elseif pcs_haircol = 7:
 elseif pcs_haircol = 8:
 	$pcs_haircol = 'dark green'
 	$pcdesc_haircolour = 'dark green'
-	rand_hair = rand(0)
-	if rand_hair = 0:$pcdesc_hairrandom = 'dark green'
+	$pcdesc_hairrandom = 'dark green'
 	!! Emerald green is actually a lighter colour, but with the specific qualifier of deep, it can be used here for lack of a better one.
 	$pcdesc_haircolourwordy = 'deep, emerald-green'
 elseif pcs_haircol = 9:
@@ -778,20 +849,16 @@ end
 if hscrunchw <= 0:
 	$hscrunch = ''
 	$hpigtail = ''
-	rand_hairstyle = rand(0)
-	rand_hairobject = rand(0)
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'loose'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'hair'
+	$pcdesc_hairstylerandom = 'loose'
+	$pcdesc_hairobjectrandom = 'hair'
 	$pcdesc_hairstyle = 'loose'
 	$pcdesc_hairobject = 'hair'
 	$pcdesc_hairobjectwordy = 'loose and free <<$pcs_haircol>> hair'
 elseif hscrunchw = 1:
 	$hscrunch = 'A hair-tie holds your hair in place with a ponytail.'
 	$hpigtail = ''
-	rand_hairstyle = rand(0)
-	rand_hairobject = rand(0)
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'ponytailed'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'ponytail'
+	$pcdesc_hairstylerandom = 'ponytailed'
+	$pcdesc_hairobjectrandom = 'ponytail'
 	$pcdesc_hairstyle = 'ponytailed'
 	$pcdesc_hairobject = 'ponytail'
 	$pcdesc_hairobjectwordy = 'tight, high-set <<$pcs_haircol>> ponytail'
@@ -799,10 +866,8 @@ else
 	!! The actual, specific setting for hscrunchw when pigtails are desired is 2, but it is better to have a catch-all. Adjust the else above into an elseif set for 2 if more styles involving scrunchies are added.
 	$hscrunch = ''
 	$hpigtail = 'Two scrunchies hold your hair up into two cute, playful twin tails.'
-	rand_hairstyle = rand(0)
-	rand_hairobject = rand(0)
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'pigtailed'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'pigtails'
+	$pcdesc_hairstylerandom = 'pigtailed'
+	$pcdesc_hairobjectrandom = 'pigtails'
 	$pcdesc_hairstyle = 'pigtailed'
 	$pcdesc_hairobject = 'pigtails'
 	$pcdesc_hairobjectwordy = 'youthful, playful and flirty <<$pcs_haircol>> pigtails'
@@ -810,20 +875,17 @@ end
 
 if hpingripw <= 0:
 	$hpingrip = ''
-	rand_hairstyle = rand(0)
-	rand_hairobject = rand(0)
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'loose'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'hair'
+	$pcdesc_hairstylerandom = 'loose'
+	$pcdesc_hairobjectrandom = 'hair'
 	$pcdesc_hairstyle = 'loose'
 	$pcdesc_hairobject = 'hair'
 	$pcdesc_hairobjectwordy = 'loose and free <<$pcs_haircol>> hair'
 else
 	$hpingrip = 'Hair-pins hold your hair in place in a stylish updo.'
 	rand_hairstyle = rand(0,1)
-	rand_hairobject = rand(0)
 	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'upswept'
 	if rand_hairstyle = 1:$pcdesc_hairstylerandom = 'ornately-pinned'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'updo'
+	$pcdesc_hairobjectrandom = 'updo'
 	$pcdesc_hairstyle = 'upswept'
 	$pcdesc_hairobject = 'updo'
 	$pcdesc_hairobjectwordy = 'ornate, intricately-pinned <<$pcs_haircol>> updo'
@@ -831,10 +893,8 @@ end
 
 if hbraids <= 0:
 	$hbraids = ''
-	rand_hairstyle = rand(0)
-	rand_hairobject = rand(0)
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'loose'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'hair'
+	$pcdesc_hairstylerandom = 'loose'
+	$pcdesc_hairobjectrandom = 'hair'
 	$pcdesc_hairstyle = 'loose'
 	$pcdesc_hairobject = 'hair'
 	$pcdesc_hairobjectwordy = 'loose and free <<$pcs_haircol>> hair'
@@ -843,9 +903,9 @@ else
 	rand_hairstyle = rand(0,1)
 	rand_hairobject = rand(0,1)
 	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'braided'
-	if rand_hairstyle = 0:$pcdesc_hairstylerandom = 'plaited'
+	if rand_hairstyle = 1:$pcdesc_hairstylerandom = 'plaited'
 	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'braids'
-	if rand_hairobject = 0:$pcdesc_hairobjectrandom = 'plaits'
+	if rand_hairobject = 1:$pcdesc_hairobjectrandom = 'plaits'
 	$pcdesc_hairstyle = 'braided'
 	$pcdesc_hairobject = 'braid'
 	$pcdesc_hairobjectwordy = 'delicately-wound <<$pcs_haircol>> braid'
@@ -881,8 +941,7 @@ else
 		$pcdesc_hairlengthwordy = 'medium-length'
 	elseif pcs_hairlng > 160 and pcs_hairlng <= 260:
 		$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. Your hair reaches your shoulders with several strands going just beyond. Currently your hair is <<$pcs_hairbsh>>. <<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
-		rand_hairlength = rand(0)
-		if rand_hairlength = 0:$pcdesc_hairlengthrandom = 'moderate'
+		$pcdesc_hairlengthrandom = 'moderate'
 		$pcdesc_hairlength = 'moderate'
 		$pcdesc_hairlengthwordy = 'shoulder-length'
 	elseif pcs_hairlng > 260 and pcs_hairlng <= 400:
@@ -930,45 +989,47 @@ $pcdesc_fullhairwordy = '<<$pcdesc_hairmess>>, <<$pcdesc_hairlengthwordy>> <<$pc
 if pirsA > 0 and pirsA < 10000:
 	$pirsA = 'When you talk to people, they can sometimes get a glimpse of your tongue piercing.'
 	rand_tongue = rand(0,1)
-	if rand_tongue = 0:$pcdesc_tonguerandom = 'pierced tongue'
-	if rand_tongue = 1:$pcdesc_tonguerandom = 'pierced licker'
+	if rand_tongue = 0:
+		$pcdesc_tonguerandom = 'pierced tongue'
+	elseif rand_tongue = 1:
+		$pcdesc_tonguerandom = 'pierced licker'
+	end
 	$pcdesc_tonguewordy = 'barbell-pierced tongue'
 	$pcdesc_tongue = 'pierced tongue'
 else
 	$pirsA = ''
 	rand_tongue = rand(0,1)
-	if rand_tongue = 0:$pcdesc_tonguerandom = 'tongue'
-	if rand_tongue = 1:$pcdesc_tonguerandom = 'licker'
+	if rand_tongue = 0:
+		$pcdesc_tonguerandom = 'tongue'
+	elseif rand_tongue = 1:
+		$pcdesc_tonguerandom = 'licker'
+	end
 	$pcdesc_tonguewordy = 'tongue'
 	$pcdesc_tongue = 'tongue'
 end
 
 if pirsB > 0 and pirsB < 10000:
 	$pirsB = 'Your lip is pierced.'
-	rand_lowerlip = rand(0)
-	if rand_lowerlip = 0:$pcdesc_lowerliprandom = 'pierced lower lip'
+	$pcdesc_lowerliprandom = 'pierced lower lip'
 	$pcdesc_lowerlipwordy = 'jewelry-studded lower lip'
 	$pcdesc_lowerlip = 'pierced lower lip'
 else
 	$pirsB = ''
-	rand_lowerlip = rand(0)
-	if rand_lowerlip = 0:$pcdesc_lowerliprandom = 'lower lip'
+	$pcdesc_lowerliprandom = 'lower lip'
 	$pcdesc_lowerlipwordy = 'lower lip'
 	$pcdesc_lowerlip = 'lower lip'
 end
 
 if pirsC > 0 and pirsC < 10000:
 	$pirsC = 'You are wearing earrings.'
-	rand_ears = rand(0)
-	if rand_ears = 0:$pcdesc_earsrandom = 'pierced ears' & $pcdesc_earrandom = 'pierced ear'
+	$pcdesc_earsrandom = 'pierced ears' & $pcdesc_earrandom = 'pierced ear'
 	$pcdesc_earswordy = 'pierced ears'
 	$pcdesc_ears = 'pierced ears'
 	$pcdesc_earwordy = 'pierced ear'
 	$pcdesc_ear = 'pierced ear'
 else
 	$pirsC = ''
-	rand_ears = rand(0)
-	if rand_ears = 0:$pcdesc_earsrandom = 'ears' & $pcdesc_earrandom = 'ear'
+	$pcdesc_earsrandom = 'ears' & $pcdesc_earrandom = 'ear'
 	$pcdesc_earswordy = 'ears'
 	$pcdesc_ears = 'ears'
 	$pcdesc_earwordy = 'ear'
@@ -978,42 +1039,36 @@ end
 !! Unfortunately there is no real way to tell if it is a pierced septum or a pierced nostril without overhauling the jewelry and other piercing references for now.
 if pirsD > 0 and pirsD < 10000:
 	$pirsD = 'You have a piercing inserted in your nose.'
-	rand_nose = rand(0)
-	if rand_nose = 0:$pcdesc_noserandom = 'pierced nose'
+	$pcdesc_noserandom = 'pierced nose'
 	$pcdesc_nosewordy = 'jewelry-studded nose'
 	$pcdesc_nose = 'pierced nose'
 else
 	$pirsD = ''
-	rand_nose = rand(0)
-	if rand_nose = 0:$pcdesc_noserandom = 'nose'
+	$pcdesc_noserandom = 'nose'
 	$pcdesc_nosewordy = 'nose'
 	$pcdesc_nose = 'nose'
 end
 
 if pirsE > 0 and pirsE < 10000:
 	$pirsE = 'Your eyebrow is pierced.'
-	rand_eyebrow = rand(0)
-	if rand_eyebrow = 0:$pcdesc_eyebrowrandom = 'pierced eyebrow'
+	$pcdesc_eyebrowrandom = 'pierced eyebrow'
 	$pcdesc_eyebrowwordy = 'pierced eyebrow'
 	$pcdesc_eyebrow = 'pierced eyebrow'
 else
 	$pirsE = ''
-	rand_eyebrow = rand(0)
-	if rand_eyebrow = 0:$pcdesc_eyebrowrandom = 'eyebrow'
+	$pcdesc_eyebrowrandom = 'eyebrow'
 	$pcdesc_eyebrowwordy = 'eyebrow'
 	$pcdesc_eyebrow = 'eyebrow'
 end
 
 if pirsN > 0 and pirsN < 10000:
 	$pirsN = 'You are wearing a navel piercing.'
-	rand_navel = rand(0)
-	if rand_navel = 0:$pcdesc_navelrandom = 'pierced navel'
+	$pcdesc_navelrandom = 'pierced navel'
 	$pcdesc_navelwordy = 'pierced navel'
 	$pcdesc_navel = 'pierced navel'
 else
 	$pirsN = ''
-	rand_navel = rand(0)
-	if rand_navel = 0:$pcdesc_navelrandom = 'navel'
+	$pcdesc_navelrandom = 'navel'
 	$pcdesc_navelwordy = 'navel'
 	$pcdesc_navel = 'navel'
 end
@@ -1021,14 +1076,12 @@ end
 !! Some of these are labial rings, some of them are hood piercings. No good way to tell without an overhaul.
 if pirsG  > 0 and pirsG < 10000:
 	$pirspiz = 'You are wearing a pubic piercing.'
-	rand_genitals = rand(0)
-	if rand_genitals = 0:$pcdesc_genitalsrandom = 'pierced pussy'
+	$pcdesc_genitalsrandom = 'pierced pussy'
 	$pcdesc_genitalswordy = 'jewelry-adorned pussy'
 	$pcdesc_genitals = 'pierced pussy'
 else
 	$pirspiz = ''
-	rand_genitals = rand(0)
-	if rand_genitals = 0:$pcdesc_genitalsrandom = 'pussy'
+	$pcdesc_genitalsrandom = 'pussy'
 	$pcdesc_genitalswordy = 'pussy'
 	$pcdesc_genitals = 'pussy'
 end
@@ -1153,8 +1206,7 @@ if pcs_lipbalm > 0:
 		$lip = 'You have pillowy, <<$pcdesc_lipgloss>>, suggestively full lips. <<$pirsB>> <<$pirsA>>'
 	else
 		!! Lip size 0
-		rand_lipgloss = rand(0)
-		if rand_lipgloss = 0:$pcdesc_lipglossrandom = 'shiny'
+		$pcdesc_lipglossrandom = 'shiny'
 		$pcs_lipbalm = 'shiny'
 		$pcdesc_lipgloss = 'shiny'
 		$pcdesc_lipglossinsertive = ', shiny'
@@ -1164,8 +1216,7 @@ if pcs_lipbalm > 0:
 	end
 else
 	!! No gloss
-	rand_lipgloss = rand(0)
-	if rand_lipgloss = 0:$pcdesc_lipglossrandom = 'soft'
+	$pcdesc_lipglossrandom = 'soft'
 	$pcs_lipbalm = 'soft'
 	$pcdesc_lipgloss = 'soft'
 	$pcdesc_lipglossinsertive = ''
@@ -1320,8 +1371,7 @@ elseif pcs_eyecol = 3:
 	$pcdesc_eyecolourwordy = 'vibrant, crystal blue'
 	$pcs_eyecol = 'blue'
 else
-	rand_eyecol = rand(0)
-	if rand_eyecol = 0:$pcdesc_eyecolourrandom = 'attractive'
+	$pcdesc_eyecolourrandom = 'attractive'
 	$pcdesc_eyecolour = 'attractive'
 	$pcdesc_eyecolourwordy = 'attractive'
 	$pcs_eyecol = 'attractive'
@@ -1386,8 +1436,7 @@ elseif pcs_lashes = 2:
 	$pcdesc_lasheswordy = 'long, fluttery'
 	$pcs_lashes = 'with long eyelashes'
 elseif pcs_lashes = 1:
-	rand_lashes = rand(0)
-	if rand_lashes = 0:$pcdesc_lashesrandom = 'average'
+	$pcdesc_lashesrandom = 'average'
 	$pcdesc_lashes = 'average'
 	$pcdesc_lasheswordy = 'average'
 	$pcs_lashes = 'with average eyelashes'
@@ -1437,16 +1486,15 @@ end
 
 !! Most of these sound really terrible. Would REALLY recommend only using the insertive context, as the less-flowery versions will simply not return anything at all.
 if pcs_eyesize = 0:
-	rand_eyesize = rand(0)
-	if rand_eyesize = 0:$pcdesc_eyesizerandom = 'tiny'
+	$pcdesc_eyesizerandom = 'tiny'
 	$pcdesc_eyesize = 'small'
 	$pcdesc_eyesizeinsertive = ''
 	$pcdesc_eyesizewordy = 'little'
 	$glaza = 'You have little <<$pcs_eyecol>> eyes <<$pcs_lashes>>.<<$glass>>'
 elseif pcs_eyesize = 1:
-	rand_eyesize = rand(0)
+	rand_eyesize = rand(0,1)
 	if rand_eyesize = 0:$pcdesc_eyesizerandom = 'medium'
-	if rand_eyesize = 0:$pcdesc_eyesizerandom = 'average-sized'
+	if rand_eyesize = 1:$pcdesc_eyesizerandom = 'average-sized'
 	$pcdesc_eyesize = 'medium-sized'
 	$pcdesc_eyesizeinsertive = ''
 	$pcdesc_eyesizewordy = 'medium-sized'

+ 12 - 12
locations/obj_din.qsrc

@@ -370,11 +370,11 @@ if $ARGS[0] = 'husb_cheat_count':
 		end
 	end
 	if before_h_girl > 0 and before_h_guy > 0:
-		'During your marriage you have cheated with your husband with <<guy_cheat>> guys and <<girl_cheat>> girls.'
+		'During your marriage you have cheated on your husband with <<guy_cheat>> guys and <<girl_cheat>> girls.'
 	elseif before_h_guy > 0:
-		'During your marriage you have cheated with your husband with <<guy_cheat>> guys.'
+		'During your marriage you have cheated on your husband with <<guy_cheat>> guys.'
 	elseif before_h_girl > 0:
-		'During your marriage you have cheated with your husband with <<girl_cheat>> girls.'
+		'During your marriage you have cheated on your husband with <<girl_cheat>> girls.'
 	end
 end
 
@@ -2236,49 +2236,49 @@ if $ARGS[0] = 'piercing':
 	'<center>'
 	if pirsA = 0 and pirsB = 0 and pirsC = 0 and pirsD = 0 and pirsE = 0 and pirsF = 0 and pirsN = 0 and pirsG = 0 and pirsGL = 0:
 		'You have no piercings.'
-	elseif pirsA = 10000 and pirsB = 10000 and pirsC = 10000 and pirsD = 10000 and pirsE = 10000 and pirsF = 10000 and pirsN = 10000 and pirsG = 10000 and pirsGL = 10000:
+	elseif (pirsA = 10000 or pirsA = 0) and (pirsB = 10000 or pirsB = 0) and (pirsC = 10000 or pirsC = 0) and (pirsD = 10000 or pirsD = 0) and (pirsE = 10000 or pirsE = 0) and (pirsF = 10000 or pirsF = 0) and (pirsN = 10000 or pirsN = 0) and (pirsG = 10000 or pirsG = 0) and (pirsGL = 10000 or pirsGL = 0):
 		'You are not wearing any piercings'
 	else
 		*pl
 		if pirsA > 0 and pirsA < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsA''">Tongue</a> | '
 		else
-		*p 'Tongue | '
+			*p 'Tongue | '
 		end
 		if pirsB > 0 and pirsB < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsB''">Lips</a> | '
 		else
-		*p 'lips | '
+			*p 'lips | '
 		end
 		if pirsC > 0 and pirsC < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsC''">Ears</a> | '
 		else
-		*p 'Ears | '
+			*p 'Ears | '
 		end
 		if pirsD > 0 and pirsD < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsD''">Nose</a> | '
 		else
-		*p 'Nose | '
+			*p 'Nose | '
 		end
 		if pirsE > 0 and pirsE < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsE''">Eyebrows</a> | '
 		else
-		*p 'Eyebrows | '
+			*p 'Eyebrows | '
 		end
 		if pirsF > 0 and pirsF < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsF''">Nipples</a> | '
 		else
-		*p 'Nipples | '
+			*p 'Nipples | '
 		end
 		if pirsN > 0 and pirsN < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsN''">Navel</a> | '
 		else
-		*p 'Navel | '
+			*p 'Navel | '
 		end
 		if pirsG > 0 and pirsG < 10000:
 			*p '<a href="exec:gs ''obj_din'', ''pirsG''">Pussy</a>'
 		else
-		*p 'Pussy'
+			*p 'Pussy'
 		end
 	end
 	'</center>'