2 Komitmen c1aaf5e507 ... 6e8c947bfe

Pembuat SHA1 Pesan Tanggal
  Spackled Lanturn 6e8c947bfe [fixed] in sexdvoe, (1) move common code outside conditionals, (2) delete unused variables, and (3) kill variables that were being set to 0 when this file exited (sexvar, sameboy, sexstart) or are only used in this file and are randomly reset every time they are used (sexdvoeloc). (1) and (2) cut this file from 416 to 295 lines 3 tahun lalu
  Spackled Lanturn 49537408e8 [text edit] clean up sexdvoe 3 tahun lalu
1 mengubah file dengan 28 tambahan dan 149 penghapusan
  1. 28 149
      locations/sexdvoe.qsrc

+ 28 - 149
locations/sexdvoe.qsrc

@@ -60,22 +60,17 @@ if $ARGS[0] = 'var':
 	sexstart = 1
 	sexvar = rand(3,6)
 	'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvoe/kiss.jpg"></center>'
-	'After some kissing it is time to move on to the next stage.'
+	'After some kissing, it is time to move on to the next stage.'
 	xgt 'sexdvoe', 'menu'
 end
 
 if $ARGS[0] = 'sex':
+	*clr
+	sexvar -= 1
+	gs 'dinsex2', 'stamina_npc'
 
 	!blowjob
 	if sexdvoeloc = 0:
-		*clr
-		sexvar -= 1
-		gs 'dinsex2', 'stamina_npc'
-
-		if dvsxbj = 0:
-			dvsxbj = 1
-		end
-		
 		if sexvar > 0:
 			'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvoe/minet<<picrand>>.jpg"></center>'
 		else 
@@ -86,28 +81,8 @@ if $ARGS[0] = 'sex':
 		gs 'arousal', 'bj', 10
 		gs 'stat'
 		
-		if pcs_horny >= 80:
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'You have an orgasm.'
-		end
-		if sexvar = 1:'<br>They indicate that they will cum soon.'
-		if sexvar > 0:xgt 'sexdvoe', 'menu'
-		if sexvar = 0:gs 'sexdvoe', 'end'
-		
 	!double penetration
 	elseif sexdvoeloc < 3:
-		*clr
-		sexvar -= 1
-		gs 'dinsex2', 'stamina_npc'
-
-		if dvsxsex = 0:
-			dvsxsex = 1
-		end
-
-		if dvsxanal = 0:
-			dvsxanal = 1
-		end
-
 		'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvoe/dp<<picrand>>.jpg"></center>'
 		if sameboy = 1:
 			'Both of them fuck you, one of them your ass, the other your pussy. The double friction gives you great pleasure as they are pumping in and out of your body in tandem.'
@@ -140,29 +115,9 @@ if $ARGS[0] = 'sex':
 			cumprecheck = 1
 			if $knownboy[1] = 1:gs 'cum_call', '', $boy[1], 1 else gs 'cum_call', '', $boy[1]
 		end
-
-		if pcs_horny >= 80:
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'You have an orgasm.'
-		end
-		if sexvar = 1:'<br>They indicate that they will cum soon.'
-		if sexvar > 0:xgt 'sexdvoe', 'menu'
-		if sexvar = 0:gs 'sexdvoe', 'end'
 			
 	!spitroast, pussy
 	elseif sexdvoeloc < 5:
-		*clr
-		sexvar -= 1
-		gs 'dinsex2', 'stamina_npc'
-
-		if dvsxbj = 0:
-			dvsxbj = 1
-		end
-
-		if dvsxsex = 0:
-			dvsxsex = 1
-		end
-
 		'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvoe/vag<<picrand>>.jpg"></center>'
 		if sameboy = 1:
 			'While one guy is fucking your pussy, you diligently suck off the second.'
@@ -195,30 +150,9 @@ if $ARGS[0] = 'sex':
 			cumprecheck = 1
 			if $knownboy[1] = 1:gs 'cum_call', '', $boy[1], 1 else gs 'cum_call', '', $boy[1]
 		end
-
-		if pcs_horny >= 80:
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'You have an orgasm.'
-			
-		end
-		if sexvar = 1:'<br>They indicate that they will cum soon.'
-		if sexvar > 0:xgt 'sexdvoe', 'menu'
-		if sexvar = 0:gs 'sexdvoe', 'end'
 		
 	!spitroast, ass
 	else
-		*clr
-		sexvar -= 1
-		gs 'dinsex2', 'stamina_npc'
-
-		if dvsxbj = 0:
-			dvsxbj = 1
-		end
-
-		if dvsxanal = 0:
-			dvsxanal = 1
-		end
-
 		'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexdvoe/anal<<picrand>>.jpg"></center>'
 		if sameboy = 1:
 			'While one guy is fucking your ass, you diligently suck off the second.'
@@ -226,46 +160,40 @@ if $ARGS[0] = 'sex':
 			gs 'arousal', 'anal', 10, 'sub'
 			gs 'boyStat', $boy[1]
 			gs 'arousal', 'bj', 10, 'sub'
-			minut -= 10
-			gs 'stat'
 		elseif sexdvoeloc = 3:
 			'While <<$boydesc[0]>> is fucking your ass, you diligently suck off <<$boydesc[1]>>.'
 			gs 'boyStat', $boy[0]
 			gs 'arousal', 'anal', 10, 'sub'
 			gs 'boyStat', $boy[1]
 			gs 'arousal', 'bj', 10, 'sub'
-			minut -= 10
-			gs 'stat'
 		else
 			'While <<$boydesc[1]>> is fucking your ass, you diligently suck off <<$boydesc[0]>>.'
 			gs 'boyStat', $boy[1]
 			gs 'arousal', 'anal', 10, 'sub'
 			gs 'boyStat', $boy[0]
 			gs 'arousal', 'bj', 10, 'sub'
-			minut -= 10
-			gs 'stat'
 		end
 
-		if pcs_horny >= 80:
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'You have an orgasm.'
-		end
-		if sexvar = 1:'<br>They indicate that they will cum soon.'
-		if sexvar > 0:xgt 'sexdvoe', 'menu'
-		if sexvar = 0:gs 'sexdvoe', 'end'
+		minut -= 10
+		gs 'stat'
+	end
+
+	if pcs_horny >= 80:
+		$orgasm_or = 'custom'
+		$orgasm_txt = 'You have an orgasm.'
 	end
+	if sexvar = 1:'<br>They indicate that they will cum soon.'
+	if sexvar > 0:xgt 'sexdvoe', 'menu'
+	if sexvar = 0:gs 'sexdvoe', 'end'
 end
 
 if $ARGS[0] = 'end':
 	cla
 	gs 'sweat', 'add', 10
 	minut += 10
-	dvsxbj = 0
-	dvsxsex = 0
-	dvsxanal = 0
-	sexvar = 0
-	sameboy = 0
-	sexstart = 0
+	killvar 'sexvar'
+	killvar 'sameboy'
+	killvar 'sexstart'
 	if sexdvoeloc = 0:
 		temp = rand(0,5)
 		if temp = 0:
@@ -283,114 +211,65 @@ if $ARGS[0] = 'end':
 		else 
 			if $knownboy[1] = 1:gs 'cum_call', 'mouth', $boy[1], 1 else gs 'cum_call', 'mouth', $boy[1]
 		end
-		'With a groan they both cum, mostly in your mouth, but it may have gotten on your face too.'
-		
-		gs 'arousal', 'end'
-		gs 'stat'
-		
+		'With a groan, they both cum, mostly in your mouth, but some may have gotten on your face too.'
 	elseif sexdvoeloc = 1:
 		if $knownboy[0] = 1:gs 'cum_call', '', $boy[0], 1 else gs 'cum_call', '', $boy[0]
 		if $knownboy[1] = 1:gs 'cum_call', 'anus', $boy[1], 1 else gs 'cum_call', 'anus', $boy[1]
 		if sameboy = 1:
 			'They groan, and you feel the copious amount of their seed they both pump inside your body at the same time.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		else
-			'They both groan, and you feel as <<$boydesc[0]>> pump your pussy full of his seed, while <<$boydesc[1]>>''s semen is released in your ass.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
+			'They both groan, and you feel <<$boydesc[0]>> pump your pussy full of his seed, while <<$boydesc[1]>>''s semen is released in your ass.'
 		end
 	elseif sexdvoeloc = 2:
 		if $knownboy[1] = 1:gs 'cum_call', '', $boy[1], 1 else gs 'cum_call', '', $boy[1]
 		if $knownboy[0] = 1:gs 'cum_call', 'anus', $boy[0], 1 else gs 'cum_call', 'anus', $boy[0]
 		if sameboy = 1:
 			'They groan, and you feel the copious amount of their seed they both pump inside your body at the same time.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		else
-			'They both groan, and you feel as <<$boydesc[1]>> pump your pussy full of his seed, while <<$boydesc[0]>>''s semen is released in your ass.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
+			'They both groan, and you feel <<$boydesc[1]>> pump your pussy full of his seed, while <<$boydesc[0]>>''s semen is released in your ass.'
 		end
 	elseif sexdvoeloc = 3:
 		if $knownboy[0] = 1:gs 'cum_call', '', $boy[0], 1 else gs 'cum_call', '', $boy[0]
 		if $knownboy[1] = 1:gs 'cum_call', 'mouth', $boy[1], 1 else gs 'cum_call', 'mouth', $boy[1]
 		if sameboy = 1:
 			'They groan, and you have to swallow one of the <<$boydesc[0]>>''s seed while the other pumps your pussy full of his own.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		else
 			'They both groan, and you have to swallow <<$boydesc[1]>>''s seed while <<$boydesc[0]>> pumps your pussy full of his own.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		end
 	elseif sexdvoeloc = 4:
 		if $knownboy[1] = 1:gs 'cum_call', '', $boy[1], 1 else gs 'cum_call', '', $boy[1]
 		if $knownboy[0] = 1:gs 'cum_call', 'mouth', $boy[0], 1 else gs 'cum_call', 'mouth', $boy[0]
 		if sameboy = 1:
 			'They groan, and you have to swallow one of the <<$boydesc[0]>>''s seed while the other pumps your pussy full of his own.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		else
 			'They both groan, and you have to swallow <<$boydesc[0]>>''s seed while <<$boydesc[1]>> pumps your pussy full of his own.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		end
 	elseif sexdvoeloc = 5:
 		if $knownboy[0] = 1:gs 'cum_call', 'anus', $boy[0], 1 else gs 'cum_call', 'anus', $boy[0]
 		if $knownboy[1] = 1:gs 'cum_call', 'mouth', $boy[1], 1 else gs 'cum_call', 'mouth', $boy[1]
 		if sameboy = 1:
 			'They groan at the same time, and you feel the taste of one of the guys as he cums inside your mouth, while the other one pumps your ass full of his own semen.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		else
 			'They groan at the same time, and you feel the taste of <<$boydesc[1]>>''s seed as he cums inside your mouth, while <<$boydesc[0]>> pumps your ass full of his semen.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		end
 	else
 		if $knownboy[1] = 1:gs 'cum_call', 'anus', $boy[1], 1 else gs 'cum_call', 'anus', $boy[1]
 		if $knownboy[0] = 1:gs 'cum_call', 'mouth', $boy[0], 1 else gs 'cum_call', 'mouth', $boy[0]
 		if sameboy = 1:
 			'They groan at the same time, and you feel the taste of one of the guys as he cums inside your mouth, while the other one pumps your ass full of his own semen.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
 		else
-			'They groan at the same time, and you feel the taste of <<$boydesc[0]>>''s seed as he cums inside your mouth, while <<$boydesc[1]>> pumps your ass full of his semen.'
-			
-			gs 'arousal', 'end'
-			gs 'stat'
-			
+			'They groan at the same time, and you feel the taste of <<$boydesc[0]>>''s seed as he cums inside your mouth, while <<$boydesc[1]>> pumps your ass full of his semen.'	
 		end
 	end
 
-	if pcs_horny >= 80:
-		$orgasm_or = 'yes'
-	end
+	killvar 'sexdvoeloc'
+
+	gs 'arousal', 'end'
+	gs 'stat'
+	
+	if pcs_horny >= 80:$orgasm_or = 'yes'
 
-	if picrand = 29:'When it ends boss says that you did well and today you are free and can go.'
+	if picrand = 29:'When it ends, boss says that you did well and today you are free and can go.'
 	if picrand = 39:'Then <<$boydescA>> throws you out of the apartment.'
 	killvar 'knownboy'
 	killvar 'knwn'