Sfoglia il codice sorgente

Merge remote-tracking branch 'ADCSux/master'

Kevin_Smarts 2 anni fa
parent
commit
5c8efb44af
61 ha cambiato i file con 513 aggiunte e 450 eliminazioni
  1. 2 0
      .gitignore
  2. 1 1
      locations/BDSM.qsrc
  3. 1 1
      locations/BDsex.qsrc
  4. 1 1
      locations/BurgerTip.qsrc
  5. 1 0
      locations/Cum_Manage.qsrc
  6. 3 3
      locations/Gnpc2.qsrc
  7. 1 1
      locations/LCporn.qsrc
  8. 4 4
      locations/LCwork.qsrc
  9. 2 2
      locations/VoltrenerSexShower.qsrc
  10. 2 2
      locations/arousal.qsrc
  11. 2 2
      locations/artgar.qsrc
  12. 1 1
      locations/arturdin.qsrc
  13. 1 1
      locations/belpicknick.qsrc
  14. 1 1
      locations/brother.qsrc
  15. 3 3
      locations/burger.qsrc
  16. 1 1
      locations/burgerWork.qsrc
  17. 1 1
      locations/cfnm.qsrc
  18. 2 2
      locations/city_jorahouse.qsrc
  19. 1 1
      locations/city_kafegivisex.qsrc
  20. 2 2
      locations/city_kavkazkafe.qsrc
  21. 8 8
      locations/city_lake.qsrc
  22. 11 11
      locations/city_nightclub.qsrc
  23. 48 13
      locations/city_nightclubToilet.qsrc
  24. 1 1
      locations/city_saunawhore.qsrc
  25. 1 1
      locations/city_trashplaceevents.qsrc
  26. 1 1
      locations/cum_call.qsrc
  27. 2 2
      locations/dimaEv.qsrc
  28. 5 5
      locations/event.qsrc
  29. 1 1
      locations/fbDormD.qsrc
  30. 1 1
      locations/garfather.qsrc
  31. 9 9
      locations/gdksex.qsrc
  32. 305 281
      locations/gloryhole.qsrc
  33. 1 1
      locations/gopnew.qsrc
  34. 3 3
      locations/gopskver.qsrc
  35. 1 1
      locations/husbSex.qsrc
  36. 2 2
      locations/ilyroom.qsrc
  37. 2 2
      locations/katalkinSex.qsrc
  38. 1 1
      locations/kit_din.qsrc
  39. 2 2
      locations/metro_events.qsrc
  40. 3 3
      locations/obj_din.qsrc
  41. 9 9
      locations/pav_disco_sex.qsrc
  42. 6 6
      locations/pornfilm.qsrc
  43. 1 1
      locations/qwmeet.qsrc
  44. 1 1
      locations/rex_events.qsrc
  45. 13 13
      locations/rex_party_sexEvents.qsrc
  46. 1 1
      locations/rex_party_smallEvents.qsrc
  47. 1 0
      locations/saveupdater.qsrc
  48. 1 1
      locations/seeporn.qsrc
  49. 5 5
      locations/sexm.qsrc
  50. 1 1
      locations/sexshop.qsrc
  51. 1 1
      locations/shop_pussycats.qsrc
  52. 3 3
      locations/sny.qsrc
  53. 1 1
      locations/trainBimbo.qsrc
  54. 6 6
      locations/unused/pornfilm.qsrc
  55. 9 9
      locations/unused/rex_party_boys_events.qsrc
  56. 1 1
      locations/unused/rex_party_events.qsrc
  57. 5 5
      locations/unused/rex_party_girls_events.qsrc
  58. 1 1
      locations/vikaev1.qsrc
  59. 2 2
      locations/yarik.qsrc
  60. 1 1
      locations/youry.qsrc
  61. 3 3
      locations/zsoft_gopskverGorSlut.qsrc

+ 2 - 0
.gitignore

@@ -16,6 +16,8 @@ avatar.*
 *.rar
 *.zip
 VideoDecodeStats/
+tools/*.AppImage
+linux_build.sh
 
 glmf.code-workspace
 

+ 1 - 1
locations/BDSM.qsrc

@@ -96,7 +96,7 @@ act 'Begin participating in the shooting':
 							act 'Time to finish...':
 								cla
 								*clr
-								facial += 1
+								
 								swallow += 1
 
 !!Image needed								if pcs_haircol = 0:'<center><img <<$set_imgh>> src="images/locations/city/redlight/studio_porn/brunette_9.jpg"></center>'

+ 1 - 1
locations/BDsex.qsrc

@@ -454,7 +454,7 @@ if $ARGS[0] = 'minet':
 end
 
 if $ARGS[0] = 'facial':
-	facial += 1
+	
 	minut += 3
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial<<rand(11, 15)>>.jpg"></center>'
 	if protect = 1:

+ 1 - 1
locations/BurgerTip.qsrc

@@ -1004,7 +1004,7 @@ if $ARGS[0] = 'ily_work2':
 				*clr&cla
 				BurgerQW['IlyQWBlackmail'] = 2
 				gs 'cum_call', 'face', 'A76', 1
-				facial += 1
+				
 				guy += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/ilyushkin/sex/ilyfacial.jpg"></center>'

+ 1 - 0
locations/Cum_Manage.qsrc

@@ -519,6 +519,7 @@ if $ARGS[0] = 'cumgather':
 		elseif cloc = 10:
 			$part = 'arms'
 		elseif cloc = 11:
+			stat['cum_facial'] += 1
 			$part = 'face'
 		elseif cloc = 14:
 			$part = 'stomach'

+ 3 - 3
locations/Gnpc2.qsrc

@@ -526,7 +526,7 @@ $din_gboy_go_to_disco = {
 										gs 'arousal', 'bj', 5
 										spafinloc = 11
 										gs 'cum_manage'
-										facial += 1
+										
 										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'
 										'You remove his member from your mouth just as a stream of hot sperm hits your face, then another and another and finally he stopped dumping his thick cum on your face.'
@@ -642,7 +642,7 @@ $din_gboy_go_to_disco = {
 													gs 'arousal', 'bj', 5
 													spafinloc = 11
 													gs 'cum_manage'
-													facial += 1
+													
 													gs 'stat'
 													'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'
 													'You remove his member from your mouth and then a stream of hot sperm hits your face, then another and another and finally your guy stops shooting his thick cum on your face.'
@@ -875,7 +875,7 @@ $din_gboy_tits = {
 						pcs_horny += 10
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'
 						'You remove his member from your mouth just as a stream of hot sperm hits you in the face, then another and another until he eventually finished coating your face with his cum.'

+ 1 - 1
locations/LCporn.qsrc

@@ -87,7 +87,7 @@ if $ARGS[0] = 'sex':
 		gs 'arousal', 'bj', 20, 'futa', 'sub', 'deepthroat'
 		'Finally, a good half hour after you started sucking her cock, Eugene finally lets out a loud and girly moan and releases her load all over your face. Thick strands of saliva are running down your chin by now.'
 		gs 'cum_call', 'face', $boy, 1
-		facial += 1
+		
 		gs 'stat'
 		'She licks her cum on your face and kisses you. She smiles and starts to get dressed. She tells you: "Thank you, <<$pcs_nickname>>! That was great... but I should go back to work before someone realizes I am missing! We''ve got to do this again, <<$pcs_nickname>>!"'
 		

+ 4 - 4
locations/LCwork.qsrc

@@ -3,7 +3,7 @@ if $ARGS[0] = 'start1':
 	cla
 	*clr
 	horand = rand(1, 100)+ 40
-	facial += 1
+	
 	gs 'dinSex', 'std_trigger_oral'
 	gs 'dinSex', 'std_trigger'
 	randLCpay = 1000
@@ -60,7 +60,7 @@ if $ARGS[0] = 'start2':
 	cla
 	*clr
 	horand = rand(1, 100)
-	facial += 1
+	
 	spafinloc = 11
 	gs 'cum_manage'
 	randLCpay = 500
@@ -101,7 +101,7 @@ if $ARGS[0] = 'start3':
 	cla
 	*clr
 	horand = rand(1, 100) + 20
-	facial += 1
+	
 	spafinloc = 11
 	gs 'cum_manage'
 	spafinloc = 12
@@ -273,7 +273,7 @@ if $ARGS[0] = 'start6':
 	cla
 	*clr
 	horand = rand(1, 100)
-	facial += 1
+	
 	randLCpay = 500
 	guy += 1
 

+ 2 - 2
locations/VoltrenerSexShower.qsrc

@@ -184,7 +184,7 @@ if $ARGS[0] = '4':
 				gs 'stat'
 				act 'That did it':
 					cls
-					facial += 1
+					
 					'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower16.mp4"></video></center>'
 					'It seems Ivan never expected this, but moments later, jets of sperm begin fountaining from his member, and heavy, warm drops start falling on your face. He clearly liked it very much.'
 					act 'Turn':
@@ -193,7 +193,7 @@ if $ARGS[0] = '4':
 						'You turn to see the coach still looking, wide-eyed and with his jaw hanging open. Ivan finally notices this, and oblivious to the fact that your actions were only partially for his benefit, hastily covers up, grabs his things and jumps out of the shower. As soon as the door closes behind Ivan, the coach walks closer to you, pulls his member out of his pants and points it at you. Passion and lust overpower you and you immediately reach for his cock, but unfortunately, it seems the coach was already on the edge, and he begins to cum as soon as your hands envelop his shaft. He sprays your breasts with his spunk, then promptly pulls up his pants and leaves you in the shower. On your knees. Overflowing with arousal.'
 						VoltrenerVoyeur += 1
 						pcs_horny = 100
-						facial += 1
+						
 						minut += 15
 						trenerlust += 2
 						gs 'stat'

+ 2 - 2
locations/arousal.qsrc

@@ -800,8 +800,8 @@ if $ARGS[0] = 'end':
 	if stim['hidden_lesbian'] = 1: hidden_lesbian += 1
 	if stim['gang'] = 1 or stim['group'] = 1: gang += 1
 	if stim['hidden_gang'] = 1 or stim['hidden_group'] = 1: hidden_gang += 1
-	if stim['gloryhole'] = 1: gloryhole += 1
-	if stim['hidden_gloryhole'] = 1: hidden_gloryhole += 1
+	if stim['gloryhole'] = 1: stat['gloryhole'] += 1
+	if stim['hidden_gloryhole'] = 1: stat['hidden_gloryhole'] += 1
 	if stim['rape'] = 1: rape += 1
 	if stim['hidden_rape'] = 1: hidden_rape += 1
 	if stim['futa'] = 1: futa += 1

+ 2 - 2
locations/artgar.qsrc

@@ -28,7 +28,7 @@ if apmeet = 0:
 		if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
 		if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 		cumface += 2
-		facial += 1
+		
 		gs 'pain', 1, 'eyes', 'burn'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial19.jpg"></center>'
@@ -75,7 +75,7 @@ elseif apmeet = 1:
 			if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
 			if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 			cumface += 2
-			facial += 1
+			
 			gs 'arousal', 'bj', 10, 'sub', 'humiliation', 'group'
 			gs 'arousal', 'anal_dildo', 5, 'sub', 'humiliation', 'rough'
 			gs 'arousal', 'end'

+ 1 - 1
locations/arturdin.qsrc

@@ -207,7 +207,7 @@ if $ARGS[0] = 'cum':
 	minut += 5
 	spafinloc = 11
 	gs 'cum_call', 'face', 'A73', 1
-	facial += 1
+	
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/sex/cum0.jpg"></center>'
 	'Arthur suddenly yanks you up out of bed, nearly dislocating your arm, before pushing you to your knees. He grunts, stroking his cock, as a jet of sperm hits you in the face.'

+ 1 - 1
locations/belpicknick.qsrc

@@ -471,7 +471,7 @@ if $ARGS[0] = 'gang':
 		sexpartkno = 1
 		spafinloc = 12
 		gs 'cum_manage'
-		facial += 1
+		
 		gs'stat'
 		belsexpayment = 900
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/bukkake.jpg"></center>'

+ 1 - 1
locations/brother.qsrc

@@ -806,7 +806,7 @@ if $ARGS[0] = 'brotherSexStart':
 				npc_rel['A34'] += 5
 				gs 'boyStat', 'A34'
 				gs 'cum_call', 'face', 'A34', 1
-				facial += 1
+				
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'

+ 3 - 3
locations/burger.qsrc

@@ -261,7 +261,7 @@ if $ARGS[0] = 'dishes':
 										gs 'arousal', 'bj', 4, 'sub', 'humiliation'
 										gs 'boyStat', 'A74'
 										gs 'cum_call', 'mouth_swallow', 'A74', 1, 0, 10000, 13
-										facial += 1
+										
 										gs 'cum_call', 'face', 'A74', 1, 0, 10000, 27
 										gs 'stat'
 
@@ -532,7 +532,7 @@ if $ARGS[0] = 'dishes':
 				gs 'boyStat', 'A75'
 				gs 'arousal', 'bj', 3, 'sub'
 				gs 'cum_call', 'mouth_swallow', 'A75', 1
-				facial += 1
+				
 				gs 'cum_call', 'face', 'A75', 1
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -587,7 +587,7 @@ if $ARGS[0] = 'dishes':
 						gs 'cum_call', 'face', 'A75', 1
 						gs 'cum_call', 'face', $BurgerQW['GroupSex1']
 						gs 'cum_call', 'face', $BurgerQW['GroupSex2']
-						facial += 3
+						stat['facial'] += 3
 						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/tri2.jpg"></center>'
 						'Hot jets of sperm slap you in the face, you close your eyes and just feel the stinky seed on your skin. Soon after the sprays of semen stop and your face is all covered with a thick layer of sticky cum. The guys look satisfied and laugh at you. Afterwards they exit the warehouse leaving you by yourself.'
 

+ 1 - 1
locations/burgerWork.qsrc

@@ -174,7 +174,7 @@ if $ARGS[0] = 'work2':
 						act 'Open your mouth':
 							*clr & cla
 							minut += 5
-							facial += 1
+							
 							gs 'boyStat', 'A76'
 							gs 'cum_call', 'face', 'A76', 1
 							gs 'stat'

+ 1 - 1
locations/cfnm.qsrc

@@ -151,7 +151,7 @@ if $ARGS[0] = 'blow4':
 	*clr & cla
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	fotoCFNMblowjobCum += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/facial.jpg"></center>'

+ 2 - 2
locations/city_jorahouse.qsrc

@@ -387,7 +387,7 @@ if $ARGS[0] = 'ev 18':
 	act 'Continue':
 		cla
 		*clr
-		facial += 1
+		
 		'Semyon cums all over your face'
 		picrand = rand(18, 20)
 		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof18.jpg"></center>'
@@ -406,7 +406,7 @@ if $ARGS[0] = 'ev19':
 	klofQW += 2
 	money += 200
 	spafinloc = 11
-	facial += 1
+	
 	pcs_vag += 1
 	if jorasemyon = 1:
 		gs 'cum_call', 'mouth', 'A44', 1

+ 1 - 1
locations/city_kafegivisex.qsrc

@@ -113,7 +113,7 @@ if $ARGS[0] = 'giviirasexdivibor3':
 		gs 'cum_manage'
 		spafinloc = 11
 		gs 'cum_manage'
-		facial += 1
+		
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/group/cum/threesome6.jpg"></center>'
 		'Givi puts you on your knees with Irina and begins to finish you on the face. You finish by both licking his member clean, turn to each other and kiss.'

+ 2 - 2
locations/city_kavkazkafe.qsrc

@@ -259,7 +259,7 @@ end
 
 if $ARGS[0] = 'grupcum':
 	minut += 5
-	facial += 1
+	
 	cumface += 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/sex/group/grupcum.jpg"></center>'
@@ -416,7 +416,7 @@ end
 
 if $ARGS[0] = 'givibj5':
 	minut += 3
-	facial += 1
+	
 	picrand = rand(1, 9)
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial<<picrand>>.jpg"></center>'
 	'You remove his member from your mouth, but Givi does not give you time to dodge as a jet of sperm slaps you, covering your face with hot, thick and sticky cum.'

+ 8 - 8
locations/city_lake.qsrc

@@ -509,7 +509,7 @@ if $ARGS[0] = 'walklake1':
 						cla & *clr
 						gs 'cum_call', 'face', 'A177', 1
 						gs 'cum_call', 'mouth', 'A177', 1
-						facial += 1
+						
 						gs 'arousal', 'bj', 5
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/facefuck1.jpg"></center>'
@@ -546,7 +546,7 @@ if $ARGS[0] = 'walklake1':
 					cla & *clr
 					gs 'cum_call', 'face', 'A177', 1
 					gs 'cum_call', 'mouth_swallow', 'A177', 1
-					facial += 1
+					
 					gs 'arousal', 'bj', 5
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -648,7 +648,7 @@ if $ARGS[0] = 'dinribak':
 					gs 'cum_call', 'face', 'A177', 1
 					gs 'cum_call', 'mouth', 'A177', 1
 					gs 'arousal', 'bj', 5
-					facial += 1
+					
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/facefuck1.jpg"></center>'
 					'He starts to cum on your face. A spurt of his cum flies into your mouth and you choke at the taste.'
@@ -706,7 +706,7 @@ if $ARGS[0] = 'dinribak':
 				gs 'cum_call', 'face', 'A177', 1
 				gs 'cum_call', 'mouth_swallow', 'A177', 1
 				gs 'arousal', 'bj', 5
-				facial += 1
+				
 				gs 'arousal', 'end'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/cum.jpg"></center>'
@@ -1254,7 +1254,7 @@ if $ARGS[0] = 'vlake2':
 							gs 'npcgeneratec', 0, 'a stranger at the lake', rand(18,45)
 							gs 'boyStat', $npclastgenerated
 							gs 'cum_call', 'face', 'a stranger at the lake'
-							facial += 1
+							
 							gs 'arousal', 'end'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/vlake2/vlake7.jpg"></center>'
@@ -1439,7 +1439,7 @@ if $ARGS[0] = 'kater1cum':
 	gs 'cum_call', 'mouth_swallow', 'a rescuer at the lake'
 	gs 'cum_call', 'face', 'a rescuer at the lake'
 	gs 'cum_call', 'breasts', 'a rescuer at the lake'
-	facial += 1
+	
 	gs 'arousal', 'end'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/kater1/kater9.jpg"></center>'
@@ -1709,7 +1709,7 @@ if $ARGS[0] = 'horse1':
 									act 'Finish':
 										*clr & cla
 										gs 'cum_call', 'face', 'Quad rider'
-										facial += 1
+										
 										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse1/horse10.jpg"></center>'
 										'You remove the dick from your mouth and begin stroking it. A few seconds, a stream of cum splatters across your face.'
@@ -1801,7 +1801,7 @@ if $ARGS[0] = 'horse2':
 						act 'Change position':
 							*clr & cla
 							gs 'cum_call', 'face', 'Horse rider'
-							facial += 1
+							
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse2/horse7.jpg"></center>'
 							'You climb off them and kneel down in front of them. They stand on either side of you as they jerk their cocks. One immediately groans as his cum splashes over your face.'

+ 11 - 11
locations/city_nightclub.qsrc

@@ -3,13 +3,13 @@
 CLOSE ALL
 !!needs a complete rework of the club
 if $ARGS[0] = 'start':
-	$loc = 'nightclub'
+	$loc = 'city_nightclub'
 	$loc_arg = 'start'
-	$menu_loc = 'nightclub'
+	$menu_loc = 'city_nightclub'
 	$menu_arg = 'start'
 	menu_off = 0
 	$location_type = 'public_outdoors'
-	$sexloc = 'nightclub'
+	$sexloc = 'city_nightclub'
 	*clr & cla
 	minut += 5
 	gs 'stat'
@@ -448,7 +448,7 @@ end
 if $ARGS[0] = 'bar':
 	*clr & cla
 	minut += 5
-	$menu_loc = 'club'
+	$menu_loc = 'city_nightclub'
 	$menu_arg = 'bar'
 	menu_off = 0
 	gs 'stat'
@@ -807,23 +807,23 @@ if $ARGS[0] = 'sex':
 					gs 'cum_manage'
 					'You take his cock and point it away from you. He groans as he cums and most of his cum gets splattered onto the floor, with a few drips covering your hand.'
 
-					act 'Stand up':gt 'city_nightclub', 'tou'
+					act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 				end
 
 				act 'Let him cum on your face':
 					cla
-					facial += 1
+					
 					spafinloc = 11
 					gs 'cum_manage'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubfacial1.jpg"></center>'
 					'You grabbed his cock and point his "gun" at your face. He groans as he cums and you can feel hot streams of semen covering your face.'
 
-					act 'Stand up':gt 'city_nightclub', 'tou'
+					act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 				end
 
 				exit
 			elseif harakBoy = 2:
-				facial += 1
+				
 				spafinloc = 11
 				gs 'cum_manage'
 				SUB += 1
@@ -831,7 +831,7 @@ if $ARGS[0] = 'sex':
 				'The bloke grabs your hair and cums on your face. You quickly close your eyes, but it''s too late, a few drips of semen make it into your eyes. It hurts a bit.'
 			end
 
-			act 'Stand up':gt 'city_nightclub', 'tou'
+			act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 		end
 
 		act 'Swallow his cum':
@@ -846,7 +846,7 @@ if $ARGS[0] = 'sex':
 			gs 'arousal', 'end'
 			gs 'stat'
 
-			act 'Stand up':gt 'city_nightclub', 'tou'
+			act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 		end
 	end
 
@@ -877,7 +877,7 @@ if $ARGS[0] = 'sex':
 		gs 'arousal', 'end'
 		gs 'stat'
 
-		act 'Leave cubicle':gt 'city_nightclub', 'tou'
+		act 'Leave cubicle':gt 'city_nightclubToilet', 'clubtoilet_men'
 	end
 end
 

+ 48 - 13
locations/city_nightclubToilet.qsrc

@@ -2,41 +2,76 @@
 
 if $ARGS[0] = 'start':
     $location_type = 'public_indoors'
-    $menu_loc = 'clubtoilet'
-    $loc = 'clubtoilet'
-    gs 'themes', 'indoors'
-    $menu_arg = 'start'
+	$loc = 'city_nightclubToilet'
 	$loc_arg = 'start'
+    $menu_loc = 'city_nightclubToilet'
+    $menu_arg = 'start'
+    gs 'themes', 'indoors'
 	killvar '$locclass'
 	menu_off = 0
 	gs 'stat'
 	*clr & cla
     
-
+	'<center><b><font color="maroon">Nightclub-Restroom</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/toiletwalkway.jpg"></center>'
+	gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Enter the men''s restroom (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'city_nightclubToilet', 'clubtoilet_men'
+			end
+		else
+			act 'Enter the men''s restroom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
     act 'Enter the women''s restroom': gt 'city_nightclubToilet', 'clubtoilet_women'
+	act 'Return to the dance floor': gt 'city_nightclub', 'inside'
 end
 
 if $ARGS[0] = 'clubtoilet_men':
+	$loc = 'city_nightclubToilet'
+	$loc_arg = 'clubtoilet_men'
+	$locM = 'city_nightclubToilet'
+	$locM_arg = 'clubtoilet_men'
+	$menu_loc = 'city_nightclubToilet'
+	$menu_arg = 'clubtoilet_men'
+	menu_off = 0
+	$location_type = 'bathroom'
+	$locclass = 'restroom'
 
+	*clr & cla
+	gs 'stat'
+	'<center><b><font color="maroon">Nightclub-Men''s Room</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/mentoilet.jpg"></center>'
+	'You walk in to the men''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>.'
+	
+	act 'Leave': gt 'city_nightclubToilet', 'start'
+	
+	dynamic $tampon
+	dynamic $quickwash
+	dynamic $basin	
 end
 
 if $ARGS[0] = 'clubtoilet_women':
-    $loc_arg = 'womens'
-	$loc = 'clubtoilet_women'
-	$locM_arg = 'womens'
-	$locM = 'clubtoilet_women'
-	$menu_loc = 'clubtoilet_women'
-	$menu_arg = 'womens'
+	$loc = 'city_nightclubToilet'
+	$loc_arg = 'clubtoilet_women'
+	$locM = 'city_nightclubToilet'
+	$locM_arg = 'clubtoilet_women'
+	$menu_loc = 'city_nightclubToilet'
+	$menu_arg = 'clubtoilet_women'
 	menu_off = 0
 	$location_type = 'bathroom'
 	$locclass = 'restroom'
+	
 	*clr & cla
 	gs 'stat'
-	'<center><b><font color="maroon">Women''s Room</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/toilet.jpg"></center>'
+	'<center><b><font color="maroon">Nightclub-Women''s Room</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/womentoilet.jpg"></center>'
 	'You walk in to the women''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>. You notice the last stall has its door wide open.'
 
 	act 'Leave': gt 'city_nightclubToilet', 'start'
+	act 'Go to the last stall': gt 'gloryhole', 'start'
 	
 	dynamic $tampon
 	dynamic $quickwash

+ 1 - 1
locations/city_saunawhore.qsrc

@@ -920,7 +920,7 @@ if $ARGS[0] = 'cumAnal':
 end
 
 if $ARGS[0] = 'cumFace':
-	facial += 1
+	
 	'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumface'+rand(1, 5)+'.mp4"></video></center>'
 	if useCondom = 1:
 		'The client rips the condom from his dick and <<$cumType>> cum splatters all over your face.'

+ 1 - 1
locations/city_trashplaceevents.qsrc

@@ -230,7 +230,7 @@ if $ARGS[0] = 'pos10':
 						act 'On your face':
 							*clr & cla
 							minut += 1
-							facial += 1
+							
 							gs 'cum_call', 'face', 'hobo'
 							
 							'<center><img <<$set_imgh>> src="images/shared/sex/public/cum0,'+rand(0,3)+'.jpg"></center>'

+ 1 - 1
locations/cum_call.qsrc

@@ -114,7 +114,7 @@ if $ARGS[0] ! 'precum':
 		spafinloc = 12
 	elseif $ARGS[0] = 'mouth_swallow':
 		spafinloc = 12
-		swallow += 1
+		stat['swallow'] += 1
 	elseif $ARGS[0] = 'hands':
 		spafinloc = 13
 	elseif $ARGS[0] = 'stomach':

+ 2 - 2
locations/dimaEv.qsrc

@@ -136,7 +136,7 @@ if $ARGS[0] = 'firstvisitsex':
 				*clr & cla
 				spafinloc = 11
 				gs 'cum_manage'
-				facial += 1
+				
 				if maxdra = 1: maxdra = 2
 				dimasexday = daystart
 				gs 'stat'
@@ -179,7 +179,7 @@ if $ARGS[0] = 'firstvisitsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					dimasexday = daystart
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sitcum.jpg"></center>'

+ 5 - 5
locations/event.qsrc

@@ -91,14 +91,14 @@ if $ARGS[0] = 'blow':
 				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
 				'You take his cock out of your mouth and <<$loverdesc[lover_number]>> finishes in your hand.'
 			elseif tiprand = 3:
-				facial += 1
+				
 				spafinloc = 11
 				gs 'cum_manage'
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,8.jpg"></center>'
 				'You took his cock out of your mouth and immediatly <<$loverdesc[lover_number]>> cums directly on your face, covering it with his warm and sticky seed.'
 			end
 		elseif haraklover[lover_number] = 2:
-			facial += 1
+			
 			spafinloc = 11
 			gs 'cum_manage'
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,8.jpg"></center>'
@@ -728,7 +728,7 @@ if $ARGS[0] = 'dima46':
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	gloryhole += 1
+	stat['gloryhole'] += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/15933_markdavisdonnaannika_447.jpg"></center>'
 	'When you''re downstairs, the girl moves you into a dark room with a round hole in one wall. Almost immediately, a cock appears from the hole.'
@@ -753,7 +753,7 @@ if $ARGS[0] = 'dima47':
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	gloryhole += 1
+	stat['gloryhole'] += 1
 	dimagh_counter += 1
 	if dimagh_counter <= 8:jump 'gloryhole1'
 	pcs_vag += 1
@@ -792,7 +792,7 @@ if $ARGS[0] = 'dima48':
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	gloryhole += 1
+	stat['gloryhole'] += 1
 	dimagh_counter += 1
 	if dimagh_counter <= 8:jump 'gloryhole2'
 	gs 'stat'

+ 1 - 1
locations/fbDormD.qsrc

@@ -183,7 +183,7 @@ $d_fbd_face = {
 		gs 'cum_manage'
 		spafinloc = 12
 		gs 'cum_manage'
-		facial += 1
+		
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/fbdface.jpg"></center>'
 		'<<$boydesc>> jerks off, while his cock is pointing at your face. You instinctively stick out your tongue, and he rubs the head of his dick against it while he''s approaching his orgasm. Suddenly a jet of sperm hits your face, covering you in cum. Several more follow, some of it getting into your mouth while the rest covers your cheeks and eye lids.'

+ 1 - 1
locations/garfather.qsrc

@@ -335,7 +335,7 @@ if pcs_horny > 50 and npc_sex['A28'] ! 0:
 						sexpartkno = 1
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						gs 'stat'
 						gar_rand1 = rand(0,100)
 						if gar_rand1 < 49:'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,<<rand(0,8)>>.jpg"></center>'

+ 9 - 9
locations/gdksex.qsrc

@@ -558,7 +558,7 @@ if $ARGS[0] = 'kissing':
 											if boynumBlock = 0: guy += 1
 											if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1
 
-											facial += 1
+											
 											spafinloc = 11
 											gs 'cum_manage'
 											spafinloc = 7
@@ -1899,7 +1899,7 @@ if $ARGS[0] = 'hotelsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 					'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
@@ -1936,7 +1936,7 @@ if $ARGS[0] = 'hotelsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 					'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 					if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -1960,7 +1960,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 						if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -2017,7 +2017,7 @@ if $ARGS[0] = 'hotelsex':
 								*clr & cla
 								spafinloc = 11
 								gs 'cum_manage'
-								facial += 1
+								
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 								'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 								'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
@@ -2085,7 +2085,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
@@ -2151,7 +2151,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'You keep sucking his dick for a while longer, before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
@@ -2185,7 +2185,7 @@ if $ARGS[0] = 'hotelsex':
 							*clr & cla
 							spafinloc = 11
 							gs 'cum_manage'
-							facial += 1
+							
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 							'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 							if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -2209,7 +2209,7 @@ if $ARGS[0] = 'hotelsex':
 								*clr & cla
 								spafinloc = 11
 								gs 'cum_manage'
-								facial += 1
+								
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 								'After he fucks your ass for a while, you turn to look over your shoulder and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 								if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'

+ 305 - 281
locations/gloryhole.qsrc

@@ -6,7 +6,7 @@ if $ARGS[0] = 'start':
 	menu_off = 1
 	gs 'stat'
 	'<center><b><font color="maroon">Empty Stall</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sitting.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/sitting.jpg"></center>'
 	if stat['bj'] = 0:
 		gs 'stat'
 		'You walk down to the last stall and sit down, next to the toilet is a rather large almost perfectly round hole. Puzzled, you wonder how it got there and why no one has fixed it.'
@@ -18,94 +18,86 @@ if $ARGS[0] = 'start':
 	act 'Get Up':
 		cla
 		'You decide not to look in the hole and leave.'
-		act 'Leave': gt 'gdktoilet_womens', 'womens'
+		act 'Leave': gt $loc, $loc_arg
 	end
 	if pcs_horny >=40:
 		gs 'willpower', 'mast', 'self'
 		if will_cost <= pcs_willpwr:				
 			act 'Caress Yourself (<<will_cost>> Willpower)':
 				if pcs_inhib < 40:inhib_exp += rand(1,3)
-				*clr & cla
 				gs 'willpower', 'mast', 'self'
 				gs 'willpower', 'pay', 'self'
-				gs 'stat'
-				picrand = rand(1,2)
-				if picrand = 1:
-					*clr & cla
-					gs 'stat'
-					'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/caress1.mp4"></video></center>'
-					'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
-					$orgasm_or = 'no'
-					gs 'arousal', 'clit_finger', 4, 'masturbate'
-					gs 'stat'
-					act 'Continue': gs 'gdktoilet_womens', 'contmast'
-				else
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-					'Feeling a bit turned on, you close the door to the stall and you sit down exposing your pussy and begin to run your clit.'
-					$orgasm_or = 'no'
-					gs 'arousal', 'clit_finger', 4, 'masturbate'
-					gs 'stat'
-					act 'Continue': gs 'gdktoilet_womens', 'contmast'
-				end
+				gt 'gloryhole', 'mast'
 			end
 		else
 			act 'Caress Yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
-	act 'Look at the Hole': gt 'gdktoilet_womens', 'hole'
+	act 'Look at the Hole': gt 'gloryhole', 'hole'
 end
 
-if $ARGS[0] = 'contmast':
-	*clr & cla
-	pcs_mood += 5
-	menu_off = 1
-	if picrand = 1:
+if $ARGS[0] = 'mast':
+	if $ARGS[1] = '':
+		*clr & cla
+		gs 'stat'
 		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/caress1.mp4"></video></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-	end
-	if pcs_horny <= 60:
-		'You are starting to feel warm and you insert your finger in your pussy.'	
-	else
-		'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
+		'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
+		$orgasm_or = 'no'
+		gs 'arousal', 'clit_finger', 4, 'masturbate'
+		gs 'stat'
+		act 'Continue': gs 'gloryhole', 'mast', 'stage2'
 	end
-	$orgasm_or = 'no'
-	gs 'arousal', 'clit_finger', 4, 'masturbate'
-	gs 'stat'
-	gs 'willpower', 'mast', 'self'
-	if will_cost <= pcs_willpwr:
-		act 'Stop (<<will_cost>> Willpower)':
-			cla
-			minut += 1
-			gs 'willpower', 'mast', 'self'
-			gs 'willpower', 'pay', 'self'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'You decide that you shouldn''t continue and stop yourself from finishing.'
-			act 'Leave Stall':gt 'gdktoilet_womens', 'womens'
+
+	if $ARGS[1] = 'stage2':
+		*clr & cla
+		pcs_mood += 5
+		menu_off = 1
+		if picrand = 1:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/caress1.mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
 		end
-	else
-		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end
-	if pcs_horny >= 90:
-		act 'Climax':
-			*clr & cla
-			pcs_mood += 15
-			if pcs_inhib < 40: inhib_exp += rand(1,3)
-			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/orgasm.mp4"></video></center>'
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'As your pussy gets wet you pulls your panties down and slip your fingers inside of yourself. You start finger fucking yourself, with in a few minutes a powerful orgasm rocks your body. Leaving you gasping and trembling as you recover.'
-			gs 'arousal', 'clit_finger', 2, 'masturbate'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave Stall':gt 'gdktoilet_womens', 'womens'
+		if pcs_horny <= 60:
+			'You are starting to feel warm and you insert your finger in your pussy.'	
+		else
+			'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
+		end
+		$orgasm_or = 'no'
+		gs 'arousal', 'clit_finger', 4, 'masturbate'
+		gs 'stat'
+		gs 'willpower', 'mast', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				cla
+				minut += 1
+				gs 'willpower', 'mast', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'You decide that you shouldn''t continue and stop yourself from finishing.'
+				act 'Leave': gt $loc, $loc_arg
+			end
+		else
+			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		if pcs_horny >= 90:
+			act 'Climax':
+				*clr & cla
+				pcs_mood += 15
+				if pcs_inhib < 40: inhib_exp += rand(1,3)
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/orgasm.mp4"></video></center>'
+				$orgasm_or = 'custom'
+				$orgasm_txt = 'As your pussy gets wet you pulls your panties down and slip your fingers inside of yourself. You start finger fucking yourself, with in a few minutes a powerful orgasm rocks your body. Leaving you gasping and trembling as you recover.'
+				gs 'arousal', 'clit_finger', 2, 'masturbate'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Leave': gt $loc, $loc_arg
+			end
+		else
+			act 'Continue': gt 'gloryhole', 'mast', 'stage2'
 		end
-	else
-		act 'Continue': gt 'gdktoilet_womens', 'contmast'
 	end
-end
+end	
 
 if $ARGS[0] = 'hole':
 	*clr & cla
@@ -115,7 +107,7 @@ if $ARGS[0] = 'hole':
 	gs 'boyStat', $npclastgenerated
 	minut +=5
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ghlooking.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/looking.jpg"></center>'
 	wait 700
 	if gloryhole = 0 or rand(1,5) = 5:
 		act 'Sign the wall':
@@ -130,7 +122,7 @@ if $ARGS[0] = 'hole':
 				gs 'stat'
 				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/eww.mp4"></video></center>'
 				'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
-				act'Leave': gt 'gdktoilet_womens', 'womens'
+				act 'Leave': gt $loc, $loc_arg
 			end
 
 			gs 'willpower', 'bj', 'self'
@@ -138,7 +130,7 @@ if $ARGS[0] = 'hole':
 				act 'Suck it (<<will_cost>> Willpower)': 
 					gs 'willpower', 'bj', 'self'
 					gs 'willpower', 'pay', 'self'
-					gt 'gdktoilet_womens', 'blowjob'
+					gt 'gloryhole', 'blowjob'
 				end
 			else
 				act 'Suck it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -148,7 +140,7 @@ if $ARGS[0] = 'hole':
 				act 'Touch the shaft (<<will_cost>> Willpower)':
 					gs 'willpower', 'hj', 'self'
 					gs 'willpower', 'pay', 'self'
-					gt 'gdktoilet_womens', 'virgin'
+					gt 'gloryhole', 'virgin'
 				end
 			elseif pcs_throat = 0 and will_cost > pcs_willpwr:
 				act 'Touch the shaft (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -157,12 +149,12 @@ if $ARGS[0] = 'hole':
 	elseif rand(1, 10) >= 7 - (ghnow * 2):
 		*clr & cla
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ghseemen.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/see_men.jpg"></center>'
 		'You look through the hole and see several men with their backs to you, using the urinals.'
 		act 'Don''t do it':
 			cla
 			'You move away from the hole reconsidering what you were about to do and quickly leave the stall.'
-			act 'Leave':gt 'gdktoilet_womens', 'womens'
+			act 'Leave': gt $loc, $loc_arg
 		end
 		gs 'willpower', 'bj', 'self'
 		if will_cost <= pcs_willpwr:
@@ -177,13 +169,13 @@ if $ARGS[0] = 'hole':
 					'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
 					'You put your finger in the hole hoping to entice a man to come over...'
 					'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
-					act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
 				elseif gloryhole > 0:
-					'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ready.jpg"></center>'
+					'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/ready.jpg"></center>'
 					'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
 					'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
-					act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
 				end
+				act 'Suck it': gt 'gloryhole', 'blowjob'
+				
 				gs 'willpower', 'bj', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Stop (<<will_cost>> Willpower)':
@@ -198,13 +190,17 @@ if $ARGS[0] = 'hole':
 								gs 'willpower', 'bj', 'resist', 'hard'
 								gs 'willpower', 'pay', 'resist'
 								gs 'stat'
-								gt 'gdktoilet_womens', 'rape'
+								!gt 'gloryhole', 'rape'
+								gt $loc, $loc_arg
 							end
 						else
 							act 'Take his money and Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
-						act 'Give back the money and Leave': money -= 100 & gt 'gdktoilet_womens', 'womens'
-						act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
+						act 'Give back the money and Leave': 
+							money -= 100
+							gt $loc, $loc_arg
+						end
+						act 'Blow Him': gt 'gloryhole', 'blowjob'
 					end
 				else
 					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -216,13 +212,13 @@ if $ARGS[0] = 'hole':
 	else
 		*clr & cla
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ghseenomen.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/see_none.jpg"></center>'
 		'Looking through the hole, you can see a row of urinals on the other side. The hole must be to the men''s room next door. You don''t see any men currently in there.'
-		act 'Leave': gt 'gdktoilet_womens', 'womens'
+		act 'Leave': gt $loc, $loc_arg
 		act 'Wait':
 			cla
 			'You decide stay and wait for someone to come.'
-			act 'Keep looking': gs 'gdktoilet_womens', 'hole'
+			act 'Keep looking': gs 'gloryhole', 'hole'
 		end
 	end
 end
@@ -237,7 +233,7 @@ if $ARGS[0] = 'virgin':
 		gs 'stat'
 		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/eww.mp4"></video></center>'
 		'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
-		act'Leave':gt 'gdktoilet_womens', 'womens'
+		act 'Leave': gt $loc, $loc_arg
 	end
 	act 'Grab it':
 		*clr & cla
@@ -255,7 +251,7 @@ if $ARGS[0] = 'virgin':
 				gs 'stat'
 				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/eww.mp4"></video></center>'
 				'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop...? Hello? Are you still there? What the fuck!"'
-				act 'Quickly get out': gt 'gdktoilet_womens', 'womens'
+				act 'Quickly get out': gt $loc, $loc_arg
 			end
 		else
 			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -276,7 +272,7 @@ if $ARGS[0] = 'virgin':
 				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghmastcum.mp4"></video></center>'
 				'Without any warning, hot white liquid spurts out the tip of his penis. You look at your hands, watching the sperm run down the back of your hand and down onto your arm. The man panting says, "That was," he takes another breath, "That was great."'
 				'You decide to lick a bit of the white liquid off your hand curiously wanting to know what it tastes like. It''s slimy and tastes tart.'
-				act 'Continue': gt 'gdktoilet_womens', 'emptystall'
+				act 'Continue': gt 'gloryhole', 'start'
 			end
 		end
 	end
@@ -286,46 +282,62 @@ if $ARGS[0] = 'blowjob':
 	*clr & cla
 	guy += 1
 	ghnow += 1
-	gloryhole += 1
-	temp = rand(1,3)
-	'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghbj<<temp>>.mp4"></video></center>'
+	stat['gloryhole'] += 1
+	temp = rand(1,5)
+
+	$bjVideoSource = 'images/locations/shared/gloryhole/sex/dressed'
+	'<center><video autoplay loop src="<<$bjVideoSource>>/bj<<rand(1,5)>>.mp4"></video></center>'
 	'You wrap your lips around his dick and take his <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock in your mouth and start to suck it, you suck the cock enthusiastically.'
 	gs 'arousal', 'bj', 5, 'unknown', 'sub'
 	gs 'stat'
-	if stat['vaginal'] > 0 or stat['anal'] > 0:act 'Undress':gt 'gdktoilet_womens', 'ghsex'
+	if stat['vaginal'] > 0 or stat['anal'] > 0:act 'Undress':gt 'gloryhole', 'ghsex'
 	act 'Continue to Suck':
 		*clr & cla
-		temp = rand(1, 3)
-		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghbj<<temp>>.mp4"></video></center>'
+		'<center><video autoplay loop src="<<$bjVideoSource>>/bj<<rand(1,5)>>.mp4"></video></center>'
 		'You suck on his dick, bobbing your head, sometimes using your hands to stroke his shaft at the same time, other times your hands massage his balls. Before to long you hear the guy moan in pleasure, "I''m cuming."'
 		gs 'arousal', 'bj', 5, 'unknown', 'sub'
 		gs 'stat'
-		act 'Swallow':
+		
+		act 'Keep sucking':
 			*clr & cla
-			gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
-			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-		end
-		gs 'willpower', 'swallow', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Step back (<<will_cost>> Willpower)':
-				*clr & cla
-				facial += 1
-				gs 'willpower', 'swallow', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+			'<center><video autoplay loop src="<<$bjVideoSource>>/bj<<rand(1,5)>>.mp4"></video></center>'
+			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth.'
+			act 'Swallow':
+				cla
+				gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
 				gs 'arousal', 'end'
 				gs 'stat'
-				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
-				'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+				'You gather a mouthful of sperm, and then swallow it. Their sperm has a sticky and sharp taste which makes you grimace.'
+				act 'Get up': gt 'gloryhole', 'start'
+			end
+
+			act 'Spit out':
+				cla
+				gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'You decide to spit it all out.'
+				act 'Get up': gt 'gloryhole', 'start'
 			end
-		else
-			act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
+		gs 'willpower', 'swallow', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Step back (<<will_cost>> Willpower)':
+					*clr & cla
+					
+					gs 'willpower', 'swallow', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+					gs 'arousal', 'end'
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
+					'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+					act 'Get up': gt 'gloryhole', 'start'
+				end
+			else
+				act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		
 	end
 end
 
@@ -333,12 +345,139 @@ if $ARGS[0] = 'ghsex':
 	*clr & cla
 	gs 'stat'
 	'<center><b><font color="maroon">Empty Stall</font></b></center>'
-	'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghundress.mp4"></video></center>'
+	'<center><video autoplay loop src="images/locations/shared/gloryhole/action/undress.mp4"></video></center>'
 	'You let go of him and quickly undress, once you are naked you start stroking him again while you line yourself up with his dick. You badly want to fuck him.'
 	gs 'arousal', 'hj', 5, 'unknown', 'sub'
 	gs 'stat'
-	if stat['anal'] > 0: act 'Ass':gt 'gdktoilet_womens', 'anal'
-	if stat['vaginal'] > 0: act 'Pussy':gt 'gdktoilet_womens', 'pussy2'
+	if stat['anal'] > 0: act 'Ass':gt 'gloryhole', 'anal'
+	if stat['vaginal'] > 0: 
+		if prezik > 0: act "Use a condom": gt 'gloryhole', 'condom'
+
+		gs 'willpower', 'sex', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Pussy (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'self'
+				sexcontra = 0
+				gt 'gloryhole', 'pussy'
+			end
+		else:
+			act 'Pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
+
+if $ARGS[0] = 'condom':
+	*clr & cla
+	gs 'stat'
+	'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/condom_on.mp4"></video></center>'
+	dynamic $prezik
+	protect = 1
+	if preziktype = 2:
+		sexcontra = 7
+		'You take one of your sabotaged condoms and put it on the stranger.'
+	else
+		sexcontra = 3
+		'You take a condom and put it on the stranger''s dick.'
+	end
+	act 'Continue': gt 'gloryhole', 'pussy'
+end
+
+if $ARGS[0] = 'pussy':
+	*clr & cla
+	gs 'stat'
+
+	temp = rand(1,5)
+	if rand(0,2) > 0:
+		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/sex<<temp>>.mp4"></video></center>'
+	else:
+		if protect = 1:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/vagcon<<temp>>.mp4"></video></center>'
+		else:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/vag<<temp>>.mp4"></video></center>'
+		end
+	end
+	
+	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly. After several minutes, you hear him on the other side of the wall yell out, "I''m gonna cum."'
+	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+	gs 'stat'
+	if protect ! 1:
+		gs 'dinSex', 'std_trigger'
+		
+		if tabletkicheck  = 0:
+			gs 'willpower', 'cum_inside', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Allow him to cum inside (<<will_cost>> WillPower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
+					'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghcreampie.mp4"></video></center>'
+					'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
+					gs 'cuminsidereact', 'an unknown guy from the gloryhole'
+					gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+					minut -= 9
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'Get dressed': gt 'gloryhole', 'start'
+				end
+			else
+				act 'Allow him to cum inside (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else:
+			act 'Allow him to cum inside':
+				*clr & cla
+				gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghcreampie.mp4"></video></center>'
+				'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
+				gs 'cuminsidereact', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Get dressed': gt 'gloryhole', 'start'
+			end
+		end
+		
+		act 'Quickly turn around and get on your knees':
+			*clr & cla
+			gs 'stat'
+			act 'Let him cum in your mouth':
+				*clr & cla
+				gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
+				'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+				gs 'arousal', 'bj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Get dressed': gt 'gloryhole', 'start'
+			end
+			act 'Let him cum on your face':
+				*clr & cla
+				
+				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'hj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
+				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+
+				act 'Get dressed': gt 'gloryhole', 'start'
+			end
+		end
+	else
+		if sexcontra = 4:
+			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom burst."'
+		elseif sexcontra = 5:
+			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom is missing!"'
+		else
+			'<<$boydesc>> groaned and you realized that he came in the condom.'
+		end
+		sexcontra = 0
+		protect = 0
+
+		act 'Get dressed': gt 'gloryhole', 'start'
+	end
 end
 
 if $ARGS[0] = 'anal':
@@ -353,8 +492,12 @@ if $ARGS[0] = 'anal':
 	act 'Keep Going':
 		*clr & cla
 		gs 'stat'
-		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghanal.mp4"></video></center>'
-
+		temp = rand(1,5)
+		if rand(0,2) > 0:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/sex<<temp>>.mp4"></video></center>'
+		else:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/anal<<temp>>.mp4"></video></center>'
+		end
 		if pcs_ass < 10:
 			'The pain doesn''t fade and instead it starts to hurt worse after a while and the pleasure starts to fade. You fuck his dick with your ass, at first taking him deeper and deeper, as you get faster and faster. As the pleasure fades and the pain gets worse you slow down and don''t take him as deep. You start to rub your clit to help with the sensation of pleasure. You consider stopping as the pain gets worse, but you can tell by the throbbing of his dick and ragged breathing he is about to cum and decided to keep it up so he can finish.'
 		elseif pcs_ass < 20:
@@ -365,21 +508,25 @@ if $ARGS[0] = 'anal':
 		gs 'arousal', 'anal', 5, 'unknown', 'sub'
 		gs 'stat'
 		
-		gs 'willpower', 'anal', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Stop (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'anal', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/analpain.jpg"></center>'
-				'The pain becomes too much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
-				act 'Leave': gt 'gdktoilet_womens', 'womens'
-			end
-		else
-			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		if pcs_ass < 10:
+				if will_cost <= pcs_willpwr:
+					act 'Stop (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'anal', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/analpain.jpg"></center>'
+						'The pain becomes too much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
+						act 'Leave': gt $loc, $loc_arg
+					end
+				else
+					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 		end
+		gs 'willpower', 'anal', 'resist'
+		
+
 		act 'Let him cum in your ass':
 			*clr & cla
 			gs 'cum_call', 'anus', 'an unknown guy from the gloryhole'
@@ -391,163 +538,61 @@ if $ARGS[0] = 'anal':
 			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghanalcream1.mp4"></video></center>'
 			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
 
-			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+			act 'Get up': gt 'gloryhole', 'start'
 		end
-		gs 'willpower', 'cum_inside_anal', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Let him cum all over your ass (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'cum_inside_anal', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'anal', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
-				gs 'stat'
-				
-				'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ghcumonass.jpg"></center>'
-				'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
 
-				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-			end
-		else
-			act 'Let him cum all over your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Turn around, kneel and let him cum in your mouth':
+		act 'Let him cum all over your ass':
 			*clr & cla
-			gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
-			'Once down on your knees you take his dick into your mouth and start sucking him, tasting your own ass on his dick. But you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-			gs 'arousal', 'bj', 10, 'unknown', 'sub'
+			gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'anal', 10, 'unknown', 'sub'
 			minut -= 9
 			gs 'arousal', 'end'
 			gs 'stat'
+			
+			'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ghcumonass.jpg"></center>'
+			'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
 
-			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+			act 'Get up': gt 'gloryhole', 'start'
 		end
+
 		gs 'willpower', 'swallow', 'resist'
 		if will_cost <= pcs_willpwr:
-			act 'Turn around, kneel and let him cum on your face (<<will_cost>> Willpower)':
+			act 'Turn around, kneel and let him cum in your mouth (<<will_cost>> Willpower)':
 				*clr & cla
 				gs 'willpower', 'swallow', 'resist'
 				gs 'willpower', 'pay', 'resist'
-				facial += 1
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'hj', 10, 'unknown', 'sub'
+				gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
+				'Once down on your knees you take his dick into your mouth and start sucking him, tasting your own ass on his dick. But you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+				gs 'arousal', 'bj', 10, 'unknown', 'sub'
 				minut -= 9
 				gs 'arousal', 'end'
 				gs 'stat'
-				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
-				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
-				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+				act 'Get up': gt 'gloryhole', 'start'
 			end
 		else
-			act 'Turn around, kneel and let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	end
-end
-
-if $ARGS[0] = 'pussy':
-	if prezik > 0:
-		dynamic $prezik
-		protect = 1
-		if preziktype = 2:
-			sexcontra = 7
-			'You take one of your sabotaged condoms and put it on the stranger.'
-		else
-			sexcontra = 3
-			'You take a condom and put it on the stranger''s dick.'
+			act 'Turn around, kneel and let him cum in your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
-	else
-		sexcontra = 0
-	end
-end
 
-if $ARGS[0] = 'pussy2':
-	*clr & cla
-	gs 'stat'
-	if protect = 1:
-		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghsexcon.mp4"></video></center>'
-	else
-		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghsex.mp4"></video></center>'
-	end
-	gs 'gdktoilet_womens', 'pussy'
-	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly. After several minutes, you hear him on the other side of the wall yell out, "I''m gonna cum."'
-	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
-	gs 'stat'
-	if protect ! 1:
-		act 'Allow him to cum inside':
+		act 'Turn around, kneel and let him cum on your face':
 			*clr & cla
-			gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghcreampie.mp4"></video></center>'
-			'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
-			gs 'cuminsidereact', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+			
+			gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'hj', 10, 'unknown', 'sub'
 			minut -= 9
 			gs 'arousal', 'end'
 			gs 'stat'
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
+			'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
-			act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-		end
-		gs 'willpower', 'cum_inside', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Quickly turn around and get on your knees (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'cum_inside', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'stat'
-				act 'Let him cum in your mouth':
-					*clr & cla
-					gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
-					'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
-					'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-					gs 'arousal', 'bj', 10, 'unknown', 'sub'
-					minut -= 9
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-				end
-				gs 'willpower', 'swallow', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Let him cum on your face (<<will_cost>> Willpower)':
-						*clr & cla
-						gs 'willpower', 'swallow', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						facial += 1
-						gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-						gs 'arousal', 'hj', 10, 'unknown', 'sub'
-						minut -= 9
-						gs 'arousal', 'end'
-						gs 'stat'
-						'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
-						'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-
-						act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-					end
-				else
-					act 'Let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
-			end
-		else
-			act 'Quickly turn around and get on your knees (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			act 'Get up': gt 'gloryhole', 'start'
 		end
-	else
-		if sexcontra = 4:
-			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom burst."'
-		elseif sexcontra = 5:
-			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom is missing!"'
-		else
-			'<<$boydesc>> groaned and you realized that he came in the condom.'
-		end
-		sexcontra = 0
-		protect = 0
 
-		act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
 	end
 end
 
-if $ARGS[0] = 'rape':
+!{if $ARGS[0] = 'rape':
 	*clr & cla
 	menu_off = 1
 	gs 'stat'
@@ -588,33 +633,12 @@ if $ARGS[0] = 'rape':
 				end
 			end
 		end
-	elseif (day >= 5 and week < 7) and (hour >= 20 and hour <= 23):
-		if music_on = 1:
-			$track_loop = 'sound/komb.mp3'
-			volume = 50
-			music_loop = 1
-			pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
-		else
-			music_loop = 0
-			close all
-			pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
-		end
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club.jpg"></center>'
-		'You run into the crowd and start dancing to blend in. You hear a man yell out, "Where''s that bitch that took my money?" He storms off and you feel like it''s your lucky day today.'
-		act 'Dance':
-			*clr & cla
-			minut +=10
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/dance.jpg"></center>'
-			'You continue to dance until the man has left.'
-			act 'Stop': gt 'pav_disco'
-		end
 	else
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
 		'You run from the community center and don''t stop until you are back in the residential area'
 		act 'Catch your breath': minut += 5 & gt 'pav_residential'
 	end
-end
+end}
 
 --- gloryhole ---------------------------------

+ 1 - 1
locations/gopnew.qsrc

@@ -733,7 +733,7 @@ if $ARGS[0] = 'tf':
 		act 'Continue':
 			cla & *clr
 			minut += 3
-			facial += 1
+			
 			gs 'boyStat', 'A102'
 			spafinloc = 11
 			gs 'cum_manage'

+ 3 - 3
locations/gopskver.qsrc

@@ -668,7 +668,7 @@ if $ARGS[0] = 'BjBeerDouble':
 	pcs_throat = pcs_throat + 1
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	minut += 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'
@@ -741,7 +741,7 @@ if $ARGS[0] = 'BjBeerPhone':
 	pcs_throat += 1
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	minut += 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'
@@ -782,7 +782,7 @@ if $ARGS[0] = 'BjBeerPalevo':
 	pcs_throat = pcs_throat + 1
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	minut += 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'

+ 1 - 1
locations/husbSex.qsrc

@@ -244,7 +244,7 @@ if $ARGS[0] = 'minet':
 
 		tiprand = RAND(0,1)
 		if tiprand = 0:
-			facial += 1
+			
 			gs 'boyStat', $HusID
 			sexpartkno = 1
 			spafinloc = 11

+ 2 - 2
locations/ilyroom.qsrc

@@ -186,7 +186,7 @@ if StoryLine = 0 or altQS = 1:
 													act 'Get on your knees':
 														cls
 														minut += 5
-														facial += 1
+														
 														cumface += 1
 														gs 'stat'
 														'<center><img <<$set_imgh>> src="images/shared/sex/group/cum/threesome6.jpg"></center>'
@@ -326,7 +326,7 @@ else
 													act 'Get on your knees':
 														cls
 														minut += 5
-														facial += 1
+														
 														cumface += 1
 														gs 'stat'
 														'<center><img <<$set_imgh>> src="images/shared/sex/group/cum/threesome6.jpg"></center>'

+ 2 - 2
locations/katalkinSex.qsrc

@@ -84,8 +84,8 @@ if $ARGS[0] = 'sexgo':
 
 				act 'Take his load on your face':
 					*clr & cla
-					facial += 1
-					KatalkinFacial += 1
+					
+					Katalkin
 					gs 'cum_call','face',$boy,1
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/katalkin/sex/facial.jpg"></center>'
 					'When he is about to orgasm, you release his cock from your mouth and give it a few quick jerks with your fingers as you aim it over your face, closing your eyes in anticipation. Soon enough you feel his warm load splattering all over your face... and wow, it''s a lot! You lick your lips to have a taste. It tastes somewhat bitter, but not necessarily unpleasant.'

+ 1 - 1
locations/kit_din.qsrc

@@ -13,7 +13,7 @@ $santehnikgr = {
 $santehnikend3 = {
 	*clr & cla
 	ransloman = 0
-	facial += 1
+	
 	spafinloc = 11
 	gs 'cum_manage'
 	if GrishaSex = 0:GrishaSex = 1 & guy += 1

+ 2 - 2
locations/metro_events.qsrc

@@ -208,7 +208,7 @@ if $ARGS[0] = 'b':
 						act 'Continue to suck':
 							*clr & cla
 							gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
-							facial += 1
+							
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote3.jpg"></center>'
 							'The man pulls his cock out of your mouth, and hot cum splatters across your cheek and chin. Once he has milked the last drop of sperm from his cock onto your face, he tucks his cock into his pants and moves away. He forces his way through the crowd before disappearing, leaving you alone with his cum all over your face.'
@@ -358,7 +358,7 @@ if $ARGS[0] = 'c':
 							act 'Continue to suck':
 								*clr & cla
 								gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
-								facial += 1
+								
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote3.jpg"></center>'
 								'The man pulls his cock out of your mouth, and hot cum splatters across your cheek and chin. Once he has milked the last drop of sperm from his cock onto your face, he tucks his cock into his pants and moves away. He forces his way through the crowd before disappearing, leaving you alone with his cum all over your face.'

+ 3 - 3
locations/obj_din.qsrc

@@ -732,8 +732,8 @@ if $ARGS[0] = 'stats':
 	if orgasm_clit > 0 : '<<orgasm_clit>> of them from clitoral stimulation.'
 	if orgasm - orgasm_clit - orgasm_anal > 0 : '<<orgasm - orgasm_clit - orgasm_anal>> of them vaginal orgasms.'
 	if orgasm_anal > 0 : '<<orgasm_anal>> of them anal orgasms.'
-	if swallow > 0: 'Sperm swallowed <<swallow>> times.'
-	if facial > 0: 'You have taken <<facial>> facials.'
+	if stat['swallow'] > 0: 'Sperm swallowed <<stat['swallow']>> times.'
+	if stat['cum_facial'] > 0: 'You have taken <<stat['cum_facial']>> facials.'
 	if frot > 0 or hump > 0: 'Your clothes have been come on <<frot + hump>> times.'
 	! This is my suggestion, change it however you see fit, Sicaa
 	if stat['pee_give'] > 0: 'You''ve peed on others <<stat[''pee_give'']>> times.'
@@ -757,7 +757,7 @@ if $ARGS[0] = 'stats':
 	if bj > 0 or stat['bj'] > 0 or stat['hidden_bj'] > 0:
 		'Sucked cock (known/unknown): <<stat[''bj'']>>/<<stat[''hidden_bj'']>>'
 		if bja > 0: 'Sucked your boyfriends cock: <<bja>>'
-		if gloryhole > 0 or hidden_gloryhole > 0: 'Sucked cock in a gloryhole (known/unknown): <<gloryhole>>/<<hidden_gloryhole>>'
+		if stat['gloryhole'] > 0 or stat['hidden_gloryhole'] > 0: 'Sucked cock in a gloryhole (known/unknown): <<stat['gloryhole']>>/<<stat['hidden_gloryhole']>>'
 		if furibj > 0: 'Sucked off truckers for a ride <<furibj>> times'
 		if furi['road_head_girl'] = 1: 'The truckers who drive the lorries nicknamed you "Road Head Girl".'
 		

+ 9 - 9
locations/pav_disco_sex.qsrc

@@ -548,7 +548,7 @@ if $ARGS[0] = 'kissing':
 											if boynumBlock = 0: guy += 1
 											if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1
 
-											facial += 1
+											
 											spafinloc = 11
 											gs 'cum_manage'
 											spafinloc = 7
@@ -1887,7 +1887,7 @@ if $ARGS[0] = 'hotelsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 					'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
@@ -1924,7 +1924,7 @@ if $ARGS[0] = 'hotelsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 					'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
 					if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -1948,7 +1948,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
 						if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -2005,7 +2005,7 @@ if $ARGS[0] = 'hotelsex':
 								*clr & cla
 								spafinloc = 11
 								gs 'cum_manage'
-								facial += 1
+								
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 								'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 								'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
@@ -2073,7 +2073,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
@@ -2139,7 +2139,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'You keep sucking his dick for a while longer, before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
@@ -2173,7 +2173,7 @@ if $ARGS[0] = 'hotelsex':
 							*clr & cla
 							spafinloc = 11
 							gs 'cum_manage'
-							facial += 1
+							
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 							'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
 							if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -2197,7 +2197,7 @@ if $ARGS[0] = 'hotelsex':
 								*clr & cla
 								spafinloc = 11
 								gs 'cum_manage'
-								facial += 1
+								
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 								'After he fucks your ass for a while, you turn to look over your shoulder and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
 								if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'

+ 6 - 6
locations/pornfilm.qsrc

@@ -166,7 +166,7 @@ if $ARGS[0] = '2':
 				act 'Open your mouth':
 					*clr & cla
 					minut += 5
-					facial += 1
+					
 					'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/cum.mp4"></video></center>'
 					'<<$pakter[1]>> gives you a nod to let you know he is close, so you start quickly jerking him and stick your tongue out for him to shoot his load.'
 					cumnostd = 1
@@ -250,7 +250,7 @@ if $ARGS[0] = '3':
 						cumnostd = 1
 						gs 'cum_call', 'mouth_swallow', $pakterID[1], 1, 0, 0, 36
 						gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
-						facial += 1
+						
 						gs 'stat'
 						'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/cum.mp4"></video></center>'
 						'<<$pakter[1]>> is pounding you hard in the missionary position, your legs spread high and wide as you talk dirty for the camera, when you hear him panting loudly and feel him pulling out of you. You slide off the bed onto your knees in front of him and he shoots his load across your face with a loud grunt.'
@@ -340,7 +340,7 @@ if $ARGS[0] = '4':
 						act 'Kneel down and open your mouth':
 							*clr & cla
 							minut += 5
-							facial += 1
+							
 							gs 'stat'
 							'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/cum.mp4"></video></center>'
 							'<<$pakter[1]>> grabs you by the hips and really starts pounding your ass. Just as it''s starting to hurt, he pulls out of your ass and you quickly turn and kneel before him. He vigorously jerks his dick and his cum is soon splattering across your face and onto your tongue.'
@@ -436,7 +436,7 @@ if $ARGS[0] = '5':
 					act 'Facial':
 						*clr & cla
 						minut += 5
-						facial += 1
+						
 						pornswall += 1
 						'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/tcum.mp4"></video></center>'
 						'You are about to move around to clean up <<$pakter[1]>> when <<$pakter[2]>> grabs your head and shoots his load across your face. The two men say the most depraved things as cum slowly trickles down your face and out of your asshole.'
@@ -528,7 +528,7 @@ if $ARGS[0] = '6':
 						act 'Finish them':
 							*clr & cla
 							minut += 5
-							facial += 1
+							
 							'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/tcum.mp4"></video></center>'
 							'The guys tell you they''re close and both pull out. You grab <<$pakter[1]>>''s dick and begin to suck it.'
 							'As you suck his dick, your head is suddenly grabbed and you are turned around. <<$pakter[2]>> shoots his load across your face and into your mouth, <<$pakter[1]>> following him close behind.'
@@ -1403,7 +1403,7 @@ if $ARGS[0] = '14':
 				gs 'cum_call', 'hair', 'Porn Fan', 0, 0, 10000, 40
 			end
 			lip50 -= 1
-			facial += 1
+			
 		end
 		if lip50 > 0: jump 'gbface'
 		:gbass

+ 1 - 1
locations/qwmeet.qsrc

@@ -447,7 +447,7 @@ if $ARGS[0] = 'qwbereg':
 							'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
 							'You took out a member and at this point Vladimir discharged directly on your face, covering it with warm and sticky cum.'
 							gs 'arousal', 'bj', 5, 'sub'
-							facial += 1
+							
 							gs 'cum_call','face', $boy,1
 							gs 'arousal', 'end'
 							gs 'stat'

+ 1 - 1
locations/rex_events.qsrc

@@ -822,7 +822,7 @@ if $ARGS[0] = 'Party_rex_sex_cum':
 	sexpartkno = 1
 	sexvolume = 8
 	gs 'cum_manage'
-	facial += 1
+	
 	spafinloc = 11
 	sexpartkno = 1
 	sexvolume = 12

+ 13 - 13
locations/rex_party_sexEvents.qsrc

@@ -173,7 +173,7 @@ if $ARGS[0] = 'ira_lena_rex_cum':
 		'Lena and Ira without hesitation began to lick up all the cum, then they kiss you and each other, sharing the taste of sperm with you.'
 		''
 	else
-		facial += 1
+		
 		spafinloc = 11
 		gs 'cum_manage'
 		spafinloc = 12
@@ -341,7 +341,7 @@ if $ARGS[0] = 'rex_sex_cum':
 	sexpartkno = 1
 	sexvolume = 8
 	gs 'cum_manage'
-	facial += 1
+	
 	spafinloc = 11
 	sexpartkno = 1
 	sexvolume = 12
@@ -371,7 +371,7 @@ if $ARGS[0] = 'rex_toilet_bj':
 	act 'Continue':
 		cls
 		gs 'arousal', 'bj', 8
-		facial += 1
+		
 		spafinloc = 12
 		gs 'cum_manage'
 		spafinloc = 11
@@ -703,7 +703,7 @@ if $ARGS[0] = 'orgy':
 	end
 	i = rand(1,2)
 	if i = 1:
-		facial += 1
+		
 		gs 'arousal', 'bj', 5, 'gangbang'
 		spafinloc = 12
 		gs 'cum_manage'
@@ -723,7 +723,7 @@ if $ARGS[0] = 'orgy':
 			*clr
 			gs 'arousal', 'vaginal', 30, 'group', 'gangbang'
 			gs 'arousal', 'bj', -30, 'group', 'gangbang'
-			facial += 1
+			
 			spafinloc = 12
 			gs 'cum_manage'
 			spafinloc = 11
@@ -785,7 +785,7 @@ if $ARGS[0] = 'gangbang_outdoor':
 			act 'Open your mouth':
 				cls
 				minut += 5
-				facial += 1
+				
 				cumprecheck = 1
 				gs 'cum_manage'
 				spafinloc = 8
@@ -971,7 +971,7 @@ if $ARGS[0] = 'gangbang_outdoor':
 			gs 'cum_manage'
 			if rand(0,5) = 5:
 				i = rand(0,16)
-				if i = 11: facial += 1
+				if i = 11: 
 				if i = 2 or i = 5: i -= 2
 				if i = 6: i = 1
 				if i = 7: i = 4
@@ -991,7 +991,7 @@ if $ARGS[0] = 'gangbang_outdoor':
 			gs 'cum_manage'
 			if rand(0,5) = 5:
 				i = rand(0,16)
-				if i = 11: facial += 1
+				if i = 11: 
 				if i = 2 or i = 5: i -= 2
 				if i = 6: i = 1
 				if i = 7: i = 4
@@ -1002,7 +1002,7 @@ if $ARGS[0] = 'gangbang_outdoor':
 			end
 			gs 'boyStat', $boy2
 			i = rand(0,16)
-			if i = 11: facial += 1
+			if i = 11: 
 			if i = 2 or i = 5: i -= 2
 			if i = 6: i = 1
 			if i = 7: i = 4
@@ -1013,7 +1013,7 @@ if $ARGS[0] = 'gangbang_outdoor':
 			if i = 0: i2 = 1
 			if rand(0,5) = 5:
 				i = rand(0,16)
-				if i = 11: facial += 1
+				if i = 11: 
 				if i = 2 or i = 5: i -= 2
 				if i = 6: i = 1
 				if i = 7: i = 4
@@ -1073,7 +1073,7 @@ if $ARGS[0] = 'gangbang_indoor':
 		act 'Take their cum':
 			cls
 			minut += 5
-			facial += 1
+			
 			cumprecheck = 1
 			gs 'cum_manage'
 			spafinloc = 15
@@ -1184,7 +1184,7 @@ if $ARGS[0] = 'boobs_yes':
 						minut += 5
 						spafinloc = 7
 						gs 'cum_manage'
-						facial += 1
+						
 						spafinloc = 11
 						gs 'cum_manage'
 						party_boys_in += 1
@@ -1324,7 +1324,7 @@ if $ARGS[0] = 'toilet_sex_events':
 					gs 'cum_manage'
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					i = rand(11,18)
 					if i = 11:
 						'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_<<i>>.mp4"></video></center>'

+ 1 - 1
locations/rex_party_smallEvents.qsrc

@@ -1178,7 +1178,7 @@ if $ARGS[0] = 'fun':
 						gs 'cum_manage'
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_<<rand(6,12)>>.jpg"></center>'
 						'You open your mouth and stick out your tongue.'

+ 1 - 0
locations/saveupdater.qsrc

@@ -215,6 +215,7 @@ end
 		telefon_rev = 2
 	end
 
+	if stat['cum_facial'] = 0: stat['cum_facial'] = facial & facial =0
 	if pee > 0: stat['pee'] += pee & killvar 'pee'
 	! Since the arousal calls are seeded in all the scenes where these two variables occur, once they''ve been added to the stat, they should always be less or equal to it.
 	if NatbelQW['pee'] > stat['pee_give']: stat['pee_give'] += NatbelQW['pee']

+ 1 - 1
locations/seeporn.qsrc

@@ -170,7 +170,7 @@ act 'Watch it':
 						spafinloc = 11
 						sexpartkno = 1
 						gs 'cum_manage'
-						facial += 1
+						
 
 						if brotherSex < 6:brotherSex = 6
 						gs 'arousal', 'bj', -5, 'incest', 'sub'

+ 5 - 5
locations/sexm.qsrc

@@ -364,7 +364,7 @@ if $ARGS[0] = 'minet':
 					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
 					'You remove his dick from your mouth and finish off <<$loverdesc[lover_number]>> with your hand.'
 				elseif tiprand = 3:
-					facial += 1
+					
 					spafinloc = 11
 					gs 'cum_manage'
 					loverrelation[lover_number] += 1
@@ -372,7 +372,7 @@ if $ARGS[0] = 'minet':
 					'You take his dick out of your mouth and point it right at your face. You are now covered with <<$loverdesc[lover_number]>>''s warm and sticky cum.'
 				end
 			elseif haraklover[lover_number] = 2:
-				facial += 1
+				
 				spafinloc = 11
 				gs 'cum_manage'
 				loverrelation[lover_number] += 1
@@ -720,14 +720,14 @@ if $ARGS[0] = 'blow':
 						'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
 						'You remove his dick from your mouth and finish off <<$loverdesc[lover_number]>> with your hand.'
 					elseif tiprand = 3:
-						facial += 1
+						
 						spafinloc = 11
 						gs 'cum_manage'
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
 						'You take his dick out of your mouth and point it right at your face. You are now covered with <<$loverdesc[lover_number]>>''s warm and sticky cum.'
 					end
 				elseif haraklover[lover_number] = 2:
-					facial += 1
+					
 					spafinloc = 11
 					gs 'cum_manage'
 					'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
@@ -821,7 +821,7 @@ if $ARGS[0] = 'gangbang':
 	gs 'cum_manage'
 	spafinloc = 12
 	gs 'cum_manage'
-	facial += 1
+	
 	pcs_vag += 1
 	pcs_ass += 1
 	pcs_throat += 1

+ 1 - 1
locations/sexshop.qsrc

@@ -518,7 +518,7 @@ if $ARGS[0] = 'pip':
 					act 'Suck his dick':
 						cla
 						*clr
-						gloryhole += 1
+						stat['gloryhole'] += 1
 						swallow += 1
 						gs 'dinSex', 'std_trigger_oral'
 						ghprand = rand(1, 38)

+ 1 - 1
locations/shop_pussycats.qsrc

@@ -662,7 +662,7 @@ if $ARGS[0] = '13':
 
 			act 'Close your eyes':
 				cla & *clr
-				facial += 1
+				
 				gs 'cum_call', 'face'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/cats/sex/young_shop_quest8.jpg"></center>'

+ 3 - 3
locations/sny.qsrc

@@ -356,7 +356,7 @@ if $ARGS[0] = 'kiss':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/fa2.jpg"></center>'
 					'You suck on Gosha''s dick while Dimka fucks your pussy from behind. After a while, Gosha takes his dick out of your mouth, and a jet of sperm hits you in the face. Several more spurts join the first, splattering your face with his cum.'
@@ -367,7 +367,7 @@ if $ARGS[0] = 'kiss':
 					if condomDima = 1:
 						act 'Further':
 							*clr & cla
-							facial += 1
+							
 							spafinloc = 11
 							gs 'cum_manage'
 							gs 'stat'
@@ -379,7 +379,7 @@ if $ARGS[0] = 'kiss':
 					elseif condomDima = 0:
 					    act 'Further':
 							*clr & cla
-							facial += 1
+							
 							spafinloc = 11
 							gs 'cum_manage'
 							gs 'stat'

+ 1 - 1
locations/trainBimbo.qsrc

@@ -100,7 +100,7 @@ if $ARGS[0] = 'pos22':
 			cls
 			spafinloc = 11
 			gs 'cum_manage'
-			facial += 1
+			
 			minut += 1
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,'+rand(0,8)+'.jpg"></center>'

+ 6 - 6
locations/unused/pornfilm.qsrc

@@ -166,7 +166,7 @@ if $ARGS[0] = '2':
 				act 'Open your mouth':
 					*clr & cla
 					minut += 5
-					facial += 1
+					
 					'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/cum.mp4"></video></center>'
 					'<<$pakter[1]>> gives you a nod to let you know he is close, so you start quickly jerking him and stick your tongue out for him to shoot his load.'
 					cumnostd = 1
@@ -250,7 +250,7 @@ if $ARGS[0] = '3':
 						cumnostd = 1
 						gs 'cum_call', 'mouth_swallow', $pakterID[1], 1, 0, 0, 36
 						gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
-						facial += 1
+						
 						gs 'stat'
 						'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/cum.mp4"></video></center>'
 						'<<$pakter[1]>> is pounding you hard in the missionary position, your legs spread high and wide as you talk dirty for the camera, when you hear him panting loudly and feel him pulling out of you. You slide off the bed onto your knees in front of him and he shoots his load across your face with a loud grunt.'
@@ -340,7 +340,7 @@ if $ARGS[0] = '4':
 						act 'Kneel down and open your mouth':
 							*clr & cla
 							minut += 5
-							facial += 1
+							
 							gs 'stat'
 							'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/cum.mp4"></video></center>'
 							'<<$pakter[1]>> grabs you by the hips and really starts pounding your ass. Just as it''s starting to hurt, he pulls out of your ass and you quickly turn and kneel before him. He vigorously jerks his dick and his cum is soon splattering across your face and onto your tongue.'
@@ -436,7 +436,7 @@ if $ARGS[0] = '5':
 					act 'Facial':
 						*clr & cla
 						minut += 5
-						facial += 1
+						
 						pornswall += 1
 						'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/tcum.mp4"></video></center>'
 						'You are about to move around to clean up <<$pakter[1]>> when <<$pakter[2]>> grabs your head and shoots his load across your face. The two men say the most depraved things as cum slowly trickles down your face and out of your asshole.'
@@ -528,7 +528,7 @@ if $ARGS[0] = '6':
 						act 'Finish them':
 							*clr & cla
 							minut += 5
-							facial += 1
+							
 							'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/sex/tcum.mp4"></video></center>'
 							'The guys tell you they''re close and both pull out. You grab <<$pakter[1]>>''s dick and begin to suck it.'
 							'As you suck his dick, your head is suddenly grabbed and you are turned around. <<$pakter[2]>> shoots his load across your face and into your mouth, <<$pakter[1]>> following him close behind.'
@@ -1403,7 +1403,7 @@ if $ARGS[0] = '14':
 				gs 'cum_call', 'hair', 'Porn Fan', 0, 0, 10000, 40
 			end
 			lip50 -= 1
-			facial += 1
+			
 		end
 		if lip50 > 0: jump 'gbface'
 		:gbass

+ 9 - 9
locations/unused/rex_party_boys_events.qsrc

@@ -183,7 +183,7 @@ if $ARGS[0] = 'out':
 			act 'Open your mouth':
 				cls
 				minut += 5
-				facial += 1
+				
 				cumprecheck = 1
 				gs 'cum_manage'
 				spafinloc = 8
@@ -369,7 +369,7 @@ if $ARGS[0] = 'out':
 			gs 'cum_manage'
 			if rand(0,5) = 5:
 				i = rand(0,16)
-				if i = 11: facial += 1
+				if i = 11: 
 				if i = 2 or i = 5: i -= 2
 				if i = 6: i = 1
 				if i = 7: i = 4
@@ -389,7 +389,7 @@ if $ARGS[0] = 'out':
 			gs 'cum_manage'
 			if rand(0,5) = 5:
 				i = rand(0,16)
-				if i = 11: facial += 1
+				if i = 11: 
 				if i = 2 or i = 5: i -= 2
 				if i = 6: i = 1
 				if i = 7: i = 4
@@ -400,7 +400,7 @@ if $ARGS[0] = 'out':
 			end
 			gs 'boyStat', $boy2
 			i = rand(0,16)
-			if i = 11: facial += 1
+			if i = 11: 
 			if i = 2 or i = 5: i -= 2
 			if i = 6: i = 1
 			if i = 7: i = 4
@@ -411,7 +411,7 @@ if $ARGS[0] = 'out':
 			if i = 0: i2 = 1
 			if rand(0,5) = 5:
 				i = rand(0,16)
-				if i = 11: facial += 1
+				if i = 11: 
 				if i = 2 or i = 5: i -= 2
 				if i = 6: i = 1
 				if i = 7: i = 4
@@ -471,7 +471,7 @@ if $ARGS[0] = 'in':
 		act 'Take their cum':
 			cls
 			minut += 5
-			facial += 1
+			
 			cumprecheck = 1
 			gs 'cum_manage'
 			spafinloc = 15
@@ -607,7 +607,7 @@ if $ARGS[0] = 'boobs_yes':
 						minut += 5
 						spafinloc = 7
 						gs 'cum_manage'
-						facial += 1
+						
 						spafinloc = 11
 						gs 'cum_manage'
 						party_boys_in += 1
@@ -703,7 +703,7 @@ if $ARGS[0] = 'gost_drink_else':
 				act 'Cum':
 					cls
 					minut += 5
-					facial += 1
+					
 					i=5
 					:looppartycrain
 					if i > 0:
@@ -752,7 +752,7 @@ if $ARGS[0] = 'gost_home_cum':
 	cls
 	menu_off = 1
 	minut += 5
-	facial += 1
+	
 	gs 'boyStat', $boy1
 	spafinloc = 11
 	gs 'cum_manage'

+ 1 - 1
locations/unused/rex_party_events.qsrc

@@ -77,7 +77,7 @@ if $ARGS[0] = 'party_toilet_event':
 					gs 'cum_manage'
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					i = rand(11,18)
 					if i = 11:
 						'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_<<i>>.mp4"></video></center>'

+ 5 - 5
locations/unused/rex_party_girls_events.qsrc

@@ -279,7 +279,7 @@ if $ARGS[0] = 'fun':
 						gs 'cum_manage'
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_<<rand(6,12)>>.jpg"></center>'
 						'You open your mouth and stick out your tongue.'
@@ -582,7 +582,7 @@ if $ARGS[0] = 'ira_boy_cum':
 		'Lena and Ira without hesitation began to lick up all the cum, then they kiss you and each other, sharing the taste of sperm with you.'
 		''
 	else
-		facial += 1
+		
 		spafinloc = 11
 		gs 'cum_manage'
 		spafinloc = 12
@@ -662,7 +662,7 @@ if $ARGS[0] = 'rex':
 	act 'Continue':
 		cls
 		gs 'arousal', 'bj', 8
-		facial += 1
+		
 		spafinloc = 12
 		gs 'cum_manage'
 		spafinloc = 11
@@ -791,7 +791,7 @@ if $ARGS[0] = 'boys':
 	end
 	i = rand(1,2)
 	if i = 1:
-		facial += 1
+		
 		gs 'arousal', 'bj', 5, 'gangbang'
 		spafinloc = 12
 		gs 'cum_manage'
@@ -811,7 +811,7 @@ if $ARGS[0] = 'boys':
 			*clr
 			gs 'arousal', 'vaginal', 30, 'group', 'gangbang'
 			gs 'arousal', 'bj', -30, 'group', 'gangbang'
-			facial += 1
+			
 			spafinloc = 12
 			gs 'cum_manage'
 			spafinloc = 11

+ 1 - 1
locations/vikaev1.qsrc

@@ -240,7 +240,7 @@ if $ARGS[0] = 'b_vika_present_cum':
 	pcs_mood += 100
 	minut += 10
 	gs 'arousal', 'end'
-	facial += 1
+	
 	spafinloc = 12
 	gs 'cum_manage'
 	spafinloc = 11

+ 2 - 2
locations/yarik.qsrc

@@ -249,7 +249,7 @@ if $ARGS[0] = '5':
 				act 'Continue':
 					cls
 					minut += 5
-					facial += 1
+					
 					spafinloc = 12
 					gs 'cum_manage'
 					gs 'boyStat', 'A86'
@@ -330,7 +330,7 @@ if $ARGS[0] = '6':
 							act 'Finish':
 								cls
 								gs 'arousal', 'facial', 5
-						!!		facial += 1
+						!!		
 								gs 'arousal', 'end'
 								spafinloc = 12
 								gs 'cum_manage'

+ 1 - 1
locations/youry.qsrc

@@ -186,7 +186,7 @@ if $ARGS[0] = 'quest':
 												sexpartkno = 1
 												spafinloc = 11
 												gs 'cum_manage'
-												facial += 1
+												
 												gs 'stat'
 												'<center><img <<$set_imgh>> src="images/characters/city/yuri/sex/shower2.jpg"></center>'
 												'Yuri cums violently, his hot blasts slapping you in the face, though there aren''t that many of them as Yuri already spent most of his load before.'

+ 3 - 3
locations/zsoft_gopskverGorSlut.qsrc

@@ -505,7 +505,7 @@ if $ARGS[0] = 'piss':
 					gs 'cum_manage'
 					spafinloc = 16
 					gs 'cum_manage'
-					facial += 1
+					
 					swallow += 1
 					gs'stat'
 					'<center><video autoplay loop src="images/locations/pavlovsk/park/gop/p_otsos.mp4"></video></center>'
@@ -713,7 +713,7 @@ if $ARGS[0] = 'cumface':
 		*clr & cla
 		spafinloc = 11
 		gs 'cum_manage'
-		facial += 1
+		
 		gs'stat'
 		randpgiff=rand(1,100)
 		if randpgiff>20:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/oral/cum/cumf'+rand(1,22)+'.jpg"></center>'
@@ -735,7 +735,7 @@ if $ARGS[0] = 'cumface_group':
 		*clr & cla
 		spafinloc = 11
 		gs 'cum_manage'
-		facial += 1
+		
 		gs'stat'
 		randpgiffgr=rand(1,100)
 		if randpgiffgr>20:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/group/cum/cumf'+rand(1,14)+'.jpg"></center>'