[Refactored] Refactored clit, nipples, pubes, and legs description

locations/body_desc.qsrc

@@ -889,124 +889,50 @@ end
 if $ARGS[0] = 'nipples':
     if pcs_nips < 20:
 		$nipplesize = 'You have average <a href="exec:view''images/pc/body/nipples/nipples1.jpg''">nipples</a>.'
-		rand_nipples = rand(0,2)
-		if rand_nipples = 0:
-			$pcdesc_nipplesrandom = 'small'
-		elseif rand_nipples = 1:
-			$pcdesc_nipplesrandom = 'tiny'
-		elseif rand_nipples = 2:
-			$pcdesc_nipplesrandom = 'little'
-		end
-		$pcdesc_nipples = 'small'
-		$pcdesc_nippleswordy = 'small, tiny'
+		$pc_desc['nipples'] = func($this, 'ChooseDescWord', 'small', 'tiny', 'little')
+		$pc_descWordy['nipples'] = 'small, tiny'
 	elseif pcs_nips >= 20 and pcs_nips < 40:
 		$nipplesize = 'Your <a href="exec:view''images/pc/body/nipples/nipples2.jpg''">nipples</a> are slightly on the large side.'
-		rand_nipples = rand(0,1)
-		if rand_nipples = 0:
-			$pcdesc_nipplesrandom = 'slightly large'
-		elseif rand_nipples = 1:
-			$pcdesc_nipplesrandom = 'decently-sized'
-		end
-		$pcdesc_nipples = 'slightly large'
-		$pcdesc_nippleswordy = 'slightly large'
+		$pc_desc['nipples'] = func($this, 'ChooseDescWord', 'slightly large', 'decently-sized')
+		$pc_descWordy['nipples'] = 'slightly large'
 	elseif pcs_nips >= 40 and pcs_nips < 60:
 		$nipplesize = 'You have large, puffy <a href="exec:view''images/pc/body/nipples/nipples3.jpg''">nipples</a>.'
-		rand_nipples = rand(0,2)
-		if rand_nipples = 0:
-			$pcdesc_nipplesrandom = 'puffy'
-		elseif rand_nipples = 1:
-			$pcdesc_nipplesrandom = 'swollen'
-		elseif rand_nipples = 2:
-			$pcdesc_nipplesrandom = 'large'
-		end
-		$pcdesc_nipples = 'puffy'
-		$pcdesc_nippleswordy = 'large, puffy'
+		$pc_desc['nipples'] = func($this, 'ChooseDescWord', 'puffy', 'swollen', 'large')
+		$pc_descWordy['nipples'] = 'large, puffy'
 	elseif pcs_nips >= 60 and pcs_nips < 80:
 		$nipplesize = 'Your <a href="exec:view''images/pc/body/nipples/nipples4.jpg''">nipples</a> are the size of radio knobs.'
-		rand_nipples = rand(0,1)
-		if rand_nipples = 0:
-			$pcdesc_nipplesrandom = 'big'
-		elseif rand_nipples = 1:
-			$pcdesc_nipplesrandom = 'thick'
-		end
-		$pcdesc_nipples = 'big'
-		$pcdesc_nippleswordy = 'big, thick'
+		$pc_desc['nipples'] = func($this, 'ChooseDescWord', 'big', 'thick')
+		$pc_descWordy['nipples'] = 'big, thick'
 	else
 		!! If greater or equal to 80
 		$nipplesize = 'You have huge <a href="exec:view''images/pc/body/nipples/nipples5.jpg''">nipples</a>.'
-		rand_nipples = rand(0,3)
-		if rand_nipples = 0:
-			$pcdesc_nipplesrandom = 'huge'
-		elseif rand_nipples = 1:
-			$pcdesc_nipplesrandom = 'unmistakably big'
-		elseif rand_nipples = 2:
-			$pcdesc_nipplesrandom = 'meaty'
-		elseif rand_nipples = 3:
-			$pcdesc_nipplesrandom = 'enormous'
-		end
-		$pcdesc_nipples = 'meaty'
-		$pcdesc_nippleswordy = 'huge, meaty'
+		$pc_desc['nipples'] = func($this, 'ChooseDescWord', 'enormous', 'meaty', 'huge', 'unmistakably big')
+		$pc_descWordy['nipples'] = 'huge, meaty'
 	end
     killvar 'rand_nipples'
 end
 
 if $ARGS[0] = 'clit':
     if clit_size < 20:
-		rand_clit = rand(0,1)
-		if rand_clit = 0:
-			$pcdesc_clitrandom = 'small'
-		elseif rand_clit = 1:
-			$pcdesc_clitrandom = 'tiny'
-		end
-		$pcdesc_clit = 'small'
-		$pcdesc_clitwordy = 'small, oft-hidden'
+		$pc_descWordy['clit'] = 'small, oft-hidden'
+		$pc_desc['clit'] = func($this, 'ChooseDescWord', 'small', 'tiny')
 		$clitsize = 'You consider your <a href="exec:view''images/pc/body/clit/clit1.jpg''">clitoris</a> to be of an average size.'
 	elseif clit_size >= 20 and clit_size < 40:
-		rand_clit = rand(0,2)
-		if rand_clit = 0:
-			$pcdesc_clitrandom = 'large'
-		elseif rand_clit = 1:
-			$pcdesc_clitrandom = 'big'
-		elseif rand_clit = 2:
-			$pcdesc_clitrandom = 'engorged'
-		end
-		$pcdesc_clit = 'big'
-		$pcdesc_clitwordy = 'big, easily-found'
+		$pc_descWordy['clit'] = 'big, easily-found'
+		$pc_desc['clit'] = func($this, 'ChooseDescWord', 'large', 'big', 'engorged')
 		$clitsize = 'You feel your <a href="exec:view''images/pc/body/clit/clit2.jpg''">clitoris</a> is somewhat on the large side.'
 	elseif clit_size >= 40 and clit_size < 60:
-		rand_clit = rand(0,2)
-		if rand_clit = 0:
-			$pcdesc_clitrandom = 'meaty'
-		elseif rand_clit = 1:
-			$pcdesc_clitrandom = 'thick'
-		elseif rand_clit = 2:
-			$pcdesc_clitrandom = 'swollen'
-		end
-		$pcdesc_clit = 'meaty'
-		$pcdesc_clitwordy = 'thick, meaty'
+		$pc_descWordy['clit'] = 'thick, meaty'
+		$pc_desc['clit'] = func($this, 'ChooseDescWord', 'meaty', 'thick', 'swollen')
 		$clitsize = 'Your <a href="exec:view''images/pc/body/clit/clit3.jpg''">clit</a> is quite large.'
 	elseif clit_size >= 60 and clit_size < 80:
-		rand_clit = rand(0,1)
-		if rand_clit = 0:
-			$pcdesc_clitrandom = 'oversized'
-		elseif rand_clit = 1:
-			$pcdesc_clitrandom = 'huge'
-		end
-		$pcdesc_clit = 'oversized'
-		$pcdesc_clitwordy = 'big, practically phallic'
+		$pc_descWordy['clit'] = 'big, practically phallic'
+		$pc_desc['clit'] = func($this, 'ChooseDescWord', 'oversized', 'huge')
 		$clitsize = 'You have a big <a href="exec:view''images/pc/body/clit/clit4.jpg''">clit</a> that resembles a penis.'
 	else
 		!! If greater or equal to 80
-		rand_clit = rand(0,2)
-		if rand_clit = 0:
-			$pcdesc_clitrandom = 'huge'
-		elseif rand_clit = 1:
-			$pcdesc_clitrandom = 'cock-like'
-		elseif rand_clit = 2:
-			$pcdesc_clitrandom = 'massive'
-		end
-		$pcdesc_clit = 'phallic'
-		$pcdesc_clitwordy = 'enormous, phallic'
+		$pc_desc['clit'] = func($this, 'ChooseDescWord', 'huge', 'massive', 'cock-like')
+		$pc_descWordy['clit'] = 'enormous, phallic'
 		$clitsize = 'Your <a href="exec:view''images/pc/body/clit/clit5.jpg''">clit</a> is so large it can be mistaken for a penis.'
 	end
     killvar 'rand_clit'
@@ -1017,44 +943,18 @@ if $ARGS[0] = 'pubes':
 		if pcs_pubes <= 3:
 			lobkoef = 3 
 			$pcs_pubes = 'You have a smoothly <a href="exec:view''<<FUNC(''$pube_image'')>>''">shaved pussy</a>. <<$pirspiz>><br><<$clitsize>>'
-			rand_pubes = rand(0,3)
-			if rand_pubes = 0:
-				$pcdesc_pubesrandom = 'silky'
-			elseif rand_pubes = 1:
-				$pcdesc_pubesrandom = 'hairless'
-			elseif rand_pubes = 2:
-				$pcdesc_pubesrandom = 'smooth-shaven'
-			elseif rand_pubes = 3:
-				$pcdesc_pubesrandom = 'freshly-shaven'
-			end
-			$pcdesc_pubes = 'smooth-shaven'
-			$pcdesc_pubeswordy = 'silky, freshly-shaven'
+			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'silky', 'hairless', 'smooth-shaven', 'freshly-shaven')
+			$pc_descWordy['pubes'] = 'silky, freshly-shaven'
 		elseif pcs_pubes <= 10:
 			lobkoef = 0
 			$pcs_pubes = 'You have stubble growing around your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
-			rand_pubes = rand(0,2)
-			if rand_pubes = 0:
-				$pcdesc_pubesrandom = 'stubbly'
-			elseif rand_pubes = 1:
-				$pcdesc_pubesrandom = 'scratchy'
-			elseif rand_pubes = 2:
-				$pcdesc_pubesrandom = 'roughly-stubbled'
-			end
-			$pcdesc_pubes = 'stubbly'
-			$pcdesc_pubeswordy = 'scratchy, roughly-stubbled'
+			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'stubbly', 'scratchy', 'roughly-stubbled')
+			$pc_descWordy['pubes'] = 'scratchy, roughly-stubbled'
 		elseif pcs_pubes <= 15:
 			lobkoef = 0
 			$pcs_pubes = 'You have a tidy patch of hair growing above your <a href="exec:view''<<FUNC(''$pube_image'')>>''">pussy</a>. <<$pirspiz>><br><<$clitsize>>'
-			rand_pubes = rand(0,2)
-			if rand_pubes = 0:
-				$pcdesc_pubesrandom = 'almost bare'
-			elseif rand_pubes = 1:
-				$pcdesc_pubesrandom = 'barely-haired'
-			elseif rand_pubes = 2:
-				$pcdesc_pubesrandom = 'well-kept'
-			end
-			$pcdesc_pubes = 'stubbly'
-			$pcdesc_pubeswordy = 'scratchy, roughly-stubbled'
+			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'almost bare', 'barely-haired', 'well-kept')
+			$pc_descWordy['pubes'] = 'scratchy, roughly-stubbled'
 		elseif pcs_pubes <= 25:
 			lobkoef = 0
 			if pubestyle = 9:
@@ -1068,58 +968,22 @@ if $ARGS[0] = 'pubes':
 			else
 				$pcs_pubes = 'You have a bushy but well-maintained mat of <a href="exec:view''<<FUNC(''$pube_image'')>>''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
 			end
-			rand_pubes = rand(0,3)
-			if rand_pubes = 0:
-				$pcdesc_pubesrandom = 'wispy-haired'
-			elseif rand_pubes = 1:
-				$pcdesc_pubesrandom = 'lightly-furred'
-			elseif rand_pubes = 2:
-				$pcdesc_pubesrandom = 'trimmed'
-			elseif rand_pubes = 3:
-				$pcdesc_pubesrandom = 'well-maintained'
-			end
-			$pcdesc_pubes = 'neatly-trimmed'
-			$pcdesc_pubeswordy = 'trimmed, well-kept'
+			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'wispy-haired', 'lightly-furred', 'trimmed', 'well-maintained')
+			$pc_descWordy['pubes'] = 'trimmed, well-kept'
 		elseif pcs_pubes <= 30:
 			lobkoef = 0
 			$pcs_pubes = 'You have a bushy but well-maintained mat of <a href="exec:view''<<FUNC(''$pube_image'')>>''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
-			rand_pubes = rand(0,2)
-			if rand_pubes = 0:
-				$pcdesc_pubesrandom = 'furred'
-			elseif rand_pubes = 1:
-				$pcdesc_pubesrandom = 'bushy'
-			elseif rand_pubes = 2:
-				$pcdesc_pubesrandom = 'partially-maintained'
-			end
-			$pcdesc_pubes = 'bushy'
-			$pcdesc_pubeswordy = 'bushy, thick'
+			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'furred', 'bushy', 'partially-maintained')
+			$pc_descWordy['pubes'] = 'bushy, thick'
 		elseif pcs_pubes >= 40:
 			lobkoef = 0
 			$pcs_pubes = 'You have a wild and unkempt jungle of <a href="exec:view''<<FUNC(''$pube_image'')>>''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
-			rand_pubes = rand(0,2)
-			if rand_pubes = 0:
-				$pcdesc_pubesrandom = 'thickly-furred'
-			elseif rand_pubes = 1:
-				$pcdesc_pubesrandom = 'very hairy'
-			elseif rand_pubes = 2:
-				$pcdesc_pubesrandom = 'ill-maintained'
-			end
-			$pcdesc_pubes = 'hairy'
-			$pcdesc_pubeswordy = 'hairy, wild-maned'
+			$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'thickly-furred', 'very hairy', 'ill-maintained')
+			$pc_descWordy['pubes'] = 'hairy, wild-maned'
 		end
     elseif lashair = 1:
-        rand_pubes = rand(0,3)
-		if rand_pubes = 0:
-			$pcdesc_pubesrandom = 'silky-smooth'
-		elseif rand_pubes = 1:
-			$pcdesc_pubesrandom = 'hairless'
-		elseif rand_pubes = 2:
-			$pcdesc_pubesrandom = 'smooth'
-		elseif rand_pubes = 3:
-			$pcdesc_pubesrandom = 'bald'
-		end
-		$pcdesc_pubes = 'hairless'
-		$pcdesc_pubeswordy = 'eternally silky-smooth'
+		$pc_desc['pubes'] = func($this, 'ChooseDescWord', 'hairless', 'smooth', 'bald', 'silky-smooth')
+		$pc_descWordy['pubes'] = 'eternally silky-smooth'
 		$pcs_pubes = 'You have a smooth, <a href="exec:view''<<FUNC(''$pube_image'')>>''">bald pussy</a>. <<$pirspiz>><br><<$clitsize>>'
 	end
     killvar 'rand_pubes'
@@ -1127,51 +991,23 @@ end
 
 if $ARGS[0] = 'legs':
     if pcs_leghair <= 0:
-		rand_legs = rand(0,2)
-		if rand_legs = 0:
-			$pcdesc_legsrandom = 'smooth'
-		elseif rand_legs = 1:
-			$pcdesc_legsrandom = 'silky'
-		elseif rand_legs = 2:
-			$pcdesc_legsrandom = 'soft'
-		end
-		$pcdesc_legs = 'smooth'
-		$pcdesc_legswordy = 'soft and silky-smooth'
+		$pc_desc['legs'] = func($this, 'ChooseDescWord', 'smooth', 'silky', 'soft')
+		$pc_descWordy['legs'] = 'soft and silky-smooth'
 		legkoef = 0
 		$pcs_leghair = 'You have smooth legs.'
 	elseif pcs_leghair <= 3:
-		rand_legs = rand(0,1)
-		if rand_legs = 0:
-			$pcdesc_legsrandom = 'slightly scratchy'
-		elseif rand_legs = 1:
-			$pcdesc_legsrandom = 'faintly stubbly'
-		end
-		$pcdesc_legs = 'faintly stubbly'
-		$pcdesc_legswordy = 'slightly rough, invisibly-stubbled'
+		$pc_desc['legs'] = func($this, 'ChooseDescWord', 'slightly scratchy', 'faintly stubbly')
+		$pc_descWordy['legs'] = 'slightly rough, invisibly-stubbled'
 		legkoef = 3
 		$pcs_leghair = 'You can''t see any hair, but your legs feel rough to the touch.'
 	elseif pcs_leghair <= 6:
-		rand_legs = rand(0,1)
-		if rand_legs = 0:
-			$pcdesc_legsrandom = 'somewhat hairy'
-		elseif rand_legs = 1:
-			$pcdesc_legsrandom = 'lightly-furred'
-		end
-		$pcdesc_legs = 'slightly hairy'
-		$pcdesc_legswordy = 'lightly-furred, soft-haired'
+		$pc_desc['legs'] = func($this, 'ChooseDescWord', 'somewhat hairy', 'lightly-furred')
+		$pc_descWordy['legs'] = 'lightly-furred, soft-haired'
 		legkoef = 6
 		$pcs_leghair = 'You have light and just barely visible hair on your legs.'
 	else
-		rand_legs = rand(0,2)
-		if rand_legs = 0:
-			$pcdesc_legsrandom = 'hairy'
-		elseif rand_legs = 1:
-			$pcdesc_legsrandom = 'unshaven'
-		elseif rand_legs = 2:
-			$pcdesc_legsrandom = 'ungroomed'
-		end
-		$pcdesc_legs = 'hairy'
-		$pcdesc_legswordy = 'hairy, unshaven'
+		$pc_desc['legs'] = func($this, 'ChooseDescWord', 'hairy', 'unshaven', 'ungroomed')
+		$pc_descWordy['legs'] = 'hairy, unshaven'
 		legkoef = 9
 		$pcs_leghair = 'Your legs are hairy.'
 	end