Browse Source

[edit] added random pussy and anus images dependant on pcs_vag and pcs_ass

CroWke 4 years ago
parent
commit
f8adaf658c
1 changed files with 36 additions and 50 deletions
  1. 36 50
      locations/body.qsrc

+ 36 - 50
locations/body.qsrc

@@ -62,15 +62,13 @@ 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.'
+	$pcs_vag = 'Your virgin <a href="exec:view''images/pc/body/pussy/stage0/' + rand(1,5) + '.jpg''">pussy</a> still has its hymen intact.'
 	$pcdesc_pussyrandom = 'virgin'
 	$pcdesc_pussy = 'virgin'
 	$pcdesc_pussywordy = 'virgin'
 	$vaginatipe = 'virgin'
 elseif pcs_vag <= 5:
-	puspic = 1
-	$pcs_vag = 'You have an inexperienced <a href="exec:view''images/pc/body/pussy/vag1.jpg''">pussy</a>.'
+	$pcs_vag = 'You have an inexperienced <a href="exec:view''images/pc/body/pussy/stage1/' + rand(1,5) + '.jpg''">pussy</a>.'
 	rand_pussy = rand(0,2)
 	if rand_pussy = 0:
 		$pcdesc_pussyrandom = 'narrow'
@@ -83,8 +81,7 @@ elseif pcs_vag <= 5:
 	$pcdesc_pussywordy = 'squeezingly tight and narrow'
 	$vaginatipe = 'narrow'
 elseif pcs_vag <= 10:
-	puspic = 2
-	$pcs_vag = 'You have a tight <a href="exec:view''images/pc/body/pussy/vag1.jpg''">pussy</a>.'
+	$pcs_vag = 'You have a tight <a href="exec:view''images/pc/body/pussy/stage2/' + rand(1,5) + '.jpg''">pussy</a>.'
 	rand_pussy = rand(0,1)
 	if rand_pussy = 0:
 		$pcdesc_pussyrandom = 'snug'
@@ -95,8 +92,7 @@ elseif pcs_vag <= 10:
 	$pcdesc_pussywordy = 'youthfully tight'
 	$vaginatipe = 'tight'
 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.'
+	$pcs_vag = 'Your <a href="exec:view''images/pc/body/pussy/stage3/' + rand(1,5) + '.jpg''">vagina</a> is used to taking normal sized insertions.'
 	rand_pussy = rand(0,2)
 	if rand_pussy = 0:
 		$pcdesc_pussyrandom = 'elastic'
@@ -109,8 +105,7 @@ elseif pcs_vag <= 15:
 	$pcdesc_pussywordy = 'seasoned, pliable and tight'
 	$vaginatipe = 'pliable'
 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>.'
+	$pcs_vag = 'You have a well-developed <a href="exec:view''images/pc/body/pussy/stage4/' + rand(1,5) + '.jpg''">vagina</a>.'
 	rand_pussy = rand(0,3)
 	if rand_pussy = 0:
 		$pcdesc_pussyrandom = 'welcoming'
@@ -124,10 +119,13 @@ elseif pcs_vag <= 25:
 	$pcdesc_pussy = 'experienced'
 	$pcdesc_pussywordy = 'experienced, welcoming'
 	$vaginatipe = 'experienced'
-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)
+else
+	if rand(0,1) = 0:
+		$pcs_vag = 'Your regularly-fucked <a href="exec:view''images/pc/body/pussy/stage5/' + rand(1,5) + '.jpg''">playground</a> can take most things you force up there.'
+	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.'
+	end
+	rand_pussy = rand(0,6)
 	if rand_pussy = 0:
 		$pcdesc_pussyrandom = 'eager and hungry'
 	elseif rand_pussy = 1:
@@ -136,38 +134,30 @@ elseif pcs_vag <= 35:
 		$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'
-else
-	puspic = 6
-	$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:
+	elseif rand_pussy = 4:
 		$pcdesc_pussyrandom = 'always-ready'
-	elseif rand_pussy = 1:
+	elseif rand_pussy = 5:
 		$pcdesc_pussyrandom = 'near daily-stuffed'
-	elseif rand_pussy = 2:
+	elseif rand_pussy = 6:
 		$pcdesc_pussyrandom = 'overeager, ever-popular'
 	end
 	$pcdesc_pussy = 'overeager'
 	$pcdesc_pussywordy = 'cock-tamed and ever-ready'
-	$vaginatipe = 'overeager'
+	$vaginatipe = 'oft-fucked'
 end
 
 !! The original variables are all named for ass, but really, this is just all about the asshole.
 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>.'
+		$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'
 		$anustipe = 'virgin'
 	elseif pcs_ass <= 5:
 		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.'
+		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage1/' + rand(1,5) + '.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'
@@ -181,7 +171,7 @@ if analplugIN = 0:
 		$anustipe = 'tight'
 	elseif pcs_ass <= 10:
 		anpic = 2
-		$pcs_ass = 'Your pliable <a href="exec:view''images/pc/body/anus/2.jpg''">anus</a> has the shape of an asterisk.'
+		$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.'
 		rand_anus = rand(0,2)
 		if rand_anus = 0:
 			$pcdesc_anusrandom = 'flexible'
@@ -195,7 +185,7 @@ if analplugIN = 0:
 		$anustipe = 'flexible'
 	elseif pcs_ass <= 15:
 		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.'
+		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage3/' + rand(1,5) + '.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'
@@ -209,7 +199,7 @@ if analplugIN = 0:
 		$anustipe = 'stretchy'
 	elseif pcs_ass <= 25:
 		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.'
+		$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage4/' + rand(1,5) + '.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'
@@ -221,38 +211,34 @@ if analplugIN = 0:
 		$pcdesc_anus = 'loose'
 		$pcdesc_anuswordy = 'loose, open'
 		$anustipe = 'loose'
-	elseif pcs_ass <= 35:
+	else
 		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(0,1) = 0:
+			$pcs_ass = 'Your <a href="exec:view''images/pc/body/anus/stage5/' + rand(1,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.'
+		else
+			$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.'
+		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'
-		end
-		$pcdesc_anus = 'gaping'
-		$pcdesc_anuswordy = 'gaping, seemingly constantly-fucked'
-		$anustipe = 'gaping'
-	else
-		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:
+		elseif rand_anus = 3:
 			$pcdesc_anusrandom = 'destroyed'
-		elseif rand_anus = 1:
+		elseif rand_anus = 4:
 			$pcdesc_anusrandom = 'demolished'
-		elseif rand_anus = 2:
+		elseif rand_anus = 5:
 			$pcdesc_anusrandom = 'uselessly loose'
-		elseif rand_anus = 3:
+		elseif rand_anus = 6:
 			$pcdesc_anusrandom = 'ruined'
-		elseif rand_anus = 4:
+		elseif rand_anus = 7:
 			$pcdesc_anusrandom = 'wrecked'
 		end
-		$pcdesc_anus = 'destroyed'
-		$pcdesc_anuswordy = 'absolutely fuck-wrecked'
-		$anustipe = 'destroyed'
+		$pcdesc_anus = 'gaping'
+		$pcdesc_anuswordy = 'gaping, seemingly constantly-fucked'
+		$anustipe = 'gaping'
 	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