Jelajahi Sumber

[Changed] moved swallow to cum_call (didn't change anything where is uses cum_manage)

philormand 4 tahun lalu
induk
melakukan
9b2f399f5a
52 mengubah file dengan 220 tambahan dan 425 penghapusan
  1. 10 20
      locations/AlbStars.qsrc
  2. 3 6
      locations/BelSex.qsrc
  3. 2 3
      locations/BurgerTip.qsrc
  4. 1 2
      locations/FedorEv3.qsrc
  5. 11 22
      locations/FedorEv4.qsrc
  6. 1 2
      locations/HotelWork.qsrc
  7. 1 2
      locations/LBZhouse.qsrc
  8. 5 10
      locations/NikoDates.qsrc
  9. 4 8
      locations/NikoEv2.qsrc
  10. 4 8
      locations/NikoPayback.qsrc
  11. 8 16
      locations/NikoSlut.qsrc
  12. 4 8
      locations/NikoWhore.qsrc
  13. 1 2
      locations/Voltrenersex.qsrc
  14. 1 2
      locations/alexgang.qsrc
  15. 1 2
      locations/arturkiosk.qsrc
  16. 3 6
      locations/brosh.qsrc
  17. 3 6
      locations/brother.qsrc
  18. 5 10
      locations/brother2.qsrc
  19. 1 2
      locations/brother_lessons.qsrc
  20. 2 4
      locations/brother_voyeur.qsrc
  21. 9 18
      locations/burger.qsrc
  22. 2 4
      locations/burgerWork.qsrc
  23. 4 10
      locations/city_kafe.qsrc
  24. 2 4
      locations/city_kavkazkafe.qsrc
  25. 7 14
      locations/city_lake.qsrc
  26. 1 2
      locations/city_saunawhore.qsrc
  27. 1 2
      locations/city_trashplaceevents.qsrc
  28. 5 1
      locations/cum_call.qsrc
  29. 2 4
      locations/gadriver.qsrc
  30. 2 4
      locations/gadukino_event.qsrc
  31. 2 3
      locations/gdktoilet_mens.qsrc
  32. 3 6
      locations/gdktoilet_womens.qsrc
  33. 1 2
      locations/gevent.qsrc
  34. 1 2
      locations/gschool_events.qsrc
  35. 1 2
      locations/gschool_lunch.qsrc
  36. 2 3
      locations/hunterLoveSex.qsrc
  37. 2 4
      locations/hunter_interactions.qsrc
  38. 25 50
      locations/hunters.qsrc
  39. 37 74
      locations/huntersex.qsrc
  40. 1 2
      locations/igorev.qsrc
  41. 1 2
      locations/katalkinSex.qsrc
  42. 5 6
      locations/kotovSex.qsrc
  43. 1 2
      locations/mey_tamara_events.qsrc
  44. 4 8
      locations/mitka.qsrc
  45. 4 8
      locations/mitkabuh.qsrc
  46. 10 20
      locations/mitkasex.qsrc
  47. 1 2
      locations/nichBedroomServant.qsrc
  48. 5 9
      locations/pornfilm.qsrc
  49. 2 4
      locations/pussykats.qsrc
  50. 1 2
      locations/qwmeet.qsrc
  51. 1 2
      locations/swamp_woods.qsrc
  52. 4 8
      locations/swamphouse.qsrc

+ 10 - 20
locations/AlbStars.qsrc

@@ -475,9 +475,8 @@ if $ARGS[0] = 'whore1':
 						'The man pulls out of your mouth and crudly says "Now swallow it like a good little cum slut."'
 						'He squats down and grabs your chin. You do as you''re told and show him your empty mouth. He gives you a pat on the cheek and throws you to the floor.'
 						'You lay there catching your breath as the man goes to the bathroom.'
-						swallow += 1
 						gs 'arousal', 'bj', -1, 'sub', 'humiliation', 'rough'
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust']
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust']
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Call a taxi': gt 'AlbStars', 'cab_home'
@@ -602,8 +601,7 @@ if $ARGS[0] = 'whore2':
 						'Choking slightly, you frantically swallow his cum and show him your empty mouth. He gives you a pat on the cheek and lets you go.'
 						'Well done little lamb. I think we''ll be seeing more of you in the future!" one of the men says. The other gives you a firm, stinging smack on the ass and both men laugh.' 
 						gs 'arousal', 'bj', 10, 'dick1', 'group', 'sub', 'rough', 'humiliation'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust1']
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust1']
 						gs 'pain', 1, 'asscheeks', 'slap'
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -651,8 +649,7 @@ if $ARGS[0] = 'whore2':
 					'The man frees you from his grip, but you don''t have time to recover before the other one grabs your hair and roughly pulls you up to him.'
 					gs 'arousal', 'bj', 5, 'dick', 'group', 'sub'
 					gs 'pain', 1, 'throat', 'choke'
-					swallow += 1
-					gs 'cum_call', 'mouth', $AlbinaQW['Cust']
+					gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust']
 					gs 'stat'
 
 					act 'More cum to swallow':
@@ -663,8 +660,7 @@ if $ARGS[0] = 'whore2':
 						'You do as you''re told and swallow the loads in your mouth, while using your finger to scoop the cum on your chin back into your mouth. You show the man your clean tongue and he releases you with a pat on the head.'
 						'"This little lamb knows her place. I think we''ll be seeing you again soon!"'
 						gs 'arousal', 'bj', 5, 'dick1', 'group', 'sub'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust1']
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust1']
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Call a taxi': gt 'AlbStars', 'cab_home'
@@ -749,8 +745,7 @@ if $ARGS[0] = 'whore3':
 						'He pulls out of your mouth and you collapse on the bed, coughing and gasping for breath. The guys, very emboldened by the experience, laugh at you, calling you an "amazing little cum dumpster."'
 						gs 'arousal', 'bj', 10, 'dick1', 'sub', 'group', 'rough', 'humiliation'
 						gs 'pain', 1, 'throat', 'choke'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust1']
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust1']
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Call a taxi': gt 'AlbStars', 'cab_home'
@@ -788,8 +783,7 @@ if $ARGS[0] = 'whore3':
 				if tipdarand = 0:
 					'The guy fucking your mouth ignores the complaint as he forces his entire length into your mouth and groans. You choke and gag as cum spills into your throat, but the guy keeps you pinned to the bed.'
 					gs 'arousal', 'bj', 5, 'dick', 'sub', 'group'
-					swallow += 1
-					gs 'cum_call', 'mouth', $AlbinaQW['Cust']
+					gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust']
 					gs 'stat'
 					act 'Swallow it':
 						cls
@@ -798,8 +792,7 @@ if $ARGS[0] = 'whore3':
 						'He pulls out and you gasp for breath when the other guy tells you "Keep that mouth open!" You do as you''re told and he steps forwards and deposits his load into your mouth.'
 						'You sit up and swallow the second load, showing the guys your empty mouth. Emboldened by the experience, they laugh at you and make crude remarks about you being a "a good little cocksucking cum whore."'
 						gs 'arousal', 'bj', 5, 'dick1', 'sub', 'group', 'humiliation'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust1']
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust1']
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Call a taxi': gt 'AlbStars', 'cab_home'
@@ -879,8 +872,7 @@ if $ARGS[0] = 'whore4':
 						'You almost pass out as the seemingly never ending stream of cum continues to enter your throat. You are feeling quite bloated when he finally pulls out of your mouth.'
 						'You fall to the floor and start frantically coughing, the last of the cum dribbling from your chin and dripping on your breasts as you try to catch your breath. You look up at the guy, who only has a wide satisified grin on his face.'
 						'"Damn girl, I''m sure that quenched your thrist!" he jokes while patting you on the head.'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust'], 0, 0, 20000, 120 
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust'], 0, 0, 20000, 120 
 						gs 'cum_call', 'face', $AlbinaQW['Cust']
 						gs 'cum_call', 'breasts', $AlbinaQW['Cust']
 						gs 'arousal', 'end'
@@ -1028,8 +1020,7 @@ if $ARGS[0] = 'whore5':
 						'You look up at him, seeking approval. He pats you on the head. "I guess you little white girls really do crave it.'
 						gs 'arousal', 'bj', 10, 'dick1', 'sub', 'deepthroat', 'rough', 'humiliation'
 						gs 'pain', 1, 'throat', 'choke'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, 0, 20000, 120 
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust1'], 0, 0, 20000, 120 
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Call a taxi': gt 'AlbStars', 'cab_home'
@@ -1084,8 +1075,7 @@ if $ARGS[0] = 'whore5':
 						'You again choke and gag as the huge tip hits your throat and another flood of cum enters your mouth. You are again forced to gulp it down before he pulls out. Once he does, you roll over and start coughing and gasping for breath.' 
 						'You then look up at the guys, your face a mess of tears and drool. They both pat you on the head. "I guess you white girls really do crave it." You finish them off by jerking their huge cocks and licking them clean.'
 						gs 'arousal', 'bj', 5, 'dick', 'sub', 'group', 'deepthroat', 'humiliation'
-						swallow += 1
-						gs 'cum_call', 'mouth', $AlbinaQW['Cust1'], 0, 0, 20000, 120 
+						gs 'cum_call', 'mouth_swallow', $AlbinaQW['Cust1'], 0, 0, 20000, 120 
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Call a taxi': gt 'AlbStars', 'cab_home'

+ 3 - 6
locations/BelSex.qsrc

@@ -48,13 +48,12 @@ if $ARGS[0] = 'bj1':
 		'Not daring making him more upset you make sure your teeth don''t get in the way and open your mouth as wider.'
 		act'Open wide':
 			cls
-			gs 'cum_call', 'mouth', 'A113', 1
+			gs 'cum_call', 'mouth_swallow', 'A113', 1
 			gs'stat'
 			picrand = rand(0,10)
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
 			'<<$boydesc>> indicates that he''s about to come, telling you to "Open wide, <<$pcs_nickname>>. You''re going to swallow every little drop."'
 			'You meekly nod and let out "Yes, Mr. Bely..." doing as he says, opening your mouth as wide as you can. He jerks himself off all over your face and you soon feel his warm jets of sperm landing on your left cheek. He adjusts his aim a bit and some of it ends up in your mouth as well. You decide to just sit there with your eyes closed and your mouth open until he tells you otherwise, doing your best to ignore the taste.'
-			swallow += 1
 			belsexpayment = 300
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -95,13 +94,12 @@ if $ARGS[0] = 'bj2':
 		'Your lust takes over and you take him as deep into your mouth as you can, keeping him there until you start to gag and have to come up for air. Taking few breaths to recover, you take him inside again, rapidly moving your head, sucking and deepthroating him for all you''re worth.'
 		act'Keep sucking':
 			cls
-			gs 'cum_call', 'mouth', 'A113', 1
+			gs 'cum_call', 'mouth_swallow', 'A113', 1
 			gs'stat'
 			picrand = rand(0,10)
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
 			'Redoubling your efforts, you reach the base of his wet cock with your <<$liptalk>>. <<$boydesc>> stares you in the face while your lips glide up and down on his hard dick. You know he must be close now.'
 			'You don''t want him to cum yet so you switch it up, using your tongue instead, sliding up and down his shaft, pulling out all of your tricks to make him feel good. You even use some techniques you learned to stall his orgasm for a moment, making it all the more intense for him when he shoots his load into your mouth.'
-			swallow += 1
 			belsexpayment = 300
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -142,14 +140,13 @@ if $ARGS[0] = 'bj3':
 		'"Good girl, keep on sucking my cock." All of a sudden his cock gets stiffer and he pulls out of your mouth. "I''m ready to cum..." You move your head towards his cock but he stops you...'
 		act'Continue':
 			cls
-			gs 'cum_call', 'mouth', 'A113', 1
+			gs 'cum_call', 'mouth_swallow', 'A113', 1
 			gs'stat'
 			picrand = rand(0,10)
 			belsexpayment = 300
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
 			'Instead, <<$boydesc>> starts jerking off, telling you "I''ll be done soon, <<$pcs_nickname>>. I want you to swallow every little drop." He doesn''t last much longer and cums all over your face.'
 			'He squeezes the last few drops of sperm into your mouth and then sticks his dick in your mouth. You swallow his cum obediently and then suck his dick clean, licking every tasty inch of it you can reach. Once he goes soft in your mouth, he pulls out his cock.'
-			swallow += 1
 			gs 'arousal', 'end'
 			gs 'stat'
 			act'Take a shower':gt 'BelSex', 'shower'

+ 2 - 3
locations/BurgerTip.qsrc

@@ -444,8 +444,7 @@ if $ARGS[0] = 'work':
 						act 'You''re great at giving favors':
 							*clr&cla
 							gs 'boyStat', 'A74'
-							swallow += 1
-							gs 'cum_call', 'mouth', 'A74', 1
+							gs 'cum_call', 'mouth_swallow', 'A74', 1
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossbjcar.jpg"></center>'
 							'Determined to send Anatoly home with a smile, you lean over and unzip his pants. You wrap your <<$lip1>> lips around his flaccid penis, and start working your magic. Soon your mouth is full of hard throbbing cock. You make an effort to get him home quickly, and suck like a woman possessed with the need for seed. He does finish quickly, and you slurp it all down with a smile. Anatoly gets himself back in his pants, and sends you on your way saying, "Thanks babe, you''re the best."'
@@ -799,7 +798,7 @@ if $ARGS[0] = 'bj2':
 
 	act 'Swallow it down':
 		*clr&cla
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', 'A74', 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bossbjcum6.jpg"></center>'
 		'You swallow his cum down as fast as you can. You are left with the a strange, but not altogether unpleasant aftertaste in your mouth.'

+ 1 - 2
locations/FedorEv3.qsrc

@@ -202,13 +202,12 @@ if $ARGS[0] = 'Middle':
 			
 			act 'Suck his dick':
 				*clr & cla
-				swallow += 1
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/bj.jpg"></center>'	
 				'You lean over and take Fedor''s dick into your mouth and do your best to suck and massage his dick with your tongue.' 
 				'Fedor combs his fingers through your hair as you continue pleasing him. After a few minutes Fedor lets out a muffled groan then shoots his load into your mouth' 
 				'which you happily swallow before returning to watching the movie like nothing happened.'
 				gs 'boyStat', 'A5'
-				gs 'cum_call', 'mouth', $boy, 1
+				gs 'cum_call', 'mouth_swallow', $boy, 1
 				gs 'arousal', 'bj', 5			
 				gs 'arousal', 'end'				
 				gs 'stat'

+ 11 - 22
locations/FedorEv4.qsrc

@@ -145,11 +145,10 @@ if $ARGS[0] = 'Hall Sex':
 
 				act 'In my mouth':
 					*clr & cla
-					swallow += 1
 					'<center><video autoplay loop src="images/shared/sex/cum/mouth/yum.mp4"></center>'
 					'Fedor then pulls out of you and begins jerking himself while you turn around and take his penis into your mouth. You start sucking and licking until you feel a jet of sperm fill your mouth and instead of swallowing, you look up to Fedor with an open mouth then stare into his eyes as you swallow his cum.'
 					gs 'arousal', 'bj', 10, 'sub'
-					gs 'cum_call', 'mouth', $boy, 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					gs 'arousal', 'end'
 					'Fedor looks at you with a very pleased expression. "You know just what I like." then rubs your forehead, before getting dressed. When you are both dressed Fedor asks "So <<$pcs_firstname>>, are you still up for that movie?'
 					gs 'stat'
@@ -300,7 +299,6 @@ if $ARGS[0] = '3way1':
 				act 'Inside me':
 					*clr & cla
 					IvanPregChat = 1
-					swallow += 1
 					gs 'stat'
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/3way/bed4.mp4"></video></center>'
 					'"Cum inside me!" you say before wrapping your lips back around Ivan''s dick and Fedor responds, "Sure thing." Ivan then turns to Fedor. "You''re gonna get <<$pcs_nickname>> pregnant...Well If that''s what you want but don''t go asking me to babysit for you." Ivan and Fedor begin pumping you faster. After a few seconds Fedor groans and you feel his seed filling your womb causing a muffled moan from you which seems to push Ivan over the edge as he begins shooting his load directly down your throat while you do your best to swallow every drop of. When they are finished Fedor slowly pulls out of you, causing the cum in your womb to almost gush out of your vagina and onto the bed.'
@@ -312,7 +310,7 @@ if $ARGS[0] = '3way1':
 					gs 'arousal', 'vaginal', 5, 'sub'
 					gs 'arousal', 'bj', 5, 'dom'
 					gs 'boyStat', 'A3'
-					gs 'cum_call', 'mouth', $boy, 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					gs 'boyStat', 'A5'
 					gs 'cum_call', '', $boy, 1
 					gs 'arousal', 'end'
@@ -323,7 +321,6 @@ if $ARGS[0] = '3way1':
 			elseif FedorLoveTalk = 1 and IvanPregChat = 1:
 				act 'Inside me':
 					*clr & cla
-					swallow += 1
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/3way/bed4.mp4"></video></center>'
 					'"Cum inside me!" you say before wrapping your lips back around Ivan''s dick as he turns to you. "Don''t worry <<$pcs_nickname>>. We''ll fill you up real good." Ivan and Fedor begin pumping you faster. After a few seconds Fedor groans and you feel his seed filling your womb causing a muffled moan from you which seems to push Ivan over the edge as he begins shooting his load directly down your throat which you do your best to swallow every drop of. When they are finished Fedor slowly pulls out of your causing the cum in your womb to almost gush out of your vagina and onto the bed. You lay back catching your breath as you listen to Fedor and Ivan chatting. "<<$pcs_firstname>> is an amazing girl. You gotta invite me here more often."'
 					*nl
@@ -332,7 +329,7 @@ if $ARGS[0] = '3way1':
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum5.mp4"></video></center>'
 					gs 'boyStat', 'A3'
 					gs 'arousal', 'bj', 5, 'dom'
-					gs 'cum_call', 'mouth', $boy, 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					gs 'boyStat', 'A5'
 					gs 'arousal', 'vaginal', 5, 'sub'
 					gs 'cum_call', '', $boy, 1
@@ -408,7 +405,6 @@ if $ARGS[0] = '3way2':
 
 			act 'Fill me up':
 				*clr & cla
-				swallow += 1
 				'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal2.mp4"></video></center>'
 				'You turn to Ivan, letting Fedors dick slide out of your mouth but then extend your hand to jerk him off as you respond, "I want you both to fill me up." Ivan grins. "Hell yeah <<$pcs_firstname>> I''ll fill you up real good." he then rapidly increases his pace and soon Ivan grabs your hips tightly as he pumps his load into your ass, doing his best to fill your ass to the brim with his seed. Soon after Fedor groans as he shoots his load down your throat which you swallow obediently, savoring every drop. When they both finish with you, they begin chatting with each other. "<<$pcs_nickname>> is a great catch. You need to hold onto this one Fey."'
 				*nl
@@ -420,7 +416,7 @@ if $ARGS[0] = '3way2':
 				gs 'cum_call', 'anus', $boy, 1
 				gs 'boyStat', 'A5'
 				gs 'arousal', 'bj', 5, 'sub'
-				gs 'cum_call', 'mouth', $boy, 1
+				gs 'cum_call', 'mouth_swallow', $boy, 1
 				gs 'arousal', 'end'
 				gs 'stat'
 
@@ -795,12 +791,11 @@ if $ARGS[0] = 'Livingroom 1':
 			act 'In my mouth':
 				*clr & cla
 				minut += 5
-				swallow += 1
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj1.mp4"></video></center>'
 				'You give Fedor a kiss and slowly climb off him then drop to your knees as you wrap your lips around his dick and begin sucking it rapidly until you hear Fedor groan. You feel a warmth filling your mouth and you do your best to swallow every drop of Fedor''s precious nectar, knowing how much he enjoys it when you swallow his cum. After you finish, Fedor strokes your cheek. "<<$pcs_firstname>> you always know just what I need." He then kisses your forehead before getting dressed then leaving the room.'
 				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj3.mp4"></video></center>'
-				gs 'cum_call', 'mouth', $boy, 1
+				gs 'cum_call', 'mouth_swallow', $boy, 1
 				gs 'arousal', 'bj', 5, 'dom'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -1130,12 +1125,11 @@ if $ARGS[0] = 'Bathroom Cam 2':
 					act 'In your mouth':
 						*clr & cla
 						minut += 5
-						swallow += 1
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/toilet/cum1.jpg"></center>'
 						'You continue sucking on Fedor''s dick faster as you hear him groan and fill your mouth with his seed which begins dripping down you lip. You slowly look up to see Fedor with a very pleased smile as he keeps the camera trained on you, causing you to feel flushed as you just remember that he was recording you the whole time. Fedor pats your head as he said "You always give the best blowjobs <<$pcs_nickname>>." while closing the camera and walking out of the bathroom.'
 						*nl
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/toilet/cum2.jpg"></center>'
-						gs 'cum_call', 'mouth', $boy, 1
+						gs 'cum_call', 'mouth_swallow', $boy, 1
 						gs 'arousal', 'bj', 5, 'dom'
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -1603,12 +1597,11 @@ if $ARGS[0] = 'Bedroom Cam':
 				act 'In your mouth':
 					*clr & cla
 					minut += 5
-					swallow += 1
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/cam/cambj1.mp4"></video></center>'
 					'You continue sucking on Fedor''s dick while staring at the camera, feeling more turned on as Fedor continues filming you. Fedor suddenly groans and you feel his cum shooting down your throat which you happily swallow, knowing how much it turns Fedor on when you swallow his cum. Fedor looks down at you with a very pleased smile. "You were outstanding <<$pcs_firstname>>. Thank you." you give him a wink as he closes the camera then gets dressed.'
 					*nl
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum1.mp4"></video></center>'
-					gs 'cum_call', 'mouth', $boy, 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					gs 'arousal', 'bj', 5, 'dom', 'exhibitionism'
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -1816,10 +1809,9 @@ if $ARGS[0] = 'Bedroom 1':
 			act 'Make him cum':
 				*clr & cla
 				minut += 5
-				swallow += 1
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum1.mp4"></video></center>'
 				'You let out a smile as you greatly increase the pace almost fucking his dick with your throat while trying to hold back from gagging. Fedor''s head quickly jerks back as his cock begins throbbing in your mouth, filling your throat with his cum. You can feel Fedor''s warm cum squirting down your throat and leaking from your lips as you do your best to swallow every single drop, not wanting to waste a drop of Fedor''s sweet necter. When Fedor finishes, He looks down to you and says, "You really are amazing <<$pcs_firstname>>. It''s time for your reward."'
-				gs 'cum_call', 'mouth', $boy, 1
+				gs 'cum_call', 'mouth_swallow', $boy, 1
 				gs 'arousal', 'bj', 5, 'dom'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -1849,13 +1841,12 @@ if $ARGS[0] = 'Bedroom 1':
 			act 'Always':
 				*clr & cla
 				minut += 5
-				swallow += 1
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj3.mp4"></video></center>'
 				'"I''m always ready to cum with you." Fedor immediately returns to licking your clit as you continue sucking his dick, feeling the pleasure build up quickly and then feeling your clitoris heat up as your body begins squirming as waves of pleasure hit your whole body. You moan loudly as you feel Fedor''s hands tighten around your hips and his penis begins throbbing in your mouth filling it with his cum which you can''t seem to keep from leaking out of your mouth as you climax. After you both finish, you roll off of Fedor and catch your breath as he says, "<<$pcs_nickname>> You''re the best. you know that right?" You reply, "Only the best deserves the best." Fedor give you a very passionate kiss before getting dressed then walking out of the bedroom.'
 				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vagkiss.mp4"></video></center>'
 				$orgasm_or = 'yes'
-				gs 'cum_call', 'mouth', $boy, 1
+				gs 'cum_call', 'mouth_swallow', $boy, 1
 				gs 'arousal', 'bj', 5, 'sub', 'dom'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -2185,12 +2176,11 @@ if $ARGS[0] = 'Shower 2':
 
 					act 'In my mouth':
 						*clr & cla
-						swallow += 1
 						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/shower/shower4.mp4"></video></center>'
 						'Fedor pulls out of you and you quickly drop to your knees then take his dick into your mouth. You begin sucking and massaging his dick with your tongue until you feel his penis begin throbbing in your mouth filling it with his seed and you do your best to swallow as much of it as you can but some of it leaks out the side of your mouth which quickly gets washed away by the stream of water. After you swallow most of Fedor''s cum you look up to see a very satisfied smile on his face as he tells you "I hope you enjoy my cum as much as I enjoy seeing you swallow it." You reply, "Some people like cream on their bagels. I like cream on my throat." as you lick your lips which is followed by a laugh that Fedor joins in on. You blow a kiss at Fedor as he gets dressed and leaves the room.'
 						*nl
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/toilet/cum1.jpg"></center>'
-						gs 'cum_call', 'mouth', $boy, 1
+						gs 'cum_call', 'mouth_swallow', $boy, 1
 						gs 'arousal', 'bj', 10, 'dom'
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -2269,13 +2259,12 @@ if $ARGS[0] = 'Shower 2':
 					act 'Pull out':
 						*clr & cla
 						minut += 5
-						swallow += 1
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/shower/shower3.jpg"></center>'
 						'You give Fedor two more thrusts then quickly pull off him and drop to your knees in front of him just as he groans and sprays his load on your face. You open your mouth, trying to catch as much in your mouth as possible. You can feel some of his cum leaking down your face and throat. The tart taste of his cum causes a minor stinging in your throat as it goes down but you continue to swallow, knowing that it will make Fedor happy. After Fedor is finished emptying is balls he says, "Great job <<$pcs_firstname>>, You always know just what need." You lick your lips then blow him a kiss as he gets dressed and walks out of the bathroom.'
 						*nl
 						'<center><video autoplay loop src="images/shared/sex/cum/facial/cumface2.mp4"></video></center>'
 						gs 'cum_call', 'face', $boy, 1
-						gs 'cum_call', 'mouth', $boy, 1
+						gs 'cum_call', 'mouth_swallow', $boy, 1
 						gs 'arousal', 'vaginal', 5
 						gs 'arousal', 'end'
 						gs 'stat'

+ 1 - 2
locations/HotelWork.qsrc

@@ -710,8 +710,7 @@ if $ARGS[0] = 'maid':
 								if will_cost <= pcs_willpwr:
 									act 'Swallow his load (<<will_cost>> Willpower)':
 										cla
-										gs 'cum_call', 'mouth', $npclastgenerated, 1
-										swallow += 1
+										gs 'cum_call', 'mouth_swallow', $npclastgenerated, 1
 										pcs_mood += 10
 										gs 'willpower', 'swallow', 'self'
 										gs 'willpower', 'pay', 'self'

+ 1 - 2
locations/LBZhouse.qsrc

@@ -57,12 +57,11 @@ if $ARGS[0] = 'BJ':
 
 	act 'Swallow':
 		*clr & cla
-		swallow += 1
 		gs'stat'
 		'<center><video autoplay loop src="images/shared/sex/cum/cumf60.mp4"></video></center>'
 		'You continue sucking his cock at and increased pace, wanting him to cum for you. After a few seconds, <<$boydesc>> eyes squint as he groans, filling your mouth with his hot cum which you continue sucking down into your throat. You never break eye contact as you fully milk his cock in your mouth. After <<$boydesc>> has no cum left, he gives you a very grateful smile as he gently strokes your cheek and says, "<<$pcs_nickname>> you were amazing. Thank you." You slowly take his cock out of your mouth then return the smile as you say, "It was my pleasure." He chuckles then says, "You should get washed up and I will see you out. Take your time."'
 		gs 'arousal', 'bj', 5
-		gs 'cum_call', 'mouth', $boy
+		gs 'cum_call', 'mouth_swallow', $boy
 		gs 'arousal', 'end'			
 		gs 'stat'
 		

+ 5 - 10
locations/NikoDates.qsrc

@@ -231,9 +231,8 @@ if $ARGS[0] =  'Date 1_2':
 												gs'stat'											
 												'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow4.mp4"></video></center>'
 												'You stare into Niko''s eyes, feeling more turned on at how badly he craves you. You soon hear Niko groan as he begins pumping his cum down your throat which you do your best to swallow every drop of.'
-												swallow += 1
 												gs 'arousal', 'bj', 5, 'sub'
-												gs 'cum_call', 'mouth', 'A189', 1
+												gs 'cum_call', 'mouth_swallow', 'A189', 1
 												gs 'arousal', 'end'
 												gs'stat'
 
@@ -589,8 +588,7 @@ if $ARGS[0] =  'Cafeteria':
 			gs'stat'		
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj2.mp4"></video></center>'
 			'After a few minutes, Niko''s hand tightens around your breast as his penis begins throbbing in your mouth, causing Niko''s cum to shoot down your throat which you swallow as best you can. Once Niko is fully spent, he pulls you up and kisses your forehead, "That''s my girl, so beautiful and daring too. You really are a precious gem <<$pcs_firstname>>." Niko''s words, warm your already rapidly beating heart, leaving you speechless as he gives you a wink, before buttoning his pants then walking away.'
-			swallow += 1
-			gs 'cum_call', 'mouth', 'A189', 1
+			gs 'cum_call', 'mouth_swallow', 'A189', 1
 			gs 'arousal', 'bj', 5
 			gs 'arousal', 'end'
 			gs'stat'
@@ -1089,8 +1087,7 @@ if $ARGS[0] = 'Hallway Strip':
 								gs'stat'
 								'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow4.mp4"></video></center>'
 								'You quicken your pace until you see Niko''s head slam into the wall as he begin shooting his warm seed into your mouth. You do your best to swallow every drop of his warm nectar, despite it''s sharp, tart taste. Niko looks down to you and says, "Thank you <<$pcs_firstname>>. You are truly a goddess. Now let''s get you dressed before someone notices us." Niko kneels down and picks up your clothes then helps you get dressed while occasionally checking to see if anyone has noticed. Once you are fully dressed, Niko whispers in your ear, "You were extremely daring today, I look forward to next time." Niko gives you a kiss on your cheek before walking back into the cafeteria.'
-								swallow += 1
-								gs 'cum_call', 'mouth', 'A189', 1
+								gs 'cum_call', 'mouth_swallow', 'A189', 1
 								gs 'arousal', 'bj', 5
 								gs 'arousal', 'end'
 								gs'stat'
@@ -1295,8 +1292,7 @@ if $ARGS[0] = 'Disco':
 								gs'stat'							
 								'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow3.mp4"></video></center>'
 								'Niko''s head suddenly jerks back as he bites his lip, shooting his cum, down your throat. You do your best to swallow every drop, not wanting any of Niko''s cum to go to waste.'
-								swallow += 1
-								gs 'cum_call', 'mouth', 'A189', 1
+								gs 'cum_call', 'mouth_swallow', 'A189', 1
 								gs 'arousal', 'bj', 5
 								gs'stat'
 
@@ -1440,8 +1436,7 @@ if $ARGS[0] = 'After School 2':
 							gs'stat'
 							'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow4.mp4"></video></center>'
 							'You suddenly hear Niko groan as he begins spraying his hot cum down your throat. You swallow it while enjoying the sting as it slides down your throat, knowing that you have fully satisfied Niko. You slowly look up to Niko, "I love you Nikolai. I love you with all my heart." Niko recoils in shock, "Uhh, I love you too and I''m...glad you enjoy our time together." You can tell that your sudden show of affection caught Niko off guard which makes you giggle for a few seconds as Niko buttons his pants then says, "You were outstanding today. I always have a blast when I''m with you. Here are your clothes. You should get dressed before anyone sees us."'
-							swallow += 1
-							gs 'cum_call', 'mouth', 'A189', 1
+							gs 'cum_call', 'mouth_swallow', 'A189', 1
 							gs 'arousal', 'bj', 5
 							gs 'arousal', 'end'
 							gs'stat'

+ 4 - 8
locations/NikoEv2.qsrc

@@ -175,8 +175,7 @@ if $ARGS[0] = 'Reward':
 											gs'stat'
 											'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/cum/throat1.mp4"></video></center>'
 											'Yurik suddenly grabs firmly onto the back of your head then shoves his penis as far down your throat as he can while groaning loudly. You can feel a surge of cum shooting down your throat which you have no choice but to swallow. Yurik pulls off of you as you continue swallow the last of his cum. Yurik begins dressing himself then walks up to you; with tears streaming down your face and says, "Whenever I am around, you will do whatever I say. Do you understand, girl?" You nod meekly, terrified of what Yurik could do to you. Yurik responds, "Good, i will be seeing you around and don''t try to avoid me, or that will make me ANGRY." Yurik then gets dressed before grabbing you up by your hair then pulling to toward the door where he opens it up before tossing you into Niko''s arms then closing the door.'
-											swallow += 1
-											gs 'cum_call', 'mouth', $boy
+											gs 'cum_call', 'mouth_swallow', $boy
 											gs 'arousal', 'bj', 5
 											gs 'arousal', 'end'
 											gs'stat'	
@@ -323,8 +322,7 @@ if $ARGS[0] =  'Lunch Chat':
 											gs'stat'							
 											'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow8.mp4"></video></center>'
 											'You can feel tears running down your cheeks as you lose yourself in the moment. Niko suddenly begins groaning as he fills your mouth with his warm seed which you try your best to swallow every drop of, wanting any part of Niko to stay inside you.'
-											swallow += 1
-											gs 'cum_call', 'mouth', $boy
+											gs 'cum_call', 'mouth_swallow', $boy
 											gs 'arousal', 'bj', 5
 											gs 'arousal', 'end'
 											gs'stat'	
@@ -926,8 +924,7 @@ if $ARGS[0] =  'Reward 2':
 								gs'stat'
 								'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow8.mp4"></video></center>'
 								'You quickly pull off of Niko then wrap your lips around his dick and begin sucking. Niko tilts his head back then begins cumming in your mouth as you do your best to suck every drop out of Niko''s dick. Niko''s warm seed fills your mouth as you continue swallowing and sucking his dick dry. After Niko is fully spent, he gently grabs your face then brings it to his, giving you a gentle kiss on the lips before saying, "I am so lucky to have such a beautiful and obedient girl like you." You reply, "I feel so lucky to have you in my life too, Nikolai." Niko rubs on your forehead then gets up and heads to the bathroom to get washed up.'
-								swallow += 1
-								gs 'cum_call', 'mouth', 'A189', 1
+								gs 'cum_call', 'mouth_swallow', 'A189', 1
 								gs 'arousal', 'bj', 5
 								gs 'arousal', 'end'
 								gs'stat'	
@@ -982,8 +979,7 @@ if $ARGS[0] = 'Yurik BJ':
 					gs'stat'
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/sex/bj/bj1.mp4"></video></center>'	
 					'You quicken your pace then suddenly Yurik groans as he begins pumping your mouth full of his warm cum which you do your best to swallow every drop of. After Yurik is spent, he says to you, "I''m done girl. You can go back to Niko now." You get up then start walking away when you hear Yurik say, "And good job girl." You walk back up the stairs with a smile on your face.'
-					swallow += 1
-					gs 'cum_call', 'mouth', $boy 
+					gs 'cum_call', 'mouth_swallow', $boy 
 					gs 'arousal', 'bj', 5
 					gs 'arousal', 'end'
 					gs'stat'	

+ 4 - 8
locations/NikoPayback.qsrc

@@ -69,8 +69,7 @@ if $ARGS[0] = 'Payback':
 						gs'stat'
 						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/facial1.mp4"></video></center>'
 						'You increase your pace as you look up at Niko, noticing how much he is enjoying your performance. You stare him in the eyes as you hear him begin groaning. You suddenly feel Niko''s warm seed filling your mouth, one squirt at a time. You look up to Niko with his cum slowly leaking out of your mouth, Niko then looks down to you and says, "What are you waiting for? Swallow my cum bitch!" You give Niko a meek nod then begin swallowing his cum and after you finish, Niko pulls your head to the ground and says, "You missed a few drops, Lick it off the floor!" not wanting to anger Niko further, you obediently begin licking the last drops of cum off the floor. "Now that''s better, I''ll see you tomorrow. Remember what I said and don''t ever try to avoid me."'	
-						swallow += 1
-						gs 'cum_call', 'mouth', 'A189', 1
+						gs 'cum_call', 'mouth_swallow', 'A189', 1
 						gs 'arousal', 'bj', 5
 						gs 'arousal', 'end'
 						gs'stat'
@@ -176,8 +175,7 @@ if $ARGS[0] =  'Payback 3':
 			'After a few more seconds, Niko begins moaning as he runs his fingers through your hair before grabbing your head with both hands and pushes his penis down your throat as he begin spraying his warm seed down your throat. You try your best not to gag as Niko continues to pump his warm cum down your throat while you swallow every drop of it. After Niko finishes, he looks down to you then says, "You are really good at that. I will see you again soon. Niko buttons his pants then walks out of the restroom."'
 			*nl
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow8.mp4"></video></center>'	
-			swallow += 1
-			gs 'cum_call', 'mouth', $boy
+			gs 'cum_call', 'mouth_swallow', $boy
 			gs 'arousal', 'bj', 5, 'sub'
 			gs 'arousal', 'end'
 			gs 'stat'	
@@ -341,8 +339,7 @@ if $ARGS[0] =  'Payback 4':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/cum/throat6.mp4"></video></center>'
 				'Niko grabs the back of your head then begins fucking your throat. You try to relax your throut as NIko continues fucking it. Niko says to you, "Remember <<$pcs_firstname>> this is your place. You are my fucking bitch and nothing more." You are too focused on not gagging to respond. After a few more seconds, Niko groans, filling your throat with his warm seed which you swallow as much of it as you can, knowing that you have no choice. Niko then buttons his pants and walks out of the restroom, without saying another word.'
-				swallow += 1
-				gs 'cum_call', 'mouth', $boy
+				gs 'cum_call', 'mouth_swallow', $boy
 				gs 'arousal', 'bj', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -364,8 +361,7 @@ if $ARGS[0] =  'Payback 4':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow3.mp4"></video></center>'
 				'You know exactly what he want and begin sucking Niko''s dick, trying your best to get him off as quickly as possible, knowing that the sooner he finishes, the sooner you can wash up and leave. You lick and suck Niko''s dick while trying your best to ignore the rotten taste in your mouth and the mildly burning of Niko''s urine on your face. Niko looks down to you then says, "There you go <<$pcs_firstname>>. Keep behaving like this and we will get along just fine." He then tilts his head back and begins moaning. Niko suddenly grabs the back of your head and begin filling your throat with his warm cum as you try your best to swallow every drop of it. After Niko finishes, he turn to you and says, "You are learning, Good keep it up." Niko then buttons his pants before leaving the restroom.'
-				swallow += 1
-				gs 'cum_call', 'mouth', $boy
+				gs 'cum_call', 'mouth_swallow', $boy
 				gs 'arousal', 'bj', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'

+ 8 - 16
locations/NikoSlut.qsrc

@@ -89,8 +89,7 @@ if $ARGS[0] = 'Customer 1':
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/1/bjcum2.jpg"></center>'
 				'You continue sucking his dick as he groans then begins cumming in your mouth. You begin swallowing every drop of the man''s cum, not wanting to disappoint hi while enjoying the creamy texture and wamth of his cum as it slides down your throat. After the man is finished, he looks down to you and says, "Wow you actually swallowed it. Thank you girl, that was really sexy." He then puts his pants back on and leaves the restroom.'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'Biker'
+				gs 'cum_call', 'mouth_swallow', 'Biker'
 				gs 'arousal', 'anal', 5, 'dom'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -222,8 +221,7 @@ if $ARGS[0] = 'Customer 2':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow7.mp4"></video></center>'
 				'He begins squirming almost immediately then groans as he fills you mouth with his cum. <font color=#FF00FF>Wow, he came so quickly. Touching on my body must have really turned him on.</font> The man fully milks his dick in your mouth before pulling up his pants then saying, "Damn girl, you really got me off quickly. Great work." He then walks back into the diner as Niko approaches you. "Are you ready for another customer, or would you like to clean up first?"'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'Trucker'
+				gs 'cum_call', 'mouth_swallow', 'Trucker'
 				gs 'arousal', 'bj', 5, 'sub', 'prostitution'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -466,8 +464,7 @@ if $ARGS[0] = 'Customer 4':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow7.mp4"></video></center>'
 				'You start rapidly licking and sucking his dick when you hear him moan as he begins filling your mouth with his warm seed which you swallow every drop of, knowing that it will please him. The man looks down to you and says, "You are a good little slut. I will definitely be having you again." The man then pulls his pants up then walks back into the diner. Niko approaches you then says, "Are you ready, for another customer, or would you like to wash up first?"'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'Biker'
+				gs 'cum_call', 'mouth_swallow', 'Biker'
 				gs 'arousal', 'bj', 5, 'sub', 'prostitution'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -566,8 +563,7 @@ if $ARGS[0] = 'Customer 5':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow6.mp4"></video></center>'
 				'You begin stroking the shaft of his penis while continuing to suck until you hear the moan lean back as his penis begins throbbing in your mouth, filling your mouth with his warm seed. You spend a few seconds using your tongue to play with his cum before finally swallowing it. The trucker looks down to you and says, "You are great at that. Thank you young lady. I really enjoyed that." He then buttons his pants before heading back inside. Niko then walks up to you and says, "Are you ready for another customer, or would you like to clean up first?"'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'Keith'
+				gs 'cum_call', 'mouth_swallow', 'Keith'
 				gs 'arousal', 'bj', 5, 'sub', 'prostitution'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -778,8 +774,7 @@ if $ARGS[0] = 'Customer 6':
 						gs'stat'					
 						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/cum/throat6.mp4"></video></center>'
 						'Suddenly the man groans then begins filling your throat with his warm seed, causing his cum to shoot down your throat. The man takes a second to catch his breath before saying, "You are really good at swallowing cum. I might use you again soon." He then pulls up his pants then walks away. Niko then approaches you and says, "Are you alright? That looked rough." You nod with a smile on your face. Niko then replies, "Good, I hope you are ready for another customer, or would you like to wash up first?"'			
-						swallow += 1
-						gs 'cum_call', 'mouth', 'Trucker'
+						gs 'cum_call', 'mouth_swallow', 'Trucker'
 						gs 'arousal', 'bj', 5, 'sub'
 						gs 'arousal', 'end'				
 						gs 'stat'		
@@ -841,8 +836,7 @@ if $ARGS[0] = 'Customer 7':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow3.mp4"></video></center>'
 				'You begin sucking his dick at an increased pace, causing the man to let out occasional grunts. After a few more seconds, the man groans as his hard cock begins throbbing in your mouth, filling your throat with his warm seed which you do your best to swallow every drop of. After the man finishes, he buttons his pants then reaches into his pocket, pulling out his wallet then placing some money in your pocket. "Here is a little tip for you. Buy yourself something nice." You give him a smile as you respond, "Thank you so much." He gives you a wink before escorting you out of the back room.'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'Trucker'
+				gs 'cum_call', 'mouth_swallow', 'Trucker'
 				gs 'arousal', 'bj', 5, 'sub', 'prostitution'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -983,8 +977,7 @@ if $ARGS[0] = 'Customer 8':
 					gs'stat'
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow4.mp4"></video></center>'
 					'After a few more seconds, the man groans as his penis begins throbbing in your mouth, filling it with his warm seed which you let slide down your throat and into your belly. The man takes a few seconds to catch his breath before saying, "You were outstanding <<$NikoSlutName>>. I look forward to seeing you again soon." He then buttons his pants before leaving the restroom.'
-					swallow += 1
-					gs 'cum_call', 'mouth', 'Trucker'
+					gs 'cum_call', 'mouth_swallow', 'Trucker'
 					gs 'arousal', 'bj', 5, 'sub', 'prostitution'
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -1114,8 +1107,7 @@ if $ARGS[0] = 'Customer 9':
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum1.mp4"></video></center>'
 				'You wrap you lips around the truckers dick, evoking a moan from him. You begin sucking his dick while massaging his cock with your tongue, enjoying the warmth of his penis in your mouth. After a minute, the trucker groans as he begin pumping his seed into your mouth which you lets slide down your throat, feeling the sting as it goes down into your belly. The trucker catches his breath then says, "You are a really good cocksucker. I will definitely be calling for your services again." He then buttons his pants before leaving the restroom.'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'Trucker'
+				gs 'cum_call', 'mouth_swallow', 'Trucker'
 				gs 'arousal', 'bj', 5, 'sub', 'prostitution'
 				gs 'arousal', 'end'
 				gs 'stat'

+ 4 - 8
locations/NikoWhore.qsrc

@@ -39,8 +39,7 @@ if $ARGS[0] = 'Locker Room':
 					gs'stat'
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow3.mp4"></video></center>'
 					'Niko begins lightly moaning before grabbing onto your hair then pushing his cock down your throat, filling your throat with his warm cum. You enjoy the warm feeling of his cum entering your throat and the rapid throbbing of his penis as it pumps your throat with his seed.' 
-					swallow += 1
-					gs 'cum_call', 'mouth', 'A189', 1
+					gs 'cum_call', 'mouth_swallow', 'A189', 1
 					gs 'arousal', 'bj', 5, 'sub'
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -161,8 +160,7 @@ if $ARGS[0] = 'Locker Room':
 																'Vitek: That sounds like a great idea. <<$pcs_firstname>> looks like a overgrown pig, but we can always fuck her from behind. Alright let''s do it. Hey <<$pcs_firstname>>, you''re coming with us.'
 															end
 														end	
-														swallow += 1
-														gs 'cum_call', 'mouth', 'A9', 1
+														gs 'cum_call', 'mouth_swallow', 'A9', 1
 														gs 'arousal', 'bj', 5, 'sub'
 														gs 'boyStat', 'A11'
 														gs 'cum_call', 'face', 'A11', 1
@@ -619,8 +617,7 @@ if $ARGS[0] = 'Locker Room 2':
 												gs'stat'					
 												'<center><video autoplay loop src="images\shared\sex\cum\mouth\cum1,3.mp4"></video></center>'
 												'You obediently  open you mouth as Valentin grabs you head then holds it to his dick before jerking off then shooting his load onto your tongue. You keep your mouth open accepting his cum inside as you swallow it as quickly as you can to make room for more. The taste is horrible but you know that you have no choice. After Valentin fully drains his cock into your mouth he then brushes your cheek and says, "That''s how you do it <<$pcs_nickname>>." He then zips up his pants and walks out of the locker room, leaving you on the floor.'
-												swallow += 1
-												gs 'cum_call', 'mouth', 'A158', 1
+												gs 'cum_call', 'mouth_swallow', 'A158', 1
 												gs 'arousal', 'bj', 5, 'sub', 'exhibitionism', 'humiliation', 'gangbang'
 												gs 'stat'	
 												
@@ -845,8 +842,7 @@ if $ARGS[0] = 'Walk Of Shame':
 															gs'stat'
 															'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1.11.mp4"></video></center>'
 															'You continue sucking Niko''s dick firmly while staring into his eyes, enjoying the pleased look that he is giving you which shows you that you are doing a good job. Suddenly Niko''s eyes squint as he groans, filling your mouth with his warm seed which you swallow eagerly, enjoying the warmth of it sliding down your throat and even the sting as it goes down. Niko places his hand on your cheek, gently stroking it with his thumb as he says, "You are so perfect <<$pcs_firstname>>. I am so lucky to have you and don''t worry, I will find a way to fix what happened yesterday. Meet me after school and we will go out on a nice walk. We''ll discuss what to do next then." Niko kisses you on your forehead before zipping his pants then leaving the restroom.'
-															swallow += 1
-															gs 'cum_call', 'mouth', 'A189', 1
+															gs 'cum_call', 'mouth_swallow', 'A189', 1
 															gs 'arousal', 'bj', 5, 'sub'
 															gs 'arousal', 'end'
 															gs 'stat'

+ 1 - 2
locations/Voltrenersex.qsrc

@@ -478,8 +478,7 @@ if $ARGS[0] = 'masaj':
 													act 'Swallow':
 														cls
 														gs 'arousal', 'bj', 5, 'deepthroat'
-														swallow += 1
-														gs 'cum_call', 'mouth', $boy, 1
+														gs 'cum_call', 'mouth_swallow', $boy, 1
 														gs 'cum_call', 'face', $boy, 1
 														pcs_mood += 20
 														trenerSex += 1

+ 1 - 2
locations/alexgang.qsrc

@@ -40,8 +40,7 @@ act 'Get on your knees and give head':
 		alexgangbang += 1
 		gs 'boyStat', 'A88'
 		pose = 1
-		swallow += 1
-		gs 'cum_call', 'mouth', 'A88', 1
+		gs 'cum_call', 'mouth_swallow', 'A88', 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/group/gang<<rand(16, 25)>>.jpg"></center>'
 		'Kneeling on all fours, you start sucking Sasha''s limp cock. As you lick, suck, and roll your tongue, while using the shaft with your hands, around his dick that you can feel it slowly stiffen in your mouth.'

+ 1 - 2
locations/arturkiosk.qsrc

@@ -18,8 +18,7 @@ act 'Kneel down':
 
 	act 'Finish him':
 		*clr & cla
-		gs 'cum_call', 'mouth', 'Artur'
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', 'Artur'
 		money += 500
 		arturblowday = daystart
 		gs 'stat'

+ 3 - 6
locations/brosh.qsrc

@@ -27,8 +27,7 @@ if evgentipe = 0:
 
 			act 'Suck':
 				cls
-				gs 'cum_call', 'mouth', 'Zhendos', 1
-				swallow += 1
+				gs 'cum_call', 'mouth_swallow', 'Zhendos', 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum50.jpg"></center>'
 				'Zhendos doesn''t last long and fills you mouth with sperm, you quickly swallow it down.'
@@ -75,8 +74,7 @@ elseif evgentipe = 1:
 
 			act 'Suck':
 				cls
-				gs 'cum_call', 'mouth', 'Mishan', 1
-				swallow += 1
+				gs 'cum_call', 'mouth_swallow', 'Mishan', 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/bscum'+rand(1,2)+'.jpg"></center>'
 				'Mishan doesn''t last long and fills you mouth with sperm, you quickly swallow it down.'
@@ -123,8 +121,7 @@ elseif evgentipe = 2:
 
 			act 'Suck':
 				cls
-				gs 'cum_call', 'mouth', 'Kolka', 1
-				swallow += 1
+				gs 'cum_call', 'mouth_swallow', 'Kolka', 1
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum43.jpg"></center>'

+ 3 - 6
locations/brother.qsrc

@@ -769,8 +769,7 @@ if $ARGS[0] = 'brotherSexStart':
 			act 'Keep sucking':
 				*clr & cla
 				gs 'boyStat', 'A34'
-				gs 'cum_call', 'mouth', 'A34', 1
-				swallow += 1
+				gs 'cum_call', 'mouth_swallow', 'A34', 1
 				gs 'stat'
 
 				'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,<<rand(0,11)>>.mp4"></video></center>'
@@ -1415,8 +1414,7 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 	elseif brotherSex >= 4:
 		*clr & cla
 		gs 'boyStat', 'A34'
-		gs 'cum_call', 'mouth', 'A34', 1, 0, 0, rand(20,30)
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', 'A34', 1, 0, 0, rand(20,30)
 		brotherSexCount -= 1
 		brotherEvSex = daystart
 		gs 'stat'
@@ -1452,8 +1450,7 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 	elseif brotherConfidence > 10 and brotherSex < 4:
 		*clr & cla
 		gs 'boyStat', 'A34'
-		gs 'cum_call', 'mouth', 'A34', 1, 0, 0, rand(20,30)
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', 'A34', 1, 0, 0, rand(20,30)
 		if brotherSex < 4:brotherSex = 4
 		brotherSexCount -= 1
 		brotherEvSex = daystart

+ 5 - 10
locations/brother2.qsrc

@@ -207,11 +207,10 @@ if $ARGS[0] = 'hj':
 		act'Put your lips over the tip':
 			cla & *clr
 			gs 'arousal', 'bj', 1
-			gs 'cum_call', 'mouth', 'A34', 1
+			gs 'cum_call', 'mouth_swallow', 'A34', 1
 			gs 'arousal', 'end'
 			gs 'stat'
 			npc_rel['A34'] += 3
-			swallow += 1
 			if brotherSex < 6: brotherSex = 6
 			'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/homework/swallow.mp4"></video></center>'
 			'You break away from the kiss and moving quickly, you wrap your lips around the tip of his cock. No sooner than your mouth envelopes him do you feel his cum explode inside you, the taste his hot salty cum filling your mouth.'
@@ -247,8 +246,7 @@ if $ARGS[0] = 'bj':
 	'"<<$pcs_nickname>>!" he whispers harshly. "I''m gonna cum!"'
 	act'Keep sucking':
 		cla & *clr
-		swallow += 1
-		gs 'cum_call', 'mouth', 'A34', 1
+		gs 'cum_call', 'mouth_swallow', 'A34', 1
 		gs 'arousal', 'end'
 		gs 'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/homework/swallow.mp4"></video></center>'
@@ -274,11 +272,10 @@ if $ARGS[0] = 'bj':
 	act'Stick your tongue out':
 		cla & *clr
 		gs 'cum_call', 'face', 'A34', 1
-		gs 'cum_call', 'mouth', 'A34', 1
+		gs 'cum_call', 'mouth_swallow', 'A34', 1
 		'<center><video autoplay loop src="images/shared/sex/cum/facial/facial25.mp4"></video></center>'
 		'You pull back from your brother and close your eyes, sticking out your tongue. You briefly hear his cock fapping in front of you before you feel a jet of hot sticky cum fly into your mouth. The next spurt takes you on the cheek and you immediately feel it dripping down your neck.'
 		act'Swallow':
-			swallow += 1
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial26.mp4"></center>'
 			'Waiting patiently, you take a moment to swallow what''s already in your mouth. You stick your tongue back out and continue to wait, but you realize that he''s probably spent at this point.'
@@ -446,8 +443,7 @@ if $ARGS[0] = 'wakeup':
 			act'Blow him':
 				cla & *clr
 				gs 'arousal', 'hj', 5
-				gs 'cum_call','mouth', $boy
-				swallow += 1
+				gs 'cum_call','mouth_swallow', $boy
 				brotherbj += 1
 				if brotherSex < 6:brotherSex = 6
 				if $clothingworntype = 'nude' and $braworntype = 'none':
@@ -572,8 +568,7 @@ if $ARGS[0] = 'morningbj':
 	brotherwakeup += 1
 	cla & *clr
 	gs 'arousal', 'hj', 5
-	gs 'cum_call','mouth', $boy
-	swallow += 1
+	gs 'cum_call','mouth_swallow', $boy
 	brotherbj += 1
 	npc_rel['A34'] += 10
 	if brotherSex < 6:brotherSex = 6

+ 1 - 2
locations/brother_lessons.qsrc

@@ -139,9 +139,8 @@ if $ARGS[0] = 'homework':
 							end
 							act'Put your mouth over his tip':
 								cla & *clr
-								gs 'cum_call', 'mouth', 'A34', 1
+								gs 'cum_call', 'mouth_swallow', 'A34', 1
 								npc_rel['A34'] += 3
-								swallow += 1
 								if brotherSex < 6: brotherSex = 6
 								'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/homework/swallow.mp4"></video></center>'
 								'You jerk him off a little faster, waiting for him to stiffen up and the signs that he''s about to cum. Right at the last moment, you break away from the kiss and wrap your lips around the tip of his cock. You immediately feel him explode inside your mouth, the hot salty taste of his cum pouring out over your tongue.'

+ 2 - 4
locations/brother_voyeur.qsrc

@@ -1357,13 +1357,12 @@ if $ARGS[0] = 'brother_shower_bj':
 			'"Hey <<$pcs_nickname>>," he says through grunts. "I''m gonna cum soon. Can I cum on your face?"'
 			act'Ignore him and keep sucking':
 				cla
-				gs 'cum_call', 'mouth', 'A34', 1
+				gs 'cum_call', 'mouth_swallow', 'A34', 1
 				gs 'arousal', 'end'
 				gs 'stat'
 				*nl
 				'Despite his pleas to let him blow his load on your face, you keep sucking until you taste hot liquid spilling into your mouth.'
 				act'Swallow':
-					swallow += 1
 					cla
 					*nl
 					'You swallow his load with a gulp, showing your clean tongue and smiling after you do.'
@@ -1915,7 +1914,7 @@ if $ARGS[0] = 'shower_swallow':
 	brotherbjcomment = rand(1,2)
 	gs 'boystat','A34'
 	gs 'arousal','bj', 1
-	gs 'cum_call', 'mouth', 'A34', 1
+	gs 'cum_call', 'mouth_swallow', 'A34', 1
 	gs 'stat'
 	'<center><video autoplay loop src="images/shared/home/bathroom/showerbj.mp4"></center>'
 	if broshowerfuck = daystart:
@@ -1928,7 +1927,6 @@ if $ARGS[0] = 'shower_swallow':
 	end
 
 	act'Swallow':
-		swallow += 1
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/home/bathroom/showerbj.mp4"></center>'
 		'You suck a little more, making sure you''ve drained him to the last drop and then withdraw your mouth with carefully closed lips. You look up at him, meeting his eyes through the falling water drops, and swallow his sperm in one gulp.'

+ 9 - 18
locations/burger.qsrc

@@ -201,8 +201,7 @@ if $ARGS[0] = 'dishes':
 						'He smiles and gestures to the seller who takes the dress.'
 
 						gs 'arousal', 'bj', 15, 'sub'
-						swallow += 1
-						gs 'cum_call', 'mouth', 'A74', 1
+						gs 'cum_call', 'mouth_swallow', 'A74', 1
 						gs 'stat'
 
 						act 'Exit from the boutique':
@@ -259,9 +258,8 @@ if $ARGS[0] = 'dishes':
 										'You actively suck his dick and feel your jaw getting tired. Suddenly a hot jet shoots into your mouth. Surprised you release his member from your mouth an a jet of sperm hits you on the nose. Semen spills out of your mouth and hangs on your chin. Anatoly Borisovich takes your head and sticks his member back in your mouth to clean of the sperm.'
 
 										gs 'arousal', 'bj', 4, 'sub', 'humiliation'
-										swallow += 1
 										gs 'boyStat', 'A74'
-										gs 'cum_call', 'mouth', 'A74', 1, 0, 10000, 13
+										gs 'cum_call', 'mouth_swallow', 'A74', 1, 0, 10000, 13
 										facial += 1
 										gs 'cum_call', 'face', 'A74', 1, 0, 10000, 27
 										gs 'stat'
@@ -425,8 +423,7 @@ if $ARGS[0] = 'dishes':
 					act 'Swallow cum and clean his cock':
 						*clr & cla
 						minut += 2
-						swallow += 1
-						gs 'cum_call', 'mouth', 'A76', 1
+						gs 'cum_call', 'mouth_swallow', 'A76', 1
 						money += 500
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj4.jpg"></center>'
@@ -474,8 +471,7 @@ if $ARGS[0] = 'dishes':
 						act 'Swallow his cum and clean his cock':
 							*clr & cla
 							minut += 2
-							swallow += 1
-							gs 'cum_call', 'mouth', 'A76', 1
+							gs 'cum_call', 'mouth_swallow', 'A76', 1
 							money += 500
 							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj4.jpg"></center>'
 							'You squat in front of the manager and swallow his sperm as you began to lick the remnants of his semen off of the still standing, but quickly lowering penis.'
@@ -511,8 +507,7 @@ if $ARGS[0] = 'dishes':
 				money += 500
 				gs 'boyStat', 'A76'
 				gs 'arousal', 'bj', 3, 'sub', 'prostitution'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'A76', 1
+				gs 'cum_call', 'mouth_swallow', 'A76', 1
 				gs 'arousal', 'end'
 				gs 'stat'
 
@@ -535,8 +530,7 @@ if $ARGS[0] = 'dishes':
 				guy += 1
 				gs 'boyStat', 'A75'
 				gs 'arousal', 'bj', 3, 'sub'
-				swallow += 1
-				gs 'cum_call', 'mouth', 'A75', 1
+				gs 'cum_call', 'mouth_swallow', 'A75', 1
 				facial += 1
 				gs 'cum_call', 'face', 'A75', 1
 				gs 'arousal', 'end'
@@ -626,8 +620,7 @@ if $ARGS[0] = 'dishes':
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum19.jpg"></center>'
 				'A hot jet of sperm slaps you in the mouth, while you continue to stroke his member. You are careful not to spill a drop of the nasty smelling liquid out of your mouth. Finally the stream dries up and you swallow the sperm. He grins and tosses 300 <b>₽</b> on the floor. You pick them up and hide them in your pocket as you rise up from your knees and leave the office.'
 
-				swallow += 1
-				gs 'cum_call', 'mouth', 'A75', 1
+				gs 'cum_call', 'mouth_swallow', 'A75', 1
 				gs 'arousal', 'end'
 				gs 'stat'
 
@@ -810,8 +803,7 @@ if $ARGS[0] = 'boss':
 
 					gs 'boyStat', 'A74'
 					gs 'arousal', 'bj', 5, 'sub', 'prostitution'
-					swallow += 1
-					gs 'cum_call', 'mouth', 'A74', 1
+					gs 'cum_call', 'mouth_swallow', 'A74', 1
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -849,8 +841,7 @@ if $ARGS[0] = 'boss':
 
 			gs 'boyStat', 'A74'
 			gs 'arousal', 'bj', 5, 'sub', 'prostitution'
-			swallow += 1
-			gs 'cum_call', 'mouth', 'A74', 1
+			gs 'cum_call', 'mouth_swallow', 'A74', 1
 			gs 'arousal', 'end'
 			gs 'stat'
 

+ 2 - 4
locations/burgerWork.qsrc

@@ -90,8 +90,7 @@ if $ARGS[0] = 'work2':
 			act 'Agree':
 				*clr & cla
 				gs 'boyStat', 'A76'
-				gs 'cum_call', 'mouth', 'A76', 1
-				swallow += 1
+				gs 'cum_call', 'mouth_swallow', 'A76', 1
 				BurgerQW['IvanQWBlackmail'] += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbj.jpg"></center>'
@@ -120,8 +119,7 @@ if $ARGS[0] = 'work2':
 			act 'Agree':
 				*clr & cla
 				gs 'boyStat', 'A76'
-				gs 'cum_call', 'mouth', 'A76', 1
-				swallow += 1
+				gs 'cum_call', 'mouth_swallow', 'A76', 1
 				BurgerQW['IvanQWBlackmail'] += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbjcar.jpg"></center>'

+ 4 - 10
locations/city_kafe.qsrc

@@ -90,10 +90,9 @@ if $ARGS[0] = 'vlad':
 
 					act 'Continue to suck.':
 						*clr & cla
-						swallow += 1
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum31.jpg"></center>'
 						'A hot jet of sperm hits the back of your throat. You start to swallow his cum, and <<$boydesc>> continues to cum in your mouth. Finally the flow of hot, pungent liquid stops.'
-						gs 'cum_call','mouth',$boy,1
+						gs 'cum_call','mouth_swallow',$boy,1
 						'"Best waitress, ever!" Says Givi as he gives you 500 <b>₽</b>.'
 						money += 500
 						gs 'arousal', 'end'
@@ -132,8 +131,7 @@ if $ARGS[0] = 'vlad':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum31.jpg"></center>'
 						'A hot jet of sperm hits the back of your throat. You start to swallow cum, and <<$boydesc>> continues to cum in your mouth. Finally the flow of hot, pungent liquid stops.'
-						gs 'cum_call','mouth',$boy,1
-						swallow += 1
+						gs 'cum_call','mouth_swallow',$boy,1
 						gs 'arousal', 'end'
 						gs 'stat'
 
@@ -288,7 +286,7 @@ if $ARGS[0] = 'workPred':
 					pcs_horny += 10
 					minut += 5
 					gs 'boyStat', 'A41'
-					gs 'cum_call','mouth',$boy,1
+					gs 'cum_call','mouth_swallow',$boy,1
 					gs 'boyStat', 'A93'
 					npc_sex[$boy] += 1
 					gs 'arousal', 'cuni_give', 5
@@ -301,7 +299,6 @@ if $ARGS[0] = 'workPred':
 					act 'Swallow sperm and take Ira home':
 						cla
 						'You swallow the sperm, help her to her feet and sort her out. Ira, regaining her senses, looks to you with a beatific smile "That Givi is chock-bellied ugly, but he fucked me like I''ve never been fucked before. I even lost consciousness from an orgasm."'
-						swallow += 1
 						'Ira is still floating in ecstasy, so you decide to walk her home. At her front door, she kisses you on the lips and leaves.'
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -323,7 +320,6 @@ if $ARGS[0] = 'workPred':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/sex/irinaslut4.jpg"></center>'
 								'You move your lips to Ira and start kissing her exchanging the sperm between your mouths. Finally you both swallow some of the semen.'
-								swallow += 1
 								gs 'arousal', 'kiss', 5, 'dom'
 								gs 'stat'
 
@@ -342,7 +338,6 @@ if $ARGS[0] = 'workPred':
 							act 'Take Ira home':
 								cla
 								minut += 15
-								swallow += 1
 								gs 'stat'
 								'You wiped the remnants of sperm off your face, help her to feet and sort her out. Ira, regaining her senses, looks to you with a beatific smile "That Givi is chock-bellied ugly, but he fucked me like I''ve never been fucked before. I even lost consciousness from an orgasm."'
 								'Ira is still floating in ecstasy, so you decide to walk her home. At her front door, she kisses you on the lips and leaves.'
@@ -465,8 +460,7 @@ if $ARGS[0] = 'workPred':
 									act 'Take the sperm in your mouth':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/sex/waitress_work_bj2.jpg"></center>'
-										swallow += 1
-										gs 'cum_call','mouth',$boy,1
+										gs 'cum_call','mouth_swallow',$boy,1
 										gs 'dinsex','bj_swallow_random'
 										gs 'arousal', 'end'
 										money += 700

+ 2 - 4
locations/city_kavkazkafe.qsrc

@@ -306,8 +306,7 @@ if $ARGS[0] = 'givirapebj':
 	pcs_hairbsh = 0
 	if pcs_makeup > 1:pcs_makeup = 0 & 'You start crying which smears your makeup all down your face.'
 	'Givi finally grunts and a hot jet of sperm hits you in the throat. You start frantically swallowing so that you don''t choke.'
-	gs 'cum_call','mouth',1
-	swallow += 1
+	gs 'cum_call','mouth_swallow',1
 	gs 'arousal', 'end'
 	'After Givi has finished, he immediately mellows and begins to untie you. Hey <<$pcs_nickname>>, you''re a good cucksucker. Here is some money, buy yourself something pretty.'
 	money += 5000
@@ -430,11 +429,10 @@ end
 
 if $ARGS[0] = 'givibj6':
 	minut += 3
-	swallow += 1
 	picrand = rand(11, 19)
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum<<picrand>>.jpg"></center>'
 	'You carry on suck as Givi finishes stuffing your mouth full of his sperm. The taste of his semen is terrible and you have your mouth full giving you nowhere to spit. Not wanting to wait until Givi lets go, you swallow the cum in your mouth which leaves a sharp aftertaste in your mouth and all you can smell is the pungent smell of semen.'
-	gs 'cum_call','mouth',$boy,1
+	gs 'cum_call','mouth_swallow',$boy,1
 	gs 'arousal', 'end'
 	gs 'stat'
 

+ 7 - 14
locations/city_lake.qsrc

@@ -507,7 +507,7 @@ if $ARGS[0] = 'walklake1':
 				act 'Comply':
 					cla & *clr
 					gs 'cum_call', 'face', 'A177', 1
-					gs 'cum_call', 'mouth', 'A177', 1
+					gs 'cum_call', 'mouth_swallow', 'A177', 1
 					facial += 1
 					gs 'arousal', 'bj', 5
 					gs 'arousal', 'end'
@@ -518,7 +518,6 @@ if $ARGS[0] = 'walklake1':
 					act 'Wait for the man':
 						cla & *clr
 						minut += 2
-						swallow += 1
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/cumeat.jpg"></center>'
 						'Your face is dripping with semen, you feel no taste in your mouth and look at the guy. The guy smile and with his finger collects some sperm from your face. Then he puts his finger in your mouth causing you to lick sperm. When his finger is clean, he gathers the remnants of sperm from your face on his finger and stuck it back in your mouth. Once again you suck his finger and swallow cum.'
@@ -667,7 +666,7 @@ if $ARGS[0] = 'dinribak':
 			act 'Comply':
 				cla & *clr
 				gs 'cum_call', 'face', 'A177', 1
-				gs 'cum_call', 'mouth', 'A177', 1
+				gs 'cum_call', 'mouth_swallow', 'A177', 1
 				gs 'arousal', 'bj', 5
 				facial += 1
 				gs 'arousal', 'end'
@@ -678,7 +677,6 @@ if $ARGS[0] = 'dinribak':
 				act 'Wait for the man':
 					cla & *clr
 					minut += 2
-					swallow += 1
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/cumeat.jpg"></center>'
 					'Your face is dripping with semen, you feel no taste in your mouth and look at the guy. The guy smile and with his finger collects some sperm from your face. Then he puts his finger in your mouth causing you to lick sperm. When his finger is clean, he gathers the remnants of sperm from your face on his finger and stuck it back in your mouth. Once again you suck his finger and swallow cum.'
@@ -950,9 +948,8 @@ if $ARGS[0] = 'stasValera4':
 			act 'Finish Valera off':
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/stas/sex<<rand(1,4)>>.jpg"></center>'
 				'Valera groans and his cock shudders in your mouth.'
-				swallow += 1
 				gs 'boyStat', 'A48'
-				gs 'cum_call', 'mouth', 'A48', 1
+				gs 'cum_call', 'mouth_swallow', 'A48', 1
 				gs 'arousal', 'bj', 5
 				gs 'dinsex','bj_swallow_random'
 
@@ -1377,7 +1374,7 @@ end
 if $ARGS[0] = 'kater1cum':
 	*clr & cla
 	gs 'stat'
-	gs 'cum_call', 'mouth', 'a rescuer at the lake'
+	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
@@ -1388,7 +1385,6 @@ if $ARGS[0] = 'kater1cum':
 
 	act 'Lick residues':
 		*clr & cla
-		swallow += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/kater1/kater10.jpg"></center>'
 		'When the stream dries up, you are covered in sperm and begin to lick the remnants off his cock, savoring every drop.'
 
@@ -1637,8 +1633,7 @@ if $ARGS[0] = 'horse1':
 
 							act 'Remove from mouth':
 								*clr & cla
-								gs 'cum_call', 'mouth', 'Quad rider'
-								swallow += 1
+								gs 'cum_call', 'mouth_swallow', 'Quad rider'
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse1/horse8.jpg"></center>'
 								'You remove the member from your mouth and begin stroking it with your tongue, in a second your efforts were rewarded and a stream of sperm covers your tongue.'
@@ -1672,8 +1667,7 @@ end
 
 if $ARGS[0] = 'horse1bj':
 	*clr & cla
-	gs 'cum_call', 'mouth', 'Quad rider'
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', 'Quad rider'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse1/horse11.jpg"></center>'
 	'The flow of sperm gushes into your mouth, you swallow it purring with pleasure, lick the remnants of his cock and swallow again.'
@@ -1758,8 +1752,7 @@ if $ARGS[0] = 'horse2':
 
 								act 'Remove from your mouth':
 									*clr & cla
-									gs 'cum_call', 'mouth', 'Horse rider'
-									swallow += 1
+									gs 'cum_call', 'mouth_swallow', 'Horse rider'
 									gs 'stat'
 									'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse2/horse9.jpg"></center>'
 									'You remove the cock from your mouth and open wide, ready to catch the stream of sperm, the man does not keep you waiting and sperm splatters into your mouth, painting your tongue and throat.'

+ 1 - 2
locations/city_saunawhore.qsrc

@@ -644,11 +644,10 @@ if $ARGS[0] = 'cumMouth':
 	if useCondom = 1:
 		'The client strips the condom from his dick and shoots <<$cumType>> cum inside your mouth.'
 	else
-		swallow += 1
 		'The client stuffs his dick back inside your mouth, and as you suck it, he shoots <<$cumType>> cum inside your mouth.'
 	end
 	if rand(1,100) >= 70:gs 'dinSex', 'std_trigger_oral'
-	gs 'cum_call', 'mouth', 0, 0, 0, cumVolMl
+	gs 'cum_call', 'mouth_swallow', 0, 0, 0, cumVolMl
 	gs 'stat'
 	act 'Continue':gt 'city_saunawhore', 'clientLeave'
 end

+ 1 - 2
locations/city_trashplaceevents.qsrc

@@ -217,8 +217,7 @@ if $ARGS[0] = 'pos10':
 						'You start sucking enthusiastically, and your efforts are paying off. The old man is ready to cum.'
 						act 'In your mouth':
 							*clr & cla
-							swallow += 1
-							gs 'cum_call', 'mouth', 'hobo'
+							gs 'cum_call', 'mouth_swallow', 'hobo'
 							'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,'+rand(0,10)+'.mp4"></video></center>'
 							'A few minutes later he finishes, your mouth fills with nasty stinking sperm that you quickly swallow.'
 							

+ 5 - 1
locations/cum_call.qsrc

@@ -2,8 +2,9 @@
 
 !{$ARGS[0] is for the location and should be set for all but vaginal:
 'labia' - 'pantyfront' - 'anus' - 'butt' - 'pantyrear' - 'clothes_hidden' - 'clothes' - 'back' - 'legs'
-'arms' - 'face' - 'mouth' - 'hands' - 'stomach' - 'breasts' - 'hair' - 'internalcondom' - 'precum'
+'arms' - 'face' - 'mouth' - 'hands' - 'stomach' - 'breasts' - 'hair' - 'internalcondom' - 'precum' - 'mouth_swallow'
 	'precum' - is for whenever Sveta has unprotected vaginal sex. It will automatically set the volume to 1.
+	'mouth_swallow' does the same as mouth but increaments swallow for the cum eater trait
 $ARGS[1] is for the name of the sexual partner
 ARGS[2] is a for knowing the partner. Defaults to 0. If this is not set to 1 the status window message will mention "some guy" instead of his name.
 	0 - unknown sex partner (his name may be known, but she newer saw him before, and likely won't ever again, or she won't remeber it)
@@ -104,6 +105,9 @@ if $ARGS[0] ! 'precum':
 		spafinloc = 11
 	elseif $ARGS[0] = 'mouth':
 		spafinloc = 12
+	elseif $ARGS[0] = 'mouth_swallow':
+		spafinloc = 12
+		swallow += 1
 	elseif $ARGS[0] = 'hands':
 		spafinloc = 13
 	elseif $ARGS[0] = 'stomach':

+ 2 - 4
locations/gadriver.qsrc

@@ -425,8 +425,7 @@ if $ARGS[0] = 'gadbitch':
 								gs 'cum_call','anus',$boy, 1,'','',20
 								gs 'boyStat', 'A61'
 								npc_sex[$boy] += 1
-								gs 'cum_call','mouth',$boy
-								swallow += 1
+								gs 'cum_call','mouth_swallow',$boy
 								gs 'arousal', 'end'
 								gs 'stat'
 
@@ -474,8 +473,7 @@ if $ARGS[0] = 'gadbitch':
 								gs 'cum_call','anus',$boy, 1,'','',20
 								gs 'boyStat', 'A63'
 								npc_sex[$boy] += 1
-								gs 'cum_call','mouth',$boy
-								swallow += 1
+								gs 'cum_call','mouth_swallow',$boy
 								gang +=1
 								gs 'stat'
 

+ 2 - 4
locations/gadukino_event.qsrc

@@ -375,8 +375,7 @@ if $ARGS[0] = 'gadriver_gang':
 
 													act 'Make this group cum':
 														*clr & cla
-														gs 'cum_call', 'mouth', $boy, 1
-														swallow += 1
+														gs 'cum_call', 'mouth_swallow', $boy, 1
 														gs 'npcgeneratec', 0, 'unknown drunk guy', rand(19,45)
 														gs 'boyStat', $npclastgenerated
 														guy +=1
@@ -617,9 +616,8 @@ if $ARGS[0] = 'gadriver_gang':
 																												gs 'boyStat', $npclastgenerated, 'c'
 																												gs 'npcgeneratec', 0, 'stranger', rand(19,45)
 																												gs 'boyStat', $npclastgenerated, 'd'
-																												gs 'cum_call', 'mouth', $boy1, 1
+																												gs 'cum_call', 'mouth_swallow', $boy1, 1
 																												gs 'cum_call', 'face', $boy2, 1
-																												swallow += 1
 																												gs 'stat'
 
 																												'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_cum3.jpg"></center>'

+ 2 - 3
locations/gdktoilet_mens.qsrc

@@ -508,7 +508,7 @@ if $ARGS[0] = 'mensglory':
 							act 'Swallow':
 								*clr & cla
 								minut += 5
-								swallow += 1
+								gs 'cum_call', 'mouth_swallow', 'guy from the men''s bathroom'
 								gs 'stat'
 								'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,1.mp4"></video></center>'
 								'You decide to swallow his cum. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
@@ -538,8 +538,7 @@ if $ARGS[0] = 'mensglory':
 								gs 'willpower', 'sex', 'resist'
 								gs 'willpower', 'pay', 'resist'
 								minut += 5
-								swallow += 1
-								gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
+								gs 'cum_call', 'mouth_swallow', 'guy from the men''s bathroom'
 								gs 'arousal', 'end'
 								gs 'stat'
 								if pcs_throat <= 25:

+ 3 - 6
locations/gdktoilet_womens.qsrc

@@ -322,8 +322,7 @@ if $ARGS[0] = 'blowjob':
 		gs 'stat'
 		act 'Swallow':
 			*clr & cla
-			swallow += 1
-			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+			gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
 			gs 'arousal', 'end'
 			gs 'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
@@ -436,8 +435,7 @@ if $ARGS[0] = 'anal':
 		end
 		act 'Turn around, kneel and let him cum in your mouth':
 			*clr & cla
-			swallow += 1
-			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+			gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/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'
@@ -521,8 +519,7 @@ if $ARGS[0] = 'pussy2':
 				gs 'stat'
 				act 'Let him cum in your mouth':
 					*clr & cla
-					swallow += 1
-					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+					gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
 					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/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'

+ 1 - 2
locations/gevent.qsrc

@@ -50,8 +50,7 @@ if $ARGS[0] = '1':
 
 			act 'Swallow his cum':
 				*clr & cla
-				swallow += 1
-				gs 'cum_call', 'mouth', 'A54'
+				gs 'cum_call', 'mouth_swallow', 'A54'
 				minut += 5
 				money += 500
 				gs 'arousal', 'end'

+ 1 - 2
locations/gschool_events.qsrc

@@ -406,10 +406,9 @@ if $ARGS[0] = 'break_events':
 					*clr & cla
 					minut += 50
 					if npc_sex['A9'] = 0: npc_sex['A9'] += 1 & guy += 1
-					gs 'cum_call', 'mouth', 'A9', 1
+					gs 'cum_call', 'mouth_swallow', 'A9', 1
 					gs 'arousal', 'bj', 10
 					gs 'arousal', 'end'
-					swallow += 1
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/toiletbj.jpg"></center>'
 					'You obediently kneel before him, rubbing your hand over the bulge in Vitek''s sweatpants before pulling out his dick. Clasping your <<$liptalk3>> around the head, you run your tongue around the head a few times before sucking it in a bit deeper. You don''t want him to get angry at you, so you put some effort into it, sometimes licking his balls and taking his cock down your throat without really straining yourself. He mistakes your obedience for enthusiasm though and, laughing, turns to his friends and says "Guys just look at this whore going at it, she''s loving it!"'

+ 1 - 2
locations/gschool_lunch.qsrc

@@ -451,8 +451,7 @@ if $ARGS[0] = 'events':
 				gs 'boyStat', 'A9'
 				npc_sex[$boy] += 1
 				gs 'arousal','bj',10,'sub'
-				gs 'cum_call','mouth',$boy,1
-				swallow += 1
+				gs 'cum_call','mouth_swallow',$boy,1
 				gs 'arousal', 'end'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/toiletbj.jpg"></center>'

+ 2 - 3
locations/hunterLoveSex.qsrc

@@ -656,8 +656,7 @@ end &! --- din_hunters_sex_cumface7 ---
 if $ARGS[0] = 'din_hunters_sex_cumface6':
 	minut += 5
 	gs 'sweat', 'add', 10
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	'<center><H4>Hut</H4></center>'
 	'<center><video autoplay loop src="images/shared/sex/cum/cumf60.mp4"></video></center>'
 	*pl
@@ -930,7 +929,7 @@ if $ARGS[0] = 'din_hunters_sex_cumface2':
 	act 'Swallow':
 		*clr & cla
 		minut += 1
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
 		'<center><H4>Hut</H4></center>'
 		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_' + rand(13,14) + '.mp4"></video></center>'

+ 2 - 4
locations/hunter_interactions.qsrc

@@ -1825,8 +1825,7 @@ if $ARGS[0] = 'huntersmokBJ':
 		act 'Keep sucking':
 			*clr & cla
 			minut += 1
-			gs 'cum_call', 'mouth', $boy, 1
-			swallow += 1
+			gs 'cum_call', 'mouth_swallow', $boy, 1
 			huntersmokBJ = 0
 			gs 'stat'
 
@@ -2018,8 +2017,7 @@ if $ARGS[0] = 'creekside_gangbang':
 			gs 'boyStat', 'A174'
 			gs 'oral', 'start', 1
 
-			swallow += 1
-			gs 'cum_call', 'mouth', $boy, 1
+			gs 'cum_call', 'mouth_swallow', $boy, 1
 			gs 'dinsex', 'bj_swallow_random'
 
 			gs 'boyStat', 'A173'

+ 25 - 50
locations/hunters.qsrc

@@ -757,9 +757,8 @@ if $ARGS[0]='huntersgroupORALsi':
 	gs 'oral','start', 5, 'gangbang'
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
-	swallow += 1
 	'You hear <<$boydesc>> groaning more intensely, indicating he''s ready to cum. You look up at him, smiling with your eyes and speed up you head motion. You keep on pleasuring him until he finishes on your face. He walks away, blissfuly smiling.'
 
 	huntsexa = rand(1,5)
@@ -798,8 +797,7 @@ if $ARGS[0]='huntersgroupORALs':
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
 
 	gs 'dinsex', 'dinrandswallow'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	'You hear <<$boydesc>> groaning more intensely, indicating they''re ready to cum. You look at them, smiling with your eyes and speed up you head motion. You keep on pleasuring them until they finish on your face. They walks away, blissfuly smiling.'
 	gs 'stat'
 
@@ -831,8 +829,7 @@ if $ARGS[0]='huntersgroupORALs1end':
 	gs 'oral','start', 5, 'gangbang'
 	gs 'dinsex', 'dinrandswallow'
 	'<<$boydesc>> finishes in your mouth and walks away with a satisfied smiles on their faces, leaving you alone sitting on the blanket...'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'arousal', 'bj', 2, 'sub'
 	gs 'arousal', 'end'
 	gs 'stat'
@@ -849,8 +846,7 @@ if $ARGS[0]='huntersgroupORALi1end':
 
 	gs 'oral','start', 5, 'gangbang'
 	gs 'dinsex', 'dinrandswallow'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'arousal', 'bj', 2, 'sub'
 	'You lick <<$boydesc>>''s penis head until he finishes and walks away satisfied. He leaves you sitting alone on the blanket...'
 	gs 'arousal', 'end'
@@ -867,8 +863,7 @@ if $ARGS[0]='huntersgroupORALa1end':
 	'You get down on your knees. <<$boydesc>> grabs you by the head and tells you he wants you to lick his penis head...'
 
 	gs 'oral','start', 5, 'gangbang'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	'You lick <<$boydesc>>''s penis head until he finishes and walks away satisfied. He leaves you sitting alone on the blanket...'
 
@@ -892,8 +887,7 @@ if $ARGS[0]='huntersgroupORALi':
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
 	gs 'oral','start', 5, 'gangbang'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	'<<$boydesc>> cums in your mouth and walks away with a satisfied smile on their faces.'
 	gs 'arousal', 'bj', 2, 'sub', 'gangbang'
@@ -917,15 +911,13 @@ if $ARGS[0]='huntersgroupORALend1':
 	gs 'dinsex', 'dinrandswallow'
 	gs 'oral', 'start', 5, 'gangbang'
 	gs 'cum_call', 'face', $boy, 1,'','',20
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1,'','',20
+	gs 'cum_call', 'mouth_swallow', $boy, 1,'','',20
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A173'
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
 	gs 'cum_call', 'face', $boy, 1,'','',20
 	gs 'dinsex', 'dinrandswallow'
-	gs 'cum_call', 'mouth', $boy, 1,'','',20
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1,'','',20
 	if huntersexnude = 1 or forest_huntersex = 3:'The men order you to swallow all of the sperm. You enthusiasticly open your mouth ready to recive their loads. The men started groaning loudly and began cumming, the quantity of sperm was so overwhelming that you were not able to swallow all of it and some of drips onto your face. You see the displeasure in Sergeis'' and Igors'' faces not being able to swallow it all...'
 	if forest_gopsex = 3:'The men order you to swallow all of the sperm. You enthusiasticly open your mouth ready to recive their loads. The men started groaning loudly and began cumming, the quantity of sperm was so overwhelming that you were not able to swallow all of it and some of drips onto your face. You see the displeasure in Kolambas'' with Vasyas'' faces not being able to swallow it all...'
 	*nl
@@ -953,8 +945,7 @@ if $ARGS[0]='huntersgroupORALai':
 
 	gs 'oral', 'start', 5, 'gangbang'
 	gs 'dinsex', 'dinrandswallow'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	'<<$boydesc>> finish and walk away with a blissful smile on their face.'
 
 	gs 'arousal', 'bj', 2, 'sub', 'gangbang'
@@ -993,8 +984,7 @@ if $ARGS[0]='huntersgroupORALi1':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'oral', 'start', 5, 'gangbang'
 	gs 'dinsex', 'dinrandswallow'
 	'<<$boydesc>> groans loudly while cumming. He zips his pants and walks away.'
@@ -1020,8 +1010,7 @@ if $ARGS[0]='huntersgroupORALas':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A173'
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'oral', 'start', 5, 'gangbang'
 	gs 'dinsex', 'dinrandswallow'
 	'<<$boydesc>> finish and walk away with a blissful smile on their face.'
@@ -1153,8 +1142,7 @@ if $ARGS[0]='huntersgroupVa':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	'<<$boydesc>> came in your mouth...'
 
@@ -1216,16 +1204,14 @@ if $ARGS[0]='huntersgroupVi':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
 	gs 'cum_call', 'face', $boy, 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
-	swallow += 1
 	gs 'cum_call', 'face', $boy, 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'Andrei and Sergei reached climax pretty quickly finishing in your mouth. You tried to swallow it all but fail to hold it inside your mouth, trickling down your chin. Andrei and Sergei walk away satisfied, while you continue riding Igor...'
 	if forest_gopsex = 3:'Mitka with Kolyamba reached climax pretty quickly finishing in your mouth. You tried to swallow it all but fail to hold it inside your mouth, trickling down your chin. Mitka with Kolyamba walk away satisfied, while you continue riding Vasyan... '
@@ -1261,8 +1247,7 @@ if $ARGS[0]='huntersgroupVis':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'A satisfied Andrei steps aside, you continue fucking Igor, and sucking Sergei off... '
 	if forest_gopsex = 3:'A satisfied Mitka steps aside, you continue fucking Vasyan, and sucking Kolyamba off... '
@@ -1343,8 +1328,7 @@ if $ARGS[0]='huntersgroupVs1':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A173'
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'Igor cums in your mouth and crashes next you, while Sergei keeps fucking you...'
 	if forest_gopsex = 3:'Vasyan cums in your mouth and crashes next you, while Kolyamba keeps fucking you...'
@@ -1381,8 +1365,7 @@ if $ARGS[0]='huntersgroupVia':
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
 	gs 'cum_call', 'face', $boy, 1
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'Sergei cums in your mouth. You''re not able to swallow the load and the some part of it gets smeared over your face. Sergei steppes aside satisfied, you keep on fucking Igor, and sucking Andrei...'
 	if forest_gopsex = 3:' Kolyamba cums in your mouth. You''re not able to swallow the load and the some part of it gets smeared over your face. Kolyamba steppes aside satisfied, you keep on fucking Vasyan, and sucking Mitka...'
@@ -1436,8 +1419,7 @@ if $ARGS[0]='huntersgroupVi2':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'Andrei cums and walks away, you continue to accustom your anus with Igors'' thrusts...'
 	if forest_gopsex = 3:'Mitka cums and walks away, you continue to accustom your anus with Vasyan''s thrusts...'
@@ -1545,8 +1527,7 @@ if $ARGS[0]='huntersgroupVaOHi':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'Sergei steps away satisfied, Andrei continues fucking while you keep masturbating Igor... '
 	if forest_gopsex = 3:'Kolyamba steps away satisfied, Mitka continues fucking while you keep masturbating Vasyan... '
@@ -1674,8 +1655,7 @@ if $ARGS[0]='huntersgroupDPai':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'Satisfied <<$boydesc>> steps away while Andrei and Igor continue to fuck you relentlessly... '
 	if huntersexnude = 1 or forest_huntersex = 3:'Satisfied <<$boydesc>> steps away while Mitka and Vasyan continue to fuck you relentlessly... '
@@ -1737,8 +1717,7 @@ if $ARGS[0]='huntersgroupVsOHi':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'A satisfied Andrei stepes aside, you continue pleasuring Sergei and Igor... '
 	if forest_gopsex = 3:'A satisfied Mitka steps aside, you continue pleasuring Kolyamba and Vasyan... '
@@ -1819,8 +1798,7 @@ if $ARGS[0]='huntersgroupVsO':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A173'
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	if huntersexnude = 1 or forest_huntersex = 3:'Igor cums, feeling satisfied he steps aside, Sergei keeps on fucking you... '
@@ -1902,8 +1880,7 @@ if $ARGS[0]='huntersgroupViO':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	'A satisfied <<$boydesc>> steps aside, the other guy keeps going on...'
 
@@ -1982,8 +1959,7 @@ if $ARGS[0]='huntersgroupVaO':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A174'
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'You feel Sergei''s cock throbbing inside your mouth, he starts grunting loudly and releases his spunk inside your mouth. Andrei now alone and warmed up tells you to...'
 	if forest_gopsex = 3:'You feel Mitka''s cock throbbing inside your mouth, he starts grunting loudly and releases his spunk inside your mouth. Kolyamba now alone and warmed up tells you to...'
@@ -2041,8 +2017,7 @@ if $ARGS[0]='huntersgroupAsO':
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 	if huntersexnude = 1 or forest_huntersex = 3:'A satisfied Andrei cums and moves away while Sergei continues to pound you wondering if he should...'
 	if forest_gopsex = 3:'A satisfied Mitka cums and moves away while Kolyamba continues to pound you wondering if he should...'

+ 37 - 74
locations/huntersex.qsrc

@@ -145,9 +145,8 @@ if $ARGS[0] = 'sexafterstrip1':
 														gs 'cum_call', 'face', $boy[2],1,'','',20
 														gs 'cum_call', 'face', $boy[3],1,'','',20
 														gs 'cum_call', 'stomach', $boy[2],1,'','',20
-														gs 'cum_call', 'mouth', $boy[1],1,'','',20
+														gs 'cum_call', 'mouth_swallow', $boy[1],1,'','',20
 														gs 'cum_call','breasts',$boy[3],1,'','',20
-														swallow += 1
 														gs 'stat'
 														'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/dance/dancesexoi6.jpg"></center>'
 														'Finally, the guys started to cum. Jets of sperm struck your face, some got in your mouth and dripped onto your breast and stomach as well...'
@@ -380,8 +379,7 @@ if $ARGS[0] = 'doubleloveOralCum12_1':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doubleloveoralcum12_1.jpg"></center>'
 	'You kneel in front of guys and begin sucking their dicks, taking turns and paying attention to each one...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174'
 	if temphunt = 2:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61'
@@ -406,8 +404,7 @@ if $ARGS[0] = 'doubleloveOralCum12_2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doubleloveoralcum12_2.jpg"></center>'
 	'You kneel in front of guys and begin sucking their dicks, taking turns and paying attention to each one...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	if temphunt <= 2:gs 'boyStat', 'A172'
 	if temphunt = 3:gs 'boyStat', 'A173'
@@ -486,8 +483,7 @@ if $ARGS[0] = 'doubleloveDogCum112_2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovedogcum112_2.jpg"></center>'
 	'You bend over in between the boys and suck one cock, while the second penetrates you from behind...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	if temphunt <= 2:gs 'boyStat', 'A172' & boyAsexa += 1
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
@@ -570,8 +566,7 @@ if $ARGS[0] = 'doubleloveDogCum212_2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovedogcum212_2.jpg"></center>'
 	'You bend over in between the boys and suck one cock, while the second penetrates you from behind...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174' & boyBsexa += 1
 	if temphunt = 2:gs 'boyStat', 'A173' & boyBsexa += 1
@@ -655,8 +650,7 @@ if $ARGS[0] = 'doubleloveSideCum12_2':
 	lubonus += 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovesidecum12_2.jpg"></center>'
 	'You lie on your side with a member in front of your face, and the other one penetrating you from behind...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174' & boyBsexa += 1
 	if temphunt = 2:gs 'boyStat', 'A173' & boyBsexa += 1
@@ -743,8 +737,7 @@ if $ARGS[0] = 'doubleloveCowCum112_2':
 	lubonus += 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovecowcum112_2.jpg"></center>'
 	'One of the guys lays on the ground and you mount him. The second puts his cock in your mouth...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	if temphunt <= 2:gs 'boyStat', 'A172' & boyAsexa += 1
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
@@ -827,8 +820,7 @@ if $ARGS[0] = 'doubleloveCowCum212_2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovecowcum212_2.jpg"></center>'
 	'One of the guys lays on the ground and you mount him. The second puts his cock in your mouth...'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	if temphunt <= 2:gs 'boyStat', 'A172' & boyAsexa += 1
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
@@ -959,8 +951,7 @@ end
 
 if $ARGS[0] = 'doubleloveOralCum1':
 	*clr & cla
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temphunt <= 2:gs 'boyStat', 'A172'
 	if temphunt = 3:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63'
@@ -1001,8 +992,7 @@ end
 
 if $ARGS[0] = 'doubleloveOralCum2':
 	*clr & cla
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174'
 	if temphunt = 2:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61'
@@ -1024,8 +1014,7 @@ end
 
 if $ARGS[0] = 'doubleloveOralCum12':
 	*clr & cla
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'cum_call', 'face', $boy, 1
 	lubonus = 0
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
@@ -1074,8 +1063,7 @@ if $ARGS[0] = 'sluthomeOralCum1':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeoralcum1.jpg"></center>'
 	'Without warning, the guy begins to cum.'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	gs 'oral','start'
 	gs 'dinsex', 'dinrandswallow'
@@ -1104,8 +1092,7 @@ if $ARGS[0] = 'sluthomeOralCum2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeoralcum2.jpg"></center>'
 	'Without warning, the guy begins to cum.'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 
 	gs 'oral','start'
 	gs 'dinsex', 'dinrandswallow'
@@ -1135,8 +1122,7 @@ if $ARGS[0] = 'sluthomeOralCum3':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeoralcum3.jpg"></center>'
 	'<<$boydesc>> pushes his whole weight against your head, forcing you to swallow more of his <<dick>> cm dick.'
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if dick > pcs_throat:'Immediately your gag reflex kicks in you feel tears forming in your eyes.'
 	if dick < pcs_throat:'Fortunately your throat is well trained and you swallow the guy''s whole dick without any difficulties.'
 	'<<$boydesc>> he began to move faster and you realized that he was already ready to cum...'
@@ -1166,9 +1152,8 @@ end
 
 if $ARGS[0] = 'sluthomeOralCum4':
 	*clr & cla
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'cum_call', 'face', $boy, 1
-	swallow += 1
 	gs 'cum_call', 'stomach', $boy, 1
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeoralcum4.'+rand(1,3)+'.jpg"></center>'
@@ -1467,13 +1452,11 @@ if $ARGS[0] = 'huntersgrVaO':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A174'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Sergei and Igor get up and walk away.'
@@ -1503,8 +1486,7 @@ if $ARGS[0] = 'huntersgrVaOi':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A174'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Sergei gets up and walks away.'
@@ -1592,8 +1574,7 @@ if $ARGS[0] = 'huntersgrVsOi':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A172'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Andrei gets up and walks away.'
@@ -1624,13 +1605,11 @@ if $ARGS[0] = 'huntersgrVsO':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A172'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Sergei and Igor had finished and walked away.'
@@ -1691,13 +1670,11 @@ if $ARGS[0] = 'huntersgrViO':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A174'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	gs 'boyStat', 'A172'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Andrei and Sergei get up and walk away.'
@@ -1758,8 +1735,7 @@ if $ARGS[0] = 'huntersgrVsOi1':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A172'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Andrey gets up and walks away.'
@@ -1817,8 +1793,7 @@ if $ARGS[0] = 'huntersgrVaOs':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Igor gets up and walks away.'
@@ -1852,13 +1827,11 @@ if $ARGS[0] = 'huntersgrVO':
 	gs 'dinsex','sexcum'
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	gs 'boyStat', 'A174'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Everyone is exhausted and immediately fell asleep.'
@@ -2030,13 +2003,11 @@ if $ARGS[0] = 'huntersgrAiO':
 	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	gs 'boyStat', 'A172'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	gs 'boyStat', 'A174'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Andrei and Sergei get up and walk away.'
@@ -2061,8 +2032,7 @@ if $ARGS[0] = 'huntersgrO3':
 		pose = 0
 		gs 'cum_call', 'face', $boy, 1
 		gs 'cum_call', 'stomach', $boy, 1
-		gs 'cum_call', 'mouth', $boy, 1
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/dance/hantersgro3cum1.'+rand(1,6)+'.jpg"></center>'
 		'Finally all the guys start to cum. Jets of sperm cover your face, hit you in the mouth and drip all over your body too...'
@@ -2164,8 +2134,7 @@ if $ARGS[0] = 'huntersgr2VO':
 	gs 'dinsex','sexcum'
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	gs 'arousal', 'vaginal', 5, 'sub', 'group'
@@ -2213,8 +2182,7 @@ if $ARGS[0] = 'huntersgr2ViO':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A172'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Andrei gets up and walks away.'
@@ -2242,8 +2210,7 @@ if $ARGS[0] = 'huntersgr2VsO':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Igor gets up and walks away, but you continue with Sergei.'
@@ -2293,9 +2260,8 @@ if $ARGS[0] = 'huntersgr2VaO':
 	gs 'dinsex','vaginal_sex',10
 
 	gs 'boyStat', 'A174'
-	swallow += 1
 	gs 'cum_call', 'face', $boy, 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Sergei gets up and walks away, but you continue with Andrei.'
@@ -2371,9 +2337,8 @@ if $ARGS[0] = 'huntersgr2AiO':
 	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	gs 'boyStat', 'A174'
-	swallow += 1
 	gs 'cum_call', 'face', $boy, 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Sergei gets up and walks away, but you continue with Igor.'
@@ -2424,8 +2389,7 @@ if $ARGS[0] = 'huntersgr2AsO':
 	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	gs 'boyStat', 'A173'
-	swallow += 1
-	gs 'cum_call', 'mouth', $boy, 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'dinsex', 'dinrandswallow'
 
 	'Igor gets up and walks away, but you continue with Andrei and Sergei.'
@@ -2554,8 +2518,7 @@ if $ARGS[0] = 'huntersgrO1':
 	*clr & cla
 	minut += 1
 	gs 'cum_call', 'face', $boy, 1,'','',20
-	gs 'cum_call', 'mouth', $boy, 1,'','',20
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1,'','',20
 	body_write += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/dance/hantersgro1cum.jpg"></center>'

+ 1 - 2
locations/igorev.qsrc

@@ -213,10 +213,9 @@ if $ARGS[0] = 'din_sex':
 				gs 'stat'
 				act 'Swallow his sperm':
 					cls
-					swallow += 1
 					'<center><img <<$set_imgh>> src="images/pc/body/cum/swallow/swallow7.jpg"></center>'
 					'You continue sucking his erupted cock and swallow the cum as soon as it reaches your mouth. The stream of sperm is never ending so instead of swallowing everything you let it flow out onto the cock. Finally the flow dies down and you let go of the limp cock out of your mouth. Your <<$liptalk3>> is wet from all the semen.'
-					gs 'cum_call', 'mouth', $boy, 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					gs 'arousal', 'bj', 10
 					gs 'stat'
 					act 'Continue':gt 'igorEv', 'din_igor_end'

+ 1 - 2
locations/katalkinSex.qsrc

@@ -72,9 +72,8 @@ if $ARGS[0] = 'sexgo':
 			if rand(0, 1) = 0:
 				act 'Swallow his cum':
 					*clr & cla
-					swallow += 1
 					KatalkinSwallow += 1
-					gs 'cum_call','mouth',$boy,1
+					gs 'cum_call','mouth_swallow',$boy,1
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/katalkin/sex/swallow.jpg"></center>'
 					gs 'dinsex','bj_swallow_random'
 					gs 'arousal', 'end'

+ 5 - 6
locations/kotovSex.qsrc

@@ -207,7 +207,7 @@ if $ARGS[0] = 'bj':
 		act 'Swallow his load while he cums':
 			*clr & cla
 			minut += 5
-			swallow += 1
+			gs 'cum_call','mouth_swallow','A9', 1
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cocksuck2.jpg"></center>'
 			'You swallow the sperm as much as you can, when you feel it in your mouth. You didn''t get all of it, but obediently swallow most of his load and keep sucking his dick even when it begins to soften. Vitek groans and pulls away from you, saying: "Wow, it''s so sensitive! Please stop!"'
 			'You simply smile at him and say: "Just trying to make you feel good, babe..."'
@@ -234,7 +234,7 @@ if $ARGS[0] = 'bj':
 			act 'Swallow it':
 				*clr & cla
 				minut += 5
-				swallow += 1
+				gs 'cum_call','mouth_swallow','A9', 1
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum19.jpg"></center>'
 				'When he pulls out you show his load in your mouth before swallowing it, and opening your mouth again to show him that it''s gone. Vitek grins at you with an adoring look in this eyes... he loves it when you do that.'
 				gs 'arousal', 'end'
@@ -244,7 +244,7 @@ if $ARGS[0] = 'bj':
 			act 'Play with his sperm':
 				*clr & cla
 				minut += 5
-				swallow += 1
+				gs 'cum_call','mouth_swallow','A9', 1
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/kotovbjcum2.jpg"></center>'
 				'When he pulls out you show his load in your mouth and play with it, tossing it around with your tongue and blowing bubbles. Vitek grins at you with an adoring look in this eyes... he loves it when you act like a slut for him.'
 				gs 'arousal', 'end'
@@ -367,8 +367,7 @@ if $ARGS[0] = 'cumface6':
 	'You feel his member throb down your throat, and you hold still to let him enjoy his orgasm the way he pleases. You swallow most of his sperm, but don''t catch all of it. With your <<$pcs_eyecol>> eyes fixated onto his, you let it leak out of your mouth and eventually suck his cock clean when you feel he''s finished.'
 	'He laughs at your lewd display and says: "You''re such an insatiable slut, <<$pcs_nickname>>. That was exactly what I needed today."'
 	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'cum_call','mouth','A9', 1
-	swallow += 1
+	gs 'cum_call','mouth_swallow','A9', 1
 	gs 'arousal', 'end'
 	gs 'stat'
 	act 'Relax in his room':gt 'kotovdom','kotovkom'
@@ -433,7 +432,7 @@ if $ARGS[0] = 'cumface2':
 		*clr & cla
 		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_' + rand(13,14) + '.mp4"></video></center>'
 		minut += 1
-		swallow += 1
+		gs 'cum_call','mouth_swallow','A9', 1
 		'You''ve actually grown to like the taste, and swallow every drop with great pleasure. When you''re finished, you smile at him happily.'
 		'He grins at you proudly: "I love that my kitten is such a slut for cum... don''t forget to wash your mouth babe, I do want to kiss you later."'
 		gs 'arousal', 'end'

+ 1 - 2
locations/mey_tamara_events.qsrc

@@ -721,10 +721,9 @@ if $args[0] = 'party4a':
 								!!according to texts, kuni/bj/sex/cum in mouth
 								stat['cuni'] += 1
 								stat['bj'] += 1
-								swallow += 1
 								guy += 1
 								stat['vaginal'] += 1
-								gs 'cum_call', 'mouth', 'bussinessman at party', 1
+								gs 'cum_call', 'mouth_swallow', 'bussinessman at party', 1
 								minut += 20
 								gs 'stat'
 

+ 4 - 8
locations/mitka.qsrc

@@ -212,8 +212,7 @@ if $ARGS[0] = 'sex_chat':
 					'Eventually, you feel Mitka''s cock pulse and a few seconds later your mouth is filled with his salty sperm. You quickly swallow it all down.'
 					
 					gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-					gs 'cum_call','mouth','A63',1
-					swallow += 1
+					gs 'cum_call','mouth_swallow','A63',1
 				else
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum1.jpg"></center>'
 					*nl
@@ -221,8 +220,7 @@ if $ARGS[0] = 'sex_chat':
 					'Slowly he builds up a rhythm and finally finishes in your mouth. He makes you swallow and lick him clean before removing his cock from your mouth.'
 					
 					gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough'
-					gs 'cum_call','mouth','A63',1
-					swallow += 1
+					gs 'cum_call','mouth_swallow','A63',1
 				end
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -356,8 +354,7 @@ if $ARGS[0] = 'sex_chat':
 						'Eventually, you feel Mitka''s cock pulse and a few seconds later your mouth is filled with his salty sperm. You quickly swallow it all down.'
 						
 						gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-						gs 'cum_call','mouth','A63',1
-						swallow += 1
+						gs 'cum_call','mouth_swallow','A63',1
 					else
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum1.jpg"></center>'
 						*nl
@@ -365,8 +362,7 @@ if $ARGS[0] = 'sex_chat':
 						'Slowly he builds up a rhythm and finally finishes in your mouth. He makes you swallow and lick him clean before removing his cock from your mouth.'
 						
 						gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough'
-						gs 'cum_call','mouth','A63',1
-						swallow += 1
+						gs 'cum_call','mouth_swallow','A63',1
 					end
 					gs 'arousal', 'end'
 					gs 'stat'

+ 4 - 8
locations/mitkabuh.qsrc

@@ -540,8 +540,7 @@ if $ARGS[0] = 'solo_1to9':
 					'He makes you lick his dick clean before he leaves you to go back to drinking with Kolyamba and Vasyan. After a little while you sober up enough to get dressed and go sit back by the boys.'
 					
 					gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-					gs 'cum_call','mouth','A63',1
-					swallow += 1
+					gs 'cum_call','mouth_swallow','A63',1
 				else
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum2.jpg"></center>'
 					*nl
@@ -551,9 +550,8 @@ if $ARGS[0] = 'solo_1to9':
 					
 					gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough'
 					gs 'cum_call','face','A63',1
-					gs 'cum_call','mouth','A63',1
+					gs 'cum_call','mouth_swallow','A63',1
 					gs 'cum_call','hair','A63',1
-					swallow += 1
 				end
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -765,8 +763,7 @@ if $ARGS[0] = 'solo_11andup_1boy':
 				'He makes you lick his dick clean before he leaves you to go back to drinking again. After a little while you sober up enough to get dressed and go sit back by the boys.'
 				
 				gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-				gs 'cum_call','mouth',$boy[0],1
-				swallow += 1
+				gs 'cum_call','mouth_swallow',$boy[0],1
 				gs 'arousal', 'end'
 				gs 'stat'
 
@@ -902,9 +899,8 @@ if $ARGS[0] = 'solo_11andup_2boys':
 				'They make you lick them both clean before going back to drinking again. After a little while you sober up enough to get dressed and go sit back by the boys.'
 				
 				gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-				gs 'cum_call','mouth',$boy[0],1
+				gs 'cum_call','mouth_swallow',$boy[0],1
 				gs 'cum_call','mouth',$boy[1],1
-				swallow += 1
 				gs 'arousal', 'end'
 				gs 'stat'
 

+ 10 - 20
locations/mitkasex.qsrc

@@ -184,8 +184,7 @@ if $ARGS[0] = 'gad2':
 end
 
 if $ARGS[0] = 'gadOralCum2_1':
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	protect = 0
 	if temp_ms = 1:gs 'boyStat', 'A63'
 	if temp_ms = 2:gs 'boyStat', 'A62'
@@ -214,8 +213,7 @@ if $ARGS[0] = 'gadOralCum2_1':
 end
 
 if $ARGS[0] = 'gadOralCum2_2':
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temp_ms = 1:gs 'boyStat', 'A61'
 	if temp_ms = 2:gs 'boyStat', 'A63'
 	if temp_ms = 3:gs 'boyStat', 'A62'
@@ -321,8 +319,7 @@ end
 
 if $ARGS[0] = 'gadDogCum2_1':
 	minut += 5
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temp_ms = 1:gs 'boyStat', 'A63'
 	if temp_ms = 2:gs 'boyStat', 'A62'
 	if temp_ms = 3:gs 'boyStat', 'A61'
@@ -427,8 +424,7 @@ if $ARGS[0] = 'gadCow2':
 end
 
 if $ARGS[0] = 'gadCowCum2_1':
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temp_ms = 1:gs 'boyStat', 'A63'
 	if temp_ms = 2:gs 'boyStat', 'A62'
 	if temp_ms = 3:gs 'boyStat', 'A61'
@@ -531,8 +527,7 @@ if $ARGS[0] = 'gadStan':
 end
 
 if $ARGS[0] = 'gadStanCum2_1':
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	if temp_ms = 1:gs 'boyStat', 'A63'
 	if temp_ms = 2:gs 'boyStat', 'A62'
 	if temp_ms = 3:gs 'boyStat', 'A61'
@@ -618,8 +613,7 @@ end
 
 if $ARGS[0] = 'gadOralCum1':
 	minut += 5
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	protect = 0
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagadsexoralcuml1.jpg"></center>'
@@ -948,8 +942,7 @@ end
 
 if $ARGS[0] = 'forestOralCum1_1':
 	minut += 5
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	protect = 0
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaforestsexoralcuml1_1.jpg"></center>'
@@ -1152,8 +1145,7 @@ if $ARGS[0] = 'forestCowOral1_1':
 	'Removing the member from Mira''s vagina of you bring it to your lips...'
 	gs 'oral','start'
 	if horny_boyA >= 100:
-		gs 'cum_call', 'mouth', $boy, 1
-		swallow += 1
+		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'dinsex', 'bj_swallow_random'
 	end
 	*pl
@@ -1429,8 +1421,7 @@ end
 
 if $ARGS[0] = 'forestOralCum2_1':
 	minut += 5
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	gs 'cum_call', 'face', $boy, 1
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaforestsexoralcum2_1.jpg"></center>'
@@ -2165,8 +2156,7 @@ end
 
 if $ARGS[0] = 'forestCum3_1':
 	minut += 1
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
+	gs 'cum_call', 'mouth_swallow', $boy, 1
 	mitboysex = 0
 	protect = 0
 

+ 1 - 2
locations/nichBedroomServant.qsrc

@@ -310,9 +310,8 @@ elseif $ARGS[0] = 'sleepEvents':
 			'He unties one of your hands so you are able to remove the other ropes. Then he leaves your room without saying another word.'
 			gs 'arousal','bj',5,'bound','rough','rape'
 			gs 'arousal','end'
-			gs 'cum_call', 'mouth', 'A513', 1
+			gs 'cum_call', 'mouth_swallow', 'A513', 1
 			gs 'stat'
-			swallow += 1
 			nichGalaContractTarasCount += 1
 			act 'Back to sleep': gt 'bed2','dream'
 		elseif nichGalaContractTarasCount = 2 or nichRand = 2:	

+ 5 - 9
locations/pornfilm.qsrc

@@ -166,13 +166,12 @@ if $ARGS[0] = '2':
 					'<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cum.mp4"></video></center>'
 					'<<$pakter[1]>> is close, so you start quickly jerking him and stick your tongue out for him to shoot his load.'
 					cumnostd = 1
-					gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 36
+					gs 'cum_call', 'mouth_swallow', $pakterID[1], 1, 0, 0, 36
 					gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
 					gs 'stat'
 					act 'Clean his cock':
 						*clr & cla
 						minut += 5
-						swallow += 1
 						gs 'stat'
 						'<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
 						'You keep your eyes fixed on his, as you gently lick every last drop of sperm from his cock.'
@@ -243,7 +242,7 @@ if $ARGS[0] = '3':
 						*clr & cla
 						minut += 5
 						cumnostd = 1
-						gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 36
+						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'
@@ -253,7 +252,6 @@ if $ARGS[0] = '3':
 						act 'Clean his cock':
 							*clr & cla
 							minut += 5
-							swallow += 1
 							gs 'stat'
 							'<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
 							'Looking into his eyes adoringly, you meticulously lick all the cum off his dick.'
@@ -341,13 +339,12 @@ if $ARGS[0] = '4':
 							'<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/cum.mp4"></video></center>'
 							'<<$pakter[1]>> pulls out of your ass and you kneel before him. He brings his cock to your mouth and feeds you the contents of his balls.'
 							cumnostd = 1
-							gs 'cum_call', 'mouth', $pakterID[1], 1, 0, 0, 36
+							gs 'cum_call', 'mouth_swallow', $pakterID[1], 1, 0, 0, 36
 							gs 'cum_call', 'face', $pakterID[1], 1, 0, 0, 4
 
 							act 'Clean his cock':
 								*clr & cla
 								minut += 5
-								swallow += 1
 								gs 'stat'
 								'<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
 								'You keep look deep into his eyes as you lick his cock clean.'
@@ -1387,10 +1384,9 @@ if $ARGS[0] = '14':
 			cumnostd = 1
 			gs 'cum_call', 'precum', 'Porn Fan', 0, 0, 10000, 1
 			cumnostd = 1
-			gs 'cum_call', 'mouth', 'Porn Fan', 0, 0, 10000, 40
+			gs 'cum_call', 'mouth_swallow', 'Porn Fan', 0, 0, 10000, 40
 			bj50 -= 1
 			stat['bj'] += 1
-			swallow += 1
 		end
 		if bj50 > 0: jump 'gbblow'
 		:gbhand
@@ -1682,7 +1678,7 @@ if $ARGS[0] = '16':
 						act 'Clean his cock':
 							*clr & cla
 							minut += 5
-							swallow += 1
+							gs 'cum_call', 'mouth_swallow', $pakterID[1], 1, 0, 10000, 4
 							'<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/bj2.mp4"></video></center>'
 							'You quickly slide off the table and take his cock down your throat before licking his shaft clean, the camera getting a good shot of your cum covered ass as you do.'
 							gs 'arousal', 'end'

+ 2 - 4
locations/pussykats.qsrc

@@ -664,8 +664,7 @@ if $ARGS[0] = '13':
 				'You have nowhere to go. You barely have time to close your eyes before a powerful jet of sperm hits you in the face. Then another. You smell a strong masculine fragrance. Cum completely covers your face and hair and begins to flow down on the clothes, leaving thick spots.'
 
 				if pcs_horny > 80:
-					swallow += 1
-					gs 'cum_call', 'mouth'
+					gs 'cum_call', 'mouth_swallow'
 					gs 'stat'
 					'There is just so much on you! You start to collect sperm in your hands, and lick it of your fingers with great pleasure.'
 					'The smell and taste is driving you crazy, your legs give way and you feel your underbelly beginning to shudder. You''re coming.'
@@ -677,8 +676,7 @@ if $ARGS[0] = '13':
 
 					act 'Finish your shift':gt 'pussykats', 'endwork'
 				else
-					swallow += 1
-					gs 'cum_call', 'mouth'
+					gs 'cum_call', 'mouth_swallow'
 					gs 'stat'
 					'When the sperm stops hitting you in the face, you open your eyes and see a big appetizing dick before you. It is covered in sperm, emanating a strong masculine fragrance.'
 					'You can''t hold back and take the cock in your mouth. It turns out that he was not completely drained and you feel his last flinches as your mouth gets filled with sperm. You clean off his member before he takes it out of your mouth.'

+ 1 - 2
locations/qwmeet.qsrc

@@ -427,8 +427,7 @@ if $ARGS[0] = 'qwbereg':
 							'Hot jet of sperm hit you in the mouth. You started to swallow cum, and Vladimir continued to finish in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
 
 							gs 'arousal', 'bj', 5, 'sub'
-							swallow += 1
-							gs 'cum_call','mouth', $boy,1
+							gs 'cum_call','mouth_swallow', $boy,1
 							gs 'arousal', 'end'
 							gs 'stat'
 

+ 1 - 2
locations/swamp_woods.qsrc

@@ -280,8 +280,7 @@ if $ARGS[0] = 'shooting_practice':
 
 					gs 'boyStat', 'A172'
 					gs 'arousal', 'bj', 15, 'sub', 'exhibitionism'
-					gs 'cum_call', 'mouth', 'A172', 1
-					swallow += 1
+					gs 'cum_call', 'mouth_swallow', 'A172', 1
 					gs 'arousal', 'end'
 					gs 'stat'
 

+ 4 - 8
locations/swamphouse.qsrc

@@ -738,8 +738,7 @@ if $ARGS[0] = 'hunterstableBJ':
 				act 'Keep sucking':
 					*clr & cla
 					minut += 1
-					gs 'cum_call', 'mouth', $boy, 1
-					swallow += 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					hunterstableBJA = 1
 					gs 'stat'
 
@@ -792,8 +791,7 @@ if $ARGS[0] = 'hunterstableBJ':
 				act 'Keep sucking':
 					*clr & cla
 					minut += 1
-					gs 'cum_call', 'mouth', $boy, 1
-					swallow += 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					hunterstableBJS = 1
 					gs 'stat'
 
@@ -846,8 +844,7 @@ if $ARGS[0] = 'hunterstableBJ':
 				act 'Keep sucking':
 					*clr & cla
 					minut += 1
-					gs 'cum_call', 'mouth', $boy, 1
-					swallow += 1
+					gs 'cum_call', 'mouth_swallow', $boy, 1
 					hunterstableBJI = 1
 					gs 'stat'
 
@@ -1804,8 +1801,7 @@ if $ARGS[0] = 'huntersmokBJ':
 		act 'Keep sucking':
 			*clr & cla
 			minut += 1
-			gs 'cum_call', 'mouth', $boy, 1
-			swallow += 1
+			gs 'cum_call', 'mouth_swallow', $boy, 1
 			huntersmokBJ = 0
 			gs 'stat'