KevinSmarts 9 vuotta sitten
vanhempi
commit
cbd93be4e8

+ 2 - 2
locations/EvOtelMan

@@ -7,8 +7,8 @@ $din_otel_man_end = {
 		'<center><img src="images/qwest/alter/Ev/otel1.gif"></center>'
 		'Getting ready to leave you started to dress. <<$bname>> stretched and rolled over on the bed. "It was great <<$name>>."'
 
-		if cumface > 0:cumface = 0 & 'You found napkins and wiped off the face of the sperm.'
-		if cumanus > 0:'Have you tried to wipe the cum with his buttocks, but how could you not wiped out of your anus still leaking sperm.'
+		if sparrloc[temp] = 11 and sparrvol > 0:cumspclnt = 12 & gs 'cum_cleanup' & 'You found napkins and wiped the sperm off your face.'
+		if cumsumass > 60:'You try to wipe the cum from your buttocks, but you cannot wipe your ass clean when your anus is still leaking sperm.'
 
 		act 'Leave':gt 'vokzalG'
 

+ 1 - 1
locations/Komp

@@ -1235,7 +1235,7 @@ if $ARGS[0] = 'waitclients':
 			end
 			gs 'stat'
 			if analplugIN = 0:
-				if cumanus > 0:
+				if cumsumass > 39:
 					'<center><img src="images/camwhore/camwhore74.jpg"></center>'
 					'You turn your ass to the computer and reaching you hand behind you, begin to push, with a feeling of shame, from your rectum follows male sperm...'
 					'Chat is filled with vulgar, and sometimes insulting comments, therefore, you soon stop this humiliating activity...'

+ 5 - 0
locations/Military

@@ -58,6 +58,7 @@ end
 if $ARGS[0] = 'san0':
 	cla
 	*clr
+	$boy = 'Military Patient'
 	'<center><img src="images/img/military/san0.jpg"></center>'
 	'During the examination, the patient shows you your erection and looks at you in anticipation of responses.'
 
@@ -73,6 +74,7 @@ end
 if $ARGS[0] = 'san1':
 	cla
 	*clr
+	$boy = 'Military Doctor'
 
 	'<center><img src="images/img/military/san1.jpg"></center>'
 	'While in the infirmary is unoccupied, the doctor begins to pester you.'
@@ -88,6 +90,8 @@ end
 
 if $ARGS[0] = 'pro0':
 	cla
+	$boy = 'Military Man'
+	$boy1 = 'Military Man 2'
 
 	'To suit you two guys and offer to help them in one game, play the role of a captive spy.'
 
@@ -140,6 +144,7 @@ if $ARGS[0] = 'pro1':
 end
 
 if $ARGS[0] = 'rape':
+	$boy = 'Rapist'
 	cla
 	*clr
 	rape += 1

+ 3 - 0
locations/Palatka

@@ -26,6 +26,8 @@ end
 if $ARGS[0] = 'pal0':
 	cla
 	*clr
+	$boy = 'Military Man'
+	$boy1 = 'Military Man 2'
 	'<center><img src="images/img/military/pal0.jpg"></center>'
 	'Once you begin to change as the tent includes two soldiers and see you half-naked, running up to you with the members on the edge, you hvaete for their members, but what to do to squeeze harder and get them out of the tent or relax after a hard day.'
 
@@ -47,6 +49,7 @@ if $ARGS[0] = 'pal1':
 	act 'Say thank you':gt 'palatka', 'start'
 
 	act 'Repay in full':
+		$boy = 'Black Military Man'
 		guy += 1
 		picrand = 43
 		gt 'sex', 'minet'

+ 1 - 1
locations/WorkHosp

@@ -185,7 +185,7 @@ if $ARGS[0] = '1':
 			act 'Leave':gt 'WorkHosp', 'start'
 		end
 
-		act 'Amuse':guy += 2 & xgt 'sexdvoe', 'var'
+		act 'Amuse':guy += 2 & $boy = 'Doctor' & $boy1 = 'Doctor 1' & xgt 'sexdvoe', 'var'
 	end
 end
 

+ 2 - 0
locations/bed

@@ -298,6 +298,8 @@ if $ARGS[0] = 'vor':
 				*clr
 				picrand = 38
 				orgasm += 1
+				$boy = 'Rapist'
+				$boy1 = 'Rapist 1'
 				'<center><img src="images/img/spaln/g2.jpg"></center>'
 				'You stand up and bend over, one of them stands behind you and stuffs his dick into your pussy. "Yes, it''s dripping wet, this bitch was just waiting for some cock" he says.'
 				'"Open your mouth" growls the second guy inserting his dick into your mouth. They proceeded to rape you from both sides, you are overwhelmed with desire, and sipt-roasted with your hands tied behind your back by two strangers.'

+ 2 - 1
locations/bordel

@@ -86,7 +86,8 @@ end
 
 if $ARGS[0] = 'var':
 	if borsexkol >= 2:gt 'bordel', 'start'
-
+	$boy = 'Client'
+	$boy1 = 'Client 2'
 	minut += 30
 	borrand = rand(0, 10)
 

+ 2 - 0
locations/bouling

@@ -17,6 +17,8 @@ if hour >= 8 and hour <= 20:
 			boulingnav += rand(0, 3)
 			boulrand = rand(0, 9)
 
+			$boy = 'Bowling Competitor'
+			$boy1 = 'Bowling Competitor 2'
 			if boulrand = 0:
 				cla
 				'You see two guys and they challenge you to a game.'

+ 6 - 2
locations/din_pav

@@ -52,7 +52,7 @@ $koncepodos1 = {
     '- We`ll see.'
     '- Take off, rent, let tenants. They want, and the muddy. And I was a fool, learn the latest. '
     '- Coda-then the other was-then, Rise, if Hosh, but I will not go with you, legs ache.'
-    'Unpleasant, Squeaky and going with both of <<$name[1]>>, voice Storico'
+    'Unpleasant, Squeaky and going with both of <<$name>>, voice Storico'
     'And obsharpannosti,dimly lit lobby with a corridor, barely discernible sounds from various apartments, merged into a ghostly mutterings acted on your nerves, Scold chill to the bone, whispering - "Run"'
     'He rummaged in a drawer - "Miracles are happening, then my dear..."'
     '- Here`s,- croaked the old man and put your key in hand,'
@@ -406,6 +406,9 @@ $pavser9 = {
                                 *clr
                                 horny = 100
                                 gs'stat'
+								$boy = 'pavser'
+								cumprecheck = 1
+								gs 'cum_manage'
                                 '<center><img src="images/lmps/1day/07.jpg" ></center>'
                                 'Your consciousness enables and disables in the wild dance of passion...'
                                 'He vashel in you wildly roughly furiously, I strung you on your cock like a cherry on a skewer...'
@@ -464,7 +467,8 @@ $pavser10 = {
     minut += 30
     psi1day = 1
     sweat = 2
-    cumbelly = 1
+    spafinloc = 14
+	gs 'cum_manage'
     guy += 1
     sex += 1
     bj += 1

+ 1 - 0
locations/dina

@@ -927,6 +927,7 @@ $youriqwest = {
 }
 
 $brodila = {
+	sexpartkno = 0
     if housr = 1:
         gt'korr','start'
     end

+ 0 - 1
locations/gadriver

@@ -80,7 +80,6 @@ elseif temp = 3 and mirainriver = 0 and mitkasextimes >= 13 and hour >= 5 and su
 			pose = 0
 			sub += 5
 			anus += 3
-			cumanus += 3
 			gs 'stat'
 			
 			'<center><img src="images/qwest/gadukino/river/MitkaGuysRiverSex18.jpg"></center>'

+ 19 - 5
locations/gopskver

@@ -10,7 +10,7 @@ $d_dan_blowjob = {
 
 		swallow += 1
 		spafinloc = 12
-gs 'cum_manage'
+		gs 'cum_manage'
 
 		if DansOralSlut = 0:DansOralSlut = 1
 
@@ -46,7 +46,7 @@ $d_gop_triple_blow = {
 		if npcSex[10] = 0:npcSex[10] = 1 & guy += 1
 		dick = 17
 		spafinloc = 12
-gs 'cum_manage'
+		gs 'cum_manage'
 		swallow += 1
 		sub += 1
 		minut += 5
@@ -63,7 +63,7 @@ gs 'cum_manage'
 			if npcSex[11] = 0:npcSex[11] = 1 & guy += 1
 
 			spafinloc = 11
-gs 'cum_manage'
+			gs 'cum_manage'
 			dick = 15
 			sub += 1
 			minut += 5
@@ -81,7 +81,7 @@ gs 'cum_manage'
 				dick = 18
 				sub += 1
 				spafinloc = 11
-gs 'cum_manage'
+				gs 'cum_manage'
 				minut += 5
 				gs 'stat'
 				'<center><img src="images/qwest/alter/placer/bjgop3.jpg"></center>'
@@ -242,7 +242,21 @@ else
 				sex += 3
 				gang += 1
 				vagina += 3
-				cumbelly += 3
+				$boy = 'Shulga'
+				cumprecheck = 1
+				gs 'cum_manage'
+				$boy = 'Shulga'
+				sexpartkno = 1
+				spafinloc = 14
+				gs 'cum_manage'
+				$boy = 'Dan'
+				sexpartkno = 1
+				spafinloc = 14
+				gs 'cum_manage'
+				$boy = 'Vitek'
+				sexpartkno = 1
+				spafinloc = 14
+				gs 'cum_manage'
 				gs 'stat'
 				'<center><img src="images/qwest/alter/placer/gopgang.jpg"></center>'
 				'You passed out and woke up lying on the couch, inside your pussy that is moving. You are trying to focus his eyes and see in front of face Shulgi, transferring look down you can see that he moves his hips against your pubic area for, intoxication through until you reach, Shul''ga that you fucks, Once again you are off and opened his eyes already see you lying on the Dan, He takes out a member of you and you feel, that belly get what that warm drops, replacing Dan climbs on you Vitek, you feel, that he put his penis in you and they began to move there. After a while you came to their senses and see, that you are still lying on the couch. Guys sitting at the table and continue to drink.'

+ 3 - 0
locations/housezal

@@ -8,6 +8,9 @@ $locM = $CURLOC
 
 minut += 5
 gs 'stat'
+sexpartkno = 1
+$boy = 'Nicholas'
+$boy1 = 'Nicholas's Friend'
 '<center><b>Living Room</b></center>'
 '<center><img src="images/img/centr/housezal.jpg"></center>'
 

+ 3 - 0
locations/hozspal

@@ -9,6 +9,9 @@ $locM = $CURLOC
 $sexloc = 'house'
 minut += 5
 gs 'stat'
+sexpartkno = 1
+$boy = 'Nicholas'
+$boy1 = 'Nicholas's Friend'
 '<center><b>Master bedroom</b></center>'
 '<center><img src="images/img/centr/hozspaln.jpg"></center>'
 

+ 2 - 0
locations/kafe

@@ -383,6 +383,8 @@ gs 'cum_manage'
 				elseif kaferand = 1:
 					cls
 					gs 'stat'
+					$boy = 'Customer'
+					$boy1 = 'Customer 2'
 					'<center><img src="images/img/spaln/kafe2.jpg"></center>'
 					'You serve a table in the attic, with two men. Each time you come by they strive to pinch or slap your butt, or run their hands under your skirt.'
 

+ 5 - 1
locations/kit_din

@@ -17,7 +17,7 @@ $santehnikend3 = {
 	SUB += 1
 	facial += 1
 	spafinloc = 11
-gs 'cum_manage'
+	gs 'cum_manage'
 	if GrishaSex = 0:GrishaSex = 1 & guy += 1
 	if mop > 1:mop = 0
 	gs 'stat'
@@ -174,6 +174,10 @@ $santehnik = {
 	if husband = 0 or husbandrink = 10:dynamic $santehnik1 & exit
 	if husband > 0 and week < 6 and hour < 17 and hour > 7:dynamic $santehnik1 & exit
 
+	sexpartkno = 1
+	$boy = $husname
+	$boy1 = 'Joe the Plumber'
+
 	if husband > 0 and husbandrink ! 10:
 		cla
 		*clr

+ 3 - 0
locations/kitchen

@@ -9,6 +9,9 @@ $locM = $CURLOC
 minut += 5
 gs 'stat'
 gs 'kit_din'
+sexpartkno = 1
+$boy = 'Nicholas'
+$boy1 = 'Nicholas's Friend'
 '<center><b>Kitchen</b></center>'
 '<center><img src="images/img/centr/kitchen.jpg"></center>'
 

+ 4 - 0
locations/love

@@ -102,6 +102,10 @@ if $ARGS[0] = 'frends':
 	*clr
 	'<center><img src="images/img/hasb/z0.jpg"></center>'
 
+	sexpartkno = 1
+	$boy = $boyA
+	$boy1 = '<<$boyA>>''s Friend'
+
 	if proverka1 = 0 and proverka2 = 0 and proverka3 = 0 and proverka4 = 0 and proverka5 = 0:
 		minut += 180
 		'<<$boyA>> to drive you to your friends. The apartment had two guys <<$boyA>> introduced you as his bride, you sat down at a table set. You talked a couple of hours of fun when everything was eaten and drunk almost all <<$boyA>> has invited you to dance, you gladly agreed. <<$boyA>> was already pretty drunk and he''s bad at dancing, but good at it you paw, his hands squeezed your buttocks, he soon ran them under her dress and continued to stroke your ass. Her skirt rode up your panties and brought to the public, the guys were sitting on the sofa without taking your eyes from your buttocks. As a result, one of the guys got up from the couch and rocking podozhel to you "Very best bum on your heifers, let check out" he said, and slapped you on the buttocks so that you already jumped. <<$boyA>> and let you napravilssya to him "You do ohrenel, it''s my girl, you can watch, you can not touch."'

+ 8 - 2
locations/motherQW

@@ -257,7 +257,10 @@ if $ARGS[0] = 'oluHome':
 			anal += 1
 			dick = 23
 			if anal < dick: anal += 1
-			cumanus = 1
+			$boy = 'Olu'
+			sexpartkno = 1
+			spafinloc = 3
+			gs 'cum_manage'
 			sub += 5
 			agape = 3
 			agapetime = totminut
@@ -297,7 +300,10 @@ if $ARGS[0] = 'oluHome':
 				if anal < dick: anal += 1
 				anus += 10
 				sub += 1
-				cumanus = 1
+				$boy = 'Olu'
+				sexpartkno = 1
+				spafinloc = 3
+				gs 'cum_manage'
 				oluDRand = RAND(1,10)
 
 				if lubri > 0:

+ 45 - 1
locations/office

@@ -102,6 +102,8 @@ if $ARGS[0] = 'work':
 			if officerand = 9 and officeslut > 5:
 				cla
 				*clr
+				sexpartkno = 1
+				$boy = 'Office Manager'
 				'<center><img src="images/img/office/m0.jpg"></center>'
 				'You work somewhere zapropastilas <<$name>>, chef left. In the study includes one of the managers, "Hi <<$name>>, can you help me?"'
 
@@ -126,6 +128,8 @@ if $ARGS[0] = 'work':
 		elseif officerand = 8 and officeslut > 5:
 			cla
 			*clr
+			sexpartkno = 1
+			$boy = 'Office Manager'
 			'<center><img src="images/img/office/m2.jpg"></center>'
 			'You work somewhere zapropastilas <<$name>>, chef and left as an evil broke konditseoner. You get too hot and you rastegivat couple top buttons of her blouse, so now your breasts almost falling out of her. In the study includes one of the managers, "Hi <<$name>>, chef at home?".'
 			'"No, I left." you answer and dive back into the paper.'
@@ -152,6 +156,8 @@ if $ARGS[0] = 'work':
 		elseif officerand = 7 and officeslut > 5:
 			cla
 			*clr
+			sexpartkno = 1
+			$boy = 'Office Manager'
 			'<center><img src="images/img/office/m4.jpg"></center>'
 			'You should make copies of the documents, and you went to the archive where there was a huge copier. While you copied, came into the office one of the managers, and began to search among stelozhey with folders, you do not pay any attention to him and continued to do their work. A minute later, you felt his hand on my ass. "She asks, tell the truth that you have the best ass and you''re always ready to prove it?" he said, and without waiting for your answer, he continued, "Now I will test it." With these words, his hands slid under your clothes.'
 
@@ -193,6 +199,8 @@ if $ARGS[0] = 'work':
 		elseif officerand = 6 and officeslut > 5:
 			cla
 			*clr
+			sexpartkno = 1
+			$boy = 'Office Manager'
 			'<center><img src="images/img/office/m8.jpg"></center>'
 			'You work somewhere zapropastilas <<$name>>, chef left. In the study includes one of the managers, "Hi <<$name>>, chef at home?".'
 			'"No, I left." you answer and dive back into the paper.'
@@ -221,6 +229,8 @@ if $ARGS[0] = 'work':
 		elseif officerand = 5 and officeslut > 5:
 			cla
 			*clr
+			sexpartkno = 1
+			$boy = 'Office Boss'
 			'<center><img src="images/img/office/m10.jpg"></center>'
 			'You work somewhere zapropastilas <<$name>>, chef left and you re-freezes the computer. Swearing you call your sysadmin and ask him to come. In the study included a sysadmin and looking at computer govoit that he take it now and tomorrow will bring. "What am I going to do tomorrow, come here now and correct." you started.'
 			'"Well, no, it''s long, I have other work for many more, although we can agree and then I will fix it for you now, " he says'
@@ -502,6 +512,8 @@ if $ARGS[0] = 'boss':
 		act 'Harassing boss':
 			cla
 			*clr
+			sexpartkno = 1
+			$boy = 'Office Boss'
 			officeslut += 1
 			picrand = rand(61, 63)
 			'<center><img src="images/img/office/b<<picrand>>.jpg"></center>'
@@ -560,6 +572,8 @@ if $ARGS[0] = 'kuh':
 			act 'Do not resist':
 				cla
 				*clr
+				sexpartkno = 1
+				$boy = 'Office Manager'
 				officeslut += 1
 				'<center><img src="images/img/office/m14.jpg"></center>'
 				'Second hand he unbuttoned his pants and unleashed his already standing member. The first hand has moved from the back of your head and continued to push down putting your mouth on his penis.'
@@ -764,8 +778,10 @@ end
 if $ARGS[0] = 'boss0':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = 'Office Boss'
 	spafinloc = 12
-gs 'cum_manage'
+	gs 'cum_manage'
 	'<center><img src="images/img/office/b10.jpg"></center>'
 	'Taking out a member of your ass, and you boss gets <<$name>> kneels before his pulsating dildo. <<$name>> jet of sperm flies in the face, she immediately wraps his lips to suck from the rest, but you can only lick the drops from her face.'
 
@@ -922,6 +938,8 @@ end
 if $ARGS[0] = 'negr':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = 'Kas'
 	minut += 30
 	gs 'stat'
 	'<center><img src="images/img/office/s12.jpg"></center>'
@@ -960,6 +978,9 @@ end
 if $ARGS[0] = 'boss2':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = 'Office Boss'
+	$boy1 = 'Courier'
 	minut += 30
 	officeslut += 1
 	'<center><img src="images/img/office/b11.jpg"></center>'
@@ -1006,6 +1027,8 @@ end
 if $ARGS[0] = 'boss3':
 	cla
 	*clr
+	$boy = 'Office Boss'
+	$boy1 = 'Client'
 	minut += 30
 	officeslut += 1
 	'<center><img src="images/img/office/b14.jpg"></center>'
@@ -1040,6 +1063,9 @@ end
 if $ARGS[0] = 'boss4':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = 'Office Boss'
+	$boy1 = 'Office Manager'
 	minut += 30
 	officeslut += 1
 	'<center><img src="images/img/office/b17.jpg"></center>'
@@ -1108,6 +1134,8 @@ end
 if $ARGS[0] = 'boss5':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = 'Office Boss'
 	minut += 30
 	officeslut += 1
 	'<center><img src="images/img/office/b19.jpg"></center>'
@@ -1137,6 +1165,8 @@ end
 if $ARGS[0] = 'boss6':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = 'Office Boss'
 	spank += 1
 	minut += 30
 	officeslut += 1
@@ -1159,6 +1189,8 @@ end
 if $ARGS[0] = 'motiv0':
 	cla
 	*clr
+	$boy = 'Office Boss'
+	$boy1 = 'Client'
 	minut += 180
 	'<center><img src="images/img/office/m15.jpg"></center>'
 	'You come with the head to the hotel and go up to the room to the client. While the chef with the client to discuss the contract you park yourself on the bed and pretend that something down. When it comes to controversial issues, chief transplanted to you on the bed and starts stroking you. His hands glide over your body then crept under her skirt then stroking his chest, soon your skirt is Zadran to the waist. Customer looks to you between the legs without taking his eyes, seeing this boss says "can make a little break to relax." and you vskhvativ crotch pulls up, you go and find yourself standing on all fours on the bed with a bare ass. "You''re like <<$name>> help us relax?" appeals to you boss.'
@@ -1180,6 +1212,8 @@ end
 if $ARGS[0] = 'motiv1':
 	cla
 	*clr
+	sexpartkno = 0
+	$boy = 'Client'
 	minut += 120
 	picrand = rand(65, 68)
 
@@ -1196,6 +1230,8 @@ end
 if $ARGS[0] = 'motiv2':
 	cla
 	*clr
+	sexpartkno = 0
+	$boy = 'Client'
 	officerand2 = rand(1, 4)
 
 	if officerand2 = 1:gt 'office', 'motiv4'
@@ -1234,6 +1270,9 @@ end
 if $ARGS[0] = 'motiv3':
 	cla
 	*clr
+	sexpartkno = 0
+	$boy = 'Client'
+	$boy1 = 'Client 1'
 	picrand = rand(30, 33)
 	officerand2 = rand(1, 4)
 
@@ -1272,6 +1311,8 @@ end
 if $ARGS[0] = 'motiv4':
 	cla
 	*clr
+	sexpartkno = 0
+	$boy = 'Client'
 	picrand = 29
 	minut += 180
 	guy += 1
@@ -1303,6 +1344,9 @@ end
 if $ARGS[0] = 'motiv5':
 	cla
 	*clr
+	sexpartkno = 0
+	$boy = 'Client'
+	$boy1 = 'Client 1'
 	picrand = 34
 	minut += 180
 	guy += 2

+ 2 - 0
locations/poli

@@ -1076,6 +1076,8 @@ if $ARGS[0] = '1':
 	act 'Storm out':gt 'poli', 'start'
 
 	act 'Have some fun':
+		$boy = 'Doctor'
+		$boy1 = 'Doctor 2'
 		picrand = 11
 		guy += 2
 		xgt 'sexdvoe', 'var'

+ 15 - 3
locations/sexdvoe

@@ -107,9 +107,21 @@ if $ARGS[0] = 'end':
 	dvsxsex = 0
 	dvsxanal = 0
 	sexvar = 0
-	cumbelly = 1
-	cumlip = 1
-	cumface = 1
+	temp = 0
+	if sexpartkno = 1: temp = 1
+	sexvolume = 35
+	spafinloc = 11
+	gs 'cum_manage'
+	if temp = 1: sexpartkno = 1
+	sexvolume = 5
+	spafinloc = 12
+	gs 'cum_manage'
+	if temp = 1 and $boy ! 'Nicholas' and $boy ! $husname and $boy1 ! 'Client': sexpartkno = 1
+	$temp = $boy
+	$boy = $boy1
+	spafinloc = 14
+	gs 'cum_manage'
+	$boy = $temp
 
 	if horny >= 80:
 		horny = 0

+ 12 - 5
locations/sexm

@@ -695,7 +695,7 @@ if $ARGS[0] = 'blow':
 			*clr
 			swallow += 1
 			spafinloc = 12
-gs 'cum_manage'
+			gs 'cum_manage'
 			'<center><img src="images/picV/swallow.jpg"></center>'
 			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$boyA>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
 
@@ -721,14 +721,14 @@ gs 'cum_manage'
 				elseif tiprand = 3:
 					facial += 1
 					spafinloc = 11
-gs 'cum_manage'
+					gs 'cum_manage'
 					'<center><img src="images/picV/facial.jpg"></center>'
 					'You took out a member and at this point <<$boyA>> is dead right on your face, covering it with warm and sticky cum.'
 				end
 			elseif harakBoyA = 2:
 				facial += 1
 				spafinloc = 11
-gs 'cum_manage'
+				gs 'cum_manage'
 				'<center><img src="images/picV/facial.jpg"></center>'
 				'<<$boyA>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
 			end
@@ -816,9 +816,9 @@ if $ARGS[0] = 'gangbang':
 	anal += 1
 	sex += 1
 	spafinloc = 11
-gs 'cum_manage'
+	gs 'cum_manage'
 	spafinloc = 12
-gs 'cum_manage'
+	gs 'cum_manage'
 	facial += 1
 	vagina += 1
 	anus += 1
@@ -874,6 +874,9 @@ end
 if $ARGS[0] = 'popala':
 	cla
 	*clr
+	sexpartkno = 1
+	$boy = $husname
+	$boy1 = $boyA
 
 	if popolaini = 1:
 		'<center><img src="images/img/hasb/p0.jpg"></center>'
@@ -900,6 +903,7 @@ if $ARGS[0] = 'popala':
 			husbandMark = 0
 			husband = 0
 			divorced += 1
+			$boy = $boyA
 			'"No, I''m going, you betrayed our love." he faltered and ran from the room almost sobbing.'
 
 			if harakBoyA = 0:
@@ -1001,6 +1005,7 @@ if $ARGS[0] = 'popala':
 		husbandMark = 0
 		husband = 0
 		divorced += 1
+		$boy = $boyA
 		'"What the crap is going on here, " said <<$husName>> looking at you.'
 		'"<<$husName>> it''s not what you think it''s just sex, no feelings, I love only you. For me, it does not mean anything, come to me I''ll show you how much I love you." Answer You do not understand how you can''t be a delusion.'
 
@@ -1049,6 +1054,8 @@ if $ARGS[0] = 'popala':
 				act 'Take by mouth':
 					cla
 					*clr
+					spafinloc 12
+					gs 'Cum_Manage'
 					'<center><img src="images/img/hasb/p3.jpg"></center>'
 					'"So you''re married, you cheated on me, and I loved you so, you despicable liar, goodbye!" your guy shouted and ran out of the room.'
 					'<<$husName>> did not pay attention to him, he put dick in your mouth and keeping you a head literally started to fuck you in the mouth with each thrust pushing it deeper. You frantically grabbed the air, trying not to choke as he continued, suddenly he made a sudden movement and his cock popped into your throat, you tried to pull away, but he obmatiril telling you endure. He gave you a couple of seconds to get used to the term in the throat and began to fuck your throat, you do not get enough air and you frantically began to beat him to get free, but <<$husName>> only tightened his grip on your glolovu. When you''re starting to lose consciousness, he finally finished, you feel his sperm spread on your throat, making a couple of strong aftershocks, he let you go and you collapsed on the floor coughing sperm mixed with your saliva and swallowing wheezing air. <<$husName>> looked as you writhe on the floor, spat on the floor next to you, and left.'

+ 2 - 1
locations/sexorg

@@ -131,7 +131,8 @@ if $ARGS[0] = 'end':
 	orsxsex = 0
 	orsxanal = 0
 	sexvar = 0
-	cumlip = 1
+	spafinloc = 12
+	gs 'cum_manage'
 
 	if horny >= 80:
 		horny = 0

+ 17 - 3
locations/shulga_room

@@ -649,9 +649,23 @@ $drunken_sex = {
 			minut += 5 
 			horny +=5
 			facial += 1
-			cumbelly += 1
-			cumlip += 1
-			cumface += 1
+			temp = rand(0,2)
+			$boy = 'Dan'
+			sexpartkno = 1
+			if temp = 0:spafinloc = 14
+			if temp = 1:spafinloc = 11
+			if temp = 2:spafinloc = 12
+			$boy = 'Shulga'
+			sexpartkno = 1
+			spafinloc = 11
+			if temp = 0:spafinloc = 11
+			if temp = 1:spafinloc = 12
+			if temp = 2:spafinloc = 14
+			$boy = 'Vitka'
+			sexpartkno = 1
+			if temp = 0:spafinloc = 12
+			if temp = 1:spafinloc = 14
+			if temp = 2:spafinloc = 11
 			son -=2
 			if npcSex[9] = 0:npcSex[9] = 1 & guy += 1
 			if npcSex[10] = 0:npcSex[10] = 1 & guy += 1

+ 90 - 27
locations/stat

@@ -1465,74 +1465,137 @@ $cumeater = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your stomach with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your stomach in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your stomach with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater2 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your pussy with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your pussy in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your pussy with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater3 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your buttocks with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your buttocks in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your buttocks with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater4 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your face with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your face in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your face with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater5 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your clothes with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your clothes in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your clothes with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 
 $cumeater6 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your anus with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your anus in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your anus with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater7 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your body with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your body in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your body with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater8 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You lick your fingers clean, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 100:
+		sparrvol[temp1arr] = 0
+		gs 'stat'
+		'You lick up the whole mouthful of sperm, feeling the tart taste as you eat it.'
+	else
+		sparrvol[temp1arr] = 0
+		gs 'stat'
+		'You lick your fingers clean, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $cumeater9 = {
 	spdirtyb = 1
 	fbreath = 0
 	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your hair with your fingers and lick them, feeling the tart taste of semen.'
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your hair in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your hair with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:sparrvol[temp1arr]
 }
 $clear_write = {
 	body_write = 0