Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife

# Conflicts:
#	locations/pavtrainhall.qsrc

locations/Gshveyfab.qsrc

@@ -78,7 +78,7 @@ if $ARGS[0] = 'enter':
 			if smenaFabrika < 0:
 				smenaFabrika = 0
 			end
-			pay = smenaFabrika * 420
+			pay = smenaFabrika * 600
 			karta += pay
 			smenaFabrika = 0
 			workFabrika = 0
@@ -104,7 +104,7 @@ if $ARGS[0] = 'job_start':
 	act 'Leave': gt'Gshveyfab', 'enter'
 
 	if age < 18 and workFabrika = 0:
-		'"Sure, have a seat," he says. "Now, the work is difficult and meticulous, but doesn''t require any special knowledge. You should catch on pretty quick. Since you are not an adult yet, you can only work half-time, and the pay is 105 <b>₽</b> per hour. Once you become an adult, we can transfer you to full-time. Naturally, as this is a state-recognized company, we do require all the appropriate documentation. The main shift is on weekdays from 08:00 to 16:00, but you will be working the second shift, from 16:00 to 20:00.'
+		'"Sure, have a seat," he says. "Now, the work is difficult and meticulous, but doesn''t require any special knowledge. You should catch on pretty quick. Since you are not an adult yet, you can only work half-time, and the pay is 150 <b>₽</b> per hour. Once you become an adult, we can transfer you to full-time. Naturally, as this is a state-recognized company, we do require all the appropriate documentation. The main shift is on weekdays from 08:00 to 16:00, but you will be working the second shift, from 16:00 to 20:00.'
 		'But beware, if you miss more than three days of work in a single month, you will be fired. You will be paid at the end of the month and getting fired before then will forfeit any pay not yet received. So, is that okay?"'
 
 		act 'Accept the job':

locations/ParkKafe.qsrc

@@ -57,19 +57,27 @@ if $ARGS[0] = 'guys':
 	menu_off = 1
 	cla
 	gs 'stat'
-
-	if rand(0, 1) = 0:
-		'You look at them intensely, but you don''t think they notice you.'
-
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-	else
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-
+	
+	if hotcat >= 5: 
 		if parkara > 0:
 			'Jora Senya notices you, but continues to drink beer with his friends.'
+			
+			act 'Leave': gt 'parkKafe', 'end', 'cafe'
 		else
 			'Your looks were noticed by the guys and one of them comes up to you and asks you to join them.'
-
+			
+			gs 'willpower', 'drink', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'drink', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'parkKafe', 'end', 'cafe'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
 			act 'Drink beer with the guys':
 				cla
 				gs 'drugs', 'alcohol', 'beer'
@@ -129,6 +137,10 @@ if $ARGS[0] = 'guys':
 				end
 			end
 		end
+	else
+		'You look at them intensely, but you don''t think they notice you.'
+
+		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	end
 end
 
@@ -144,26 +156,41 @@ if $ARGS[0] = 'klof 1':
 	'You try to rise from the grass in front of the guys, your legs and hands are shaking from the rough pounding they gave you. Your vagina feels itchy as warm gooey sperm tickles down your legs. "Did you like it baby?" Asks one of the guys mockingly.'
 
 	act 'Yes':gt 'event', 'klof 2'
-	act 'Leave': gt 'parkKafe', 'end'
+	gs 'willpower', 'prostitution', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'No, walk away (<<will_cost>> Willpower)':
+			gs 'willpower', 'prostitution', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'parkKafe', 'end'
+		end
+	else
+		act 'No, walk away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'Armenians':
 	menu_off = 1
 	cla
 	gs 'stat'
-
-	if rand(0, 1) = 0:
-		'You look at them intensely, but you don''t think they notice you.'
-
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-	else
+	
+	if hotcat >= 4:
 		'Your looks were noticed by the Armenians and one of them comes over to your table with a bottle of champagne.'
 
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-
+		gs 'willpower', 'drink', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				gs 'willpower', 'drink', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'parkKafe', 'end', 'cafe'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	
 		act 'Drink together':
-			cla
-			*clr
+			cla & *clr
 			'You drink champagne with an Armenian, as his friend moves smoothly to your table too. You drink and have fun. Soon you are drunk and the Armenians take you to the back room of the cafe.'
 
 			if rand(0, 1) = 0:
@@ -180,7 +207,7 @@ if $ARGS[0] = 'Armenians':
 				'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/parkbj.jpg"></center>'
 				'The Armenians shove you on your knees as they take out their mighty members. They use them to poke you in your face, until you start sucking both members.'
 
-				if rand(1, 100) <= bj:
+				if rand(1,100) <= bj:
 					pcs_horny = 0
 					orgasm += 1
 					'You orgasmed.'
@@ -206,7 +233,7 @@ if $ARGS[0] = 'Armenians':
 				'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/cafe/ara2.jpg"></center>'
 				'The Armenians bend you over, one of them shoves his cock in your mouth. The other one stands behind you and shoves his penis deep into your vagina. They go on and eagerly fuck you in both holes.'
 
-				if rand(1, 100) <= bj:
+				if rand(1,100) <= bj:
 					pcs_horny = 0
 					orgasm += 1
 					'You orgasm.'
@@ -220,6 +247,10 @@ if $ARGS[0] = 'Armenians':
 				act 'Leave': gt 'parkKafe', 'end'
 			end
 		end
+	else
+		'You look at them intensely, but you don''t think they notice you.'
+
+		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	end
 end
 
@@ -227,20 +258,26 @@ if $ARGS[0] = 'man':
 	menu_off = 1
 	cla
 	gs 'stat'
-
-	if rand(0, 1) = 0:
-		'You stealthily glance at the respectable man, but it doesn''t look like he noticed you.'
-
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-	else
+	
+	if hotcat >= 6:
 		cla
 		'A man walks up to you and invites you to dance.'
 
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
+		gs 'willpower', 'sex', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				gs 'willpower', 'sex', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'parkKafe', 'end', 'cafe'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 
 		act 'Dance':
 			cla
-			'He dances well and confidently leads you during your dance. After the dance comes to an end, you sit down at a table with him, he orders an expensive wine and various snacks, you start to relax as he showers tou with gallant compliments.'
+			'He dances well and confidently leads you during your dance. After the dance comes to an end, you sit down at a table with him, he orders an expensive wine and various snacks, you start to relax as he showers you with gallant compliments.'
 			'Your Cavalier invites you to the sauna.'
 
 			act 'In the sauna':
@@ -267,6 +304,10 @@ if $ARGS[0] = 'man':
 				act 'Leave': gt 'parkKafe', 'end', 'street'
 			end
 		end
+	else
+		'You stealthily glance at the respectable man, but it doesn''t look like he noticed you.'
+
+		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	end
 end
 
@@ -283,21 +324,27 @@ if $ARGS[0] = 'youth':
 	menu_off = 1
 	cla
 	gs 'stat'
-
-	if rand(0, 1) = 0:
-		'You look at the group of snickering youths, but they don''t seem to notice you.'
-
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-	else
+	
+	if hotcat >= 4:
 		'A tipsy young man approaches you and invites you to go and enjoy their company.'
 
 		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 
-		act 'Accompany':
+		act 'Go with him':
 			cla
 			'You joined their table and started talking with the cheerful and noisy group of young people. You had a good time and they invite you to continue having fun with them at a late night party held at their apartment.'
-
-			act 'Leave': gt 'parkKafe', 'end'
+			
+			gs 'willpower', 'drink', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'drink', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'parkKafe', 'end'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 
 			act 'Party!':
 				minut += 60
@@ -305,8 +352,18 @@ if $ARGS[0] = 'youth':
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/cafe/student.jpg"></center>'
 				'You continue to enjoy yourself at the flat. As the night went on most people went home, you were left alone with one girl and six guys. The guys started kissing with the girl, eventually she got on her knees. The boys eagerly got their members out, the girl started stroking two of them with her hands, while the rest guys started masturbating in front of her face'
-
-				act 'Leave': gt 'parkKafe', 'end', 'street'
+				
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Leave (<<will_cost>> Willpower)':
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'parkKafe', 'end', 'street'
+					end
+				else
+					act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 
 				act 'Join her':
 					cls
@@ -330,7 +387,7 @@ if $ARGS[0] = 'youth':
 					'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/cafe/student2.jpg"></center>'
 					'The boys continued jerking off in front of your face, as you and the girl kept on caressing and licking their cocks. Finally they starting taking turns ejaculating in your mouth. The other girl also has her mouthful, she turns to you with a mouth full of sperm and tries to kiss you.'
 
-					act 'Kiss Girl':
+					act 'Kiss her':
 						cls
 						minut += 15
 						pcs_horny += 20
@@ -343,6 +400,10 @@ if $ARGS[0] = 'youth':
 				end
 			end
 		end
+	else
+		'You look at the group of snickering youths, but they don''t seem to notice you.'
+
+		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	end
 end
 
@@ -350,14 +411,14 @@ if $ARGS[0] = 'negros':
 	menu_off = 1
 	cla
 	gs 'stat'
-
-	if rand(0, 1) = 0 or afra >= 1:
-		'You stealthily glance at the Africans, but it looks like they overlooked you.'
+	
+	if hotcat >= 5 and afra < 1:
+		afra = 1
+		'A few of the Africans come over to your table, they are quite unrestrained, talking a lot in English, grabbing your back and chest. One of them introducing himself as DeMarcus, he tells you that they are all students from Africa and live in the dorm, he gives you directions on how to get to the hostel and find them.'
 
 		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	else
-		afra = 1
-		'A few of the Africans come over to your table, they are quite unrestrained, talking a lot in English, grabbing your back and chest. One of them introducing himself as DeMarcus, he tells you that they are all students from Africa and live in the dorm, he gives you directions on how to get to the hostel and find them.'
+		'You stealthily glance at the Africans, but it looks like they overlooked you.'
 
 		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	end
@@ -367,12 +428,8 @@ if $ARGS[0] = 'the_boy':
 	menu_off = 1
 	cla
 	gs 'stat'
-
-	if rand(0, 1) = 0 and gosh = 0:
-		'You secretly look at the young boy, but it looks like he didn''t notice you.'
-
-		act 'Leave': gt 'parkKafe', 'end', 'cafe'
-	else
+	
+	if hotcat >= 5 or gosh = 1:
 		if gosh = 1:
 			'You secretly look at the young boy. It''s Gosha, but it looks like he didn''t notice you.'
 
@@ -383,6 +440,10 @@ if $ARGS[0] = 'the_boy':
 
 			act 'Leave': gt 'parkKafe', 'end', 'cafe'
 		end
+	elseif hotcat < 5 and gosh = 0:
+		'You secretly look at the young boy, but it looks like he didn''t notice you.'
+
+		act 'Leave': gt 'parkKafe', 'end', 'cafe'
 	end
 end
 

locations/Serge_Shulgin.qsrc

@@ -109,7 +109,7 @@ if $ARGS[0] = 'sleep':
 				gs 'stat'
 				act 'Get out of bed': gt 'shulgabed'
 			end
-			if mesec <= 0: act 'Try to arouse him': gt 'Serge_Shulgin','hide','sleep_prstsex'
+			if pcs_horny > 30 and mesec <= 0: act 'Try to seduce Sergey': gt 'Serge_Shulgin','hide','sleep_prstsex'
 		end
 	end
 end
@@ -140,9 +140,7 @@ if $ARGS[0] = 'hide':
 					gs 'arousal', 'porn', 10
 					gs 'arousal', 'end'
 					act 'Get out of bed': gt 'shulgabed'
-					if npc_rel['A112'] > 70 and pcs_horny > 30 and mesec <= 0: 
-						act 'Molest Sergey': gt 'Serge_Shulgin','hide','sleep_prstsex'
-					end
+					if pcs_horny > 30 and mesec <= 0: act 'Try to seduce Sergey': gt 'Serge_Shulgin','hide','sleep_prstsex'
 					gs 'stat'
 				end
 			end
@@ -158,20 +156,18 @@ if $ARGS[0] = 'hide':
 		'You idly rub your hands over your body, occasionally touching his groin or chest to make sure you have his attention. When you let out a soft moan, you can feel him stirring next to you in the bed; he''s definitely paying attention to you now! You secretly smile to yourself: he''s such a typical guy... all you have to do is rub your tits and ass a little, and there''s no way he can resist your charms!'
 		gs 'arousal', 'foreplay', 5
 		gs 'stat'
-		if npc_rel['A112'] <70: 
+		if npc_rel['A112'] < 70: 
 			act 'Continue': gs 'Serge_Shulgin','hide','sleep_nameksex_otkaz'
 		else
 			if serge_sleep_sex_count <= 0: 
 				act 'Continue': gs 'Serge_Shulgin','hide','serge_sleep_sex_perebor'
 			else
-				if rand(1,10) < 8: 
+				if pcs_horny < 50: 
 					act 'Suggest you could make him feel good': gt 'Serge_Shulgin','hide','sleep_nameksex_oral'
+				elseif pcs_horny < 75: 
+					act 'Suggest you could make him feel good': gt 'Serge_Shulgin','hide','sleep_nameksex_rought'
 				else
-					if rand(0,1)= 0:
-						act 'Suggest you could make him feel good': gt 'Serge_Shulgin','hide','sleep_nameksex_rought'
-					else
-						act 'Beg him to make you feel good': gt 'Serge_Shulgin','hide','sleep_nameksex_lick'
-					end
+					act 'Beg him to make you feel good': gt 'Serge_Shulgin','hide','sleep_nameksex_lick'
 				end
 			end
 		end

locations/Serge_kuh.qsrc

@@ -34,7 +34,7 @@ if $ARGS[0] = '':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/serge/serge1.jpg"></center>'
 		'Sergey is standing at the kitchen counter. He''s making soup, cutting up ingredients and throwing them into a large pan.' 
 		'You don''t want to get in his way and sit down on a chair near the kitchen table, so you can have a chat with him while he keeps preparing the food.'
-	serge_textbk = RAND(0,4)
+		serge_textbk = rand(0,4)
 		if serge_textbk = 0:$serge_textbk = 'When you ask about Vasily''s mother, Sergey shrugs: "It''s a short story, really. I met Vasily''s mother at my graduation party. We all got drunk and she and I had some fun. When she turned out to be pregnant, we got married. We didn''t have much of a say in the matter, that''s just how it worked back then. Shulga was born a few months after that. We tried to make it work, but she got bored and left me a year later when she got offered a job abroad, leaving Shulga with me. I haven''t heard from her since. It''s fine, though... me and him managed just fine, without her."'
 		if serge_textbk = 1:$serge_textbk = 'You spend fifteen minutes talking to Sergey about everyday things.'
 		if serge_textbk = 2:$serge_textbk = 'When you ask Sergey what he does for a living, he smiles and says: "I work in a factory where we produce bricks. I work the day shift, from 09:00 to 15:00, five days a week. I''m a foreman there, managing the labourers and keeping an eye on the machinery. Of course I pitch in as well, when the men need help. It''s dusty, hard work, and it doesn''t pay well, but it''s work worth doing!"'
@@ -67,7 +67,7 @@ if $ARGS[0] = 'kuh_buh':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/serge/serge1.jpg"></center>'
 		'Sergey pours himself another glass and licks his lips, getting ready to tell a story. You sit down next to him, wondering what he''s going to want to talk about today.'
-	serge_textbuhk = RAND(0,4)
+		serge_textbuhk = rand(0,4)
 		if serge_textbuhk = 0:$serge_textbuhk = 'You and Sergey listen to a radio while you chat, and mostly talk about events from the local news.'
 		if serge_textbuhk = 1:$serge_textbuhk = 'Sergey seems a bit tipsy, and talks for fifteen minutes about why potato soup is better than turnip soup.'
 		if serge_textbuhk = 2:$serge_textbuhk = 'Sergey makes you laugh, when he tells you another funny story.'
@@ -90,133 +90,152 @@ if $ARGS[0] = 'vodka':
 	'"Aww, why not?" you ask him.'
 	'Sergey takes a sip of his vodka and laughs: "I''ve seen women drink... it never ends well. Besides that, you''re still a girl! I''m not giving you any, end of discussion!"'
 	act 'Leave him alone': gt 'shulgakuh'
-	act 'Try to make him feel bad':
-		*clr & cla
-		minut += 2
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko1.jpg"></center>'
-		'"But uncle Sergey, that''s not fair!" you shout angrily, trying to flirt with him by making a cute pouty face.'
-		'Sergey realizes it, and smirks: "Why are you pouting like that, <<$pcs_nickname>>? You cannot manipulate me!"'
-		'He then sighs, and comprimises: "Look... if you want, I can give you some beer, but that''s all you''re getting! I don''t want your parents to be upset with me for getting you drunk!"'
-		act 'Accept the beer':
+
+	gs 'willpower', 'drink', 'force'
+	if will_cost <= pcs_willpwr:
+		act 'Convince him to give you some (<<will_cost>> Willpower)':
 			*clr & cla
 			minut += 2
-			if beer_count > 0: gs 'drugs', 'alcohol', 'beer'
-			beer_day = daystart
-			if beer_count > 0: beer_count -= 1
+			gs 'willpower', 'drink', 'force'
+			gs 'willpower', 'pay', 'force'
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko2.jpg"></center>'
-			'You immediately turn your pout into a smile, and nod happily: "Thanks, uncle Sergey! You''re the best!"'
-			if beer_count > 0: 'Sergey sighs again and walks over to the refrigerator, taking a bottle of beer and handing it to you.'
-			'You quickly take it from him before he can change his mind, and take a swig. His face breaks into a smile, he was trying to be firm with you but can''t help but laugh.'
-			'"There, happy now? Are you done pouting?" he grins.'
-			'"Very happy", you purr, looking deep into his eyes with a wide grin on your face.'
-			'"Good. Now... how about you make me happy?" Sergey says, nodding to his groin. You can''t help but blush when you notice he''s got quite the bulge down there!'
-			if beer_count <= 0: 'Sergey sighs again and walks over to the refrigerator, to grab a bottle for you.'
-			'"Huh... that''s weird. <<$pcs_nickname>>, did you already drink my beer? I know I put two bottles in, not too long ago!"'
-			'You bite your nip nervously, and cast down your eyes.'
-			'"I see", Sergey frowns. "What am I to do now? Vodka is no good without a nice cold beer to wash it down with!"'
-			'"I''m sorry, uncle Sergey", you mutter, your cheeks a deep red from the shame.'
-			'"You leave me no choice, <<$pcs_nickname>>... I think I''m going to have to punish you!" Sergey says sternly, with a horny look in his eyes.'
-			act 'Quickly get away from him': gt 'shulgakuh'
-			act 'Thank him for the beer':
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko1.jpg"></center>'
+			'"But uncle Sergey, that''s not fair!" you shout angrily, trying to flirt with him by making a cute pouty face.'
+			'Sergey realizes it, and smirks: "Why are you pouting like that, <<$pcs_nickname>>? You cannot manipulate me!"'
+			'He then sighs, and comprimises: "Look... if you want, I can give you some beer, but that''s all you''re getting! I don''t want your parents to be upset with me for getting you drunk!"'
+			act 'Accept the beer':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko3.jpg"></center>'
-				'Sergey nods to the floor in front of him and orders you: "Go on, girl. Get on your knees, don''t be shy! I want you to put that sweet little mouth of yours to use."'
-				'You obediently kneel down where he tells you to, and you put your hand on his groin. You rub it gently through the fabric; it''s a big bulge already! He must have been horny already, even before you entered the kitchen...'
-				'Sergey finishes unbuttoning his pants and pulls them down, grinning proudly when he sees that admiring look in your eyes. His dick is impressive!'
-				'He takes your hand and puts it on his penis, whispering: "Go on, <<$pcs_nickname>>. Rub it... suck on it... make me feel good."'
-				'You nod and squeeze it lightly, beginning by masturbating him slowly. His cock grows a bit further while you stroke it, and you feel it pulsing strongly between your fingers when it''s fully erect. He''s definitely ready for more now.'
-				npc_sex['A112'] += 1
-				gs 'boyStat', 'A112'
-				gs 'arousal', 'hj', 5, 'sub'
+				minut += 2
+				if beer_count > 0: gs 'drugs', 'alcohol', 'beer'
+				beer_day = daystart
+				if beer_count > 0: beer_count -= 1
 				gs 'stat'
-				act 'Suck on his dick':
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko2.jpg"></center>'
+				'You immediately turn your pout into a smile, and nod happily: "Thanks, uncle Sergey! You''re the best!"'
+				if beer_count > 0:
+					'Sergey sighs again and walks over to the refrigerator, taking a bottle of beer and handing it to you.'
+					'You quickly take it from him before he can change his mind, and take a swig. His face breaks into a smile, he was trying to be firm with you but can''t help but laugh.'
+					'"There, happy now? Are you done pouting?" he grins.'
+					'"Very happy", you purr, looking deep into his eyes with a wide grin on your face.'
+					'"Good. Now... how about you make me happy?" Sergey says, nodding to his groin. You can''t help but blush when you notice he''s got quite the bulge down there!'
+				elseif beer_count <= 0:
+					'Sergey sighs again and walks over to the refrigerator, to grab a bottle for you.'
+					'"Huh... that''s weird. <<$pcs_nickname>>, did you already drink my beer? I know I put two bottles in, not too long ago!"'
+					'You bite your nip nervously, and cast down your eyes.'
+					'"I see", Sergey frowns. "What am I to do now? Vodka is no good without a nice cold beer to wash it down with!"'
+					'"I''m sorry, uncle Sergey", you mutter, your cheeks a deep red from the shame.'
+					'"You leave me no choice, <<$pcs_nickname>>... I think I''m going to have to punish you!" Sergey says sternly, with a horny look in his eyes.'
+				end
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Quickly get away from him (<<will_cost>> Willpower)':
+						gs 'willpower', 'sex', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'shulgakuh'
+					end
+				else
+					act 'Quickly get away from him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+				act 'Thank him for the beer':
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko4.jpg"></center>'
-					'You move forward and close your lips around the head of his cock a bit hesitantly. "Hmm, this doesn''t taste bad at all", you think to yourself, and you begin to suck on the head of his dick a bit more enthusiastically. When you glance up, you look Sergey straight in the eye. He''s smiling at you benevolently, enjoying the look of you happily sucking him off like a good girl.'
-					'After a minute or two, he takes his dick out of your mouth and slaps it against your cheeks playfully. Then he lifts it up and grins: "Suck on my balls, <<$pcs_nickname>>."'
-					'When you move in to do as he asks, his musky masculine smell fills your nostrils. You take one of his balls in your mouth and suck and lick on it, and then the other. You also try to take both in your mouth at once, but they''re too big.'
-					'"You''re such a good girl", Sergey grins. "Licking and sucking my balls like that, doing everything I tell you to. We''re going to have a lot of fun together, you and I!"'
-					'He sits back while you take his dick back in your mouth and has another gulp, straight from the bottle. You can tell he''s close to finishing; his breathing is shorter and faster, and you feel his dick pulsing strongly between your lips. Then he suddenly pulls away from you.'
-					gs 'arousal', 'bj', 5, 'sub'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko3.jpg"></center>'
+					'Sergey nods to the floor in front of him and orders you: "Go on, girl. Get on your knees, don''t be shy! I want you to put that sweet little mouth of yours to use."'
+					'You obediently kneel down where he tells you to, and you put your hand on his groin. You rub it gently through the fabric; it''s a big bulge already! He must have been horny already, even before you entered the kitchen...'
+					'Sergey finishes unbuttoning his pants and pulls them down, grinning proudly when he sees that admiring look in your eyes. His dick is impressive!'
+					'He takes your hand and puts it on his penis, whispering: "Go on, <<$pcs_nickname>>. Rub it... suck on it... make me feel good."'
+					'You nod and squeeze it lightly, beginning by masturbating him slowly. His cock grows a bit further while you stroke it, and you feel it pulsing strongly between your fingers when it''s fully erect. He''s definitely ready for more now.'
+					npc_sex['A112'] += 1
+					gs 'boyStat', 'A112'
+					gs 'arousal', 'hj', 5, 'sub'
 					gs 'stat'
-					act 'Continue':
+					act 'Suck on his dick':
 						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko5.jpg"></center>'
-						'"My turn. <<$pcs_nickname>>, get on the table, I''ll return the favour now", Sergey grins.'
-						'You''re not really sure what he means by that, but you''re not about to say no! You obediently sit down on the corner of the table, and pull up your legs. "Like this, uncle Sergey?" you ask him.'
-						'Sergey gives you a pleased nod: "Excellent. Now, let me help you with these..."'
-						'He begins to tug at your clothes, wanting easy access to your wet slit. "There we go... show me that young pussy and those cute tits of yours, <<$pcs_nickname>>."'
-						'You do as he asks and spread your legs, while you pull your clothes aside to show your boobs.'
-						'You lean back on the table and let him admire your tight body. Your nipples are fully erect from your arousal by now, and your pussy glistens from how wet it is.'
-						'Sergey is kneeling down in front of you now, so your pussy is at eye level for him. He''s clearly enjoying the view of your wet folds, studying them intently. You slowly spread your legs even further and your pussy opens for him.'
-						'"Do you like it, uncle Sergey?" you ask him, wondering why he''s only looking at it.'
-						gs 'arousal', 'flash', 10, 'sub'
-						minut -= 5
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko4.jpg"></center>'
+						'You move forward and close your lips around the head of his cock a bit hesitantly. "Hmm, this doesn''t taste bad at all", you think to yourself, and you begin to suck on the head of his dick a bit more enthusiastically. When you glance up, you look Sergey straight in the eye. He''s smiling at you benevolently, enjoying the look of you happily sucking him off like a good girl.'
+						'After a minute or two, he takes his dick out of your mouth and slaps it against your cheeks playfully. Then he lifts it up and grins: "Suck on my balls, <<$pcs_nickname>>."'
+						'When you move in to do as he asks, his musky masculine smell fills your nostrils. You take one of his balls in your mouth and suck and lick on it, and then the other. You also try to take both in your mouth at once, but they''re too big.'
+						'"You''re such a good girl", Sergey grins. "Licking and sucking my balls like that, doing everything I tell you to. We''re going to have a lot of fun together, you and I!"'
+						'He sits back while you take his dick back in your mouth and has another gulp, straight from the bottle. You can tell he''s close to finishing; his breathing is shorter and faster, and you feel his dick pulsing strongly between your lips. Then he suddenly pulls away from you.'
+						gs 'arousal', 'bj', 5, 'sub'
 						gs 'stat'
 						act 'Continue':
 							*clr & cla
-							pcs_mood += 50
-							pcs_willpwr +=20
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko6.jpg"></center>'
-							'Sergey doesn''t say anything, but suddenly leans forward and gently runs his tongue over the insides of your pussy lips, touching your clitoris too on his way up.'
-							'You shudder when you feel his touch, and can''t help but thrust your hips forward. Sergey eagerly accepts your invitation and plunges his tongue inside you as far as he can, resting his nose against your crotch as he begins to fuck your pussy with his tongue.'
-							'You moan softly and grind your hips against his face, encouraging him to keep going.'
-							'Sergey takes his time, he seems to really enjoy pleasing you with his mouth. He pays more and more attention to your clitoris, licking, sucking and sometimes even nibbling on it gently.'
-							'"No hands... just your tongue please..." you moan, when he wants to slide two fingers inside you. He grins and pulls back his hand, and instead redoubles his efforts with his tongue.'
-							'Within minutes he licks you to an orgasm and you groan and grab his hair, forcing his face against your groin as you feel a warm tingling sensation spread through your whole body. When it finally subsides, you feel goosebumps all over your skin.'
-							'Sergey gives your cunny one more kiss and gets up, and you can''t help but laugh when you see him trying to rub some feeling back into his legs. He pours himself another glass of vodka, while he winks at you. Wow... that was great!'
-							$orgasm_or = 'yes'
-							gs 'arousal', 'cuni', 5, 'dom'
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko5.jpg"></center>'
+							'"My turn. <<$pcs_nickname>>, get on the table, I''ll return the favour now", Sergey grins.'
+							'You''re not really sure what he means by that, but you''re not about to say no! You obediently sit down on the corner of the table, and pull up your legs. "Like this, uncle Sergey?" you ask him.'
+							'Sergey gives you a pleased nod: "Excellent. Now, let me help you with these..."'
+							'He begins to tug at your clothes, wanting easy access to your wet slit. "There we go... show me that young pussy and those cute tits of yours, <<$pcs_nickname>>."'
+							'You do as he asks and spread your legs, while you pull your clothes aside to show your boobs.'
+							'You lean back on the table and let him admire your tight body. Your nipples are fully erect from your arousal by now, and your pussy glistens from how wet it is.'
+							'Sergey is kneeling down in front of you now, so your pussy is at eye level for him. He''s clearly enjoying the view of your wet folds, studying them intently. You slowly spread your legs even further and your pussy opens for him.'
+							'"Do you like it, uncle Sergey?" you ask him, wondering why he''s only looking at it.'
+							gs 'arousal', 'flash', 10, 'sub'
+							minut -= 5
 							gs 'stat'
 							act 'Continue':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko7.jpg"></center>'
-								'You''re still catching your breath when Sergey prompts: "Now, will you fulfil all my wishes?" You couldn''t help but notice the emphasis he put on the word ''all''.'
-								'You nod, still a bit hazy in the head from your orgasm: "Yes, I''ll do whatever you want..."'
-								'He grins, happy with your answer. "Your boobs are so nice, <<$pcs_nickname>>..." he mutters, as he comes closer to you and begins to knead them. He fondles your nipples, tweaking them between his fingers. Meanwhile, you feel his hard cock resting on your stomach. It had gone a bit softer from when he was licking you, but it''s growing fully hard again.'
-								'You sigh happily and roll your hips back a bit, giving him full access to your pussy. Delighted with your willingness, Sergey teases you by squeezing your nipples harder, trying to make you moan louder.'
-								gs 'gopsex', 'gg_devst_deflor'
-								'You''re still so wet from when he licked you, his cock plunges inside you without much resistance. He gently fucks you like this for a little while, and then whispers that you should roll onto your stomach.'
-								gs 'arousal', 'vaginal', 5, 'sub'
+								pcs_mood += 50
+								pcs_willpwr +=20
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko6.jpg"></center>'
+								'Sergey doesn''t say anything, but suddenly leans forward and gently runs his tongue over the insides of your pussy lips, touching your clitoris too on his way up.'
+								'You shudder when you feel his touch, and can''t help but thrust your hips forward. Sergey eagerly accepts your invitation and plunges his tongue inside you as far as he can, resting his nose against your crotch as he begins to fuck your pussy with his tongue.'
+								'You moan softly and grind your hips against his face, encouraging him to keep going.'
+								'Sergey takes his time, he seems to really enjoy pleasing you with his mouth. He pays more and more attention to your clitoris, licking, sucking and sometimes even nibbling on it gently.'
+								'"No hands... just your tongue please..." you moan, when he wants to slide two fingers inside you. He grins and pulls back his hand, and instead redoubles his efforts with his tongue.'
+								'Within minutes he licks you to an orgasm and you groan and grab his hair, forcing his face against your groin as you feel a warm tingling sensation spread through your whole body. When it finally subsides, you feel goosebumps all over your skin.'
+								'Sergey gives your cunny one more kiss and gets up, and you can''t help but laugh when you see him trying to rub some feeling back into his legs. He pours himself another glass of vodka, while he winks at you. Wow... that was great!'
+								$orgasm_or = 'yes'
+								gs 'arousal', 'cuni', 5, 'dom'
 								gs 'stat'
-								act 'Turn over':
+								act 'Continue':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko8.jpg"></center>'
-									'Sergey''s eyes are gleaming; it''s been a while since he had a cute, flexible girl such as yourself at his disposal. And now, here you are... willing to do whatever he wants.'
-									'You stand on the floor with your legs, leaning forward on the table. Sergey takes a moment to admire your nicely toned calves and thighs, gently running his hands over them. For a second he''s not sure what he wants to do with you, with you standing in this inviting position.'
-									'Then he rubs the head of his cock against your wet cunt a few times, still glistening from before. Then he rams his cock all the way in with one firm push, and begins to thrust eagerly. You cry out when he pushes in, and the kitchen is soon filled with sounds of your moaning and his grunting, combined with the lewd sopping sound of your pussy getting filled over and over.'
-									'You reach for your clit and fondle yourself while Sergey fucks you from behind, occasionally running your fingers over his balls too.'
-									'He then begins to fuck you so hard that you have to hold onto the table, making the table creak and groan while it moves over the kitchen floor. It feels fantastic, and you eagerly raise your hips up to meet his thrusts half-way. Sergey''s moans grow louder and he grunts in your ear: "Where do you want me to finish, <<$pcs_nickname>>?"'
-									gs 'arousal', 'vaginal', 10, 'sub', 'rough'
+									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko7.jpg"></center>'
+									'You''re still catching your breath when Sergey prompts: "Now, will you fulfil all my wishes?" You couldn''t help but notice the emphasis he put on the word ''all''.'
+									'You nod, still a bit hazy in the head from your orgasm: "Yes, I''ll do whatever you want..."'
+									'He grins, happy with your answer. "Your boobs are so nice, <<$pcs_nickname>>..." he mutters, as he comes closer to you and begins to knead them. He fondles your nipples, tweaking them between his fingers. Meanwhile, you feel his hard cock resting on your stomach. It had gone a bit softer from when he was licking you, but it''s growing fully hard again.'
+									'You sigh happily and roll your hips back a bit, giving him full access to your pussy. Delighted with your willingness, Sergey teases you by squeezing your nipples harder, trying to make you moan louder.'
+									gs 'gopsex', 'gg_devst_deflor'
+									'You''re still so wet from when he licked you, his cock plunges inside you without much resistance. He gently fucks you like this for a little while, and then whispers that you should roll onto your stomach.'
+									gs 'arousal', 'vaginal', 5, 'sub'
 									gs 'stat'
-									act 'In your mouth':
+									act 'Turn over':
 										*clr & cla
-										gs 'cum_call','face',$boy,1,'','',5
-										gs 'cum_call','mouth',$boy,1,'','',35
-										pcs_hairbsh = 0
-										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko9.jpg"></center>'
-										'"In my mouth, uncle Sergey!" you tell him.'
-										'Sergey nods: "Alright, get on your knees then."'
-										'You quickly drop to your knees in front of him and begin to jerk him off, aiming his cock at your mouth. "Make sure you don''t miss a drop, <<$pcs_nickname>>!"'
-										'He groans while you milk his dick, eagerly trying to get him to cum. Soon he groans loudly, and you feel the hot jets of his cum land on your face. You open your mouth to try and catch as much of it as you can, but you miss most of it. Some of his cum drips down to your clothes, while you look him in the eye with the head of his dick between your lips.'
-										'Sergey laughs: "Close enough! You''re such a good little slut, <<$pcs_nickname>>!"'
-										gs 'arousal', 'hj', 5, 'sub'
+										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko8.jpg"></center>'
+										'Sergey''s eyes are gleaming; it''s been a while since he had a cute, flexible girl such as yourself at his disposal. And now, here you are... willing to do whatever he wants.'
+										'You stand on the floor with your legs, leaning forward on the table. Sergey takes a moment to admire your nicely toned calves and thighs, gently running his hands over them. For a second he''s not sure what he wants to do with you, with you standing in this inviting position.'
+										'Then he rubs the head of his cock against your wet cunt a few times, still glistening from before. Then he rams his cock all the way in with one firm push, and begins to thrust eagerly. You cry out when he pushes in, and the kitchen is soon filled with sounds of your moaning and his grunting, combined with the lewd sopping sound of your pussy getting filled over and over.'
+										'You reach for your clit and fondle yourself while Sergey fucks you from behind, occasionally running your fingers over his balls too.'
+										'He then begins to fuck you so hard that you have to hold onto the table, making the table creak and groan while it moves over the kitchen floor. It feels fantastic, and you eagerly raise your hips up to meet his thrusts half-way. Sergey''s moans grow louder and he grunts in your ear: "Where do you want me to finish, <<$pcs_nickname>>?"'
+										gs 'arousal', 'vaginal', 10, 'sub', 'rough'
 										gs 'stat'
-										act 'Chat with Sergey afterwards':
+										act 'In your mouth':
 											*clr & cla
-											minut += 5
-											gs 'cum_call','clothes',$boy,1,'','',15
-											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko10.jpg"></center>'
-											'Sergey sighs and sits down on a chair, still catching his breath. You notice you''re feeling a bit weak in your knees as well, and sit down on another chair next to him.'
-											'You wearily look at the small puddle of sperm on your clothes and sigh: "Wow, I don''t think I''ve ever had a load that big before!"'
-											'Sergey grins: "I''ve been saving it for you. I knew you''d come, sooner or later... I recognized that look in your eyes."'
-											'You blush and bite your lip, tasting Sergey''s sperm on it while Sergey has another sip of his vodka. He laughs: "Next time, you don''t have to ask for booze. You can just ask for what you want right away. Because admit it... isn''t sex better than booze?"'
-											'You don''t answer his question, but just give him a weak smile.'
-											gs 'arousal', 'end'
+											gs 'cum_call','face',$boy,1,'','',5
+											gs 'cum_call','mouth',$boy,1,'','',35
+											pcs_hairbsh = 0
+											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko9.jpg"></center>'
+											'"In my mouth, uncle Sergey!" you tell him.'
+											'Sergey nods: "Alright, get on your knees then."'
+											'You quickly drop to your knees in front of him and begin to jerk him off, aiming his cock at your mouth. "Make sure you don''t miss a drop, <<$pcs_nickname>>!"'
+											'He groans while you milk his dick, eagerly trying to get him to cum. Soon he groans loudly, and you feel the hot jets of his cum land on your face. You open your mouth to try and catch as much of it as you can, but you miss most of it. Some of his cum drips down to your clothes, while you look him in the eye with the head of his dick between your lips.'
+											'Sergey laughs: "Close enough! You''re such a good little slut, <<$pcs_nickname>>!"'
+											gs 'arousal', 'hj', 5, 'sub'
 											gs 'stat'
-											act 'Straighten your clothes': gt 'shulgakuh'
+											act 'Chat with Sergey afterwards':
+												*clr & cla
+												minut += 5
+												gs 'cum_call','clothes',$boy,1,'','',15
+												'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/event/alko10.jpg"></center>'
+												'Sergey sighs and sits down on a chair, still catching his breath. You notice you''re feeling a bit weak in your knees as well, and sit down on another chair next to him.'
+												'You wearily look at the small puddle of sperm on your clothes and sigh: "Wow, I don''t think I''ve ever had a load that big before!"'
+												'Sergey grins: "I''ve been saving it for you. I knew you''d come, sooner or later... I recognized that look in your eyes."'
+												'You blush and bite your lip, tasting Sergey''s sperm on it while Sergey has another sip of his vodka. He laughs: "Next time, you don''t have to ask for booze. You can just ask for what you want right away. Because admit it... isn''t sex better than booze?"'
+												'You don''t answer his question, but just give him a weak smile.'
+												gs 'arousal', 'end'
+												gs 'stat'
+												act 'Straighten your clothes': gt 'shulgakuh'
+											end
 										end
 									end
 								end
@@ -226,6 +245,8 @@ if $ARGS[0] = 'vodka':
 				end
 			end
 		end
+	else
+		act 'Convince him to give you some (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -263,7 +284,7 @@ if $ARGS[0] = 'posuda':
 			'You spend the next fifteen minutes on your hands and knees, washing the floors of the apartment.'
 			'Sergey can''t help but stare at your ass from time to time, when he thinks you''re not looking.'
 			act 'Finish': gt 'Serge_kuh'
-			if npc_rel['A112'] >=25: gs 'Serge_kuh', 'help_ev1'
+			if npc_rel['A112'] >= 25: gs 'Serge_kuh', 'help_ev1'
 		end
 	end
 end
@@ -272,8 +293,7 @@ end
 !if relations > 25, you can flirt with Sergey after helping him with dishes or mopping the floor!
 !----------------------------------------------------------!
 if $ARGS[0] = 'help_ev1':
-
-!if nude, skirt/dress and panties, skirt/dress but no panties, pants and panties, pants but no panties
+	!if nude, skirt/dress and panties, skirt/dress but no panties, pants and panties, pants but no panties
 	if $clothingworntype = 'nude':
 		gt 'Serge_kuh', 'izn1'
 	elseif PCloSkirt > 0 and $pantyworntype ! 'none':
@@ -297,7 +317,17 @@ if $ARGS[0] = 'help_ev1':
 		minut +=10
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/jara'+rand(1,4)+'.jpg"></center>'
 		'One quick glimpse at Sergey tells you that you''re not the only one who''s a bit worked up from your activities in the kitchen. Sergey looks a bit tired, but at the same time he can''t stop staring at your ass. When you''re finished and take a breather, you decide to tease him a little. As soon as you do, you can hear his breathing intensify a little. You keep doing what you''re doing though, pretending it''s by accident that you''re showing off as much as you are.'
-		act 'Leave him alone': gt 'shulgakuh'
+		gs 'willpower', 'exhib', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave him alone (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'shulgakuh'
+			end
+		else
+			act 'Leave him alone (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Show him your ass':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/vert'+rand(1,10)+'.jpg"></center>'
@@ -306,8 +336,22 @@ if $ARGS[0] = 'help_ev1':
 			'"<<$pcs_nickname>>, stop tormenting me!" he tells you. "I''m not a robot, I''m a man with needs and desires! If you keep that up, you have no one but yourself to blame for what happens next..."'	
 			gs 'arousal', 'flash', 5
 			gs 'stat'
-			act 'Stop teasing Sergey': gt 'shulgakuh'
-			if npc_rel['A112'] >=50 and pcs_vag >= 1: act 'Continue teasing Sergey': gt 'Serge_kuh', $rand_kuh_izdev
+			if npc_rel['A112'] >= 50 and pcs_vag >= 1:
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Stop teasing Sergey (<<will_cost>> Willpower)':
+						gs 'willpower', 'sex', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'shulgakuh'
+					end
+				else
+					act 'Stop teasing Sergey (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+				act 'Continue teasing Sergey': gt 'Serge_kuh', $rand_kuh_izdev
+			else
+				act 'Stop teasing Sergey': gt 'shulgakuh'
+			end
 		end
 	end
 end

locations/Snpc.qsrc

@@ -656,15 +656,14 @@ if numnpc = 231:
 			else
 				act 'Move away': gt $loc, $metka
 			end
-		end	
-	elseif npc_rel['A<<numnpc>>'] >= 100 and npc_QW['A<<numnpc>>'] = 4:
+		end
 		act 'Chicken Out':
 			*clr & cla
 			minut += 5
 			gs 'stat'
 			'<center><b><font color="maroon"><<$npc_firstname[''A<<numnpc>>'']>> <<$npc_lastname[''A<<numnpc>>'']>></font></b></center>'
 			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big<<numnpc>>.jpg"></center>'
-			'As you see <<$npc_firstname[''A<<numnpc>>'']>>, you feel your stomach drop to the floor due to how awkward the situation is. You don''t have enough courage to bring up what happened the last time you were at <<$npc_firstname[''<<''A<<numnpc>>''>>'']>>''s house, so you pretend to not see her and carry on your way.'
+			'As you see <<$npc_firstname[''A<<numnpc>>'']>>, you feel your stomach drop to the floor due to how awkward the situation is. You don''t have enough courage to bring up what happened the last time you were at <<$npc_firstname[''A<<numnpc>>'']>>''s house, so you pretend to not see her and carry on your way.'
 			if $loc ! 'gdkin':
 				xgt 'gschool_lessons', 'short_break', 'nopict'
 			else

locations/anushka.qsrc

@@ -593,6 +593,11 @@ if $ARGS[0] = 'chatwhilewaiting':
 					'Anushka looks at you a long moment like she is internally debating something. "Hey if you like him that''s great, but... just be careful around him ok? He isn''t always what he seems."'
 					'Then she smiles and before you can ask what she meant by that and she asks. "Hmm think he would be up for a threesome?" She says as she makes a kissy face at you.'
 !!can you make the <<boyfriend>> be the name of who ever Sveta is dating? Vitek, Fedor, Artem, etc? I have no clue how hard that would be to code but eventually we will need a code like that, for the expanded chats with NPC''s at school, home and the disco.
+				elseif $boyfriend = '':
+					'You tell her. "I have a boyfriend you know."'
+					'She grins at you. "Right who are you dating again?"'
+					'"Just a guy, nothing serious." You quickly bluff.'
+					'"Well if you ever feel like sharing him, I can help out." She says as she makes a kissy face at you.'
 				else
 					'You tell her. "I have a boyfriend you know."'
 					'She grins at you. "Right who are you dating again?"'

locations/barbershop.qsrc

@@ -146,7 +146,7 @@ if barbershop_wrk = 0:
 		'You smile cheerfully. "That sound great! What would I have to do?"'
 		'"Well," he says, while looking around and gathering tasks for you. "...,  you''d have to mop the floor here in the main room and the break room in the back as well. Take out all the trash, clean the breakroom kitchen, clean the mirrors, windows, chairs and toilet and of course dust the shelves. It might sound like a lot, but don''t worry, even doing one thing, makes my life easier."'
 		'You think about it for a second, but you guess it won''t be too bad and you could need any amount of money... "I...uhm...hate to ask, but how much would I earn per hour?"'
-		'"Ah yes," Mr. Syomin chuckles. "..., the most important question. Are you alright with 90 <b>₽</b> per hour?"'
+		'"Ah yes," Mr. Syomin chuckles. "..., the most important question. Are you alright with 125 <b>₽</b> per hour?"'
 			
 		act 'Accept the job':
 			cla
@@ -166,12 +166,12 @@ if barbershop_wrk = 0:
 		end
 	end
 elseif barbershop_wrk = 1 and barbershop_wrk_day ! daystart:
-	act 'Clean the shop for 90 <b>₽</b> (1:00)':
+	act 'Clean the shop for 125 <b>₽</b> (1:00)':
 		cla
 		*clr
 		menu_off = 1
 		minut += 60
-		money += 90
+		money += 125
 		barbershop_wrk_day = daystart
 		gs 'stat'
 		'You work diligently and fast. You clean the floor, take out the trash, dust off the shelves and wipe some mirrors and windows. Before you know an hour has passed and you''re 90 <b>₽</b> richer.'

locations/cikl.qsrc

@@ -1098,7 +1098,7 @@ if day = 25:
 	end
 
 	if workFabrika = 1:
-		pay = smenaFabrika * 420
+		pay = smenaFabrika * 600
 		smenaFabrika = 0
 		karta += pay
 		'<b><font color="green">Your salary of <<pay>> <b>₽</b> has been paid into your bank account for your job at the garment factory.</font></b>'

locations/gpoli.qsrc

@@ -77,7 +77,7 @@ if $ARGS[0] = '':
 				minut += 5
 				gpoliuborka = 1
 				gs 'stat'
-				'You notice a piece of paper on the wall near the entrance to the clinic, it''s a job listing. It reads: "Cleaner wanted! One hour per day, any time between 14:00 and 21:00. Payment: 50 <b>₽</b>."'
+				'You notice a piece of paper on the wall near the entrance to the clinic, it''s a job listing. It reads: "Cleaner wanted! One hour per day, any time between 14:00 and 21:00. Payment: 100 <b>₽</b>."'
 
 				act 'Move away':gt 'gpoli'
 			end
@@ -98,13 +98,13 @@ if $ARGS[0] = '':
 				act 'Leave':gt 'gpoli'
 			end
 		elseif gpoliuborka > 1 and hour >= 14 and hour <= 21 and gpolicleanday ! daystart:
-			act 'Work as a cleaner for 50 <b>₽</b> (1:00)':
+			act 'Work as a cleaner for 100 <b>₽</b> (1:00)':
 				*clr & cla
 				menu_off = 1
 				gpolicleanday = daystart
 				minut += 60
 				pcs_mood -= 15
-				money += 50
+				money += 100
 				gs 'sweat', 'add', 20
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'

locations/hotel_resep.qsrc

@@ -33,8 +33,8 @@ if $ARGS[0] = '':
 		act 'Collect your money':
 			cla
 			hotelcollect = 0
-			money += maidtime * 250
-			'She quickly checks the computer and then gives you <<maidtime*250>> <b>₽</b> for all the shifts you worked in the hotel.'
+			money += maidtime * 375
+			'She quickly checks the computer and then gives you <<maidtime*375>> <b>₽</b> for all the shifts you worked in the hotel.'
 			maidtime=0
 
 			if maidHotelCount >= rand(8,10) and nichHotelReferral = 0:

locations/pavShared_gp.qsrc

@@ -8,7 +8,7 @@ if $ARGS[0] = 'gp':
 	'<h3><center><font color=#<<$gp_font>>><<$gp_name>></font></h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
 	''
-	'He is a gopnik, showing violent and aggressive behaviour. You feel something like a bad aura coming from him.'
+	'He is a gopnik, showing violent and aggressive behavior. You feel something like a bad aura coming from him.'
 	if gp_hadSex = 1:'As you know very well, <<$gp_name>> has <<gpDick>> cm long <a href="exec:gt ''pavShared_gp'', ''gpDick''">dick</a> with somehow maintained pubic hair.'
 	''
 	'<b>Today he looks to be in a <<$gp_mood>> mood.</b>'

locations/pavShared_nd.qsrc

@@ -1584,7 +1584,7 @@ if $ARGS[0] = 'ndSexPiss':
 		''
 		'<font color=#<<$nd_font>>>"The first delivery was made, now to the second one! Engage!"</font>'
 		'In your attempt to get up from the wet, plastic sheets he pushes you back, making you stay in the same doggystyle position as he furiously masturbates his cock.'
-		'it doesn''t take long before he finally ejaculates, cumming on your asscheeks before he thrust the tip into your piss-filled anus with loud sigh.'
+		'it doesn''t take long before he finally ejaculates, cumming on your ass-cheeks before he thrust the tip into your piss-filled anus with loud sigh.'
 		'<font color=#<<$nd_font>>>"AAAHHHHH!"</font>'
 		act 'Continue':nd_cumVol = 0 & step = 90 & gt 'pavShared_nd', 'ndSexPiss'
 
@@ -1597,7 +1597,7 @@ if $ARGS[0] = 'ndSexPiss':
 
 		! first time ?
 		if nd_piss = 0:
-			'<font color=#<<$nd_font>>>"Are you allright <<$pcs_firstname>>? I hope I wasn''t too harsh on you. I was so aroused and drawn into it that I almost lost control over myself."</font>'		
+			'<font color=#<<$nd_font>>>"Are you alright <<$pcs_firstname>>? I hope I wasn''t too harsh on you. I was so aroused and drawn into it that I almost lost control over myself."</font>'		
 			'<font color=#<<$pcs_font>>>"I..I''m OK. I think."</font>'
 			'<font color=#<<$nd_font>>>"So how was it <<$pcs_firstname>>?"</font>'
 			act 'The worst experience ever! Never speak of it again':pissLike = -1 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
@@ -1605,7 +1605,7 @@ if $ARGS[0] = 'ndSexPiss':
 			act 'It wasn''t so bad, but it doesn''t really arouse me though':pissLike = 1 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
 			act 'I didn''t think I would, but I loved it':pissLike = 2 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
 		else
-			'<font color=#<<$nd_font>>>"Are you allright <<$pcs_firstname>>? I hope I wasn''t too harsh on you. I was so aroused and drawn into it that I almost lost control over myself."</font>'
+			'<font color=#<<$nd_font>>>"Are you alright <<$pcs_firstname>>? I hope I wasn''t too harsh on you. I was so aroused and drawn into it that I almost lost control over myself."</font>'
 			act 'I''m fine':step = 110 & gt 'pavShared_nd', 'ndSexPiss'
 		end
 

locations/pavcomplexrolan.qsrc

@@ -258,32 +258,32 @@ if $ARGS[0] = 'friends':
 		rolanapol = 3
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanturn1.jpg"></center>'
-		'"Rolan i''m sorry if i''ve done something wrong...it''s only that i don''t know what i''ve done, if only you will explain me what happend i can try to smooth things up...."'
+		'"Rolan I''m sorry if I''ve done something wrong...it''s only that I don''t know what i''ve done, if only you will explain me what happend I can try to smooth things up...."'
 		'But Rolan turn back his shoulder too...'
 		act 'Please':
 			cla & *clr
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanturncry.jpg"></center>'
-			'"Mphhhf...I cannot believe you don''t know what you have done. You snoop around in my house and take what you want...and me ....i even allow you to wander around. You really don''t know what have you done? Well i''ll tell you: you have stolen my Babushka and used her to repair my bath. Happy....what else do you want to take from me. You have taken what was the most important thing to me and throw it away..."'
+			'"Mphhhf...I cannot believe you don''t know what you have done. You snoop around in my house and take what you want...and me ....I even allow you to wander around. You really don''t know what have you done? Well I''ll tell you: you have stolen my Babushka and used her to repair my bath. Happy....what else do you want to take from me. You have taken what was the most important thing to me and throw it away..."'
 			*nl
-			'"I-I...i can''t believe it, if only i could have know something like this i could never be able to use the powder...you have to believe me..."'
+			'"I-I...I can''t believe it, if only I could have know something like this I could never be able to use the powder...you have to believe me..."'
 			*nl
-			'"...I''m orthodox and cremation is not allowed. But i haven''t money to afford burial too and i couldn''t leave Babushka to be throwed away. This is why i can believe you, but that''s not the point...you shouldn''t snoop around someone else house. That''s not polite for a woman. And...and...Oh Babushka what have i done...why didn''t i take care of you...you were everything to me....". Rolan start crying in agony....'
+			'"...I''m orthodox and cremation is not allowed. But I haven''t money to afford burial too and I couldn''t leave Babushka to be throwed away. This is why I can believe you, but that''s not the point...you shouldn''t snoop around someone else house. That''s not polite for a woman. And...and...Oh Babushka what have I done...why didn''t I take care of you...you were everything to me....". Rolan start crying in agony....'
 			act 'Cheer him up':
 				cla & *clr
 				money -= 8000
 				gs 'stat'
 				gs 'panties', 'dispose'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanapolgift.jpg"></center>'
-				'"....Rolan here...take this to dry your tears...i know you like them, and i don''t have some wipes, you can have them...i have a bunch...."'
+				'"....Rolan here...take this to dry your tears...I know you like them, and I don''t have some wipes, you can have them...I have a bunch...."'
 				*nl
-				'"Miss <<$pcs_lastname>>...i think it''s time for me to make my apologize. I was extremely rude to kick you out from my house in that way...."'
+				'"Miss <<$pcs_lastname>>...I think it''s time for me to make my apologize. I was extremely rude to kick you out from my house in that way...."'
 				*nl
-				'"Oh Rolan there''s no need...probably i would have done the same if i was you"'
+				'"Oh Rolan there''s no need...probably I would have done the same if I was you"'
 				*nl
 				'"Miss <<$pcs_lastname>>...please, let me finish. It''s not from everybody to understand peoples habits and to not judge them, that''s the reason why my door will be open again for you. Please miss <<$pcs_lastname>> wolud you be so kind to accept my apologize?"'
 				*nl
-				'"Oh Rolan i''m the one who have to apologise, i''m very happy to spend some time again with you like in the past time. Just...here take those, it cannot give you back babushka as nothing happened but you can recruit some worker to restore the vessel..."'
+				'"Oh Rolan I''m the one who have to apologise, I''m very happy to spend some time again with you like in the past time. Just...here take those, it cannot give you back babushka as nothing happened but you can recruit some worker to restore the vessel..."'
 				*nl
 				'"Miss <<$pcs_lastname>>...'
 				act 'Say goodbye':
@@ -301,7 +301,7 @@ if $ARGS[0] = 'friends':
 			cla & *clr
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanturn1.jpg"></center>'
-			'"Rolan i''m sorry if i''ve done something wrong...it''s only that i don''t know what i''ve done, if only you will explain me what happend i can try to smooth things up...."'
+			'"Rolan I''m sorry if i''ve done something wrong...it''s only that I don''t know what i''ve done, if only you will explain me what happend I can try to smooth things up...."'
 			'But Rolan turn back his shoulder too...'
 			act 'Cheer him up':
 				cla & *clr
@@ -313,9 +313,9 @@ if $ARGS[0] = 'friends':
 				*nl
 				'You cannot believe what you have heard."...but...but.."'
 				*nl
-				'"...Before you ask your stupid question, i''m orthodox and cremation is not allowed. But i haven''t money to afford burial too and i couldn''t leave Babushka to be throwed away..."'
+				'"...Before you ask your stupid question, I''m orthodox and cremation is not allowed. But I haven''t money to afford burial too and I couldn''t leave Babushka to be throwed away..."'
 				*nl
-				'"...i''m sorry Rolan ... i could never imagined...i''m so sorry Rolan, i don''t know what to do...here take those money, they cannot give you back babushka as nothing happened but you can recruit some worker to restore the vessel...if only i could have know something like this i could never be able to use the powder...you have to believe me..."'
+				'"...I''m sorry Rolan ... I could never imagined...I''m so sorry Rolan, I don''t know what to do...here take those money, they cannot give you back babushka as nothing happened but you can recruit some worker to restore the vessel...if only I could have know something like this I could never be able to use the powder...you have to believe me..."'
 				*nl
 				'"I appreciate your effort, but that doesn''t changes things. You could have asked, and you didn''t do it. You should learn what''s yours and what''s not. Give me your panty."'
 				*nl
@@ -326,7 +326,7 @@ if $ARGS[0] = 'friends':
 					gs 'stat'
 					gs 'panties', 'dispose'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanapol0.jpg"></center>'
-					'"...o-ok...i think i''ve learned the lesson"'
+					'"...o-ok...I think I''ve learned the lesson"'
 					*nl
 					'"No you didn''t....that''s because you should''n snoop around to take things that aren''t yours, and you know nothing about. Than we have to fix this, so you should really be able to remember the lesson. Now bend over."'
 					'...'
@@ -357,7 +357,7 @@ if $ARGS[0] = 'friends':
 									gs 'stat'
 									rolanblockhome = 0
 									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanturncry.jpg"></center>'
-									'"I''m sorry too miss <<$pcs_lastname>>...i would like this thing was not necessary. I''m sure you have learned your lesson. '
+									'"I''m sorry too miss <<$pcs_lastname>>...I would like this thing was not necessary. I''m sure you have learned your lesson. '
 									act 'leave':gt 'pavComplex', 'start'
 								end
 							end
@@ -383,7 +383,7 @@ if $ARGS[0] = 'friends':
 			cla & *clr
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolangiveme.jpg"></center>'
-			'"...o-ok...i think i''ve learned the lesson"'
+			'"...o-ok...I think I''ve learned the lesson"'
 			*nl
 			'"No you didn''t....we have to fix this. Now give it to me."'
 			'...'
@@ -393,7 +393,7 @@ if $ARGS[0] = 'friends':
 				gs 'stat'
 				gs 'panties', 'dispose'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanapol0.jpg"></center>'
-				'"...o-ok...i think i''ve learned the lesson"'
+				'"...o-ok...I think I''ve learned the lesson"'
 				*nl
 				'"No you didn''t....that''s because you should''n snoop around to take things that aren''t yours, and you know nothing about. Than we have to fix this, so you should really be able to remember the lesson. Now bend over."'
 				'...'
@@ -424,7 +424,7 @@ if $ARGS[0] = 'friends':
 								gs 'stat'
 								rolanblockhome = 0
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanturncry.jpg"></center>'
-								'"I''m sorry too miss <<$pcs_lastname>>...i would like this thing was not necessary. I''m sure you have learned your lesson. '
+								'"I''m sorry too miss <<$pcs_lastname>>...I would like this thing was not necessary. I''m sure you have learned your lesson. '
 								act 'leave':gt 'pavComplex', 'start'
 							end
 						end
@@ -449,7 +449,7 @@ if $ARGS[0] = 'friends':
 			cla & *clr
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolangiveme.jpg"></center>'
-			'"...o-ok...i think i''ve learned the lesson"'
+			'"...o-ok...i think I''ve learned the lesson"'
 			*nl
 			'"No you didn''t....we have to fix this. Now bend over."'
 			'...'
@@ -485,7 +485,7 @@ if $ARGS[0] = 'friends':
 							gs 'stat'
 							rolanblockhome = 0
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanturncry.jpg"></center>'
-							'"I''m sorry too miss <<$pcs_lastname>>...i would like this thing was not necessary. I''m sure you have learned your lesson. '
+							'"I''m sorry too miss <<$pcs_lastname>>...I would like this thing was not necessary. I''m sure you have learned your lesson. '
 							act 'leave':gt 'pavComplex', 'start'
 						end
 					end

locations/pavtrainhall.qsrc

@@ -53,7 +53,7 @@ if $ARGS[0] = '':
 			act 'Work': gt 'pavtrainhall', 'work'
 		elseif cleZarplatDay ! daystart:
 			cleZarplatDay = daystart
-			cleanDailypay += 130
+			cleanDailypay += 250
 			vokzalVork += 1
 			gs 'stat'
 		end

locations/pavtrainhall_events.qsrc

@@ -5,7 +5,7 @@ if $ARGS[0] = 'manager':
 	menu_off = 1
 	gs 'stat'
 	'As you walk past the station manager''s office, you notice a sign next to the door:'
-	'"Cleaner wanted! 2 hours per day at any time, salary 130 <b>₽</b>. Ask the station manager for more information."'
+	'"Cleaner wanted! 2 hours per day at any time, salary 250 <b>₽</b>. Ask the station manager for more information."'
 	'"Office visiting hours: 08:00 - 17:00"'
 
 	act 'Return to the train station':minut += 1 & gt 'pavtrainhall'

locations/poli.qsrc

@@ -237,7 +237,7 @@ if $ARGS[0] = 'start':
 			end
 
 			if money >= zubpay:
-				act 'Sort out you teeth':
+				act 'Sort out your teeth':
 					*clr & cla
 					money -= zubpay
 					minut += 60
@@ -589,7 +589,6 @@ if $ARGS[0] = 'ven2':
 	*clr & cla
 	menu_off = 1
 	money += 3000
-	sub += 1
 	gs'stat'
     '<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/gy93cr29.jpg"></center>'
     'You lie down, almost crying, mulling over the doctor''s words again and again in your head. After a while you decide that you want the money... you probably won''t be recognized, and even if you do: you can always pretend you didn''t know you were being filmed?'
@@ -912,7 +911,7 @@ if $ARGS[0] = 'ninel2':
 					gs 'arousal', 'anal_dildo', 10, 'sub', 'lesbian'
 					minut -= 10
 					gs 'stat'
-											
+
 					act 'Roll over':
 						*clr & cla
 
@@ -1031,7 +1030,7 @@ if $ARGS[0] = 'ninel3':
 
 			gs 'arousal', 'foreplay', 10, 'sub', 'lesbian'
 			gs 'stat'
-											
+
 			act 'Fuck me!':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/polsex02.jpg"></center>'
@@ -1040,7 +1039,7 @@ if $ARGS[0] = 'ninel3':
 
 				gs 'arousal', 'vaginal_strap', 10, 'sub', 'lesbian'
 				gs 'stat'
-											
+
 				act 'Fall on the couch':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/polsex03.jpg"></center>'
@@ -1146,8 +1145,19 @@ if $ARGS[0] = '0':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex1.jpg"></center>'
 	'During the examination, the doctor starts to flirt with you and touch you longer than is necessary, clearly trying to start something intimate.'
-							
-	act 'Stop him':gt 'poli', 'start'
+	
+	gs 'willpower', 'sex', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Stop him (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'sex', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'poli', 'start'
+		end
+	else
+		act 'Stop him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 
 	act 'Have some fun':
 		picrand = 11
@@ -1163,8 +1173,19 @@ if $ARGS[0] = '1':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex2.jpg"></center>'
 	'You are examined by two doctors, they touch you everywhere clearly going beyond what is permitted.'
-
-	act 'Storm out':gt 'poli', 'start'
+	
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Storm out (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'poli', 'start'
+		end
+	else
+		act 'Storm out (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 
 	act 'Have some fun with them':
 		gs 'npcgeneratec', 0, 'Doctor', rand(28,48)
@@ -1189,8 +1210,19 @@ if $ARGS[0] = '2':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex4.jpg"></center>'
 		'As you walk in, the doctor runs out, and the startled nurse just glares at you. After a moment, her eyes light up and she removes her robe, comes over to you and with one hand grabs your ass as the other reaches up your top to your breast.'
-
-		act 'Leave':gt 'poli', 'start'
+		
+		gs 'willpower', 'cuni', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'cuni', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'poli', 'start'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 
 		act 'Let her':
 			*clr & cla

locations/postmaster.qsrc

@@ -22,7 +22,7 @@ if $ARGS[0] = 'start':
 			'"A job? Haven''t got any jobs," the postmaster shrugs.'
 			'Just when you were about to turn around to leave, he ponders: "Actually, Aleksiy has been mentioning he wants to spend more time with his sick daughter on weekends. Maybe... come back here, girl."'
 			'He takes another good look at you and seems to be in deep thought for a moment, before humming contently.'
-			'"Alright, I''ll give you a chance to prove yourself. You can deliver some urgent letters and packages on Saturday afternoon. You''ll get the same pay Aleksiy gets, assuming you do a good job. 450 <b>₽</b> total, for about three hours of work - from 12:00 to roughly 15:00. If you do well, you can do it every week," he offers.'
+			'"Alright, I''ll give you a chance to prove yourself. You can deliver some urgent letters and packages on Saturday afternoon. You''ll get the same pay Aleksiy gets, assuming you do a good job. 500 <b>₽</b> total, for about three hours of work - from 12:00 to roughly 15:00. If you do well, you can do it every week," he offers.'
 			*nl
 			act 'Decline':
 				cla
@@ -47,7 +47,7 @@ if $ARGS[0] = 'start':
 		minut += 2
 		'<center><img <<$set_imgh>> src="images/locations/shared/postoffice/postmaster.jpg"></center>'
 		'"Wait... weren''t you here before?" the postmaster asks when he sees your face. "Right, you were here about that Saturday job! It''s still available if you want it?"'
-		'When you ask him about the details, he reminds you: "You can deliver some urgent letters and packages on Saturday afternoon. You''ll get the same pay Aleksiy gets, assuming you do a good job. 450 <b>₽</b> total, for about three hours of work - from 12:00 to roughly 15:00. If you do well, you can do it every week."'
+		'When you ask him about the details, he reminds you: "You can deliver some urgent letters and packages on Saturday afternoon. You''ll get the same pay Aleksiy gets, assuming you do a good job. 500 <b>₽</b> total, for about three hours of work - from 12:00 to roughly 15:00. If you do well, you can do it every week."'
 		*nl
 		act 'Decline':
 			cla

locations/street_event.qsrc

@@ -1380,12 +1380,12 @@ if $ARGS[1] = 'main':
 				gs 'stat'
 				'<<$streetev_title>>'
 				'<center><img <<$set_imgh>> src="images/locations/shared/street/flyerman.jpg"></center>'
-				'As you walk down the street you run across a man handing out flyers, as you get near him. He waves you over, "Hello there young lady, would you like to earn a little extra money? All you have to do is take some of these flyers and hand them out for half an hour and I will pay you 50 <b>₽</b>. What do you say?"'
+				'As you walk down the street you run across a man handing out flyers, as you get near him. He waves you over, "Hello there young lady, would you like to earn a little extra money? All you have to do is take some of these flyers and hand them out for half an hour and I will pay you 75 <b>₽</b>. What do you say?"'
 				act 'No thanks':gt $loc
-				act 'Distribute flyers to earn money (50 <b>₽</b>)':
+				act 'Distribute flyers to earn money (75 <b>₽</b>)':
 					*clr & cla
 					minut += 30
-					money += 50
+					money += 75
 					pcs_mood -= 5
 					gs 'stat'
 					'<<$streetev_title>>'
@@ -1394,11 +1394,11 @@ if $ARGS[1] = 'main':
 					else
 						'<center><img <<$set_imgh>> src="images/locations/shared/street/flyer.jpg"></center>'
 					end
-					'For thirty minutes you stand on the street, chatting up random people, trying to give them one of your flyers. After that you are paid 50 <b>₽</b> for your effort by the man and he offers you the same deal to hand out more.'
-					act 'Distribute flyers to earn money (50 <b>₽</b>)':
+					'For thirty minutes you stand on the street, chatting up random people, trying to give them one of your flyers. After that you are paid 75 <b>₽</b> for your effort by the man and he offers you the same deal to hand out more.'
+					act 'Distribute flyers to earn money (75 <b>₽</b>)':
 						*clr & cla
 						minut += 30
-						money += 50
+						money += 75
 						pcs_mood -= 5
 						gs 'stat'
 						'<<$streetev_title>>'
@@ -1407,7 +1407,7 @@ if $ARGS[1] = 'main':
 						else
 							'<center><img <<$set_imgh>> src="images/locations/shared/street/flyer.jpg"></center>'
 						end
-						'For thirty minutes you stand on the street, chatting up random people, trying to give them one of your flyers. After that you are paid 50 <b>₽</b> for your effort by the man and he offers you the same deal to hand out more.'
+						'For thirty minutes you stand on the street, chatting up random people, trying to give them one of your flyers. After that you are paid 75 <b>₽</b> for your effort by the man and he offers you the same deal to hand out more.'
 						act 'Leave':gt $loc
 					end
 					act 'Leave':gt $loc

locations/svidboy.qsrc

@@ -24,15 +24,22 @@ if $ARGS[0] = 'kinosvid':
 		minut += 90
 		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kino1.jpg"></center>'
 		'During the session <<$loverdesc[lover_number]>> looked around and making sure that you are in the room except no one is turned to you and started to kiss his hand slipped under your clothes, you started to caress his chest.'
+		
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act '"Not here" (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kino0.jpg"></center>'
+				'You removed his hand with the words "Well, not here"'
+				'When the movie ended <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-		act '"Not here"':
-			cla
-			*clr
-			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kino0.jpg"></center>'
-			'You removed his hand with the words "Well, not here"'
-			'When the movie ended <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-			act 'Leave':gt $svidboy_home
+				act 'Leave':gt $svidboy_home
+			end
+		else
+			act '"Not here" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		act 'Unbutton his pants':
@@ -78,31 +85,44 @@ if $ARGS[0] = 'parksvid':
 		minut += 60
 		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park1.jpg"></center>'
 		'When you come into the park <<$loverdesc[lover_number]>> caught you in his arms and began to circle, "Stop, stop, else you will drop" you laughed. <<$loverdesc[lover_number]>> put you on the ground.'
+		
+		gs 'willpower', 'kiss', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Move on (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'kiss', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park0.jpg"></center>'
+				'You take his hand and walk away.'
+				'Soon <<$loverdesc[lover_number]>> said that he has to run and leaves.'
 
-		act 'Move on':
-			cla
-			*clr
-			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park0.jpg"></center>'
-			'You take his hand and walk away.'
-			'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-			act 'Leave':gt $svidboy_home, $svidboy_home_arg
+				act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			end
+		else
+			act 'Move on (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		act 'Kiss him':
-			cla
-			*clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park2.jpg"></center>'
 			'You turn to him and kiss on the lips, he holds you and his hands begin to wander through your body, one on the chest, the second squeezes your buttocks.'
 
-			act 'Stop':
-				cla
-				*clr
-				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park0.jpg"></center>'
-				'You remove his hands and walked away.'
-				'Soon <<$loverdesc[lover_number]>> said that he has to run and leaves.'
+			gs 'willpower', 'foreplay', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Stop (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'foreplay', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park0.jpg"></center>'
+					'You take his hand and walk away.'
+					'Soon <<$loverdesc[lover_number]>> said that he has to run and leaves.'
 
-				act 'Leave':gt $svidboy_home, $svidboy_home_arg
+					act 'Leave':gt $svidboy_home, $svidboy_home_arg
+				end
+			else
+				act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act 'Continue':
@@ -111,15 +131,22 @@ if $ARGS[0] = 'parksvid':
 				pcs_horny += 20
 				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park3.jpg"></center>'
 				'You kiss him, <<$loverdesc[lover_number]>> starts at your lips, then moves lower, meanwhile he bares your chest and begins to squeeze, while his other hand moves to your pussy.'
-
-				act 'Stop':
-					cla
-					*clr
-					'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park0.jpg"></center>'
-					'You remove his hands and cover your bare breasts.'
-					'Soon <<$loverdesc[lover_number]>> said that he has to run and leaves.'
-
-					act 'Leave':gt $svidboy_home, $svidboy_home_arg
+				
+				gs 'willpower', 'cuni', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Stop (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'cuni', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park0.jpg"></center>'
+						'You remove his hands and cover your bare breasts.'
+						'Soon <<$loverdesc[lover_number]>> said that he has to run and leaves.'
+
+						act 'Leave':gt $svidboy_home, $svidboy_home_arg
+					end
+				else
+					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 
 				act 'Continue':
@@ -150,15 +177,22 @@ if $ARGS[0] = 'parksvid2':
 
 	if izvrat = 1:
 		'<<$loverdesc[lover_number]>> also his remarks and turned to you rastegivat pants and says, "And let''s have a little show for this pervert"'
+		
+		gs 'willpower', 'exhib', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'exhib', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
+				'"Well, no, I will not do that, " you reply ego buttoning his pants, take his hand and move on.'
+				'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-		act 'Refuse':
-			cla
-			*clr
-			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
-			'"Well, no, I will not do that, " you reply ego buttoning his pants, take his hand and move on.'
-			'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-			act 'Leave':gt $svidboy_home, $svidboy_home_arg
+				act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		act 'Agree':
@@ -169,34 +203,43 @@ if $ARGS[0] = 'parksvid2':
 			loverrelation[lover_number] += 5
 			gt 'sex', 'minet'
 		end
-	end
-
-	'You comes to mind crazy idea, to have sex with her boyfriend in front of spying.'
-
-	act 'Sex':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park9.jpg"></center>'
-		'You let go of his hand away a little guy back raschityvaya place so that African-would you have seen good and throwing off his clothes covenant her boyfriend, "I want you here and now"'
-		'"And I do not mind, " he says coming up to you and find rastegivaya fly.'
+	elseif pcs_inhib >= 40 or exhibitionist_lvl > 1:
+		'You comes to mind crazy idea, to have sex with her boyfriend in front of spying.'
 
-		act 'Blow job':
-			$svidboy_home = 'svidboy'
-			$svidboy_home_arg = 'parksvid22'
-			picrand = 50
-			svidboysex = 1
-			loverrelation[lover_number] += 5
-			gt 'sex', 'minet'
+		act 'Have sex':
+			cla
+			*clr
+			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park9.jpg"></center>'
+			'You let go of his hand away a little guy back raschityvaya place so that African-would you have seen good and throwing off his clothes covenant her boyfriend, "I want you here and now"'
+			'"And I do not mind, " he says coming up to you and find rastegivaya fly.'
+
+			act 'Blowjob':
+				$svidboy_home = 'svidboy'
+				$svidboy_home_arg = 'parksvid22'
+				picrand = 50
+				svidboysex = 1
+				loverrelation[lover_number] += 5
+				gt 'sex', 'minet'
+			end
 		end
-	end
-
-	act 'Discard this idea and move on.':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
-		'You drop this idea and move on.'
-		'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
+		
+		gs 'willpower', 'exhib', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Discard this idea and move on. (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'exhib', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
+				'You drop this idea and move on.'
+				'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
 
+				act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			end
+		else
+			act 'Discard this idea and move on.  (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
 		act 'Leave':gt $svidboy_home, $svidboy_home_arg
 	end
 end
@@ -216,15 +259,22 @@ if $ARGS[0] = 'parksvid21':
 	'Once <<$loverdesc[lover_number]>> finished, he asks you, "Well this little Papuan still here?"'
 	'"Yes, actively Fingering." you reply, glancing toward African.'
 	'"If you can suck it, and I''ll see." says <<$loverdesc[lover_number]>>, clearly wanting something you agreed.'
+	
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
+			'"Well, no, I''m not going to suck him, enough with him and watching." you reply dressing, then take his hand and move on.'
+			'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-	act 'Refuse':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
-		'"Well, no, I''m not going to suck him, enough with him and watching." you reply dressing, then take his hand and move on.'
-		'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-		act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			act 'Leave':gt $svidboy_home, $svidboy_home_arg
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 
 	act 'Agree':
@@ -257,15 +307,22 @@ if $ARGS[0] = 'parksvid22':
 	*clr
 	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park7.jpg"></center>'
 	'After <<$loverdesc[lover_number]>> finished, he notices you watching African "Damn, this pervert us spying" and noting both your lips slipped smile asked, "Did you know that he''s here, you''re here to fuck specially decided to show off in front of this Negro, you can also otsosesh him? "'
+	
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Reassure him (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
+			'"Of course I did not know anything, do you think that I could have sex with you in front of this" you make pained face and dressed quickly go away after a few seconds <<$loverdesc[lover_number]>> catching up with you, "I''m sorry, honey, not mean to offend you, I said sgorecha "he izvenyayus you take him by the hand, saying that you forgive and move on.'
+			'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-	act 'Reassure him':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/sex_park6.jpg"></center>'
-		'"Of course I did not know anything, do you think that I could have sex with you in front of this" you make pained face and dressed quickly go away after a few seconds <<$loverdesc[lover_number]>> catching up with you, "I''m sorry, honey, not mean to offend you, I said sgorecha "he izvenyayus you take him by the hand, saying that you forgive and move on.'
-		'Soon <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-		act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			act 'Leave':gt $svidboy_home, $svidboy_home_arg
+		end
+	else
+		act 'Reassure him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 
 	act 'Annoy him':
@@ -287,8 +344,7 @@ end
 
 if $ARGS[0] = 'billsvid':
 	$svidboy_home = 'torgcentr'
-	cla
-	*clr
+	*clr & cla
 	minut += 60
 	pcs_mood += 10
 	loverrelation[lover_number] += 3
@@ -299,46 +355,59 @@ if $ARGS[0] = 'billsvid':
 	'<<$loverdesc[lover_number]>> pays for a table at a booth and you go to play'
 
 	act 'Play':
-		cla
-		*clr
+		*clr & cla
 		minut += 60
+		gs 'stat'
 
 		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/bil1<<picrand>>.jpg"></center>'
 		'During the game <<$loverdesc[lover_number]>> moves behind you and his hands gliding over your endeavors hips and lips are drawn to the neck.'
+		
+		gs 'willpower', 'foreplay', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Not here (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'foreplay', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				$ImageNeededPlacholder
+				! WD: IMAGE NEEDED ~ '<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/bil0<<picrand>>.jpg"></center>'
+				'You removed his hand with the words "Well, not here."'
+				'When your time is up <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-		act 'Not here':
-			cla
-			*clr
-			$ImageNeededPlacholder
-			! WD: IMAGE NEEDED ~ '<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/bil0<<picrand>>.jpg"></center>'
-			'You removed his hand with the words "Well, not here."'
-			'When your time is up <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-			act 'Leave':gt $svidboy_home
+				act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			end
+		else
+			act 'Not here (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
-		act 'Let continues':
-			cla
-			*clr
+		act 'Let him continue':
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/bil2<<picrand>>.jpg"></center>'
 			'You lozhite cue on the table and relax allowing him to continue to caress your body, kissing it down lower and lower.'
+			
+			gs 'willpower', 'cuni', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Stop (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'cuni', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					$ImageNeededPlacholder
+					! WD: IMAGE NEEDED ~ '<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/bil0<<picrand>>.jpg"></center>'
+					'You removed his hand with the words "Well, not here"'
+					'When your time is up <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-			act 'Let continues':
+					act 'Leave':gt $svidboy_home, $svidboy_home_arg
+				end
+			else
+				act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			act 'Let him continue':
 				svidboysex = 1
 				loverrelation[lover_number] += 5
 				gt 'sex', 'kuni'
 			end
-
-			act 'Stop, stop':
-				cla
-				*clr
-				$ImageNeededPlacholder
-				! WD: IMAGE NEEDED ~ '<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/bil0<<picrand>>.jpg"></center>'
-				'You removed his hand with the words "Well, not here"'
-				'When your time is up <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-				act 'Leave':gt $svidboy_home
-			end
 		end
 	end
 end
@@ -365,39 +434,52 @@ if $ARGS[0] = 'kafesvid':
 		minut += 60
 		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kafe1.jpg"></center>'
 		'Once you have brought order <<$loverdesc[lover_number]>> began to pester you, he and Narov kiss you, and slid his hands over your body, then caressing his chest, then squeeze your buttocks.'
+		
+		gs 'willpower', 'foreplay', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Not here (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'foreplay', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kafe0.jpg"></center>'
+				'You removed his hand with the words "Well, not here"'
+				'After some time <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-		act '"Not here"':
-			cla
-			*clr
-			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kafe0.jpg"></center>'
-			'You removed his hand with the words "Well, not here"'
-			'After some time <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-			act 'Leave':gt $svidboy_home
+				act 'Leave':gt $svidboy_home, $svidboy_home_arg
+			end
+		else
+			act 'Not here (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
-		act 'Let continues':
-			cla
-			*clr
+		act 'Let him continue':
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kafe2.jpg"></center>'
 			'Soon you remain almost without clothes, and <<$loverdesc[lover_number]>> was kissing you underbelly, dropping to the pubis.'
+			
+			gs 'willpower', 'cuni', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Stop (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'cuni', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kafe0.jpg"></center>'
+					'The last time you came all the same in yourself and realizing that you are in a cafe, pushed him, "No, we have enough in the same cafe, patience to the house"'
+					'But soon <<$loverdesc[lover_number]>> said that he has to run and left.'
 
-			act 'Let continues':
+					act 'Leave':gt $svidboy_home, $svidboy_home_arg
+				end
+			else
+				act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			act 'Let him continue':
 				svidboysex = 1
 				loverrelation[lover_number] += 5
 				picrand = 53
 				gt 'sex', 'kuni'
 			end
-
-			act 'Stop, stop':
-				cla
-				*clr
-				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/kafe0.jpg"></center>'
-				'The last time you came all the same in yourself and realizing that you are in a cafe, pushed him, "No, we have enough in the same cafe, patience to the house"'
-				'But soon <<$loverdesc[lover_number]>> said that he has to run and left.'
-
-				act 'Leave':gt $svidboy_home
-			end
 		end
 	end
 end