[Changed] Moved butt and breasts from body to body_desc

locations/MartinSex.qsrc

@@ -86,7 +86,7 @@ if $ARGS[0] = '':
 				'But... you are just friends, right? You like hanging out at the bar, like that Martin has an open ear for you, treats you the same as his regulars. Okay, maybe he is a little more protective of you than of his other regulars every now and then, but he is a good man, a good friend, and it might be a mistake to risk all that for... what?'
 				*nl
 				'Your inability to answer that question makes the decision for you, and you just have a normal chat with Martin.'
-				'Every now and then, you get a little flirty or add a double entendre, but you keep the conversation light and friendly overall, same as you would during your regular visits and talks. You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, doing your best to ignore his occasional glance at your <<$pcdesc_breastsrandom>> breasts.'
+				'Every now and then, you get a little flirty or add a double entendre, but you keep the conversation light and friendly overall, same as you would during your regular visits and talks. You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, doing your best to ignore his occasional glance at your <<$pc_desc[''breast'']>> breasts.'
 				*nl
 				'After about half an hour, you decide that you should let Martin finish up for the night. After a brief but friendly goodnight, you leave the bar with a tingly stomach - whether it''s purely from lustful longing or more, you''re not sure, but you know that the only way to find out is to talk to Martin when he''s alone again.'
 				'<i>Maybe tomorrow</i>, you think to yourself.'
@@ -102,7 +102,7 @@ if $ARGS[0] = '':
 				'You don''t know when this thing with Martin went from friendly chats and idle flirts to something else, but there is a tingling in your belly, and lower, when you look at him that you would very much like to act on...'
 				'And since Martin is trying his best to hide his interest and it doesn''t look like he is gonna do you the favor of making the first step, you will have to take matters into your own hands.'
 				*nl
-				'You flirt more aggressively than you have up until now: You smile more,' + iif(pcs_hairlng>81,' play with your <<$pcdesc_hairobjectwordy>>,','') + ' touch his arm every now and then, even move and lean over in ways that give him good looks at your <<$pcdesc_breastsrandom>> cleavage or <<$body>> butt - in other words, you drop about as many hints as womanly possible, short of stripping right then and there.'
+				'You flirt more aggressively than you have up until now: You smile more,' + iif(pcs_hairlng>81,' play with your <<$pcdesc_hairobjectwordy>>,','') + ' touch his arm every now and then, even move and lean over in ways that give him good looks at your <<$pc_desc[''breast'']>> cleavage or <<$body>> butt - in other words, you drop about as many hints as womanly possible, short of stripping right then and there.'
 				*nl
 				'Twenty minutes pass like that and you are starting to wonder if Martin is playing hard to get or if he really is oblivious to what you''re doing... when he visibly catches himself staring at your <<$pc_desc[''lip gloss'']>> lips and suddenly declares: "You shouldn''t get involved with me."'
 				'"Excuse me?" You are so astonished by what he said that you are almost sure you misheard him.'
@@ -292,7 +292,7 @@ if $ARGS[0] = '':
 			'You don''t know if you want to have the final word, though. Shouldn''t you go into this with some kind of plan, an idea of how to convince him? Hell, are you even sure you want more from him? Isn''t it enough to be friend with him?'
 			*nl
 			'Your inability to answer these questions makes the decision for you, and you just have a normal chat with Martin.'
-			'Every now and then, you get a little flirty or add a double entendre, but you keep the conversation light and friendly overall, same as you would during your regular visits and talks. You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, doing your best to ignore his occasional glance at your <<$pcdesc_breastsrandom>> breasts.'
+			'Every now and then, you get a little flirty or add a double entendre, but you keep the conversation light and friendly overall, same as you would during your regular visits and talks. You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, doing your best to ignore his occasional glance at your <<$pc_desc[''breast'']>> breasts.'
 			*nl
 			'After about half an hour, you decide that you should let Martin finish up for the night. After a brief but friendly goodnight, you leave the bar with a tingly stomach - whether it''s from nervousness, desire or something else, you can''t tell, but you probably won''t find out unless you talk about this with Martin.'
 			'<i>Maybe tomorrow</i>, you think to yourself.'
@@ -429,7 +429,7 @@ if $ARGS[0] = '':
 			'But you decide not to indulge him today. After all, you are a respectable woman who would <b>never</b> have sex in a public place, right?'
 			*nl
 			'So instead, you just have a normal chat with Martin. Well, as normal as can be in this situation.'
-			'You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, but this conversation is at regular intervals interrupted by double entendres, kisses, you giving Martin generous looks at your <<$pcdesc_breastsrandom>> cleavage and <<$body>> ass, and other things you cannot or will not do while the bar is open.'
+			'You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, but this conversation is at regular intervals interrupted by double entendres, kisses, you giving Martin generous looks at your <<$pc_desc[''breast'']>> cleavage and <<$body>> ass, and other things you cannot or will not do while the bar is open.'
 			*nl
 			'After about half an hour of talking, among other things, you decide that you should let Martin finish up for the night. After a final goodnight kiss, you leave the bar with a tingly stomach, your mind still lingering at the bulge in his pants and all the things you could do with him instead of talking...'
 			gs 'arousal', 'kiss', 5
@@ -579,7 +579,7 @@ if $ARGS[0] = 'MartinTease2':
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopanties_tease3.jpg"></center>'
 			'With an audience as appreciative as this, how could you possibly stop now?'
 			*nl
-			'Setting the glass, your trusty prop, aside, you pull down what little covers your ' + iif(tatbrst > 0,'tattooed ','') + 'chest and ' + iif(tatblly > 0 and tatbrst = 0,'tattooed ','') +'belly, giving Martin a good look at your <<$pcdesc_breastsrandom>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
+			'Setting the glass, your trusty prop, aside, you pull down what little covers your ' + iif(tatbrst > 0,'tattooed ','') + 'chest and ' + iif(tatblly > 0 and tatbrst = 0,'tattooed ','') +'belly, giving Martin a good look at your <<$pc_desc[''breast'']>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
 			*nl
 			'You lift your arms a little, playing with your <<$pcdesc_hairobjectwordy>> and sticking out your breasts even more.'
 			'No, you <b>really</b> aren''t making it easy for Martin to adhere to his principles regarding celibacy and sexy young women, or whatever it is that''s holding him back from bending you over and nailing you into the fucking counter.'
@@ -649,7 +649,7 @@ if $ARGS[0] = 'MartinTease3':
 	inhib_exp += rand(1,3)
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease1.jpg"></center>'
 	'Feeling in the mood to give Martin a bit of a show today, you give him a soft push, just strong enough to make him get the hint and sit down on the chair behind him.'
-	'You then take a few steps back and slowly bend forward, giving him a generous look at your <<$pcdesc_breastsrandom>> cleavage and <<$pcdesc_legsrandom>> legs as you take off your lower garment.'
+	'You then take a few steps back and slowly bend forward, giving him a generous look at your <<$pc_desc[''breast'']>> cleavage and <<$pcdesc_legsrandom>> legs as you take off your lower garment.'
 	*nl
 	'Martin certainly looks like he likes where this is going, and you have no intention of changing course.'
 	'Without much ado, you smile and pull down your panties as well. Most of your crotch is revealed to him, but your sex is only vaguely perceptible. But taking the initiative like this is fun, and it adds to the thrill to know that you''re standing in the middle of a bar, even if nobody''s gonna enter.'
@@ -706,7 +706,7 @@ if $ARGS[0] = 'MartinTease3':
 			act 'Take off your shirt':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease4.jpg"></center>'
-				'... pull your shirt over your head, revealing your <<$pcdesc_breastsrandom>> breasts to Martin. "And what do you think of my tits?"'
+				'... pull your shirt over your head, revealing your <<$pc_desc[''breast'']>> breasts to Martin. "And what do you think of my tits?"'
 				'Martin leans back, smiling ear to ear, and shows you his crotch in response, and the sight before you adds fuel to the fire in your loins: He is pitching a perfect tent, his pants barely able to contain the cock underneath, and Martin seems very pleased with himself and the world. And why wouldn''t he be? What man his age would be anything but ecstatic to have a pretty young woman strip for him, and only him, and to have her stare at his hard-on in curiosity?'
 				*nl
 				'You could certainly make him, and yourself, even happier, if you wanted to.'
@@ -798,7 +798,7 @@ if $ARGS[0] = 'MartinTease4':
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopanties_tease3.jpg"></center>'
 			'With an audience as appreciative as this, how could you possibly stop now?'
 			*nl
-			'Setting the glass aside, you pull down what little covers your ' + iif(tatbrst > 0,'tattooed ','') + 'chest and ' + iif(tatblly > 0 + tatbrst = 0,'tattooed ','') +'belly, giving Martin a good look at your <<$pcdesc_breastsrandom>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
+			'Setting the glass aside, you pull down what little covers your ' + iif(tatbrst > 0,'tattooed ','') + 'chest and ' + iif(tatblly > 0 + tatbrst = 0,'tattooed ','') +'belly, giving Martin a good look at your <<$pc_desc[''breast'']>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
 			*nl
 			'You lift your arms a little, playing with your <<$pcdesc_hairobjectwordy>> and sticking out your breasts even more.'
 			'Honestly, it wouldn''t have surprised you if he had just bent you over and nailed you into the fucking counter then and there - his eyes are certainly burning with desire enough to tell you that he wants to.'

locations/MartinSex2.qsrc

@@ -277,7 +277,7 @@ if $ARGS[0] = 'MartinSexDyn':
 				!!'But you are having none of it: You lay your own hands on Martin''s and pull them away again, giving Martin a coquette smile' + iif($martinpos='rev_cowgirl',' over your shoulder','') + ' as you do. You demonstratively lift yourself up, up, until only the tip of his <<$dick_girth>> penis is still inside your <<$pcdesc_genitals>>, and hold it there. The message is all too clear: You are in charge right now and you intend to keep it that way.'
 				!!*nl
 				!!'Martin, understanding completely, chuckles and lays back. "This is how you wanna play it, huh? Show me what you''ve got, then."'
-				!!'You comply, slamming down on him, taking his entire length inside once more, evoking a soft groan from your lover. You lift yourself up and, again, slam down in one hard stroke that ' + iif($martinpos='rev_cowgirl','causes your ass to meet Martin''s crotch with an audible slap','bounces your <<$pcdesc_breastsrandom>> breasts up and down as well') + '. Again and again, you penetrate yourself on his <<dick>>cm dick like this, speeding up as you go, filling the empty bar with the sounds of a hard fuck, as well as your and Martin''s moans of pleasure.'
+				!!'You comply, slamming down on him, taking his entire length inside once more, evoking a soft groan from your lover. You lift yourself up and, again, slam down in one hard stroke that ' + iif($martinpos='rev_cowgirl','causes your ass to meet Martin''s crotch with an audible slap','bounces your <<$pc_desc[''breast'']>> breasts up and down as well') + '. Again and again, you penetrate yourself on his <<dick>>cm dick like this, speeding up as you go, filling the empty bar with the sounds of a hard fuck, as well as your and Martin''s moans of pleasure.'
 				!!gs 'arousal', 'vaginal', 8, 'dom'
 				!!gs 'stat'
 			

locations/MartinSex3.qsrc

@@ -37,7 +37,7 @@ if $ARGS[0] = 'MartinBlowTease':
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/blowjob/martinconvincebj<<pic_rand>>.jpg"></center>'
 			'Honestly, you are tired of talking, of subtle hints, of waiting for Martin to notice what you''re getting at. You want him, plain and simple, and you are confident and just slutty enough to chose the easy way to get him.'
 			*nl
-			'Without another, you take a step back and bare your <<$pcdesc_breastsrandom>> breasts to the bartender. Ignoring the sounds he makes, you immediately take the next step and reveal your <<$pcdesc_pubesrandom>> pussy as well before you as much as take a glance at him.' 
+			'Without another, you take a step back and bare your <<$pc_desc[''breast'']>> breasts to the bartender. Ignoring the sounds he makes, you immediately take the next step and reveal your <<$pcdesc_pubesrandom>> pussy as well before you as much as take a glance at him.' 
 			'The look of utter amazement he gives you is priceless, but you are not done yet, not in the slightest.'
 			*nl
 			if pic_rand = 1:

locations/body.qsrc

@@ -8,7 +8,6 @@
 !! There is also a special string, $pcdesc_typeinsertive, that follows the format " , descriptive text" as in, " , invitingly-glossed". Please check the master string document to see if this exists for the string you need. - xerya, July 2017
 
 if $ARGS[0] = '':
-	gs 'body_desc'
 	!!!!!!!!!!!!!!!!
 	!!!!!SIZE AND WEIGHT!!!
 	!!!!!!!!!!!!!!!!
@@ -19,301 +18,7 @@ if $ARGS[0] = '':
 		pcs_bust = (pcs_waist * bratio) / 100 + nbsize + magicf2b + silicone
 		pcs_butt = (pcs_hips / 10) + silicone_butt + butt_cheat
 		pcs_cupsize = pcs_bust - pcs_band
-
-		!! If the PC has vastly less breast tissue than she does silicone, use a slightly more derogatory term. There is actually not a great way to calculate this; silicone counts almost the same on all body types, even though an increase of 200cc, for example, would be vastly
-		!! more noticeable on a thinner body than a heavier one. I have experimented with moving where the silicone is factored in to the body shape calculations, but ultimately there is just no better way to do it than how it is now, given the things that increase the amount
-		!! of silicone in the PC body. The best kludge I can make is working off of stored fat (pcs_weight does actually not do the job at all, as a fat PC and thin PC are almost the same, oddly, in my tests) and making an approximation from there. The amount of the silicone
-		!! variable does not really equate to any particular real-life cc calculation for implant size, so we cannot go off of that. This will have to do for now.
-		pcs_bustdisparity = (silicone/10) - salocatnow
-
-		if pcs_bustdisparity >=1 and pcs_bustdisparity < 2:
-			$pcdesc_breastsqualifier = ''
-			$pcdesc_breastsqualifierinsertive = ''
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		elseif pcs_bustdisparity >= 2 and pcs_bustdisparity < 3:
-			$pcdesc_breastsqualifier = ' semi-spherical'
-			$pcdesc_breastsqualifierinsertive = ', semi-spherical'
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		elseif pcs_bustdisparity >= 3 and pcs_bustdisparity < 4:
-			$pcdesc_breastsqualifier = ' firm and round'
-			$pcdesc_breastsqualifierinsertive = ', firm and round'
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		!! Already we are about as far as a normal, non-fetishistic human being would get -- the maximum size of implant, the XXL, results in 40 silicone, and an extremely thin and well-kept PC will have a minimum salocatnow of 1.
-		!! That means that anything below this line means it was a very intentional move toward sexual objectification, as it could only come from fillable or string implants (and on a thin frame, no less), so we can take some liberties.
-		elseif pcs_bustdisparity >= 4 and pcs_bustdisparity < 5:
-			$pcdesc_breastsqualifier = ' clearly man-made'
-			$pcdesc_breastsqualifierinsertive = ', clearly man-made'
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		elseif pcs_bustdisparity >= 5 and pcs_bustdisparity < 6:
-			$pcdesc_breastsqualifier = ' plastic fuckdoll'
-			$pcdesc_breastsqualifierinsertive = ', plastic fuckdoll'
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		elseif pcs_bustdisparity >= 6 and pcs_bustdisparity < 7:
-			$pcdesc_breastsqualifier = ' walking fucktoy'
-			$pcdesc_breastsqualifierinsertive = ', walking fucktoy'
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		elseif pcs_bustdisparity >= 7 and pcs_bustdisparity < 8:
-			$pcdesc_breastsqualifier = ' laughably overdone fuckdoll'
-			$pcdesc_breastsqualifierinsertive = ', laughably overdone fuckdoll'
-			$pcdesc_breastsword = 'bolt-ons'
-			pcdesc_breastimplantcheck = 1
-		elseif pcs_bustdisparity >= 8:
-			$pcdesc_breastsqualifier = ' <<$pcdesc_haircolourwordy>> overdone fuckdoll'
-			$pcdesc_breastsqualifierinsertive = ', <<$pcdesc_haircolourwordy>> overdone fuckdoll'
-			$pcdesc_breastsword = 'bolt-ons'
-			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'
-			else
-				$pcdesc_breastsword = 'tits'
-			end
-			$pcdesc_breastsqualifier = ''
-			$pcdesc_breastsqualifierinsertive = ''
-			pcdesc_breastimplantcheck = 1
-		!! For all-natural PCs.
-		else
-			if pcs_cupsize <= 30:$pcdesc_breastsword = 'breasts'
-			if pcs_cupsize > 30:$pcdesc_breastsword = 'tits'
-			$pcdesc_breastsqualifier = ''
-			$pcdesc_breastsqualifierinsertive = ''
-			pcdesc_breastimplantcheck = 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'
-		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'
-			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>>'
-			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'
-			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'
-			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'
-			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>>'
-			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'
-			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'
-			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'
-			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'
-			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
-			$titsize = 'H cup'
-			rand_breasts = rand(0,1)
-			if rand_breasts = 0:
-				$pcdesc_breastsrandom = 'extremely large'
-			elseif rand_breasts = 1:
-				$pcdesc_breastsrandom = 'incredibly stacked'
-			end
-			if pcdesc_breastimplantcheck = 1:
-				$pcdesc_breastswordy = 'extremely large, silicone-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-			else
-				$pcdesc_breastswordy = 'extremely large, over-stacked <<$pcdesc_breastsword>>'
-			end
-			$pcdesc_breasts = 'extremely large'
-		elseif pcs_cupsize <= 50:
-			tits = 9
-			$titsize = 'I cup'
-			rand_breasts = rand(0,2)
-			if rand_breasts = 0:
-				$pcdesc_breastsrandom = 'huge'
-			elseif rand_breasts = 1:
-				$pcdesc_breastsrandom = 'impractically big'
-			elseif rand_breasts = 2:
-				$pcdesc_breastsrandom = 'figure-dominating'
-			end
-			if pcdesc_breastimplantcheck = 1:
-				$pcdesc_breastswordy = 'huge, silicone-swollen<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-			else
-				$pcdesc_breastswordy = 'huge, wholly impractical <<$pcdesc_breastsword>>'
-			end
-			$pcdesc_breasts = 'huge'
-		elseif pcs_cupsize <= 55:
-			tits = 10
-			$titsize = 'J cup'
-			rand_breasts = rand(0,1)
-			if rand_breasts = 0:
-				$pcdesc_breastsrandom = 'massive'
-			elseif rand_breasts = 1:
-				$pcdesc_breastsrandom = 'enormous'
-			end
-			if pcdesc_breastimplantcheck = 1:
-				$pcdesc_breastswordy = 'massively fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-			else
-				$pcdesc_breastswordy = 'massive, attention-grabbing <<$pcdesc_breastsword>>'
-			end
-			$pcdesc_breasts = 'massive'
-		else
-			tits = 11
-			$titsize = 'K cup'
-			rand_breasts = rand(0,2)
-			if rand_breasts = 0:
-				$pcdesc_breastsrandom = 'whorishly oversized'
-			elseif rand_breasts = 1:
-				$pcdesc_breastsrandom = 'fucktoy-appropriate'
-			elseif rand_breasts = 2:
-				$pcdesc_breastsrandom = 'ridiculously big'
-			end
-			if pcdesc_breastimplantcheck = 1:
-				$pcdesc_breastswordy = 'whorishly oversized<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
-			else
-				$pcdesc_breastswordy = 'ridiculously big and figure-dominating <<$pcdesc_breastsword>>'
-			end
-			$pcdesc_breasts = 'whorishly oversized'
-		end
-		if pcs_butt <= 4:
-			buttpic = 1
-			$pcs_butt_adj1 = 'flat ass'
-			$pcs_butt_adj2 = 'flat butt'
-			$pcs_butt = 'Your <a href="exec:view''images/pc/body/ass/1.jpg''">ass</a> is square and as flat as a plank. It can be considered very masculine looking and isn''t very impressive.'
-		elseif pcs_butt <= 8: 
-			buttpic = 2
-			$pcs_butt_adj1 = 'ass'
-			$pcs_butt_adj2 = 'butt'
-			$pcs_butt = 'You have an average, feminine looking <a href="exec:view''images/pc/body/ass/2.jpg''">ass</a>. While it''s not flat, it''s nothing special either.'
-		elseif pcs_butt <= 12: 
-			buttpic = 3
-			$pcs_butt_adj1 = 'tight ass'
-			$pcs_butt_adj2 = 'nice ass'
-			$pcs_butt = 'Your tight <a href="exec:view''images/pc/body/ass/3.jpg''">ass</a> is a little bigger, rounder and firmer than average. You often draw the stares of guys around you.'
-		elseif pcs_butt <= 16: 
-			buttpic = 4
-			$pcs_butt_adj1 = 'fat ass'
-			$pcs_butt_adj2 = 'bubble butt'
-			$pcs_butt = 'You have a large and natural bubble <a href="exec:view''images/pc/body/ass/4.jpg''">butt</a> that jiggles and sways as you walk. Guys hungrily fixate on you with their tongues hanging out and other girls are often envious of your booty.'
-        end
-		if silicone_butt > 0:
-			buttpic = 4
-			$pcs_butt = 'Through the use of implants, you have given yourself a jiggly bubble <a href="exec:view''images/pc/body/ass/4.jpg''">butt</a> that attracts the attention of the people around you. It might be fake, but you''ve got some junk in the trunk.'
-		end
-
-		!! 'Thanks to the workouts you''ve been doing, you have gained a large and natural bubble butt that''s rounded and very firm. Guys hungrily fixate on you with their tongues hanging out and other girls are often envious of your booty.'
-
 		
-
 		!!pcs_weight: Svetas weight in kg 
 		!!Optimal Weight (170cm): 60kg, 60 salo
 		!!This is an approximation, so that a sveta with a different height has the same BMI for the same salo values.
@@ -352,9 +57,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	!!! Maruda Hair Mod
-
-	!! Appearance factors and calculations
+	gs 'body_desc'
 
 	!! Skin1 is only used in the foto location, and can be replaced at a later date. From here on out, do not use it.
 	if pcs_skin > 100:

locations/body_desc.qsrc

@@ -5,6 +5,7 @@ if $ARGS[0] = '':
     gs $this, 'throat'
     gs $this, 'pussy'
     gs $this, 'anus'
+	if dounspell = 0: gs $this, 'butt' & gs $this, 'breasts'
 	gs $this, 'lips'
 	gs $this, 'hair'
     gs $this, 'tan'
@@ -177,6 +178,223 @@ if $ARGS[0] = 'anus':
     killvar 'rand_anus'
 end
 
+if $ARGS[0] = 'breasts':
+	!! If the PC has vastly less breast tissue than she does silicone, use a slightly more derogatory term. There is actually not a great way to calculate this; silicone counts almost the same on all body types, even though an increase of 200cc, for example, would be vastly
+	!! more noticeable on a thinner body than a heavier one. I have experimented with moving where the silicone is factored in to the body shape calculations, but ultimately there is just no better way to do it than how it is now, given the things that increase the amount
+	!! of silicone in the PC body. The best kludge I can make is working off of stored fat (pcs_weight does actually not do the job at all, as a fat PC and thin PC are almost the same, oddly, in my tests) and making an approximation from there. The amount of the silicone
+	!! variable does not really equate to any particular real-life cc calculation for implant size, so we cannot go off of that. This will have to do for now.
+	pcs_bustdisparity = (silicone/10) - salocatnow
+
+	if pcs_bustdisparity >=1 and pcs_bustdisparity < 2:
+		$pcdesc_breastsqualifierinsertive = ''
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	elseif pcs_bustdisparity >= 2 and pcs_bustdisparity < 3:
+		$pcdesc_breastsqualifierinsertive = ', semi-spherical'
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	elseif pcs_bustdisparity >= 3 and pcs_bustdisparity < 4:
+		$pcdesc_breastsqualifierinsertive = ', firm and round'
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	!! Already we are about as far as a normal, non-fetishistic human being would get -- the maximum size of implant, the XXL, results in 40 silicone, and an extremely thin and well-kept PC will have a minimum salocatnow of 1.
+	!! That means that anything below this line means it was a very intentional move toward sexual objectification, as it could only come from fillable or string implants (and on a thin frame, no less), so we can take some liberties.
+	elseif pcs_bustdisparity >= 4 and pcs_bustdisparity < 5:
+		$pcdesc_breastsqualifierinsertive = ', clearly man-made'
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	elseif pcs_bustdisparity >= 5 and pcs_bustdisparity < 6:
+		$pcdesc_breastsqualifierinsertive = ', plastic fuckdoll'
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	elseif pcs_bustdisparity >= 6 and pcs_bustdisparity < 7:
+		$pcdesc_breastsqualifierinsertive = ', walking fucktoy'
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	elseif pcs_bustdisparity >= 7 and pcs_bustdisparity < 8:
+		$pcdesc_breastsqualifierinsertive = ', laughably overdone fuckdoll'
+		$pcdesc_breastsword = 'bolt-ons'
+		pcdesc_breastimplantcheck = 1
+	elseif pcs_bustdisparity >= 8:
+		$pcdesc_breastsqualifierinsertive = ', <<$pcdesc_haircolourwordy>> overdone fuckdoll'
+		$pcdesc_breastsword = 'bolt-ons'
+		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'
+		else
+			$pcdesc_breastsword = 'tits'
+		end
+		$pcdesc_breastsqualifierinsertive = ''
+		pcdesc_breastimplantcheck = 1
+	!! For all-natural PCs.
+	else
+		if pcs_cupsize <= 30:$pcdesc_breastsword = 'breasts'
+		if pcs_cupsize > 30:$pcdesc_breastsword = 'tits'
+		$pcdesc_breastsqualifierinsertive = ''
+		pcdesc_breastimplantcheck = 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'
+	else
+		$pcdesc_breastsfakeinsertive = ''
+	end
+
+	if pcs_cupsize <= 5:
+		tits = 0
+		$titsize = 'AA cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'tiny', 'barely-there')
+
+		!! Honestly, I am not even sure it is possible to have silicone and be this small. But just in case...
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'scarcely-augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = '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'
+		elseif rand_breasts = 1:
+			$pcdesc_breastsrandom = 'smaller than a handful'
+		end
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'petite', 'smaller than a handful')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'barely modified<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'petite, puffy little <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'petite'
+	elseif pcs_cupsize <= 15:
+		tits = 2
+		$titsize = 'B cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'small', 'sporty')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'small, subtly augmented<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'small, handful-sized <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'small'
+	elseif pcs_cupsize <= 20:
+		tits = 3
+		$titsize = 'C cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'ample', 'average-sized')
+		!! 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:
+			$pc_descWordy['breast'] = 'ample, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'ample, handful-sized <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'ample'
+	elseif pcs_cupsize <= 25:
+		tits = 4
+		$titsize = 'D cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'full', 'hefty')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'full, silicone-padded<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'jiggly, womanly full <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'full'
+	elseif pcs_cupsize <= 30:
+		tits = 5
+		$titsize = 'E cup'
+		$pc_desc['breast'] = func($this, 'generous', 'heavy', 'fairly large')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'heavy, fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = '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'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'big', 'large')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'big, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'big, jiggly and sizeable <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'big'
+	elseif pcs_cupsize <= 40:
+		tits = 7
+		$titsize = 'G cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'considerably large', 'quite large')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'considerably large, implant-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'quite large and jiggly <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'considerably large'
+	elseif pcs_cupsize <= 45:
+		tits = 8
+		$titsize = 'H cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'extremely large', 'incredibly stacked')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'extremely large, silicone-stuffed<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'extremely large, over-stacked <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'extremely large'
+	elseif pcs_cupsize <= 50:
+		tits = 9
+		$titsize = 'I cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'huge', 'impractically big', 'figure-dominating')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'huge, silicone-swollen<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'huge, wholly impractical <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'huge'
+	elseif pcs_cupsize <= 55:
+		tits = 10
+		$titsize = 'J cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'massive', 'enormous')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'massively fake<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'massive, attention-grabbing <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'massive'
+	else
+		tits = 11
+		$titsize = 'K cup'
+		$pc_desc['breast'] = func($this, 'ChooseDescWord', 'whorishly oversized', 'fucktoy-appropriate','ridiculously big')
+		if pcdesc_breastimplantcheck = 1:
+			$pc_descWordy['breast'] = 'whorishly oversized<<$pcdesc_breastsqualifierinsertive>> <<$pcdesc_breastsword>>'
+		else
+			$pc_descWordy['breast'] = 'ridiculously big and figure-dominating <<$pcdesc_breastsword>>'
+		end
+		$pcdesc_breasts = 'whorishly oversized'
+	end
+end
+
+if $ARGS[0] = 'butt':
+	!natural butt
+	if pcs_butt <= 4: 
+		$pcs_butt = 'Your <a href="exec:view''images/pc/body/ass/1.jpg''">ass</a> is square and as flat as a plank.  It can be considered very masculine looking and isn''t very impressive.'
+	elseif pcs_butt <= 8: 
+		$pcs_butt = 'You have an average, feminine looking <a href="exec:view''images/pc/body/ass/2.jpg''">ass</a>. While it''s not flat, it''s nothing special either.'
+	elseif pcs_butt <= 12: 
+		$pcs_butt = 'Your tight <a href="exec:view''images/pc/body/ass/3.jpg''">ass</a> is a little bigger, rounder and firmer than average. You often draw the stares of guys around you.'
+	elseif pcs_butt <= 16: 
+		$pcs_butt = 'You have a large and natural bubble <a href="exec:view''images/pc/body/ass/4.jpg''">butt</a> that jiggles and sways as you walk. Guys hungrily fixate on you with their tongues hanging out and other girls are often envious of your booty.'
+	end
+
+	!have butt implant
+	if silicone_butt > 0:
+		buttpic = 4
+		$pcs_butt = 'Through the use of implants, you have given yourself a jiggly bubble <a href="exec:view''images/pc/body/ass/4.jpg''">butt</a> that attracts the attention of the people around you. It might be fake, but you''ve got some junk in the trunk.'
+	end
+end
+
 if $ARGS[0] = 'lips':
 	if pcs_lip <= 0:
 		pcs_lip = 0
@@ -209,7 +427,6 @@ if $ARGS[0] = 'lips':
 		$pc_desc['lip glossed'] = 'glossed'
 		if pcs_lip = 1:
 			$pcs_lipbalm = 'shiny'
-
 			$pc_descWordy['lip glossed'] = 'gloss-slicked'
 		elseif pcs_lip = 2:
 			$pcs_lipbalm = 'brilliant and juicy'

locations/qwBarBilliard.qsrc

@@ -294,7 +294,7 @@ if $ARGS[0] = 'billiard_ev1':
 									'You bob your head '+ iif(stat['bj']>20,'confidently','reluctantly, still trying to figure blowjobs out') + iif(stat['bj']>40,' and with wild abandon','') + ' and run your <<$pcdesc_tongue>> around it to stimulate him as much as you can.'
 									*nl
 									'You''re not sure if the prospect of getting caught here with a cock in your mouth terrifies or excites you more, but you don''t really feel the need to find out which it is.'
-									$orgasm_txt = 'But you do anyway: It''s the latter. As you unconsciously knead your <<$pcdesc_breastsrandom>> breasts through your top, the heat between your legs grows and spreads to your belly. You moan around Martin''s cock as the orgasm overcomes you. You don''t have to look up to see the self-satisfied expression on Martin''s face when he realizes that you came from sucking his cock...'
+									$orgasm_txt = 'But you do anyway: It''s the latter. As you unconsciously knead your <<$pc_desc[''breast'']>> breasts through your top, the heat between your legs grows and spreads to your belly. You moan around Martin''s cock as the orgasm overcomes you. You don''t have to look up to see the self-satisfied expression on Martin''s face when he realizes that you came from sucking his cock...'
 									gs 'arousal', 'bj', 5, 'exhibitionism'
 									gs 'stat'
 									killvar '$martinpos'