1
0
Преглед на файлове

[fixed] Very old style cum calls updated and so gosubs I made into gotos in error in last commit

Kevin_Smarts преди 1 година
родител
ревизия
bf8518ec1d
променени са 2 файла, в които са добавени 8 реда и са изтрити 16 реда
  1. 3 3
      locations/podrsex.qsrc
  2. 5 13
      locations/sex.qsrc

+ 3 - 3
locations/podrsex.qsrc

@@ -81,7 +81,7 @@ if $ARGS[0] = 'pussy':
 	if sexvar > 0:
 		xgt 'podrsex', 'var'
 	else
-		gt 'podrsex', 'end'
+		gs 'podrsex', 'end'
 	end
 end
 
@@ -116,7 +116,7 @@ if $ARGS[0] = 'ass':
 	if sexvar > 0:
 		xgt 'podrsex', 'var'
 	else
-		gt 'podrsex', 'end'
+		gs 'podrsex', 'end'
 	end
 end
 
@@ -153,7 +153,7 @@ if $ARGS[0] = 'voy':
 	if sexvar > 0:
 		xgt 'podrsex', 'var'
 	else
-		gt 'podrsex', 'end'
+		gs 'podrsex', 'end'
 	end
 end
 

+ 5 - 13
locations/sex.qsrc

@@ -169,29 +169,21 @@ if $ARGS[0] = 'end':
 	killvar 'dick'
 
 	if pos = 1:
-		spafinloc = 12
 		'He groans loudly, and you feel his hard cock erupting in your mouth. You swallow it obediently, figuring that is what he wants you to do.'
+		gs 'cum_call', 'mouth_swallow', $boy, 1
 	elseif pos = 2:
-		spafinloc = 9
 		'Stroking himself while he pleasures you, he groans loudly, spraying his seed on the floor. Some of it splatters against your feet as well.'
+		gs 'cum_call', 'feet', $boy, 1
 	elseif pos = 3:
-		spafinloc = 0
-		cuminside = 1
 		'He groans loudly, spraying his seed deep inside your pussy.'
+		gs 'cum_call', '', $boy, 1
+		gs 'cuminsidereact'
 	else
-		spafinloc = 3
 		'He groans loudly, spraying his seed deep inside your ass.'
+		gs 'cum_call', 'anus', $boy, 1
 	end
-	gs 'cum_manage'
-	if pcs_horny >= 80:
-		pcs_horny = 0
-		orgasm += 1
-		'You feel so horny after bringing him to orgasm, you''re very close to having an orgasm also! You close your eyes and surrender yourself to the moment, quickly rubbing yourself to completion.'
-	end
-	if cuminside = 1: killvar 'cuminside' & gs 'cuminsidereact'
 
 	gs 'arousal', 'end'
-
 	gs 'stat'
 	act 'Leave':
 		if picrand >= 54 and picrand <= 73: killvar 'picrand' & gt 'office', 'work'