[Changed] Rewrote throat, anus, pussy, and tan descriptions

locations/MartinSex.qsrc

@@ -513,7 +513,7 @@ if $ARGS[0] = 'MartinTease1':
 			'Deciding to make full use of the table being there, you climb on top of it and sit down, spreading your legs to give Martin a good view of your ' + iif(pirsG>0,'pierced ','') + 'pussy.'
 			*nl
 			'"You could do more than just look, you know." The flirtatious tone is gone now - anything but being openly sultry just wouldn''t do this porno-esque situation justice.'
-			'Plus, Martin isn''t the only one getting turned on by this, and both of you can see it. "This <<$pcdesc_pubesrandom>> <<$pcdesc_pussyrandom>> <<$pcdesc_genitals>> could be yours."'
+			'Plus, Martin isn''t the only one getting turned on by this, and both of you can see it. "This <<$pcdesc_pubesrandom>> <<$pc_desc[''pussy'']>> <<$pcdesc_genitals>> could be yours."'
 			*nl
 			'Maybe something you said shook him out of his reverie, or maybe enough time has passed for him to snap out of it, but Martin seems to have regained the ability to speak. But he just loves saying things you don''t want to hear, doesn''t he?'
 			'"<<$pcs_firstname>>, I''m trying to be <b>sensible</b> here. This is not a good idea. You should cover yourself and go."'
@@ -595,13 +595,13 @@ if $ARGS[0] = 'MartinTease2':
 				'He''s staggering, but he isn''t out yet. You have to keep at it.'
 				*nl
 				'"I''m flexible, too. See?"'
-				'You don''t wait for a reply. You simply lift your <<$pcdesc_legsrandom>> leg up over the stool next to you, giving him a spectacular view at your <<$pcdesc_pussyrandom>> pussy.'
+				'You don''t wait for a reply. You simply lift your <<$pcdesc_legsrandom>> leg up over the stool next to you, giving him a spectacular view at your <<$pc_desc[''pussy'']>> pussy.'
 				*nl
 				'"<<$pcs_firstname>>, stop." Martin has found his voice again, it seems - not that he''s using it to say something helpful. "This is wrong."'
 				'"Really?" You look at your leg, confused. "Yeah, I guess you''re right."'
 				*nl
 				'You momentarily see something like hope or relief flare up in his eyes. You are not feeling very merciful tonight, though:'
-				'You put one of your hands on your ass and pull slightly, completely revealing what little of your <<$pcdesc_genitals>> and <<$pcdesc_anusrandom>> asshole wasn''t already visible to him.'
+				'You put one of your hands on your ass and pull slightly, completely revealing what little of your <<$pcdesc_genitals>> and <<$pc_desc[''anus'']>> asshole wasn''t already visible to him.'
 				'"There, better now?"'
 
 				if analplugin = 1:
@@ -684,7 +684,7 @@ if $ARGS[0] = 'MartinTease3':
 				'Even though you two share a laugh over his ''threat'', the thought that the plug might excite him that much makes your pussy tingle.'
 			!!end
 			*nl
-			'Taking all the time in the world, you comply, reach down and slooooowly remove the toy from your ass, moaning softly as your <<$pcdesc_anusrandom>> ass releases its intruder.'
+			'Taking all the time in the world, you comply, reach down and slooooowly remove the toy from your ass, moaning softly as your <<$pc_desc[''anus'']>> ass releases its intruder.'
 			'The glint you saw earlier is now a full-blown fire, fueled by the sight of your gaping and ready asshole.'
 		end
 		gs 'underwear', 'remove'
@@ -694,7 +694,7 @@ if $ARGS[0] = 'MartinTease3':
 		act 'Climb on the table':
 			cls
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease3.jpg"></center>'
-			'Making full use of the table being there, you climb on top and sit down on it, giving Martin an alluring smile and spreading your <<$pcdesc_legsrandom>> legs, giving the lucky guy in the front row an exclusive look at your <<$pcdesc_pussyrandom>> pussy.'
+			'Making full use of the table being there, you climb on top and sit down on it, giving Martin an alluring smile and spreading your <<$pcdesc_legsrandom>> legs, giving the lucky guy in the front row an exclusive look at your <<$pc_desc[''pussy'']>> pussy.'
 			*nl
 			'"The way you look at me really turns me on, you know," you sigh. The flirtatious tone is gone now - the wetness you feel between your legs makes anything but ''sultry'' feel inadequate.'
 			'Your body''s display of excitement cannot possibly have escaped Martin, because is looking at you intently, feasting on the sight of you like he''d never get to do it again. "You and me both, mi amor."'
@@ -815,12 +815,12 @@ if $ARGS[0] = 'MartinTease4':
 				'Well, if it''s a sexy torture he wants, you are happy to deliver.'
 				*nl
 				'"Want to see how flexible I am?"'
-				'You don''t wait for a reply. You simply lift your <<$pcdesc_legsrandom>> leg up over the stool next to you, giving him a spectacular view at your <<$pcdesc_pussyrandom>> pussy.'
+				'You don''t wait for a reply. You simply lift your <<$pcdesc_legsrandom>> leg up over the stool next to you, giving him a spectacular view at your <<$pc_desc[''pussy'']>> pussy.'
 				*nl
 				'When you look up from the stool, you are stunned to see Martin give you a look of indifference. "That''s okay, I guess."'
 				*nl
 				'You almost burst into laughter after your brain has caught up with his challenge, but you are only too happy to indulge him, if it''s an even sexier display he wants.'
-				'You put one of your hands on your ass and pull slightly, completely revealing what little of your <<$pcdesc_genitals>> and <<$pcdesc_anusrandom>> asshole wasn''t already visible to him.'
+				'You put one of your hands on your ass and pull slightly, completely revealing what little of your <<$pcdesc_genitals>> and <<$pc_desc[''anus'']>> asshole wasn''t already visible to him.'
 				'"Just okay, huh?"'
 
 				if analplugin = 0:
@@ -842,7 +842,7 @@ if $ARGS[0] = 'MartinTease4':
 						'Even though you two share a laugh over his ''threat'', the thought that the plug might excite him that much makes your pussy tingle.'
 					!!end
 					*nl
-					'Taking all the time in the world, you comply, reach down and slooooowly remove the toy from your ass, moaning softly as your <<$pcdesc_anusrandom>> ass releases its intruder.'
+					'Taking all the time in the world, you comply, reach down and slooooowly remove the toy from your ass, moaning softly as your <<$pc_desc[''anus'']>> ass releases its intruder.'
 					'The glint you saw earlier is now a full-blown fire, fueled by the sight of your gaping and ready asshole.'
 				end
 				gs 'arousal', 'foreplay', 1, 'exhibitionism'
@@ -936,7 +936,7 @@ if $ARGS[0] = 'MartinTeaseDildo':
 		'Your smile fades fast as lust overtakes you.'
 		'Time moves different when you are aroused like this, when every sensation is like a shockwave in your head and every nerve of your body is on edge. A giant crowd could have been watching you right now and you wouldn''t even care - no, actually, at this point it would probably only make this more intense.'
 		*nl
-		'You can sense every tiny movement of the dildo inside your <<$pcdesc_pussyrandom>> <<$pcdesc_genitals>> as you shift around, move it in and out, rubbing it against this wall and that and making sure to brush against your clit every now and then.'
+		'You can sense every tiny movement of the dildo inside your <<$pc_desc[''pussy'']>> <<$pcdesc_genitals>> as you shift around, move it in and out, rubbing it against this wall and that and making sure to brush against your clit every now and then.'
 		'There are plenty of instances when you wouldn''t be able to cum without rubbing your sensitive nub, but this situation is so hot that you have no trouble at all getting yourself off.'
 		$orgasm_txt = 'no'
 		gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism'

locations/MartinSex2.qsrc

@@ -43,7 +43,7 @@ if $ARGS[0] = 'MartinSexPrep':
 		'Without delay, you climb on top of him, ' + iif($martinpos='rev_cowgirl','facing away from him','face to face with him') + ', his <<dick>>cm <<$dick_girth>> cock tantalizingly close to your wet <<$pcdesc_genitals>>' + iif($martinpos='rev_cowgirl',' and giving him a fantastic view of your ass','') + ' as you rub your slit along his length, sending ripples of pleasure through your body.'
 	
 	elseif $martinpos = 'doggystyle':
-		'You bend over, giving Martin unrestricted access to your exposed <<$pcdesc_genitals>> and a sexy view of your <<$pcdesc_anusrandom>> anus.'
+		'You bend over, giving Martin unrestricted access to your exposed <<$pcdesc_genitals>> and a sexy view of your <<$pc_desc[''anus'']>> anus.'
 		'Martin smiles, clearly pleased with your shamelessness and urgency. He unceremoniously rids himself of his pants and comes up behind you, his erect penis so close to your wet folds you can feel the warmth it emanates. Not being able to see everything he does really turns you on.'
 		*nl
 		'To say that you are ready would be an understatement, which is probably the reason Martin... doesn''t penetrate you. Instead, he rubs his dick up and down the length of your slit, spreading your juices all around your lips and teasing you with the tip of his <<dick>>cm <<$dick_girth>> cock until you are about ready to scream.'
@@ -261,12 +261,12 @@ if $ARGS[0] = 'MartinSexDyn':
 			else
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/rev_cowgirl/rev_cowgirl<<pic_rand2>>.jpg"></center>'
 			end
-			'You are moving ever faster, trying to take Martin''s wonderful cock deeper into your <<$pcdesc_pussyrandom>> pussy, fucking him harder, moaning louder as you go. It may have started off gently but there''s no gentleness left to be found here anymore: You are riding this man in the middle of his bar, giving him a fantastic view of your ' + iif($martinpos='rev_cowgirl','ass','tits') + ' in the same spot some guys talked about their shitty jobs and marital problems a few hours ago.'
+			'You are moving ever faster, trying to take Martin''s wonderful cock deeper into your <<$pc_desc[''pussy'']>> pussy, fucking him harder, moaning louder as you go. It may have started off gently but there''s no gentleness left to be found here anymore: You are riding this man in the middle of his bar, giving him a fantastic view of your ' + iif($martinpos='rev_cowgirl','ass','tits') + ' in the same spot some guys talked about their shitty jobs and marital problems a few hours ago.'
 			*nl
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody else is here right now.'
 			
 			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to fuck the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
-			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcdesc_pussyrandom>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
+			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pc_desc[''pussy'']>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
 			'Martin, who has been relatively passive so far, leaving you in control, shakes you out of your reverie when his hands move to your hips. No doubt he intends to take a little more initiative.'
@@ -290,7 +290,7 @@ if $ARGS[0] = 'MartinSexDyn':
 				'"Please what?"'
 				'"Please fuck me with your hard cock again. I need it!"'
 				*nl
-				'That was all he wanted to hear. In the blink of an eye, Martin is balls-deep inside you again, his pelvis slamming into your <<$pcdesc_pussyrandom>> hole from below. You cannot move, his strong arms firmly holding you in place, and are helpless to let him fuck you from below.' 
+				'That was all he wanted to hear. In the blink of an eye, Martin is balls-deep inside you again, his pelvis slamming into your <<$pc_desc[''pussy'']>> hole from below. You cannot move, his strong arms firmly holding you in place, and are helpless to let him fuck you from below.' 
 				'And you are loving every second of it.'
 				gs 'arousal', 'vaginal', 8, 'sub'
 				gs 'stat'
@@ -303,7 +303,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody''s here now.'
 			
 			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
-			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcdesc_pussyrandom>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
+			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pc_desc[''pussy'']>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
 			'Martin was firmly in control so far, but it seems like it''s not enough for him: All of a sudden, you can feel his hand at your neck, grabbing you, forcing you to look at him and increasing both his leverage and sense of power over you.'
@@ -340,7 +340,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody''s here now.'
 			
 			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
-			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcdesc_pussyrandom>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
+			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pc_desc[''pussy'']>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
 			'Martin was firmly in control so far, but it seems like it''s not enough to him: All of a sudden, you can feel his hand at your neck, grabbing you, forcing you to look at him and increasing both his leverage and sense of power over you.'
@@ -384,7 +384,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody''s here now.'
 			
 			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
-			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcdesc_pussyrandom>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
+			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pc_desc[''pussy'']>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
 			'Martin was firmly in control so far, and his switch of position only served to emphasize that, but it seems like it''s not enough to him: All of a sudden, you can feel one of his hands leave your hips and grab your neck, forcing you to look back at him and increasing both his leverage and sense of power over you.'
@@ -458,12 +458,12 @@ if $ARGS[0] = 'MartinSexDyn':
 			if $martinpos = 'cowgirl':
 				'"Did you enjoy yourself?" You ask coquettishly, leaning forward onto his chest.'
 				'Martin smiles up at you, and pulls you down to give you a kiss. "I think you know the answer."'
-				'"Perhaps..." You grin and lift yourself off, feeling his softening <<dick>>cm <<$dick_girth>> cock slide out of your <<$pcdesc_pussyrandom>> pussy.' 
+				'"Perhaps..." You grin and lift yourself off, feeling his softening <<dick>>cm <<$dick_girth>> cock slide out of your <<$pc_desc[''pussy'']>> pussy.' 
 			
 			elseif $martinpos = 'rev_cowgil':
 				'"Did you enjoy yourself?" You ask coquettishly, wiggling your butt as you look back over your shoulder.'
 				'Martin smiles up at you, and gives your ass a resounding smack. "I think you know the answer."'
-				'"Perhaps..." You grin and lift yourself off, feeling his softening <<dick>>cm <<$dick_girth>> cock slide out of your <<$pcdesc_pussyrandom>> pussy.'
+				'"Perhaps..." You grin and lift yourself off, feeling his softening <<dick>>cm <<$dick_girth>> cock slide out of your <<$pc_desc[''pussy'']>> pussy.'
 			
 			else
 				if $martinpos = 'doggystyle':
@@ -589,7 +589,7 @@ if $ARGS[0] = 'MartinAnalDyn':
 	elseif MartinSurpAnal = 1:
 		'Your change of heart is a little sudden, no doubt, but when you tell Martin that you want him to fuck your ass instead, he doesn''t look unhappy about it. After all, what man would refuse an offer like that?'
 	else
-		'With your <<$pcdesc_pussyrandom>> pussy thoroughly plowed, you moan: "I want your hard cock in my ass right now!"'
+		'With your <<$pc_desc[''pussy'']>> pussy thoroughly plowed, you moan: "I want your hard cock in my ass right now!"'
 		'"You and me both, corazón," Martin murmurs as he pulls out.'
 	end
 	
@@ -865,10 +865,10 @@ if $ARGS[0] = 'PainalDyn':
 			act 'Continue':
 				*clr & cla
 				'<center><video autoplay loop src="images/locations/city/industrial/bar/sex/bar/martin/anal/painal3.mp4"></center>'
-				'But as patient as Martin has proven so far, you eventually push him too far, your <<$pcdesc_anusrandom>> asshole too snug and arousing around him for him to stay idle.'
+				'But as patient as Martin has proven so far, you eventually push him too far, your <<$pc_desc[''anus'']>> asshole too snug and arousing around him for him to stay idle.'
 				*nl
 				'Your lover starts moving on his own. At first, he is gentle, careful, only adding a tiny bit of extra sensation to your mutual experience, but with ever stroke, he loses his inhibitions and turns more and more into an animal, possessed by the need to destroy your ass and fill it with cum.'
-				'But he''s not being inconsiderate: As soon as his pace quickens, he reaches around to your pussy, rubbing your clit as he drills your <<$pcdesc_anusrandom>> asshole, adding a more familiar note of lust to the sharp pain from your butt.'
+				'But he''s not being inconsiderate: As soon as his pace quickens, he reaches around to your pussy, rubbing your clit as he drills your <<$pc_desc[''anus'']>> asshole, adding a more familiar note of lust to the sharp pain from your butt.'
 				*nl
 				'The conflicting sensations rack you, hurting and arousing and bewildering all at once.' 
 				'You cannot tell how long this maelstrom tosses to and fro, the pain getting stronger the longer you keep going. All you know is that, eventually, Martin hammers his cock into your ass with abandon and finally, loudly, fills your bowels with his sperm.'

locations/body_desc.qsrc

@@ -31,45 +31,38 @@ end
 if $ARGS[0] = 'throat':
     if pcs_throat = 0:
 		$pcs_throat = 'You have a chaste <a href="exec:view''images/pc/body/throat/th0.jpg''">mouth</a>.'
-		$pcdesc_throatrandom = 'virgin'
-		$pcdesc_throat = 'virgin'
-		$pcdesc_throatwordy = 'virginal, unused'
+		$pc_desc['throat'] = 'virgin'
+		$pc_descWordy['throat'] = 'virginal, unused'
 		$throattipe = 'virgin'
 	elseif pcs_throat <= 5:
 		$pcs_throat = 'You have an extremely inexperienced <a href="exec:view''images/pc/body/throat/th1.jpg''">mouth</a>.'
-		$pcdesc_throatrandom = 'narrow'
-		$pcdesc_throat = 'narrow'
-		$pcdesc_throatwordy = 'reluctant, gag-prone'
+		$pc_desc['throat'] = 'narrow'
+		$pc_descWordy['throat'] = 'reluctant, gag-prone'
 		$throattipe = 'narrow'
 	elseif pcs_throat <= 10:
 		$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.'
-		$pcdesc_throatrandom = 'delicate'
-		$pcdesc_throat = 'delicate'
-		$pcdesc_throatwordy = 'delicate, barely-experienced'
+		$pc_desc['throat'] = 'delicate'
+		$pc_descWordy['throat'] = 'delicate, barely-experienced'
 		$throattipe = 'delicate'
 	elseif pcs_throat <= 15:
 		$pcs_throat = 'You have an experienced mouth and fairly practiced <a href="exec:view''images/pc/body/throat/th3.jpg''">throat</a>.'
-		$pcdesc_throatrandom = 'fairly practiced'
-		$pcdesc_throat = 'fairly practiced'
-		$pcdesc_throatwordy = 'fairly practiced'
+		$pc_desc['throat'] = 'fairly practiced'
+		$pc_descWordy['throat'] = 'fairly practiced'
 		$throattipe = 'fairly practiced'
 	elseif pcs_throat <= 25:
 		$pcs_throat = 'You have a willing mouth and trained <a href="exec:view''images/pc/body/throat/th4.jpg''">throat</a>.'
-		$pcdesc_throatrandom = 'well-trained'
-		$pcdesc_throat = 'well-trained'
-		$pcdesc_throatwordy = 'experienced, well-trained and eager'
+		$pc_desc['throat'] = 'well-trained'
+		$pc_descWordy['throat'] = 'experienced, well-trained and eager'
 		$throattipe = 'well-trained'
 	elseif pcs_throat <= 35:
 		$pcs_throat = 'Your deep tunnel of a <a href="exec:view''images/pc/body/throat/th5.jpg''">throat</a> may adopt any member.'
-		$pcdesc_throatrandom = 'capacious'
-		$pcdesc_throat = 'capacious'
-		$pcdesc_throatwordy = 'seasoned, effortlessly-plumbed'
+		$pc_desc['throat'] = 'capacious'
+		$pc_descWordy['throat'] = 'seasoned, effortlessly-plumbed'
 		$throattipe = 'capacious'
 	else
 		$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.'
-		$pcdesc_throatrandom = 'bottomless'
-		$pcdesc_throat = 'bottomless'
-		$pcdesc_throatwordy = 'elastic, oft-fucked'
+		$pc_desc['throat'] = 'bottomless'
+		$pc_descWordy['throat'] = 'elastic, oft-fucked'
 		$throattipe = 'bottomless'
 	end
 
@@ -84,87 +77,38 @@ if $ARGS[0] = 'pussy':
 			$pcs_vag = 'Your poor little <a href="exec:view''images/pc/body/pussy/stage5/' + rand(1,5) + '.jpg''">pussy</a> is broken from too much stuffing, it''ll need time to recover.'
 		end
 		$pcs_vag_image = 'images/pc/body/pussy/stage5/' + rand(1,5) + '.jpg'
-		rand_pussy = rand(0,6)
-		if rand_pussy = 0:
-			$pcdesc_pussyrandom = 'ruined'
-		elseif rand_pussy = 1:
-			$pcdesc_pussyrandom = 'broken'
-		elseif rand_pussy = 2:
-			$pcdesc_pussyrandom = 'prolapsed'
-		elseif rand_pussy = 3:
-			$pcdesc_pussyrandom = 'destroyed'
-		elseif rand_pussy = 4:
-			$pcdesc_pussyrandom = 'annihilated'
-		elseif rand_pussy = 5:
-			$pcdesc_pussyrandom = 'obliterated'
-		elseif rand_pussy = 6:
-			$pcdesc_pussyrandom = 'decimated'
-		end
-		$pcdesc_pussy = 'prolapsed'
-		$pcdesc_pussywordy = 'prolapsed, ruined, chasm of a'
+		$pc_desc['pussy'] = func($this, 'ChooseDescWord', 'ruined', 'broken', 'proplapsed', 'destroyed', 'annihilated', 'obliterated','decimated')
+		$pc_descWordy['pussy'] = 'prolapsed, ruined, chasm of a'
 		$vaginatipe = 'ruined'
 	elseif vgape = 3:
 		$pcs_vag = 'You have a gaping hole of a <a href="exec:view''images/pc/body/pussy/stage4/' + rand(1,5) + '.jpg''">vagina</a>.'
 		$pcs_vag_image = 'images/pc/body/pussy/stage4/' + rand(1,5) + '.jpg'
-		rand_pussy = rand(0,3)
-		if rand_pussy = 0:
-			$pcdesc_pussyrandom = 'gaping'
-		elseif rand_pussy = 1:
-			$pcdesc_pussyrandom = 'open'
-		elseif rand_pussy = 2:
-			$pcdesc_pussyrandom = 'extended'
-		elseif rand_pussy = 3:
-			$pcdesc_pussyrandom = 'wide'
-		end
-		$pcdesc_pussy = 'open'
-		$pcdesc_pussywordy = 'gaping and well used'
+		$pc_desc['pussy'] = func($this, 'ChooseDescWord', 'gaping', 'open', 'extended', 'wide')
+		$pc_descWordy['pussy'] = 'gaping and well used'
 		$vaginatipe = 'gaping'
 	elseif vgape = 2:
 		$pcs_vag = 'Your <a href="exec:view''images/pc/body/pussy/stage3/' + rand(1,5) + '.jpg''">vagina</a> has seen some action.'
 		$pcs_vag_image = 'images/pc/body/pussy/stage3/' + rand(1,5) + '.jpg'
-		rand_pussy = rand(0,2)
-		if rand_pussy = 0: 
-            $pcdesc_pussyrandom = 'recovering'
-		elseif rand_pussy = 1:
-			$pcdesc_pussyrandom = 'recently used'
-		elseif rand_pussy = 2:
-			$pcdesc_pussyrandom = 'welcoming'
-		end
-		$pcdesc_pussy = 'recovering'
-		$pcdesc_pussywordy = 'experienced, welcoming'
+		$pc_desc['pussy'] = func($this, 'ChooseDescWord', 'recovering', 'recently used', 'welcoming')
+		$pc_descWordy['pussy'] = 'experienced, welcoming'
 		$vaginatipe = 'welcoming'
 	elseif vgape = 1 or pcs_vag > 10:
 		$pcs_vag = 'Your <a href="exec:view''images/pc/body/pussy/stage2/' + rand(1,5) + '.jpg''">pussy</a> looks like has been used recently or is just well worn in.'
 		$pcs_vag_image = 'images/pc/body/pussy/stage2/' + rand(1,5) + '.jpg'
-		rand_pussy = rand(0,1)
-		if rand_pussy = 0:
-			$pcdesc_pussyrandom = 'pliable'
-		elseif rand_pussy = 1:
-			$pcdesc_pussyrandom = 'used'
-		end
-		$pcdesc_pussy = 'pliable'
-		$pcdesc_pussywordy = 'worn in'
+		$pc_desc['pussy'] = func($this, 'ChooseDescWord', 'pliable', 'used')
+		$pc_descWordy['pussy'] = 'worn in'
 		$vaginatipe = 'used'
 	elseif pcs_vag > 0:
 		$pcs_vag = 'Your <a href="exec:view''images/pc/body/pussy/stage1/' + rand(1,5) + '.jpg''">pussy</a> looks unused.'
 		$pcs_vag_image = 'images/pc/body/pussy/stage1/' + rand(1,5) + '.jpg'
-		rand_pussy = rand(0,2)
-		if rand_pussy = 0:
-			$pcdesc_pussyrandom = 'snug'
-		elseif rand_pussy = 1:
-			$pcdesc_pussyrandom = 'tight'
-		elseif rand_pussy = 2:
-			$pcdesc_pussyrandom = 'cosy'
-		end
-		$pcdesc_pussy = 'tight'
-		$pcdesc_pussywordy = 'tight and unused'
+		$pc_desc['pussy'] = func($this, 'ChooseDescWord', 'snug', 'tight', 'cosy')
+		$pc_descWordy['pussy'] = 'tight and unused'
 		$vaginatipe = 'unused'
 	else
 		$pcs_vag = 'Your virgin <a href="exec:view''images/pc/body/pussy/stage0/' + rand(1,5) + '.jpg''">pussy</a> still has its hymen intact.'
 		$pcs_vag_image = 'images/pc/body/pussy/stage0/' + rand(1,5) + '.jpg'
-		$pcdesc_pussyrandom = 'virgin'
-		$pcdesc_pussy = 'virgin'
-		$pcdesc_pussywordy = 'virgin'
+		$pc_desc['pussy'] = 'virgin'
+		$pc_descWordy['pussy'] = 'virgin'
 		$vaginatipe = 'virgin'
 	end
     killvar 'rand_pussy'
@@ -180,96 +124,44 @@ if $ARGS[0] = 'anus':
 			else
 				$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage5/' + rand(1,5) + '.jpg''">anus</a> is almost completely wrecked at this time. Even with conscious effort it''s hard to close it.'
 			end
-			rand_anus = rand(0,7)
-			if rand_anus = 0:
-				$pcdesc_anusrandom = 'gaping'
-			elseif rand_anus = 1:
-				$pcdesc_anusrandom = 'yawning'
-			elseif rand_anus = 2:
-				$pcdesc_anusrandom = 'obscenely yawning'
-			elseif rand_anus = 3:
-				$pcdesc_anusrandom = 'destroyed'
-			elseif rand_anus = 4:
-				$pcdesc_anusrandom = 'demolished'
-			elseif rand_anus = 5:
-				$pcdesc_anusrandom = 'uselessly loose'
-			elseif rand_anus = 6:
-				$pcdesc_anusrandom = 'ruined'
-			elseif rand_anus = 7:
-				$pcdesc_anusrandom = 'wrecked'
-			end
-			$pcdesc_anus = 'gaping'
-			$pcdesc_anuswordy = 'gaping, seemingly constantly-fucked'
+			$pc_desc['anus'] = func($this, 'ChooseDescWord', 'gaping', 'yawning', 'destroyed', 'demolished', 'uselessly loose','ruined', 'wrecked')
+			$pc_descWordy['anus'] = 'gaping, seemingly constantly-fucked'
 			$anustipe = 'gaping'
 		elseif agape = 3:
 			anpic = 4
 			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage4/' + rand(1,5) + '.jpg''">anus</a> looks like a wide hole, it is clear you have recently been penetrated.'
-			rand_anus = rand(0,2)
-			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'
+			$pc_desc['anus'] = func($this, 'ChooseDescWord', 'loose', 'casually open', 'routinely-fucked')
+			$pc_descWordy['anus'] = 'loose, open'
 			$anustipe = 'loose'
 		elseif agape = 2:
 			anpic = 3
 			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage3/' + rand(1,5) + '.jpg''">anus</a> gapes a little from anal penetration, it should recover soon.'
-			rand_anus = rand(0,2)
-			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'
+			$pc_desc['anus'] = func($this, 'ChooseDescWord', 'stretchy', 'welcomingly ready', 'experienced')
+			$pc_descWordy['anus'] = 'stretchy, regularly-fucked'
 			$anustipe = 'stretchy'
 		elseif agape = 1 or pcs_ass > 10:
 			anpic = 2
 			$pcs_ass = 'Your pliable <a href="exec:view''images/pc/body/anus/stage2/' + rand(1,5) + '.jpg''">anus</a> has the shape of an asterisk and has clearly been used.'
-			rand_anus = rand(0,2)
-			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'
+			$pc_desc['anus'] = func($this, 'ChooseDescWord', 'flexible', 'slightly experienced', 'pliable')
+			$pc_descWordy['anus'] = 'flexible, still-snug'
 			$anustipe = 'flexible'
 		elseif pcs_ass > 0:
 			anpic = 1
 			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage1/' + rand(1,5) + '.jpg''">anus</a> shows no sign of having been penetrated.'
-			rand_anus = rand(0,2)
-			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'
+			$pc_desc['anus'] = func($this, 'ChooseDescWord', 'tight', 'tightly-clenching', 'snug')
+			$pc_descWordy['anus'] = 'tight, scarcely-used'
 			$anustipe = 'tight'
 		else
 			anpic = 0
 			$pcs_ass = 'You have a virgin <a href="exec:view''images/pc/body/anus/stage0/' + rand(1,5) + '.jpg''">anus</a>.'
-			$pcdesc_anusrandom = 'virgin'
-			$pcdesc_anus = 'virgin'
-			$pcdesc_anuswordy = 'virgin'
+			$pc_desc['anus'] = 'virgin'
+			$pc_descWordy['anus'] = 'virgin'
 			$anustipe = 'virgin'
 		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.
 	else
-		$pcdesc_anusrandom = 'plugged'
-		$pcdesc_anus = 'plugged'
-		$pcdesc_anuswordy = 'plug-stuffed'
+		$pc_desc['anus'] = 'plugged'
+		$pc_descWordy['anus'] = '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.'	
@@ -471,87 +363,31 @@ end
 
 if $ARGS[0] = 'tan':
 	!! The solarium increases tan value by 10,  and the beach increases it by 1 or 3 based on whether or not you use sunblock (counterintuitively, sunblock increases it by 3, not 1 -- I think suntan lotion was meant, which is actually a different thing)
-	if pcs_tan > 0:
-		if pcs_tan > 0 and pcs_tan <= 5:
-			rand_tan = rand(0,2)
-			if rand_tan = 0:
-				$pcdesc_tanrandom = 'lightly tanned'
-			elseif rand_tan = 1:
-				$pcdesc_tanrandom = 'barely tanned'
-			elseif rand_tan = 2:
-				$pcdesc_tanrandom = 'scarcely darkened'
-			end
-			$pcdesc_tan = 'faintly tanned'
-			$pcdesc_tanwordy = 'just barely sun-kissed'
-			$pcs_tan = 'faintly tanned'
-		elseif pcs_tan > 5 and pcs_tan <= 10:
-			rand_tan = rand(0,3)
-			if rand_tan = 0:
-				$pcdesc_tanrandom = 'tanned'
-			elseif rand_tan = 1:
-				$pcdesc_tanrandom = 'lightly bronzed'
-			elseif rand_tan = 2:
-				$pcdesc_tanrandom = 'sun-kissed'
-			elseif rand_tan = 3:
-				$pcdesc_tanrandom = 'lightly browned'
-			end
-			$pcdesc_tan = 'tanned'
-			$pcdesc_tanwordy = 'gently sun-kissed'
-			$pcs_tan = 'tanned'
-		elseif pcs_tan > 10 and pcs_tan <= 25:
-			rand_tan = rand(0,2)
-			if rand_tan = 0:
-				$pcdesc_tanrandom = 'bronzed'
-			elseif rand_tan = 1:
-				$pcdesc_tanrandom = 'browned'
-			elseif rand_tan = 2:
-				$pcdesc_tanrandom = 'light caramel'
-			end
-			$pcdesc_tan = 'bronzed'
-			$pcdesc_tanwordy = 'sun-swept, beach-bunny brown'
-			$pcs_tan = 'bronzed'
-		elseif pcs_tan > 25 and pcs_tan <= 50:
-			rand_tan = rand(0,3)
-			if rand_tan = 0:
-				$pcdesc_tanrandom = 'deeply tanned'
-			elseif rand_tan = 1:
-				$pcdesc_tanrandom = 'very dark'
-			elseif rand_tan = 2:
-				$pcdesc_tanrandom = 'richly browned'
-			elseif rand_tan = 3:
-				$pcdesc_tanrandom = 'tawny'
-			end
-			$pcdesc_tan = 'deeply tanned'
-			$pcdesc_tanwordy = 'dark, richly browned'
-			$pcs_tan = 'deeply tanned'
-		else
-			!! This would take some very intentional tanorexia
-			rand_tan = rand(0,2)
-			if rand_tan = 0:
-				$pcdesc_tanrandom = 'extremely darkly tanned'
-			elseif rand_tan = 1:
-				$pcdesc_tanrandom = 'nearly unnaturally darkened'
-			elseif rand_tan = 2:
-				$pcdesc_tanrandom = 'dark, desert-tanned'
-			end
-			$pcdesc_tan = 'extremely darkly tanned'
-			$pcdesc_tanwordy = 'practically swarthy'
-			$pcs_tan = 'extremely darkly tanned'
-		end
-	else
-		rand_tan = rand(0,3)
-		if rand_tan = 0:
-			$pcdesc_tanrandom = 'pale'
-		elseif rand_tan = 1:
-			$pcdesc_tanrandom = 'alabaster'
-		elseif rand_tan = 2:
-			$pcdesc_tanrandom = 'porcelain'
-		elseif rand_tan = 3:
-			$pcdesc_tanrandom = 'fair'
-		end
-		$pcdesc_tan = 'pale'
-		$pcdesc_tanwordy = 'pale, alabaster'
+	if pcs_tan = 0:
+		$pc_desc['tan'] = func($this, 'ChooseDescWord', 'pale', 'alabaster', 'porcelain', 'fair')
+		$pc_descWordy['tan'] = 'pale, alabaster'
 		$pcs_tan = 'pale'
+	elseif pcs_tan > 0 and pcs_tan <= 5:
+		$pc_desc['tan'] = func($this, 'ChooseDescWord', 'lightly tanned', 'barely tanned', 'scarcely darkened')
+		$pc_descWordy['tan'] = 'just barely sun-kissed'
+		$pcs_tan = 'faintly tanned'
+	elseif pcs_tan > 5 and pcs_tan <= 10:
+		$pc_desc['tan'] = func($this, 'ChooseDescWord', 'tanned', 'lightly bronzed', 'sun-kissed', 'lightly browned')
+		$pc_descWordy['tan'] = 'gently sun-kissed'
+		$pcs_tan = 'tanned'
+	elseif pcs_tan > 10 and pcs_tan <= 25:
+		$pc_desc['tan'] = func($this, 'ChooseDescWord', 'bronzed', 'browned', 'light caramel')
+		$pc_descWordy['tan'] = 'sun-swept, beach-bunny brown'
+		$pcs_tan = 'bronzed'
+	elseif pcs_tan > 25 and pcs_tan <= 50:
+		$pc_desc['tan'] = func($this, 'ChooseDescWord', 'deeply tanned', 'very dark', 'richly browned', 'tawny')
+		$pc_descWordy['tan'] = 'dark, richly browned'
+		$pcs_tan = 'deeply tanned'
+	else
+		!! This would take some very intentional tanorexia
+		$pc_desc['tan'] = func($this, 'ChooseDescWord', 'extremely darkly tanned', 'nearly unnaturally darkened', 'dark, desert-tanned')
+		$pc_descWordy['tan'] = 'practically swarthy'
+		$pcs_tan = 'extremely darkly tanned'
 	end
     killvar 'rand_tan'
 end