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

glife.qproj

@@ -451,7 +451,6 @@
 		<Location name="party_boys"/>
 		<Location name="party_girls"/>
 		<Location name="sister_party"/>
-		<Location name="roma"/>
 		<Location name="ira"/>
 		<Location name="lena"/>
 	</Folder>
@@ -505,7 +504,7 @@
 		<Location name="farmhomeride"/>
 	</Folder>
 	<Folder name="Gadyukino">
-		<Location name="Gadhouse"/>
+		<Location name="gadhouse"/>
 		<Location name="grandmahelp"/>
 		<Location name="grandpahelp"/>
 		<Location name="Gaddvor"/>
@@ -672,7 +671,6 @@
 		<Location name="VoltrenerSexShower"/>
 		<Location name="Snpc"/>
 		<Location name="cumreaction"/>
-		<Location name="izdevat"/>
 		<Location name="kotovtalker"/>
 	</Folder>
 	<Folder name="Event gym town">

locations/BDSM_Club.qsrc

@@ -148,7 +148,6 @@ if $ARGS[0] = 's_start':
 	$menu_loc = 'BDSM_Club'
 	$menu_arg = 's_start'
 	menu_off = 0
-	sub += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/1_1.jpg"></center>'
 	'You enter the club and Mistress Elektra is sitting at her desk overseeing admissions.'
@@ -169,7 +168,6 @@ if $ARGS[0] = 'd_start':
 	$menu_loc = 'BDSM_Club'
 	$menu_arg = 'd_start'
 	menu_off = 0
-	pcs_dom += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/1_1.jpg"></center>'
 	'Elektra is sitting at the admissions desk and greets you informally.'

locations/BDsex.qsrc

@@ -80,7 +80,7 @@ if $ARGS[0] = 'start':
 			'<<$boydesc>> grabs the back of your head and pulls you to face his penis.'
 
 			act 'Take by mouth':gt 'BDsex', 'minet'
-			gs 'willpower', 'sex', 'resist'
+			gs 'willpower', 'bj', 'resist', 'easy'
 			if will_cost <= pcs_willpwr:
 				act 'Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
 				act 'Stand on all fours (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
@@ -94,17 +94,17 @@ if $ARGS[0] = 'start':
 
 			act 'Do anal':gt 'BDsex', 'anal2'
 
-			gs 'willpower', 'sex', 'resist'
+			gs 'willpower', 'anal', 'resist', 'easy'
 			if will_cost <= pcs_willpwr:
-				act '"I do not want to!" Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
-				act '"I''ll do it doggy style, but not in the ass!" (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
+				act '"I do not want to!" Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'anal', 'resist', 'easy' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
+				act '"I''ll do it doggy style, but not in the ass!" (<<will_cost>> Willpower)': gs 'willpower', 'anal', 'resist', 'easy' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
 			else
 				act '"I do not want to!" Lie on your back and spread your legs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				act '"I''ll do it doggy style, but not in the ass!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
-			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'bj', 'force'
 			if will_cost <= pcs_willpwr:
-				act 'Take him into your mouth (<<will_cost>> Willpower)': gs 'willpower', 'bj', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'minet'
+				act 'Take him into your mouth (<<will_cost>> Willpower)': gs 'willpower', 'bj', 'force' & gs 'willpower', 'pay', 'force' & gt 'BDsex', 'minet'
 			else
 				act 'Take him into your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
@@ -120,7 +120,6 @@ if $ARGS[0] = 'kuni':
 	gs 'stat'
 	if pcs_horny >= 90:
 		pcs_mood += 15
-		!pcs_willpwr += 15
 		$orgasm_txt = 'His skill is enough to spark an orgasm deep within you.'
 		$orgasm_or = 'custom'
 		gs 'stat'
@@ -336,17 +335,17 @@ if $ARGS[0] = 'hj':
 
 				act 'Anal':gt 'BDsex', 'anal2'
 
-				gs 'willpower', 'sex', 'resist'
+				gs 'willpower', 'anal', 'resist', 'easy'
 				if will_cost <= pcs_willpwr:
-					act '"I do not want to!" Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
-					act '"I''ll do it doggy style, but not in the ass!" (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
+					act '"I do not want to!" Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'anal', 'resist', 'easy' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
+					act '"I''ll do it doggy style, but not in the ass!" (<<will_cost>> Willpower)': gs 'willpower', 'anal', 'resist', 'easy' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
 				else
 					act '"I do not want to!" Lie on your back and spread your legs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					act '"I''ll do it doggy style, but not in the ass!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
-				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'bj', 'force'
 				if will_cost <= pcs_willpwr:
-					act 'Take him into your mouth (<<will_cost>> Willpower)': gs 'willpower', 'bj', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'minet'
+					act 'Take him into your mouth (<<will_cost>> Willpower)': gs 'willpower', 'bj', 'force' & gs 'willpower', 'pay', 'force' & gt 'BDsex', 'minet'
 				else
 					act 'Take him into your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
@@ -426,10 +425,10 @@ if $ARGS[0] = 'minet':
 
 				act 'Anal':gt 'BDsex', 'anal2'
 
-				gs 'willpower', 'sex', 'resist'
+				gs 'willpower', 'anal', 'resist', 'easy'
 				if will_cost <= pcs_willpwr:
-					act '"I do not want to!" Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
-					act '"I''ll do it doggy style, but not in the ass!" (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'resist' & gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
+					act '"I do not want to!" Lie on your back and spread your legs (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex'
+					act '"I''ll do it doggy style, but not in the ass!" (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'BDsex', 'sex2'
 				else
 					act '"I do not want to!" Lie on your back and spread your legs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					act '"I''ll do it doggy style, but not in the ass!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -592,7 +591,6 @@ if $ARGS[0] = 'org':
 	if mesec > 0:
 		!!periods, orgasm is not possible
 		pcs_mood -= 10
-		!pcs_willpwr -= 10
 		'It is your time of the month and, as his member rams into you, vaginal blood flows slowly around his girth. Painful sensations and pleasure mix. You moan while his strong <<dick>> centimeter dick fucks your pussy.'
 		$orgasm_or = 'no'
 		gs 'stat'

locations/BurgerTip.qsrc

@@ -1,5 +1,5 @@
 # BurgerTip
-
+!!needs a rework to not be so linear
 menu_off = 1
 
 $kompromatFoto = ''
@@ -1027,11 +1027,29 @@ if $ARGS[0] = 'ivan_work2':
 				end
 			end
 		end
-
-		act 'Refuse': gt 'BurgerTip', 'ivan_work3'
+		gs 'willpower', 'exhib', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'BurgerTip', 'ivan_work3'
+			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	
 	end
-
-	act 'Refuse': gt 'BurgerTip', 'ivan_work3'
+	gs 'willpower', 'misc', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'BurgerTip', 'ivan_work3'
+		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	
 end
 
 if $ARGS[0] = 'ivan_work3':

locations/FedorEv3.qsrc

@@ -38,7 +38,6 @@ if $ARGS[0] = 'Food':
 	minut += 5		
 	pcs_health += 5	
 	pcs_mood += 15
-	!pcs_willpwr += 15
 	pcs_energy += 30
 	pcs_hydra += 50
 	cumspclnt = 2
@@ -62,7 +61,6 @@ if $ARGS[0] = 'Food 2':
 	minut += 5
 	pcs_health += 10	
 	pcs_mood += 20
-	!pcs_willpwr += 20
 	fat += 2
 	pcs_energy += 60
 	pcs_hydra += 80
@@ -98,7 +96,6 @@ if $ARGS[0] = 'Front':
 	act 'Take a seat':
 		*clr & cla
 		pcs_mood += 20
-		!pcs_willpwr += 20
 		minut += 70
 		gs 'boyStat', 'A5'
 		'You and Fedor take a seat and he hands you your popcorn and snacks then gives you a kiss on the cheek as the lights dim and the movie begins.'
@@ -188,7 +185,6 @@ if $ARGS[0] = 'Middle':
 	act 'Take a seat':
 		*clr & cla
 		pcs_mood += 20
-		!pcs_willpwr += 20
 		minut += 70
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/staring.jpg"></center>'
@@ -245,7 +241,6 @@ if $ARGS[0] = 'Back':
 	act 'Take a seat':
 		*clr & cla
 		pcs_mood += 20
-		!pcs_willpwr += 20
 		minut += 60
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/staring.jpg"></center>'
@@ -385,7 +380,6 @@ if $ARGS[0] = 'Movies 2':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 20
-	!pcs_willpwr += 20
 	EndMovie = 1
 	minut += 5			
 	gs'stat'
@@ -625,7 +619,7 @@ if $ARGS[0] = 'Fedor Restroom':
 			'Fedor grabs you by your waist and flips you around then pushes you onto the sink as he pulls your shirt open exposing your breasts. You soon feel his <<dick>> centimeter Penis enter your vagina giving you jolt of stimulation as he begins to thrust his hips.'
 			gs 'arousal', 'vaginal', 5, 'sub'
 			
-			act 'lean against the sink':
+			act 'Lean against the sink':
 				*clr & cla
 				minut -= 5
 				gs'stat'
@@ -733,42 +727,6 @@ if $ARGS[0] = 'Restroom Lady':
 			gs 'arousal', 'foreplay_give', 5, 'lesbian', 'dom'
 			gs 'stat'					
 			
-			act 'Give her cuni':
-				*clr & cla
-				minut -= 5
-				gs'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady4.jpg"></center>'
-				'You slowly break off the kiss and then lightly push her down onto a nearby chair and get down on all fours and crawl to her in a catlike manner, trying to entertain her as you make your way to her pussy.' 
-				'When you arrive she reaches out for your head with her hand and lightly pets you as you bury your head in between her legs. You do your best to continue stimulating her, Never taking your tongue off her clitoris.'
-				gs 'arousal', 'cuni_give', 5, 'lesbian', 'dom'
-				gs 'stat'							
-				
-				act 'Continue':
-					*clr & cla
-					gs'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady5.jpg"></center>'
-					'You continue licking her as she leans further back trying to push her pussy further in your face but then slips off the chair, you do your best to catch her and then you both laugh as you help her back up.' 
-					'"I''m such a clutz. But let''s not let this stop us" She then waves you toward her and as you bury your face inbetween her legs. She lift her right leg over her head. You can''t help but think to yourself' 
-					'"She must be a cheerleader" as you continue licking her clit while enjoying the sight of her juices leaking down her leg.'
-					gs 'arousal', 'cuni_give', 5, 'lesbian', 'dom'
-					gs 'stat'	
-					
-					act 'Make her cum':
-						*clr & cla
-						gs'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady5.jpg"></center>'
-						'You start to pick up the pace and she begins moaning louder as you get her closer to her orgasm. You alternate between your tongue and finger to keep your tongue from getting tired and after a few minutes you can feel her body start to spasm and her legs begin to give out. You do your best to support her weight as you finish her off.' 
-						'After her body relaxes you lick her juices off both her legs and her pussy before holding her in your arms, kissing her passionately. After a minute you both help each other get dressed then the girl tells you "That was incredable! Thank you so much, That was exactly what I needed." as she moves in for one last kiss before leaving.'
-						*nl	
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/kiss2.jpg"></center>'
-						gs 'arousal', 'kiss', 5,'lesbian', 'dom'
-						gs 'arousal', 'end'
-						gs 'stat'							
-
-						act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
-					end								
-				end	
-			end
 			gs 'willpower', 'cuni', 'force'
 			if will_cost <= pcs_willpwr:
 				act 'Pull her head to your crotch (<<will_cost>> Willpower)':
@@ -812,6 +770,42 @@ if $ARGS[0] = 'Restroom Lady':
 			else
 				act 'Pull her head to your crotch (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
+			act 'Give her cuni':
+				*clr & cla
+				minut -= 5
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady4.jpg"></center>'
+				'You slowly break off the kiss and then lightly push her down onto a nearby chair and get down on all fours and crawl to her in a catlike manner, trying to entertain her as you make your way to her pussy.' 
+				'When you arrive she reaches out for your head with her hand and lightly pets you as you bury your head in between her legs. You do your best to continue stimulating her, Never taking your tongue off her clitoris.'
+				gs 'arousal', 'cuni_give', 5, 'lesbian', 'dom'
+				gs 'stat'							
+				
+				act 'Continue':
+					*clr & cla
+					gs'stat'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady5.jpg"></center>'
+					'You continue licking her as she leans further back trying to push her pussy further in your face but then slips off the chair, you do your best to catch her and then you both laugh as you help her back up.' 
+					'"I''m such a clutz. But let''s not let this stop us" She then waves you toward her and as you bury your face inbetween her legs. She lift her right leg over her head. You can''t help but think to yourself' 
+					'"She must be a cheerleader" as you continue licking her clit while enjoying the sight of her juices leaking down her leg.'
+					gs 'arousal', 'cuni_give', 5, 'lesbian', 'dom'
+					gs 'stat'	
+					
+					act 'Make her cum':
+						*clr & cla
+						gs'stat'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady5.jpg"></center>'
+						'You start to pick up the pace and she begins moaning louder as you get her closer to her orgasm. You alternate between your tongue and finger to keep your tongue from getting tired and after a few minutes you can feel her body start to spasm and her legs begin to give out. You do your best to support her weight as you finish her off.' 
+						'After her body relaxes you lick her juices off both her legs and her pussy before holding her in your arms, kissing her passionately. After a minute you both help each other get dressed then the girl tells you "That was incredable! Thank you so much, That was exactly what I needed." as she moves in for one last kiss before leaving.'
+						*nl	
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/kiss2.jpg"></center>'
+						gs 'arousal', 'kiss', 5,'lesbian', 'dom'
+						gs 'arousal', 'end'
+						gs 'stat'							
+
+						act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
+					end								
+				end	
+			end
 		end
 	end	
 	act 'Ignore her and wash up':gt 'FedorEv3', 'Restroom Wash 2'
@@ -904,6 +898,19 @@ if $ARGS[0] = 'Restroom Man 2':
 	gs 'arousal', 'foreplay', 5, 'sub', 'rough'					
 	gs 'stat'
 	
+	if will_cost <= pcs_willpwr:
+		act 'Splash water in his face (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'resist'
+			VK = rand(1,3)
+			if VK = 1 or (succubusflag = 1 and succublvl > 1):
+				gt 'FedorEv3', 'Restroom Escape'
+			else
+				gt 'FedorEv3', 'Restroom Rape'
+			end	
+		end	
+	else
+		act 'Splash water in his face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 	act 'Submit':
 		*clr & cla				
 		gs'stat'
@@ -948,19 +955,6 @@ if $ARGS[0] = 'Restroom Man 2':
 			end
 		end	
 	end
-	if will_cost <= pcs_willpwr:
-		act 'Splash water in his face (<<will_cost>> Willpower)':
-			gs 'willpower', 'pay', 'resist'
-			VK = rand(1,3)
-			if VK = 1 or (succubusflag = 1 and succublvl > 1):
-				gt 'FedorEv3', 'Restroom Escape'
-			else
-				gt 'FedorEv3', 'Restroom Rape'
-			end	
-		end	
-	else
-		act 'Splash water in his face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end
 end	
 
 if $ARGS[0] = 'Restroom Escape':
@@ -983,7 +977,6 @@ if $ARGS[0] = 'Restroom Rape':
 	menu_off = 1
 	pcs_health -= 10				
 	pcs_mood -= 20
-	!pcs_willpwr -= 5	
 	pain['tummy'] += 15
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/rape.jpg"></center>'
@@ -994,7 +987,6 @@ if $ARGS[0] = 'Restroom Rape':
 	act 'Plead':
 		*clr & cla
 		minut -= 5
-		!sub += 3
 		gs'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/rape1.mp4"></video></center>'
 		'You plead with the man but his only response is "Shut the fuck up! The only thing a whore like you is good for is a getting fucked, so spread your legs and keep quiet!"' 
@@ -1081,8 +1073,7 @@ if $ARGS[0] = 'Restroom Gang':
 				'You quickly push the door closed and hold it then the guys start slaming the door while the guy peeping yells to the others "Check this out guys. This girl is hot! I bet she came in here looking for a good fucking." the guys start hollering even louder as the guy continues to make vulgar comments about you. After a few seconds you feel them slaming even harder on the door when it finally gives in, swinging open. You see the men all staring into the stall with lustful looks on their faces.'
 			
 				act 'Plead with them':
-					*clr & cla 
-					!sub += 3
+					*clr & cla
 					gs'stat'	
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang2.jpg"></center>'
 					'"I didn''t mean to interrupt. Can I please go." One of the guys grins. "You can go...After we''re done with you." He then lunges into the stall and grabs you by the throat and whispers in your ear "I bet you came in here hoping to get caught, so that you can get a good fucking. Well we''ll give you a fucking you''ll never forget." he then pulls you out of the stall where the other guys are waiting with their cocks in their hand.'
@@ -1121,7 +1112,7 @@ if $ARGS[0] = 'Restroom Gang':
 								gs'stat'						
 									
 								act 'Continue':
-									*clr & cla 
+									*clr & cla
 									minut -= 10
 									gs'stat'
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang6.jpg"></center>'
@@ -1133,7 +1124,7 @@ if $ARGS[0] = 'Restroom Gang':
 									
 									gs 'willpower', 'cum_inside', 'resist', 'hard'
 									if will_cost <= pcs_willpwr:
-										act 'Eavesdrop (<<will_cost>> Willpower)':
+										act 'Beg them to pull out (<<will_cost>> Willpower)':
 											gs 'willpower', 'pay', 'resist'
 											*clr & cla
 											minut -= 15
@@ -1180,7 +1171,6 @@ if $ARGS[0] = 'Restroom Gang':
 									act 'Nod':
 										*clr & cla
 										minut -= 15
-										!sub += 5
 										gs'stat'
 										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/cum/cum2.jpg"></center>'
 										'You meekly nod yes and one of the guys says, "Alright boys, Lets fill this whore up." and one by one the guys begin to cum inside all of your' 
@@ -1380,7 +1370,6 @@ if $ARGS[0] = 'Movies 3':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 10
-	!pcs_willpwr += 10
 	minut += 5			
 	FedorRest = 0
 	WithFedor = 0

locations/FedorEv4.qsrc

@@ -460,7 +460,7 @@ if $ARGS[0] = '3way2':
 					'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal2.mp4"></video></center>'
 					'You turn to Ivan, letting Fedors dick slide out of your mouth but then extend your hand to jerk him off as you respond, "I want you both to fill me up."'
 					'Ivan grins. "Hell yeah <<$pcs_firstname>> I''ll fill you up real good." he then rapidly increases his pace and soon Ivan grabs your hips tightly as he pumps his load into your ass, doing his best to fill your ass to the brim with his seed. Soon after Fedor groans as he shoots his load down your throat which you swallow obediently, savoring every drop.'
-					'When they both finish with you, they begin chatting with each other. "<<$pcs_nickname>> is an great catch. You need to hold onto this one Fey."'
+					'When they both finish with you, they begin chatting with each other. "<<$pcs_nickname>> is a great catch. You need to hold onto this one Fey."'
 					'Fedor responds, "Don''t worry, I don''t plan on letting her go, She is my number one girl." as he gently rubs your ass.'
 					'Ivan gets dressed then leaves the room and Fedor turns to you "You''re a great girl. I hope you enjoyed yourself as much as we did."'
 					'You reply, "I had a wonderful time getting fucked by 2 strong men." Fedor smiles as he kisses you on your forhead before lifting you up and carrying you to the bathroom to get cleaned up.'
@@ -666,7 +666,7 @@ if $ARGS[0] = 'Snacks':
 	pcs_breath = 0
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/livingroom/munch1.jpg"></center>'
-	'You begin enjoyibg some strawberries and drinking soda as Fedor continues flipping through channels.'
+	'You begin enjoying some strawberries and drinking soda as Fedor continues flipping through channels.'
 
 	gs 'FedorEV4', 'movie_choice'
 end
@@ -950,7 +950,7 @@ if $ARGS[0] = 'Livingroom 2':
 			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/livingroom/sex/sofa6.mp4"></video></center>'
-			'You finally open your eyes to see Fedor panting as he holds you, noticing that Fedor is starting to tire, you whisper in his ear "You can put me down now. I wouldn''t want my man to get weary before I have the change to drain his balls of it''s precious nectar." Fedor chuckles as he lowers you to the ground but doesn''t stop kissing and caressing you. You get down on your knees to finish him off but it seems that he has other plans when he lightly pushes you to the ground in a playful manner. Fedor inserts his dick back inside you as you spread your legs to give him easier access. Fedor continues fucking you as he whispers in your ear "I''m about to empty my balls. Where would you like it?"'
+			'You finally open your eyes to see Fedor panting as he holds you, noticing that Fedor is starting to tire, you whisper in his ear "You can put me down now. I wouldn''t want my man to get weary before I have the change to drain his balls of their precious nectar." Fedor chuckles as he lowers you to the ground but doesn''t stop kissing and caressing you. You get down on your knees to finish him off but it seems that he has other plans when he lightly pushes you to the ground in a playful manner. Fedor inserts his dick back inside you as you spread your legs to give him easier access. Fedor continues fucking you as he whispers in your ear "I''m about to empty my balls. Where would you like it?"'
 			gs 'arousal', 'vaginal', 5, 'dom'
 			gs'stat'
 
@@ -2065,7 +2065,7 @@ if $ARGS[0] = 'Bedroom 2':
 				*clr & cla
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vag2.mp4"></video></center>'
 				'Fedor nods as he continues fucking you at an increased pace and soon pulls out of you and begins jerking his penis over your stomach, covering you in his cum. The warmth of his cum covers both your stomach and chest which greatly excites you. After Fedor finishes he looks down at you and says, "You''re amazing as always <<$pcs_firstname>>, The best fuck a man could ask for."'
-				'You look up at him and reply, "I could say about you, my love." Fedor gives you a passionate kiss before getting dressed and leaving the room.'
+				'You look up at him and reply, "I could say the same about you, my love." Fedor gives you a passionate kiss before getting dressed and leaving the room.'
 				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vagcum.mp4"></video></center>'
 				gs 'cum_call', 'stomach', $boy, 1
@@ -3062,24 +3062,24 @@ if $ARGS[0] = 'Regina Chat':
 	elseif cumloc[11] = 1 and ReginaKozQW = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and ReginaKozQW = 1:
 		'Regina gives you a blank stare. "I won''t pry into your love life but could you do me a favor and clean yourself up afterward?"'
 	end
-	if pcs_health < 100:
+	if pcs_health < healthmax:
 		'Regina looks at you and gasps. "Ohh no sweety, you''re hurt. Let me take a look at you."'
 	end
 
 	act 'Walk away':gt 'FedorEv4', 'Kitchen'
 	
-	if pcs_health < 100 and money >= 20:act 'Let Regina help you':gt 'FedorEv4', 'Check up'
+	if pcs_health < healthmax and money >= 20: act 'Let Regina help you':gt 'FedorEv4', 'Check up'
 
 	if ReginaIntro = 0:
-		act 'Introduce yourself':gt 'FedorEv4', 'Regina Intro'
+		act 'Introduce yourself': gt 'FedorEv4', 'Regina Intro'
 	else
 		act 'Chat':gt 'FedorEv4', 'Regina Chat 2'
 	end
 
-	if FedorShelter = 1:act 'Ask about moving in':gt 'FedorEv4', 'Fedor Shelter 2'
+	if FedorShelter = 1:act 'Ask about moving in': gt 'FedorEv4', 'Fedor Shelter 2'
 
 	if ReginaIntro = 1 and ReginaKoz_Daystart ! daystart:
-		act 'May I join you for dinner?':gt 'FedorEv4', 'Dinner 1'
+		act 'May I join you for dinner?': gt 'FedorEv4', 'Dinner 1'
 	end	
 end
 
@@ -3149,7 +3149,7 @@ end
 if $ARGS[0] = 'Check up':
 	*clr & cla
 	menu_off = 1
-	if pcs_health < 100:pcs_health = 150
+	if pcs_health < healthmax: pcs_health = healthmax
 	money -= 20
 	minut += 15
 	gs'stat'
@@ -3299,7 +3299,7 @@ if $ARGS[0] = 'Fedor Bedroom':
 	end
 
 	if FedorLove = 1:
-		act 'Discuss taking relationhip to next level':gt 'FedorEv4', 'Future'
+		act 'Discuss taking your relationship to the next level':gt 'FedorEv4', 'Future'
 	end
 	if hour >= 21:
 		act 'Spend the night':gt 'bed2'

locations/FedorMisc.qsrc

@@ -120,16 +120,16 @@ if $ARGS[0] = 'Fedor Chat 2':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/school/hall/fedor.jpg"></center>'
 	'You approach Fedor and ask "How about we spend some alone time together?" Fedor gives you a playful smile as he wraps his arm around your neck, he then leads you to the hallway near the back of the school. Fedor rests against a nearby window and asks "So, what would you like to do today?"'
 
-	gs 'willpower', 'sex', 'self'
+	gs 'willpower', 'sex', 'self', 'easy'
 	if will_cost <= pcs_willpwr:
-		act 'Wanna fool around in the locker room? (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self' & gs 'willpower', 'pay', 'self' & gt 'FedorMisc', 'Locker Room'
+		act 'Wanna fool around in the locker room? (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'FedorMisc', 'Locker Room'
 	else
 		act 'Wanna fool around in the locker room? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 
-	gs 'willpower', 'sex', 'self', 'hard'
+	gs 'willpower', 'sex', 'self'
 	if will_cost <= pcs_willpwr:
-		act 'Begin caressing Fedor (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self', 'hard' & gs 'willpower', 'pay', 'self' & gt 'FedorMisc', 'Hall'
+		act 'Begin caressing Fedor (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self' & gs 'willpower', 'pay', 'self' & gt 'FedorMisc', 'Hall'
 	else
 		act 'Begin caressing Fedor (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end

locations/Gaddvor.qsrc

@@ -67,7 +67,7 @@ if $ARGS[0]='':
 
 
 	if StoryLine = 1:
-		act 'Enter your grandparents'' house':minut += 1 & gt 'Gadhouse'
+		act 'Enter your grandparents'' house':minut += 1 & gt 'gadhouse', 'start'
 		act 'Enter the banya':minut += 1 & gt 'Gadbana'
 	end
 

locations/Gadhouse.qsrc

@@ -1,9 +1,9 @@
 # Gadhouse
 
-if $ARGS[0]='' or $ARGS[0] = 'Start':
+if $ARGS[0] = 'start':
 	CLOSE ALL
 	$location_type = 'indoors'
-	$metka = ''
+	$metka = 'start'
 	$loc = 'Gadhouse'
 	$menu_loc = 'Gadhouse'
 	$menu_arg = ''
@@ -41,7 +41,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 			grandmahelp = 0
 			gs 'stat'
 		end
-		act 'Further': gt 'Gadhouse', 'Start'
+		act 'Further': gt 'gadhouse', 'start'
 
 	elseif go_in_boletus = 1 and boletus >= grandpa_boletus and hour >= 6 and hour < 22:
 		*clr & cla
@@ -59,7 +59,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		'"There''s no need <<$pcs_nickname>>." - said your grandpa. "But if I need some help, I''ll be sure to let you know."'
 		'You kiss your grandfather on the cheek and get on with your day.'
 
-		act 'Further': grandpa_boletus = 0 & gt 'Gadhouse', 'Start'
+		act 'Further': grandpa_boletus = 0 & gt 'gadhouse', 'start'
 
 	elseif go_in_boletus_bilberry = 1 and boletus >= grandpa_boletus and bilberry >= grandpa_bilberry and hour >= 6 and hour < 22:
 		*clr & cla
@@ -78,7 +78,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		'"You don''t need to do that <<$pcs_nickname>>," your grandpa said. "But I''ll be sure to let you know if something comes up."'
 		'You give your grandpa a smooch on the cheek and go on with your day.'
 
-		act 'Further': grandpa_boletus = 0 & grandpa_bilberry = 0 & gt 'Gadhouse', 'Start'
+		act 'Further': grandpa_boletus = 0 & grandpa_bilberry = 0 & gt 'gadhouse', 'start'
 
 	elseif go_in_bilberry = 1 and bilberry >= grandpa_bilberry and hour >= 6 and hour < 22:
 		*clr & cla
@@ -96,7 +96,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		'"There''s no need <<$pcs_nickname>>," your grandpa said. "But if your grandma need some more berries, I''ll let you know."'
 		'You kiss your grandfather on the cheek, you go on with your business.'
 
-		act 'Further': grandpa_bilberry = 0 & gt 'Gadhouse', 'Start'
+		act 'Further': grandpa_bilberry = 0 & gt 'gadhouse', 'start'
 
 	elseif mira_temp = 1 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 0 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or miragopQW >= 10 or mirasex > 1):
 		*clr & cla
@@ -109,7 +109,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		'You notice Mira coming towards your grandparents home.'
 		'You step out on the porch and greet Mira. She replies "Hi <<$pcs_nickname>>, I was really bored being all alone at home. Do you want to do something?"'
 
-		act 'Further':gt'Gadhouse', 'Start'
+		act 'Further':gt 'gadhouse', 'start'
 
 	else
 		gt 'Gadhouse', 'Main'
@@ -295,7 +295,7 @@ if $ARGS[0] = 'grandma':
 		'Grandma looks a little shocked but its nothing she hasn''t seen before.'
 		'"Go put some clothes on dear, you''ll give your poor grandpa a heart attack if he sees you."'
 
-		act 'Maybe you should get dressed before talking to her':gt 'Gadhouse', 'Start'
+		act 'Maybe you should get dressed before talking to her':gt 'gadhouse', 'start'
 	else
 		if grigory_flower > 0 and grigory_flower < 10: act 'Talk to her about the flowers': gt 'grigory', 'flower4'
 		
@@ -321,7 +321,7 @@ if $ARGS[0] = 'grandma':
 				'"If you like running, you can take a run on the road leading into the forest. Or you can take a ride on our old bike. I''m pretty sure the bike is in the shed. Make sure to look for it if you''re interested. And if you want to watch your figure, then go to the garden, have some fruit, it''s as healthy as the diet meals you''re eating, if not more healthier."'
 				'"That''s about it my dear granddaughter. Now run along, don''t bother me anymore. My soap opera "Santa Barbara" is about to begin, I don''t want to miss a second of it."'
 
-				act 'Finish':gt 'Gadhouse', 'Start'
+				act 'Finish':gt 'gadhouse', 'start'
 			end
 		end
 		!125e
@@ -337,7 +337,7 @@ if $ARGS[0] = 'grandma':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandma.jpg"></center>'
 				'You spend some time talking with your grandmother. She''s sometimes difficult to understand. Her nearly toothless mouth makes the pronunciation of words difficult for her. Most of what she says boils down to the same thing, life is much more fun when you''re young!'
 
-				act 'Continue':gt 'Gadhouse', 'Start'
+				act 'Continue':gt 'gadhouse', 'start'
 			end
 		end
 
@@ -404,11 +404,11 @@ if $ARGS[0] = 'grandma':
 					'"Ever since that day the fear I experienced never disappeared, as I''ve felt it through my whole life. I’ll carry on this fear for the remaining days of my life…"'
 				end
 				!125e
-				act 'You thank your grandmother for the story':gt 'Gadhouse', 'Start'
+				act 'You thank your grandmother for the story':gt 'gadhouse', 'start'
 			end
 		end
 
-		act 'Leave her alone':gt 'Gadhouse', 'Start'
+		act 'Leave her alone':gt 'gadhouse', 'start'
 	end
 end
 
@@ -425,7 +425,7 @@ if $ARGS[0]='grandpa':
 		'Grandpa looks shocked but it doesn''t stop him from having a good look at you.'
 		'"My God <<$pcs_nickname>>! Are you trying to give me a heart attack? Go and put some clothes on!"'
 
-		act 'Maybe you should get dressed before talking to him':gt 'Gadhouse', 'Start'
+		act 'Maybe you should get dressed before talking to him':gt 'gadhouse', 'start'
 	else
 		if grigory_flower > 0 and grigory_flower < 10: act 'Talk to him about the flowers': gt 'grigory', 'flower3'
 		
@@ -437,7 +437,7 @@ if $ARGS[0]='grandpa':
 			'You promise to bring grandpa <<grandpa_boletus>> kg mushrooms and <<grandpa_bilberry>> kg of berries.'
 		end
 
-		act 'Leave him alone':gt 'Gadhouse', 'Start'
+		act 'Leave him alone':gt 'gadhouse', 'start'
 		
 		if grandpahelpday ! daystart:act 'Offer to help':grandpahelpday = daystart & gt'grandpahelp', 'start'
 		if grandpatalkforest = 0:
@@ -455,7 +455,7 @@ if $ARGS[0]='grandpa':
 				'"There''s one more thing... While you''re in the woods, avoid dressing yourself up in fancy clothes. You might damage them. It''s better to dress in more comfortable clothes instead..."'
 				'"Well, I think that''s everything <<$pcs_nickname>>, run along now, and remember what I''ve told you."'
 
-				act 'Finish':gt 'Gadhouse', 'Start'
+				act 'Finish':gt 'gadhouse', 'start'
 			end
 		end
 		
@@ -471,7 +471,7 @@ if $ARGS[0]='grandpa':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
 				'Your grandfather stops complaining and smiles at you, he loves telling stories. He has lived a rich and eventful life, and you enjoy listening to his stories and talking to him. He mostly reminisces about his past, and reflects on his earlier life.'
 
-				act 'Continue':gt 'Gadhouse', 'Start'
+				act 'Continue':gt 'gadhouse', 'start'
 			end
 		end
 	end
@@ -495,7 +495,7 @@ if $ARGS[0]='villagecat':
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/villcat1.jpg"></center>'
 		'You gently pet Boniface, giving him a good scratch behind the ears. You hear him start to purr. As soon as you stop scratching him, the purring stops too. That lazy bastard... he''s living the good life!'
 
-		act 'Continue':minut += 2 & gt 'Gadhouse', 'Start'
+		act 'Continue':minut += 2 & gt 'gadhouse', 'start'
 	end
 
 	if feedcat = 1:
@@ -506,7 +506,7 @@ if $ARGS[0]='villagecat':
 			feedcat = 2
 			'<center><video autoplay loop src="images/locations/gadukino/grandparents/feedboniface.mp4"></video></center>'
 			'When Boniface sees you moving towards the cupboard, he jumps down off of the table and runs to his food dish. It is obvious that he feels that you are moving far too slowly and rattles his bowl to make sure you understand that he is starving while you dawdle.'
-			act 'Continue': gt 'Gadhouse', 'Start'
+			act 'Continue': gt 'gadhouse', 'start'
 		end
 	end
 
@@ -517,18 +517,18 @@ if $ARGS[0]='villagecat':
 				minut += 10
 				gs 'stat'
 				'You open the door for Boniface who saunters around you only to stop in the doorway as he becomes aware that it is raining out. He glares up at you as if the rain was your fault. He stares out into the wet for another moment then sedately turns around and goes back to his box.'
-				act 'Continue': gt 'Gadhouse', 'Start'
+				act 'Continue': gt 'gadhouse', 'start'
 			else
 				*clr & cla
 				minut +=10
 				gs 'stat'
 				catout = 2
 				'You open the door for Boniface who saunters around you only to stop in the doorway as he stops to consider if he really wants to go outside. After considering all the pros and cons, he finally decides to go out.'
-				act 'Continue': gt 'Gadhouse', 'Start'
+				act 'Continue': gt 'gadhouse', 'start'
 			end
 		end
 	end
-	act 'Leave Boniface alone':minut += 2 & gt 'Gadhouse', 'Start'
+	act 'Leave Boniface alone':minut += 2 & gt 'gadhouse', 'start'
 end
 
 if $ARGS[0] = 'intro':

locations/Gnpc2.qsrc

@@ -459,8 +459,7 @@ $din_gboy_go_to_disco = {
 					gs 'stat'
 					'You head to the bar and <<$boydesc>> orders your drinks. When you finally get them you move to the outdoor area and find a secluded place to enjoy your drinks.'
 					
-					! TODO: update to something more appropriate, like 'kiss', if it ever gets included
-					gs 'willpower', 'sex', 'self', 'easy'
+					gs 'willpower', 'kiss', 'self'
 					if will_cost <= pcs_willpwr:
 						act 'Kiss (<<will_cost>> Willpower)':
 							cls
@@ -1097,12 +1096,11 @@ $din_gboy_knee = {
 	end
 
 	if pcs_horny >= 75:
-		! TODO: update to something more appropriate, like 'kiss', if it ever gets included
-		gs 'willpower', 'sex', 'self', 'easy'
+		gs 'willpower', 'kiss', 'self'
 		if will_cost <= pcs_willpwr:
 			act 'Kiss him (<<will_cost>> Willpower)':
 				cls
-				gs 'willpower', 'sex', 'self', 'easy'
+				gs 'willpower', 'kiss', 'self'
 				gs 'willpower', 'pay', 'self'
 				gs 'arousal', 'kiss', 5
 				kissBoyFrend[numnpc] += 1

locations/Gnpc_cinema.qsrc

@@ -24,7 +24,7 @@ act 'Watch the movie':
 	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
 		'You have been watching a movie and suddenly felt a hand on my knee Man.'
 
-		gs 'willpower', 'misc', 'self', 'hard'
+		gs 'willpower', 'sex_other', 'self', 'easy'
 		if will_cost <= pcs_willpwr:
 			act 'Remove his hands (<<will_cost>> Willpower)':
 				cls

locations/HotelHole.qsrc

@@ -33,7 +33,7 @@ end
 
 if hour = 0 and $prevloc = 'HotelRoom':
 	if resepseen = 1:
-	hotresepQW = 3
+		hotresepQW = 3
 		*clr & cla
 		observ_exp += 3
 		gs 'stat'
@@ -202,12 +202,20 @@ if $ARGS[0] = 'Pavlin' :
 				act 'Finish':gt 'HotelHole','Pavlin'
 			end
 		else
-			act 'Stop taking female customers':
-				cla
-				pavprosnofemales = 0
-				'"<<$npc_nickname[''A217'']>> I wanted to talk to you about... I want to stop taking on female customers."'
-				'"Fine, if you really don''t want to do it I''ll only get you male customers."'
-				act 'Finish':gt 'HotelHole','Pavlin'
+			gs 'willpower', 'prostitution', 'self', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Stop taking female customers (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'prostitution', 'self', 'hard'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					pavprosnofemales = 0
+					'"<<$npc_nickname[''A217'']>> I wanted to talk to you about... I want to stop taking on female customers."'
+					'"Fine, if you really don''t want to do it I''ll only get you male customers."'
+					act 'Finish':gt 'HotelHole','Pavlin'
+				end
+			else
+				act 'Stop taking female customers (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 	end
@@ -266,61 +274,6 @@ if $ARGS[0] = 'Pavlin' :
 				act 'Finish':gt 'HotelHole','Pavlin'
 		end
 	end
-	if npc_rel['A217'] > 29 and proshotelday ! daystart and ClownQW ! 1:
-		act 'The circus is in town':
-			*clr & cla
-			minut += 1
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-			'<<$pcs_firstname>>, have you heard, the circus is in town.'
-			'You look at <<$npc_nickname[''A217'']>> with a surprised look. "I didn''t know you were a fan of the circus. You want to go see a show or something?"'
-			'What? No, don''t be silly girl. A circus here means at least 50 guys in town who are looking for a good time after the shows.'
-			'And sometimes even between the shows. he laughed.'
-			'I actually have 2 performers waiting on a girl right now. I called a girl but she is still 10 minutes out. They are getting restless because they need to start their next show soon. Do you think you can take them?'
-			act 'No thanks':
-				cla
-				*nl
-				'"No, thanks. I''ll just take a regular customer today"'
-				'"No problem, one regular john, coming right up. You can go ahead to the usual room."'
-				act 'Perform your duty':gt 'hotel_resep', 'pavgenpros'
-			end
-			act 'Sure, sounds like fun':
-				cla
-				*nl
-				'"Ok, you can go ahead to room 312. They are expecting you"'
-				'<<$npc_nickname[''A217'']>> gives you the key for the hotel room.'
-				act 'Go to room 312':gt 'HotelHole','clown'
-			end
-		end
-	end
-	if npc_rel['A217'] > 19 and proshotelday ! daystart and storyline = 1 and TwinQW ! 3:
-		act 'Fake Twins':
-			*clr & cla
-			minut += 1
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-			'"<<$pcs_firstname>>, I got a guy who is willing to pay a LOT of money for a threesome with a set of twins. Do you happen to know a pair of twins who''d be down to make some quick cash?" <<$npc_nickname[''A217'']>> asks, looking hopeful.'
-			'You think for a moment before responding. "No I don''t. However, a lot of people say my sister and I look alike. Maybe if I wear my hair like hers and we put on enough make up we could pass as twins."'
-			'"That''s a great idea! Do you think she would be willing to do this?" <<$npc_nickname[''A217'']>> asks, suddenly very excited at the prospect.'
-			if sisterLesb < 2:
-				'"What? No, I was just saying we look alike, I wouldn''t dare propose an idea like this to her."'
-				'"THEN WHY BRING HER UP, YOU STUPID CUNT?" <<$npc_nickname[''A217'']>>''s excitement quickly dissolves to rage as he raises his hand up, ready to strike.'
-				'You brace for the hit, closing your eyes tightly. The slap never comes however, and you open your eyes to see <<$npc_nickname[''A217'']>> has backed off. You''re confused at first, but notice that the people in the lobby are looking at the two of your after his little outburst.'
-				'You quickly stand up and leave him be.'
-				*nl
-				'You probably shouldn''t bring up this topic anymore... unless you have a more positive response to this request.'
-				TwinJourQW = 1
-				act 'Back to lobby': gt 'HotelHole'
-			elseif sisterLesb => 2:
-				'You feel a tingling in your loins just thinking about your sister and, without thinking, you blurt out: "Of course she will!"'
-				'"That''s fantastic <<$pcs_firstname>>, Once you are ready bring her over and I''ll introduce you to the client."'
-				'Realizing the commitment you just made, worry begins to seep into you. You hope your sister is really up for it, because you fear how <<$npc_nickname[''A217'']>> will react if you can''t deliver.'
-				TwinQW = 1
-				TwinJourQW = 2
-				act 'Back to lobby': gt 'HotelHole'
-			end
-		end
-	end
 	if pavlevent = 1 and pavldaystart2 ! daystart :
 		act 'Discuss the beating':
 			*clr & cla
@@ -375,8 +328,63 @@ if $ARGS[0] = 'Pavlin' :
 			act 'Move away':gt'HotelHole','skip_resepevent'
 		end
 	end
+	if npc_rel['A217'] > 19 and proshotelday ! daystart and storyline = 1 and TwinQW ! 3:
+		act 'Fake Twins Request':
+			*clr & cla
+			minut += 1
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
+			'"<<$pcs_firstname>>, I got a guy who is willing to pay a LOT of money for a threesome with a set of twins. Do you happen to know a pair of twins who''d be down to make some quick cash?" <<$npc_nickname[''A217'']>> asks, looking hopeful.'
+			'You think for a moment before responding. "No I don''t. However, a lot of people say my sister and I look alike. Maybe if I wear my hair like hers and we put on enough make up we could pass as twins."'
+			'"That''s a great idea! Do you think she would be willing to do this?" <<$npc_nickname[''A217'']>> asks, suddenly very excited at the prospect.'
+			if sisterLesb < 2:
+				'"What? No, I was just saying we look alike, I wouldn''t dare propose an idea like this to her."'
+				'"THEN WHY BRING HER UP, YOU STUPID CUNT?" <<$npc_nickname[''A217'']>>''s excitement quickly dissolves to rage as he raises his hand up, ready to strike.'
+				'You brace for the hit, closing your eyes tightly. The slap never comes however, and you open your eyes to see <<$npc_nickname[''A217'']>> has backed off. You''re confused at first, but notice that the people in the lobby are looking at the two of your after his little outburst.'
+				'You quickly stand up and leave him be.'
+				*nl
+				'You probably shouldn''t bring up this topic anymore... unless you have a more positive response to this request.'
+				TwinJourQW = 1
+				act 'Back to lobby': gt 'HotelHole'
+			elseif sisterLesb => 2:
+				'You feel a tingling in your loins just thinking about your sister and, without thinking, you blurt out: "Of course she will!"'
+				'"That''s fantastic <<$pcs_firstname>>, Once you are ready bring her over and I''ll introduce you to the client."'
+				'Realizing the commitment you just made, worry begins to seep into you. You hope your sister is really up for it, because you fear how <<$npc_nickname[''A217'']>> will react if you can''t deliver.'
+				TwinQW = 1
+				TwinJourQW = 2
+				act 'Back to lobby': gt 'HotelHole'
+			end
+		end
+	end
+	if npc_rel['A217'] > 29 and proshotelday ! daystart and ClownQW ! 1:
+		act 'Circus Request':
+			*clr & cla
+			minut += 1
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
+			'<<$pcs_firstname>>, have you heard, the circus is in town.'
+			'You look at <<$npc_nickname[''A217'']>> with a surprised look. "I didn''t know you were a fan of the circus. You want to go see a show or something?"'
+			'What? No, don''t be silly girl. A circus here means at least 50 guys in town who are looking for a good time after the shows.'
+			'And sometimes even between the shows. he laughed.'
+			'I actually have 2 performers waiting on a girl right now. I called a girl but she is still 10 minutes out. They are getting restless because they need to start their next show soon. Do you think you can take them?'
+			act 'No thanks':
+				cla
+				*nl
+				'"No, thanks. I''ll just take a regular customer today"'
+				'"No problem, one regular john, coming right up. You can go ahead to the usual room."'
+				act 'Perform your duty':gt 'hotel_resep', 'pavgenpros'
+			end
+			act 'Sure, sounds like fun':
+				cla
+				*nl
+				'"Ok, you can go ahead to room 312. They are expecting you"'
+				'<<$npc_nickname[''A217'']>> gives you the key for the hotel room.'
+				act 'Go to room 312':gt 'HotelHole','clown'
+			end
+		end
+	end
 	if npc_rel['A217'] > 39 and proshotelday ! daystart and preghumdone ! 1:
-		act 'Special Request':
+		act 'Pregnant Request':
 			*clr & cla
 			minut += 1
 			gs 'stat'
@@ -394,14 +402,12 @@ if $ARGS[0] = 'Pavlin' :
 					'"Fucking degenerates, right? But he''s offering a boatload of cash! Are you really up for it?"'
 				end
 				act '"Of course I am, for the right price..."': gt 'HotelHole','PregBDSM'
-			end
-			if knowpreg = 1 and pregchem < 3600:
+			elseif knowpreg = 1 and pregchem < 3600:
 				cla
 				'"Actually I am pregnant but unfortunately not really showing yet."'
 				'"That''s great, Once you are showing come to me again and I''ll introduce you."'
 				act 'Ok': gt 'HotelHole','Pavlin'
-			end
-			if knowpreg = 0:
+			elseif knowpreg = 0:
 				cla
 				'<<$npc_nickname[''A217'']>> looks at your body and you know what he is thinking.'
 				'"Yeah that''s definitly tough, good luck with that." You say before quickly leaving.'
@@ -411,366 +417,61 @@ if $ARGS[0] = 'Pavlin' :
 	end
 end
 
-if $ARGS[0] = 'PregBDSM' :
+if $ARGS[0] = 'Twins' :
 	*clr & cla
-	minut +=10
-	gs 'npcgeneratec', 0
-	gs 'boyStat', $npclastgenerated
+	minut += 20
 	gs 'stat'
-	'"That shouldn''t be a problem. With what he''s willing to pay, you''ll be able to put that kid of yours through college."'
-	'<<$npc_nickname[''A217'']>> steps away to make the call and, 10 minutes later, the customer shows up.'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
+	'"Hi <<$npc_nickname[''A217'']>>, this is my sister, Anya."'
+	'<<$npc_nickname[''A217'']>> looks at the two of you from top to bottom with analytical eyes. Finally, he cracks a smile and starts laughing.'
+	'"Well, well, you weren''t kidding. You two look exactly alike. OK, let me call the client."'
+	'He steps away to make a quick phone call. You turn and smile at your sister, excitedly. Anya smiles back, but her grins seems forced and you can tell that she''s nervous. "Lighten up, sis. We''re just gonna go get dicked down and we''ll walk away paid. It''ll be fun!" You say, trying to reassure her while praying that she won''t back out. You hate to think how <<$npc_firstname[''A217'']>> would react if you cancelled at this stage.'
+	'Anya''s smile becomes more genuine seeing your excitement. "Yeah, I know. I''m just a little nervous, but I''ll be fine. I promise." You sigh with relief.'
 	*nl
-	'He introduces himself as <<$boydesc>> "Very nice <<$npc_nickname[''A217'']>>. This is exactly what I was looking for." He says while hungrily eyeing your pregnant body.'
-	'<<$npc_nickname[''A217'']>> and <<$boydesc>> have a short discussion about your price.'
+	'<<$npc_nickname[''A217'']>> returns and ushers you both to his car.'
 	*nl
-	'<<$npc_nickname[''A217'']>> goes over to the desk girl and comes back with a key." We have full access to the hotel basement for the next 2 hours, so let''s get on with it."'
-	act 'To the Basement':
+	'He drives you to a nice house at the outskirts of town.'
+	act 'Go meet the client':
 		*clr & cla
-		gs 'arousal', 'foreplay', 5, 'rough','sub','humiliation'
-		gs 'pain', 3, 'back', 'spank'
-		gs 'pain', 3, 'breasts', 'spank'
-		gs 'pain', 3, 'nipples', 'spank'
+		gs 'npcgeneratec', 0
+		gs 'boyStat', $npclastgenerated
+		'<<$npc_nickname[''A217'']>> drops you off and tells you he will come back to pick you up in 1 hour.'
+		'You walk hand-in-hand with your sister to the door, practically dragging her alongside you, before ringing the bell.'
+		'You can see your sister is still very nervous, so you give her a little peck on the cheek and tell her, "Don''t worry, everything is going to be fine. I''ll try to keep his attention mostly on me, if you''re scared."'
+		'Before Anya can respond a man opens the door and invites you in.'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins1.jpg"></center>'
+		'The client introduces himself as <<$boydesc>> and invites you to sit on the couch.'
+		'"So girls, tell me a little about yourselves." He says with a lecherous smile as he undresses you with his eyes.'
+		'You lie to the man and tell him you are two 19-year old college students who do this kind of work to pay for your education.'
+		'The man grunts and nods, but is obviously not interested in your story. He starts rubbing you and your sister''s legs as soon as you begin talking, his thick fingers creeping up a little further each time.'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins2.jpg"></center>'
+		'Suddenly, he grabs your sister by the legs and spreads them wide. Anya shoots you a look of panic as she is sprawled out on the couch.'
+		'Before you can react, however, the customer buries his head between your sister''s legs and starts licking her tight little snatch after pulling her panties to the side with his teeth.'
+		'Anya immediately starts moaning loudly, caught off-guard and aroused by the sudden violation.'
+		'The sight of your sister getting off on <<$boydesc>>''s skilled tongue brings a tingling to your loins, and in no time you feel your pussy dripping.'
+		gs 'arousal','voyeur_sex',5,'prostitution'
 		gs 'stat'
-		'When the three of you arrive in the basement <<$npc_nickname[''A217'']>> goes and sits himself on a stool in the corner of the room while the man takes you to a table in the center.'
-		*nl
-		'He hands you a set of leather wrist cuffs, a matching collar, and a pair of heels.'
-		'"Undress and wear these." the man says, curtly.'
-		'While you are busy undressing and equipping your new accessories, he lays out a series of whips and crops. He turns to you and, with a happy grin, says "Please, choose one for us to enjoy."'
-		'"<<$pitfs>>Ok, this might be a little heavier than I expected.<<$pitfe>> "You think, beginning to second guess your decision.'
-		'You look at <<$npc_nickname[''A217'']>> with pleading eyes, but receive no sympathy in return. You realize it''s too late to back out now. You examine the foreign whips and choose the one you think would be the least painful; a thin one that appears light in weight, figuring that the heavier ones would cause much more pain.'
-		*nl
-		'<<$boydesc>> approaches you and starts caressing your swollen belly and breasts.'
-		*nl
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm1.jpg"></center>'
-		*nl
-		'Suddenly he takes your arms and attaches your leather bracelets to a chain hanging above your head.'
-		'"<<$pitfs>>Wait a minute, no one said anything about being tied up.<<$pitfe>>" You think as panic begins to creep into your mind.'
-		'Without warning you feel the whip lash across your back.'
-		'.....WHOOSH....'
-		'"<<$pitfs>>AAARGH!<<$pitfe>>" Your mind reels.'
-		'You clench your teeth and take it.'
-		'Then another strike lands.'
-		'.....WHISHP....'
-		'"<<$pitfs>>Fuck this hurts, but I can''t let it show!<<$pitfe>>" Again you refuse to scream out, not wanting to give your torturer the satisfaction.'
-		'But then...'
-		'.....WHOOSH....'
-		'.....WHAP....'
-		'The whip snaps across each breast before you see it coming.'
-		'You finally scream out involuntarily, the unexpected spike in pain proving too much to ignore.'
-		'"<<$pitfs>>Damn it, I shouldn''t show any weakness! Who knows how far he will take this!<<$pitfe>>" You admonish yourself, but it is too late.'
-		'"Well, well, it looks like the little bitch can feel pain after all." The cruel pervert says, a smile plastered across his vile face.'
-		'.....WHIP....'
-		'.....SNAP....'
-		'Two more hits slice sharply across your sensitive nipples, eliciting one big scream after another.'
-		'The torment continues for what feels like an eternity. The client alternates randomly between striking yours breasts, back, and buttocks. But the worst by far is when he zeroes in on your quivering pussy. As the instrument slaps viciously across your labia you scream and beg, tears streaming down your tortured face, mascara straining your cheeks. When the whip lands directly on your clit you feel like passing out and vomiting at the same time, your stomach twisting in agony.'
-		*nl
-		'The horrible man finally steps away. "Ok, whore, enough screaming." You look at the man with pathetic, pleading eyes. You can feel heat radiating from every lash, every point of impact burns relentlessly.'
-		'"Lets''s use that little mouth of yours for something even more fun." He says, unbuttoning his pants and exposing his rock hard member.'
 		act 'Continue':
 			*clr & cla
-			gs 'arousal', 'bj', 30, 'rough','sub','humiliation'
-			gs 'arousal','end'
-			gs 'stat'
-			if pcs_dom => 5:
-				pcs_dom -5
-			else
-				sub = sub + 5 - pcs_dom
-				pcs_dom = 0
-			end
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm2.jpg"></center>'
-			'<<$boydesc>> releases your cuffs from the chain and you immediately collapse onto your knees, the forced suspension being the only thing keeping you standing. He takes his <<dick>> cm dick and pushes it against your lips.'
-			'"Now start working, you fat cow!" He demands.'
-			'You open your mouth, slide your lips over the cock and start sucking halfheartedly, exhausted from your previous predicament, but thankful to be doing something you''re more familiar with.'
-			'"You will have to do better than that you worthless whore!"'
-			'He spits in your face and slaps your cheek, the sound echoing through the deserted basement.'
-			'"<<$pitfs>>Motherfucker, If I could I would slap the shit out of you! No, I have to stay strong and think about the money for my child.<<$pitfe>>"'
-			'You notice the whip still clutched in his hand and start sucking with all your skill, praying he doesn''t decide to use it again. Thoughts of your unborn child and the situation you are in creep into your mind as you pleasure your captor. The tears well up in your eyes once more.'
-			*nl
-			'"Well, well, it looks like our fat bitch is not happy here. I know how to remedy that, let''s take a little walk."'
-			'<<$boydesc>> pulls his slathered cock from your mouth and attaches a chain to your collar. He steps away and tugs the leash hard, the force pulling you onto your hands and knees.'
-			'You have no choice but to follow him around on all fours. Your heavy baby-belly sways as you crawl across the dirty cement floor, feeling more degraded by the step.'
-			'"See my little doggy, isn''t this better? Knowing your place in the world?"'
-			'"<<$pitfs>>Fuck you, just give me your dick and stop this humiliation<<$pitfe>>." Your mind screams defiantly.'
-			'...WHAP...'
-			'The whip snaps across your sore ass was once more and you cry out.'
-			'"I asked you a question, slut!" The man bellows.'
-			'"Yes sir, much better!" you say obediently, wiping away a tear.'
-			'Your new master marches you around in circles for a few minutes, laughing as you attempt to keep up with his pace.'
-			*nl
-			'"Now, use this" He pushes a small metal bowl towards you with his foot.'
-			'You look up at him confused. The bowl is empty and you''re unsure what he expects you to do with it.'
-			'"This is the piggy''s new toilet! Show me how house-broken you are or I will beat you senseless!" The customer explains, raising the whip for you to see it.'
-			'His threat is enough to get you moving. "<<$pitfs>>Ok, this should be easy enough, With this kid pushing against my bladder I always need to piss anyway. Maybe the sicko will finally be satisfied after this.<<$pitfe>>"'
-			*nl
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm3.jpg"></center>'
+			
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins3.jpg"></center>'
+			'Just as your sister looks to be on the verge of cumming, <<$boydesc>> pulls her off of the couch and pushes her onto her knees. Her mouth still open in shock, the client pushes his dick between her lips. You hear Anya whimper as the throbbing member slides along her tongue, obviously frustrated by being so close, and yet so far, from orgasm.'
+			'The inconsiderate man turns his head your way. "You! Get over here and start licking my balls while I use your sister''s dirty mouth!"'
+			'You quickly get on your knees and obediently start tonguing <<$boydesc>>''s balls. The fleshy orbs slip around your tongue and you''re careful to dodge your sister''s head as it slides up and down the long shaft.'
+			'The man groans in pleasure while enjoying you and your sister''s expert work for a few minutes.'
+			'"Ok, now switch." He commands while removing his cock from your sister''s drooling orifice.'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins4.jpg"></center>'
+			'You let his heavy balls fall away from you and move your head up to take the <<dick>> cm cock in your mouth.'
+			'Simultaneously, Anya moves down and takes your previous place, licking the testicles back and forth.'
+			'You work the cock in and out of your throat, the whole time maintaining eye contact with the client. You can tell that he is enraptured, feeling like the luckiest man in the world to be bedding a pair of hot "twins".'
+			'"God, I can''t decide which one of you is the better cock sucker." He admits through raspy breath.'
+			'You playfully gesture towards yourself with a thumb and a wink, never slowing down as you blow him. Out of the corner of your eye, you see Anya shake her head and point to herself, claiming to be the superior.'
 			*nl
-			'You carefully squat over the bowl, cradling your belly with one hand. You relax your bladder and feel a torrent of piss begin streaming out of you. For the first time since this all started you feel a bit of relief. "Geez, I guess I really had to go." You think as the stream comes to an end, leaving the bowl nearly filled to the brim. Your cheeks flush in embarrassment of this strange man watching you pee.'
-			'"That''s a good doggy" <<$boydesc>> laughs.'
-			act 'Continue':
-				*clr & cla
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm5.jpg"></center>'
-				*nl
-				'" Oh but what is that? You spilled some." <<$boydesc>> suddenly grabs a fistful of your hair and pushes your head towards the bowl.'
-				'"<<$pitfs>>No no no, not that! Anything but that!<<$pitfe>>"'
-				'You try to resist and stiffen your neck, attempting to push your head back up. The smell of your own piss wafts into your nostrils, hot and bitter.'
-				'"Now be a good little bitch and take a nice sip from your bowl," he says, holding your head in place.'
-				'You shoot a look of terror across the room to <<$npc_nickname[''A217'']>>, hoping against hope that he would stop this.'
-				'Your heart sinks as he just gestures for you to go ahead and do your job.'
-				'"<<$pitfs>>What do I do? I can''t do this, but if I stop now I won''t get any money and <<$npc_nickname[''A217'']>> will be furious! Why did I put myself in this situation?<<$pitfe>>" Your breathing becomes ragged as the panic reaches a new peak in your chest.'
-				act 'Swallow your last bit of pride and take a sip':
-					*clr & cla
-					pcs_hydra += 20
-					if pcs_dom => 20:
-						pcs_dom -20
-					else
-						sub = sub + 20 - pcs_dom
-					end
-					'"<<$pitfs>>Ok baby, I am doing this for you.<<$pitfe>>" You think as you place a hand on your hefty belly and stop resisting.'
-					*nl
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm6.jpg"></center>'
-					*nl
-					'<<$boydesc>> pushes your head into the bowl and you start lapping at the disgusting liquid. The sour taste seems to permeate every orifice of your head, stinging with its hot, tart bouquet. Your stomach seizes as you feel the gag reflex try to kick in, but you force it away and continue licking and slurping at your waste.'
-					'"So, my little piss slut, how does it taste?" The deviant asshole inquires, mock interest evident in his tone.'
-					'"<<$pitfs>>Awful, I think I am going to puke.<<$pitfe>>" You wish you could say.'
-					'"It tastes great sir, thank you for this sir." You lie submissively, telling him what he wants to hear.'
-					'"Great! I knew a disgusting pig slut like you would enjoy it. Now for you final reward."'
-					*nl
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm4.jpg"></center>'
-					*nl
-					'The client pushes you on the ground and slides his dick back into your mouth. He starts furiously fucking your face, showing no concern for your comfort.'
-					'Your throat aches from the abuse, and you are ashamed but thankful to have the taste of cock in your mouth once again. Anything to help dull the awful urine taste is welcome at this point.'
-					'The man continues relentlessly face-fucking you until he finally erupts and cums buckets into your mouth. The taste of his semen finally seems to fully nullify the sour flavor that coated your taste buds before.'
-					'After his orgasm, the man stands up. "Thank you very much honey, you were great!"'
-					'Suddenly his whole demeanor has changed and he starts treating you like a person instead of a mindless sex toy. He reaches towards you and gives you a loving peck on the cheek.'
-					'"Come on let me help you." <<$boydesc>> helps you to your feet, careful to help you regain your balance in your delicate state. He then assists you with taking off the bracelets and collar before putting your regular clothes back on.'
-					gs 'cum_call','mouth', $npclastgenerated
-					gs 'stat'
-					act 'Go to Pavlin':
-						*clr & cla
-						*nl
-						'"Wow I can''t believe you actually did that shit. It was disgusting. You really are the best girl I''ve got."'
-						'Here is your reward. You certainly deserve it. <<$npc_nickname[''A217'']>> hands you a huge pile of cash.'
-						'You start counting it and find that it is almost 28,000 <b>₽</b>.'
-						'"<<$pitfs>>This is definitely a large amount, but the things I had to do for this, was it really worth it?<<$pitfe>>" You contemplate what you''ve done and how low it made you feel. You were treated like a dog, a whipping post, and a piss slave. You feel a deep sense of shame as you tuck the money into your wallet and move on.'
-						money += 28000
-						minut += 120
-						slutty += 1
-						pav_prostitute += rand(2,4)
-						preghumdone = 1
-						npc_rel['A217'] += 20
-						act 'Back to lobby':gt 'HotelHole'
-					end
-				end
-				act 'No, I can''t do this, let me go':
-					*clr & cla
-					gs 'pain', 9, 'head', 'hit'
-					gs 'pain', 9, 'tummy', 'kick'
-					gs 'stat'
-					'You start shaking your head violently and wrestle yourself free from his grip with all your strength. You roll away and break down crying on the floor.'
-					'"What the hell <<$npc_nickname[''A217'']>>? You told me she was up for it. This is the last time I try one of your girls" <<$boydesc>> quickly zips his cock away, collects his stuff, and leaves the room in a huff of anger.'
-					*nl
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_violent4.jpg"></center>'
-					*nl
-					'You look up from the floor and you no longer see <<$npc_nickname[''A217'']>>''s eyes; you see a monster. You can practically feel the rage radiating from him as he marches towards you, fists clenched.'
-					'You scramble to your feet as quickly as you''re able and try to reason with him. "<<$npc_nickname[''A217'']>>, I''m so sorr-" You can''t even complete one sentence before you feel your nose explode under his fist.'
-					'"You fucking CUNT! Do you know how much money you just cost me?!?!" He screams!'
-					'You feel blood pouring from your nose and down your face. The metallic taste is bitter as it pools inside mouth. You attempt to shake the dizziness from your head, but a second punch slams into your jaw.'
-					'"After everything I''ve done for you, this is how you repay me?!?"'
-					'You stumble back and look at <<$npc_nickname[''A217'']>> with watery eyes. You see his clenched hand rise again, so you cover your head for protection and close your eyes, bracing for impact.'
-					*nl
-					'All the breath leaves your body as <<$npc_nickname[''A217'']>> buries his fist into your pregnant belly. Your knees turn to jelly as you fall to the ground, now laying on your side. You feel a sickly, twisting pain in your stomach and everything inside you feels wrong.' 
-					'"<<$pitfs>>No! He has to stop! My baby...<<$pitfe>>" Your motherly instict cries out to you.'
-					'The tip of the horrible bastard''s steel toe boot slams into your swollen belly again and again. You try to cover your womb with your arms as the kicking assault continues, but the boot still manages to make it through your desperate defense.'
-					*nl
-					'<<$pitfs>>I have to make him stop, I have to! <<$pitfe>>"Stop <<$npc_nickname[''A217'']>>! Please! My baby..." you beg and look up at him just in time to see the sole of his boot racing down towards your face...'
-					act 'Everything goes black':
-						*clr & cla
-						fcolor = rgb(255, 255, 255)
-						bcolor = rgb(0, 0, 0)
-						lcolor = rgb(106, 90, 205)
-						'Darkness .........................'
-						act 'What is this?':
-							cla
-							:faintbegin
-							if faintcounter < 9:
-
-								minut += 180
-								wait 1000
-								'.....................................'
-								if faintcounter = 3:'"<<$pitfs>>Where am I?<<$pitfe>>"<br>'
-								if faintcounter = 5:'"<<$pitfs>>Am I dead?<<$pitfe>>"<br>'
-								if faintcounter = 7:'"<<$pitfs>>What happened?<<$pitfe>>"'
-								faintcounter +=1
-								jump 'faintbegin'
-							else
-								act 'Wake up':
-									killvar 'faintcounter'
-
-									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/shared/clinic/wakeup.jpg"></center>'
-									*nl
-									'You slowly open your eyes'
-									'"<<$pitfs>>Where am I?<<$pitfe>>" Your vision is blurry and you have to blink several times to clear it.'
-									'You find yourself lying on a soft bed. You look around and see a sterile white room with a woman in light blue scrubs standing with her back to you. Your mind pieces together the clues and you realize this is the hospital.'
-									'"H..hello?" You choke out the word, trying to get the nurse''s attention.'
-									'The nurse turns around, slightly startled, and says, "Oh you are awake. Just one minute, I will get the doctor for you." The nurse quickly exits the room.'
-									pregtime = 0
-									pregtalk = 0
-									pcs_pregtalk = 0
-									npc_pregtalk['A16'] = 0
-									npc_pregtalk['A34'] = 0
-									preg = 0
-									abortionbirthdate = daystart
-									cycle = 4
-									unintendedabort = 1
-									!! RecovH has a decay of 1.1/hour or ~ 27/day, the recovery period is ~2-3 weeks
-									RecovH = rand(375,575) 
-									pregchem = 0
-									knowpregloss = 2
-									thinkpreg = 0
-									knowpreg = 0
-									nextbaby = arrsize('yearkid')
-									if broodcurse > 0: over = 13 & gt'gameover'
-									:poliabortloop
-									if Babyptype[nextbaby] < 200:
-										KILLVAR 'polkid',nextbaby
-										KILLVAR '$kidname',nextbaby
-										KILLVAR 'kidage',nextbaby
-										KILLVAR 'daykid',nextbaby
-										KILLVAR 'monthkid',nextbaby
-										KILLVAR 'yearkid',nextbaby
-										KILLVAR 'Babyptype',nextbaby
-										KILLVAR '$ChildFath',nextbaby
-										KILLVAR '$ChildThFath',nextbaby
-										KILLVAR 'hairkid',nextbaby
-										KILLVAR 'eyeskid',nextbaby
-										KILLVAR 'cumarrcon',nextbaby
-										KILLVAR '$wombpotfath',nextbaby
-										BabyEmbryo -= 1
-										nextbaby -= 1
-									end
-									nextbaby -= 1
-									if nextbaby > 0:
-										jump 'poliabortloop'
-									end
-									gs 'stat'
-									act 'Wait for the doctor':
-										*clr & cla
-										'While you wait for the doctor you place your hand on your stomach. You feel a stillness inside you; an empty place where something grew before.'
-										'"<<$pitfs>>No. Please, no!<<$pitfe>>" Your mind prays to an uncaring god, trying to make this nightmare end. You know what the doctor will tell you, even before she enters the room.'
-										*nl
-										'<center><img <<$set_imgh>> src="images/locations/shared/clinic/badnews.jpg"></center>'
-										*nl
-										'The female doctor finally arrives and does a quick check on your vital signs before addressing you.'
-										'She explains in a frank but sympathetic tone that you were found unconscious in a hotel basement. You''d been beaten severely and the trauma caused a miscarriage.'
-										'You break down crying in a wail of tears.'
-										'The doctor tries to console you, telling you that she''s sorry but nothing could be done. She says that it could''ve been much worse; you could have died, or could have needed a hysterectomy. But they were able to save you from those fates.'
-										*nl
-										act 'Continue':
-											*clr & cla
-											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_policewoman.jpg"></center>'
-											*nl
-											'After you''ve expended every tear your body could produce, a policewoman enters the room and asks everyone to step out so she can get your statement.'
-											'"Hi <<$pcs_firstname>>, I am Officer Uspensky. I am so sorry for your loss. I have your written testimony here, if I could just get your signature."'
-											'She reaches out to hand you a pen and the formal looking piece of paper.'
-											'"<<$pitfs>>Written statement? I have not even given a statement yet.<<$pitfe>>" You think, confused.'
-											'Looking at the hand holding the paper out to you, you notice a little tattoo on her wrist. It is a small peacock.'
-											'You snatch the paper from her and read the written statement. The report says that you were attacked from behind and did not see your assailant.'
-											'Your brows furrow in anger as you look at the bitch defiantly. "But this is not what happe..."'
-											'The policewoman suddenly leans over you and whispers quietly, "Don''t be stupid girl! Just sign the damn statement and everything will be taken care of."'
-											'She slides you a big wad of cash. It''s at least 20,000 <b>₽</b>.'
-											'"Besides, who would believe a whore over our legitimate businessman friend." She says, smirking.'
-											'"<<$pitfs>>So that''s it? 20 000 <b>₽</b> for the life of my child. And that monster just gets away with it?<<$pitfe>>" You can barely form thoughts as the rage, pain, and desperation overwhelm you.'
-
-											act 'Sign the document':
-												*clr & cla
-												money += 20000
-												'With a reluctant, shaking hand, you sign the document throw it back at the policewoman. "That''s a good girl. Nice doing business with you." She says before gathering her things and leaving the room.'
-												'As soon as she is gone the tears start again and you cry yourself to sleep.'
-												'<br>'
-												'When you wake up, hours later, the nurse hands you some pain killers and tells you that you are being discharged from the hospital.'
-												*nl
-												'You slowly get dressed and leave the building. As you head back out into the streets you feel numb; hollowed out inside like a long dead tree stump. You''re utterly broken as you wander the streets aimlessly, hoping for a way to move on from all this.'
-												painkiller += 10
-												pcs_childtrauma += 8
-												Surgeryday = daystart
-												pcs_health = 50
-												recuperation = 1
-												gs 'stat'
-												killvar 'dailyhealthimprov'
-												npc_rel['A217'] = -1
-												PavlinQW = 9
-
-												act 'Leave':gt 'gpoli'
-											end
-										end
-									end
-								end
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'Twins' :
-	*clr & cla
-	minut += 20
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-	'"Hi <<$npc_nickname[''A217'']>>, this is my sister, Anya."'
-	'<<$npc_nickname[''A217'']>> looks at the two of you from top to bottom with analytical eyes. Finally, he cracks a smile and starts laughing.'
-	'"Well, well, you weren''t kidding. You two look exactly alike. OK, let me call the client."'
-	'He steps away to make a quick phone call. You turn and smile at your sister, excitedly. Anya smiles back, but her grins seems forced and you can tell that she''s nervous. "Lighten up, sis. We''re just gonna go get dicked down and we''ll walk away paid. It''ll be fun!" You say, trying to reassure her while praying that she won''t back out. You hate to think how <<$npc_firstname[''A217'']>> would react if you cancelled at this stage.'
-	'Anya''s smile becomes more genuine seeing your excitement. "Yeah, I know. I''m just a little nervous, but I''ll be fine. I promise." You sigh with relief.'
-	*nl
-	'<<$npc_nickname[''A217'']>> returns and ushers you both to his car.'
-	*nl
-	'He drives you to a nice house at the outskirts of town.'
-	act 'Go meet the client':
-		*clr & cla
-		gs 'npcgeneratec', 0
-		gs 'boyStat', $npclastgenerated
-		'<<$npc_nickname[''A217'']>> drops you off and tells you he will come back to pick you up in 1 hour.'
-		'You walk hand-in-hand with your sister to the door, practically dragging her alongside you, before ringing the bell.'
-		'You can see your sister is still very nervous, so you give her a little peck on the cheek and tell her, "Don''t worry, everything is going to be fine. I''ll try to keep his attention mostly on me, if you''re scared."'
-		'Before Anya can respond a man opens the door and invites you in.'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins1.jpg"></center>'
-		'The client introduces himself as <<$boydesc>> and invites you to sit on the couch.'
-		'"So girls, tell me a little about yourselves." He says with a lecherous smile as he undresses you with his eyes.'
-		'You lie to the man and tell him you are two 19-year old college students who do this kind of work to pay for your education.'
-		'The man grunts and nods, but is obviously not interested in your story. He starts rubbing you and your sister''s legs as soon as you begin talking, his thick fingers creeping up a little further each time.'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins2.jpg"></center>'
-		'Suddenly, he grabs your sister by the legs and spreads them wide. Anya shoots you a look of panic as she is sprawled out on the couch.'
-		'Before you can react, however, the customer buries his head between your sister''s legs and starts licking her tight little snatch after pulling her panties to the side with his teeth.'
-		'Anya immediately starts moaning loudly, caught off-guard and aroused by the sudden violation.'
-		'The sight of your sister getting off on <<$boydesc>>''s skilled tongue brings a tingling to your loins, and in no time you feel your pussy dripping.'
-		gs 'arousal','voyeur_sex',5,'prostitution'
-		gs 'stat'
-		act 'Continue':
-			*clr & cla
-			
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins3.jpg"></center>'
-			'Just as your sister looks to be on the verge of cumming, <<$boydesc>> pulls her off of the couch and pushes her onto her knees. Her mouth still open in shock, the client pushes his dick between her lips. You hear Anya whimper as the throbbing member slides along her tongue, obviously frustrated by being so close, and yet so far, from orgasm.'
-			'The inconsiderate man turns his head your way. "You! Get over here and start licking my balls while I use your sister''s dirty mouth!"'
-			'You quickly get on your knees and obediently start tonguing <<$boydesc>>''s balls. The fleshy orbs slip around your tongue and you''re careful to dodge your sister''s head as it slides up and down the long shaft.'
-			'The man groans in pleasure while enjoying you and your sister''s expert work for a few minutes.'
-			'"Ok, now switch." He commands while removing his cock from your sister''s drooling orifice.'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins4.jpg"></center>'
-			'You let his heavy balls fall away from you and move your head up to take the <<dick>> cm cock in your mouth.'
-			'Simultaneously, Anya moves down and takes your previous place, licking the testicles back and forth.'
-			'You work the cock in and out of your throat, the whole time maintaining eye contact with the client. You can tell that he is enraptured, feeling like the luckiest man in the world to be bedding a pair of hot "twins".'
-			'"God, I can''t decide which one of you is the better cock sucker." He admits through raspy breath.'
-			'You playfully gesture towards yourself with a thumb and a wink, never slowing down as you blow him. Out of the corner of your eye, you see Anya shake her head and point to herself, claiming to be the superior.'
-			*nl
-			'The man spends the next few minutes making you switch back and forth a few more times before declaring you and your sister to be equally skilled at giving head.'
-
-			gs 'arousal','bj',5,'prostitution'
-			gs 'stat'
-			
+			'The man spends the next few minutes making you switch back and forth a few more times before declaring you and your sister to be equally skilled at giving head.'
+
+			gs 'arousal','bj',5,'prostitution'
+			gs 'stat'
+			
 			act 'Continue':
 				*clr & cla
 				gs 'stat'
@@ -799,23 +500,58 @@ if $ARGS[0] = 'Twins' :
 					'The man finally pulls his still-hard member out of your cunt and steps back. "Ok girls, one last request. I am going to fuck one of you up the ass, but you can decide which one gets it."'
 					gs 'arousal','vaginal',10,'prostitution'
 					gs 'stat'
-					if klismaday ! daystart:
+					if klismaday ! daystart: 
 						'You lean in close and whisper to Anya that you hadn''t cleaned yourself down there today.'
 						'"Don''t worry <<$pcs_nickname>>, I love it up the ass!" She whispers back, her eyes wide with arousal and desire.'
-					else
-						'Your sister looks at you, unsure, and asks, "So, <<$pcs_nickname>>, do you want to take it?" You can tell that she''s not feeling the idea of getting assfucked by this guy, so you nod to let her know you''re ready to jump in front of this bullet.'
-						act 'You take it':
+						act 'Anya takes it':
 							*clr & cla
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins9.jpg"></center>'
-							'You position yourself with your head resting on a pillow sitting on the couch and your butt high in the air. You wiggle your ass at the client enticingly. "Your anal slut is waiting." You say, a mischievous grin on your face.'
-							'"God, I love an eager whore."<<$boydesc>> says as he comes up behind you and starts rubbing his dick against your little star.'
-							'He starts to slowly push it in and you can''t stop a groan from escaping your mouth as your butthole resists the invasion.'
-							'"Just relax girl, it will go a lot easier." The man says.'
-							'"Yeah <<$pcs_nickname>>, just relax. I know this is not the first dick you have had in your ass." Anya agrees, mockingly, unable to hide a giggle that follows her words.'
+							'Anya positions herself with her butt in the air on the couch and smiles back at the horny client.'
+							'<<$boydesc>> moves in behind her and starts rubbing his dick against her little star. He starts slowly pushing it in and she can''t stop a groan from escaping her mouth as her butthole resists.'
+							'"Just relax, girl, it will go a lot easier." The man recommends.'
+							'"Yeah, Anya, just relax. I know this is not the first dick you''ve had in your ass." You say, giggling at her discomfort.'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins10.jpg"></center>'
-							'Hearing your sister teasing you about your sudden slut-hood surprisingly helps you relax, and the fat cock slips into your tight sphincter.'
-							'<<$boydesc>> starts slowly moving his dick back and forth with short, gentle thrusts. Your breathing begins to increase in pace as you get more excited by the massive member rubbing inside you.'
+							'Hearing your playful mockery elicits a chuckle from Anya, and surprisingly helps her relax. The head of the thick dick suddenly pops into her sphincter, making her cry out in surprise and satisfaction.'
+							'<<$boydesc>> starts slowly sliding his fat cock back and forth inside of her. You sister''s breathing starts to go faster and faster as she clutches as the couch cushion. You recognize these signs and know Anya is getting close to orgasm.'
+							'<<$boydesc>> notices this too and says, "Looks like you are ready to cum for me. Let me help you with that."'
+							'The client gently flips Anya onto her back, lying on the couch, his dick somehow never slipping out of her ass. He continues stretching her tight anus while rubbing her clit with his thumb. Your sister moans in pure pleasure as he manipulates her lady bits expertly.'
+							'His other hand falls gently upon her breast and he begins rubbing and squeezing the nipple, his cock continuing to drive back and forth into her bowels.'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins11.jpg"></center>'
+							'This quickly becomes too much for your sister. While being stimulated in 3 erogenous zones at once she explodes in an earth-shaking orgasm like she''s never experienced before.'
+							'Anya''s whole body starts shaking and you jump up to hold her before she falls off the couch.'
+							'<<$boydesc>> laughs heartily. "Ok girl, you had your release. Now it is my turn."'
+							act 'Continue':
+								*clr & cla
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins12.jpg"></center>'
+								'<<$boydesc>> pulls out of your sister''s ass and motions for you to come closer.'
+								'You kneel down next to your sister and move your head close to hers. You both open your mouths while <<$boydesc>> starts jerking his dick quickly, awaiting your prize.'
+								'"Here it comes girls, now you play nice and share my gift." He immediately starts spraying cum while adjusting his aim between you and your sister.'
+								'You each catch some of his seed in you mouths while the rest splatters across your faces. You turn to you sister and you both start licking the cum from each other''s faces before swapping the load back and forth with a kiss. Anya ends up swallowing most of it while you smile.'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins13.jpg"></center>'
+								'"Since your sister was a real champ by taking it in the ass, you can be on cleaning duty." <<$boydesc>> says while pushing his cum-soaked dick between your lips.'
+								'You try to protest but it''s too late; the dick enters your mouth before any words leave it. You submit and use your tongue to thoroughly clean his cock, whimpering in disapproval. You hear Anya snicker at the idea of you being forced to taste her ass on this stranger''s rod. You shoot her an angry look from the side.'
+								*nl
+								'Suddenly, you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and <<$npc_nickname[''A217'']>> has arrived.'
+								'Not wanting to keep <<$npc_nickname[''A217'']>> waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
+								act 'Pavlin takes you home':gt 'HotelHole','twinhome'
+							end
+						end
+					else
+						'Your sister looks at you, unsure, and asks, "So, <<$pcs_nickname>>, do you want to take it?" You can tell that she''s not feeling the idea of getting assfucked by this guy, so you nod to let her know you''re ready to jump in front of this bullet.'
+						act 'You take it':
+							*clr & cla
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins9.jpg"></center>'
+							'You position yourself with your head resting on a pillow sitting on the couch and your butt high in the air. You wiggle your ass at the client enticingly. "Your anal slut is waiting." You say, a mischievous grin on your face.'
+							'"God, I love an eager whore."<<$boydesc>> says as he comes up behind you and starts rubbing his dick against your little star.'
+							'He starts to slowly push it in and you can''t stop a groan from escaping your mouth as your butthole resists the invasion.'
+							'"Just relax girl, it will go a lot easier." The man says.'
+							'"Yeah <<$pcs_nickname>>, just relax. I know this is not the first dick you have had in your ass." Anya agrees, mockingly, unable to hide a giggle that follows her words.'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins10.jpg"></center>'
+							'Hearing your sister teasing you about your sudden slut-hood surprisingly helps you relax, and the fat cock slips into your tight sphincter.'
+							'<<$boydesc>> starts slowly moving his dick back and forth with short, gentle thrusts. Your breathing begins to increase in pace as you get more excited by the massive member rubbing inside you.'
 							'<<$boydesc>> takes notice. "Looks like you''re ready to cum for me. Let me help you there"'
 							'The client gently flips you onto your back, lying on the couch, his dick somehow never slipping out of your ass. He continues stretching your anus while rubbing your clit with his thumb. You moan in pure pleasure as he manipulates your lady bits expertly.'
 							'His other hand falls gently upon your breast and he begins rubbing and squeezing your nipple, his cock continuing to drive back and forth into your bowels.'
@@ -838,46 +574,54 @@ if $ARGS[0] = 'Twins' :
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins13.jpg"></center>'
 								*nl
 								'"Since your sister was a real champ, taking it in the ass and all that, you can be on cleaning duty." <<$boydesc>> says as he pushes his cum-soaked dick between your sibling''s lips.'
-								'Anya tries to protest but it''s too late; the dick enters her mouth before any words leave it. She resigns herself to the task and uses her tongue to thoroughly clean the cock, whimpering in disapproval. You can''t help but snicker at the idea of her being forced to taste you ass on this stranger''s rod. Anya shoots you an angry look from the side.'
+								'Anya tries to protest but it''s too late; the dick enters her mouth before any words leave it. She resigns herself to the task and uses her tongue to thoroughly clean the cock, whimpering in disapproval. You can''t help but snicker at the idea of her being forced to taste your ass on this stranger''s rod. Anya shoots you an angry look from the side.'
 								'Suddenly you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and <<$npc_nickname[''A217'']>> has arrived.'
 								'Not wanting to keep <<$npc_nickname[''A217'']>> waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
-								act 'Pavlin takes you home':gt 'HotelHole','twinhome'
+								act 'Pavlin drives you home':gt 'HotelHole','twinhome'
 							end
 						end
-					end
-					act 'Anya takes it':
-						*clr & cla
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins9.jpg"></center>'
-						'Anya positions herself with her butt in the air on the couch and smiles back at the horny client.'
-						'<<$boydesc>> moves in behind her and starts rubbing his dick against her little star. He starts slowly pushing it in and she can''t stop a groan from escaping her mouth as her butthole resists.'
-						'"Just relax, girl, it will go a lot easier." The man recommends.'
-						'"Yeah, Anya, just relax. I know this is not the first dick you''ve had in your ass." You say, giggling at her discomfort.'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins10.jpg"></center>'
-						'Hearing your playful mockery elicits a chuckle from Anya, and surprisingly helps her relax. The head of the thick dick suddenly pops into her sphincter, making her cry out in surprise and satisfaction.'
-						'<<$boydesc>> starts slowly sliding his fat cock back and forth inside of her. You sister''s breathing starts to go faster and faster as she clutches as the couch cushion. You recognize these signs and know Anya is getting close to orgasm.'
-						'<<$boydesc>> notices this too and says, "Looks like you are ready to cum for me. Let me help you with that."'
-						'The client gently flips Anya onto her back, lying on the couch, his dick somehow never slipping out of her ass. He continues stretching her tight anus while rubbing her clit with his thumb. Your sister moans in pure pleasure as he manipulates her lady bits expertly.'
-						'His other hand falls gently upon her breast and he begins rubbing and squeezing the nipple, his cock continuing to drive back and forth into her bowels.'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins11.jpg"></center>'
-						'This quickly becomes too much for your sister. While being stimulated in 3 erogenous zones at once she explodes in an earth-shaking orgasm like she''s never experienced before.'
-						'Anya''s whole body starts shaking and you jump up to hold her before she falls off the couch.'
-						'<<$boydesc>> laughs heartily. "Ok girl, you had your release. Now it is my turn."'
-						act 'Continue':
-							*clr & cla
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins12.jpg"></center>'
-							'<<$boydesc>> pulls out of your sister''s ass and motions for you to come closer.'
-							'You kneel down next to your sister and move your head close to hers. You both open your mouths while <<$boydesc>> starts jerking his dick quickly, awaiting your prize.'
-							'"Here it comes girls, now you play nice and share my gift." He immediately starts spraying cum while adjusting his aim between you and your sister.'
-							'You each catch some of his seed in you mouths while the rest splatters across your faces. You turn to you sister and you both start licking the cum from each other''s faces before swapping the load back and forth with a kiss. Anya ends up swallowing most of it while you smile.'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins13.jpg"></center>'
-							'"Since your sister was a real champ by taking it in the ass, you can be on cleaning duty." <<$boydesc>> says while pushing his cum-soaked dick between your lips.'
-							'You try to protest but it''s too late; the dick enters your mouth before any words leave it. You submit and use your tongue to thoroughly clean his cock, whimpering in disapproval. You hear Anya snicker at the idea of you being forced to taste her ass on this stranger''s rod. You shoot her an angry look from the side.'
-							*nl
-							'Suddenly, you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and <<$npc_nickname[''A217'']>> has arrived.'
-							'Not wanting to keep <<$npc_nickname[''A217'']>> waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
-							act 'Pavlin takes you home':gt 'HotelHole','twinhome'
+						gs 'willpower', 'anal', 'force', 'hard'
+						if will_cost <= pcs_willpwr:
+							act 'Make Anya to take it (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'anal', 'force', 'hard'
+								gs 'willpower', 'pay', 'force'
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins9.jpg"></center>'
+								'You motion Anya towards the coach, "That''s all yours. Enjoy."'
+								'Anya positions herself with her butt in the air on the couch and smiles back at the horny client.'
+								'<<$boydesc>> moves in behind her and starts rubbing his dick against her little star. He starts slowly pushing it in and she can''t stop a groan from escaping her mouth as her butthole resists.'
+								'"Just relax, girl, it will go a lot easier." The man recommends.'
+								'"Yeah, Anya, just relax. I know this is not the first dick you''ve had in your ass." You say, giggling at her discomfort.'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins10.jpg"></center>'
+								'Hearing your playful mockery elicits a chuckle from Anya, and surprisingly helps her relax. The head of the thick dick suddenly pops into her sphincter, making her cry out in surprise and satisfaction.'
+								'<<$boydesc>> starts slowly sliding his fat cock back and forth inside of her. You sister''s breathing starts to go faster and faster as she clutches as the couch cushion. You recognize these signs and know Anya is getting close to orgasm.'
+								'<<$boydesc>> notices this too and says, "Looks like you are ready to cum for me. Let me help you with that."'
+								'The client gently flips Anya onto her back, lying on the couch, his dick somehow never slipping out of her ass. He continues stretching her tight anus while rubbing her clit with his thumb. Your sister moans in pure pleasure as he manipulates her lady bits expertly.'
+								'His other hand falls gently upon her breast and he begins rubbing and squeezing the nipple, his cock continuing to drive back and forth into her bowels.'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins11.jpg"></center>'
+								'This quickly becomes too much for your sister. While being stimulated in 3 erogenous zones at once she explodes in an earth-shaking orgasm like she''s never experienced before.'
+								'Anya''s whole body starts shaking and you jump up to hold her before she falls off the couch.'
+								'<<$boydesc>> laughs heartily. "Ok girl, you had your release. Now it is my turn."'
+								act 'Continue':
+									*clr & cla
+									gs 'stat'
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins12.jpg"></center>'
+									'<<$boydesc>> pulls out of your sister''s ass and motions for you to come closer.'
+									'You kneel down next to your sister and move your head close to hers. You both open your mouths while <<$boydesc>> starts jerking his dick quickly, awaiting your prize.'
+									'"Here it comes girls, now you play nice and share my gift." He immediately starts spraying cum while adjusting his aim between you and your sister.'
+									'You each catch some of his seed in you mouths while the rest splatters across your faces. You turn to you sister and you both start licking the cum from each other''s faces before swapping the load back and forth with a kiss. Anya ends up swallowing most of it while you smile.'
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/twins13.jpg"></center>'
+									'"Since your sister was a real champ by taking it in the ass, you can be on cleaning duty." <<$boydesc>> says while pushing his cum-soaked dick between your lips.'
+									'You try to protest but it''s too late; the dick enters your mouth before any words leave it. You submit and use your tongue to thoroughly clean his cock, whimpering in disapproval. You hear Anya snicker at the idea of you being forced to taste her ass on this stranger''s rod. You shoot her an angry look from the side.'
+									*nl
+									'Suddenly, you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and <<$npc_nickname[''A217'']>> has arrived.'
+									'Not wanting to keep <<$npc_nickname[''A217'']>> waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
+									act 'Pavlin drives you home':gt 'HotelHole','twinhome'
+								end
+							end
+						else
+							act 'Force Anya to take it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
 				end
@@ -894,15 +638,15 @@ if $ARGS[0] = 'twinhome':
 	'After a while, you reach the apartment complex.'
 	'"Great job girls. Anya, if you ever want to come work for me, like your sister, feel free to drop by the hotel." <<$npc_nickname[''A217'']>> offers.'
 	'"Ha, ha, no thanks. I am not a who..." Anya looks at you and stops herself before she finishes the sentence.'
-	'"Hmm, no, not interested, thanks." She says while quickly leaving the car.'
+	'"Hmm, no, not interested, thanks." She says while quickly leaving the car and heading inside.'
 	'"Ha ha ha! Luckily there is still one actual whore in the family!" <<$npc_nickname[''A217'']>> can''t stop laughing as he hands you 10,000 <b>₽</b>.'
 	'You leave the car, face burning red in embarrassment, and go inside to your room.'
-	'You were planning to divide the money evenly with your sister, but now that you know what she really thinks of you, you hand her 1,000 <b>₽</b>. "Well, since you''re not a whore, I guess you don''t deserve a whore''s pay." You say snidely. You march back out of the room angrily before Anya has a chance to respond.'
+	'You were planning to divide the money evenly with your sister, but now that you know what she really thinks of you, you hand her 1,000 <b>₽</b>. "Well, since you''re not a whore, I guess you don''t deserve a whore''s pay." you say snidely. You head back out of the room quickly before Anya has a chance to respond.'
 	gs 'arousal','end'
 	TwinQW = 3
 	guy += 1
 	slutty += 1
-	pav_prostitute += rand(2,4)
+	gs 'fame', 'pav', 'prostitute', rand(2,4)
 	npc_rel['A217'] += 10
 	money += 9000
 	gs 'stat'
@@ -923,20 +667,20 @@ if $ARGS[0] = 'clown':
 	act 'Turn on the switch near the bed':
 		*clr & cla
 		'You hear the lights starting to buzz, but they don''t turn on immediately '
-		wait 2400
+		wait 1000
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/clown1.jpg"></center>'
 		wait 100
 		*clr
 		'What was that? You thought you saw something.'
-		'the lights kept buzzing, still not producing any light'
-		wait 2500
+		'The lights kept buzzing, still not producing any light'
+		wait 1000
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/clown1.jpg"></center>'
 		wait 100
 		*clr
 		'Again, you think you saw something at the other side of the room.'
 		'You are getting scared.'
 		'The buzzing sound gets louder....'
-		wait 5000
+		wait 1000
 		*clr
 		gs 'stat'
 		fcolor = rgb(0, 0, 0)
@@ -1028,7 +772,7 @@ if $ARGS[0] = 'clown':
 					gs 'stat'
 					guy += 2
 					slutty += 1
-					pav_prostitute += rand(2,4)
+					gs 'fame', 'pav', 'prostitute', rand(2,4)
 					ClownQW = 1
 					npc_rel['A217'] += 8
 					act 'Sit on the bed':
@@ -1036,7 +780,7 @@ if $ARGS[0] = 'clown':
 						gs 'stat'
 						'You go sit on the bed and Popov starts juggling some balls in the air.'
 						'You are not impressed at all and just want to leave at this point.'
-						wait 2500
+						wait 100
 						'Suddenly out of nowhere you are hit in the face with a cream pie.'
 						'And it is not the fun baby-making one.'
 						'<center><video autoplay loop src="images/characters/pavlovsk/pavlin/clown2.mp4"></video></center>'
@@ -1066,5 +810,301 @@ if $ARGS[0] = 'clown':
 	end
 end
 
+if $ARGS[0] = 'PregBDSM' :
+	*clr & cla
+	minut +=10
+	gs 'npcgeneratec', 0
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'"That shouldn''t be a problem. With what he''s willing to pay, you''ll be able to put that kid of yours through college."'
+	'<<$npc_nickname[''A217'']>> steps away to make the call and, 10 minutes later, the customer shows up.'
+	*nl
+	'He introduces himself as <<$boydesc>> "Very nice <<$npc_nickname[''A217'']>>. This is exactly what I was looking for." He says while hungrily eyeing your pregnant body.'
+	'<<$npc_nickname[''A217'']>> and <<$boydesc>> have a short discussion about your price.'
+	*nl
+	'<<$npc_nickname[''A217'']>> goes over to the desk girl and comes back with a key." We have full access to the hotel basement for the next 2 hours, so let''s get on with it."'
+	act 'Go to the Basement':
+		*clr & cla
+		gs 'arousal', 'foreplay', 5, 'rough','sub','humiliation'
+		gs 'pain', 3, 'back', 'spank'
+		gs 'pain', 3, 'breasts', 'spank'
+		gs 'pain', 3, 'nipples', 'spank'
+		gs 'stat'
+		'When the three of you arrive in the basement <<$npc_nickname[''A217'']>> goes and sits himself on a stool in the corner of the room while the man takes you to a table in the center.'
+		*nl
+		'He hands you a set of leather wrist cuffs, a matching collar, and a pair of heels.'
+		'"Undress and wear these." the man says, curtly.'
+		'While you are busy undressing and equipping your new accessories, he lays out a series of whips and crops. He turns to you and, with a happy grin, says "Please, choose one for us to enjoy."'
+		'"<<$pitfs>>Ok, this might be a little heavier than I expected.<<$pitfe>> "You think, beginning to second guess your decision.'
+		'You look at <<$npc_nickname[''A217'']>> with pleading eyes, but receive no sympathy in return. You realize it''s too late to back out now. You examine the foreign whips and choose the one you think would be the least painful; a thin one that appears light in weight, figuring that the heavier ones would cause much more pain.'
+		*nl
+		'<<$boydesc>> approaches you and starts caressing your swollen belly and breasts.'
+		*nl
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm1.jpg"></center>'
+		*nl
+		'Suddenly he takes your arms and attaches your leather bracelets to a chain hanging above your head.'
+		'"<<$pitfs>>Wait a minute, no one said anything about being tied up.<<$pitfe>>" You think as panic begins to creep into your mind.'
+		'Without warning you feel the whip lash across your back.'
+		'.....WHOOSH....'
+		'"<<$pitfs>>AAARGH!<<$pitfe>>" Your mind reels.'
+		'You clench your teeth and take it.'
+		'Then another strike lands.'
+		'.....WHISHP....'
+		'"<<$pitfs>>Fuck this hurts, but I can''t let it show!<<$pitfe>>" Again you refuse to scream out, not wanting to give your torturer the satisfaction.'
+		'But then...'
+		'.....WHOOSH....'
+		'.....WHAP....'
+		'The whip snaps across each breast before you see it coming.'
+		'You finally scream out involuntarily, the unexpected spike in pain proving too much to ignore.'
+		'"<<$pitfs>>Damn it, I shouldn''t show any weakness! Who knows how far he will take this!<<$pitfe>>" You admonish yourself, but it is too late.'
+		'"Well, well, it looks like the little bitch can feel pain after all." The cruel pervert says, a smile plastered across his vile face.'
+		'.....WHIP....'
+		'.....SNAP....'
+		'Two more hits slice sharply across your sensitive nipples, eliciting one big scream after another.'
+		'The torment continues for what feels like an eternity. The client alternates randomly between striking yours breasts, back, and buttocks. But the worst by far is when he zeroes in on your quivering pussy. As the instrument slaps viciously across your labia you scream and beg, tears streaming down your tortured face, mascara straining your cheeks. When the whip lands directly on your clit you feel like passing out and vomiting at the same time, your stomach twisting in agony.'
+		*nl
+		'The horrible man finally steps away. "Ok, whore, enough screaming." You look at the man with pathetic, pleading eyes. You can feel heat radiating from every lash, every point of impact burns relentlessly.'
+		'"Lets''s use that little mouth of yours for something even more fun." He says, unbuttoning his pants and exposing his rock hard member.'
+		act 'Continue':
+			*clr & cla
+			gs 'arousal', 'bj', 30, 'rough','sub','humiliation'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm2.jpg"></center>'
+			'<<$boydesc>> releases your cuffs from the chain and you immediately collapse onto your knees, the forced suspension being the only thing keeping you standing. He takes his <<dick>> cm dick and pushes it against your lips.'
+			'"Now start working, you fat cow!" He demands.'
+			'You open your mouth, slide your lips over the cock and start sucking halfheartedly, exhausted from your previous predicament, but thankful to be doing something you''re more familiar with.'
+			'"You will have to do better than that you worthless whore!"'
+			'He spits in your face and slaps your cheek, the sound echoing through the deserted basement.'
+			'"<<$pitfs>>Motherfucker, If I could I would slap the shit out of you! No, I have to stay strong and think about the money for my child.<<$pitfe>>"'
+			'You notice the whip still clutched in his hand and start sucking with all your skill, praying he doesn''t decide to use it again. Thoughts of your unborn child and the situation you are in creep into your mind as you pleasure your captor. The tears well up in your eyes once more.'
+			*nl
+			'"Well, well, it looks like our fat bitch is not happy here. I know how to remedy that, let''s take a little walk."'
+			'<<$boydesc>> pulls his slathered cock from your mouth and attaches a chain to your collar. He steps away and tugs the leash hard, the force pulling you onto your hands and knees.'
+			'You have no choice but to follow him around on all fours. Your heavy baby-belly sways as you crawl across the dirty cement floor, feeling more degraded by the step.'
+			'"See my little doggy, isn''t this better? Knowing your place in the world?"'
+			'"<<$pitfs>>Fuck you, just give me your dick and stop this humiliation<<$pitfe>>." Your mind screams defiantly.'
+			'...WHAP...'
+			'The whip snaps across your sore ass was once more and you cry out.'
+			'"I asked you a question, slut!" The man bellows.'
+			'"Yes sir, much better!" you say obediently, wiping away a tear.'
+			'Your new master marches you around in circles for a few minutes, laughing as you attempt to keep up with his pace.'
+			*nl
+			'"Now, use this" He pushes a small metal bowl towards you with his foot.'
+			'You look up at him confused. The bowl is empty and you''re unsure what he expects you to do with it.'
+			'"This is the piggy''s new toilet! Show me how house-broken you are or I will beat you senseless!" The customer explains, raising the whip for you to see it.'
+			'His threat is enough to get you moving. "<<$pitfs>>Ok, this should be easy enough, With this kid pushing against my bladder I always need to piss anyway. Maybe the sicko will finally be satisfied after this.<<$pitfe>>"'
+			*nl
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm3.jpg"></center>'
+			*nl
+			'You carefully squat over the bowl, cradling your belly with one hand. You relax your bladder and feel a torrent of piss begin streaming out of you. For the first time since this all started you feel a bit of relief. "Geez, I guess I really had to go." You think as the stream comes to an end, leaving the bowl nearly filled to the brim. Your cheeks flush in embarrassment of this strange man watching you pee.'
+			'"That''s a good doggy" <<$boydesc>> laughs.'
+			act 'Continue':
+				*clr & cla
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm5.jpg"></center>'
+				*nl
+				'" Oh but what is that? You spilled some." <<$boydesc>> suddenly grabs a fistful of your hair and pushes your head towards the bowl.'
+				'"<<$pitfs>>No no no, not that! Anything but that!<<$pitfe>>"'
+				'You try to resist and stiffen your neck, attempting to push your head back up. The smell of your own piss wafts into your nostrils, hot and bitter.'
+				'"Now be a good little bitch and take a nice sip from your bowl," he says, holding your head in place.'
+				'You shoot a look of terror across the room to <<$npc_nickname[''A217'']>>, hoping against hope that he would stop this.'
+				'Your heart sinks as he just gestures for you to go ahead and do your job.'
+				'"<<$pitfs>>What do I do? I can''t do this, but if I stop now I won''t get any money and <<$npc_nickname[''A217'']>> will be furious! Why did I put myself in this situation?<<$pitfe>>" Your breathing becomes ragged as the panic reaches a new peak in your chest.'
+				act 'Swallow your last bit of pride and take a sip':
+					*clr & cla
+					pcs_hydra += 20
+					gs 'arousal', 'pee', -5, 'sub', 'humilation'
+					gs 'arousal', 'end'
+					'"<<$pitfs>>Ok baby, I am doing this for you.<<$pitfe>>" You think as you place a hand on your hefty belly and stop resisting.'
+					*nl
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm6.jpg"></center>'
+					*nl
+					'<<$boydesc>> pushes your head into the bowl and you start lapping at the disgusting liquid. The sour taste seems to permeate every orifice of your head, stinging with its hot, tart bouquet. Your stomach seizes as you feel the gag reflex try to kick in, but you force it away and continue licking and slurping at your waste.'
+					'"So, my little piss slut, how does it taste?" The deviant asshole inquires, mock interest evident in his tone.'
+					'"<<$pitfs>>Awful, I think I am going to puke.<<$pitfe>>" You wish you could say.'
+					'"It tastes great sir, thank you for this sir." You lie submissively, telling him what he wants to hear.'
+					'"Great! I knew a disgusting pig slut like you would enjoy it. Now for you final reward."'
+					*nl
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/pregbdsm4.jpg"></center>'
+					*nl
+					'The client pushes you on the ground and slides his dick back into your mouth. He starts furiously fucking your face, showing no concern for your comfort.'
+					'Your throat aches from the abuse, and you are ashamed but thankful to have the taste of cock in your mouth once again. Anything to help dull the awful urine taste is welcome at this point.'
+					'The man continues relentlessly face-fucking you until he finally erupts and cums buckets into your mouth. The taste of his semen finally seems to fully nullify the sour flavor that coated your taste buds before.'
+					'After his orgasm, the man stands up. "Thank you very much honey, you were great!"'
+					'Suddenly his whole demeanor has changed and he starts treating you like a person instead of a mindless sex toy. He reaches towards you and gives you a loving peck on the cheek.'
+					'"Come on let me help you." <<$boydesc>> helps you to your feet, careful to help you regain your balance in your delicate state. He then assists you with taking off the bracelets and collar before putting your regular clothes back on.'
+					gs 'cum_call','mouth', $npclastgenerated
+					gs 'stat'
+					act 'Go to Pavlin':
+						*clr & cla
+						*nl
+						'"Wow I can''t believe you actually did that shit. It was disgusting. You really are the best girl I''ve got."'
+						'Here is your reward. You certainly deserve it. <<$npc_nickname[''A217'']>> hands you a huge pile of cash.'
+						'You start counting it and find that it is almost 28,000 <b>₽</b>.'
+						'"<<$pitfs>>This is definitely a large amount, but the things I had to do for this, was it really worth it?<<$pitfe>>" You contemplate what you''ve done and how low it made you feel. You were treated like a dog, a whipping post, and a piss slave. You feel a deep sense of shame as you tuck the money into your wallet and move on.'
+						money += 28000
+						minut += 120
+						slutty += 1
+						pav_prostitute += rand(2,4)
+						preghumdone = 1
+						npc_rel['A217'] += 20
+						act 'Back to lobby':gt 'HotelHole'
+					end
+				end
+				act 'No, I can''t do this, let me go':
+					*clr & cla
+					gs 'arousal', 'end'
+					gs 'pain', 9, 'head', 'hit'
+					gs 'pain', 9, 'tummy', 'kick'
+					gs 'stat'
+					'You start shaking your head violently and wrestle yourself free from his grip with all your strength. You roll away and break down crying on the floor.'
+					'"What the hell <<$npc_nickname[''A217'']>>? You told me she was up for it. This is the last time I try one of your girls" <<$boydesc>> quickly zips his cock away, collects his stuff, and leaves the room in a huff of anger.'
+					*nl
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_violent4.jpg"></center>'
+					*nl
+					'You look up from the floor and you no longer see <<$npc_nickname[''A217'']>>''s eyes; you see a monster. You can practically feel the rage radiating from him as he marches towards you, fists clenched.'
+					'You scramble to your feet as quickly as you''re able and try to reason with him. "<<$npc_nickname[''A217'']>>, I''m so sorr-" You can''t even complete one sentence before you feel your nose explode under his fist.'
+					'"You fucking CUNT! Do you know how much money you just cost me?!?!" He screams!'
+					'You feel blood pouring from your nose and down your face. The metallic taste is bitter as it pools inside mouth. You attempt to shake the dizziness from your head, but a second punch slams into your jaw.'
+					'"After everything I''ve done for you, this is how you repay me?!?"'
+					'You stumble back and look at <<$npc_nickname[''A217'']>> with watery eyes. You see his clenched hand rise again, so you cover your head for protection and close your eyes, bracing for impact.'
+					*nl
+					'All the breath leaves your body as <<$npc_nickname[''A217'']>> buries his fist into your pregnant belly. Your knees turn to jelly as you fall to the ground, now laying on your side. You feel a sickly, twisting pain in your stomach and everything inside you feels wrong.' 
+					'"<<$pitfs>>No! He has to stop! My baby...<<$pitfe>>" Your motherly instict cries out to you.'
+					'The tip of the horrible bastard''s steel toe boot slams into your swollen belly again and again. You try to cover your womb with your arms as the kicking assault continues, but the boot still manages to make it through your desperate defense.'
+					*nl
+					'<<$pitfs>>I have to make him stop, I have to! <<$pitfe>>"Stop <<$npc_nickname[''A217'']>>! Please! My baby..." you beg and look up at him just in time to see the sole of his boot racing down towards your face...'
+					act 'Everything goes black':
+						*clr & cla
+						fcolor = rgb(255, 255, 255)
+						bcolor = rgb(0, 0, 0)
+						lcolor = rgb(106, 90, 205)
+						'Darkness .........................'
+						act 'What is this?':
+							cla
+							:faintbegin
+							if faintcounter < 9:
+
+								minut += 180
+								wait 1000
+								'.....................................'
+								if faintcounter = 3:'"<<$pitfs>>Where am I?<<$pitfe>>"<br>'
+								if faintcounter = 5:'"<<$pitfs>>Am I dead?<<$pitfe>>"<br>'
+								if faintcounter = 7:'"<<$pitfs>>What happened?<<$pitfe>>"'
+								faintcounter +=1
+								jump 'faintbegin'
+							else
+								act 'Wake up':
+									killvar 'faintcounter'
+
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/shared/clinic/wakeup.jpg"></center>'
+									*nl
+									'You slowly open your eyes'
+									'"<<$pitfs>>Where am I?<<$pitfe>>" Your vision is blurry and you have to blink several times to clear it.'
+									'You find yourself lying on a soft bed. You look around and see a sterile white room with a woman in light blue scrubs standing with her back to you. Your mind pieces together the clues and you realize this is the hospital.'
+									'"H..hello?" You choke out the word, trying to get the nurse''s attention.'
+									'The nurse turns around, slightly startled, and says, "Oh you are awake. Just one minute, I will get the doctor for you." The nurse quickly exits the room.'
+									pregtime = 0
+									pregtalk = 0
+									pcs_pregtalk = 0
+									npc_pregtalk['A16'] = 0
+									npc_pregtalk['A34'] = 0
+									preg = 0
+									abortionbirthdate = daystart
+									cycle = 4
+									unintendedabort = 1
+									!! RecovH has a decay of 1.1/hour or ~ 27/day, the recovery period is ~2-3 weeks
+									RecovH = rand(375,575) 
+									pregchem = 0
+									knowpregloss = 2
+									thinkpreg = 0
+									knowpreg = 0
+									nextbaby = arrsize('yearkid')
+									if broodcurse > 0: over = 13 & gt'gameover'
+									:poliabortloop
+									if Babyptype[nextbaby] < 200:
+										KILLVAR 'polkid',nextbaby
+										KILLVAR '$kidname',nextbaby
+										KILLVAR 'kidage',nextbaby
+										KILLVAR 'daykid',nextbaby
+										KILLVAR 'monthkid',nextbaby
+										KILLVAR 'yearkid',nextbaby
+										KILLVAR 'Babyptype',nextbaby
+										KILLVAR '$ChildFath',nextbaby
+										KILLVAR '$ChildThFath',nextbaby
+										KILLVAR 'hairkid',nextbaby
+										KILLVAR 'eyeskid',nextbaby
+										KILLVAR 'cumarrcon',nextbaby
+										KILLVAR '$wombpotfath',nextbaby
+										BabyEmbryo -= 1
+										nextbaby -= 1
+									end
+									nextbaby -= 1
+									if nextbaby > 0:
+										jump 'poliabortloop'
+									end
+									gs 'stat'
+									act 'Wait for the doctor':
+										*clr & cla
+										'While you wait for the doctor you place your hand on your stomach. You feel a stillness inside you; an empty place where something grew before.'
+										'"<<$pitfs>>No. Please, no!<<$pitfe>>" Your mind prays to an uncaring god, trying to make this nightmare end. You know what the doctor will tell you, even before she enters the room.'
+										*nl
+										'<center><img <<$set_imgh>> src="images/locations/shared/clinic/badnews.jpg"></center>'
+										*nl
+										'The female doctor finally arrives and does a quick check on your vital signs before addressing you.'
+										'She explains in a frank but sympathetic tone that you were found unconscious in a hotel basement. You''d been beaten severely and the trauma caused a miscarriage.'
+										'You break down crying in a wail of tears.'
+										'The doctor tries to console you, telling you that she''s sorry but nothing could be done. She says that it could''ve been much worse; you could have died, or could have needed a hysterectomy. But they were able to save you from those fates.'
+										*nl
+										act 'Continue':
+											*clr & cla
+											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_policewoman.jpg"></center>'
+											*nl
+											'After you''ve expended every tear your body could produce, a policewoman enters the room and asks everyone to step out so she can get your statement.'
+											'"Hi <<$pcs_firstname>>, I am Officer Uspensky. I am so sorry for your loss. I have your written testimony here, if I could just get your signature."'
+											'She reaches out to hand you a pen and the formal looking piece of paper.'
+											'"<<$pitfs>>Written statement? I have not even given a statement yet.<<$pitfe>>" You think, confused.'
+											'Looking at the hand holding the paper out to you, you notice a little tattoo on her wrist. It is a small peacock.'
+											'You snatch the paper from her and read the written statement. The report says that you were attacked from behind and did not see your assailant.'
+											'Your brows furrow in anger as you look at the bitch defiantly. "But this is not what happe..."'
+											'The policewoman suddenly leans over you and whispers quietly, "Don''t be stupid girl! Just sign the damn statement and everything will be taken care of."'
+											'She slides you a big wad of cash. It''s at least 20,000 <b>₽</b>.'
+											'"Besides, who would believe a whore over our legitimate businessman friend." She says, smirking.'
+											'"<<$pitfs>>So that''s it? 20 000 <b>₽</b> for the life of my child. And that monster just gets away with it?<<$pitfe>>" You can barely form thoughts as the rage, pain, and desperation overwhelm you.'
+
+											act 'Sign the document':
+												*clr & cla
+												money += 20000
+												'With a reluctant, shaking hand, you sign the document throw it back at the policewoman. "That''s a good girl. Nice doing business with you." She says before gathering her things and leaving the room.'
+												'As soon as she is gone the tears start again and you cry yourself to sleep.'
+												'<br>'
+												'When you wake up, hours later, the nurse hands you some pain killers and tells you that you are being discharged from the hospital.'
+												*nl
+												'You slowly get dressed and leave the building. As you head back out into the streets you feel numb; hollowed out inside like a long dead tree stump. You''re utterly broken as you wander the streets aimlessly, hoping for a way to move on from all this.'
+												painkiller += 10
+												pcs_childtrauma += 8
+												Surgeryday = daystart
+												pcs_health = 50
+												recuperation = 1
+												gs 'stat'
+												killvar 'dailyhealthimprov'
+												npc_rel['A217'] = -1
+												PavlinQW = 9
+
+												act 'Leave':gt 'gpoli'
+											end
+										end
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
 --- HotelHole ---------------------------------
 

locations/HotelWork.qsrc

@@ -55,14 +55,21 @@ if $ARGS[0] = 'hotcouple':
 			if pcs_vag = 0:
 				'When she reached your hymen she yelled out: "Oh my god, she is still a virgin!"'
 				'"How about it honey, do you want my husband to be your first?"'
-				act 'No, I want to save myself.':
-					*clr & cla
-					gs'stat'
-					'"No problem honey, this evening is all about what you want."'
-					'"Do you want him to come all over your face?"'
-					'"Yeah sure, that is fine."'
-					'You lay down on your back.'
-					act 'Finish':gt 'HotelWork', 'hotcoupfin'
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'No, I want to save myself (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'sex', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs'stat'
+						'"No problem honey, this evening is all about what you want."'
+						'"Do you want him to come all over your face?"'
+						'"Yeah sure, that is fine."'
+						'You lay down on your back.'
+						act 'Finish':gt 'HotelWork', 'hotcoupfin'
+					end
+				else
+					act 'No, I want to save myself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 				act 'Yes' :
 					*clr & cla
@@ -201,8 +208,7 @@ if $ARGS[0] = 'firsthotelprosevent':
 						money += 1500
 						pavhotprosQW = 4
 						act'Back to the lobby':gt 'hotelhole'
-					end
-					if prosmoneyhot = 1:
+					elseif prosmoneyhot = 1:
 						'You shyly look at Pavlin and ask, "So can I have my money back now?"'
 						' '
 						'"Sure, no problem; you definitely earned it." He guy takes a wad of cash out of his pocket and gives it to you.'
@@ -213,8 +219,7 @@ if $ARGS[0] = 'firsthotelprosevent':
 						pavhotprosQW = 5
 						money += 500
 						act'Back to the lobby':gt 'hotelhole'
-					end
-					if prosmoneyhot = 2:
+					elseif prosmoneyhot = 2:
 						'You look at Pavlin and ask: "So about my money...?"'
 						' '
 						'"Sure, no problem, you definitely earned it." Pavlin takes two 100 <b>₽</b> bills out of his pocket and slaps them onto your forehead, the bills sticking to the spooge still covering your face.'
@@ -255,10 +260,16 @@ if $ARGS[0] = 'maid':
 				act'Continue':gt 'hotelhole'
 			end
 			if slutty > 0 or money <= 3000:
-
-				act'Shake your head and go back to the lobby.':
-					threesomewatched = 0
-					gt 'hotelhole'
+				gs 'willpower', 'prostitution', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Shake your head and go back to the lobby (<<will_cost>> Willpower)':
+						gs 'willpower', 'prostitution', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						threesomewatched = 0
+						gt 'hotelhole'
+					end
+				else
+					act'Shake your head and go back to the lobby (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 				act'Knock on the door.':
 					*clr & cla
@@ -268,27 +279,48 @@ if $ARGS[0] = 'maid':
 					' '
 					'"Well, well, well, if it isn''t our favorite little voyeur. Come to earn your money back I assume?" He says arrogantly as his eyes devour you body.'
 					' '
-					if pcs_dom > 75:
-						'"Yes I have." You say, not letting the man''s lecherous gaze intimidate you. "I will play the little bitch for you, but on my terms." You let your assertive words sink in for a moment before continuing.'
-						' '
-						'"You will pay me DOUBLE what you took and, after we are done, I don''t have to deal with you anymore."'
-						'The man laughs, "Ha ha, take a look at this slut, thinking she can boss me around." The oaf suddenly slaps you across the face without warning, the loud smack echoing in the empty hallway.'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/yurikev/avatars/slap.jpg"></center>'
-						'Your cheek stings hotly but you don''t flinch. You keep staring him in the eyes with a stern look, refusing to submit.'
-						' '
-						'The man looks shocked, realizing that you are not playing around.'
-						'"Ok then, girl, have it your way. Come on in"'
-						prosmoneyhot = 0
+					gs 'willpower', 'prostitution', 'self', 'hard'
+					if will_cost <= pcs_willpwr:
+						act 'Yes, but I want double my money back (<<will_cost>> Willpower)':
+							cla
+							gs 'willpower', 'prostitution', 'self', 'hard'
+							gs 'willpower', 'pay', 'self'
+							gs 'stat'
+							'"Yes I have." You say, not letting the man''s lecherous gaze intimidate you. "I will play the little bitch for you, but on my terms." You let your assertive words sink in for a moment before continuing.'
+							' '
+							'"You will pay me DOUBLE what you took and, after we are done, I don''t have to deal with you anymore."'
+							'The man laughs, "Ha ha, take a look at this slut, thinking she can boss me around." The oaf suddenly slaps you across the face without warning, the loud smack echoing in the empty hallway.'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/yurikev/avatars/slap.jpg"></center>'
+							'Your cheek stings hotly but you don''t flinch. You keep staring him in the eyes with a stern look, refusing to submit.'
+							' '
+							'The man looks shocked, realizing that you are not playing around.'
+							'"Ok then, girl, have it your way. Come on in"'
+							prosmoneyhot = 0
 
-						act 'Enter the room':gt 'HotelWork','firsthotelprosevent'
-					elseif pcs_dom > 0:
-						'"Yes I have. "You say, looking meekly at his masculine form. "I really need that money back, so just tell me what to do." You hope that doing whatever he says will allow you to walk away with what he stole.'
-						' '
-						'"Just bring that tight ass in here and have some fun with us. I promise you''ll get what you''re after." The devious look on his face gives you second thoughts, but you enter the room anyways, feeling completely out of options.'
-						prosmoneyhot = 1
+							act 'Enter the room':gt 'HotelWork','firsthotelprosevent'
+						end
+					else
+						act 'Yes, but I want double my money back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+					gs 'willpower', 'prostitution', 'self'
+					if will_cost <= pcs_willpwr:
+						act 'Yes, but I want all my money back (<<will_cost>> Willpower)':
+							cla
+							gs 'willpower', 'prostitution', 'self'
+							gs 'willpower', 'pay', 'self'
+							gs 'stat'
+							'"Yes I have. "You say, looking meekly at his masculine form. "I really need that money back, so just tell me what to do." You hope that doing whatever he says will allow you to walk away with what he stole.'
+							' '
+							'"Just bring that tight ass in here and have some fun with us. I promise you''ll get what you''re after." The devious look on his face gives you second thoughts, but you enter the room anyways, feeling completely out of options.'
+							prosmoneyhot = 1
 
-						act 'Enter the room':gt 'HotelWork','firsthotelprosevent'
+							act 'Enter the room':gt 'HotelWork','firsthotelprosevent'
+						end
 					else
+						act 'Yes, but I want all my money back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+					act 'Yes, I need my money back':
+						cla
 						'"Y.. Y.. yes I have." You say with a quivering voice. "I need that money back, please! I''ll do anything you ask!" You beg and drop your eyes to the floor in submission.'
 						''
 						'"Just bring that tight ass in here and have some fun with us. I promise you''ll get what you''re after." The devious look on his face gives you second thoughts, but you enter the room anyways, feeling completely out of options.'
@@ -306,11 +338,19 @@ if $ARGS[0] = 'maid':
 			maidtime += 1
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.corr.jpg"></center>'
 			'After several hours of hard work, you finish your maid shift. You return to the locker room and take off the skimpy maid uniform, putting your own clothes back on. Leaving the uniform in a neat pile on the table, you grab your things and make your way to the hotel lobby. On you way to the lobby you pass the room where the 2 men were enjoying themselves with a girl. You try to resist the urge to peep again.'
-			act'Walk past the door an go to the lobby':
-				threesomewatched = 0
-				threesometojoin = 0
-				pavhotprosQW = 1
-				gt 'hotelhole'
+			gs 'willpower', 'voyeur', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'Walk past the door and go to the lobby (<<will_cost>> Willpower)':
+					gs 'willpower', 'voyeur', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					threesomewatched = 0
+					threesometojoin = 0
+					pavhotprosQW = 1
+					gt 'hotelhole'
+				end
+			else
+				act'Walk past the door and go to the lobby (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 			act'Peep through the keyhole':
 				*clr & cla
@@ -318,11 +358,19 @@ if $ARGS[0] = 'maid':
 				'You bend your knees and squat in front of the keyhole. You can see one of the guys roughly fucking the girl.'
 				gs 'arousal', 'voyeur_sex', 2
 				gs 'stat'
-				act 'Leave before someone notices you':
-				threesomewatched = 0
-				threesometojoin = 0
-				pavhotprosQW = 1
-				gt 'hotelhole'
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Leave before someone notices you (<<will_cost>> Willpower)':
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						threesomewatched = 0
+						threesometojoin = 0
+						pavhotprosQW = 1
+						gt 'hotelhole'
+					end
+				else
+					act 'Leave before someone notices you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 				act 'Where is the other guy?':
 					*clr & cla
@@ -343,9 +391,11 @@ if $ARGS[0] = 'maid':
 						money = 0
 						totalmon = totalmon + montake
 						mongiveback = totalmon - 1000
+						! if total money paid is over 1000 then jump to fire the event below instead
+						! for example paying 500 rubles twice will cause the quest to continue even though each individual time Sveta does not have 1000 rubles on her
 						if totalmon => 1000:
-							 money = money + mongiveback
-							 jump 'enoughmoney'
+							money = money + mongiveback
+							jump 'enoughmoney'
 						end
 						gs 'pain', 5, 'asscheeks', 'hit'
 						'"What the hell, only <<montake>> <b>₽</b>? Our show is worth much more than this. The only thing you get for this chump change is one slap on the ass." He then forcefully turns you around and gives you a hard smack on the ass before gripping your arm and pushing you out the door.'
@@ -356,6 +406,7 @@ if $ARGS[0] = 'maid':
 						act'Continue':gt 'hotelhole'
 					end
 					if money => 1000:
+						money -= 1000
 						if totalmon = 0:
 							money -= 1000
 						else
@@ -367,9 +418,8 @@ if $ARGS[0] = 'maid':
 
 						act 'Sit and enjoy the show':
 							*clr & cla
+							gs 'arousal', 'voyeur_sex', 20
 							gs 'stat'
-							pcs_horny += 10
-							minut += 20
 							'<center><img <<$set_imgh>> src="images/shared/sex/mmf/fbdranal.jpg"></center>'
 							'While the girl continues eagerly sucking the first man''s dick, the other one comes up behind her, grabs her by the waist and, without a second thought, thrusts his cock into her ass. The poor girl yelps in pain, the sound muffled by the huge cock in her mouth. She was clearly not ready for that.'
 							' '
@@ -381,11 +431,17 @@ if $ARGS[0] = 'maid':
 							'The girl obediently continues sucking but looks at the man with pleading eyes, hoping this would convince him to stop. Unfortunately for her the cruel bastard takes this as encouragement. '
 							'Without warning the man grabs one of her nipples and gives it a firm twist. You are sure that if the girl didn''t have a mouth full of dick, her scream would have been loud enough for the entire floor to hear.'
 							'Finally the man relents from his torture and starts focusing on her mouth again. He places both hands on her head and begins face-fucking her, pushing his big cock into her mouth all the way to the base. You reckon that this girl is a deep throat specialist as she seems unfazed by the rough throat-fucking.'
-
-							act 'Continue to watch in silence':
-								*clr & cla
-								gs 'stat'
-								pcs_horny += 20
+							
+							gs 'willpower', 'mast', 'resist'
+							if will_cost <= pcs_willpwr:
+								act 'Continue to watch in silence (<<will_cost>> Willpower)':
+									*clr & cla
+									gs 'willpower', 'mast', 'resist'
+									gs 'willpower', 'pay', 'resist'
+									gs 'arousal', 'voyeur_sex', 20
+									gs 'arousal', 'end'
+									gs 'stat'
+									
 									'<center><img <<$set_imgh>> src="images/shared/sex/mmf/fbdrdp.jpg"></center>'
 									'"Let''s give our audience a proper show." The man says as he slides his slimy dick out of the slut''s abused esophagus.'
 									'The second guy happily agrees and shows his enthusiasm by roughly spanking the girl. "You heard him, bitch! Sit on my cock so I can pound that filthy cunt from below." He crudely orders.'
@@ -400,37 +456,40 @@ if $ARGS[0] = 'maid':
 									'One of the men steps off the bed and walks to you, "Ok whore, show''s over." He grips your arm like a vice and pushes you out the door.'
 									'"If you want your money back, maybe next time you''ll think about joining the show instead of just watching." says the man before closing the door in your face. You think about pounding on the door and demanding you money back from the thief, but decide not to push your luck.'
 
-								act 'Go to the lobby':gt 'hotelhole'
-							end
-							if pcs_horny > 90:
-								act 'Start touching yourself':
-									*clr & cla
-									gs 'stat'
-									pcs_horny = 0
-									stat['mast'] += 1
-									orgasm += 1
-									pcs_mood += 15
-									pcs_willpwr += 15
-									'<center><img <<$set_imgh>> src="images/shared/sex/mast/finger.jpg"></center>'
-									'You can''t take it any longer and you start moving your hand towards your pussy. You begin rubbing your swelling womanhood through your clothes.'
-									'"It looks like our audience is really enjoying herself, so let''s give her a proper show." The man says as he slides his slimy dick out of the slut''s abused esophagus.'
-									'The second guy happily agrees and shows his enthusiasm by roughly spanking the girl. "You heard him, bitch, sit on my cock so I can pound that filthy cunt from below." He crudely orders.'
-									'The girl''s cheeks blush bright red. "She must really love being humiliated and fucked for an audience." You think to yourself. You can''t help but wonder why, and if you''d be the same in this situation.'
-									' '
-									'Meanwhile, the guy who was fucking her ass lies down on the bed and she obediently climbs on top of him. The controlling man wastes no time and shoves his cock in her main fuckhole with one powerful thrust. He begins jackhammering his swollen rod in and out of her needy twat. You can see her nails digging into the man''s torso as she happily endures the rough fucking, a blissful smile stretching her lips.'
-									'"I wish all our bitches would be so eager to please" comments the other man while casually moving behind the girl and his friend.'
-									'He firmly plants one of his hands on her hip and guides his stiff cock to her vulnerable anus with the other. You can see a glimpse of fear on her face the second before the man leans forwards and buries his member balls deep in her ass. You feel bad for the used whore, but you can''t help but feel your own juices soaking your thighs as the show continues. Both of the strong, virile men show no mercy as they pound away at her holes, randomly squeezing her tits and spanking her ass between their thrusts.'
-									' '
-									'<center><img <<$set_imgh>> src="images/shared/sex/mmf/fbdrdp.jpg"></center>'
-									'You see the girl turning her head and seductively looking in your direction while biting her lip, the desire burning in her eyes.'
-									'Your heart flutters as you start rubbing your clit vigorously, maintaining eye contact with the other woman.'
-									'Soon you feel a hot wave of bliss spreading over your entire body. You shudder but keep your eyes focused on the threesome in front of you as an orgasm soaks your fingers.'
-									'The men continue relentlessly pounding, their stamina seemingly endless. You notice the young woman''s breath becoming more and more ragged until she suddenly throws her head back and screams in an earth-shattering orgasm. Taking their cue, the men both pick up their pace before groaning in unison as they flood the girls bowels and cunt with their cum. After a moment the two boys shove the girl out from between them carelessly, now finished with their fucktoy. The satisfied slut immediately collapses on the bed, utterly spent, thick globs of seed slowly leaking from her used holes.'
-									'One of the men steps off the bed and walks to you, "Ok whore, show''s over." He grips your arm like a vice and pushes you out the door.'
-									'"If you want your money back, maybe next time you''ll think about joining the show instead of just watching." says the man before closing the door in your face. You think about pounding on the door and demanding you money back from the thief, but decide not to push your luck.'
-
 									act 'Go to the lobby':gt 'hotelhole'
 								end
+							else
+								act 'Continue to watch in silence (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+							end
+							
+							act 'Start touching yourself':
+								*clr & cla
+								pcs_horny = 0
+								stat['mast'] += 1
+								orgasm += 1
+								pcs_mood += 15
+								gs 'arousal', 'end'
+								gs 'stat'
+								
+								'<center><img <<$set_imgh>> src="images/shared/sex/mast/finger.jpg"></center>'
+								'You can''t take it any longer and you start moving your hand towards your pussy. You begin rubbing your swelling womanhood through your clothes.'
+								'"It looks like our audience is really enjoying herself, so let''s give her a proper show." The man says as he slides his slimy dick out of the slut''s abused esophagus.'
+								'The second guy happily agrees and shows his enthusiasm by roughly spanking the girl. "You heard him, bitch, sit on my cock so I can pound that filthy cunt from below." He crudely orders.'
+								'The girl''s cheeks blush bright red. "She must really love being humiliated and fucked for an audience." You think to yourself. You can''t help but wonder why, and if you''d be the same in this situation.'
+								' '
+								'Meanwhile, the guy who was fucking her ass lies down on the bed and she obediently climbs on top of him. The controlling man wastes no time and shoves his cock in her main fuckhole with one powerful thrust. He begins jackhammering his swollen rod in and out of her needy twat. You can see her nails digging into the man''s torso as she happily endures the rough fucking, a blissful smile stretching her lips.'
+								'"I wish all our bitches would be so eager to please" comments the other man while casually moving behind the girl and his friend.'
+								'He firmly plants one of his hands on her hip and guides his stiff cock to her vulnerable anus with the other. You can see a glimpse of fear on her face the second before the man leans forwards and buries his member balls deep in her ass. You feel bad for the used whore, but you can''t help but feel your own juices soaking your thighs as the show continues. Both of the strong, virile men show no mercy as they pound away at her holes, randomly squeezing her tits and spanking her ass between their thrusts.'
+								' '
+								'<center><img <<$set_imgh>> src="images/shared/sex/mmf/fbdrdp.jpg"></center>'
+								'You see the girl turning her head and seductively looking in your direction while biting her lip, the desire burning in her eyes.'
+								'Your heart flutters as you start rubbing your clit vigorously, maintaining eye contact with the other woman.'
+								'Soon you feel a hot wave of bliss spreading over your entire body. You shudder but keep your eyes focused on the threesome in front of you as an orgasm soaks your fingers.'
+								'The men continue relentlessly pounding, their stamina seemingly endless. You notice the young woman''s breath becoming more and more ragged until she suddenly throws her head back and screams in an earth-shattering orgasm. Taking their cue, the men both pick up their pace before groaning in unison as they flood the girls bowels and cunt with their cum. After a moment the two boys shove the girl out from between them carelessly, now finished with their fucktoy. The satisfied slut immediately collapses on the bed, utterly spent, thick globs of seed slowly leaking from her used holes.'
+								'One of the men steps off the bed and walks to you, "Ok whore, show''s over." He grips your arm like a vice and pushes you out the door.'
+								'"If you want your money back, maybe next time you''ll think about joining the show instead of just watching." says the man before closing the door in your face. You think about pounding on the door and demanding you money back from the thief, but decide not to push your luck.'
+
+								act 'Go to the lobby':gt 'hotelhole'
 							end
 						end
 					end
@@ -518,30 +577,31 @@ if $ARGS[0] = 'maid':
 				maidcheck_2 = daystart
 				hotelcouple = max(1 , hotelcouple)
 				gs 'stat'
-				'While you are cleaning the room, a man, a woman and 2 young children enter the room. When the man sees you he says : " Oh girl you are sent by the heavens, can you please take my children for a walk so my wife and I can spent some ''alone'' time."'
-				'he pushes 100 <b>₽</b> into your hands and then pushes you out the door with the 2 young children. So before you even had a chance to reply you were standing there with 100 <b>₽</b> in your hand and the 2 little brats looking at you.'
+				'While you are cleaning the room, a man, a woman and 2 young children enter the room. When the man sees you he says : " Oh girl you are sent by the heavens, can you please take my children for a walk so my wife and I can spend some ''alone'' time."'
+				'He pushes 100 <b>₽</b> into your hands and then pushes you out the door with the 2 young children. So before you even had a chance to reply you were standing there with 100 <b>₽</b> in your hand and the 2 little brats looking at you.'
 				money += 100
 				minut += 60
 				if month > 5 and month < 10 and sunWeather = 1:
 					act 'Take the children to the playground next to the hotel.':
-							childrenplayground = rand(0,1)
-							cla
-							if childrenplayground = 0:
+						childrenplayground = rand(0,1)
+						cla
+						if childrenplayground = 0:
 							pcs_mood += 10
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/children.jpg"></center>'
 							'You let the children play around for an hour while you relax on a bench.'
 							'You take the children back to the parent''s room and continue your work.'
 							act'Continue':gt 'hotelwork', 'maid'
-							end
-							if childrenplayground = 1:
-							money -= 100
+						end
+						if childrenplayground = 1:
+							pcs_mood += 10
+							money -= 50
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/children.jpg"></center>'
 							'You let the children play around for an hour while you relax on a bench.'
-							'When it is time to leave you call out to the children but they are nowhere to be found. Then you notice them next to an ice cream truck happily eating some ice cream. You had to use the money you received from their father to pay for it.'
+							'When it is time to leave you call out to the children but they are nowhere to be found. Then you notice them next to an ice cream truck happily eating some ice cream. You had to use half the money you received from their father to pay for it.'
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/children3.jpg"></center>'
 							'You take the children back to the parent''s room and continue your work'
 							act'Continue':gt 'hotelwork', 'maid'
-							end
+						end
 					end
 				else
 					act 'Take the children to the hotel conference room':
@@ -578,82 +638,123 @@ if $ARGS[0] = 'maid':
 				'Just when you were about to leave the room you notice that the man is sitting on the edge of the bed and is on the verge of tears. He doesn''t know what to do now.'
 
 				act'Leave the room':gt 'hotelwork', 'maid'
+				
+				gs 'willpower', 'hj', 'self'
+				if will_cost <= pcs_willpwr:
+					act'Try to cheer up the man with your hands (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'hj', 'self'
+						gs 'willpower', 'pay', 'self'
+						gs 'arousal', 'hj', 10
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/maidhj.jpg"></center>'
+						'Just when you were about to leave the room you notice that the man is sitting on the edge of the bed and is on the verge of tears. He doesn''t know what to do now. Then you get an idea how to cheer him up a little bit.'
+						if stat['hj'] < 5:
+							pcs_mood -= 5
+							gs 'stat'
 
-				act'Try to cheer up the man with your hand':
-					*clr & cla
-					gs 'stat'
-					gs 'arousal', 'hj', 10
-					gs 'arousal', 'end'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/maidhj.jpg"></center>'
-					'Just when you were about to leave the room you notice that the man is sitting on the edge of the bed and is on the verge of tears. He doesn''t know what to do now. Then you get an idea how to cheer him up a little bit.'
-					if stat['hj'] < 5:
-						'You move to the bed and gently place your hand on his bare chest. You push him down on the bed. Then you move your hand down to his waist and take his flaccid penis in your hand. You slowly start moving your hand up and down. The man groans a little bit and you see he was already semi-erect.'
-						'You kept stroking for a few minutes but your technique was not sufficient enough to make him cum. Maybe if you had some more experience with your hands you could have given him a happy ending.'
-						'"Thanks for trying," he says, but I guess I am not really in the mood right now. He holds his head in his hands and shows a defeated look. Leaving the man like this does not make you feel very happy.'
-						pcs_mood -= 10
-					elseif stat['hj'] >= 5:
-						'You move to the bed and gently place your hand on his bare chest. You push him down on the bed. Then you move your hand down to his waist and take his flaccid penis in your hand. You slowly start moving your hand up and down. It only takes a few strokes for the dick to become rock hard.'
-						'The man watches you but doesn''t say anything.'
-						'After stroking him for a few minutes he starts moaning loudly and suddenly his cum starts splashing all over your hand.'
-						'You give him a little smile and he smiles back at you. You are happy you were able to cheer him up. Then you stand up, go wash your hands in the bathroom and leave the room to continue your work.'
-						pcs_mood +=10
-					end
-
-					act'Continue':gt 'hotelwork', 'maid'
-				end
+							'You move to the bed and gently place your hand on his bare chest. You push him down on the bed. Then you move your hand down to his waist and take his flaccid penis in your hand. You slowly start moving your hand up and down. The man groans a little bit and you see he was already semi-erect.'
+							'You kept stroking for a few minutes but your technique was not sufficient enough to make him cum. Maybe if you had some more experience with your hands you could have given him a happy ending.'
+							'"Thanks for trying," he says, but I guess I am not really in the mood right now. He holds his head in his hands and shows a defeated look. Leaving the man like this does not make you feel very happy.'
+						elseif stat['hj'] >= 5:
+							pcs_mood +=10
+							gs 'stat'
 
-				act'Try to cheer up the man with your mouth':
-					*clr & cla
-					gs 'stat'
-					gs 'arousal', 'bj', 10
-					gs 'arousal', 'end'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/maid_blow.jpg"></center>'
-					if stat['bj'] < 5:
-						'You move to the bed and crawled on it. You grab the man by the hip and turn him towards you. Then you moved your head down to his crotch and take his flacid penis in your hand. You place your mouth over the man''s penis and slowly start sucking on it. The man groans a little bit and you feel his dick becoming harder in your mouth.'
-						'You kept blowing him for a few minutes but your technique was not sufficient enough to make him cum. Maybe if you had some more experience with your mouth you could have given him a happy ending.'
-						'"Thanks for trying" he says, but I guess I am not really in the mood right now. He holds his head in his hands and shows a defeated look. Leaving the man like this does not make you feel very happy.'
-						pcs_mood -=10
+							'You move to the bed and gently place your hand on his bare chest. You push him down on the bed. Then you move your hand down to his waist and take his flaccid penis in your hand. You slowly start moving your hand up and down. It only takes a few strokes for the dick to become rock hard.'
+							'The man watches you but doesn''t say anything.'
+							'After stroking him for a few minutes he starts moaning loudly and suddenly his cum starts splashing all over your hand.'
+							'You give him a little smile and he smiles back at you. You are happy you were able to cheer him up. Then you stand up, go wash your hands in the bathroom and leave the room to continue your work.'							
+						end
 
 						act'Continue':gt 'hotelwork', 'maid'
-					elseif stat['bj'] => 5:
-						'You move to the bed and crawled on it. You grab the man by the hip and turn him towards you. Then you moved your head down to his crotch and take his flacid penis in your hand. You place your mouth over the man''s penis and slowly start sucking on it. The man groans a little bit and you feel his dick becoming harder in your mouth.'
-						'The man watches you but doesn''t say anything'
-						'After blowing him for a few minutes the man suddenly stands up, takes your head in his hands and starts moving your head up and down his dick. After 1 minute the man moaned loadly and suddenly you could feel he was about to cum.'
-						act 'Let him cum in your mouth':
-							*clr & cla
+					end
+				else
+					act'Try to cheer up the man with your hands (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+				
+				gs 'willpower', 'bj', 'self'
+				if will_cost <= pcs_willpwr:
+					act'Try to cheer up the man with your mouth (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'bj', 'self'
+						gs 'willpower', 'pay', 'self'
+						gs 'arousal', 'bj', 10
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/maid_blow.jpg"></center>'
+						if stat['bj'] < 5:
+							'You move to the bed and crawled on it. You grab the man by the hips and turn him towards you. Then you moved your head down to his crotch and take his flacid penis in your hand. You place your mouth over the man''s penis and slowly start sucking on it. The man groans a little bit and you feel his dick becoming harder in your mouth.'
+							'You kept blowing him for a few minutes but your technique was not sufficient enough to make him cum. Maybe if you had some more experience with your mouth you could have given him a happy ending.'
+							'"Thanks for trying" he says, but I guess I am not really in the mood right now. He holds his head in his hands and shows a defeated look. Leaving the man like this does not make you feel very happy.'
+							pcs_mood -= 5
 							gs 'stat'
-							gs 'npcgeneratec', 0, 'unlucky stranger', rand(18,45)
-							gs 'boyStat', $npclastgenerated
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/maid_blow2.jpg"></center>'
-							'Several powerful jets of sperm land in your mouth, and you keep sucking until you''re sure he''s finished.'
-							act 'Swallow his load':
-								cla
-								gs 'cum_call','mouth', $npclastgenerated,0
-								swallow += 1
-								'You swallow the man''s sperm diligently.'
-								'You give him a little smile and he smiles back at you. You are happy you were able to cheer him up. Then you stand up to leave the room and continue your work.'
-								pcs_mood +=10
-								act'Continue':gt 'hotelwork', 'maid'
-							end
-							act 'Spit it out':
-								cla
-								gs 'cum_call','mouth', $npclastgenerated,0,'','',10
-								'once the man spent his load in your mouth you stand up, go to the bathroom and spit out the load in the toilet. You move back in to the room and you give him a little smile, he smiles back at you. You are happy you were able to cheer him up. Then you leave the room to continue your work.'
-								pcs_mood +=10
-								act'Continue':gt 'hotelwork', 'maid'
-							end
-						end
-						act 'Take his cock out of your mouth':
-							cla
-							spafinloc = 11
-							gs 'cum_manage'
-							'You quickly move your head back and suddenly the cock starts spurting jets of sperm on to your face.'
-							'You give the man a little smile and he smiles back at you. You are happy you were able to cheer him up. Then you stand up to leave the room and continue your work.'
-							pcs_mood +=10
 
 							act'Continue':gt 'hotelwork', 'maid'
+						elseif stat['bj'] => 5:
+							'You move to the bed and crawled on it. You grab the man by the hip and turn him towards you. Then you moved your head down to his crotch and take his flacid penis in your hand. You place your mouth over the man''s penis and slowly start sucking on it. The man groans a little bit and you feel his dick becoming harder in your mouth.'
+							'The man watches you but doesn''t say anything'
+							'After blowing him for a few minutes the man suddenly stands up, takes your head in his hands and starts moving your head up and down his dick. After 1 minute the man moaned loadly and suddenly you could feel he was about to cum.'
+							act 'Let him cum in your mouth':
+								*clr & cla
+								gs 'stat'
+								gs 'npcgeneratec', 0, 'unlucky stranger', rand(18,45)
+								gs 'boyStat', $npclastgenerated
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/maid_blow2.jpg"></center>'
+								'Several powerful jets of sperm land in your mouth, and you keep sucking until you''re sure he''s finished.'
+								gs 'willpower', 'swallow', 'self'
+								if will_cost <= pcs_willpwr:
+									act 'Swallow his load (<<will_cost>> Willpower)':
+										cla
+										gs 'cum_call','mouth', $npclastgenerated,0
+										swallow += 1
+										pcs_mood += 10
+										gs 'willpower', 'swallow', 'self'
+										gs 'willpower', 'pay', 'self'
+										gs 'stat'
+										
+										'You swallow the man''s sperm diligently.'
+										'You give him a little smile and he smiles back at you. You are happy you were able to cheer him up. Then you stand up to leave the room and continue your work.'
+										
+										act'Continue':gt 'hotelwork', 'maid'
+									end
+								else
+									act 'Swallow his load (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+								end
+								act 'Spit it out':
+									cla
+									gs 'cum_call','mouth', $npclastgenerated,0,'','',10
+									pcs_mood += 10
+									gs 'stat'
+
+									'After the man spent his load in your mouth you stand up, go to the bathroom and spit out the load in the toilet. You move back in to the room and you give him a little smile, he smiles back at you. You are happy you were able to cheer him up. Then you leave the room to continue your work.'
+
+									act'Continue':gt 'hotelwork', 'maid'
+								end
+							end
+							gs 'willpower', 'cum_outside', 'self'
+							if will_cost <= pcs_willpwr:
+								act 'Take his cock out of your mouth (<<will_cost>> Willpower)':
+									cla
+									spafinloc = 11
+									gs 'cum_manage'
+									pcs_mood += 10
+									gs 'willpower', 'cum_outside', 'self'
+									gs 'willpower', 'pay', 'self'
+									gs 'stat'
+
+									'You quickly move your head back and suddenly the cock starts spurting jets of sperm on to your face.'
+									'You give the man a little smile and he smiles back at you. You are happy you were able to cheer him up. Then you stand up to leave the room and continue your work.'
+
+									act'Continue':gt 'hotelwork', 'maid'
+								end
+							else
+								act 'Take his cock out of your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+							end
 						end
 					end
+				else
+					act'Try to cheer up the man with your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 			elseif maidrand <= 60:
 				minut += 35
@@ -684,7 +785,7 @@ if $ARGS[0] = 'maid':
 						'Uh oh, you hope you''re not in trouble.'
 						'She notices you staring at her jiggling boobs while she approaches you, and grins when she sees your embarrassed look. Then she gives you <<chai>> <b>₽</b>.'
 						'She gives you a sexy smile as she says: "Here, sweetie... for your discretion. You have a nice day now!"'
-						'Still rendered speechless, you realize you really should say something now. You finally manage to mumble: "Ta-, erm... thank you miss", trying to hide the deep red blush on your cheeks. She giggles as she turns around, giving you a lewd grin while she walks back to her room.'
+						'Still rendered speechless, you realize you really should say something now. You finally manage to mumble: "Tha-, erm... thank you miss", trying to hide the deep red blush on your cheeks. She giggles as she turns around, giving you a lewd grin while she walks back to her room.'
 						money+=chai
 						chai=0
 						cla
@@ -699,9 +800,19 @@ if $ARGS[0] = 'maid':
 				'You open the door to the next room, and immediately freeze in place when you hear a loud moaning coming from inside. Curious as you are, you decide to sneak a peek and see what''s happening in the room. You see a couple fucking enthusiastically on the bed, completely oblivious to your presence.'
 				gs 'arousal', 'voyeur_sex', 10
 				gs 'stat'
-
-				act'Get back to work':gt'hotelwork','maid'
-
+				
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Get back to work (<<will_cost>> Willpower)':
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt'hotelwork','maid'
+					end
+				else
+					act'Get back to work (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+				
 				act'Watch them for a while':
 					cla
 					'Making sure you don''t make a sound, you put your things away and watch them for a while, softly fondling yourself through your clothes. It feels great, and the couple on the bed look like they''re having a great time as well. Even though you want to keep watching them, you realize you have to get back to work before you''re missed.'
@@ -717,7 +828,17 @@ if $ARGS[0] = 'maid':
 				gs 'arousal', 'voyeur_sex', 10
 				gs 'stat'
 
-				act'Get back to work':gt'hotelwork','maid'
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Get back to work (<<will_cost>> Willpower)':
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt'hotelwork','maid'
+					end
+				else
+					act'Get back to work (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 
 				act'Watch them for a while':
 					cla
@@ -736,7 +857,17 @@ if $ARGS[0] = 'maid':
 				gs 'arousal', 'voyeur_sex', 10
 				gs 'stat'
 
-				act'Get back to work':gt'hotelwork','maid'
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Get back to work (<<will_cost>> Willpower)':
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt'hotelwork','maid'
+					end
+				else
+					act'Get back to work (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 
 				act'Watch them for a while':
 					cla
@@ -751,10 +882,20 @@ if $ARGS[0] = 'maid':
 			elseif maidrand <= 110:	
 				if maidcheck_4 = daystart: jump 'new_maid_event'
 				maidcheck_4 = daystart
-				act'Get back to work': 
-					gs 'arousal', 'end'
-					gt 'hotelwork', 'maid'
+
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Get back to work (<<will_cost>> Willpower)':
+						gs 'arousal', 'end'
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt'hotelwork','maid'
+					end
+				else
+					act'Get back to work (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
+
 				if IgorevnaBDSM = 0:
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/Anna/peeping/1.jpg"></center>'
 					if lariskaMotherKnown = 1:
@@ -821,7 +962,7 @@ if $ARGS[0] = 'maid':
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/Anna/peeping/5.jpg"></center>'
 					'After the previous experience with this room, you carefully approach it as you''re expecting to see another act, but this blows your expectations away...'
 					if lariskaMotherKnown = 1:
-						'Anna, is on her knees completely naked, collared and leashed by a woman you''ve never seen before.'
+						'Anna is on her knees completely naked, collared and leashed by a woman you''ve never seen before.'
 					else
 						'The brunette is on her knees completely naked, collared and leashed by a woman you''ve never seen before.'
 					end
@@ -1176,7 +1317,17 @@ if $ARGS[0] = 'maid':
 				gs 'arousal', 'voyeur_sex', 10
 				gs 'stat'
 
-				act'Get back to work':gt'hotelwork','maid'
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Get back to work (<<will_cost>> Willpower)':
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt'hotelwork','maid'
+					end
+				else
+					act'Get back to work (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 
 				if hotel_rand1 <= 60:
 					act'Keep watching':
@@ -1216,7 +1367,17 @@ if $ARGS[0] = 'maid':
 				gs 'arousal', 'voyeur_sex', 10
 				gs 'stat'
 
-				act'Get back to work':gt'hotelwork','maid'
+				gs 'willpower', 'voyeur', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Get back to work (<<will_cost>> Willpower)':
+						gs 'willpower', 'voyeur', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt'hotelwork','maid'
+					end
+				else
+					act'Get back to work (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 
 				if hotel_rand1 <= 60:
 					act'Keep watching':

locations/KatjaHome.qsrc

@@ -5,15 +5,15 @@ cla
 gs 'stat'
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_home.jpg"></center>'
 if (hour >= 15 and week < 6 and kanikuli = 0 and hour < 20) or (hour >= 9 and week >= 6 and kanikuli = 0 and hour < 20) or (hour >= 9 and kanikuli > 0 and hour < 20):
-	'The door is opened by Katjas mother. "Hello <<$pcs_nickname>>. Katja is in her room. Come in."'
+	'The door is opened by Katja''s mother. "Hello <<$pcs_nickname>>. Katja is in her room, come on in."'
 
 	act 'Go to Katjas room':
 		if frost > 0: frost = 0
 		gt'KatjaHomeTalk'
 	end
 else
-	if hour >= 9:'The door is opened by Katjas mother. "Oh, hello <<$pcs_nickname>>. Katja isn''t home right now."'
-	if hour < 9:'The door is opened by Katjas mother. "<<$pcs_nickname>>. Shouldn''t you be in bed? You shouldn''t come around before nine."'
+	if hour >= 9:'The door is opened by Katja''s mother. "Oh, hello <<$pcs_nickname>>. Katja isn''t home right now."'
+	if hour < 9:'The door is opened by Katja''s mother. "<<$pcs_nickname>>. Shouldn''t you be in bed? You shouldn''t come around before nine."'
 
 	act 'Say goodbye and go home':gt 'pavResidential'
 end

locations/KatjaHomeTalk.qsrc

@@ -19,7 +19,7 @@ if $ARGS[0] = '':
 			if KatjaHorny >= 50:
 				'Katja takes you in the bathroom. Blushing, she says, "I think I''ll join you."'
 
-				act 'Wash alone':
+				act 'Have the shower alone':
 					cls
 					noShampoo = 1
 					dynamic $showerdin
@@ -175,9 +175,9 @@ if $ARGS[0] = '':
 						exit
 					end
 				else
-					'Katja biting her lip and without looking you in the eye, finally plucks up the courage and says, "<<$pcs_nickname>>, i am pregnant."'
+					'Katja biting her lip and without looking you in the eye, finally plucks up the courage and says, "<<$pcs_nickname>>, I am pregnant."'
 
-					act 'Whos is it?':
+					act 'Whose is it?':
 						cls
 						minut += 5
 						knowKatjaPreg = 1
@@ -511,7 +511,7 @@ if $ARGS[0] = 'shower_kiss_home':
 	elseif KatjaSlut < 10:
 		'Katja gently caresses your clitoris with her fingers and her lips begin to kiss your neck, slowly making her way down.'
 	end
-
+	
 	act 'Sit on the edge of the tub':
 		cls
 		KatjaHorny -= 10
@@ -536,24 +536,29 @@ if $ARGS[0] = 'shower_kiss_home':
 			gt 'KatjaHomeTalk'
 		end
 	end
+	
+	gs 'willpower', 'cuni', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Remove her hands (<<will_cost>> Willpower)':
+			cls
+			minut += 5
+			pcs_horny += 10
+			KatjaDom -= 1
+			KatjaHorny -= 10
+			KatjaLust += 1
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big14.jpg"></center>'
+			'You remove her hands and smile at her. Then you dismiss Katja, who shyly looks to the floor and leaves the bathroom.'
 
-	act 'Remove her hands':
-		cls
-		pcs_dom += 1
-		minut += 5
-		pcs_horny += 10
-		KatjaDom -= 1
-		KatjaHorny -= 10
-		KatjaLust += 1
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big14.jpg"></center>'
-		'You remove her hands and smile at her. Then you dismiss Katja, who shyly looks to the floor and leaves the bathroom.'
-
-		act 'Get out of the shower':
-			gs 'arousal', 'end'
-			gt 'KatjaHomeTalk'
+			act 'Get out of the shower':
+				gs 'arousal', 'end'
+				gt 'KatjaHomeTalk'
+			end
 		end
-	end
+	else
+		act 'Remove her hands (<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] = 'Sextalk':

locations/Katja_Tanga.qsrc

@@ -5,44 +5,47 @@ if $ARGS[0] = 'secretroom':
 	if katschoolsex = 0: katschoolsex = 1 & ! Flag sex with Kate at the school
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_4.jpg"></center>'
 	'You hurry down the hall hand and hand with Katja towards the storage room she told you about. Each of you trying to pull up the others skirt. Once at the door she pulls out a key and unlocks the door, as she does you grab and squeeze her ass. As she pushes open the door she turns towards you and you both immediately start kissing and fondling each other. Barely avoid tumbling into the room, absently you manage to close the door and lock it as you''re all over each other.'
-	Act 'Bare her breasts':
+	act 'Bare her breasts':
 		*clr & cla
-		pcs_horny += 10
-		gs'stat'
+		gs 'arousal', 'foreplay', -5, 'lesbian'
+		gs 'arousal', 'kiss', -5, 'lesbian'
+		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_3.jpg"></center>'
 		'As the two of you kiss, you start to unbutton her shirt, she quickly follows suit and soon both of you are topless. You stop kissing her lips and start kissing her neck, then her shoulder, leaving a trail of kisses down to her tits, where you begin to kiss, lick and suck on her nipple, your hand fondles her other breast at the same time. She moans in pleasure, at your touches.'
-		Act 'Work your way to her pussy':
-			pcs_horny += 10
-			gs'stat'
+		act 'Work your way to her pussy':
+			gs 'arousal', 'vaginal_finger_give', -5, 'lesbian'
+			gs 'arousal', 'cuni_give', -5, 'lesbian'
+			gs 'stat'
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_10.jpg"></center>'
 			'After a few minutes of teasing her nipples you kiss your way down to her stomach, pulling off her skirt as you do. Your lips descend down her body and you begin kissing and teasing her clit with your tongue. You pull her down and gentle lay her down on her back, once she is laying down you slide two of your fingers into her wet pussy and begin to finger fuck her. She moans in pleasure, as her hands run all over her own body, as squeezes her own breasts.'
 			if (middildo = 1 or dildo = 1 or largedildo = 1 ) and pcs_vag > 15:
 				act 'Get dildo':
-					pcs_horny += 10
-					gs'stat'
+					gs 'arousal', 'vaginal_finger_give', -5, 'lesbian'
+					gs 'stat'
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_5.jpg"></center>'
 					'Katja''s pussy becomes soaking wet and you can tell she would like something bigger than your fingers in her. Reaching over to your bag you pull out your dildo and slide it up between her breasts so show her what you have in store for her. Katja''s eyes widen slightly at the sight of the dildo but she quickly pulls your hand up holding the dildo and begins to suck on the dildo. Her moans of pleasure audible as she sucks the dildo as you continue to finger fuck her.'
 					act 'Fuck Katja':
-						pcs_horny += 20
+						gs 'arousal', 'vaginal_dildo_give', -5, 'lesbian'
+						gs 'arousal', 'rimming_give', -5, 'lesbian'
 						KatjaHorny = 0
 						KatjaSlut += 2
 						KatjaLust += 2
-						gs'stat'
+						gs 'stat'
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_9.jpg"></center>'
 						'Katja, begins moaning louder and bucking her hips against your fingers. You pull the dildo out of her mouth and your fingers out of her twat. You roll her over onto her stomach, as you slide down till your face is over her ass as you slip the wet dildo into her soaking wet pussy and begin to stroke the dildo deeply in her pussy. With your other hand you pull her ass cheeks apart and being to lick her asshole. Stroking the dildo as deep into her as it will go, she moans with pleasure getting ever louder. She beings to arch her hips up trying to take even more of the dildo into herself, but there is no more to give her. Instead you stick your tongue in her ass and begin to tongue fuck her ass. This brings even louder moans and before long she starts bucking her hips as her body spasms in an intense orgasm, as she cums.'
 						act'Use dildo':
 							*clr & cla
-							pcs_horny = 0
-							pcs_mood -= 15
-							pcs_willpwr = pcs_willpwr + 15
-							orgasm = orgasm + 1
-							vaginalOrgasm += 1
-							gs'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_7.jpg"></center>'
-							'As her quivering body subsides and her panting breath gets under control. You pull the dildo out of her pussy and your tongue out of her ass, you lay back looking at her. She gives you a dreamy smile and reaches over to take the dildo out of your hand. She gets up and sits down between your legs. She lifts them up and then drags you closer continuing to lift your hips till your butt rest just under her breasts and your shoulders and head are the only parts of your body still touching the floor. "You`re so beautiful I want to eat you out" Katja whispers, moments later she starts licking your pussy before her tongue darts inside of your pussy. As your pussy becomes soaked at her attentions you reach up and grab her hair, moaning "Yes, faster, faster." You moan and whine wanting more, for several minutes she only uses her tongue. Then she pulls her face away and slides the dildo into your sopping wet pussy and beings fucking you furiously with the dildo. With her other hand she slips one of her fingers in your ass and begins to finger fuck your ass at the same time. You can''t take it and quickly orgasm, your pussy over flowing with your juices, you feel them running down your stomach as the intense orgasm rocks your body.'
+							'As her quivering body subsides and her panting breath gets under control. You pull the dildo out of her pussy and your tongue out of her ass, you lay back looking at her. She gives you a dreamy smile and reaches over to take the dildo out of your hand. She gets up and sits down between your legs. She lifts them up and then drags you closer continuing to lift your hips till your butt rest just under her breasts and your shoulders and head are the only parts of your body still touching the floor. "You`re so beautiful I want to eat you out" Katja whispers, moments later she starts licking your pussy before her tongue darts inside of your pussy. As your pussy becomes soaked at her attentions you reach up and grab her hair, moaning "Yes, faster, faster." You moan and whine wanting more, for several minutes she only uses her tongue. Then she pulls her face away and slides the dildo into your sopping wet pussy and beings fucking you furiously with the dildo. With her other hand she slips one of her fingers in your ass and begins to finger fuck your ass at the same time.'
+							$orgasm_txt = 'You can''t take it and quickly orgasm, your pussy over flowing with your juices, you feel them running down your stomach as the intense orgasm rocks your body.'
+							$orgasm_or = 'custom'
+							gs 'arousal', 'anal_finger', -5, 'lesbian'
+							gs 'arousal', 'cuni', -5, 'lesbian'
+							gs 'arousal', 'end'
+							gs 'stat'
 							''
 							'After your orgasm subsides, she pulls her finger and the dildo out of you. Then she extends the dildo down to your mouth, opening your mouth as she slides the wet dildo into your mouth, as happily sucks your own pussy juices off it. Katja watches you with hungry eyes and biting her lower lip as you finish cleaning the dildo with your mouth. "That was amazing, I bet all the boys will be walking to their classes with erections thinking about what we was doing." She says and you both laugh, before getting quickly get dressed, knowing if you don''t hurry you will be late to class.'
 							act 'Continue': gt 'gschool_lessons', 'short_break'
@@ -52,21 +55,23 @@ if $ARGS[0] = 'secretroom':
 			end
 			act 'Tongue fuck Katja':
 				*clr & cla
-				pcs_horny += 20
+				gs 'arousal', 'cuni_give', -10, 'lesbian'
 				KatjaHorny = 0
 				KatjaSlut += 2
 				KatjaLust += 2
-				gs'stat'
+				gs 'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_8.mp4"></video></center>'
 				'Pulling your fingers out of her twat, you run your lips down her inner thighs, till your lips are back on her clit. You kiss, lick and tease her clit with your tongue, she moans in pleasure raising her hips to try and force your tongue into her, as her wetness soaks her inner thighs and your face. Finally you slip your tongue inside of her pussy, she moans loudly and bucks against your face at first. Then she reaches down and grabs your hair, holding your head in place she grinds her crotch against your face as you tongue fuck her pussy, completely covering your face with her pussy juices. After several minutes she being moaning loudly as she cums.'
 				act 'Katja returns the favor':
 					*clr & cla
-					lesbian += 1
-					orgasm += 1
-					pcs_horny = 0
-					gs'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_6.jpg"></center>'
-					'Katja gets up and pushes you down on all fours, then she lays down with her face between your legs under your pussy. She sucks on her fingers for a moment before lifting them up and sliding two of them into your pussy, she beings to finger fuck you, while her thumb works on your clit, she knows all the right spots. It feels amazing, it takes no time before you are moaning loudly, while your juices run down your inner thighs. Pulling her fingers out she lefts up her head and begins to lick your pussy, while her fingers still wet from your pussy slide into your asshole. First one finger and then two fingers, she eats your pussy as she finger fucks your ass. Unable to take it anymore as convulsions run throughout your body, you orgasm hard. Your legs shaking, you can barely keep yourself from collapsing on her.'
+					'Katja gets up and pushes you down on all fours, then she lays down with her face between your legs under your pussy. She sucks on her fingers for a moment before lifting them up and sliding two of them into your pussy, she beings to finger fuck you, while her thumb works on your clit, she knows all the right spots. It feels amazing, it takes no time before you are moaning loudly, while your juices run down your inner thighs. Pulling her fingers out she lefts up her head and begins to lick your pussy, while her fingers still wet from your pussy slide into your asshole. First one finger and then two fingers, she eats your pussy as she finger fucks your ass.'
+					$orgasm_txt = 'Unable to take it anymore as convulsions run throughout your body, you orgasm hard. Your legs shaking, you can barely keep yourself from collapsing on her.'
+					$orgasm_or = 'custom'
+					gs 'arousal', 'anal_finger', -5, 'lesbian'
+					gs 'arousal', 'cuni', -5, 'lesbian'
+					gs 'arousal', 'end'
+					gs 'stat'
 					''
 					'Waiting until you recover from your orgasm, Katja looks at you biting her lip and says. "That was amazing, I bet all the boys will be walking to their classes with erections thinking about what we was doing in here." You both laugh as quickly get dress, knowing if you don''t hurry you will be late to class.'
 					act 'Continue': gt 'gschool_lessons', 'short_break'
@@ -78,7 +83,7 @@ end
 
 
 if $ARGS[0] = 'start':
-	gs'stat'
+	gs 'stat'
 	CLOSE ALL
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big14.jpg"></center>'
 	'You did a quick turn, causing your skirt to twirl up. For a brief moment exposing your lack of panties. Katja''s eyes widened in surprise. "You''re not wearing panties?" She whispers to you.'
@@ -145,15 +150,17 @@ if $ARGS[0] = 'school3':
 	cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_1.jpg"></center>'
 	'You give a slightly disappointed frown. "So still wearing panties huh.", Katja blushes and whispers to you. "Yes but I''m not wearing a bra."'
-	Act 'Share':
+	act 'Share':
 		*clr & cla
-		pcs_horny += 10
-		gs'stat'
+		gs 'arousal', 'voyeur', -5
+		gs 'arousal', 'foreplay', -5, 'lesbian'
+		gs 'arousal', 'end'
+		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_2.jpg"></center>'
 		'Katja looks around to make sure that no one is watching the two of you. Then she unbuttons her shirt and pulls it open to reveal her bare breasts. With a smile you reach up and grab both her breasts in your hands and tease her nipples with your fingers, eliciting a moan of pleasure from her.'
 		if pcs_horny >= 50 and KatjaHorny >= 50 and npc_sex['A14'] > 0 and mesec <= 0:
 			'Blushing Katja pulls away from your touch and buttons her shirt back up, but looks at you slyly and says. "I have a key to a storage closet, we can go there for a bit more privacy if you want." Giving you a hopeful look that you will agree.'
-			Act 'Go': gt 'Katja_tanga', 'secretroom'
+			act 'Go': gt 'Katja_tanga', 'secretroom'
 		else
 			'Blushing Katja pulls away from your touch and buttons her shirt back up, looking around to see if anyone had seen you grabbing her tits. "<<$pcs_nickname>> Are you crazy? Anyone could have seen us and what would they say?". '
 		end
@@ -162,34 +169,36 @@ if $ARGS[0] = 'school3':
 end
 
 if $ARGS[0] = 'school4':
-	*clr
-	cla
+	*clr & cla
 	!katschoolsex=1 Flag sex with Katja at the school
 	KatjaSlut += 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_1.jpg"></center>'
 	'Katja quickly lifted her skirt, showing her ass while wearing a thong. "You''re back to wearing panties again?" you cried. Katja hissed at you. "So? It''s not like you haven''t seen everything before."'
 	act 'Denied':
 		*clr & cla
-		pcs_horny += 10
-		n_tanga+=1 & ! local variable
+		gs 'arousal', 'kiss', -5, 'lesbian'
+		n_tanga += 1 & ! local variable
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga_kiss1.jpg"></center>'
 		'Dejected at her reaction. "Fine, whatever.", You said as you turned to go. Katja afraid that she had offended you, grabs your hand and pulls you into a passionate kiss. "Don''t pout sweetie, I''m sorry. Let me make it up to you." she says.'
 		act 'Watch':
 			*clr & cla
-			pcs_horny += 10
+			gs 'arousal', 'voyeur', -5
 			if n_tanga = 1:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_2.jpg"></center>'
 				'Katja sits down on the floor and parts her legs as she pulls aside her panties.'
+				gs 'arousal', 'end'
 			elseif n_tanga = 2:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_3.jpg"></center>'
 				'Turning away from you and bending over Katja lifts up her skirt and pulls down her panties, showing you her lovely ass and pussy. Hearing someone coming she quickly pulls her panties back up and straightens up her skirt, as she smiles to you shyly.'
+				gs 'arousal', 'end'
 			elseif n_tanga => 3:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_4.jpg"></center>'
 				'Turning away from you and bending over Katja lifts up her skirt and pulls down her panties, showing you her lovely ass and pussy. She starts to pull up her panties as you say pouting. "Is that it?"'
-				act '«What that''s all?»':
+				act '"What that''s all?"':
 					*clr & cla
-					pcs_horny += 10
-					Katja_tanga = 1 & ! 1 = Katya without panties 0 = in panties
+					gs 'arousal', 'voyeur', -5
+					gs 'arousal', 'end'
+					Katja_tanga = 1 & ! 1 = Katja without panties 0 = in panties
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_5.jpg"></center>'
 					'Katja looks over her shoulder at you, biting her lower lip she looks around to make sure no one is around and with a mischievous smile. Pulls her panties down further letting them drop around her ankles. "To hell with panties then." She quickly gathers her panties off the floor and sticks them in her purse. Then she twirls in front of you, giving you a fantastic view of her pussy and bare ass.'
 					if KatjaSlut > 80 and n_tanga => 4: param = 1 & ! not come up with another way to switch to the next elseif
@@ -202,10 +211,10 @@ if $ARGS[0] = 'school4':
 end
 
 if $ARGS[0] = 'school5':
-	*clr
-	cla
+	*clr & cla
+	gs 'arousal', 'voyeur', -5
+	gs 'arousal', 'end'
 	KatjaSlut += 1
-	pcs_horny += 10
 	Katja_tanga = 1 & ! 1 = Katya without panties 0 = in panties
 	Katja_tanga_end = 1 & ! Flag of the end of the Event-to start the mini `s Event
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga6_<<i>>.jpg"></center>'
@@ -214,8 +223,9 @@ if $ARGS[0] = 'school5':
 end
 
 if $ARGS[0] = 'dance':
-	minut += 15
-	gs'stat'
+	minut += 10
+	gs 'arousal', 'flash', 5
+	gs 'stat'
 	tangaday = daystart & ! tangaday to operate once a day
 	i=rand(1,3)
 	inhib_exp += rand(1,2)
@@ -227,13 +237,16 @@ if $ARGS[0] = 'dance':
 			KatjaHorny += 10
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco3.jpg"></center>'
 			'But Katja only blushed in embarrassment, clasping her hands. "I''m not as brave as you to go to a dance without my panties on."'
+			gs 'arousal', 'end'
 		elseif KatjaSlut <= 40:
-			pcs_horny += 10
+			gs 'arousal', 'voyeur', -5
+			gs 'arousal', 'end'
 			KatjaHorny += 10
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco4.jpg"></center>'
 			'Katja looked around to make sure no one was watch and then turns away and partially bends over lifting her skirt. Showing you she was wearing a thong and giving you a nice view of her ass.'
 		elseif KatjaSlut <= 60:
-			pcs_horny += 10
+			gs 'arousal', 'voyeur', -5
+			gs 'arousal', 'end'
 			KatjaHorny += 10
 			KatjaSlut += 1
 			if katja_disco_Foto = 0:
@@ -246,14 +259,16 @@ if $ARGS[0] = 'dance':
 			end
 		elseif KatjaSlut <= 80:
 			if	KatjaHorny > 70:
-				pcs_horny += 10
+				gs 'arousal', 'voyeur', -5
 				KatjaHorny += 10
 				KatjaSlut += 1
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_1.jpg"></center>'
 				'Katja resolutely lifts her dress up to her neck,  showing not only her cute little panties, but her beautiful bare breasts. Pulling her dress back down she says. "Now show me your tits."'
 				if pcs_horny > 70 or alko > 1:
-					Act 'Show your tits':
+					act 'Show your tits':
 						*clr & cla
+						gs 'arousal', 'flash', -5
+						gs 'arousal', 'end'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_2.jpg"></center>'
 						'Laughing, you pull aside your dress and reveal one of your bare breasts. Katja looks at you wanting more. "I showed you both of mine." You smile and reply, "Yeah, but you''re wearing panties and I''m not."'
 						act 'Move away': gt'gdkin'
@@ -261,16 +276,20 @@ if $ARGS[0] = 'dance':
 				end
 				act 'Tease her':
 					*clr & cla
+					gs 'arousal', 'flash', -5
+					gs 'arousal', 'end'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_3.jpg"></center>'
 					'You pull at the edge of your dress, exposing just a bit of one of your nipples. Katja indignant squeaks."Hey I showed you mine.",	You responded with a laugh "I already showed you my pussy, so that makes us even."'
 					act 'Move away': gt'gdkin'
 				end
 			else
+				gs 'arousal', 'end'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_4.jpg"></center>'
 				'You began to look on with anticipation, but Katja just pulls down her top showing a little extra cleavage before stopping. After seeing your disappointed look,  she sticks out her tongue and turns away. That redheaded bitch you think and nearly say it, but you hold your tongue.'
 			end
 		else
-			pcs_horny += 10
+			gs 'arousal', 'voyeur', -10
+			gs 'arousal', 'end'
 			KatjaHorny += 10
 			KatjaSlut += 1
 			katja_disco_end = 1 &!Event at the end of the disc

locations/Katlake.qsrc

@@ -8,11 +8,18 @@ gs 'stat'
 
 act 'Ignore her':gt 'Nudelake'
 
-act 'Approach her':
-	cla
-	'You decide to walk up to the girl, and try to start a conversation with her.'
+gs 'willpower', 'misc', 'self', 'easy'
+if will_cost <= pcs_willpwr:
+	act 'Approach her (<<will_cost>> Willpower)':
+		cla
+		gs 'willpower', 'pay', 'self'
+		gs 'stat'
+		'You decide to walk up to the girl, and try to start a conversation with her.'
 
-	act 'Greet':gt 'Katlake', 'znakomstvo'
+		act 'Greet':gt 'Katlake', 'znakomstvo'
+	end
+else
+	act 'Approach her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 end
 
 if $ARGS[0] = 'znakomstvo':

locations/Komp.qsrc

@@ -154,7 +154,7 @@ if $ARGS[0] = 'porno':
 			'<center><img <<$set_imgh>> src="images/shared/accessories/computer/porno.jpg"></center>'
 			'You find a video you think you''d enjoy, and spend some time watching it. Wow, that girl is so lucky...'
 
-			gs 'arousal', 'porn', 60
+			gs 'arousal', 'voyeur_sex', 60
 			gs 'stat'
 
 			act 'The video ends...':gt 'Komp', 'porno'
@@ -187,7 +187,7 @@ if $ARGS[0] = 'masturbate':
 	gs 'stat'
 
 	if pcs_horny >= 100:
-		$orgasm_or = 'custom'
+		$orgasm_or = 'yes'
 		$orgasm_txt = 'Suddenly your muscles tighten and you cum powerfully, while you stifle your moans so your neighbours won''t find out. Afterwards, you have goosebumps all over your skin. That was just what you needed!'
 	end
 
@@ -1013,11 +1013,18 @@ if $ARGS[0] = 'waitclients':
 
 			act 'Continue':gt 'Komp','waitclients'
 		end
-		act 'Refuse to take off your bra':
-			cls
-			webpopular -= 1
-			gt 'Komp','waitclients'
-		end
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse to take off your bra (<<will_cost>> Willpower)':
+				cls
+				webpopular -= 1
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Komp','waitclients'
+			end
+		else
+			act 'Refuse to take off your bra (<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 backmfc = 1 and clientask >= 96 and clientask < 98:
 		cls
@@ -1047,11 +1054,19 @@ if $ARGS[0] = 'waitclients':
 
 			act 'Continue':gt 'Komp','waitclients'
 		end
-		act 'Refuse to take off your panties':
-			cls
-			webpopular -= 1
-			gt 'Komp','waitclients'
-		end
+		
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse to take off your panties (<<will_cost>> Willpower)':
+				cls
+				webpopular -= 1
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Komp','waitclients'
+			end
+		else
+			act 'Refuse to take off your panties (<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 topmfc = 0 and clientask >= 94 and clientask < 96:
 		cls
@@ -1080,11 +1095,18 @@ if $ARGS[0] = 'waitclients':
 
 			act 'Continue':gt 'Komp','waitclients'
 		end
-		act 'Refuse to play with your boobs':
-			cls
-			webpopular -= 1
-			gt 'Komp','waitclients'
-		end
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse to play with your boobs (<<will_cost>> Willpower)':
+				cls
+				webpopular -= 1
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Komp','waitclients'
+			end
+		else
+			act 'Refuse to play with your boobs (<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 backmfc = 0 and clientask = 93:
 		cls
@@ -1120,11 +1142,19 @@ if $ARGS[0] = 'waitclients':
 			end
 			act 'Continue':gt 'Komp','waitclients'
 		end
-		act 'Ignore him':
-			cls
-			webpopular -= 1
-			gt 'Komp','waitclients'
-		end
+		
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Ignore him (<<will_cost>> Willpower)':
+				cls
+				webpopular -= 1
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Komp','waitclients'
+			end
+		else
+			act 'Ignore him (<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 backmfc = 0 and clientask = 92:
 		cls
@@ -1171,11 +1201,18 @@ if $ARGS[0] = 'waitclients':
 
 			act 'Continue':gt 'Komp','waitclients'
 		end
-		act 'Ignore him':
-			cls
-			webpopular -= 1
-			gt 'Komp','waitclients'
-		end
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Ignore him (<<will_cost>> Willpower)':
+				cls
+				webpopular -= 1
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Komp','waitclients'
+			end
+		else
+			act 'Ignore him (<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 backmfc = 0 and pcs_ass >= 30 and webpopular >= 50 and clientask = 91:
 		cls
@@ -1235,10 +1272,18 @@ if $ARGS[0] = 'waitclients':
 			end
 			act 'Continue':gt 'Komp','waitclients'
 		end
-		act 'Ignore him':
-			cls
-			gt 'Komp','waitclients'
-		end
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Ignore him (<<will_cost>> Willpower)':
+				cls
+				webpopular -= 1
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Komp','waitclients'
+			end
+		else
+			act 'Ignore him (<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 webpopular >= 15 and pcs_ass >= 15 and clientask = 89:
@@ -1450,7 +1495,7 @@ if $ARGS[0] = 'waitclients':
 				mfccum += 1
 				pcs_mood = 100
 				gs 'stat'
-				$orgasm_or = 'custom'
+				$orgasm_or = 'yes'
 				$orgasm_txt = 'It feels too good to stop! Before you know it, your fingers are repeatedly penetrating your ass and you moan excitedly, barely keeping yourself from screaming. You just had an anal orgasm in front of <<camclients>> users, completely free of charge! Oops...'
 				gs 'stat'
 			end

locations/Kwlake1.qsrc

@@ -36,7 +36,16 @@ act 'Fondle her':
 		gs 'arousal', 'cuni', 5, 'lesbian'
 		gs 'stat'
 		
-		act 'Break it off':gt 'Nudelake'
+		gs 'willpower', 'sex', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Break it off (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'Nudelake'
+			end
+		else
+			act 'Break it off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 
 		act 'Beckon him to join you':
 			cla

locations/Kwlake2.qsrc

@@ -23,7 +23,16 @@ act '"Alright!"':
 	minut -= 5
 	gs 'stat'
 	
-	act 'That''s enough! Leave before this gets out of hand':gt 'Nudelake'
+	gs 'willpower', 'foreplay', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'That''s enough! Leave before this gets out of hand (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'Nudelake'
+		end
+	else
+		act 'That''s enough! Leave before this gets out of hand (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 
 	act 'Invite the man to join you':
 		cla

locations/LCporn.qsrc

@@ -27,17 +27,23 @@ if $ARGS[0] = 'firsttime':
 
 		act 'Get dressed again':gt 'Lakecafe', 'main'
 	end
+	
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Get out of here (<<will_cost>> Willpower)':
+			*clr & cla
+			npc_rel['A89'] -= 10
+			minut += 7
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'No, no! You quickly squirm past Eugene and leave the pantry, and don''t stop walking until you''re well away from the diner.'
+			LCEugenefirst = 0
 
-	act 'Get out of here':
-		*clr & cla
-		npc_rel['A89'] -= 10
-		minut += 7
-		gs 'stat'
-		'No, no! You quickly squirm past Eugene and leave the pantry, and don''t stop walking until you''re well away from the diner.'
-		LCEugenefirst = 0
-
-		act 'Continue':gt 'nord'
-	end
+			act 'Continue':gt 'nord'
+		end
+	else
+		act 'Get out of here (<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] = 'sex':
@@ -56,11 +62,14 @@ if $ARGS[0] = 'sex':
 		'Eugene grins at you and says: "I was hoping you''d say that. Come on, let me help you."'
 		'She helps you take your clothes off, and lies down on the mattress with you. She slips her <<dick>>cm <<$dick_girth>> dick into your pussy and starts to fuck you. She spends time rubbing your clit while she fucks you, to keep you nice and wet.'
 		gs 'dinsex', 'boy_puts_his_condom'
-		gs 'dinsex','vaginal_sex',40,'futa'
+		gs 'dinsex', 'vaginal_sex', 40, 'futa', 'sub'
 		'Finally, a good half hour after she started fucking your twat, Eugene finally lets out a loud girly groan.'
 		gs 'dinsex','sexcum'
 		gs 'stat'
 		'She smiles apologetically at you and begins to get dressed again while she says: "Thanks, <<$pcs_nickname>>! You were great... but I really have to get back to work before someone misses me! We''ve been in here way too long already!"'
+		
+		gs 'arousal', 'end'
+		gs 'stat'
 
 		act 'Get dressed again':gt 'Lakecafe', 'main'
 	end
@@ -80,6 +89,9 @@ if $ARGS[0] = 'sex':
 		facial += 1
 		gs 'stat'
 		'She smiles apologetically at you and begins to get dressed again while she says: "Thanks, <<$pcs_nickname>>! You were great... but I really have to get back to work before someone misses me! We''ve been in here way too long already!"'
+		
+		gs 'arousal', 'end'
+		gs 'stat'
 
 		act 'Get dressed again':gt 'Lakecafe', 'main'
 	end
@@ -104,6 +116,8 @@ if $ARGS[0] = 'sex':
 		gs 'stat'
 		'She smiles apologetically at you and begins to get dressed again while she says: "Thanks, <<$pcs_nickname>>! You were great... but I really have to get back to work before someone misses me! We''ve been in here way too long already!"'
 		gs 'dinsex', 'after_anal','no_plug'
+		gs 'arousal', 'end'
+		gs 'stat'
 		
 		act 'Get dressed again':gt 'Lakecafe', 'main'
 	end
@@ -115,10 +129,12 @@ if $ARGS[0] = 'toiletsex':
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/toiletsexend.jpg"></center>'
 	'You come up from behind the man, and suddenly wrap your arms around him. He''s startled for a moment, but relaxes when you whisper: "That''s a nice cock you have there! I bet we could have some fun together, you and I..."'
 	'The man gives you a dirty grin when he feels you wrap your fingers around his cock, but he wants more. He takes you by the hand and guides you to the rear entrance of the diner, into the back alley. He positions you against the dumpsters and eagerly shoves his cock inside you.'
-	gs 'dinsex','vaginal_sex',6,'unknown'
+	gs 'dinsex', 'vaginal_sex', 6, 'unknown'
 	'Not a surprise, he barely lasts any time at all, with in a few minutes he grunts and pulls out of your pussy and shoots his load all over you ass and without a further word he goes back into the cafe.'
 	gs 'cum_call','butt',$boy,1
 	gs 'npccleanc',$npclastgenerated
+	gs 'arousal', 'end'
+	gs 'stat'
 	act 'Return to the restroom':gt 'laketoilet', 'main'
 end
 

locations/LakeBoyZ.qsrc

@@ -45,7 +45,7 @@ $gL_boy_z = {
 					'You drink more beer with <<$boydesc>>. He begins stroking your leg and puts his hand on your chest as he leans into you.'
 					if rand(1,100) <= 20:
 						'Leaned in he whispers to you, "I need to taste those lips."'
-						gs 'willpower', 'misc', 'resist', 'easy'
+						gs 'willpower', 'kiss', 'resist', 'easy'
 						if will_cost <= pcs_willpwr:
 							act 'Push him away and leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'glake'
 						else

locations/LariskaStart.qsrc

@@ -394,9 +394,9 @@ if $ARGS[0] = 'end':
 									'They finish, pouring your face with warm sperm! They slap their dicks against your lips, gradually penetrating into your mouth and clearing them from the remnants of cum.'
 									act 'Further':
 										cls
-										pcs_horny += 10
-										minut += 5
-										gs'stat'
+										gs 'arousal', 'pee', 5, 'sub', 'humilation', 'group'
+										gs 'arousal', 'end'
+										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/lariska/sex/fight/start_10.jpg"></center>'
 										'"Should we wash this whore?" You hear, like through a veil.'
 										'"Yeah, let''s do it!"'
@@ -404,7 +404,7 @@ if $ARGS[0] = 'end':
 										act 'Further':
 											cls
 											minut += 5
-											gs'stat'
+											gs 'stat'
 											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/lariska/sex/fight/start_11.jpg"></center>'
 											'"What a slut!" You let yourself be led by your arms, and suddenly you realize, that you are in the middle of the club and everyone is looking at you.'
 											'"Dance, slut!" with these words, you are thrust into the center of the crowd. Finally, your consciousness fades.'

locations/Military.qsrc

@@ -67,8 +67,18 @@ if $ARGS[0] = 'san0':
 	gs 'boyStat', $npclastgenerated
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/military/sex/san0.jpg"></center>'
 	'During the examination, the patient shows you his erection and looks at you with anticipation.'
-
-	act 'Drive him away':gt 'Military', 'start'
+	
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Drive him away (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'Military', 'start'
+		end
+	else
+		act 'Drive him away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 
 	act 'Play along':
 		guy += 1
@@ -88,7 +98,17 @@ if $ARGS[0] = 'san1':
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/military/sex/san1.jpg"></center>'
 	'While the infirmary is unoccupied, the doctor begins to molest you.'
 
-	act 'Drive him away':gt 'Military', 'start'
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Drive him away (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'Military', 'start'
+		end
+	else
+		act 'Drive him away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 
 	act 'Play along':
 		guy += 1
@@ -103,8 +123,18 @@ if $ARGS[0] = 'pro0':
 	menu_off = 1
 	cla
 	'You met two soldiers whom ask you to help them out with a war game, in the role of a captive spy.'
-
-	act 'Refuse':gt 'Military', 'start'
+	
+	gs 'willpower', 'gangbang', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			gs 'willpower', 'gangbang', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'Military', 'start'
+		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':
 		gs 'npcgeneratec', 0, 'Soldier', rand(18,34)
@@ -134,42 +164,50 @@ if $ARGS[0] = 'pro1':
 	'You notice that a guy follows you for several minutes.'
 
 	act 'Ignore it':gt 'military', 'rape'
+	
+	gs 'willpower', 'rape', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Run away (<<will_cost>> Willpower)':
+			gs 'willpower', 'rape', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/shared/military/forest_running.jpg"></center>'
+			if pcs_run < 10:
+				peshimraperand = rand(0, 11)
+			elseif pcs_run < 20:
+				peshimraperand = rand(0, 20)
+			elseif pcs_run < 30:
+				peshimraperand = rand(0, 30)
+			elseif pcs_run < 40:
+				peshimraperand = rand(0, 40)
+			elseif pcs_run < 50:
+				peshimraperand = rand(0, 50)
+			elseif pcs_run < 60:
+				peshimraperand = rand(0, 60)
+			elseif pcs_run < 70:
+				peshimraperand = rand(0, 70)
+			elseif pcs_run < 80:
+				peshimraperand = rand(0, 80)
+			elseif pcs_run < 90:
+				peshimraperand = rand(0, 90)
+			else
+				peshimraperand = rand(11, 100)
+			end
 
-	act 'Run away':
-		'<center><img <<$set_imgh>> src="images/locations/city/shared/military/forest_running.jpg"></center>'
-		if pcs_run < 10:
-			peshimraperand = rand(0, 11)
-		elseif pcs_run < 20:
-			peshimraperand = rand(0, 20)
-		elseif pcs_run < 30:
-			peshimraperand = rand(0, 30)
-		elseif pcs_run < 40:
-			peshimraperand = rand(0, 40)
-		elseif pcs_run < 50:
-			peshimraperand = rand(0, 50)
-		elseif pcs_run < 60:
-			peshimraperand = rand(0, 60)
-		elseif pcs_run < 70:
-			peshimraperand = rand(0, 70)
-		elseif pcs_run < 80:
-			peshimraperand = rand(0, 80)
-		elseif pcs_run < 90:
-			peshimraperand = rand(0, 90)
-		else
-			peshimraperand = rand(11, 100)
-		end
-
-		if peshimraperand < 11:
-			cla
-			'You tried to run away but the guy caught you.'
+			if peshimraperand < 11:
+				cla
+				'You tried to run away but the guy caught you.'
 
-			act 'Further':gt 'military', 'rape'
-		else
-			cla
-			'You are rushing headlong, crashing through the bushes. Finally you ran back to the camp.'
+				act 'Continue':gt 'military', 'rape'
+			else
+				cla
+				'You are rushing headlong, crashing through the bushes. Finally you ran back to the camp.'
 
-			act 'Further':gt 'military', 'start'
+				act 'Continue':gt 'military', 'start'
+			end
 		end
+	else
+		act 'Run 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
 
@@ -198,7 +236,7 @@ if $ARGS[0] = 'rape':
 		gs 'arousal', 'bj', 5, 'sub', 'rough'
 		gs 'stat'
 		
-		act 'Further':
+		act 'Continue':
 			cla
 			*clr
 			cumprecheck = 1
@@ -209,7 +247,7 @@ if $ARGS[0] = 'rape':
 			gs 'arousal', 'vaginal', 10, 'sub', 'rough'
 			gs 'stat'
 		
-			act 'Further':
+			act 'Continue':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/military/sex/rape4.jpg"></center>'
@@ -218,7 +256,7 @@ if $ARGS[0] = 'rape':
 				gs 'arousal', 'anal', 10, 'sub', 'rough'
 				gs 'stat'
 		
-				act 'Further':
+				act 'Continue':
 					cla
 					*clr
 					sexpartkno = 1
@@ -233,7 +271,7 @@ if $ARGS[0] = 'rape':
 					gs 'arousal', 'end'
 					gs 'stat'
 					
-					act 'Further':gt 'military', 'start'
+					act 'Continue':gt 'military', 'start'
 				end
 			end
 		end

locations/Miroslava.qsrc

@@ -534,7 +534,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 
 					act'Go home':
 						if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):
-							minut += 15 & gt'Gadhouse'
+							minut += 15 & gt 'gadhouse', 'start'
 						else
 							*clr & cla
 							minut += 5
@@ -544,7 +544,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 							'<center><img <<$set_imgh>> src="images/locations/gadukino/river/dressbch.jpg"></center>'
 							'You changed into your regular clothes and went home with Mira.'
 
-							act 'Continue': minut += 15 & gt'Gadhouse'
+							act 'Continue': minut += 15 & gt 'gadhouse', 'start'
 						end
 					end
 				end
@@ -561,7 +561,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_tv'+rand(1,12)+'.jpg"></center>'
 					'You and Mira watch TV for an hour.'
 
-					act'Continue':gt'Gadhouse'
+					act'Continue':gt 'gadhouse', 'start'
 				end
 			end
 
@@ -594,7 +594,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 					gs 'Miroslava', 'miraclothes'
 					'You say goodbye to Mira, and she went home.'
 
-					act 'Walk back home':gt'Gadhouse'
+					act 'Walk back home':gt 'gadhouse', 'start'
 				end
 			end
 		end
@@ -616,7 +616,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 						mira_guest = 1
 						minut += 15
 						npc_rel['A60'] += 1
-						gt 'Gadhouse'
+						gt 'gadhouse', 'start'
 					else
 						*clr & cla
 						npc_rel['A60'] += 1
@@ -629,7 +629,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/river/dressbch.jpg"></center>'
 						'You change into your clothes and go home with Mira.'
 
-						act 'Continue': gt'Gadhouse'
+						act 'Continue': gt'Gadhouse', 'start'
 					end
 				end
 
@@ -662,7 +662,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_tv'+rand(1,12)+'.jpg"></center>'
 					'You watch TV with Mira for an hour.'
 
-					act'Continue':gt'Gadhouse'
+					act'Continue':gt 'gadhouse', 'start'
 				end
 
 				act'Refuse':
@@ -1181,7 +1181,7 @@ if $ARGS[0] = 'Leave':
 	elseif MiraLoc = 3:
 		gt 'gadforest', '1'
 	elseif MiraLoc = 6:
-		gt 'Gadhouse'
+		gt 'gadhouse', 'start'
 	elseif MiraLoc = 7:
 		gt 'Gaddvor'
 	elseif MiraLoc = 43:

locations/MiroslavaHome.qsrc

@@ -190,7 +190,7 @@ if $ARGS[0] = 'mirabrother':
 														'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirabromoto8.jpg"></center>'
 														'After a couple of minutes you feel his warm sticky cum hit the back of your throat and being to swallow it all down. Mira''s brother stands still for a minute, his eyes closed in bliss. Finally he takes his cock out of your mouth, zips up pants, sits on a motorcycle and drives you back to the village...'
 
-														act 'Go back to your grandparents house': gt 'Gadhouse'
+														act 'Go back to your grandparents house': gt 'gadhouse', 'start'
 													end
 												end
 											end

locations/NikoDreams.qsrc

@@ -49,7 +49,7 @@ if $ARGS[0] =  'Family':
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/smile1.jpg"></center>'
 						'You slowly turn to see Niko standing right next to you with a wide grin on his face. You suddenly hear Yurik groan as he begins pumping his cum inside of your pussy before walking away while saying to Niko, "What a worthless whore. Couldn''t even rock her hips a bit. If I wanted to fuck a blow up doll, I would have kept fucking her mother." He then leaves, as you start hearing a beeping noise. Then you suddenly wake up in your own bed, with the alarm going off.'
 
-						act 'Get up': gt !!this should be the same as after any dream Sveta had and wake up in her room
+!!this should be the same as after any dream Sveta had and wake up in her room						act 'Get up': 
 					end
 				end
 			end
@@ -322,7 +322,7 @@ if $ARGS[0] =  'TeeHee':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/butterfly6.jpg"></center>'
 		
 
-		act 'Continue':VKTeeHee = 1 & VKWoods = -1 & VKSmiley = 3 & gt !!this should be the same as after any dream Sveta had and wake up in her room
+!!this should be the same as after any dream Sveta had and wake up in her room		act 'Continue':VKTeeHee = 1 & VKWoods = -1 & VKSmiley = 3 & 
 	end
 
 	act 'Walk away':VKTeeHee = 1 & gt 'NikoDreams', 'Woods Home'
@@ -336,7 +336,7 @@ if $ARGS[0] =  'Smiley 1':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/residents/smiley2.jpg"></center>'
 	'As you are walking through the forest you hear loud laughing behind you then suddenly feel something rubbing across your throat, causing a stream of blood to begin pouring out of your neck. You let out a scream as your energy fades, and the ground rushes toward you...'
 
-	act 'Rest in peace': VKSmiley = 3 & gt !!this should be the same as after any dream Sveta had and wake up in her room
+!!this should be the same as after any dream Sveta had and wake up in her room	act 'Rest in peace': VKSmiley = 3 & 
 end
 
 if $ARGS[0] =  'WeePee 1':
@@ -347,7 +347,7 @@ if $ARGS[0] =  'WeePee 1':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/residents/weepee.jpg"></center>'
 	'As you approach the crying woman, she instantly turns around then lunges toward you, shoving her hand into your chest, and pulling out your heart, as she stares into your eyes, watching your life slowly drain away...'
 
-	act 'Rest in peace': VKWeePeeHeart = 1 & VKHappyHome = 0 & gt !!this should be the same as after any dream Sveta had and wake up in her room
+!!this should be the same as after any dream Sveta had and wake up in her room	act 'Rest in peace': VKWeePeeHeart = 1 & VKHappyHome = 0 & 
 end
 
 if $ARGS[0] =  'Woods Hide':

locations/NikoPayback.qsrc

@@ -348,7 +348,7 @@ if $ARGS[0] =  'Payback 4':
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/piss1.mp4"></video></center>'
 			'You open your mouth and close your eyes, waiting for Niko to start. A few seconds later you feel warm liquid spraying in your face, filling your mouth, and getting in your nose. Niko shouts, "SWALLOW IT ALL BITCH!" You try your best not to gag, as you attempt to swallow all of him bitter tasting urine. You can''t keep your self from gagging as Niko continues shooting his urine down your throat. Niko suddenly rubs his penis against your lips before shoving it into your mouth.'			
-
+			gs 'arousal', 'pee', -5, 'sub', 'humilation'
 			act 'Suck Niko''s dick':	
 				*clr & cla
 				gs'stat'

locations/Palatka.qsrc

@@ -36,8 +36,17 @@ if $ARGS[0] = 'pal0':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/military/sex/pal0.jpg"></center>'
 	'Once you begin to change clothes, you notice that there are two soldiers in the tent. They see you half-naked, walking up to you with their erect cocks. You long for their cocks, wondering if you should get them off or ignore them and relax after a hard day instead.'
-
-	act 'Send':gt 'palatka', 'start'
+	
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Send (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'palatka', 'start'
+		end
+	else
+		act 'Send (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 
 	act 'Post':
 		gs 'npcgeneratec', 0, 'Soldier', rand(18,34)
@@ -59,7 +68,16 @@ if $ARGS[0] = 'pal1':
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/military/pal1.jpg"></center>'
 	'Entering the tent, you stumble, you reflexively close your eyes, as you prepare to hit the floor face first. Much to your surprise you do not land on the floor. Instead you feel powerful, strong hands catching you. Opening your eyes in surprise, you look up and see that a well-built black soldier has caught you in his arms.'
 
-	act 'Say thank you':gt 'palatka', 'start'
+	gs 'willpower', 'sex', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Say thank you ':
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'palatka', 'start'
+		end
+	else
+		act 'Say thank you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 
 	act 'Repay in full':
 		sexpartkno = 1

locations/ParChurch.qsrc

@@ -66,7 +66,7 @@ if $ARGS[0] = 'vigil':
 	else
 		pcs_horny -= temprand
 	end
-	moral += 1
+	church_moral += 1
 	Churchbad -= 1
 	minut += 30
 	gs 'themes', 'indoors'
@@ -87,7 +87,7 @@ if $ARGS[0] = 'vigil':
 		*clr & cla
 		pcs_mood += 10
 		pcs_horny -= 20
-		moral += 1
+		church_moral += 1
 		Churchbad -= 1
 		minut += 10
 		gs 'stat'
@@ -111,13 +111,13 @@ if $ARGS[0] = 'liturgy':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/church'+ rand(1,8) +'.jpg"></center>'
 	if pav_slut < 75 and Conf_Kirill <= 1: 
 		pcs_mood += 20
-		moral += 2
+		church_moral += 2
 		pcs_sleep += 5
 		'You join the congregation for the Divine Liturgy. You see mostly older people, but there are some youngsters. You participate in the singing but that is about all. Your presence seems to go largely unnoticed, but you have the chance to rest a bit. You feel a lot better.'
 	elseif pav_slut < 75 and Conf_Kirill >= 2:
 		Kirill += 1
 		pcs_mood += 20
-		moral += 2
+		church_moral += 2
 		pcs_sleep += 5
 		'You participate fully in the Divine Liturgy. You listen to the preaching and sing along. When going to communion and receiving the ceremonial bread, you lock eyes with Father Kirill. He seems happy to see you participating in the service.'
 	else
@@ -125,7 +125,7 @@ if $ARGS[0] = 'liturgy':
 
 		Kirill += 1
 		pcs_mood +=20
-		moral += 2
+		church_moral += 2
 		'Your presence at the Divine Liturgy does not go unnoticed. People start mumbling and point fingers at you. Many wonder why you''re present at such an important and holy occasion. Father Kirill, who leads the service, seems to be confused about where the fuss comes from but then notices you. You see that even he heard about your little adventures in town, but at the same time his face doesn’t seem to condemn you. It looks a bit like pity.'
 		*nl
 		'"The church is place for everyone, my beloved children. Even if we sometimes forget, we must try to condemn no one. Think about John 8:10: Jesus once met a woman who had slept with a man who betrayed her trust. She was dragged away by his friends and thrown naked before Jesus. The people had ripped her clothes and humiliated her. He spoke to her: ''Woman'', he says. Not ''slut'', or ''whore'', but woman. He threw His coat over her near-naked body and gave her the sense of dignity she had been promised by the man who betrayed her trust. Jesus did not condemn her, so let us try to not condemn others."'
@@ -199,7 +199,7 @@ if $ARGS[0] = 'candle':
 	end
 	if hour > 6 and hour < 20: 
 		pcs_mood += 10
-		moral += 1
+		church_moral += 1
 		'You approach the iconostasis and light your candle. It gives you a nice feeling and you say a little prayer while looking at the image of Christ the Savior.'
 	else
 		pcs_horny += 10
@@ -226,50 +226,50 @@ if $ARGS[0] = 'pray':
 		if pav_sex > 10: gs 'fame', 'pav', 'sex', -1
 		if pav_prostitute > 10: gs 'fame', 'pav', 'prostitute', -1
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/ch_praying.jpg"></center>'
-		if hour > 6 and hour < 20 and moral < 30:
+		if hour > 6 and hour < 20 and church_moral < 30:
 			pcs_horny -= 10
 			pcs_mood += 20
-			moral += 1
+			church_moral += 1
 			'You decide to pray for a while. You''re not overly religious but the moment of peace and quiet gives you the time to think through what you''re doing with your life.'
-		elseif hour > 6 and hour < 20 and moral >= 30 and moral < 60:
+		elseif hour > 6 and hour < 20 and church_moral >= 30 and church_moral < 60:
 			pcs_horny -= 20
 			pcs_mood += 30
-			moral += 1
+			church_moral += 1
 			minut += 15
 			'You decide to pray for a while. While you don''t consider yourself to be deeply religious, you do feel a strong connection to God when you look at the icons around you. You allow yourself to look deeply into your soul as you contemplate the direction your life is going.'
-		elseif hour >6 and hour < 20 and moral >= 60:
+		elseif hour >6 and hour < 20 and church_moral >= 60:
 			pcs_horny -= 30
 			pcs_mood += 40
-			moral += 1
+			church_moral += 1
 			minut += rand(30,60)
 			'You decide to pray. The beauty and glory of being in the body of God overwhelms you and you lose yourself in prayer. You are unsure of how much time has past when you finally become aware of your surroundings again, but it doesn''t matter as you are at peace with God and the world.'
-		elseif (hour >= 20 or hour <= 6) and moral < 30:
+		elseif (hour >= 20 or hour <= 6) and church_moral < 30:
 			pcs_horny -= 40
 			pcs_mood += 50
-			moral += 1 
+			church_moral += 1 
 			minut += (60 - randtime)
 			'The Nave is lit only with small candles, leaving your surroundings in darkness. You start to get a weird vibe, one you can''t quite shake. Suddenly you get the urge to pray very intensely. Before you know it, an hour went by and you feel a bit reborn.'
 			'"That felt refreshing," you mumble to yourself.'
-		elseif (hour >= 20 or hour <= 6) and moral >= 30 and moral < 60:
+		elseif (hour >= 20 or hour <= 6) and church_moral >= 30 and church_moral < 60:
 			pcs_horny = 0
 			pcs_mood += 50
-			moral += 1 
+			church_moral += 1 
 			if randtime > 60: randtime = 60
 			minut += (60 - randtime)
 			if nark > 1: nark = nark/2
 			'The Nave is lit only with small candles, leaving your surroundings in darkness, but you find it comforting. You get the urge to pray very intensely. Before you know it, an hour went by and you feel a bit reborn and cleansed.'
 			'"That felt refreshing," you mumble to yourself.'
-		elseif (hour >= 20 or hour <= 6) and moral >= 60 and rand(1,100) > 90:
+		elseif (hour >= 20 or hour <= 6) and church_moral >= 60 and rand(1,100) > 90:
 			pcs_horny = 50
 			orgasm += 1
 			pcs_mood = 100
-			moral += 1
+			church_moral += 1
 			Godslut = 1
 			'The Nave is lit only with small candles, leaving your surroundings in darkness, but it''s comforting, like being in the womb of God. You get the urge to pray very intensely. You lose yourself in the presence of God and are overcome by religious ecstasy. You fight back a sob as your body trembles with an uncontrollable orgasm. You wipe the tears from your eyes and gaze with adoration at the face of Christ, your newest lover.'
 		else
 			pcs_horny = 0
 			pcs_mood = 100
-			moral += 1 
+			church_moral += 1 
 			minut += 60
 			if nark > 1: nark = ((nark/4)*3)
 			'The Nave is lit only with candles and small presence lights and the darkness feels very comforting, like being in the womb. You get the urge to pray very intensely. Before you know it, more than an hour went by and you feel a bit reborn and cleansed.'
@@ -309,7 +309,7 @@ if $ARGS[0] = 'talk_priest':
 		act 'Make Amends':
 			*clr & cla
 			gs 'stat'
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Churchbad -= 1
 			amends_day = daystart
@@ -329,7 +329,7 @@ if $ARGS[0] = 'talk_priest':
 						*clr & cla
 						minut += 60
 						Churchbad -= 1
-						moral += 1
+						church_moral += 1
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/churchclean.jpg"></center>'
 						'You take the broom and begin your task, thankful that the church isn''t a very large one. You diligently sweep the floor, making sure to get into all the corners. Once the sweeping is done, you mop the floor then put everything away. You feel a sense of wellbeing at a job well done.'
@@ -342,7 +342,7 @@ if $ARGS[0] = 'talk_priest':
 						minut += 5
 						Churchbad += 2
 						Kirill -= 5 
-						moral -= 2
+						church_moral -= 2
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/pc/bukli_angry.jpg"></center>'
 						'"As if," you state flatly, looking at the priest coldly, "You''re the one that took an oath to work for God, not me. I''m out of here."'
@@ -363,7 +363,7 @@ if $ARGS[0] = 'talk_priest':
 	end
 	act 'Talk to the priest':
 		*clr & cla
-		moral += rand(0,3)
+		church_moral += rand(0,3)
 		Kirill += rand(0,2)
 		minut += 15
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/ch_talk.jpg"></center>'
@@ -372,7 +372,7 @@ if $ARGS[0] = 'talk_priest':
 		act 'Stay in the Narthex': gt 'ParChurch', 'Narthex'
 		act 'Keep talking':
 			*clr & cla
-			moral += rand(0,2)
+			church_moral += rand(0,2)
 			Kirill += rand(0,2)
 			minut += 30
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/ch_talk.jpg"></center>'
@@ -400,7 +400,7 @@ end
 if $ARGS[0] = 'tease':
 	*clr & cla
 	Kirill_Crpt += 1
-	moral -= 1
+	church_moral -= 1
 	Churchbad += 1
 	'<center><img <<$set_imgh>> src="images/shared/sex/exhibitionism/fatherim30.jpg"></center>'
 	'Feeling naughty, you decide to try and tease the priest. While he isn''t looking, you undo most of the buttons on your blouse, hoping he will notice.'
@@ -577,7 +577,7 @@ if $ARGS[0] = 'fillers':
 	elseif randtext = 9:
 		$safesub = 'your grandparents'
 	elseif randtext = 0:
-		moral += 1
+		church_moral += 1
 		$safesub = 'God and Jesus'
 	end
 end

locations/ParChurch2.qsrc

@@ -56,11 +56,11 @@ if $ARGS[0] = 'confession':
 		elseif confK >= 5:
 			'"Thank you for taking the time to speak with me Father. I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 			'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-			if moral <= 25: 
+			if church_moral <= 25: 
 				'"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-			elseif moral > 25 and moral <= 75: 
+			elseif church_moral > 25 and church_moral <= 75: 
 				'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
-			elseif moral > 75: 
+			elseif church_moral > 75: 
 				'"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 			end
 			if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
@@ -81,7 +81,7 @@ if $ARGS[0] = 'confession':
 		gs 'stat'
 		confK += 1
 		Churchbad += 1
-		moral -= 5
+		church_moral -= 5
 		Kirill -= 3
 		$conf_lie[1] = 'having seduced '+rand(1,99)+' guys.'
 		$conf_lie[2] = 'having  been raped by '+rand(1,99)+' guys.'
@@ -93,7 +93,7 @@ if $ARGS[0] = 'confession':
 		'"You are a wicked child." the priest scolds you although he seems more saddened than angry, "You should be ashamed of yourself, telling lies is a mortal sin and to do so before God is sure to stain your soul for eternity."'
 		act 'Say nothing but feel bad':
 			*clr & cla
-			moral -= 1
+			church_moral -= 1
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 			'You feel ashamed of what you have done, but say nothing in response to the priest''s condemnation.'
 			'"You should leave here," the priest says sternly, "But think long and hard about your path in life."'
@@ -102,7 +102,7 @@ if $ARGS[0] = 'confession':
 		end
 		act 'Say nothing and regret nothing':
 			*clr & cla
-			moral -= 3
+			church_moral -= 3
 			Kirill -= 2
 			Churchbad += 1
 			Churchbadtime = daystart + rand(1,7)
@@ -114,7 +114,7 @@ if $ARGS[0] = 'confession':
 		end
 		act 'Apologize for your behavior':
 			*clr & cla
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 			'You immediately regret your behavior and apologize to the priest.'
@@ -130,7 +130,7 @@ if $ARGS[0] = 'confession':
 		act 'Wanting to have sex with a girl':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -157,7 +157,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him about having lesbian sex':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -186,7 +186,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him about giving handjobs':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -200,9 +200,9 @@ if $ARGS[0] = 'confession':
 			elseif confK >= 5:
 				'"Thank you for taking the time to speak with me Father." you say as he leads you to a quiet corner, "I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 				'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-				if moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-				if moral >25 and moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follw the priest.'
-				if moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
+				if church_moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
+				if church_moral >25 and church_moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follw the priest.'
+				if church_moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 				if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
 			end
 			'"Hmm. Anyway, my child, is there anything you wanted to share with me? Something that makes you feel better?" he inquires as you <<$confstring>>.'
@@ -250,7 +250,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him about giving blowjobs':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -264,9 +264,9 @@ if $ARGS[0] = 'confession':
 			elseif confK >= 5:
 				'"Thank you for taking the time to speak with me Father." you say as he leads you to a quiet corner, "I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 				'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-				if moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-				if moral >25 and moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
-				if moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
+				if church_moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
+				if church_moral >25 and church_moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
+				if church_moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 				if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
 			end
 			'"Hmm. Anyway, my child, is there anything you wanted to share with me? Something that makes you feel better?" he inquires as you <<$confstring>>.'
@@ -314,7 +314,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him about having anal sex':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -328,9 +328,9 @@ if $ARGS[0] = 'confession':
 			elseif confK >= 5:
 				'"Thank you for taking the time to speak with me Father." you say as he leads you to a quiet corner, "I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 				'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-				if moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-				if moral >25 and moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follw the priest.'
-				if moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
+				if church_moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
+				if church_moral >25 and church_moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follw the priest.'
+				if church_moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 				if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
 			end
 			'"Hmm. Anyway, my child, is there anything you wanted to share with me? Something that makes you feel better?" he inquires as you <<$confstring>>.'
@@ -378,7 +378,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him about having sex':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -392,9 +392,9 @@ if $ARGS[0] = 'confession':
 			elseif confK >= 5:
 				'"Thank you for taking the time to speak with me Father." you say as he leads you to a quiet corner, "I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 				'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-				if moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-				if moral >25 and moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
-				if moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
+				if church_moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
+				if church_moral >25 and church_moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
+				if church_moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 				if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
 			end
 			'"Hmm. Anyway, my child, is there anything you wanted to share with me? Something that makes you feel better?" he inquires as you <<$confstring>>.'
@@ -442,7 +442,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him about the sex you''ve had':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -456,9 +456,9 @@ if $ARGS[0] = 'confession':
 			elseif confK >= 5:
 				'"Thank you for taking the time to speak with me Father." you say as he leads you to a quiet corner, "I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 				'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-				if moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-				if moral >25 and moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
-				if moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
+				if church_moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
+				if church_moral >25 and church_moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
+				if church_moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 				if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
 			end
 			'"Hmm. Anyway, my child, is there anything you wanted to share with me? Something that makes you feel better?" he inquires as you <<$confstring>>.'
@@ -482,7 +482,7 @@ if $ARGS[0] = 'confession':
 		act 'Tell him that you have masturbated':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -496,9 +496,9 @@ if $ARGS[0] = 'confession':
 			elseif confK >= 5:
 				'"Thank you for taking the time to speak with me Father." you say as he leads you to a quiet corner, "I admit I really don''t think I have anything to confess, but I felt like I should come see you."'
 				'"I always have time for God''s children." he replies, "Perhaps God wants you to speak to me."'
-				if moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
-				if moral >25 and moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
-				if moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
+				if church_moral <= 25: '"I doubt God is very interested in a schoolgirl in a nowhere town like this one." you quip, "At least He didn''t leave me any notes under my pillow."'
+				if church_moral >25 and church_moral <= 75: 'I don''t know, it''s not like I had a dream or something telling me to come." you say thoughtfully as you follow the priest.'
+				if church_moral > 75: '"You may be right Father." you reply happily, "I know God will speak to all of us if we are willing to listen."'
 				if godslut = 1: '"I''m sure he did, Father." you gush, "His love is like a guiding light and He often turns my thoughts to you."'
 			end
 			'"Hmm. Anyway, my child, is there anything you wanted to share with me? Something that makes you feel better?" he inquires as you <<$confstring>>.'
@@ -545,7 +545,7 @@ if $ARGS[0] = 'confession':
 	act 'Complain about mother':
 		*clr & cla
 		confK += 1
-		moral += 1
+		church_moral += 1
 		Kirill += 1
 		KnoKirillName = 1
 		minut += 5
@@ -615,7 +615,7 @@ if $ARGS[0] = 'secrets':
 		act 'Tell him about having sex with your sister':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -643,7 +643,7 @@ if $ARGS[0] = 'secrets':
 		act 'Watching porn with your brother''s friends':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 1
 			minut += 5
@@ -712,7 +712,7 @@ if $ARGS[0] = 'secrets':
 						'"And what about your brother?" Father Kirill asks, "Where was he when all this was happening? You said you had been playing football together when this all started, no?"'
 						act 'Lie about your brother': 
 							*clr & cla
-							moral -= 1
+							church_moral -= 1
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 							'"He, umm, wasn''t there." you lie, "He thought it was too weird to watch porn with his sister there so he left."'
 							act 'Finish':
@@ -775,7 +775,7 @@ if $ARGS[0] = 'secrets':
 		act 'Tell him about having sex with your brother':
 			*clr & cla
 			confK += 1
-			moral += 1
+			church_moral += 1
 			Kirill += 1
 			Kirill_Crpt += 2
 			minut += 5

locations/Peterroom.qsrc

@@ -78,14 +78,14 @@ if $ARGS[0] = 'start':
 				'"And what have we here?" Peter grips the tip of the butt plug sticking out of your ass, and eases it out.'
 			end
 
-			act 'smile':
+			act 'Smile':
 				cla
 				*clr
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/peter/3.jpg"></center>'
 				'Peter pulled you by the collar, pushed you on your knees in front of him and ordered: "Come on bitch, open your mouth."'
 
-				act 'submit':
+				act 'Submit':
 					cla
 					*clr
 					'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/4.jpg"></center>'
@@ -94,7 +94,7 @@ if $ARGS[0] = 'start':
 					gs 'arousal', 'bj', 5, 'sub'
 					gs 'stat'
 					
-					act 'continue Composition' :
+					act 'Continue Composition' :
 						cla
 						*clr
 						'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/5.jpg"></center>'
@@ -107,16 +107,23 @@ if $ARGS[0] = 'start':
 						act 'crawl' :gt 'peterroom', 'klap'
 					end
 				end
+				
+				gs 'willpower', 'sex', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Does not comply (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'pain', 8, 'asscheeks', 'spank'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/city/peter/4_1.jpg"></center>'
+						'"Have to punish you" with these words Peter crossed over the table and shoved a plug in your ass. - Pop up earlier than end flogging, will receive the same amount:- Peter became the side of you, spread the whip and started whipping. counting aloud strikes interspersed with your shouts and sobs ...'
+						'"Ask me to fuck you, nine docile litter?"'
 
-				act 'does not comply' :
-					cla
-					*clr
-					'<center><img <<$set_imgh>> src="images/characters/city/peter/4_1.jpg"></center>'
-					'"Have to punish you" with these words Peter crossed over the table and shoved a plug in your ass. - Pop up earlier than end flogging, will receive the same amount:- Peter became the side of you, spread the whip and started whipping. counting aloud strikes interspersed with your shouts and sobs ...'
-					'"Ask me to fuck you, nine docile litter?"'
-
-					act 'Yes! I''ll be your whore!' :gt 'peterroom', 'klap'
-				end
+						act 'Yes! I''ll be your whore!' :gt 'peterroom', 'klap'
+					end
+				else
+					act 'Does not comply (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end	
 			end
 		end
 
@@ -136,7 +143,7 @@ if $ARGS[0] = 'klap':
 	gs 'arousal', 'foreplay', 5, 'sub', 'bound'
 	gs 'stat'
 					
-	act 'moo':
+	act 'Moo':
 		cla
 		*clr
 		'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/7.jpg"></center>'
@@ -152,10 +159,8 @@ if $ARGS[0] = 'klap':
 		gs 'arousal', 'anal', 10, 'sub'
 		gs 'stat'
 					
-		act 'moo' :
-			cla
-			*clr
-			pcs_horny += SUB - pcs_dom + (pcs_ass - 25) * 3
+		act 'Moo':
+			cla & *clr
 			'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/8.jpg"></center>'
 			'He continues to penetrate you faster, then slows the rhythm, makes several deep movements and finishes by filling your insides with hot stream of sperm ....'
 
@@ -166,13 +171,13 @@ if $ARGS[0] = 'klap':
 
 			if pcs_horny >= 100:
 				analorgasm += 1
-				$orgasm_or = 'custom'
+				$orgasm_or = 'yes'
 				$orgasm_txt = 'heat surges in your ass and orgasm washes over you.'
 			end
 
 			'Your ass makes squelching noise when freed from his penis. Peter sat on the bed, breathing heavily, and you remained lying bound, feeling sperm slowly leaking from your fucked ass.'
 			
-			act 'relax' :gt 'peterroom', 'end'
+			act 'Relax' :gt 'peterroom', 'end'
 		end
 	end
 end
@@ -180,7 +185,6 @@ end
 if $ARGS[0] = 'end':
 	cla
 	*clr
-	SUB += 1
 	minut += 30
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/peter/vanroom.jpg"></center>'
@@ -209,14 +213,11 @@ end
 if $ARGS[0] = 'd1':
 	cla
 	*clr
-	pcs_horny += SUB - pcs_dom + (pcs_ass - 25) * 3
-	stat['anal'] += 1
-
 	if pcs_ass < 25:pcs_ass += 1
 	'<center><img <<$set_imgh>> src="images/characters/city/peter/d1-1.jpg"></center>'
 	'Peter connects your hands behind your back. His hands take you by the hips and lifted your ass, placing you cancer. You dutifully lean and Peter catches the rope to the hook.'
 
-	act 'sucking her fingers':
+	act 'Sucking her fingers':
 		cla
 		*clr
 		'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d1-2.jpg"></center>'
@@ -225,7 +226,7 @@ if $ARGS[0] = 'd1':
 		gs 'arousal', 'anal', 10, 'sub'
 		gs 'stat'
 		
-		act 'moan':
+		act 'Moan':
 			cla
 			*clr
 			'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d1-3.jpg"></center>'
@@ -234,7 +235,7 @@ if $ARGS[0] = 'd1':
 			gs 'arousal', 'anal', 10, 'sub'
 			gs 'stat'
 		
-			act 'moan':
+			act 'Moan':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d1-4.jpg"></center>'
@@ -242,13 +243,12 @@ if $ARGS[0] = 'd1':
 
 				if pcs_horny >= 100:
 					analorgasm += 1
-
-					'You are very excited that grew in the ass sweet languor, and then suddenly become a hot orgasm washing over you. Simultaneously with you ends Peter pounding dick deeper and filling your insides hot stream of sperm ....'
 					$orgasm_or = 'yes'
+					'You are very excited that grew in the ass sweet languor, and then suddenly become a hot orgasm washing over you. Simultaneously with you ends Peter pounding dick deeper and filling your insides hot stream of sperm ....'
 					
 				elseif pcs_horny < 100:
-					' and then slows the rhythm, makes several deep movements and finishes filling your insides hot stream of sperm ....'
 					$orgasm_or = 'no'
+					' and then slows the rhythm, makes several deep movements and finishes filling your insides hot stream of sperm ....'
 					
 				end
 
@@ -263,14 +263,13 @@ end
 if $ARGS[0] = 'd2':
 	cla
 	*clr
-	pcs_horny += SUB - pcs_dom + (pcs_throat - 25) * 3
 	'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d2-1.jpg"></center>'
 	'Peter put you on your knees, then lifted your head and holding her hands to force your mouth planted its piston. His head slipped down his throat, but he did not rest on this, continuing to press. And its 25 centimeter count began to enter into you further.'
 
 	gs 'arousal', 'bj', 5, 'sub'
 	gs 'stat'
 		
-	act 'suck':
+	act 'Suck':
 		cla
 		*clr
 		'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d2-2.jpg"></center>'
@@ -279,7 +278,7 @@ if $ARGS[0] = 'd2':
 		gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
 		gs 'stat'
 	
-		act 'moan':
+		act 'Moan':
 			cla
 			*clr
 			'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d2-3.jpg"></center>'
@@ -288,7 +287,7 @@ if $ARGS[0] = 'd2':
 			gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
 			gs 'stat'
 		
-			act 'moo':
+			act 'Moo':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/characters/city/peter/sex/d2-4.jpg"></center>'
@@ -298,10 +297,8 @@ if $ARGS[0] = 'd2':
 				gs 'stat'
 		
 				if pcs_horny >= 100:
-					pcs_willpwr += 15
-					orgasm += 1
-					'Suddenly you start you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned and shuddered with orgasm, but Peter gripped you do not allow members to slip out of his mouth ...'
 					$orgasm_or = 'yes'
+					'Suddenly you start you finish yourself. Between the legs blazing fire and waves of pleasure covered body, you moaned and shuddered with orgasm, but Peter gripped you do not allow members to slip out of his mouth ...'
 				end
 
 				act 'Swallow' :gt 'peterroom', 'end'

locations/RimmaSexQW.qsrc

@@ -40,7 +40,6 @@ $rimmasexdi = {
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
-			cls
 			cls
 			gs 'stat'
 			$ImageNeededPlacholder
@@ -63,7 +62,6 @@ $rimmasexdi = {
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
-			cls
 			cls
 			gs 'stat'
 			$ImageNeededPlacholder
@@ -80,21 +78,20 @@ $rimmasexdi = {
 		exit
 	elseif RimmaRandEvent = 21:
 		'<center><img <<$set_imgh>> src="images/beast/zoo/rimma21.jpg"></center>'
-		SUB += 4
+		gs 'arousal', 'pee', -5, 'sub', 'humilation', 'lesbian'
 		'Rimma orders you to squat and gets over you, her legs spread wide. Your face an inch from her pussy, you suddenly feel something warm running over it: Without warning, Rima just started peeing on you! Shocked by this, you sit motionless until the jet subsides, the smell intense as the last droplets drip from your chin.' 
 		'When she''s done, Rima orders you to lick her clean and you comply without question.'
 		
 	elseif RimmaRandEvent = 20:
 		'<center><img <<$set_imgh>> src="images/beast/zoo/rimma14.jpg"></center>'
-		pcs_throat += 3
+		if pcs_throat < 25: pcs_throat += 3
 		'Rima pulls a massive strap-on out of her purse and puts it on, and you feel a hint of fear mingled into your excitement, knowing that she''s going to fuck you with it. Wasting no time on ordering you around, she roughly pushes you down on your knees and slips it past your <<$liptalk>>.' 
 		'You instinctively start moving your tongue around its thick tip, her hand at the back of your head holding you in place as she guides it into your throat. Given its size, it doesn''t come as a surprise that your gag reflex starts acting up but you endure as best you can, covering it generously in saliva.'
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
 			cls
-			cls
-			pcs_ass += 1
+			if pcs_ass < 25: pcs_ass += 1
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/beast/zoo/rimma20.jpg"></center>'
 			'Rima bends you over and her strap-on enters your ass sans additional lubrication. The friction and fullness are intense but you are also suddenly aware that your bladder is not only full but feels like it''s about to burst.' 
@@ -115,7 +112,6 @@ $rimmasexdi = {
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
-			cls
 			cls
 			pcs_ass += 1
 			pcs_vag += 1
@@ -140,10 +136,7 @@ $rimmasexdi = {
 		gs 'stat'
 		act 'Further':
 			cls
-			cls
-			minut += 30
 			pcs_ass += 1
-			SUB += 2
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/beast/zoo/rimma18.jpg"></center>'
 			'Rima bends you over doggystyle and you feel the tip of her strap-on resting against your anus as she pulls the bottle of lube out of her purse. You groan and try to relax, preparing yourself mentally as she spreads the cool liquid around and inside your puckered hole, but even after all the things you''ve done with Rima, taking this gigantic strap-on up your ass is not an easy feat.' 
@@ -164,7 +157,6 @@ $rimmasexdi = {
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
-			cls
 			cls
 			pcs_vag += 1
 			gs 'stat'
@@ -187,7 +179,6 @@ $rimmasexdi = {
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
-			cls
 			cls
 			pcs_vag += 1
 			gs 'stat'
@@ -210,7 +201,6 @@ $rimmasexdi = {
 		gs 'arousal', 'bj', 10, 'sub', 'lesbian'
 		gs 'stat'
 		act 'Further':
-			cls
 			cls
 			pcs_vag += 1
 			gs 'stat'

locations/RynokHoz.qsrc

@@ -82,51 +82,56 @@ if $ARGS[0] = 'the_beginning':
 				act 'Tell them no':
 					cla
 					money += 2000
-					
 					palevorin = 2
-					
 					'With your face red with shame, you shake your head and say quietly "No." The other two say something to each other and then sit down to watch as Artur fucks you. Unable to do anything about it, you try to ignore them. Though it is hard as they keep talking to each other.'
 					'After some time, he pulls out of you and you feel hot wet spurts of cum landing all over your ass and lower back. Once he is done cumming he wipes his dick off on your ass and gets off you.'
-				    'Once Artur has finished you get up and start to gather up your things, the other two laugh and talk more, staring at your naked body. You get dressed as quickly as you can. Artur writes you a premium for the amount of 2,000 <b>₽</b>, as you take the money Artur says to you quietly. "It is alright I will deal with them." You look at him a moment, nod and then leave.'
+					'Once Artur has finished you get up and start to gather up your things, the other two laugh and talk more, staring at your naked body. You get dressed as quickly as you can. Artur writes you a premium for the amount of 2,000 <b>₽</b>, as you take the money Artur says to you quietly. "It is alright I will deal with them." You look at him a moment, nod and then leave.'
 
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Go home':gt 'street'
 				end
-
-				act 'Agree to gangbang':
-					cla
-					palevorin = 4
-
-					if abdulasex = 0:abdulasex = 1 & guy += 1
-					if hasansex = 0:hasansex = 1 & guy += 1
-					
-					pcs_vag += 1
-					swallow +=1
-					gang += 1
-					gs 'boyStat', 'A91'
-					spafinloc = 4
-					gs 'cum_manage'
-					gs 'boyStat', 'A92'
-					spafinloc = 12
-					gs 'cum_manage'
-					
-					money += 5000
-					'<center><img <<$set_imgh>> src="images/shared/sex/group/rinkrug.jpg"></center>'
-					'You nod your head yes, the other two laugh and start pulling out their dicks as they head over. The stroke themselves as they wait for Artur to finish. It doesn''t take him long, he pulls out of you and you feel hot wet spurts of cum landing all over your ass and lower back. Once he is done cumming he wipes his dick off on your ass and gets off you.'
-					'As soon as Artur gets off you, Adbul moves behind your and pulls your up by your hips till you are on all fours. He wastes no time and plunges his <<dick>>cm <<$dick_girth>> dick into your pussy. You notice he was not blessed by nature almost at once. But that doesn''t seem to bother him in the slightest as he fucks you hard and fast, constantly slapping your ass cheeks. As he comments to the others and laughs.'
-					
-					'Meanwhile Hasan kneeled down in front of you and slaps his <<dick>>cm <<$dick_girth>> dick against you face and keeps slapping it hard against your cheek until you open up your mouth. As soon as your mouth opens he shoves his cock in your mouth, holding your head he fucks your mouth and into your throat. Not seeming to care if you are gagging or not, though he is careful to make sure to let you breath.'
-					'As the two guys spit-roast you, Artur gets dressed and then takes a seat. He drinks as he watches you getting fucked by the other two.'
-					'Finally Abdul pulls out and spurts his load all over your ass and lower back. His sperm adding to the mess Artur already spewed on you. A few moments latter Hasan groans and shots his load in your mouth. As soon as they have both shot their load, they get up, say something to Artur as they put their dicks away and then they leave with out a further word.'
-					'Once they are gone, Artur says. "So you like cock do you? Well I can use that, it will be very useful to my business. Here this is a bonus." With that he gets up and walks out, leaving you a bonus of 5,000 <b>₽</b>.'
-
-					gs 'arousal', 'bj', 20, 'sub', 'rough', 'group'
-					gs 'arousal', 'vaginal', 20, 'sub', 'rough', 'group'
-					gs 'arousal', 'end'
-					gs 'stat'
-					
-					act 'Go home':gt 'street'
+								
+				gs 'willpower', 'gangbang', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Agree to gangbang (<<will_cost>> Willpower)':
+						cla
+						palevorin = 4
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						if abdulasex = 0:abdulasex = 1 & guy += 1
+						if hasansex = 0:hasansex = 1 & guy += 1
+						
+						pcs_vag += 1
+						swallow +=1
+						gang += 1
+						gs 'boyStat', 'A91'
+						spafinloc = 4
+						gs 'cum_manage'
+						gs 'boyStat', 'A92'
+						spafinloc = 12
+						gs 'cum_manage'
+						
+						money += 5000
+						'<center><img <<$set_imgh>> src="images/shared/sex/group/rinkrug.jpg"></center>'
+						'You nod your head yes, the other two laugh and start pulling out their dicks as they head over. The stroke themselves as they wait for Artur to finish. It doesn''t take him long, he pulls out of you and you feel hot wet spurts of cum landing all over your ass and lower back. Once he is done cumming he wipes his dick off on your ass and gets off you.'
+						'As soon as Artur gets off you, Adbul moves behind your and pulls your up by your hips till you are on all fours. He wastes no time and plunges his <<dick>>cm <<$dick_girth>> dick into your pussy. You notice he was not blessed by nature almost at once. But that doesn''t seem to bother him in the slightest as he fucks you hard and fast, constantly slapping your ass cheeks. As he comments to the others and laughs.'
+						
+						'Meanwhile Hasan kneeled down in front of you and slaps his <<dick>>cm <<$dick_girth>> dick against you face and keeps slapping it hard against your cheek until you open up your mouth. As soon as your mouth opens he shoves his cock in your mouth, holding your head he fucks your mouth and into your throat. Not seeming to care if you are gagging or not, though he is careful to make sure to let you breath.'
+						'As the two guys spit-roast you, Artur gets dressed and then takes a seat. He drinks as he watches you getting fucked by the other two.'
+						'Finally Abdul pulls out and spurts his load all over your ass and lower back. His sperm adding to the mess Artur already spewed on you. A few moments latter Hasan groans and shots his load in your mouth. As soon as they have both shot their load, they get up, say something to Artur as they put their dicks away and then they leave with out a further word.'
+						'Once they are gone, Artur says. "So you like cock do you? Well I can use that, it will be very useful to my business. Here this is a bonus." With that he gets up and walks out, leaving you a bonus of 5,000 <b>₽</b>.'
+
+						gs 'arousal', 'bj', 20, 'sub', 'rough', 'group'
+						gs 'arousal', 'vaginal', 20, 'sub', 'rough', 'group'
+						minut -= 20
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Go home':gt 'street'
+					end
+				else
+					act 'Agree to gangbang (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 			end
 		end
@@ -160,51 +165,56 @@ if $ARGS[0] = 'the_beginning':
 				gs 'arousal', 'end'
 				gs 'stat'
 				act 'Go home':gt 'street'
+			
 			elseif gbrand >= 95 and palevorin = 1:
 			
                 'After some time, he pulls his dick mostly out of your mouth. Only leaving in the head and with in moments you feel and taste his sperm as he shoots his load in your mouth, spurt after spurt, filling your mouth up with his semen. Once he is done cumming he pulls his dick out of your mouth and wipes it off on your lips.'
 				'As he finishes you notice that Abdul and Hasan are there watching, you don''t remember hearing them enter, you freeze in astonishment and shame, you were caught with a mouth full of sperm, the men smile and laugh, saying something to each other and then they say something to Artur who barely grunts a reply to them.'
 				'Hasan then says to you. "Hey girl, why don''t you give us a turn and we won''t tell everyone in the market." You glance back at Artur as he doesn''t show any indication he cares.'
-
+				
 				act 'Wipe your mouth and leave':
 					cla
 					money += 2000
-
 					palevorin = 2
-
-                    'You your face red with shame you wipe the remnants of sperm from your lips and correct your clothes, at this time Artur hands you 2,000 <b>₽</b> as a bonus, as you take the money Artur says to you quietly. "It is alright I will deal with them." You look at him a moment, nod and then leave.'
+					'You your face red with shame you wipe the remnants of sperm from your lips and correct your clothes, at this time Artur hands you 2,000 <b>₽</b> as a bonus, as you take the money Artur says to you quietly. "It is alright I will deal with them." You look at him a moment, nod and then leave.'
 
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Go home':gt 'street'
 				end
-
-				act 'Agree to suck them as well':
-					cla
-					palevorin = 4
-					
-					if abdulasex = 0:abdulasex = 1 & guy += 1
-					if hasansex = 0:hasansex = 1 & guy += 1
-
-					gang += 1
-					swallow +=1
-					gs 'boyStat', 'A91'
-					spafinloc = 12
-					gs 'cum_manage'
-					gs 'boyStat', 'A92'
-					spafinloc = 12
-					gs 'cum_manage'
-					money += 5000
-					'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/rintri.jpg"></center>'
-					'You nod your head in agreement. The two men immediately take out their members and walking over to you hold them by your mouth, you suck the two dicks. Sometimes one of them in your mouth while you jerk the other one off and sometimes they stick both their dicks in your mouth at the same time.'
-					'Finally Abdul and Hassan cum in your mouth, once they pull their dicks out of your mouth. They wipe them off on your lips and cheeks before putting their dicks away, They same something to Artur, laughing as they leave.'
-					'Once they are gone, Artur says. "So you like cock do you? Well I can use that, it will be very useful to my business. Here this is a bonus." With that he gets up and walks out, leaving you a bonus of 5,000 <b>₽</b>.'
-
-					gs 'arousal', 'bj', 20, 'sub', 'rough', 'group'
-					gs 'stat'
-					
-					act 'Go home':gt 'street'
-				end
+				
+				gs 'willpower', 'bj', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Agree to suck them as well (<<will_cost>> Willpower)':
+						cla
+						palevorin = 4
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						if abdulasex = 0:abdulasex = 1 & guy += 1
+						if hasansex = 0:hasansex = 1 & guy += 1
+
+						gang += 1
+						swallow +=1
+						gs 'boyStat', 'A91'
+						spafinloc = 12
+						gs 'cum_manage'
+						gs 'boyStat', 'A92'
+						spafinloc = 12
+						gs 'cum_manage'
+						money += 5000
+						'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/rintri.jpg"></center>'
+						'You nod your head in agreement. The two men immediately take out their members and walking over to you hold them by your mouth, you suck the two dicks. Sometimes one of them in your mouth while you jerk the other one off and sometimes they stick both their dicks in your mouth at the same time.'
+						'Finally Abdul and Hassan cum in your mouth, once they pull their dicks out of your mouth. They wipe them off on your lips and cheeks before putting their dicks away, They same something to Artur, laughing as they leave.'
+						'Once they are gone, Artur says. "So you like cock do you? Well I can use that, it will be very useful to my business. Here this is a bonus." With that he gets up and walks out, leaving you a bonus of 5,000 <b>₽</b>.'
+
+						gs 'arousal', 'bj', 20, 'sub', 'rough', 'group'
+						gs 'stat'
+						
+						act 'Go home':gt 'street'
+					end
+				else
+					act 'Agree to suck them as well (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end	
 			end
 		end
 	end
@@ -253,6 +263,7 @@ if $ARGS[0] = 'group':
 			gs 'arousal', 'bj', 20, 'sub', 'rough', 'group'
 			gs 'arousal', 'vaginal', 20, 'sub', 'rough', 'group'
 			gs 'arousal', 'anal', 20, 'sub', 'rough', 'group'
+			minut -= 20
 			gs 'stat'
 		end
 		if horand <= pcs_horny:
@@ -260,6 +271,7 @@ if $ARGS[0] = 'group':
 			gs 'arousal', 'bj', 20, 'sub', 'rough', 'group'
 			gs 'arousal', 'vaginal', 20, 'sub', 'rough', 'group'
 			gs 'arousal', 'anal', 20, 'sub', 'rough', 'group'
+			minut -= 20
 			gs 'stat'
 		end
 
@@ -327,7 +339,6 @@ if $ARGS[0] = 'sex':
 				act 'Go home':gt 'street'
 			end
 		else
-			pcs_horny += 20
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/shared/sex/anal/doggy/anal28.jpg"></center>'
 			'He pulls his dick out of your mouth and bends you over, pulling your hips up, till you are on all fours. He kneels down behind you and rubs the tip of his dick against your pussy lips, getting a bit of your natural lube on the head of his dick. Then he moves the tip of his dick up and rubs it against you asshole. He pushes his dick in, with only your slavia and a bit of your pussy juices on the tip for lucubration, you squeal a bit in pain.'

locations/Snpc.qsrc

@@ -33,7 +33,39 @@ end
 !!act 'Move away':gt $loc, $metka
 
 gs 'cumreaction'
-gs 'izdevat'
+
+!!option to mock outcasts
+if grupTipe[numnpc] = 5 and grupTipe ! 5:
+	gs 'willpower', 'humiliation', 'force', 'easy'
+	if will_cost <= pcs_willpwr:
+		if pav_slut < 50:
+			act 'Mock (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'force'
+				cls
+				menu_off = 1
+				npc_rel[$static_num] -= 5
+				gs 'stat'
+				'You mocked the school outcast, as the other students laugh at them.'
+
+				if $loc ! 'gdkin':gt 'gschool_lessons', 'short_break'
+				if $loc = 'gdkin':act 'Move away':gt $loc, $metka
+			end
+		else
+			act 'Mock (<<will_cost>> Willpower)':
+				cls
+				menu_off = 1
+				gs 'stat'
+				'You began to mock them, but <<$npc_firstname[$static_num]>> answered you. "You''re one to talk cocksucker, everyone knows your the easiest fuck in town." Everyone started laughing at you. You were shocked and confused by everyone turning on you, you hurry away as the others start to talk about you.'
+
+				if $loc ! 'gdkin':gt 'gschool_lessons', 'short_break'
+				if $loc = 'gdkin':act 'Move away':gt $loc, $metka
+			end
+		end
+	else
+		act 'Mock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+end
+
 gs 'krutishi'
 
 if numnpc = 9:gs 'kotovtalker'
@@ -63,7 +95,7 @@ if numnpc = 9:gs 'kotovtalker'
 !!!!!!!!!!!!!
 if npc_grupTipe['A<<numnpc>>'] = 4:
 	if $loc = 'gdkin':
-		if pav_slut < 125:
+		if pav_slut < 150:
 			if numnpc ! 9:
 				if npc_gender['A<<numnpc>>'] = 0:
 					'<<$npc_firstname[''A<<numnpc>>'']>> offers you a beer and says: "Hey <<$pcs_nickname>>! Let''s drink some beer and have some fun!"'
@@ -84,7 +116,7 @@ if npc_grupTipe['A<<numnpc>>'] = 4:
 					act 'Move away':gt $loc, $metka
 				end
 			end
-		elseif pav_slut >= 125:
+		elseif pav_slut >= 150:
 			if npc_gender['A<<numnpc>>'] = 0:
 				'<<$npc_firstname[''A<<numnpc>>'']>> looks at you wearily: "What do you want? Looking for a dick to suck on or something?"'
 			else
@@ -99,7 +131,6 @@ if npc_grupTipe['A<<numnpc>>'] = 4:
 end
 
 if numnpc = 144:
-!!I would like to change this so even if all the requirements are meet it only fires one in 5 times. 
 	if $loc ! 'gdkin' and npc_rel['A<<numnpc>>'] > 50 and (Anush_sex > 0 or hotcat >= 7) and rand(0,4) = 0:
 		act 'You''re looking flushed':
 			*clr & cla
@@ -203,9 +234,7 @@ if numnpc = 23:
 	end
 end
 
-!!!!!!!!!!!!!
-!!!Chat!!!
-!!!!!!!!!!!!!
+!!Chat
 if narkoman = 1 and npcnum = 1 and npc_rel['A1'] > 100:
 	'You don''t want to but the you feel miserable and everything hurts, you crave the rush that you''ve come to enjoy so much'
 	'"Please Dimka, can I have some pale lady?"'
@@ -221,9 +250,7 @@ else
 	act 'Move away': gt $loc, $metka
 end
 
-!!!!!!!!!!!!!
-!!!Chat!!!
-!!!!!!!!!!!!!
+!!Chat
 act 'Chat':
 	*clr & cla
 
@@ -259,9 +286,7 @@ act 'Chat':
 	end
 end
 
-!!!!!!!!!!!
-!!Lariska!!
-!!!!!!!!!!!
+!!Lariska
 if numnpc = 13 and lariskaHelp = -1:
 	'She looks at you rejectedly, and softly says: "Leave me alone, <<$pcs_nickname>>. I want nothing to do with you any more."'
 
@@ -272,18 +297,15 @@ if numnpc = 13 and lariskaHelp = -1:
 	end
 end
 
-!!!!!!!!!!!!!!!!!!!!!!
-!!!Artem CHEBOTAREV!!!
-!!!!!!!!!!!!!!!!!!!!!!
+!!Artem CHEBOTAREV
 if numnpc = 2:
-	if (pcs_dom > 0 or grupTipe = 3) and artemLernQW = 0:
+	if (npc_rel['A2'] >= 50 or grupTipe = 3) and artemLernQW = 0:
 		act '"Could you help me out a bit in school?"':
 			*clr & cla
 
 			if $loc = 'gdkin':minut += 5
 
 			npc_rel['A<<numnpc>>'] += 5
-			sub += 1
 
 			if pav_slut < 125: artemLernQW = 1
 
@@ -303,40 +325,28 @@ if numnpc = 2:
 	end
 end
 
-!!!!!!!!!!!!!!!!!!
-!!Ivan Prokhorov!!
-!!!!!!!!!!!!!!!!!!
-
+!!Ivan Prokhorov
 if numnpc = 3:gt 'IvanEv', 'School Chat'
 
-!!!!!!!!!!!!!!!
-!!Vitek Kotov!!
-!!!!!!!!!!!!!!!
-
+!!Vitek Kotov
 if numnpc = 9 and kotovloveqw > 0 and $loc ! 'gdkin' and NikoPayback = 2:act 'Tell him about Niko':gt 'NikoPayback', 'Vitek Help'
 
-!!!!!!!!!!!!!!!!!!
-!!!Fedor Kozlov!!!
-!!!!!!!!!!!!!!!!!!
-
+!!Fedor Kozlov
 if numnpc = 5 and $loc ! 'gdkin' and FedorLove < 0:
 	gt 'FedorMisc', 'Fedor Hate'
 elseif numnpc = 5 and $loc ! 'gdkin':
 	gt 'FedorMisc', 'Fedor Chat'
 end
 
-!!!!!!!!!!!!!!!!!!
-!!!JULIA milova!!!
-!!!!!!!!!!!!!!!!!!
+!!JULIA milova
 if numnpc = 12:
-	if (pcs_dom > 0 or grupTipe = 3) and JuliaMilLernQW = 0 and npc_rel['A<<numnpc>>'] >= 80:
+	if (npc_rel['A12'] >= 50 or grupTipe = 3) and JuliaMilLernQW = 0 and npc_rel['A<<numnpc>>'] >= 80:
 		act '"Could you help me out a bit in school?"':
 			*clr & cla
 
 			if $loc = 'gdkin':minut += 5
 
 			npc_rel['A<<numnpc>>'] += 5
-			sub += 1
 			JuliaMilLernQW = 1
 			gs 'stat'
 			'<center><b><font color="maroon"><<$npc_firstname[''A<<numnpc>>'']>> <<$npc_lastname[''A<<numnpc>>'']>></font></b></center>'
@@ -354,10 +364,7 @@ if numnpc = 12:
 	end
 end
 
-!!!!!!!!!!!!!!!!!!!
-!!!Katja MEYNOLD!!!
-!!!!!!!!!!!!!!!!!!!
-
+!!Katja MEYNOLD
 if numnpc = 14:
 	if meynoldQW = 1:
 		act 'Thank Katja for taking you home from the disco':
@@ -479,7 +486,7 @@ if numnpc = 14:
 	end
 
 	if apmeet = 3 and artemIzdev = 0:
-		act 'Ask how to stop Artem and Peter''s blackmail':
+		act 'Ask how to stop Artem and Petka''s blackmail':
 			*clr & cla
 			if $loc = 'gdkin':minut += 5
 			artemIzdev = 1
@@ -487,7 +494,7 @@ if numnpc = 14:
 
 			'<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>'
-			'You make sure no one else is paying attention, and tell Katja about what Artem and Peter are doing to you on Mondays. At first she doesn''t believe you. After a while, all of the nasty details you''re sharing convince her that there is no way you''re making this up. Katja is shocked!'
+			'You make sure no one else is paying attention, and tell Katja about what Artem and Petka are doing to you on Mondays. At first she doesn''t believe you. After a while, all of the nasty details you''re sharing convince her that there is no way you''re making this up. Katja is shocked!'
 			'You tell her that the only way you have thought of to get rid of their blackmailing, is to get blackmailing material of your own. Katja nods and says: "That makes sense, actually... if you could somehow make it look violent, I bet it would work even better! I don''t know where you would be able to find a tiny camera though... maybe Albina can help you?"'
 
 			if $loc ! 'gdkin':
@@ -513,19 +520,15 @@ if numnpc = 14:
 	end
 end
 
-!!!!!!!!!!!!!!!!!!!!!!!!!
-!!!Natasha Belova Botha!!
-!!!!!!!!!!!!!!!!!!!!!!!!!
-
+!!Natasha Belova Botha
 if numnpc = 16:
-	if pcs_dom > 0 and NatashaQW = 0 and npc_rel['A<<numnpc>>'] >= 80:
+	if npc_rel['A16'] >= 50 and NatashaQW = 0 and npc_rel['A<<numnpc>>'] >= 80:
 		act '"Could you help me out a bit in school?"':
 			*clr & cla
 
 			if $loc = 'gdkin':minut += 5
 
 			npc_rel['A<<numnpc>>'] += 5
-			sub += 1
 			NatashaQW = 1
 			gs 'stat'
 			'<center><b><font color="maroon"><<$npc_firstname[''A<<numnpc>>'']>> <<$npc_lastname[''A<<numnpc>>'']>></font></b></center>'
@@ -546,7 +549,6 @@ if numnpc = 16:
 			minut += 5
 			natotrab += 1
 			natsub += 1
-			pcs_dom += 1
 			gs 'stat'
 			'<center><b><font color="maroon">Girls Bathroom</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/girlsbathroom.jpg"></center>'
@@ -577,10 +579,7 @@ if numnpc = 16:
 	end
 end
 
-!!!!!!!!!!!!!!!!!!!!!!!!!
-!!!!!Lizaveta Petrov!!!!!
-!!!!!!!!!!!!!!!!!!!!!!!!!
-
+!!Lizaveta Petrov
 if numnpc = 31:
 	act 'Latest gossip':
 		*clr & cla
@@ -598,10 +597,7 @@ if numnpc = 31:
 	end
 end
 
-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-!!!!!Aleksandra Kirilenko!!!!!
-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-
+!!Aleksandra Kirilenko
 if numnpc = 231:
 	if npc_rel['A<<numnpc>>'] >= 100 and grupTipe = 3 and npc_QW['A<<numnpc>>'] = 0 and temper >= 15:
 		act 'Ask to join at library after school':
@@ -611,10 +607,10 @@ if numnpc = 231:
 			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>'
-			'"Hi <<$npc_nickname[''<<''A<<numnpc>>''>>'']>>! I just finished my last book at home and I''m not sure what I should read next. Can I join you at the library this afternoon so that you can help me find another good one to read?"'
-			'<<$npc_firstname[''<<''A<<numnpc>>''>>'']>>''s face quickly shifts from a smile to confusion. You can tell she''s not sure how to respond and there is a long pause as a result. Finally after about 30 seconds of thought she responds "Sure, that should be alright. Do you mind going home with me first so that I can change out of our uniform?"'
+			'"Hi <<$npc_nickname[''A<<numnpc>>'']>>! I just finished my last book at home and I''m not sure what I should read next. Can I join you at the library this afternoon so that you can help me find another good one to read?"'
+			'<<$npc_firstname[''A<<numnpc>>'']>>''s face quickly shifts from a smile to confusion. You can tell she''s not sure how to respond and there is a long pause as a result. Finally after about 30 seconds of thought she responds "Sure, that should be alright. Do you mind going home with me first so that I can change out of our uniform?"'
 			'"That is no problem at all" you reply. "I''ll meet you outside of school after our last period, and then we can head to your house together."'
-			'"Sounds good <<$pcs_nickname>>. See you then" <<$npc_firstname[''<<''A<<numnpc>>''>>'']>> replies as she heads off.'
+			'"Sounds good <<$pcs_nickname>>. See you then" <<$npc_firstname[''A<<numnpc>>'']>> replies as she heads off.'
 			if $loc ! 'gdkin':
 				xgt 'gschool_lessons', 'short_break', 'nopict'
 			else
@@ -629,17 +625,17 @@ if numnpc = 231:
 			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>'
-			'"Hi <<$npc_nickname[''<<''A<<numnpc>>''>>'']>>! I ended up missing school the other day because I was sick. Would it be alright with you if we went to your house after school so that you can help me catch up?"'
-			'<<$npc_firstname[''<<''A<<numnpc>>''>>'']>> replies "Sure <<$pcs_nickname>>, just as long as you aren''t sick anymore. I don''t want to get sick with whatever you had and miss school as well."'
+			'"Hi <<$npc_nickname[''A<<numnpc>>'']>>! I ended up missing school the other day because I was sick. Would it be alright with you if we went to your house after school so that you can help me catch up?"'
+			'<<$npc_firstname[''A<<numnpc>>'']>> replies "Sure <<$pcs_nickname>>, just as long as you aren''t sick anymore. I don''t want to get sick with whatever you had and miss school as well."'
 			'You giggle a little bit and reply "Nah, I got over my sickness so you should be fine. I''ll meet you outside of school after our last period, and then we can head to your house together."'
-			'"Sounds good <<$pcs_nickname>>. See you then" <<$npc_firstname[''<<''A<<numnpc>>''>>'']>> replies as she heads off.'
+			'"Sounds good <<$pcs_nickname>>. See you then" <<$npc_firstname[''A<<numnpc>>'']>> replies as she heads off.'
 			if $loc ! 'gdkin':
 				xgt 'gschool_lessons', 'short_break', 'nopict'
 			else
 				act 'Move away': gt $loc, $metka
 			end
 		end
-	elseif npc_rel['A<<numnpc>>'] >= 100 and npc_QW['A<<numnpc>>'] = 4 and pcs_dom >= 20:
+	elseif npc_rel['A<<numnpc>>'] >= 100 and npc_QW['A<<numnpc>>'] = 4:
 		act 'Serious talk':
 			*clr & cla
 			minut += 5
@@ -647,28 +643,28 @@ if numnpc = 231:
 			npc_QW['A231'] = 5
 			'<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 walk to up <<$npc_firstname[''<<''A<<numnpc>>''>>'']>>, you feel your stomach drop to the floor due to how awkward the situation is. However you''re not about to let what happened end your friendship without at least clearing the air.'
+			'As you walk to up <<$npc_firstname[''A<<numnpc>>'']>>, you feel your stomach drop to the floor due to how awkward the situation is. However you''re not about to let what happened end your friendship without at least clearing the air.'
 			'After about a minute or so of eye contact, you finally develop enough courage to speak first.'
-			'"Hi <<$npc_nickname[''<<''A<<numnpc>>''>>'']>>...." You say in a nervous and defeated voice.'
+			'"Hi <<$npc_nickname[''A<<numnpc>>'']>>...." You say in a nervous and defeated voice.'
 			'"Hi <<$pcs_nickname>>...." she replies in an equally nervous voice.'
 			'After taking a couple more seconds to fully collect your thoughs, you say "Look, I think we need to talk about what happened last time at your house. Given the subject, it would be best to do so privately. Can we meet after school to talk about it?"'
-			'<<$npc_nickname[''<<''A<<numnpc>>''>>'']>> doesn''t respond, and almost looks like she''s about to start crying. She finally wimpers "Are you mad at me or are you sickened by me?"'
+			'<<$npc_nickname[''A<<numnpc>>'']>> doesn''t respond, and almost looks like she''s about to start crying. She finally wimpers "Are you mad at me or are you sickened by me?"'
 			'Not completely surprised by what she said, you hold firm in making sure to wait until the two of you are alone. "I don''t wan''t to discuss things here. Meet me after school so we can talk about this more. I promise I''m not going to hurt you if that is what you''re afraid of."'
-			'Looking a little releaved, <<$npc_firstname[''<<''A<<numnpc>>''>>'']>> nods her head in a slow manner and sheds a couple of tears. You walk away without either of you saying another word."'
+			'Looking a little releaved, <<$npc_firstname[''A<<numnpc>>'']>> nods her head in a slow manner and sheds a couple of tears. You walk away without either of you saying another word."'
 			if $loc ! 'gdkin':
 				xgt 'gschool_lessons', 'short_break', 'nopict'
 			else
 				act 'Move away': gt $loc, $metka
 			end
 		end	
-	elseif npc_rel['A<<numnpc>>'] >= 100 and npc_QW['A<<numnpc>>'] = 4 and pcs_dom < 20:
+	elseif npc_rel['A<<numnpc>>'] >= 100 and npc_QW['A<<numnpc>>'] = 4:
 		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
@@ -676,7 +672,7 @@ if numnpc = 231:
 			end
 		end
 	elseif npc_QW['A<<numnpc>>'] > 5:
-		'Ever since you asked <<$npc_nickname[''<<''A<<numnpc>>''>>'']>> to be your girlfriend, she has come out of her shell a bit more. She even kisses you while at school!'
+		'Ever since you asked <<$npc_nickname[''A<<numnpc>>'']>> to be your girlfriend, she has come out of her shell a bit more. She even kisses you while at school!'
 		act 'Kiss her':
 			*clr & cla
 			minut += 5
@@ -687,7 +683,7 @@ if numnpc = 231:
 			gs 'stat'
 			'<center><b><font color="maroon"><<$npc_firstname[''A<<numnpc>>'']>> <<$npc_lastname[''A<<numnpc>>'']>></font></b></center>'
 !!Image needed			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/aleksandra/school_kiss.jpg"></center>'
-			'You lean in to kiss <<$npc_firstname[''<<''A<<numnpc>>''>>'']>> and you both close your eyes as your lips meet. You don''t really care what anyone else thinks, you both just enjoy the moment.' 
+			'You lean in to kiss <<$npc_firstname[''A<<numnpc>>'']>> and you both close your eyes as your lips meet. You don''t really care what anyone else thinks, you both just enjoy the moment.' 
 			'You eventually break off the kiss and say "See you later cutie" and head on your way.'
 			if $loc ! 'gdkin':
 				xgt 'gschool_lessons', 'short_break', 'nopict'

locations/StasQW.qsrc

@@ -40,7 +40,17 @@ elseif StasKafe = 1:
 				'<center><img <<$set_imgh>> src="images/characters/city/stas/go.jpg"></center>'
 				'A bit tipsy you are unsteady on your feet. You stumble and nearly fall, but Stas gallantly caught and helps steady you. Making sure you are alright, he helps support you the rest of the walk home. Once you get to your home, he waits at the door expectantly, he clearly expects you to invite him in.'
 
-				act 'To invite':SStip = 0 & gt 'StasSex'
+				gs 'willpower', 'sex', 'self', 'easy'
+				if will_cost <= pcs_willpwr:
+					act 'Invite him in (<<will_cost>> Willpower)':
+						SStip = 0
+						gs 'willpower', 'pay', 'self'
+						gs 'stat'
+						gt 'StasSex'
+					end
+				else
+					act 'Invite him in (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end	
 
 				act 'Say goodbye':
 					cls

locations/StasSex.qsrc

@@ -22,7 +22,7 @@ if SStip = 0:
 
 			'You feel like you almost can''t take the teasing anymore when he fully pushing himself inside of you, his <<dick>>cm <<$dick_girth>> dick fills your pussy up. He gentle fucks you, slowly working himself deeper into you, while he continues to kiss you and kneed your breasts, you moan in deep pleasure as the two of you make love.'
 			gs 'dinsex','vaginal_sex',15,'sub'
-			$orgasm_or = 'custom'
+			$orgasm_or = 'yes'
 			$orgasm_txt = '<<$boydesc>> groans and you feel a jet of sperm spurt inside of your body, followed by several more.'
 			gs 'cum_call','',$boy,1
 			gs 'cuminsidereact',$boydesc

locations/Terminal.qsrc

@@ -54,6 +54,21 @@ $askfather = {
 					'Your father hugged and looked at you, as if not believing your really here. "I can''t believe my little girl is all grown up."'
 					'He insists you come to lunch with him to catch up.'
 
+					gs 'willpower', 'misc', 'self'
+					if will_cost <= pcs_willpwr:
+						act 'Tell him off (<<will_cost>> Willpower)':
+							cls
+							gs 'willpower', 'pay', 'self'
+							minut += 5
+							gs'stat'
+							'<center><img <<$set_imgh>> src="images/characters/city/mikhail/terminal/sisboyqw_37.jpg"></center>'
+							'You swear at him, curse him and pour out all your anger for all those years he was never around, once you are done and crying. You turn and run away, never giving him a chance to reply. Swearing to never return.'
+							trfatherQW = -1
+							act 'Leave': minut += 5 & gt $curloc
+						end
+					else
+						act 'Tell him off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 					act 'Get a kebab':
 						cls
 						minut += 5
@@ -66,15 +81,6 @@ $askfather = {
 						trfatherQW = 4
 						act 'Leave':minut += 5 & gt 'nord'
 					end
-					act 'Tell him off':
-						cls
-						minut += 5
-						gs'stat'
-						'<center><img <<$set_imgh>> src="images/characters/city/mikhail/terminal/sisboyqw_37.jpg"></center>'
-						'You swear at him, curse him and pour out all your anger for all those years he was never around, once you are done and crying. You turn and run away, never giving him a chance to reply. Swearing to never return.'
-						trfatherQW = -1
-						act 'Leave':minut += 5 & gt $curloc
-					end
 				end
 			end
 		end
@@ -109,14 +115,20 @@ if trfatherQW = 2:
 			'"Hello girly, want to earn some quick cash?"'
 			'"No, thank you, I''m here looking for a man, I need your help."'
 			'"Well if you want our help, how about you help us first. Use that cute little mouth of yours for something other than asking questions first and then we will tell you what you want to know."'
-			act 'Tell them to fuck off':
-				cls
-				minut += 5
-				gs'stat'
-				'<center><img <<$set_imgh>> src="images/characters/city/mikhail/terminal/trfatherqw_5.jpg"></center>'
-				'"Go fuck yourselves you disgusting perverts."'
-				'You left them to find your answers elsewhere.'
-				act 'Leave':minut += 5 & gt $curloc
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Tell them to fuck off (<<will_cost>> Willpower)':
+					cls
+					gs 'willpower', 'pay', 'self'
+					minut += 5
+					gs'stat'
+					'<center><img <<$set_imgh>> src="images/characters/city/mikhail/terminal/trfatherqw_5.jpg"></center>'
+					'"Go fuck yourselves you disgusting perverts."'
+					'You left them to find your answers elsewhere.'
+					act 'Leave': minut += 5 & gt $curloc
+				end
+			else
+				act 'Tell them to fuck off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 			act 'Suck them off':
 				cls
@@ -238,10 +250,20 @@ elseif (trfatherQW >= 3 or trfatherQW < 0) and week = 6 and hour = 12:
 				end
 			end
 			if trfatherQW = 3:dynamic $askfather
-			act 'Leave':minut += 5 & gt $curloc
+			gs 'willpower', 'drink', 'resist', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & minut += 5 & gt $curloc
+			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
 		end
 		if trfatherQW = 3:dynamic $askfather
-		act 'Leave':minut += 5 & gt $curloc
+		gs 'willpower', 'drink', 'resist', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & minut += 5 & gt $curloc
+		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
 	end
 end
 

locations/Voltrener.qsrc

@@ -15,7 +15,7 @@ if $ARGS[0] = 'start':
 		'The coach hates you.'
 		if volleysostav = 1:
 			volleysostav = 0
-			'Menacingly he says, "<<$pcs_lastname>>, I''m sick of you attitude. You''re off the team!"'
+			'Menacingly he says, "<<$pcs_lastname>>, I''m sick of your attitude. You''re off the team!"'
 			act 'Leave':gt 'gdksport', 'start'
 		end
 	elseif npc_rel['A69'] < 20:
@@ -34,7 +34,7 @@ if $ARGS[0] = 'start':
 		'You are in a sexual relationship with Coach.'
 	else
 		if trenerlust >= 80:
-			'Coach can''t take his eyes of you, and he keeps making sexual references in your presence.'
+			'Coach can''t take his eyes of you and he keeps making sexual references in your presence.'
 		elseif trenerlust >= 60:
 			'Coach sometimes makes lewd comments around you and you often catch him ogling your body.'
 		elseif trenerlust >= 40:
@@ -56,35 +56,48 @@ if $ARGS[0] = 'Lariska':
 	if lariskaTrenerTalk = 1:
 		'You and Lariska tried to persuade the coach to take Lariska, but he refused to consider your arguments.'
 	elseif lariskaTrenerTalk = 2:
-		if pcs_dom >= 10:
-			'You managed to convince the coach to let Lariska join the team.'
-			LariskaProfi = 1
+		gs 'willpower', 'misc', 'force'
+		if will_cost <= pcs_willpwr:
+			act 'Convince coach to let Lariska play (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'force'
+				gs'stat'
+				'You managed to convince the coach to let Lariska join the team.'
+				gs 'Voltrener' ,'LariskaProfi'
+				act 'Leave':gt 'gdksport', 'start'
+			end
 		else
-			'You and Lariska tried to persuade the coach to take Lariska, but he refused.'
+			act 'Convince coach to let Lariska play (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You and Lariska tried to persuade the coach to take Lariska, but he refused.'
 		end
 	elseif lariskaTrenerTalk = 3:
-		if pcs_dom >= 20:
-			'You take an agressive approach and, although he doesn''t like it, you managed to convince the coach to let you both play.'
-			volleysostav = 1
-			if npc_rel['A69'] > 30:npc_rel['A69'] = 30
-			LariskaProfi = 1
+		gs 'willpower', 'misc', 'force', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Convince coach to let both of you join the team (<<will_cost>> Willpower)': 
+				gs 'willpower', 'pay', 'force'
+				gs 'stat'
+				volleysostav = 1
+				'You take an agressive approach and, although he doesn''t like it, you managed to convince the coach to let you both play.'
+				if npc_rel['A69'] > 30:npc_rel['A69'] = 30
+				gs 'Voltrener' ,'LariskaProfi'
+				act 'Leave':gt 'gdksport', 'start'
+			end
 		else
-			'You and Lariska tried to persuade the coach to give you both a place on the team, but he threw all of your arguments back in your faces.'
+			act 'Convince coach to let both of you join the team (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You and Lariska tried to persuade the coach to give you both a place on the team, but he threw all of your arguments back in your faces.'
 		end
 	elseif lariskaTrenerTalk = 4:
-		if npc_rel['A69'] >= 60:
-			'You managed to convince the coach to let Lariska join the team.'
-			LariskaProfi = 1
+		gs 'willpower', 'misc', 'force'
+		if will_cost <= pcs_willpwr:
+			act 'Convince coach to let Lariska play (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'force'
+				gs 'stat'
+				'You managed to convince the coach to let Lariska join the team.'
+				gs 'Voltrener' ,'LariskaProfi'
+				act 'Leave':gt 'gdksport', 'start'
+			end
 		else
-			'You and Lariska tried to persuade the coach to take Lariska, but he refused.'
+			act 'Convince coach to let Lariska play (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You tried to persuade the coach to take Lariska, but he refused.'
 		end
 	end
 
-	if LariskaProfi = 1:
-		$npc_notes['A13'] = 'Lariska is an athletic girl, but she is very dependent on other people''s opinions. Lariska has changed a lot; she has a sparkle in her eyes, and is almost always in a good mood. After joining the team, she quickly got into playing and is now one of the best players.'
-		'When you came out of the coach''s office, Lariska hugged you and said,: "Thank you, <<$pcs_nickname>>!"'
-		npc_rel['A13'] += 20
-	end
 	minut += 10
 	gs 'stat'
 
@@ -92,6 +105,13 @@ if $ARGS[0] = 'Lariska':
 	act 'Leave':gt 'gdksport', 'start'
 end
 
+if $ARGS[0] = 'LariskaProfi':
+	LariskaProfi = 1
+	$npc_notes['A13'] = 'Lariska is an athletic girl, but she is very dependent on other people''s opinions. Lariska has changed a lot; she has a sparkle in her eyes, and is almost always in a good mood. After joining the team, she quickly got into playing and is now one of the best players.'
+	'When you came out of the coach''s office, Lariska hugs you and says,: "Thank you, <<$pcs_nickname>>!"'
+	npc_rel['A13'] += 20
+end
+
 if $ARGS[0] = 'talk':
 	*clr & cla
 	gs 'stat'
@@ -138,53 +158,24 @@ if $ARGS[0] = 'talk':
 							'"Okay, welcome to the team <<$pcs_lastname>>. Remember, tournament matches are on Saturdays. Don''t forget to show up!"'
 							act 'Leave':gt 'gdksport', 'start'
 						end
-					else
-						'You ask the coach about joining the team, the coach thinks for a minute. "I have a spot for a substitute, but I do not know if you have what it takes."'
-						act 'Persuade him':
-							*clr & cla
-							gs 'stat'
-
-							if npc_rel['A69'] >= 60:
-								minut += rand(20,30)
-								if pcs_dom >= 30:
-									volleysostav = 1
-									'You appeal to the coach and ask him to at least give you a chance to prove yourself. Since he likes you, he decides to give you a break. "Okay, <<$pcs_nickname>>, I do have an opening for a sub. You''re on the team as a substitute player.'
-									act 'Leave':gt 'gdksport', 'start'
-								else
-									'You try to prove the coach that he should let you on the team, but you are not forceful enough and the coach countered all your arguments, denying you a place on the team.'
-									act 'Leave':gt 'gdksport', 'start'
-								end
-							end
-							
-							if rand(1,100) < pcs_dom: 
-								volleysostav = 1
-								if npc_rel['A69'] > 20:npc_rel['A69'] -= 20
-								'You try to prove the coach that he should include in the team, the coach tries to protest, and you get into an argument. Eventually you shout him down and he gives up. "Okay <<$pcs_lastname>>, I''ll put you in the team, but you''re on the bench and any more stunts like this and you''re out."'
-								act 'Leave':gt 'gdksport', 'start'
-							else 
-								pcs_dom -= 1
-								npc_rel['A69'] -= rand(1,5)
-								'You try to force the coach to put you on the team and you end up screaming at him. He just glares at you until you run out of steam then simply points to the door and says, "Out."' 
-								'Your cheeks are burning with embarrassment as you leave the office wondering what you were thinking by saying that if brains were dynamite he couldn''t blow his nose.' 
-							end
-							act 'Leave':gt 'gdksport', 'start'
-						end
 					end
-				else
+				elseif pav_slut > 75
 					'You ask the coach about joining the team. The coach thinks for a minute, "Hey <<$pcs_lastname>>, I hear loads of rumours about you. Such as you being a <<$gnikname>>. Is this true?"'
+					act 'Leave':gt 'gdksport', 'start'
 					act 'It''s all lies':
 						*clr & cla
+						gs 'willpower', 'misc', 'self', 'hard'
 						gs 'stat'
-
-						if pcs_dom > 0:
-							'You convince the coach that it''s all rumors and lies and dismiss them as envy. You speak quite convincingly and coach seems to believe you.'
-							act 'Persuade him to let you join the team':
+						act 'Leave': gt 'gdksport', 'start'						
+						if will_cost <= pcs_willpwr:
+							act 'Persuade him to let you join the team (<<will_cost>> Willpower)':
 								*clr & cla
+								gs 'willpower', 'pay', 'self'
 								gs 'stat'
-								if pcs_dom >= 10:
 									!!if volleysostav > 0:npc_rel['A69'] -= 1
-									volleysostav = 1
-									if npc_rel['A69'] > 20:npc_rel['A69'] = 20
+								volleysostav = 1
+								if npc_rel['A69'] > 20:
+									npc_rel['A69'] = 20
 									'You try to prove to the coach that he should put you on the team, the coach tries to protest, and you get into an argument. Eventually you shout him down and he gives up. "Fine <<$pcs_lastname>>, I''ll put you in the team, but you''re on the bench and any more stunts like this and you''re out."'
 								else
 									'You try to prove to the coach that he should put you on the team, but you are not forceful enough and the coach countered all your arguments, denying you a place on the team.'
@@ -192,24 +183,35 @@ if $ARGS[0] = 'talk':
 								act 'Leave':gt 'gdksport', 'start'
 							end
 						else
-							'You try to convince the coach that it''s all rumors and lies and dismiss them as envy. You are not very convincing and coach does not believe you. "<<$pcs_lastname>>, stop lying, do you take me for a fool?"'
-							act 'Okay, it''s true, I am a <<$gnikname>>':
-								*clr & cla
-								gs 'stat'
-								gt'Voltrener', 'gorslut'
-							end
+							act 'Persuade him to let you join the team (<font color="red"><will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to persuade him to join the team.'
 						end
-
-						act 'Leave':gt 'gdksport', 'start'
 					end
-					act 'It''s true, I''m a <<$gnikname>>':
+					act 'Okay, it''s true, I am a <<$gnikname>>':
 						*clr & cla
 						gs 'stat'
 						gt'Voltrener', 'gorslut'
 					end
-				end
+				else
+					'You ask the coach about joining the team, the coach thinks for a minute. "I have a spot for a substitute, but I do not know if you have what it takes."'
+					act 'Leave': gt 'gdksport', 'start'					
+					gs 'willpower', 'misc', 'self'
+					if will_cost <= pcs_willpwer:
+						act 'Persuade him (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'pay', 'self'
+							gs 'stat'
 
-				act 'Leave':gt 'gdksport', 'start'
+							if npc_rel['A69'] >= 60:
+								minut += rand(20,30)
+								volleysostav = 1
+								'You appeal to the coach and ask him to at least give you a chance to prove yourself. Since he likes you, he decides to give you a break. "Okay, <<$pcs_nickname>>, I do have an opening for a sub. You''re on the team as a substitute player.'
+								act 'Leave':gt 'gdksport', 'start'
+							end
+						end	
+					else
+						act 'Persuade him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red"> You try to prove the coach that he should let you on the team, but you are don''t have enough willpower and the coach countered all your arguments, denying you a place on the team.'
+					end
+				end
 			end
 
 			act 'Leave':gt 'gdksport', 'start'

locations/VoltrenerSexShower.qsrc

@@ -29,14 +29,17 @@ if $ARGS[0] = '1':
 	cls
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/voltrenersexshower1.jpg"></center>'
 	'You hear a suspicious noise. Wiping the steam off the glass, you see the coach hiding quite poorly in the dark, spying on you as you shower.'
+	
 	act 'Scream':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/voltrenersexshower4.jpg"></center>'
 		'You scream with fright and the coach quickly runs out.'
-		act 'Finish shower':gt 'gdksport', 'start'
- 	end
- 	if pcs_horny >= 60 or pav_slut > 25:
-		act 'Carry on':
+		act 'Finish shower': gt 'gdksport', 'start'
+	end
+	gs 'willpower', 'exhib', 'self', 'easy'
+ 	if (pcs_horny >= 60 or pav_slut > 25) and will_cost <= pcs_willpwr:
+		act 'Carry on (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'self'
 			npc_rel['A69'] += 2
 			trenerlust += 2
 			cls
@@ -49,9 +52,11 @@ if $ARGS[0] = '1':
 				cls
 				'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/event/voltrenersexshower5.mp4"></video></center>'
 				'Stepping out of the shower, you are not at all embarrassed by the coach who continues to stare at you. Drying yourself on a towel you ask, "Get everything you wanted, coach?" The coach smiles, then shakes his head, before leaving slowly.'
-				act 'Finish shower':gt 'gdksport', 'start'
+				act 'Finish shower': gt 'gdksport', 'start'
 			end
 		end
+	elseif (pcs_horny >= 60 or pav_slut > 25) and will_cost > pcs_willpwr:
+		act 'Carry on (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -65,9 +70,11 @@ if $ARGS[0] = '2':
 		'The coach takes the hint and tucking his cock away, does up his trousers and leaves. "It seems he did not have time to cum." You think with a touch of glee."'
 		act 'Leave':gt 'gdksport', 'start'
 	end
-	if pcs_horny >= 70 or pav_slut > 25:
-		act 'Masturbate':
-			if IvanShowerYes = 2:VoltrenerVoyeur += 1
+	gs 'willpower', 'exhib', 'self'
+	if (pcs_horny >= 70 or pav_slut > 25) and will_cost <= pcs_willpwr:
+		act 'Masturbate (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'self'
+			if IvanShowerYes = 2: VoltrenerVoyeur += 1
 			npc_rel['A69'] += 1
 			trenerlust += 4
 			minut += 10
@@ -80,15 +87,16 @@ if $ARGS[0] = '2':
 				pcs_mood = 100
 				'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower9.mp4"></video></center>'
 				'You look at his cock as if spellbound... At the same time caressing your Clit, and struggling to suppressing a groan. You see his hand stroking his member, the head appearing, and disappearing. Shaking his balls... The coach groans, and his dick squirts straight at you. Sperm splashes on your body, destroying your resolve, you shake in a powerful orgasm. Through the waves of orgasm you hardly hear what the coach is saying, "That was fun, we should do it again sometime."'
+				gs 'arousal', 'voyeur', -10
 				$orgasm_or = 'yes'
-				gs 'arousal', 'voyeur', 10
 				gs 'arousal', 'masturbate', 10
-				minut -= 10
 				gs 'arousal', 'end'
 				gs 'stat'
-				act 'Finish shower':gt 'gdksport', 'start'
+				act 'Finish shower': gt 'gdksport', 'start'
 			end
 		end
+	elseif (pcs_horny >= 70 or pav_slut > 25) and will_cost > pcs_willpwr:
+		act 'Masturbate (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -101,11 +109,10 @@ if $ARGS[0] = '3':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower19.jpg"></center>'
 		'You wipe the steam off a patch of the glass in front of you and see coach sitting in the dark, watching as Ivan Fucks you in the ass. when he got here and how much he''s seen, you don''t know, but your eyes meet and you are hit by a wave of shame and arousal. You literally throw yourself forward trying to jump off Ivan''s member, but your shaky legs betray you.'
 		'Whether from Ivan''s actions, the fact that the coach is watching you, or the combination of both you begin to cum violently shouting and rhythmically squeezing your classmates cock with your anus. This is more than enough to send Ivan over the edge, his cum filling your ass.'
-		analorgasm += 1
 		pcs_mood = 100
 		$orgasm_txt = 'The sudden feeling of being watched, was new, acute, the orgasm intense. You drop to the floor of the shower and lay there helplessly for some time.'
 		$orgasm_or = 'custom'
-		gs 'arousal', 'anal', 10
+		gs 'arousal', 'anal', 10, 'exhibitionism'
 		gs 'cum_call', 'anus', 'A3'
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -114,6 +121,25 @@ if $ARGS[0] = '3':
 			gs 'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower20.mp4"></video></center>'
 			'Opening your eyes, you see coach standing above you. He quite unceremoniously says: "Spread your bread."'
+			gs 'willpower', 'cum_outside', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Cover up (<<will_cost>> Willpower)':
+					gs 'willpower', 'pay', 'resist'
+					cls
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower12.jpg"></center>'
+					'Scared, you cover you ass with your hands and look at him like a deer caught in the headlights.'
+					'Mikhail Nikolaevich gives you an evil look, "Prokhorov fucks your ass and you scream with joy, but your coach just wants to alleviate some tension and you curl up all scared?"'
+					'You can see from the look in his eyes that he''s been at the wine and his slurring and unsteady legs confirm this. "Your ass isn''t that special." He spits on you and stumbles out of the showers.'
+					gs 'stat'
+					act 'Wash your ass':
+						noShampoo = 1
+						dynamic $showerdin
+						gt 'gdksport', 'start'
+					end
+				end
+			else
+				act 'Cover up (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 			act 'Comply':
 				VoltrenerVoyeur+=1
 				trenerlust += 2
@@ -129,19 +155,6 @@ if $ARGS[0] = '3':
 					gt 'gdksport', 'start'
 				end
 			end
-			act 'Cover up':
-				cls
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower12.jpg"></center>'
-				'Scared, you cover you ass with your hands and look at him like a deer caught in the headlights.'
-				'Mikhail Nikolaevich gives you an evil look, "Prokhorov fucks your ass and you scream with joy, but your coach just wants to alleviate some tension and you curl up all scared?"'
-				'You can see from the look in his eyes that he''s been at the wine and his slurring and unsteady legs confirm this. "Your ass isn''t that special." He spits on you and stumbles out of the showers.'
-				gs 'stat'
-				act 'Wash your ass':
-					noShampoo = 1
-					dynamic $showerdin
-					gt 'gdksport', 'start'
-				end
-			end
 		end
 	end
 end
@@ -153,30 +166,30 @@ if $ARGS[0] = '4':
 	act 'To get a better look':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower19.jpg"></center>'
-		'It seems, Mikhail again decided to admire how your classmate fuck your anus, Vanya seems so busy your ass that nothing. You decide to tease a little coach...'
-		gs 'arousal', 'anal', 5, 'sub'
+		'It seems Mikhail, again, decided to admire how your classmate fucks your anus, but Ivan is too busy with your ass to notice anything. You decide to tease the coach a little...'
+		gs 'arousal', 'anal', 5, 'sub', 'exhibitionism'
 		gs 'stat'
 		act 'Drop to your knees':
 			cls
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower14.mp4"></video></center>'
-			'You let go on my knees and began to carefully suck Vanin member, which has just been in your ass. Surprised-a satisfied snort from two sides showed, that the participant and the viewer, It seems, like the fact, what''s happening. Accidentally nudging the door open into the shower, you open it, the coach didn''t miss anything from your planned next.'
-			gs 'arousal', 'bj', 5, 'sub'
+			'You get on my knees and begin to carefully suck Ivan''s member, which has just been in your ass. Surprised, you hear a satisfied snort from both parties, the participant and the viewer. It seems they like what''s happening. You accidentally nudge the door into the shower and it opens, giving the coach an unobstructed view of what you plan to do next.'
+			gs 'arousal', 'bj', 5, 'sub', 'exhibitionism'
 			gs 'stat'
 			act 'Lick his balls':
 				cls
 				'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower15.mp4"></video></center>'
-				'Pulling the cock from his mouth and swung, you became furiously explicable only excitation from occurring licking balls classmate. Starting one, another in my mouth, kissing them sucking and stroking hands. You nose dived under them and gently licked between buttocks.'
-				gs 'arousal', 'cuni_give', 5, 'sub'
+				'Pulling the cock from your mouth, you begin excitedly licking your classmate''s swinging balls. You first put one, then the other in your mouth, kissing and sucking them, while stroking his shaft with your hands. Finally, you let them slide out of your mouth and down your chin, as you move behind them and start licking your way up, between his butt cheeks.'
+				gs 'arousal', 'rimming_give', 5, 'sub', 'exhibitionism'
 				gs 'stat'
 				act 'That did it':
 					cls
 					facial += 1
 					'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower16.mp4"></video></center>'
-					'It seems, Vanya never expects, but the jet of sperm began to beat a fountain of member, and heavy, warm drops falling on your face, have told you, that van liked.'
+					'It seems Ivan never expected this, but moments later jets of sperm begin fountaining from his member and heavy, warm drops start falling on your face. He clearly liked it very much.'
 					act 'Turn':
 						cls
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower17.jpg"></center>'
-						'Seeing the wide-eyed partner, who was looking somewhere behind you, and gradually adviseyou jaw. You remembered about the coach, and turned. The coach was standing with a little lost. Although Ivan, It seems, don''t understand, what is involved in this type of Mikhail Nikolaevich, hastily covered, I grabbed my things and jumped out of the shower. As soon as Ivan closed the door behind him, the coach walked over closer to you, pulled the member out of his pants and pointed it at you. You yourself, not recognizing, passion and lust cocoon enveloped you, grabbed a member of the coach. But here, you''re out of luck, it seems the coach was on the verge and began to cum, as soon as you touched his trunk. Bay your Breasts cum trainer, bosses dick in his pants and left.'
+						'You turn to see the coach still looking, wide-eyed and with his jaw hanging open. Ivan finally notices this, and oblivious to the fact that your actions were only partially for his benifit, hastily covers up, grabs his things and jumps out of the shower. As soon as the door closes behind Ivan, the coach walks closer to you, pulls his member out of his pants and points it at you. Passion and lust overpower you and you immediately reach for his cock, but unfortunately it seems the coach was already on the edge and begins to cum as soon as your hands envelop his shaft. He sprays your breasts with his spunk, then promptly pulls up his pants and leaves you in the shower. On your knees. Overflowing with arousal.'
 						VoltrenerVoyeur += 1
 						pcs_horny = 100
 						facial += 1
@@ -187,7 +200,7 @@ if $ARGS[0] = '4':
 							cls
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower18.jpg"></center>'
 							$orgasm_or = 'custom'
-							$orgasm_txt = 'You are almost in tears from aching overwhelming feelings of dissatisfaction, covered in cum, and thinking about, that all men are jerks, young old. You lie down on the bench beside the shower and palaskas her pussy, brought herself to orgasm. Of course, it was not so cool, as could be. But after consoling himself with the thought, next time you well over a mocks, will not give. And make at least one of them, will take care of you, maybe two at once. The thought of you again warm in your stomach. Blushing from such vulgarity, you washed your face and jumped out of the shower.'
+							$orgasm_txt = 'You are left almost in tears from the aching, overwhelming feelings of dissatisfaction. Covered in cum and thinking about how both these jerks just left you here in this state, you lie down on the bench beside the shower and furiously start rubbing your pussy, quickly bringing yourself to orgasm. Of course, it was nothing like it could have been, and after ''consoling'' yourself in this way, you promise yourself you will make at least one of them take care of you next time, maybe even both at once. That last thought starts getting your engine running yet again and blushing from such vulgarity, you quickly wash your face and jump out of the shower.'
 							gs 'arousal', 'masturbate', 5
 							gs 'arousal', 'end'
 							gs 'stat'
@@ -208,36 +221,37 @@ if $ARGS[0] = '5':
 	act 'Get a better look':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower19.jpg"></center>'
-		'Through the glass you see, as Mikhail strong views approaching the booth, and Vanya nothing, not seeing, pulls your ass, you frantically try to close the booth door on the lock, that Ivan looks like and not closed. But the cock in her ass and pushes Ivan not let you do it, the door abruptly opens, coach growled: "Again fuck. Prokhorov will tell your coach, you honouring mode, and the competitions are preparing". From these words Ivan shrank his penis opal and easily fell out of your ass: "Don''t need Mikhail to say anything to anyone, please. I will help with the hall, well, there is a grid to hang, girls to hold after departure", - and he, sideways covering his dignity, grabbing your stuff, got out of the shower.'
+		'Through the glass you see Mikhail staring and approaching the booth, while Ivan pays attention to nothing but your ass bouncing with his thrusts. Ivan forgot to close the shower door and you frantically try to correct his mistake, but the constant ass-punding and Ivan''s tight grip on your hips will not let you do it. The door abruptly opens, and you hear the coach growl: "Again? Prokhorov, I''ve had it with you! I will tell your coach and have you banned from the competitions you are preparing for." You immediately feel Ivan''s penis going soft and shrinking inside you, before sliding limply out of your ass. Still terrified, he turns sideways to hide his dignity and pleads "Please don''t do that coach Vlasov! It won''t happen again, and I''ll help with the hall wenever you need me to!", before grabbing his stuff and getting out of the shower.'
 		!!Originally 65, but without significant anal experience Ivan will have you in too much pain to get anywhere near that		
 		if pcs_horny < 30: 
 			act 'Close the shower door':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/voltrenersexshower21.jpg"></center>'
-				'You and sex with Vanya did not really want, today you have been unusually cold, so not the least bit upset by the disappearance of Vani, looked indifferently on the coach and, closing the door to the booth, started to do that for which you came into the shower to wash... .'
+				'Left there cold and upset with the abrupt end of your sex session with Ivan, you look indifferently at the coach and close the shower door. With nothing else left, you proceed with what you came here for in the first place and finish washing in the shower...'
 				act 'Leave':gt 'gdksport', 'start'
 			end
 		else
 			act 'Seduce coach':
 				cls
+				gs 'boyStat', 'A69'
 				npc_rel['A69'] += 3
 				VoltrenerVoyeur += 1
 				ShowerIvan = 3 & ! close sex with the coach in the shower
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/voltrenersexshower22.jpg"></center>'
-				'Not having those things actually did not close the shower door. And terribly unhappy about it before you become a coach in that position... any fool will understand what you would like. It seems the coach has thought about what you said earlier, so he undressed and climbed to you in the shower.'
+				'Still unsattisfied by the abrupt end of your sex session with Ivan, you make no effort to close the door or hide your body from the coach. Any fool would understand what you wanted in this situation, and it seems the coach has thought about what you said earlier, so he undresses and climbs into the shower.'
 				act 'On your knees':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower23.jpg"></center>'
-					'You let go on your knees, front of your face rocked pretty impressive coach bolt, after admiring this picture, and delighted thoughts, that basic structure is getting closer, you set resolutely to work tongue, carefully first licking the head of your penis then the member entirely.'
+					'You drop to your knees, and take a moment to admire Mikhail''s impressive, rock hard member. As it moves closer, you start to work your tongue, carefully licking first the head of the penis and then the whole thing, with determination burning in your eyes.'
 					gs 'arousal', 'foreplay', 5, 'sub'
 					gs 'stat'
 					act 'Take it in your mouth':
 						cls
-						pcs_throat += 1
+						if pcs_throat < dick: pcs_throat += 1
 						gs 'stat'
 						'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower24.mp4"></video></center>'
-						'Kissing his head, you took it in her mouth and began to caress the tongue, lightly sucking, then you tried to take him deep in her mouth, but the coach, stopping you, he began to move a member, fucking your mouth, while acting quite cautiously, not shoving cock for all length, how does this Vanya.'
-						gs 'arousal', 'bj', 10, 'sub'
+						'Kissing his head, you take it in your mouth and begin to lightly suck, before you try to take him deeper in your mouth. Soon, the coach begins thrusting into your mouth, cautiously building up to fucking your throat, but not shoving in his whole length like Ivan.'
+						gs 'arousal', 'bj', 10, 'sub', 'deepthroat'
 						gs 'stat'
 						act 'Lift your legs':
 							cls
@@ -246,40 +260,45 @@ if $ARGS[0] = '5':
 							finrand = 1
 							if trenerSex = 0:trenerSex = 1 & guy += 1
 							gs 'stat'
-							'Coach, pulling the cock out of your mouth, put you on your back, raised and spread knees slightly bent feet almost to his chest. In this position your holes were unceremoniously put on display. Putting your fingers in your holes, he began to introduce the fingers in the ass and in the pussy.'
+							'After a few minutes the coach pulls his cock out of your mouth, pushes you on your back, raises and spreads your knees, so they''re slightly bent and resting against his chest. In this position your holes are unceremoniously put on display. He pushes a finger into each hole and starts to rub your insides, gradually increasing his pace.'
 							if pcs_vag = 0 and stat['vaginal'] = 0:
 								'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower26.mp4"></video></center>'
-								'For a moment there was some regret about virginity, but the excitement did not give focus on this thought, Yes and dream about the basis as well consoled. But then the coach stopped with surprise and said: "Are you a virgin?". It seems, one of his fingers came across the barrier. Pulling the finger from pussy, he focused on the ass, saying: "No take your virginity, I will not, you won Vanya there or something, besides you got more beautiful, young holes, where to plant". From marivaudage your anus finger trainer and his words have stronger waves of lust. Already whining with desire, you gasped: "Fuck me".'
+								'For a moment you feel some regret you might lose your virginity like this, but in your excitement you don''t focus on the thought. But then the coach stops with surprise and says: "Are you a virgin?". It seems he felt one of his finger push against your hymen. Pulling the fingers from your pussy, he switches all his focus to your ass, saying: "No, I will not take your virginity, besides you''ve got more beautiful young holes for me to explore." He continues to finger your anus, which along with his words has you whining with desire. You can''t wait any longer and moan out loud: "Fuck me!"'
 							elseif pcs_vag <= 15:
 								'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower26.mp4"></video></center>'
-								'Try to stick you finger in vagina, the coach has faced some difficulties, It seems, your tight pussy is not missed in the finger trainer. Pulling the finger from pussy, he focused on the ass, saying: "Yes until you narrow, well, the first time in a hurry, will not, besides you got more beautiful, young holes, where to plant". From marivaudage your anus finger trainer and his words have stronger waves of lust. Already whining with desire, you gasped: "Fuck me".'
+								'He is having some difficulties fingering your pussy, it seems you''re too tight for him. Pulling the finger from your pussy, he switches all his focus to your ass, saying: "You''re a bit too tight for me, but no matter, you''ve got more beautiful young holes for me to explore." He continues to finger your anus, which along with his words has you whining with desire. You can''t wait any longer and moan out loud: "Fuck me!"'
 							elseif pcs_vag > 15 and mesec <= 0:
 								'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower25.mp4"></video></center>'
-								'Thrusting one finger in the ass one in the pussy, the coach began to bash them at the same time in two holes, you feel, as they RUB against each other through the thin partition between them. Then alternately, at the same time rushing into, they drove you crazy, forcing her to moan and squirm. A moan almost becomes a scream. "Fuck me, fuck, fuck...", - you cry completely deprived of reason from desire.'
-								act 'Jump on a member':
-									cls
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower27.jpg"></center>'
-									$orgasm_or = 'custom'
-									$orgasm_txt = 'Literally exhausted from the desire of a cock inside you, you just get the coach on the floor and choose from the entire scope mounted on his cock. The head parted her lips, and a member with a flourish came in the pussy, leaning, what- then inside that has caused a new wave of pleasure. Starting to move up on it - down, from side to side, you skewer yourself on his cock. Mikhail caresses your neck, chest and waves of pleasure run from the nipples, where-down...the hands of coach you squeezed the nipples, surprise, you seem to be electrocuted, you cried, and huddled in orgasm.'
-									gs 'arousal', 'vaginal_finger', 15, 'sub'
-									gs 'arousal', 'vaginal', 15, 'sub'
-									minut -= 15
-									gs 'arousal', 'end'
-									gs 'stat'
-									finrand = 0
-									act 'Leave':gt 'gdksport', 'start'
+								'Thrusting one finger in your ass and one in your pussy, the coach begins to move them at the same time in both holes. The feeling of them rubbing against each other through the thin walls between them is driving you wild and forcing you to moan and squirm. A moan almost becomes a scream: "Fuck me, fuck, fuck...", - you cry completely deprived of reason from the overflowing desire.'
+								
+								gs 'willpower', 'sex', 'self'
+								if will_cost <= pcs_willpwr:
+									act 'Jump on his member (<<will_cost>> Willpower)':
+										cls
+										gs 'willpower', 'pay', 'self'
+										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower27.jpg"></center>'
+										gs 'arousal', 'foreplay', -15, 'sub'
+										$orgasm_or = 'custom'
+										$orgasm_txt = 'Literally exhausted from your need for a cock inside you, you push the coach on the floor and mount his cock. The head parts your lips, and pushes deep into your pussy, causing wave after wave of pleasure. Starting to move up and down, side to side, you skewer yourself on his cock. Mikhail caresses your neck, then moved down to your chest and showers pleasure on your nipples. He proceeds to squeeze them and in that moment pleasure runs through you like an electric current, causing you to cry out in orgasm.'
+										gs 'arousal', 'vaginal', 15, 'sub'
+										gs 'arousal', 'end'
+										gs 'stat'
+										finrand = 0
+										act 'Leave':gt 'gdksport', 'start'
+									end
+								else
+									act 'Jump on his member (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 								end
 							end
 							act 'Offer your ass':
 								cls
-								pcs_ass += 1
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower28.jpg"></center>'
-								'You feel, how in the ass rested against the head of the penis. The head of the penis began to press, trying to get inside, you felt a slight pain and tried to relax his ass.'
+								'You present your ass to the coach, and soon feel the head of his penis pushing against your anus. You felt a slight pain as it passes through, and try to relax your ass for what''s coming.'
 								act 'Relax your ass':
 									cls
 									'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower29.mp4"></video></center>'
 									$orgasm_or = 'custom'
-									$orgasm_txt = 'You feel, how dick inside your ass, as the head stretches the sphincter ring, rushing into. You breath, thought, he will tear you. Hands caressed your Breasts, stroking pussy. He slowly pulled out of you cock, then again began to enter it, stretching your hole. Went to the end and came out again. A little burned, but gradually the burning sensation is gone, I was very pleased, your anus adapted. The cock slid in her ass, pushing back the walls, which tightly clasped his, and every movement brings you a wave of good feeling. "What a sweet ass",- you hear. '									
+									$orgasm_txt = 'You feel the head stretch your sphincter, and for a moment you think it might tear. At the same time coaches hands caress your breasts and stroke your pussy, distracting you from the momentary discomfort and quickly turning it to pleasure. He slowly starts thrusting in and out of your hole, his cock pleasantly stretching your walls as it goes. Soon all the discomfort is gone and you begin to thoroughly enjoy his fucking. The cock keeps sliding in and out of your ass, which keeps getting tighter and tighter as you approach your orgasm, before it finally clamps down on him, causing you both to cry out in estasy. A warm liquid fills your bowels, and for a while you hear nothing but heavy breathing fill the shower booth, but then finally the coach heaves a pleasured sigh: "What a sweet ass."'									
 									gs 'arousal', 'anal', 15, 'sub'
 									gs 'arousal', 'end'
 									gs 'stat'

locations/albinaEv.qsrc

@@ -60,7 +60,7 @@ if albinaCar = 0:
 					'Grinning, the tall one says "I see.", as the short one starts walking slowly towards you.'
 					'A chill runs up your spine as you realize you''ve been tricked. You need to get out of here right now!'
 					
-					gs 'willpower', 'misc', 'self', 'hard'
+					gs 'willpower', 'misc', 'self'
 					if will_cost <= pcs_willpwr:
 						act 'Jump behind the wheel (<<will_cost>> Willpower)':
 							*clr & cla

locations/annafrends.qsrc

@@ -258,13 +258,12 @@ if $ARGS[0] = 'scene1':
 			*nl
 			'Already pretty tipsy, Rex approaches you - "<<$pcs_nickname>>, let me refill your glass" - but he, seemingly accidentally, spills some on your foot. - "Oh, <<$pcs_nickname>>, forgive me! Here, I''ll clean that up."'
 			'Rex begins wiping off your legs with his shirt sleeve.'
-			gs 'willpower', 'misc', 'self', 'easy'
+			gs 'willpower', 'sex_other', 'resist', 'easy'
 			if will_cost <= pcs_willpwr:
 				act 'Step back (<<will_cost>> Willpower)':
 					*clr & cla
-					gs 'willpower', 'pay', 'self'
+					gs 'willpower', 'pay', 'resist'
 					minut += 5
-					!pcs_dom += 1
 					rex -= 1
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/event/community/rexnet.jpg"></center>'
@@ -447,7 +446,7 @@ end
 if $ARGS[0] = 'scene3':
 	*clr & cla
 	menu_off = 1
-	minut += 5
+	gs 'arousal', 'voyeur', 5
 	gs 'stat'
 
 	if gennpc = 0:$annafrendname = 'Anya' & $annafrendname2 = 'Anya'

locations/arousal.qsrc

@@ -189,10 +189,10 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		orgasm_flag = 1
 		temp_anal = 1
 		count['anal_fist'] = 1
-		gs 'pain', 4-agape, 'asshole', 'stretch'
 		stim['act'] = 30
-		if pcs_ass > 30:
-			pcs_ass += 30
+		if pcs_ass + anal_slip < 30:
+			pcs_ass = 30
+			gs 'pain', 4-agape, 'asshole', 'stretch'
 			if agape < 3:agape = 3
 		end
 	elseif $ARGS[0] = 'anal_dildo':
@@ -288,10 +288,10 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		orgasm_flag = 1
 		count['vaginal_fist'] = 1
 		stim['act'] = 70
-		gs 'pain', 3 - vgape, 'vaginal', 'stretch'
 		if pcs_vag + vaginal_slip < 30:
 			!! same as for 'vaginal'
 			if temp_unaware = 0 or count['vaginal'] > 0:pcs_vag += 3
+			gs 'pain', 3 - vgape, 'vaginal', 'stretch'
 			if vgape < 3:vgape = 3
 		end
 	elseif $ARGS[0] = 'vaginal_dildo':
@@ -477,8 +477,8 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 				stim['kinkno'] += 1
 				stim['bound'] = 1
 			elseif $ARGS[i] = 'beast':
-				stim['kink'] += bestiality['exp']
-				stim['pref'] += bestiality['pref']
+				stim['kink'] += beast['exp']
+				stim['pref'] += beast['pref']
 				stim['kinkno'] += 1
 				stim['beast'] = 1
 			elseif $ARGS[i] = 'exhibitionism':
@@ -735,6 +735,7 @@ if $ARGS[0] = 'end':
 	stim['event'] = 0
 
 !!Adding to counts for character stats
+	gs 'arousal', 'count', 'foreplay'
 	gs 'arousal', 'count', 'mast'
 	gs 'arousal', 'count', 'porn'
 	gs 'arousal', 'count', 'cuni'
@@ -786,8 +787,8 @@ if $ARGS[0] = 'end':
 	gs 'arousal', 'count2', 'voyeur_sex'
 	
 	!! Thats here because there is currently a variable zoo.
-		if zoo > stat['beast']: stat['beast'] = zoo
-		if stat['beast'] > zoo: zoo = stat['beast']
+		if zoo > beast['exp']: beast['exp'] = zoo
+		if beast['exp'] > zoo: zoo = beast['exp']
 	!!
 end
 

locations/artemEv.qsrc

@@ -118,7 +118,6 @@ if $ARGS[0] = 'learn':
 					act '"No way!" (<<will_cost>> Willpower)':
 						cla
 						gs 'willpower', 'pay', 'resist'
-						!pcs_dom += 1
 						artemLernQW = -1
 						artemblok = 1
 						npc_rel['A2'] = 0
@@ -133,13 +132,11 @@ if $ARGS[0] = 'learn':
 			else
 				'After you finish your homework, Artem has a serious look on his face when he says: "<<$pcs_nickname>>, everyone in the school is talking about how much of a slut you are. With how much I''ve been helping you... I think it''s only fair you give me a little something in return."'
 				act 'Suck him off': gt 'artemEv','bj'
-				!CUSTOM EDIT willpower seeding
 				gs 'willpower', 'bj', 'resist'
 				if will_cost <= pcs_willpwr:
 					act '"No way!" (<<will_cost>> Willpower)':
 						cla
 						gs 'willpower', 'pay', 'resist'
-						!pcs_dom += 1
 						artemLernQW = -1
 						artemblok = 1
 						npc_rel['A2'] = 0
@@ -327,7 +324,7 @@ if $ARGS[0] = 'learn':
 			'Artem pressures you: "Come on... you need the money, right? We would both pay you."'
 			minut += 5
 			gs 'stat'
-			gs 'willpower', 'prostitution', 'resist'
+			gs 'willpower', 'prostitution', 'resist', 'easy'
 			if will_cost <= pcs_willpwr:
 				act 'Refuse to meet his friend (<<will_cost>> Willpower)':
 					cla
@@ -673,7 +670,7 @@ if $ARGS[0] = 'learn':
 					'Both the boys have an evil grin on their faces, and you slowly realize they had been planning this for some time.'
 					'Artem arrogantly tells you: "So... <<$pcs_nickname>>. As you probably realize, there are going to be some changes now. I won''t have time to help you with your homework any more, next time we will go to the garage immediately after school. We have lots of plans with you. As long as you do what we say, no one will see the video of you getting drilled in all of your holes by the biggest nerds in school."'
 					'You quietly get dressed, and quietly leave the garage, You know this is probably just the beginning.'
-					minut += 5
+					gs 'arousal', 'pee', 5, 'sub', 'humilation', 'group'
 					pcs_hydra += 10
 					pcs_breath = 0
 					cumspclnt = 2
@@ -718,9 +715,9 @@ if $ARGS[0] = 'kiss':
 	elseif leghumpArtem >= 1:
 		'Artem looks at you with embarrassment, but gathers the courage to ask: "<<$pcs_nickname>>, you''re the best thing that''s ever happened to me. I enjoyed last time so much... could we play like that again?"'
 		act 'Let him caress your ass': gt 'artemEv','leghump'
-		gs 'willpower', 'exhib', 'force'
+		gs 'willpower', 'exhib', 'self'
 		if will_cost <= pcs_willpwr:
-			act 'Strip and let Artem rub his dick against your ass (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'force' & gt 'artemEv','leghump2'
+			act 'Strip and let Artem rub his dick against your ass (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'artemEv','leghump2'
 		else
 			act 'Strip and let Artem rub his dick against your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
@@ -915,6 +912,7 @@ if $ARGS[0] = 'kiss':
 					'You ignore his pleas and pick up the pace, trying to get him to cum in your mouth while you fondle yourself.'
 					'Sure enough, a few seconds later he warns you: "<<$pcs_nickname>>... I''m going to cum..."'
 					'You redouble your efforts, and a few seconds later you feel his cock erupt in your mouth. <<$timeorgart>>'
+					gs 'arousal', 'masturbate', -5
 					gs 'arousal','bj',5,'dom'
 					gs 'cum_call','mouth',$boy,1
 					swallow += 1
@@ -1230,6 +1228,8 @@ if $ARGS[0] = 'artemGopSkver':
 								gs 'arousal','bj','dick[4]',5,'sub','group','rough'
 								gs 'arousal','','dick[5]',5,'sub','group','rough'
 								gs 'arousal','bj','dick[6]',5,'sub','group','rough'
+								gs 'arousal', 'pee', -10, 'sub', 'humilation', 'group'
+								gs 'arousal', 'end'
 								minut -= 20
 								gs 'cum_call','anus',$boy[1],0
 								gs 'cum_call','face',$boy[2],0

locations/artemev2.qsrc

@@ -190,8 +190,9 @@ elseif artQW = 10:
 			'You fondle yourself with your hand while you suck Artem''s cock, and you orgasm when he does. You do your best to swallow his sperm while you suppress your own spasms, and after a while you regain your senses and look into his eyes.'
 			'You smile at him: "Did you like it?"'
 			'Artem nods: "Oh yes, I liked it a lot! It''s not exactly what I had in mind, but this was even better... I''m so lucky to have met you!"'
+			gs 'arousal', 'bj', 5
 			$orgasm_or = 'yes'
-			gs 'arousal','bj',5
+			gs 'arousal', 'masturbate', -5
 			gs 'cum_call','mouth',$boy,1
 			swallow += 1
 			gs 'arousal','end'

locations/artgar.qsrc

@@ -42,7 +42,6 @@ if apmeet = 0:
 elseif apmeet = 1:
 	apmeet = 2
 	gs 'arousal', 'vaginal_dildo', 30, 'sub', 'humiliation'
-	gs 'arousal', 'end'
 	gs 'pain', 1, 'vaginal', 'stretch'
 	gs 'stat'
 
@@ -60,7 +59,6 @@ elseif apmeet = 1:
 		*clr & cla
 		gs 'arousal', 'anal_finger', 5, 'sub', 'humiliation', 'rough', 'group'
 		gs 'arousal', 'anal_dildo', 10, 'sub', 'humiliation', 'rough'
-		gs 'arousal', 'end'
 		gs 'pain', 3, 'asshole', 'stretch'
 		gs 'stat'
 
@@ -98,7 +96,6 @@ elseif apmeet = 2:
 	*clr & cla
 	apmeet = 3
 	gs 'arousal', 'foreplay', 30, 'sub', 'humiliation', 'bound'
-	gs 'arousal', 'end'
 	gs 'pain', 1, 'handL', 'bind'
 	gs 'pain', 1, 'handR', 'bind'
 	gs 'stat'
@@ -114,7 +111,6 @@ elseif apmeet = 2:
 	act 'Open your mouth':
 		*clr & cla
 		gs 'arousal', 'bj', 5, 'sub', 'humiliation', 'group', 'rough', 'deepthroat', 'bound'
-		gs 'arousal', 'end'
 		gs 'pain', 2, 'throat', 'stretch'
 		gs 'pain', 1, 'armL', 'bind'
 		gs 'pain', 1, 'armR', 'bind'
@@ -127,7 +123,7 @@ elseif apmeet = 2:
 		act 'Further':
 			*clr & cla
 			gs 'arousal', 'bj', 5, 'sub', 'humiliation', 'group', 'rough', 'deepthroat', 'bound'
-			gs 'arousal', 'end'
+			gs 'arousal', 'pee', -5, 'sub', 'humilation'
 			gs 'pain', 2, 'throat', 'stretch'
 			gs 'pain', 1, 'armL', 'bind'
 			gs 'pain', 1, 'armR', 'bind'
@@ -141,7 +137,7 @@ elseif apmeet = 2:
 				*clr & cla
 				pcs_hydra += 20
 				gs 'arousal', 'bj', 10, 'sub', 'humiliation', 'group', 'rough', 'deepthroat', 'bound'
-				gs 'arousal', 'end'
+				gs 'arousal', 'pee', -5, 'sub', 'humilation'
 				gs 'pain', 2, 'throat', 'stretch'
 				gs 'pain', 1, 'armL', 'bind'
 				gs 'pain', 1, 'armR', 'bind'
@@ -159,6 +155,7 @@ elseif apmeet = 2:
 					if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
 					if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 					gs 'arousal', 'bj', 10, 'sub', 'humiliation', 'group', 'rough', 'deepthroat', 'bound'
+					gs 'arousal', 'pee', -5, 'sub', 'humilation'
 					gs 'arousal', 'end'
 					gs 'pain', 2, 'throat', 'stretch'
 					gs 'pain', 1, 'armL', 'bind'
@@ -182,7 +179,6 @@ elseif apmeet = 2:
 elseif apmeet = 3:
 	*clr & cla
 	gs 'arousal', 'foreplay', 10, 'sub', 'humiliation', 'bound', 'rough'
-	gs 'arousal', 'end'
 	gs 'pain', 1, 'neck', 'bind'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/meet4_1.jpg"></center>'
@@ -197,7 +193,6 @@ elseif apmeet = 3:
 	act 'Continue your training':
 		*clr & cla
 		gs 'arousal', 'foreplay', 5, 'sub', 'humiliation', 'bound', 'rough'
-		gs 'arousal', 'end'
 		gs 'pain', 1, 'neck', 'bind'
 		gs 'pain', 4, 'asscheeks', 'spank'
 		gs 'stat'
@@ -210,7 +205,6 @@ elseif apmeet = 3:
 		act 'Continue your training':
 			*clr & cla
 			gs 'arousal', 'foreplay_give', 5, 'sub', 'humiliation', 'bound', 'rough'
-			gs 'arousal', 'end'
 			gs 'pain', 1, 'neck', 'bind'
 			gs 'pain', 2, 'nipples', 'bind'
 			gs 'pain', 4, 'nipples', 'stretch'
@@ -224,7 +218,6 @@ elseif apmeet = 3:
 			act 'Continue your training':
 				*clr & cla
 				gs 'arousal', 'foreplay', 5, 'sub', 'humiliation', 'bound', 'rough'
-				gs 'arousal', 'end'
 				gs 'pain', 1, 'neck', 'bind'
 				gs 'pain', 4, 'labia', 'pinch'
 				gs 'pain', 4, 'labia', 'stretch'
@@ -240,7 +233,6 @@ elseif apmeet = 3:
 				act 'Do "weightlifting"':
 					*clr & cla
 					gs 'arousal', 'foreplay', 5, 'sub', 'humiliation', 'bound', 'rough'
-					gs 'arousal', 'end'
 					gs 'pain', 1, 'neck', 'bind'
 					gs 'pain', 4, 'labia', 'pinch'
 					gs 'pain', 4, 'labia', 'stretch'
@@ -258,7 +250,6 @@ elseif apmeet = 3:
 					act 'Beg him to stop':
 						*clr & cla
 						gs 'arousal', 'foreplay', 5, 'sub', 'humiliation', 'bound', 'rough'
-						gs 'arousal', 'end'
 						gs 'pain', 1, 'neck', 'bind'
 						gs 'pain', 4, 'labia', 'pinch'
 						gs 'pain', 4, 'labia', 'stretch'
@@ -274,7 +265,6 @@ elseif apmeet = 3:
 						act 'Anal training':
 							*clr & cla
 							gs 'arousal', 'anal_dildo', 5, 'sub', 'humiliation', 'bound', 'rough','group'
-							gs 'arousal', 'end'
 							gs 'pain', 1, 'neck', 'bind'
 							gs 'pain', 4, 'asscheeks', 'spank'
 							gs 'pain', 4, 'asshole', 'stretch'
@@ -294,7 +284,6 @@ elseif apmeet = 3:
 								gs 'arousal', 'anal_dildo', 3, 'sub', 'humiliation', 'bound', 'rough', 'group'
 								gs 'arousal', 'vaginal_fist', 2, 'sub', 'humiliation', 'bound', 'rough', 'group'
 								$orgasm_or = 'yes'
-								gs 'arousal', 'end'
 								gs 'pain', 1, 'neck', 'bind'
 								gs 'pain', 3, 'vaginal', 'stretch'
 								gs 'pain', 3, 'asshole', 'stretch'
@@ -361,7 +350,6 @@ elseif apmeet = 4:
 	act 'Pretend to fight them off':
 		*clr & cla
 		gs 'arousal', 'foreplay', 10, 'sub', 'humiliation', 'rape', 'rough', 'group'
-		gs 'arousal', 'end'
 		gs 'pain', 1, 'cheeks', 'slap'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/meet5_1.jpg"></center>'
@@ -379,7 +367,6 @@ elseif apmeet = 4:
 		gs 'arousal', 'bj', 2, 'sub', 'humiliation', 'rape', 'rough', 'group', 'bound'
 		gs 'arousal', 'anal', 2, 'sub', 'humiliation', 'rape', 'rough', 'group', 'bound'
 		gs 'arousal', 'breast', 2, 'sub', 'humiliation', 'rape', 'rough', 'group', 'bound'
-		gs 'arousal', 'end'
 		gs 'pain', 4, 'asscheeks', 'spank'
 		gs 'pain', 2, 'asshole', 'stretch'
 		gs 'pain', 3, 'foreplay', 'bind'

locations/bed.qsrc

@@ -270,14 +270,16 @@ if $ARGS[0] = 'rab':
 		end
 	end
 
-	if pcs_dom > 20:
-		act 'Refuse':
-			cla
-			*clr
-			pcs_dom += 1
+	gs 'willpower', 'sex', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
 			lesbian += 1
 			orgasm += 1
 			houserab = 2
+			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/city/nicholas/sex/r4.jpg"></center>'
 			'"No." You reply.'
 			'"You <<$pcs_nickname>> <<$pcs_lastname>>, will suck now or things will get very bad for you." She asserts.'
@@ -299,7 +301,9 @@ if $ARGS[0] = 'rab':
 			
 			act 'Breathe':gt 'bed', 'start'
 		end
-	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	
 end
 
 if $ARGS[0] = 'vor':

locations/bobka.qsrc

@@ -130,7 +130,6 @@ end
 
 if ARGS[0] = 4:
 	minut += 5
-	pee += 1
 	gs 'stat'
 	$tempval = 'You'
 	$tempval2 = ''
@@ -140,11 +139,11 @@ if ARGS[0] = 4:
 	'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/knees.jpg"></center>'
 	'<<$tempval>> drop to your knees before Bobka and look at him questioningly, softly muttering you''ll do whatever he wants you to do.'
 	'"I don''t need you today", he tells you, and your heart sinks. Then he continues: "I do need to piss, though... might as well use you. I''ll even give you a chance to earn some extra money: I''ll give you 100 <b>₽</b> if you open your mouth and swallow it all", and pulls his cock out of his pants.'
-	
+! TODO switch to pee if that gets included in willpower
 	gs 'willpower', 'swallow', 'resist'
 	if will_cost <= pcs_willpwr:
 		act 'Let him pee on your face (<<will_cost>> Willpower)':
-			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'swallow', 'resist'
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
 			gt 'bobka', 'peeface'
@@ -247,7 +246,7 @@ end
 if $ARGS[0] = 'peeface':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
 	'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/peeface.jpg"></center>'
 	'Bobka releases his flaccid penis from his trousers, and unleashes a warm stream of urine almost immediately. When you wince and close your eyes, he shouts angrily: "Don''t turn away! Open your eyes and look at me, slut! Right now!"'
 
@@ -257,7 +256,7 @@ end
 if $ARGS[0] = 'peeface2':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
 	'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/peeface2.jpg"></center>'
 	'You do need this dose desperately! What choice do you have?'
 	'You open your eyes and look at him obediently, keeping your face so the urine at least won''t splash up your nose. His urine smells horribly and slowly drips down your body, forming a puddle underneath you. Your mind is going through a desperate struggle as you sit there; on the one hand you feel terrible for demeaning yourself so much, but on the other hand you''re happily anticipating your next high.'
@@ -269,7 +268,8 @@ end
 if $ARGS[0] = 'peeface3':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
+	gs 'arousal', 'end'
 	'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/peeface3.jpg"></center>'
 	'Bobka gets closer to you and shakes the last drops off his penis, and then wipes it on your hair.'
 	'"Did you like your shower? It seems just right, for the whore that you are..." he smiles serenely, seeing the defeated look in your eyes. He knows he''s very close to breaking you for good, and offers you the syringe without playing any games.'
@@ -280,7 +280,7 @@ end
 if $ARGS[0] = 'peeswallow':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
 	money += 100
 	pcs_hydra += 10
 	cumspclnt = 2
@@ -295,7 +295,7 @@ end
 if $ARGS[0] = 'peeswallow2':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
 	pcs_hydra += 10
 	'<center><video autoplay loop src="images/characters/city/bobka/sex/peeswallow2.mp4"></video></center>'
 	'Bobka interrupted his stream until you''re done coughing and have your mouth open again, but resumes his peeing. Your mouth fills up quickly with his nasty liquid, and you carefully try to swallow some to make space.'
@@ -309,7 +309,7 @@ end
 if $ARGS[0] = 'peeswallow3':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
 	pcs_hydra += 10
 	'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/peeswallow3.jpg"></center>'
 	'Bobka steps a bit closer to you and puts the tip of his cock directly onto your lower lip and then makes you close your mouth, making you suck the last drops out of him directly.'
@@ -320,7 +320,8 @@ end
 if $ARGS[0] = 'peeswallow4':
 	cla
 	cls
-	minut += 5
+	gs 'arousal', 'pee', 5, 'sub', 'humilation'
+	gs 'arousal', 'end'
 	pcs_hydra += 10
 	'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/peeswallow4.jpg"></center>'
 	'You obediently suck on his cock for a little while, no longer really caring about the horrible taste. You get used to it after a while.'

locations/brosh.qsrc

@@ -41,6 +41,17 @@ if evgentipe = 0:
 			end
 		end
 	end
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'gschool_lessons', 'short_break'
+		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
 
 	exit
 elseif evgentipe = 1:
@@ -78,7 +89,18 @@ elseif evgentipe = 1:
 			end
 		end
 	end
-
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'gschool_lessons', 'short_break'
+		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
+	
 	exit
 elseif evgentipe = 2:
 	'During the break you see your brother Kolka "<<$pcs_nickname>>! Follow me, I need to relieve some tension."'
@@ -140,7 +162,18 @@ elseif evgentipe = 2:
 			end
 		end
 	end
-
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'gschool_lessons', 'short_break'
+		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
+	
 	exit
 elseif evgentipe = 3:
 	'During the break you are greeted by Zhendos and Mishan, friends of your brother. "<<$pcs_nickname>>! Come with ust."'
@@ -168,7 +201,18 @@ elseif evgentipe = 3:
 			act 'Go back inside': gt 'gschool_lessons', 'short_break'
 		end
 	end
-
+	gs 'willpower', 'bj', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'gschool_lessons', 'short_break'
+		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
+	
 	exit
 end
 

locations/brothel.qsrc

@@ -344,7 +344,18 @@ if $ARGS[0] = 'abducted':
 		'<font color=#<<$mas_font>>>"Now tell me how did you like all of this. Answer me honestly and you will be free to go."</font>'
 		'<font color=#<<$pcs_font>>>"Well..."</font>'
 		stage = 8
-		act 'Admit that you somehow liked it as you fancy to be dominated':abdLike = 1 & gt 'brothel', $this
+		gs 'willpower', 'misc', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Admit that you somehow liked it as you fancy to be dominated (<<will_cost>> Willpower)':
+				abdLike = 1
+				gs 'willpower', 'misc', 'self', 'hard'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'brothel', $this
+			end
+		else
+			act 'Admit that you somehow liked it as you fancy to be dominated (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Yell at him that it was horrible':abdLike = 0 & gt 'brothel', $this
 	elseif stage = 8:
 		if abdLike = 1:
@@ -355,7 +366,7 @@ if $ARGS[0] = 'abducted':
 			'<font color=#<<$pcs_font>>>"An offer?"</font> you didn''t know what to expect, but this is even more surprising.'
 			'<font color=#<<$mas_font>>>"Yes. You know, this is not just a hotel. This is something more."</font>'
 			'<font color=#<<$pcs_font>>>"What do you mean?"</font>'
-			'<font color=#<<$mas_font>>>"We have use for girls like you. Our main business is downstairs, bellow the hotel in an old bunker."</font>'
+			'<font color=#<<$mas_font>>>"We have use for girls like you. Our main business is downstairs, below the hotel in an old bunker."</font>'
 			'<font color=#<<$mas_font>>>"It is a brothel."</font>'
 			'<font color=#<<$pcs_font>>>"A whorehouse? Really?"</font>'
 			'<font color=#<<$mas_font>>>"Not a common brothel like the many others. This one is special."</font>'

locations/brother.qsrc

@@ -947,7 +947,6 @@ if $ARGS[0] = 'brother_voyeur_end':
 	picrand = rand(1,2)
 	npc_rel['A34'] += 5
 	pcs_mood += 10
-	pcs_willpwr += 10
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/shower/b (end<<picrand>>).jpg"></center>'
 !--- Need to expand
 !	if npc_QW['A34'] < 5

locations/brother_voyeur.qsrc

@@ -2733,7 +2733,7 @@ if $ARGS[0] = 'ass_compliment':
 end
 
 if $ARGS[0] = 'shave':
-	if pcs_pubes < 4 or pcs_leghair < 4:gt'brother_voyeur','dryoff'
+	if pcs_pubes < 4 and pcs_leghair < 4: gt'brother_voyeur', 'dryoff'
 	cla & *clr
 	if brothershowerlook = 1:
 		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothertalk4.jpg"></center>'
@@ -2765,7 +2765,7 @@ if $ARGS[0] = 'shave':
 
 		else
 			if pcs_leghair > 3 and pcs_pubes > 3 and stanok = 1:
-				msg'As you pick up your razor, you realize that it''s probably only sharp enough for shaving one set of things. If you want to shave you''ll have to decide between keeping a <<$pcdesc_pubes>> pussy or <<$pcdesc_legs>> legs.'
+				msg 'As you pick up your razor, you realize that it''s probably only sharp enough for shaving one set of things. If you want to shave you''ll have to decide between keeping a <<$pcdesc_pubes>> pussy or <<$pcdesc_legs>> legs.'
 			end
 
 			act'"Not with you watching!"':

locations/buklinik.qsrc

@@ -33,8 +33,7 @@ if $ARGS[0] = 'holl':
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_holl.jpg"></center>'
 	'Hospital corridor.'
 	if StoryLine = 1 and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and bumtolik >= 5:
-		!r125
-		'Your rabochie days on the weekends, today is not here is.'
+		'You can volunteer here on the weekends.'
 	else
 		if bumtolik > 4:'Things are stored on<a href="exec:gt ''buklinik'', ''sklad''"> stock</a>.'
 		if bumtolik > 5:'The entrance is located<a href="exec:gt ''buklinik'', ''registr3''"> Registry</a>.'

locations/buklinik_event.qsrc

@@ -649,12 +649,20 @@ if $ARGS[0] = 'event2':
 						'You have chatted on other topics. You calmed down a bit and by this point already came up Vika, you said goodbye and left.'
 						act'Go':gt'buklinik','olga2'
 					end
-					act 'Wait For Vika':
-						cls
-						bumtolik = 3000
-						'Silently without speaking with Michael, you were waiting for Vick, as he sadly looked at you. As soon as she came you got ready and left. Vika was surprised that you didn''t even say goodbye.'
-						'<br><B>END of CURRENT STORY : REFUSE</B>'
-						act 'Go': gt'buklinik','olga2'
+					gs 'willpower', 'sex', 'resist', 'easy'
+					if will_cost <= pcs_willpwr:
+						act 'Wait For Vika (<<will_cost>> Willpower)':
+							cls
+							bumtolik = 3000
+							gs 'willpower', 'sex', 'resist', 'easy'
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							'Silently without speaking with Michael, you were waiting for Vick, as he sadly looked at you. As soon as she came you got ready and left. Vika was surprised that you didn''t even say goodbye.'
+							'<br><B>END of CURRENT STORY : REFUSE</B>'
+							act 'Go': gt'buklinik','olga2'
+						end
+					else
+						act 'Wait For Vika (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
 				end
 			end

locations/burger.qsrc

@@ -317,10 +317,12 @@ if $ARGS[0] = 'dishes':
 						end
 					end
 
-					if pcs_dom > 0:
-						act 'Thank you very much. (Deny)':
+					gs 'willpower', 'bj', 'resist', 'medium'
+					if will_cost <= pcs_willpwr:
+						act 'Thank you very much. (Deny) (<<will_cost>> Willpower)':
 							*clr & cla
-							pcs_dom += 5
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
 							'You grin and say, "Thank you very much." Anatoly flushes and says emphatically, "You know what I mean." He unbuttons his pants and pulls out his hard member.'
 							'You laugh, "Oh yes, I understand perfectly. You can wear this dress yourself, if you think I''m spreading my legs for every fat cat, who fancies himself the king of the world. So don''t insult my intelligence and put your ugly dick back in your pants. If you think I am going to suck you off for buying me a dress you are a bigger idiot than I thought. Wo do you think you are? Casanova? Are you fucking serious?"'
 							'Antaloy''s face turns red with anger and begins to threaten you, "Yes I am, I''ll fire you!"'
@@ -332,7 +334,9 @@ if $ARGS[0] = 'dishes':
 								gt 'down'
 							end
 						end
-					end
+					else
+						act 'Thank you very much. (Deny) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end	
 				end
 			end
 		end
@@ -407,7 +411,7 @@ if $ARGS[0] = 'dishes':
 
 		exit
 	elseif bistroQW = 50:
-		'During your work, you learned that Anatoly Borisovich is away on business affairs and Ivan is replacing him as the manager. When you are getting ready to go to work Ivan comes out of the manager''s office and says in a conspirational tone, "Well <<$pcs_nickname>>, you obviously do not want to work for a couple of pennies? Come to me for special work. Special work for special Salary."'
+		'During your work, you learned that Anatoly Borisovich is away on business affairs and Ivan is replacing him as the manager. When you are getting ready to go to work Ivan comes out of the manager''s office and says in a conspiratorial tone, "Well <<$pcs_nickname>>, you obviously do not want to work for a couple of pennies? Come to me for special work. Special work for special Salary."'
 
 		act 'Go to the manager''s office':
 			*clr & cla
@@ -456,16 +460,27 @@ if $ARGS[0] = 'dishes':
 				end
 			end
 
-			if pcs_dom > 0 or pcs_dom = 0 and sub = 0:
-				act 'Leave':
+			gs 'willpower', 'sex', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
 					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
 					bistroQW = 56
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj1.jpg"></center>'
 					'You escape from Ivan''s hands who was not expecting such a reaction. He glares at you, "You suck off Borisovich but get squeamish with his deputy?" You are taken aback by these words. How does he know about what happened in the fitting room. Apparently your thoughts are reflected on your face and Ivan chuckles. "Yes Borisovich himself bragged about it. If you thought, Borisovich wouldn''t tell anyone you''re an idiot. But I won''t tell anyone. And I''m offering you a decent reward. So, be a good girl and show me what you can do with this mouth of yours. "'
-
-					act 'That''s bullshit!':pcs_dom += 1 & gt 'burger', 'start'
-
+					gs 'willpower', 'bj', 'resist', 'medium'
+					if will_cost <= pcs_willpwr:
+						act 'That''s bullshit! (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							gt 'burger', 'start'
+						end
+					else
+						act 'That''s bullshit! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end	
 					act 'Use your mouth':
 						*clr & cla
 						bistroQW = 55
@@ -500,7 +515,9 @@ if $ARGS[0] = 'dishes':
 						end
 					end
 				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	
 
 			exit
 		end
@@ -606,8 +623,18 @@ if $ARGS[0] = 'dishes':
 						act 'Leave':gt 'burger', 'start'
 					end
 				end
-
-				act 'Scream at the top of your lungs and run':bistroQW = 61 & gt 'burger', 'start'
+				gs 'willpower', 'group', 'resist', 'medium'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						bistroQW = 61 
+						gt 'burger', 'start'
+					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	
 			end
 		end
 	elseif bistroQW >= 65 and soplakTimes ! 3:
@@ -682,10 +709,6 @@ if $ARGS[0] = 'boss':
 	$menu_arg = 'boss'
 	menu_off = 0
 
-	!!Podyablonskaya
-	!!Calvin Broadus Kaldazar
-	!!Andrew Krivorotov
-	!!Dennis Dobrovolsky
 	gs 'stat'
 
 	if BistroBoss = 10:
@@ -804,9 +827,17 @@ if $ARGS[0] = 'boss':
 
 			elseif bistroQW >= 65:
 				'You sit down on a chair and Anatoly Borisovich gives you a grim look. "I did not think you were so cheap. What is your fee? 300 <b>₽</b> for a blowjob?" He pulls 300 <b>₽</b> out of his pocket and throws them on the floor. "Get down on your knees and do your work, slut."'
-
-				act 'Leave':gt 'burger', 'start'
-
+				gs 'willpower', 'bj', 'resist', 'medium'
+				if will_cost <= pcs_willpwr:
+					act 'Leave (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'burger', '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 'Get on your knees':
 					*clr & cla
 					money += 300
@@ -836,8 +867,17 @@ if $ARGS[0] = 'boss':
 	elseif BistroBoss = 2 and BistroBossDay ! daystart:
 		BistroBossDay = daystart
 		'Knocking you walk into the office to Anatoly Borisovich. He looked at you grimly and pulls out 300 <b>₽</b>, "Get down on your knees and get to work, slut."'
-
-		act 'Leave':gt 'burger', 'start'
+		gs 'willpower', 'bj', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'burger', '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 'Get on your knees':
 			*clr & cla

locations/burgerWork.qsrc

@@ -2,11 +2,6 @@
 
 menu_off = 1
 
-!!Anatoly Borisovich Director
-!!smart girl HR Manager, personnel department
-!!manager Ivan, player, ILO and brave guy
-!!Deputy manager, pimply boy, son of the owner bystroezhki
-
 if $ARGS[0] = 'start':
 	if hour < 10:hour = 10 & minut = 0 & PersSecWorkTimes += 1
 
@@ -17,10 +12,9 @@ if $ARGS[0] = 'start':
 
 	if hour < 17:
 		act 'Work until lunchtime':
-			cls
+			*clr & cla
 			PSBBtimes = 1
 			minut += 60 * 2
-			!!gs 'BurgerTip'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/work.jpg"></center>'
 			'You sit at the table and begin to prepare the agreement on the computer.'
@@ -46,7 +40,7 @@ if $ARGS[0] = 'start':
 				'Anatoly Borisovich comes into your office and puts the paper in front of you with a pen. "Write up your resignation. I don''t need a secretary with a past like yours."'
 
 				act 'Write a statement of resignation':
-					cls
+					*clr & cla
 					work = 0
 					PersSecWork = 2
 					Pay = PersSecWorkTimes * 1250
@@ -73,7 +67,7 @@ if $ARGS[0] = 'work':
 end
 
 if $ARGS[0] = 'work2':
-	cls
+	*clr & cla
 	gs 'stat'
 
 	if kompromatBlackMail >= 6 and ivanFilmBJ > 0:
@@ -94,7 +88,7 @@ if $ARGS[0] = 'work2':
 			'After work, you are about to leave the bistro, but Ivan stops you. "Where are you going, baby? Want to suck my dick?"'
 
 			act 'Agree':
-				cls
+				*clr & cla
 				gs 'boyStat', 'A76'
 				sexpartkno = 1
 				spafinloc = 12
@@ -111,13 +105,22 @@ if $ARGS[0] = 'work2':
 		
 				act 'Leave':gt 'down'
 			end
-
-			act 'Refuse':gt 'BurgerTip', 'work4'
+			gs 'willpower', 'bj', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'BurgerTip', 'work4'
+				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	
 		elseif komblrand = 1:
 			'After work, you are about to leave the bistro, but Ivan stops you. "Where are you going, baby? Want to suck my dick?"'
 
 			act 'Agree':
-				cls
+				*clr & cla
 				gs 'boyStat', 'A76'
 				sexpartkno = 1
 				spafinloc = 12
@@ -134,20 +137,29 @@ if $ARGS[0] = 'work2':
 				
 				act 'Leave':gt 'down'
 			end
-
-			act 'Refuse':gt 'BurgerTip', 'work4'
+			gs 'willpower', 'bj', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'BurgerTip', 'work4'
+				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	
 		elseif komblrand = 2:
 			'After work, you are about to leave the bistro, but Ivan stops you. "Where are you going, baby? Want to suck my dick?"'
 
 			act 'Agree':
-				cls
+				*clr & cla
 				kompromatBlackMail += 1
 				minut += 5
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/car.jpg"></center>'
 				'Ivan takes you to his car standing in the alley. He gets behind the wheel and you sit next to him. Ivan starts the car and drives you to the city industrial region. "Don''t forget baby. As long as you continue to serve me you have a job and prospects, but if you piss me off, I will take everything from you." As soon as you come to a new building, Ivan parks his car in a free space. You get out and go with Ivan to a staircase. The lift takes you up to Ivan''s apartment and he opens the door for you. Without hesitation Ivan takes you by the hand and leads you to his bedroom. He sits down on the bed and takes out a camera. Ivan gets his dick out of his pants and says, "Now suck it baby. And give it your all, I don''t want the video to be bad."'
 				act 'Suck':
-					cls
+					*clr & cla
 					ivanFilmBJ += 1
 					
 					gs 'arousal', 'bj', 5, 'sub'
@@ -157,7 +169,7 @@ if $ARGS[0] = 'work2':
 					'You get down on your knees in front of Ivan and clasp his member with your <<$liptalk3>>. Ivan films you using his camera to get a closeup of you sucking his cock. After a while he lies you down on his couch and sits on your chest to make sure his cock is right in front of your face.'
 
 					act 'Suck':
-						cls
+						*clr & cla
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanbjfilm2.jpg"></center>'
 						'Sitting on top of you Ivan starts to fuck your mouth sticking is member in your throat as far as possible. You suck diligently trying not to choke as Ivan is filming you the whole time. Finally he takes his dick out of your mouth.'
@@ -166,7 +178,7 @@ if $ARGS[0] = 'work2':
 						gs 'stat'
 				
 						act 'Open your mouth':
-							cls
+							*clr & cla
 							minut += 5
 							facial += 1
 							gs 'boyStat', 'A76'
@@ -184,15 +196,31 @@ if $ARGS[0] = 'work2':
 						end
 					end
 				end
-
-				act 'Refuse':gt 'BurgerTip', 'work4'
+				gs 'willpower', 'bj', 'resist', 'medium'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'BurgerTip', 'work4'
+					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	
 			end
-
-			act 'Refuse':gt 'BurgerTip', 'work4'
+			gs 'willpower', 'bj', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'BurgerTip', 'work4'
+				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	
 		end
 
-		!!if komblrand = 3:''
-
 		exit
 	end
 
@@ -200,11 +228,10 @@ if $ARGS[0] = 'work2':
 end
 
 if $ARGS[0] = 'work3':
-	cls
+	*clr & cla
 	PSBBtimes = 2
 	minut += 30
 	minut += 60 * 4
-	!!gs 'BurgerTip'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/work.jpg"></center>'
 

locations/cafe2.qsrc

@@ -128,47 +128,69 @@ if $ARGS[0] = 'dance':
 					end
 				end
 			end
-
-			act 'Avoid kissing':
-				cla
-				pcs_horny += 8
-
-				if pcs_lip = 0:$lipdance = 'thin lips'
-				if pcs_lip = 1:$lipdance = 'lips'
-				if pcs_lip = 2:$lipdance = 'plump lips'
-				if pcs_lip = 3:$lipdance = 'plump lips'
-				if pcs_lip = 4:$lipdance = 'thick lips'
-
-				if dick > 15 and dick < 18:
-					$didanc = 'in his pants he is becoming firm and <<$boydesc>> is pressing his member to your stomach.'
-				elseif dick >= 18:
-					$didanc = 'his massive cock is pushing against your stomach, it''s really big, about <<dick>> centimeters.'
-				elseif dick <= 15:
-					$didanc = 'there is something moving in his pants.'
-				end
-
-				'You behave passively and try to pull your mouth away from the annoying guy first, it doesn''t make too much difference as you feel his hands firmly squeeze your ass, then his hands raised above and he pulls you to his chest. You feel like <<$didanc>>'
-				'Finally the song ends and gain a little breathing space.'
-				deyst = rand(1, 100)
-
-				if deyst <= 75:
-					'Keeping your waist held <<$boydesc>> invites you back to his home.'
-
-					act 'Agree':gt 'Cafe3', 'house'
-
-					if pcs_horny < 75:
-						act 'Leave':gt 'street'
+			gs 'willpower', 'kiss', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Avoid kissing (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					pcs_horny += 8
+
+					if pcs_lip = 0:$lipdance = 'thin lips'
+					if pcs_lip = 1:$lipdance = 'lips'
+					if pcs_lip = 2:$lipdance = 'plump lips'
+					if pcs_lip = 3:$lipdance = 'plump lips'
+					if pcs_lip = 4:$lipdance = 'thick lips'
+
+					if dick > 15 and dick < 18:
+						$didanc = 'in his pants he is becoming firm and <<$boydesc>> is pressing his member to your stomach.'
+					elseif dick >= 18:
+						$didanc = 'his massive cock is pushing against your stomach, it''s really big, about <<dick>> centimeters.'
+					elseif dick <= 15:
+						$didanc = 'there is something moving in his pants.'
 					end
-				elseif deyst > 75:
-					'Keeping your waist held <<$boydesc>> asks you to go to the toilet and continue.'
 
-					act 'Agree':gt 'Cafe3', 'toilet'
-
-					if pcs_horny < 75:
-						act 'Leave':gt 'street'
+					'You behave passively and try to pull your mouth away from the annoying guy first, it doesn''t make too much difference as you feel his hands firmly squeeze your ass, then his hands raised above and he pulls you to his chest. You feel like <<$didanc>>'
+					'Finally the song ends and gain a little breathing space.'
+					deyst = rand(1, 100)
+
+					if deyst <= 75:
+						'Keeping your waist held <<$boydesc>> invites you back to his home.'
+
+						act 'Agree':gt 'Cafe3', 'house'
+
+						gs 'willpower', 'sex', 'resist', 'medium'
+						if will_cost <= pcs_willpwr:
+							act 'Leave (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gt '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	
+					elseif deyst > 75:
+						'Keeping your waist held <<$boydesc>> asks you to go to the toilet and continue.'
+
+						act 'Agree':gt 'Cafe3', 'toilet'
+
+						gs 'willpower', 'sex', 'resist', 'medium'
+						if will_cost <= pcs_willpwr:
+							act 'Leave (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gt '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
 					end
 				end
-			end
+			else
+				act 'Avoid kissing (<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 pcs_horny < 75:
@@ -190,9 +212,17 @@ if $ARGS[0] = 'dance2':
 
 		act 'Agree':gt 'Cafe3', 'house'
 
-		if pcs_horny < 75:
-			act 'Leave':gt 'street'
-		end
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt '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	
 	end
 end
 
@@ -212,9 +242,17 @@ if $ARGS[0] = 'booze':
 
 		act 'Agree':gt 'Cafe3', 'house'
 
-		if pcs_horny < 75:
-			act 'Leave':gt 'street'
-		end
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt '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	
 	elseif deyst >= 95:
 		'You''re drunk and <<$boydesc>> begins to stick to you. He kisses and caresses you and then offers to take you with him to the toilet.'
 		
@@ -225,8 +263,16 @@ if $ARGS[0] = 'booze':
 
 		act 'Agree':gt 'Cafe3', 'toilet'
 
-		if pcs_horny < 75:
-			act 'Leave':gt 'street'
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt '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
 	end
 end
@@ -248,8 +294,16 @@ if $ARGS[0] = 'kompashka':
 
 		act 'Agree':gt 'Cafe3', 'house'
 
-		if pcs_horny < 75:
-			act 'Leave':gt 'street'
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt '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
 	elseif deyst >= 90:
 		'You''re drunk and <<$boydesc>> begins to stick to you. He kisses and caresses you and then offers to go join with some company.'
@@ -261,8 +315,16 @@ if $ARGS[0] = 'kompashka':
 		
 		act 'Agree':gt 'Cafe3', 'kompashka'
 
-		if pcs_horny < 75:
-			act 'Leave':gt 'street'
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt '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
 	end
 end

locations/cafe3.qsrc

@@ -71,15 +71,21 @@ if $ARGS[0] = 'house':
 			end
 		end
 	end
-
-	act 'Try to remove his hands':
-		cla
-		'You tried to remove his hands from your crotch, but <<$boydesc>> turns to you and begins to fondle your breasts through your clothes with his hands.'
-		gs 'arousal', 'foreplay', 15, 'sub'
-		gs 'stat'
-		
-		act 'Continue':BDcafe = 1 & gt 'BDsex', 'start'
-	end
+	gs 'willpower', 'action', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Try to remove his hands (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'You tried to remove his hands from your crotch, but <<$boydesc>> turns to you and begins to fondle your breasts through your clothes with his hands.'
+			gs 'arousal', 'foreplay', 15, 'sub'
+			gs 'stat'
+			
+			act 'Continue':BDcafe = 1 & gt 'BDsex', 'start'
+		end
+	else
+		act 'Try to remove his hands (<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] = '0':
@@ -111,7 +117,6 @@ if $ARGS[0] = '0':
 		elseif deysts = 2:
 			guy += 1
 			dynamic $vagstart
-			!!'<<$boydesc>> pushes your legs and enters you.'
 			picrand = rand(1, 5)
 			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/vagdog<<picrand>>.jpg"></center>'
 			'<<$boydesc>> helps you onto all fours and enters you.'
@@ -138,8 +143,17 @@ if $ARGS[0] = '0':
 		end
 	elseif deyst < 85:
 		'<<$boydesc>> tells you that he wants you to suck it'
-
-		act 'Refuse':gt 'cafe3', '0'
+		gs 'willpower', 'bj', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'cafe3', '0'
+			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 'Suck it':
 			guy += 1
@@ -208,12 +222,21 @@ if $ARGS[0] = '0':
 					act 'Leave':gt 'street'
 				end
 			end
-		!!act 'Leave':gt 'street'
 		end
 	else
-		'<<$boydesc>> tells you that he wants to make an ass omelette.'
+		'<<$boydesc>> tells you that he wants to fuck your ass.'
 
-		act 'Refuse':gt 'cafe3', '0'
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'cafe3', '0'
+			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':
 			cla
@@ -241,25 +264,32 @@ end
 if $ARGS[0] = 'toilet':
 	cla
 	gs 'dinsexFX'
-	'You went to the toilet with a guy, <<$boydesc>> you began to kiss and caress. Then he offered you to suck it.'
+	'You went to the toilet with a guy, <<$boydesc>> you began to kiss and caress. Then he asks you to suck it.'
 
-	act 'Refuse':
-		cla
-		guy += 1
-		dick = rand (8, 20)
-		silavag = rand (0,2)
-		dynamic $vagstart2
-		'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/sex/vagtualet.jpg"></center>'
-		'You attempt to abandon your hot lover but he refuses, he turns your back to him and bends you forwards.'
-		'You feel <<$boydesc>> bare your ass and something solid against your vagina.'
-		'You''re fucked doggy style in the toilet.'
-		dynamic $vagend
-		gs 'arousal', 'vaginal', 15, 'sub', 'rough'
-		gs 'arousal', 'end'
-		gs 'stat'
+	gs 'willpower', 'bj', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			guy += 1
+			dick = rand (8, 20)
+			silavag = rand (0,2)
+			dynamic $vagstart2
+			'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/sex/vagtualet.jpg"></center>'
+			'You attempt to abandon your hot lover but he refuses, he turns your back to him and bends you forwards.'
+			'You feel <<$boydesc>> bare your ass and something solid against your vagina.'
+			'You''re fucked doggy style in the toilet.'
+			dynamic $vagend
+			gs 'arousal', 'vaginal', 15, 'sub', 'rough'
+			gs 'arousal', 'end'
+			gs 'stat'
 
-		act 'Leave':gt 'kafe', 'start'
-	end
+			act 'Leave':gt 'kafe', 'start'
+		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 'Suck it':
 		cla

locations/cafe_parco.qsrc

@@ -37,28 +37,25 @@ if $args[0]= 'inner':
 		'You notice Vicky and Vanya sitting at a table.'
 
 		if mey_vika['mey_vika_qw'] < 3:
-			!! monochromatic
 			'You''re not really close with either of them, you don''t really know how to approach them.'
 
 		elseif mey_vika['mey_vika_qw'] < 5:
 			'While in passing of their table you greet them with a simple "Hi".'
 
-			!! connected relationship and response
-			if npc_rel["A15"] < 60:
+			if npc_rel["A15"] < 20:
 				'Vicky and Vanya only glance in your direction and turn away, having nothing more to say you quickly moved on...'
 			else
 				'Vicky and Vanya answer "Hi" back at the same time, you just wanted to greet them so you continued on your way.'
 			end
 
 		elseif mey_vika['mey_vika_qw'] >= 5:
-			if npc_rel["A15"] < 60:
+			if npc_rel["A15"] < 50:
 				'You approach the couple and greet them, but they don''t pay any attention to you.'
 			else
 				'You approach the couple and greet them, right away Vicky starts gossiping, as always, Vanya, mostly joked about the things you two were talking about. You chatted for a few minutes...'
 			end
 
-			!! something is going to happen here
-			if npc_rel["A15"] >= 80:
+			if npc_rel["A15"] >= 60:
 				if mey_vika['mey_vika_qw'] = 10:
 					cla
 					'Vicky and Vanya invite you to join them.'

locations/cardgame_durak.qsrc

@@ -34,6 +34,17 @@ if $ARGS[0] = 'start':
 		'"Cards? We can deal you in, but only if you want to play strip poker", Vitek grins. "The loser does whatever the winner wants them to do. Because you''re a girl, you''ll get one extra piece of clothing to start with. Sound fair?"'
 		'Your game statistics: You''ve won <<card_game_durak_win>> times, lost <<card_game_durak_loss>> times, managed a draw <<card_game_durak_draw>> times, and ended up naked <<card_game_durak_nude>> times.'
 		act 'Play': gt 'cardgame_durak', 'card_game_durak_play'
+		gs 'willpower', 'misc', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Not now (<<will_cost>> Willpower)':
+				gs 'willpower', 'misc', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'shulga_room', 'start'
+			end
+		else
+			act 'Not now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	else
 		'<<iif(RAND(0,1) = 0,''Dan'',''Vitek'')>> sighs: "I''m tired of playing cards. Let''s just watch some TV or something, or have some more beers."'
 		act 'Leave': gt 'shulga_room', 'start'
@@ -65,10 +76,9 @@ if $ARGS[0] = 'card_game_durak_play':
 		
 		if pav_slut < 75 or kotovLoveQW > 0: 
 			act 'Continue': gt 'cardgame_durak', 'card_game_nosex'
-		end
-		if pav_slut >= 75 and cg_clother_cum < 5:
-			if RAND(1,100) <= 90:
-				if RAND(1,100) <= 40: 
+		elseif pav_slut >= 75 and cg_clother_cum < 5:
+			if rand(1,100) <= 90:
+				if rand(1,100) <= 33: 
 					act 'Continue': gt 'cardgame_durak', 'card_game_gsex'
 				else
 					act 'Continue': gt 'cardgame_durak', 'card_game_rough_sex'
@@ -76,15 +86,14 @@ if $ARGS[0] = 'card_game_durak_play':
 			else
 				act 'Continue': gt 'cardgame_durak', 'card_game_nosex'
 			end
-		end
-		if pav_slut >= 75 and cg_clother_cum >= 5:
-			if RAND(1,100) <= 70:
-				if RAND(1,100) <= 40: 
+		elseif pav_slut >= 75 and cg_clother_cum >= 5:
+			if rand(1,100) <= 70:
+				if rand(1,100) <= 33: 
 					act 'Continue': gt 'cardgame_durak', 'card_game_gsex'
 				else
 					act 'Continue': gt 'cardgame_durak', 'card_game_rough_sex'
 				end
-			elseif RAND(1,30) > 10:
+			elseif rand(1,100) <= 33:
 				act 'Continue': gt 'cardgame_durak', 'card_game_casual_sex'
 			else
 				act 'Continue': gt 'cardgame_durak', 'card_game_nosex'
@@ -111,29 +120,71 @@ if $ARGS[0] = 'card_game_durak_play':
 		end
 		$loss_npc_name = $boydesc
 		*nl '<b>The game is over! <<$npc_usedname[$cgd_name_npc]>> has no clothes left and loses!</b>.'
-		if pav_slut < 75: 
-			if RAND(1,100) <= 70:
-				act 'Continue': gt 'cardgame_durak', 'card_game_ggwin_clother'
+		if pav_slut < 75:
+			gs 'willpower', 'exhib', 'force', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Make <<$loss_npc_name>> expose himself to a random girl (<<will_cost>> Willpower)':
+					gs 'willpower', 'exhib', 'force', 'easy'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gt 'cardgame_durak', 'card_game_ggwin_penis'
+				end
 			else
-				act 'Continue': gt 'cardgame_durak', 'card_game_ggwin_penis'
+				act 'Make <<$loss_npc_name>> expose himself to a random girl (<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 pav_slut >= 75:
-			if RAND(1,100) <= 70: 
-				if RAND(1,100) <= 50:
-					act 'Continue': gt 'cardgame_durak', 'card_game_ggwin_clothercum'
-				elseif RAND(1,50) < 40:
-					act 'Continue': gt 'cardgame_durak', 'card_game_ggwin_clother'
-				else
-					act 'Continue': gt 'cardgame_durak', 'card_game_ggwin_penis'
+
+			act 'Make <<$loss_npc_name>> expose a random girl': gt 'cardgame_durak', 'card_game_ggwin_clother'
+
+		elseif pav_slut >= 75:
+			gs 'willpower', 'anal', 'force', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Make <<$loss_npc_name>> fuck your ass (<<will_cost>> Willpower)':
+					gs 'willpower', 'anal', 'force', 'easy'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gt 'cardgame_durak', 'card_game_gg_sex'
 				end
 			else
-				if RAND(1,100) <= 70:
-					act 'Continue': gt 'cardgame_durak', 'card_game_gg_lick'
-				else
-					act 'Continue': gt 'cardgame_durak', 'card_game_gg_sex'
+				act 'Make <<$loss_npc_name>> fuck your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			gs 'willpower', 'cuni', 'force', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Make <<$loss_npc_name>> lick your pussy (<<will_cost>> Willpower)':
+					gs 'willpower', 'cuni', 'force', 'easy'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gt 'cardgame_durak', 'card_game_gg_lick'
 				end
+			else
+				act 'Make <<$loss_npc_name>> lick your pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			gs 'willpower', 'mast', 'force', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Make <<$loss_npc_name>> cum on a random girl (<<will_cost>> Willpower)':
+					gs 'willpower', 'mast', 'force', 'easy'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gt 'cardgame_durak', 'card_game_ggwin_clothercum'
+				end
+			else
+				act 'Make <<$loss_npc_name>> cum on a random girl (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
+
+			gs 'willpower', 'exhib', 'force', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Make <<$loss_npc_name>> expose himself to a random girl (<<will_cost>> Willpower)':
+					gs 'willpower', 'exhib', 'force', 'easy'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gt 'cardgame_durak', 'card_game_ggwin_penis'
+				end
+			else
+				act 'Make <<$loss_npc_name>> expose himself to a random girl (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+
+			act 'Make <<$loss_npc_name>> expose a random girl': gt 'cardgame_durak', 'card_game_ggwin_clother'
 		end
 	end
 	if $cgd_clothes ! '' and $cgd_clothes['A11'] ! '' and $cgd_clothes['A10'] ! '' and $cgd_clothes['A9'] ! '':
@@ -201,14 +252,14 @@ end
 if $ARGS[0] = 'card_game_nosex':
 	minut +=5
 	gs 'stat'
-	card_game_texta = RAND(0,6)
-		if card_game_texta = 0:$card_game_texta = 'I want you to suck me off!'
-		if card_game_texta = 1:$card_game_texta = 'can you masturbate in front of us?'
+	card_game_texta = rand(0,6)
+		if card_game_texta = 0:$card_game_texta = 'I want you to suck me off.'
+		if card_game_texta = 1:$card_game_texta = 'I want you to masturbate in front of us.'
 		if card_game_texta = 2:$card_game_texta = 'I want you to give my dick a kiss.'
-		if card_game_texta = 3:$card_game_texta = 'let me touch your tits.'
+		if card_game_texta = 3:$card_game_texta = 'I want to touch your tits.'
 		if card_game_texta = 4:$card_game_texta = 'I want to fuck you.'
 		if card_game_texta = 5:$card_game_texta = 'I want to touch your pussy.'
-		if card_game_texta = 6:$card_game_texta = 'how about you give me a boob job?'
+		if card_game_texta = 6:$card_game_texta = 'I want a boob job from you.'
 	if $boy = 'A11':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/vasya.jpg"></center>'
 		''+func('gopsex','hide','Shulga_var_name')+' ponders for a second, and says: "<<$card_game_texta>>"'
@@ -280,20 +331,20 @@ if $ARGS[0] = 'card_game_gsex':
 			end
 			act 'Continue': 
 				*clr & cla
-				gs 'arousal','bj',4,'dick[1]','gangbang'
+				gs 'arousal','bj',5,'dick[1]','gangbang'
 				gs 'arousal','vaginal',5,'dick[2]','gangbang'
-				gs 'arousal','bj',4,'dick[3]','gangbang'
-				minut -= 8
+				gs 'arousal','bj',5,'dick[3]','gangbang'
+				minut -= 10
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/gsex/ev1_4.jpg"></center>'
 				'Then the guys pull you up, and put you down on your hands and knees. Dan immediately moves behind you, claiming he gets to fuck you first. Vasily and Vitek shrug and take place near your head, expecting you to give them blowjobs while Dan slips his cock inside your eager cunt and begins to thrust his hips against yours.'
 				'Dan''s dick feels great inside you, and you''re not afraid to show the guys that you''re enjoying it. You moan excitedly and eagerly switch from Vasily''s to Vitek''s cock and back, trying to please all of them.'
 				act 'Continue': 
 					*clr & cla
-					gs 'arousal','hj',4,'dick[1]','gangbang'
+					gs 'arousal','hj',5,'dick[1]','gangbang'
 					gs 'arousal','vaginal',5,'dick[2]','gangbang'
-					gs 'arousal','hj',4,'dick[3]','gangbang'
-					minut -= 8
+					gs 'arousal','hj',5,'dick[3]','gangbang'
+					minut -= 10
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/gsex/ev1_5.jpg"></center>'
 					'For a moment, you try to take both of the dicks inside your mouth while Dan fucks you from behind.'
@@ -302,13 +353,13 @@ if $ARGS[0] = 'card_game_gsex':
 					act 'Continue': 
 						*clr & cla
 						gs 'arousal','vaginal',5,'dick[2]','gangbang'
-						gs 'arousal','bj',3,'dick[3]','deepthroat'
-						minut -= 3
+						gs 'arousal','bj',5,'dick[3]','deepthroat'
+						minut -= 5
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/gsex/ev1_6.jpg"></center>'
 						'When you next take Vitek''s cock in your mouth, he puts his hands behind your head and forces you to take his full length down your throat. Your nose is against his hairy groin before you know it, and you cough in surprise. At least, you try to.'
 						'With his dick all the way down your throat, you can''t do much but convulsively swallow, and try to pull away from him. He realizes you''re having trouble deepthroating him, and pulls away from you.'
-						'You gasp loudly once you can breathe again, and sob and retch for a while... with Dan still fucking you allthesame. You can tell Vitek feels bad for pushing you too hard, and you give him a grateful look when he lets go of your head and lets you take over again. You carefully lick and kiss the head of his penis for a moment, as your way of thanking him.'
+						'You gasp loudly once you can breathe again, and sob and retch for a while... with Dan still fucking you all the same. You can tell Vitek feels bad for pushing you too hard, and you give him a grateful look when he lets go of your head and lets you take over again. You carefully lick and kiss the head of his penis for a moment, as your way of thanking him.'
 						act 'Continue': 
 							*clr & cla
 							minut += 5
@@ -409,7 +460,7 @@ if $ARGS[0] = 'card_game_casual_sex':
 	if $boy = 'A10': '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dan/dan.jpg"></center>'
 	if $boy = 'A9': '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vitek/vitek.jpg"></center>'
 	'"Well, you lost <<$pcs_nickname>>. Now you have to pay for all the shit, you cooked up for us!" <<$boydesc>> says.'
-	'"Come on, you can barely come with something beyond fuck me, anyway." You make a snide comment.'
+	'"Come on, you can barely come up with something beyond fuck me, anyway." You make a snide comment.'
 	'"That''s not true! I want you to go out onto the street and we will find a stranger and let him fuck you right there.'
 	'"What the fucking kind of shit is that! I''ve not forced you to fuck anyone..."'
 	'"You''re a bitch, for coming up with all that rubbish you made us do and now you will have to pay for it. So stop your bitching, you lost, so pay up!"'
@@ -570,7 +621,7 @@ if $ARGS[0] = 'card_game_gg_lick':
 			$orgasm_or = 'yes'
 			$orgasm_txt = 'He does a fantastic job of it, and within minutes you''re mewling and breathing in short gasps as you hover on the edge of your orgasm. When you finally have to yield, his friends cheer loudly and even <<$boydesc>> has a smug look on his face when he continues to lick you. Rules are rules, after all; you didn''t say he was done.'
 			gs 'arousal','cuni',2
-			elseif pcs_horny < 70:
+		elseif pcs_horny < 70:
 			'<<$boydesc>> does his best to get you to orgasm. He''s doing all the right things and you feel very aroused, but in the end you can''t quite reach an orgasm this time. After a while you can tell his tongue is starting to feel exhausted, and you tell him he can stop.'
 			gs 'arousal','cuni',2
 		end

locations/cfnm.qsrc

@@ -114,9 +114,17 @@ if $ARGS[0] = 'blow2':
 		act 'Take the facial':gt 'cfnm', 'blow4'
 		act 'Let him cum in your mouth':gt 'cfnm', 'blow3'
 
-		if pcs_dom > 0:
-			act 'Make him cum on the floor':gt 'cfnm', 'end'
-		end
+		gs 'willpower', 'swallow', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Make him cum on the floor (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'cfnm', 'end'
+			end
+		else
+			act 'Make him cum on the floor (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 	elseif pcs_horny >= 90:
 		act 'Surrender yourself to him':gt 'cfnm', 'sex'
 	end

locations/clener.qsrc

@@ -171,7 +171,7 @@ if $ARGS[0] = 'start':
 						'You drink the shitty vodka and it burns your throat. Your throat is on fire and you quickly grab some cheese to help soothe it. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
 						'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the buttocks.'
 
-						gs 'willpower', 'misc', 'self'
+						gs 'willpower', 'sex_other', 'self'
 						if will_cost <= pcs_willpwr:
 							act 'React (<<will_cost>> Willpower)':
 								cla

locations/club.qsrc

@@ -1,6 +1,6 @@
 # club
 CLOSE ALL
-
+!!needs a complete rework of the club
 if $ARGS[0] = 'start':
 	$loc = 'club'
 	$metka = 'start'
@@ -15,7 +15,7 @@ if $ARGS[0] = 'start':
 	gs 'themes', 'indoors'
 	'<center><b><font color="maroon">Night club</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club.jpg"></center>'
-	'The entrance area of the club is full of young people. The entrance itself is guarded by the heavy and strong type of men, who check everyones passport. A Ticket costs 250 <b>₽</b>.'
+	'The entrance area of the club is full of young people. The entrance itself is guarded by a very large man wearing a shirt that says security, who checks everyones and makes sure they pay to enter. The entry fee costs 250 <b>₽</b>.'
 
 	act 'Return to the city center': minut += 5 & gt 'down'
 
@@ -49,8 +49,8 @@ if $ARGS[0] = 'start':
 	if money >= 250:
 		act 'Enter the club (250 <b>₽</b>)':
 			menu_off = 1
-			if pcs_makeup > 1 and pcs_sweat < 30 and (PCloSkirt > 2 or PCloPants > 4 or $clothingworntype = 'exhibit'):
-				'You can feel his eyes all over your body, but eventually he nods and lets you inside.'
+			if pcs_makeup > 1 and pcs_sweat < 50 and (PCloSkirt > 2 or PCloPants > 4 or $clothingworntype = 'exhibit'):
+				'You can feel his eyes all over your body, but eventually he nods and lets pass where you are stopped just inside the door by another large man. He indicates the cashier window. You step over to it and pay the entry fee. With that paid he steps aside and lets you go inside.'
 				minut += 5
 				money -= 250
 				frost = 0
@@ -59,7 +59,7 @@ if $ARGS[0] = 'start':
 				cla
 				'He shakes his head, if you''re looking for paying clients, try the road by the park this is not a brothel.'
 				act 'Continue':gt 'club', 'start'
-			elseif pcs_sweat >= 30:
+			elseif pcs_sweat >= 50:
 				cla
 				'The bouncer shakes his head. "God, girl, you actually smell!"'
 				act 'Continue':gt 'club', 'start'
@@ -90,11 +90,11 @@ if $ARGS[0] = 'inside':
 	gs 'themes', 'indoors'
 	'<center><b><font color="maroon">Night club</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
-	'The music here is loud and the bass is thumping. You see a laser show on the stage and on the poorly lit dancefloor you see the people dancing, like there''s no tomorrow.'
+	'The music here is loud and the bass is thumping. You see a laser show on the stage and on the poorly lit dance floor filled with people dancing, like there''s no tomorrow.'
 	*nl
 	'There is also a <a href="exec:gt ''club'', ''vip''">vip-room</a>.'
 
-	if hour >= 18 and pcs_apprnc > 88 and clubwork = 0 and clubno = 0 and rand (0,10) = 0:
+	if hour >= 18 and hotcat >= 6 and clubwork = 0 and clubno = 0 and rand (0,10) = 0:
 		*clr & cla
 		menu_off = 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
@@ -103,8 +103,8 @@ if $ARGS[0] = 'inside':
 		act 'Hear him out':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
-			'"The club opens at 6pm you can work for an hour at a time upto 1am. The jobs vary according to time and demand, It includes finding customers to bring to the club, promoting drinks and some dancing."'
-			'"The pay depends on results, get more people in, get people taking up drink promotions or dance well and you get 200 <b>₽</b>. Do worse, you get less, do well, you get a bonus. When you finish you can stay in the club, so you get free entry."'
+			'"The club opens at 6pm you can work for an hour at a time up to 1am. The jobs vary according to time and demand, It includes finding customers to bring to the club, promoting drinks and some dancing."'
+			'"The pay depends on results, get more people in, get people buying up the promotional drinks or if you dance well and you get 200 <b>₽</b>. Do worse, you get less, do very well, you get a bonus. When you finish you can stay in the club, so you get free entry as well."'
 			'"So, are you interested?"'
 			act 'No':clubno = 1 & gt 'club', 'inside'
 			act 'Yes':
@@ -134,7 +134,7 @@ if $ARGS[0] = 'inside':
 			minut += 5
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 			'You search the club for a few minutes, before finding the promoter.'
-			if pcs_apprnc > 88:
+			if hotcat >= 6:
 				'He asks you if you''ve changed your mind and want to do some work for him.'
 				act 'No':clubno = 1 & gt 'club', 'inside'
 				act 'Yes':
@@ -509,7 +509,7 @@ if $ARGS[0] = 'bar':
 		elseif temp = 10:
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand7.jpg"></center>'
-			'You see a small group of girls letting loose on the dancefloor. They''re moving like there''s no tomorrow.'
+			'You see a small group of girl loosing it on the dancefloor. They''re moving like there''s no tomorrow.'
 			'You''re too drunk to continue partying here. The security has to escort you out.'
 
 			gs 'arousal', 'voyeur', 10
@@ -691,7 +691,7 @@ if $ARGS[0] = 'bar':
 		elseif temp = 24:
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club24.jpg"></center>'
-			'The last thing you''re able to remember is, that you used the mens bathroom to pee.'
+			'The last thing you''re able to remember is, that used the mens bathroom to pee.'
 			'You''re too drunk to continue partying here. The security has to escort you out.'
 
 			gs 'arousal', 'voyeur', 10
@@ -965,23 +965,24 @@ if $ARGS[0] = 'bar1':
 		end
 	end
 
-	if pcs_dom > 10:
-		act 'Tell him to lick you':
-			cla
-			*clr
+	gs 'willpower', 'cuni', 'force', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Tell him to lick you (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'force'
+			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barkuni.jpg"></center>'
 			'"Sure", you say with a witty smile, "Why don''t you lick my pussy?" You stand up, remove your panties and bend over the stool. "Go on, what are you waiting for.", you tell him.'
 			'He kneels down and begins to move his tongue between your folds. You immediately begin to moan softly. You close your eyes and admit to yourself, that he''s not half bad at it.'
-
 			gs 'arousal', 'cuni', 10, 'dom'
 			gs 'stat'
-
 			act 'Turn him down':gt 'club', 'bar'
 			act 'Suck his cock':gt 'club', 'bar2'
 			act 'Let him fuck you':gt 'club', 'bar3'
 		end
-	end
-
+	else
+		act 'Tell him to lick you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 	act 'Blow job':gt 'club', 'bar2'
 	act 'Post':gt 'club', 'bar3'
 end

locations/dateM.qsrc

@@ -638,6 +638,22 @@ if $ARGS[0] = 'datecafe':
 			else
 				act 'React (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
+			gs 'willpower', 'misc', 'self', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Tell him off (<<will_cost>> Willpower)':
+					gs 'willpower', 'misc', 'self', 'hard'
+					gs 'willpower', 'pay', 'self'
+					*clr & cla
+					'<center><img src="images/locations/shared/date/cafetelloff.jpg"></center>'
+					'Not liking the way <<$boydesc>> treated the waitress you go on the attack against <<$boydesc>>. You''re appalled by how he behaves. With such poor first-impression you decide you don''t ever want to see this bottom-feeder again.'
+					'"You should really learn some matters. To treat a human being like that is despicable. You should be ashamed of yourself."'
+					'<<$boydesc>> looks at you in fear as he wasn''t expecting you to react like that.'
+					'"Nothing to say? No need to, I''m done. Enjoy the date alone you loser." You quickly get up and walk out of the café.'
+					act 'Rush out':gt $loc, $metka
+				end
+			else
+				act 'Tell him off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 			act 'Keep quiet':
 				*clr & cla
 				minut += 10
@@ -661,22 +677,6 @@ if $ARGS[0] = 'datecafe':
 				'"Thanks, one should not be accepting bad service no matter who you are."'
 				act 'Continue date':gt 'dateM', 'cafepeople'
 			end
-			gs 'willpower', 'misc', 'self', 'hard'
-			if will_cost <= pcs_willpwr:
-				act 'Tell him off (<<will_cost>> Willpower)':
-					gs 'willpower', 'misc', 'self', 'hard'
-					gs 'willpower', 'pay', 'self'
-					*clr & cla
-					'<center><img src="images/locations/shared/date/cafetelloff.jpg"></center>'
-					'Not liking the way <<$boydesc>> treated the waitress you go on the attack against <<$boydesc>>. You''re appalled by how he behaves. With such poor first-impression you decide you don''t ever want to see this bottom-feeder again.'
-					'"You should really learn some matters. To treat a human being like that is despicable. You should be ashamed of yourself."'
-					'<<$boydesc>> looks at you in fear as he wasn''t expecting you to react like that.'
-					'"Nothing to say? No need to, I''m done. Enjoy the date alone you loser." You quickly get up and walk out of the café.'
-					act 'Rush out':gt $loc, $metka
-				end
-			else
-				act 'Tell him off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
 		end
 	end
 end
@@ -814,6 +814,20 @@ if $ARGS[0] = 'bartalk':
 								'"Get down on your knees <<$pcs_nickname>>."'
 								gs 'arousal', 'foreplay', 2
 								gs 'stat'
+								gs 'willpower', 'bj', 'resist'
+								if will_cost <= pcs_willpwr:
+									act 'Decide to stop (<<will_cost>> Willpower)':
+										*clr & cla
+										gs 'willpower', 'pay', 'resist'
+										gs 'arousal', 'end'
+										'<center><img src="images/locations/shared/date/barinside.jpg"></center>'
+										'You can''t get yourself to go through this. Excusing yourself you walk back to the table and sit down.'
+										'<<$boydesc>> arrives shortly after you to the table. The whole situation is too awkward now and you begin to blush as you''re really ashamed of your actions. You''re starting to panic a bit...'
+										act 'Finish the date':gt 'dateM', 'barend'
+									end
+								else
+									act 'Decide to 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 'Get down on your knees':
 									*clr & cla
 									'<center><img src="images/locations/shared/date/barbj.jpg"></center>'
@@ -846,20 +860,6 @@ if $ARGS[0] = 'bartalk':
 										end
 									end
 								end
-								gs 'willpower', 'bj', 'resist'
-								if will_cost <= pcs_willpwr:
-									act 'Decide to stop (<<will_cost>> Willpower)':
-										*clr & cla
-										gs 'willpower', 'pay', 'resist'
-										gs 'arousal', 'end'
-										'<center><img src="images/locations/shared/date/barinside.jpg"></center>'
-										'You can''t get yourself to go through this. Excusing yourself you walk back to the table and sit down.'
-										'<<$boydesc>> arrives shortly after you to the table. The whole situation is too awkward now and you begin to blush as you''re really ashamed of your actions. You''re starting to panic a bit...'
-										act 'Finish the date':gt 'dateM', 'barend'
-									end
-								else
-									act 'Decide to stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-								end	
 							end
 						end	
 					end

locations/dimaEv.qsrc

@@ -35,7 +35,7 @@ if $ARGS[0] = 'after_school':
 			*nl
 			if dimaFilm = 1:
 				fedorKozlovQW = -1
-				if GorSlut < 2:GorSlut = 2
+				if GorSlut < 2: GorSlut = 2
 				'Dimka looks at Fedor with a sinister grin, then at you. "If I have proof that she is nothing but dirty cocksucker, what would you say then?"'
 				'Fedor recoils in shock, but firmly say, "You''re lying!"'
 				'Dimka''s grin widens, "Lying huh? Check this out."'
@@ -57,7 +57,7 @@ if $ARGS[0] = 'after_school':
 				*nl
 				'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/fedorangry.jpg"></center>'
-				act 'Go with Fedor':DimaRudeBlock = 1 & gt 'FedorEv', 'Start'
+				act 'Go with Fedor': DimaRudeBlock = 1 & gt 'FedorEv', 'Start'
 			end
 		end
 		exit
@@ -69,9 +69,9 @@ if $ARGS[0] = 'after_school':
 		'<center><h4><font color="maroon">Dimka''s parent''s house</font></h4></center>'
 		'<center><img  src="images/locations/pavlovsk/resident/dimkahome/house.jpg"></center>'
 		'You go with Dimka to his parents home, a large two-story house with a manicured lawn and a large garden. The two of you walk and chat along the way, but he seems not really interested in small talk. Once there he leads you inside and up to his room.'
-		act 'Go to Dimka''s room':gt 'dimaHome', 'dimkaroom'
+		act 'Go to Dimka''s room': gt 'dimaHome', 'dimkaroom'
 	end
-	act 'Leave':gs 'gschool_grounds', 'main'
+	act 'Leave': gs 'gschool_grounds', 'main'
 end
 
 if $ARGS[0] = 'drugged':
@@ -109,8 +109,8 @@ if $ARGS[0] = 'firstvisitsex':
 	act 'Suck him':
 		*clr & cla
 		bja += 1
-		if maxdra = 0:maxdra = 1
-		if maxdra = 6:maxdra = 5
+		if maxdra = 0: maxdra = 1
+		if maxdra = 6: maxdra = 5
 		gs 'boyStat', 'A1'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/minet.jpg"></center>'
@@ -138,7 +138,7 @@ if $ARGS[0] = 'firstvisitsex':
 				spafinloc = 11
 				gs 'cum_manage'
 				facial += 1
-				if maxdra = 1:maxdra = 2
+				if maxdra = 1: maxdra = 2
 				dimasexday = daystart
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/face.jpg"></center>'
@@ -153,9 +153,9 @@ if $ARGS[0] = 'firstvisitsex':
 				spafinloc = 12
 				gs 'cum_manage'
 				swallow += 1
-				if pcs_throat < 16:pcs_throat += 1
-				if pcs_makeup ! 1:pcs_makeup = 0
-				if maxdra = 2:maxdra = 3
+				if pcs_throat < 16: pcs_throat += 1
+				if pcs_makeup ! 1: pcs_makeup = 0
+				if maxdra = 2: maxdra = 3
 				dimasexday = daystart
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/sex/facefuck0.jpg"></center>'
@@ -172,7 +172,7 @@ if $ARGS[0] = 'firstvisitsex':
 		elseif dimadalrand = 3:
 			act 'Further':
 				*clr & cla
-				if maxdra = 3:maxdra = 4
+				if maxdra = 3: maxdra = 4
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sit.jpg"></center>'
 				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka takes his dick out of your mouth and makes you get on the bed. He straddles your chest, making you suffocate under the added weight. Then, he puts his cock in your face and begins giving you little dick slaps. "Come on slut, suck like a porn star". You start to lick his balls while Dimka masturbates in your face.'
@@ -196,7 +196,7 @@ if $ARGS[0] = 'firstvisitsex':
 				gs 'boyStat', 'A1'
 				silavag = 1
 				dick = 16
-				if maxdra = 4:maxdra = 5
+				if maxdra = 4: maxdra = 5
 				sexa += 1
 				dimasexday = daystart
 				gs 'boyStat', 'A1'
@@ -204,8 +204,8 @@ if $ARGS[0] = 'firstvisitsex':
 				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/sex2.jpg"></center>'
 				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your back, your head against the back and your ass nearly hanging off. He lifts your legs up and pushes them forward until they are resting against your body. You try to get up from the awkward position, but he gives your exposed ass a slap. "Come on slut, fuck like a porn star". Grabbing your legs you complain. He presses the head of his <<dick>>cm <<$dick_girth>> dick against the slit of your pussy and with a triumphant smile pushes himself inside.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinsex','vaginal_sex',10
-				gs 'dinsex','sexcum'
+				gs 'dinsex', 'vaginal_sex', 10
+				gs 'dinsex', 'sexcum'
 				gs 'arousal', 'end'
 				gs 'stat'
 				act 'Clean up': gt 'dimaEv', 'cleanup'
@@ -291,7 +291,6 @@ if $ARGS[0] = 'blackmail':
 	if dimkawarn = 1:
 		*clr & cla
 		minut += 5
-		sub += 10
 		dimkawarn = 0
 		gs 'pain', 2, 'neck', 'bind'
 		gs 'stat'
@@ -317,7 +316,7 @@ if $ARGS[0] = 'blackmail':
 		'"You fucking whore!" he roars, standing quickly and flinging his chair halfway across the room, "You useless fucking whore. You think you can come prancing in here just like that and all is forgiven?"'
 		'You barely have time to register that he is moving before he grabs your lower jaw with bruising force. He spits in your face violently. "You..You..Fucking whore." he screams in your face.'
 		'You never felt the blow, but he must have hit you as you curl now on the floor into a ball. He grabs you by the hair and forces you into a chair.'
-		act 'Continue':gt 'dimaEv', 'dimkawarns'
+		act 'Continue': gt 'dimaEv', 'dimkawarns'
 	else
 		'The room is surprisingly clean and organized for a boys room. It is fairly tastefully decorated. Along one wall next to the bed is a wardrobe with mirrored doors, a small zebra pattern love seat sits along a wall near the bed. Next to the love seat is a mini fridge and just above that on a shelf is a stereo system. There is also a desk with a desktop computer setup on it and a laptop laying nearby as well. All in the room seems pretty expensive. Sitting at the desk is Dimka, he apparently heard you open the door as he turns to face you as you walk in.'
 		'As he sees you, an evil smile spreads across his face. "So good of you to join me. Now take off your clothes. Slut."'
@@ -332,17 +331,17 @@ if $ARGS[0] = 'dimkawarns':
 	gs 'boyStat', 'A1'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/tiedinchair.jpg"></center>'
 	'Dimka strips you of all your clothes, ties you securely to the chair and forces a ball gag into your mouth. He pours himself another glass of vodka and drinks it as he stares at you. You want to beg him for forgiveness, but you can only moan fearfully through the gag. Finishing his drink, he unfastens his trousers and allows them to fall to the floor. He is not wearing underwear and his dick is already hard and leaking precum as he approaches you. "I loved you, you know, but you had to ruin it." He rubs the slippery head of his cock against your vagina until he finds your entrance. "You are still mine!" he hisses as he forces his <<dick>>cm <<$dick_girth>> dick into your dry vagina. You can only cry at the sudden intrusion.'
-	gs 'arousal', 15, 'vaginal', 'rough'
+	gs 'arousal', 'vaginal', 15, 'rough'
 	gs 'pain', 3, 'vaginal', 'tear'
 	gs 'stat'
 	act 'Go home':
 		*clr & cla
-		pee +=1
 		face_write = 1
 		'<center><img <<$set_imgh>> src="images/shared/sex/dom/blowbang4.jpg"></center>'
 		'The brutal rape seems to go on forever before Dimka finally achieves release. He stands panting over you then grabs hold of his mostly limp cock, points it at you, and then with a grunt, begins to empty his bladder. He directs the stream of hot piss all over your body, soaking your face and hair. You close your eyes, but the stinging liquid seeps in. Eventually, he runs out of piss and staggers away from you. Opening your eyes, you can see him rummaging through the desk. He comes back with an eyeliner pencil and uses it to write something on your forehead.'
 		'"There. He says with satisfaction. All is forgiven. I will see you soon, dearest." Dimka unties you and leaves the room to take a shower. You waste no time gathering your clothes and escaping from him. You manage to make your way home and into your bathroom unseen. Criying you read between tears "Whore"'
-		gs 'arousal', 15, 'vaginal', 'rough'
+		gs 'arousal', 'vaginal', 10, 'rough'
+		gs 'arousal', 'pee', 5, 'sub', 'humilation'
 		gs 'arousal', 'end'
 		gs 'pain', 2, 'vaginal', 'tear'
 		gs 'pain', 1, 'eyes', 'burn'
@@ -369,7 +368,6 @@ if $ARGS[0] = 'dimkaplays':
 	end
 	act 'Refuse':
 		*clr & cla
-		pcs_dom += 1
 		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/pre.jpg"></center>'
@@ -403,8 +401,7 @@ if $ARGS[0] = 'dimkaabuse0':
 			spafinloc = 12
 			gs 'cum_manage'
 			swallow += 1
-			sub += 1
-			if pcs_makeup ! 1:pcs_makeup = 0
+			if pcs_makeup ! 1: pcs_makeup = 0
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/gagbj.jpg"></center>'
 			'Dimka''s cock enters your mouth through the ring and drives it to the entrance to your throat. The ring prevents you from doing anything to stop him except to try to use your tongue to force him out. The actions of your tongue on his cock only seem to excite him further. You gag as the head of his dick presses up against the soft palate at the back of your mouth. Dimka pulls his cock back then with all his strength drives it deep into your throat. You choke and gag as drool flows from your mouth, mixing with your tears and snot on your face as you struggle to breath through your nose. Dimka fiercely drives his penis in your mouth, fucking your throat until it burns like fire. You almost faint from suffocation as you choke on the cock jammed deeply inside of you as it spews its slimy load down your throat. To your relief, Dimka''s cock begins to soften and he pulls it out of you. He then takes the gag out of your mouth and uncuffs your wrists.'
 			gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat'
@@ -418,11 +415,11 @@ end
 
 if $ARGS[0] = 'dimkaabuse1':
 	*clr & cla
-	if maxdradrug = 1:maxdradrug = 2
+	if maxdradrug = 1: maxdradrug = 2
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	if pcs_makeup ! 1:pcs_makeup = 0
+	if pcs_makeup ! 1: pcs_makeup = 0
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/ab.jpg"></center>'
 	'Dimka roughly pulls off your panties and puts them on your head. He inserts his penis into your mouth and begins to fuck you hard in the mouth. Your throat is burning with fire from the fact that his <<dick>>cm <<$dick_girth>> cock penetrates you nearly to the balls on every thrust. Dimka growls at you "A cocksucker''s mouth is her second pussy, and what should be done with a pussy? Fuck it hard, right to the uterus!" Dimka slaps you on the cheek with his hand "Take it in your mouth pussy!" The dick in your mouth starts to cum and fills your mouth with sperm, you swallow.'
 	gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat'
@@ -438,8 +435,7 @@ if $ARGS[0] = 'dimkaabuse2':
 	silavag = 1
 	dick = 16
 	sexa += 1
-	sub += 5
-	if maxdradrug = 2:maxdradrug = 3
+	if maxdradrug = 2: maxdradrug = 3
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/car.jpg"></center>'
 	'Dimka binds and ties your knees with a pair of little carts, tie you up with rope, attach a steering wheel to your back, covers your face in blue clown makeup and finally, puts a clown horn in your mouth and tapes it in place. "You know. I have been asking my father for a car. He says no. That I must wait until eighteen. So..I will comfort with you." Smilling, he put himself in position to shove his dick.'
@@ -457,22 +453,24 @@ if $ARGS[0] = 'dimkaabuse3':
 	silavag = 1
 	dick = 16
 	anala += 1
-	sub += 5
-	if maxdradrug = 3:maxdradrug = 4
+	if maxdradrug = 3: maxdradrug = 4
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/car.jpg"></center>'
 	'Dimka binds and ties your knees with a pair of little carts, tie you up with rope, attach a steering wheel to your back, covers your face in blue clown makeup and finally, puts a clown horn in your mouth and tapes it in place. "You know. I have been asking my father for a car. He says no. That I must wait until eighteen. So..I will comfort with you." Smilling, he put himself in position to shove his dick.'
 	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
-	act 'Leave':gt 'pavResidential'
+	act 'Leave': gt 'pavResidential'
 end
 
 if $ARGS[0] = 'dimkaabuse4':
 	*clr & cla
-	if pcs_makeup ! 1:pcs_makeup = 0
-	pcs_throat += 5
+	if pcs_makeup ! 1: pcs_makeup = 0
+	if pcs_throat < 26:
+		pcs_throat += 5
+	elseif pcs_throat < 30:
+		pcs_throat = 30
+	end
 	minut += 15
-	sub += 5
-	if maxdradrug = 4:maxdradrug = 5
+	if maxdradrug = 4: maxdradrug = 5
 	gs 'pain', 2, 'throat', 'stretch'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/nar.jpg"></center>'
@@ -484,7 +482,6 @@ if $ARGS[0] = 'dimkaabuse5':
 	*clr & cla
 	spank += 1
 	minut += 15
-	sub += 5
 	if maxdradrug = 5:maxdradrug = 6
 	if pcs_makeup ! 1:pcs_makeup = 0
 	gs 'pain', 4, 'asscheeks', 'spank'
@@ -498,7 +495,6 @@ if $ARGS[0] = 'dimkaabuse6':
 	*clr & cla
 	if maxdradrug = 6:maxdradrug = 7
 	if pcs_makeup ! 1:pcs_makeup = 0
-	sub += 5
 	minut += 20
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/nip.jpg"></center>'
 	'Dimka make you lie down, and binds you until you are fully immobilized. He looks at you with a pensive expression. "Ok..Hm..I think that you don''t understand your position.. Hmm.. lets see if a you can learn something" Then he clamps your nipples in small vices and tightens the jaws. It hurt, but then you see what he has prepared, and cry in terror. Suddenly he stabs a needle through your nipple. You howl in pain, but Dimka spits on you as you cry and sticks in another needle forcing you to howl again. You yell and swear at this fucking sadist, but Dimka coldly continues an to your ever growing horror, connect them to a battery. Little shocks run through your body, enhancing the sensation of helplessness. After an eternity of sobbing, pain and pleading. He release you.'
@@ -522,7 +518,6 @@ if $ARGS[0] = 'dimkaabuse7':
 	gs 'pain', 9, 'pierce', 'tongue'
 	if maxdradrug = 7:maxdradrug = 8
 	if pcs_makeup ! 1:pcs_makeup = 0
-	sub += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/ton.jpg"></center>'
 	'Dimka binds you until you are fully immobilized. "As a slut, you have a dirty tongue. That can''t be, you must be clean for me. So..I am going to teach you a lesson in personal hygiene." You try to recoil in horror at the needles in his hands, but you are trapped. He grabs hold of your tongue and suddenly pushes a needle through it. You squeal and twitch from the sharp pain. Dimka amuses himself by sticking needles through your tongue, lips and cheeks. The more you howl in pain, the more excited he gets.'

locations/dimaRevenge.qsrc

@@ -1001,7 +1001,7 @@ if dimaRevChoice = 5:
 			'You sit on the train listening to Petia''s terrible pickup lines. You do your best to ignore him and play with your phone.
 			He is wearing the same outfit as usual but now his hair is combed back in an attempt to look nice. He is absolutely covered in cologne as if he just decided to use a whole bottle of the stuff rather than take a bath.
 			When he opens his mouth, you see that he brushed his teeth, but you smell that he ate something rank before meeting up with you. He makes inappropriate remarks about your body every chance he can get and keeps brushing against you on "accident."
-			He is offensive to four of your five sense, and you don''t want to find out about the fifth one. You feel uncomfortable and wish for the train to go faster so you don''t have to sit so close to this guy. Soon you arrive at in the city center, and, after leaving the station, head to Diner Bystroeshka.'
+			He is offensive to four of your five senses, and you don''t want to find out about the fifth one. You feel uncomfortable and wish for the train to go faster so you don''t have to sit so close to this guy. Soon you arrive at in the city center, and, after leaving the station, head to Diner Bystroeshka.'
 			act 'Go inside the diner':
 				*clr & cla
 				minut += 30
@@ -1097,7 +1097,7 @@ if dimaRevChoice = 5:
 						'As you walk through the halls leaving school, things seem to be back to normal. No one is talking about you anymore, and you are back to being mostly unnoticed and occasionally picked on.
 						You still feel bad about almost choking that girl, and about punching that other girl, but not about Petia. He had it coming. Now that you think about it, where is Petia? He didn''t come to school today. Oh well, you''re sure he''s fine.
 						And if he isn''t. Fuck him. That is one kid who deserves to be picked on.'
-						act 'leave school': gt 'gschool_grounds', 'main'
+						act 'Leave school': gt 'gschool_grounds', 'main'
 						!!normal end of school
 					end
 				end

locations/dinnpc.qsrc

@@ -4,7 +4,6 @@ $din_predlog_dima_bj = {
 	act 'Get down on your knees':
 		*clr & cla
 		DimaRudeQW += 1
-		sub += 1
 		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>'
@@ -72,42 +71,47 @@ $din_predlog_dima_bj = {
 
 $din_dima_predlog = {
 	menu_off = 1
-	act 'Who does he think you are?! - Slap him':
-		*clr & cla
-		pcs_dom += 1
-		npc_rel['A1'] = 0
-		gs 'stat'
-		'<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
-		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
-		'You give Dimka a good, hard, resounding slap that causes him to yelp like a girl as he clutched his red cheek. His immediate reaction only adds to your satisfaction, but the look he gives you is one of pure hatred - one that makes you wonder if he''s going to hit you back now.' 
-		'But instead, he backs away from you, looking like an animal trapped in a corner. His voice is more of an angry hiss:' 
-		'"You''ll pay for this, sooner or later. Don''t ever come near me again, bitch! Get the hell away from me!"'
-
-		act 'He doesn''t have to tell you twice - Leave at once':gt $loc, $metka
-	end
-
-	act '... is he serious? Think about what he said for a moment':
-		*clr & cla
-		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>'
-		'Your eyes widen and you flush at his proposal - surely, he didn''t actually mean that you had to give him a blowjob right here, just so you could go out with him... right?' 
-		'As if to answer your question, Dimka unbuttons his pants. "Come on, are you gonna keep me waiting all night long? Which is it? Are you brave and fun? Or just another prude?"'
-
-		act 'That does it! - Slap him':
+	gs 'willpower', 'bj', 'self', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Who does he think you are?! - Slap him (<<will_cost>> Willpower)':
 			*clr & cla
-			pcs_dom += 1
-			npc_rel['A<<numnpc>>'] = 0
+			gs 'willpower', 'pay', 'self'
+			npc_rel['A1'] = -20
 			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>'
+			'<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
 			'You give Dimka a good, hard, resounding slap that causes him to yelp like a girl as he clutched his red cheek. His immediate reaction only adds to your satisfaction, but the look he gives you is one of pure hatred - one that makes you wonder if he''s going to hit you back now.' 
 			'But instead, he backs away from you, looking like an animal trapped in a corner. His voice is more of an angry hiss:' 
 			'"You''ll pay for this, sooner or later. Don''t ever come near me again, bitch! Get the hell away from me!"'
-
 			act 'He doesn''t have to tell you twice - Leave at once':gt $loc, $metka
 		end
-
+	else
+		act 'Who does he think you are?! - Slap 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 '... is he serious? Think about what he said for a moment':
+		*clr & cla
+		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>'
+		'Your eyes widen and you flush at his proposal - surely, he didn''t actually mean that you had to give him a blowjob right here, just so you could go out with him... right?' 
+		'As if to answer your question, Dimka unbuttons his pants. "Come on, are you gonna keep me waiting all night long? Which is it? Are you brave and fun? Or just another prude?"'
+		gs 'willpower', 'bj', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'That does it! - Slap him (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				npc_rel['A1'] = -20
+				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>'
+				'You give Dimka a good, hard, resounding slap that causes him to yelp like a girl as he clutched his red cheek. His immediate reaction only adds to your satisfaction, but the look he gives you is one of pure hatred - one that makes you wonder if he''s going to hit you back now.' 
+				'But instead, he backs away from you, looking like an animal trapped in a corner. His voice is more of an angry hiss:' 
+				'"You''ll pay for this, sooner or later. Don''t ever come near me again, bitch! Get the hell away from me!"'
+				act 'He doesn''t have to tell you twice - Leave at once':gt $loc, $metka
+			end
+		else
+			act 'That does it! - Slap 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 '"And you promise not to tell anyone?"':
 			*clr & cla
 			pcs_dom += 1
@@ -136,11 +140,11 @@ $din_igor_disco_bj = {
 		dick = 6
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/cocksucker5.jpg"></center>'
-		'You sit on your haunches and Igor pulls his dick out of his pants... and it takes all of your resolve to remain straightfaced. His penis is tiny! Igor''s small, thin member sticks out of his pubic hair like a mushroom in a meadow - that image alone is enough to almost make you burst into laughter, especially considering that you''ve seen mushrooms bigger than that. But to your luck, it''s too dark for him to see your face twitch and a few coughs cover your stifled laughter until you are mentally prepared to do what you came here for.' 
-		''
+		'You sit on your haunches and Igor pulls his dick out of his pants... and it takes all of your resolve to remain straight faced. His penis is tiny! Igor''s small, thin member sticks out of his pubic hair like a mushroom in a meadow - that image alone is enough to almost make you burst into laughter, especially considering that you''ve seen mushrooms bigger than that. But to your luck, it''s too dark for him to see your face twitch and a few coughs cover your stifled laughter until you are mentally prepared to do what you came here for.' 
+		*nl
 		'Actually feeling somewhat disappointed by his size, now that you''re getting to the blowjob part, you gently wrap your <<$liptalk>> around the small cock... but sucking on it like you would a normal penis doesn''t work because you simply can''t bob up and down its length when there is no length to begin with. Even sucking on it is hard because of its size, or lack thereof.'
 		'So, instead, you begin to ''fondle it'' inside your mouth, squeezing it with your lips and licking it all over, swirling your tongue easily around most of it. Igor groans, audibly enjoying the treatment. More so than you expected, in fact, because not a minute after you''ve started, you notice his hips bucking against your head and taste a few bland drops of semen that would barely constitute a sip of water.'
-		''
+		*nl
 		'You can''t help but feel a little sorry for Igor: Having a tiny dick, no stamina AND only a few droplets of semen? The guy should apply for a certificate of disability. And the poor woman who''s gonna date him someday...'
 		'All in all, this was memorable in all the bad ways.'
 
@@ -166,7 +170,9 @@ $din_igor_dima_disco_bj = {
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/group/cocksucker6.jpg"></center>'
 		'You sit on your haunches and Igor pulls his dick out of his pants... and it takes all of your resolve to remain straightfaced. His penis is tiny! Igor''s small, thin member sticks out of his pubic hair like a mushroom in a meadow - that image alone is enough to almost make you burst into laughter, especially considering that you''ve seen mushrooms bigger than that. Dimka''s 16cm dick looks like a tree trunk in comparison and only by focusing your eyes on him do you manage to maintain your composure.' 
+		*nl
 		'You take a cock into each hand and move your mouth back and forth between them. Until then, you haven''t been able to tell what a difference it makes to have a large dick to play with but now, being able to compare them side by side, you feel that it''s a lot more satisfying to suck a bigger dick like Dimka''s, and it shows in your enthusiasm.' 
+		*nl
 		'Not that Igor seems to mind, as long as you don''t stop. In fact, even though you''re paying more attention to Dimka, Igor is the first to be ready to come and Dimka roughly uses your mouth to catch up, then both stick the tips of their dicks between your lips and start cuming into your mouth. Igor''s sperm is barely even worth mentioning, little as there was, but of Dimka''s there was so much you almost couldn''t keep it all in your mouth - almost. You swallow the semen down in two gulps, lick your lips and show them your empty mouth. Satisfied, the boys button up their pants and go back inside.'
 
 		gs 'arousal', 'bj', 5
@@ -194,34 +200,34 @@ $din_igor__disco = {
 			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big<<numnpc>>.jpg"></center>'
 			'You agreed to go out with Igor. A smile blossoms on his face and he hugs you tightly. "I''m so happy, <<$pcs_nickname>>! Now that we''re a couple... can we kiss?"'
 			'Something about the eagerness with which he suggests this makes you think he''s never kissed a girl before. And without waiting for your answer, he''s already leaning in to kiss you...'
-
-			if pcs_dom > 0:
-				act 'Stop him - If you go out with him, it''ll be on your terms':
+			gs 'willpower', 'misc', 'force', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Stop him - If you go out with him, it''ll be on your terms (<<will_cost>> Willpower)':
 					*clr & cla
-					pcs_dom += 5
+					gs 'willpower', 'pay', 'force'
 					IgorDominaQW = 1
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big<<numnpc>>.jpg"></center>'
 					'You tell Igor that you''re not gonna give away kisses like that, and even though you''re grinning, your demeanor is unmistakeably dominant. So much so that Igor blushes and kneels before you. "<<$pcs_nickname>>, I beg you, on my knees, just one kiss! I''ll do anything for you - I''ll be your willing slave."'
 					'Even though you expected him to be put off by your refusal and dominance, Igor seems... happy that you are taking charge and not just letting him do as he pleases. It''s almost as if he wants to be dominated. But do you really want to dominate a guy?'
-
-					if pcs_dom >= 10:
-						act 'Yes, you do - "You may kiss my feet"':
+					gs 'willpower', 'misc', 'force', 'medium'
+					if will_cost <= pcs_willpwr:
+						act 'Yes, you do - "You may kiss my feet" (<<will_cost>> Willpower)':
 							*clr & cla
+							gs 'willpower', 'pay', 'force'
 							IgorLove += 20
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/igor/leg.jpg"></center>'
 							'You smile at Igor, kneeling at your feet, right here in public, and tell him that he may kiss your foot. Igor scrambles to the task with more enthusiasm than you thought possible: In no time at all, he is kissing your naked foot, caressing it with reverence and licking your toes, his tongue tickling you. He''s hunched over, leaning on one elbow, and at first you don''t understand why but simply enjoy this strange foot massage. It''s not until he groans and you see a tiny jet of sperm hit the pavement that you realize Igor had been masturbating to your feet - literally - right here in front of you while he kissed and caressed your toes.'
 							'As weird of a scene as that was, it feels oddly empowering that he could get off like that within the confines of what you allowed him to do. Even stranger is how he''s thanking you profusely.'
-
 							gs 'arousal', 'kiss', 5, 'dom', 'feet'
 							gs 'arousal', 'end'
 							gs 'stat'
-						
 							act 'That was unexpected - Leave':gt $loc, $metka
 						end
-					end
-
+					else
+						act 'Yes, you do - "You may kiss my feet" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end	
 					act 'Well, let''s not overdo it - Kiss him':
 						*clr & cla
 						IgorLove += 10
@@ -229,26 +235,25 @@ $din_igor__disco = {
 						'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
 						'You tell Igor to get back on his feet and, meeting his eyes, kiss him. He responds with passion. It seems that your dominance has aroused him a little.'
 
-						gs 'arousal', 'kiss', 5, 'dom'
+						gs 'arousal', 'kiss_give', 5, 'dom'
 						gs 'arousal', 'end'
 						gs 'stat'
 		
 						act 'Enough for now - Leave':gt $loc, $metka
 					end
 				end
-			end
-
+			else
+				act 'Stop him - If you go out with him, it''ll be on your terms (<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 Igor kiss you':
 				*clr & cla
 				IgorLove += 5
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
 				'You give in and give Igor a gentle kiss. He gives you a smile afterwards but almost seems a little disappointed. By what, you cannot tell.'
-
 				gs 'arousal', 'kiss', 5
 				gs 'arousal', 'end'
 				gs 'stat'
-		
 				act 'Enough of this - Leave':gt $loc, $metka
 			end
 		end

locations/etoexhib.qsrc

@@ -159,7 +159,7 @@ if $ARGS[0] = 'pos4':
 		cla
 		*clr
 		minut += 5
-		pcs_horny += sub
+		pcs_horny += 10
 
 		gs 'exhibitionism', 2
 
@@ -175,7 +175,7 @@ if $ARGS[0] = 'pos5':
 	cla
 	*clr
 	minut += 5
-	pcs_horny += sub
+	pcs_horny += 10
 
 	gs 'exhibitionism', 3
 
@@ -955,25 +955,29 @@ if $ARGS[0] = 'pos24tk':
 			menu_off = 1
 			minut += 6
 			pcs_mood -= 10
-			pcs_willpwr -= 10
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg"></center>'
 			'"<<$pcs_nickname>>, where were you? Do you know what is happening in your class right now? I can tell you: there''s some confusion, walking around and there''s even an, pardon the expression, orgy. Go immediately to class, calm everyone down and teach your lesson through the remaining time as is expected of you".'
-			if pcs_dom < sub and izvad = 0:
-				*clr & cla
-				minut += 5
-				gs'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg"></center>'
-				'You <a href="exec: gs ''etoexhib'', ''pos24_director'' ">ask</a> for forgiveness of the Director.'
-				exit
-			elseif pcs_dom > sub and izvad = 0:
+			if izvad = 0:
+				act 'Ask for forgiveness of the Director':
+					*clr & cla
+					minut += 5
+					gs'stat'
+					izvad = 1
+					pzptu = 1
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg" ></center>'
+					'You stand back up and see the Director apologizing for your actions.'
+					'The Director tells you that you need will come to her study in your free time.'
+					act 'Leave':gt'etoexhib','pos24'
+				end
+			end
+			act 'Tell the director this won''t happen again':
 				*clr & cla
 				minut += 5
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg"></center>'
 				'You agree with your error and say that in the future this will not happen again.'
-				act 'Leave':gt'etoexhib','pos24' & teachlevel -= 3
-				exit
+				act 'Leave':teachlevel -= 3 & gt'etoexhib','pos24'
 			end
 		end
 	elseif hour >= 9 and hour <= 12:
@@ -993,18 +997,6 @@ if $ARGS[0] = 'pos24tk':
 	act 'In the corridor':gt'etoexhib','pos24'
 end
 
-if $ARGS = 'pos24_director':
-	*clr & cla
-	menu_off = 1
-	gs'stat'
-	izvad = 1
-	pzptu = 1
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_angdir.jpg" ></center>'
-	'You stand back up and see the Director apologizing for your actions.'
-	'The Director tells you that you need will come to her study in your free time.'
-	act 'Leave':gt'etoexhib','pos24'
-end
-
 if $ARGS[0] = 'pos25':
 	*clr & cla
 	menu_off =1

locations/event.qsrc

@@ -33,8 +33,8 @@ end
 if $ARGS[0] = 'park':
 	cla
 	*clr
-	!!'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/event.jpg"></center>'
-	'You find a quiet, deserted dead end pressed against the wall you start to kiss, but you want more.'
+	'<center><img <<$set_imgh>> src="images/locations/city/centralpark/sex/event/benchkiss.jpg"></center>'
+	'You find a quiet, deserted bench off the main paths, you sit together and you start to kiss, but you want more.'
 	gs 'arousal', 'kiss', 5
 	gs 'stat'
 	act 'Masturbate him':gt 'event', 'hand'
@@ -66,8 +66,8 @@ if $ARGS[0] = 'blow':
 		cla
 		swallow += 1
 		spafinloc = 12
-gs 'cum_manage'
-		!!'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
+		gs 'cum_manage'
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
 		'A jet of hot sperm hits you in the mouth. You begin to swallow cum, and <<$loverdesc[lover_number]>> continues to cum in your mouth. Finally, the flow of hot pungent liquid stops.'
 
 		act 'Leave':
@@ -82,26 +82,26 @@ gs 'cum_manage'
 		cla
 
 		if haraklover[lover_number] = 0:
-			!!'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
 			'You take his cock out of your mouth and <<$loverdesc[lover_number]>> finishes in your hand.'
 		elseif haraklover[lover_number] = 1:
 			tiprand = rand(0, 3)
 
 			if tiprand < 3:
-				!!'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
 				'You take his cock out of your mouth and <<$loverdesc[lover_number]>> finishes in your hand.'
 			elseif tiprand = 3:
 				facial += 1
 				spafinloc = 11
-gs 'cum_manage'
-				!!'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
+				gs 'cum_manage'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,8.jpg"></center>'
 				'You took his cock out of your mouth and immediatly <<$loverdesc[lover_number]>> cums directly on your face, covering it with his warm and sticky seed.'
 			end
 		elseif haraklover[lover_number] = 2:
 			facial += 1
 			spafinloc = 11
-gs 'cum_manage'
-			!!'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
+			gs 'cum_manage'
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,8.jpg"></center>'
 			'<<$loverdesc[lover_number]>> holds your hair, pulls his dick out of your mouth and finishes on your face. Covering it with warm and sticky cum.'
 		end
 
@@ -152,13 +152,24 @@ if $ARGS[0] = 'dima':
 			'"Thanks, My name is Dmitry".'
 			'You hold out your hand to him - "<<$pcs_nickname>>".'
 			'He was a man in his forties, average height, a pretty strong constitution, short dark hair, nose slightly hooked. Off you go, speaking about the weather, and current affairs. Finally, Dima says that you had arrived at his home. The house is a two-story, pretty cute. In the living room there is a man holding a bottle of beer.'
+			*nl
 			'"Hi Dima, and I was bored and didn''t know what to do", he says and adds, "What a beautiful woman you have with you, this lovely girl will surely brighten up our evening.". His eyes look all over your body and stop on your breasts.'
 			'"<<$pcs_nickname>> meet Aleksei, my friend. My wife is not home yet, she went to see her mother, the train must be running late. Luda should be here soon and then we will be at full strength" Dima said smiling.'
+			*nl
 			'"Aleksei, but you can call me Alex" introduced his friend. He was slightly taller than Dima and looked a little older. Dark-haired with blue eyes, a rather handsome man. You thought to yourself, "What am I doing here?" Probably, there is no wife, it''s not too late to get out of here! But Dmitry puts his arm around your waist and leads you into the kitchen. "Alex, you have set the table without me, well done!" says Dmitry. "Here, have a seat in the middle <<$pcs_nickname>>, we will look after you" said Alex while helping you sit. On the table are plates of snacks and a bottle of vodka. Dima pours the vodka. You say:'
 			'"I don''t usually drink vodka." Maybe this was a bad idea.'
-
-			act 'Make excuses and go':gt'street'
-			act 'Drink vodka':pcs_hydra -=10 & gt'event','dima2'
+			gs 'willpower', 'drink', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Make excuses and go (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt'street'
+				end
+			else
+				act 'Make excuses and go (<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 vodka': gt'event','dima2'
 		end
 	end
 
@@ -170,14 +181,15 @@ if $ARGS[0] = 'dima2':
 	'You drank one shot, then another, and so on, until you are a little tipsy. The men took turns to telling you entertaining stories, you had a lot of fun. The wife did not come of course, but you never thought to ask about it.'
 	'Dima turns on some music, and invites you to dance. Alexei protested: "You can''t dance with Dima and not me!"'
 	'You smile at Alex. Dima immediately begins to grope your ass, you dance slowly, and so close to each other, that you can feel his erect penis pressed against your crotch. Alex cames up behind you, holds your shoulders and his hands began to slowly lower to your chest.'
+	*nl
 	'Drunk and the presence of two excited men has an effect. You shamelessly twist your hips, alternating between pushing your ass against Alexs groin and then forwards to caress Dimas cock. Alexei caresses and squeezes your breasts, pinching your nipples through the fabric.'
 	'Dima rubs your pussy through your clothes. You softly moan with excitement. Then the men begin to undress you. You stand between the two men in just your panties and horny and desiring both of them.'
 	'"Just beautiful. Look Alex, at this lustful bitch I have brought!"'
 	'"Yes, my friend. She will be our whore today. Do you want us to fuck you?" asks Alex.'
 	'"Look how wet this whore is, she''s just waiting for us to fuck her!" Dima roughly pulls aside your panties and thrusts his fingers into your pussy.'
-	gs 'arousal', 'vaginal_finger', 60, 'sub', 'group'
-	gs 'arousal', 'foreplay', 60, 'sub', 'group'
-	minut -= 60
+	gs 'arousal', 'vaginal_finger', 5, 'sub', 'group'
+	gs 'arousal', 'foreplay', 5, 'sub', 'group'
+	minut -= 5
 	gs 'stat'
 	act 'Moan with pleasure':gt 'event', 'dima3'
 end
@@ -206,7 +218,7 @@ if $ARGS[0] = 'dima4':
 	gs 'arousal', 'vaginal_finger', 10, 'sub', 'group', 'rough'
 	gs 'arousal', 'anal_finger', 10, 'sub', 'group', 'rough'
 	gs 'arousal', 'anal', 10, 'sub', 'group', 'rough'
-	minut -= 10
+	minut -= 30
 	gs 'stat'
 	act 'Scream in pain':gt 'event', 'dima5'
 end
@@ -282,14 +294,14 @@ end
 if $ARGS[0] = 'dima8':
 	cls
 	spank += 1
-	minut += 10
+	minut += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/dmitry/sex/dima4.jpg"></center>'
 	'"Please" you beg with tears in your eyes, "I will do whatever you want."'
 	'"You say you will, but this way I will know."'
 	'He puts you doggy-style on the floor and starts beating your ass with the belt, you cry and beg him to stop. Ass burning with pain. Each hit getting more painful.'
 	'"Get up bitch!" he ties your hands with the belt, "suck my dick before bedtime."'
-
+	gs 'pain', 2, 'asscheeks', 'spank'
 	act 'Suck':gt 'event', 'dima9'
 end
 
@@ -298,8 +310,8 @@ if $ARGS[0] = 'dima9':
 	pcs_throat += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/dmitry/sex/dima5.jpg"></center>'
-	'Alex holds your head and starts to fuck your mouth, it does not last very long. His dick is big and goes deep into your throat, he holds your hair. When he has finished, he ties you to a radiator and colapses on the sofa bed.'
-	gs 'arousal', 'bj', 30, 'sub', 'deepthroat', 'rough', 'bound'
+	'Alex holds your head and starts to fuck your mouth, it does not last very long. His dick is big and goes deep into your throat, he holds your hair. When he has finished, he ties you to a radiator and collapses on the sofa bed.'
+	gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough', 'bound'
 	gs 'stat'
 	act 'Cry from the beating':gt 'event', 'dima10'
 end
@@ -372,7 +384,7 @@ end
 
 if $ARGS[0] = 'dima15':
 	cls
-	minut += 30
+	minut += 10
 	runrnd = rand(0, 10)
 
 	gs 'stat'
@@ -407,7 +419,6 @@ end
 
 if $ARGS[0] = 'dima17':
 	cls
-	pcs_dom += 2
 	runrnd = rand(0, 10)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/dmitry/sex/dima6.jpg"></center>'
@@ -434,16 +445,14 @@ end
 
 if $ARGS[0] = 'dima19':
 	clr
-	minut += 5
 	gs 'stat'
-	'Subdued and in shock, you have lost any desire to stand upto these men'
+	'Subdued and in shock, you have lost any desire to stand up to these men'
 
 	act 'Go to them':gt 'event', 'dima20'
 end
 
 if $ARGS[0] = 'dima20':
 	cls
-	minut += 30
 	gs 'stat'
 	'"Well done, bitch. Now that you are well trained, time for your reward"'
 
@@ -459,10 +468,10 @@ if $ARGS[0] = 'dima21':
 	'<center><img <<$set_imgh>> src="images/characters/city/dmitry/sex/dima3.jpg"></center>'
 	'They fuck you for a long time in various poses, some of which would be the envy of the most perverted sexual deviants. After this, they let you go'
 	$orgasm_or = 'yes'
-	gs 'arousal', 'bj', 180, 'sub', 'group', 'deepthroat', 'rough'
-	gs 'arousal', 'vaginal', 180, 'sub', 'group', 'rough'
-	gs 'arousal', 'anal', 180, 'sub', 'group', 'rough'
-	minut -= 180
+	gs 'arousal', 'bj', 40, 'sub', 'group', 'deepthroat', 'rough'
+	gs 'arousal', 'vaginal', 40, 'sub', 'group', 'rough'
+	gs 'arousal', 'anal', 40, 'sub', 'group', 'rough'
+	minut -= 80
 	gs 'arousal', 'end'
 	gs 'stat'
 	act 'Leave':gt 'street'
@@ -506,13 +515,20 @@ if $ARGS[0] = 'dima32':
 	'You look around. While you were unconscious, you were dressed and taken to the street. In your mouth, a metallic taste. Your hands are tied behind your back.'
 	'"And now, bitch, I''ll teach you safe sex".'
 	'With these words, Alex puts you on your knees in front of him, He pulls out his penis and puts it in your mouth.'
-	gs 'arousal', 'bj', 30, 'sub'
+	gs 'arousal', 'bj', 10, 'sub'
 	gs 'stat'
 	act 'Resist':gt 'event', 'dima33'
-
-	If pcs_kick > 50:
-		act 'Kick':gt 'event', 'dima37'
-	end
+	gs 'willpower', 'misc', 'self', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Kick (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			gt 'event', 'dima37'
+		end
+	else
+		act 'Kick (<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] = 'dima33':
 	cla
@@ -533,7 +549,6 @@ if $ARGS[0] = 'dima34':
 	cla
 	clr
 	*clr
-	minut += 30
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/10028_tommypistoljacquelineblacklady_187.jpg"></center>'
 	'Alex realizes, you''re not going to continue humoring him:'
@@ -558,7 +573,7 @@ gs 'cum_manage'
 	'Alex enters you from behind. He grabs your but with both hands and squeezes it tightly, while thrusting vigorously. After a while, you orgasm from the sensation.'
 	'"Much like this morning, only this time no bitting!" Says Alex, further increasing the tempo.'
 	'Suddenly he stops, you are turned around and pushed to your knees. You hit the marble floor hard, and feel something warm hit and then run down your face.'
-	'"Your Stuff is in that box. Hope, You enjoyed the lesson." With these words Alex loosenes the straps on your hands, and you hear him walking away.'
+	'"Your Stuff is in that box. Hope, You enjoyed the lesson." With these words Alex loosens the straps on your hands, and you hear him walking away.'
 	$orgasm_or = 'yes'
 	gs 'arousal', 'vaginal', 30, 'sub', 'rough', 'bound'
 	gs 'stat'
@@ -585,11 +600,11 @@ if $ARGS[0] = 'dima37':
 	money = 0
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik.jpg"></center>'
-	'Those classes at the fitness centre were not in vain. You manage to quickly stand and kick Alexs leg out from under him, he falls and bangs his head, hard.'
+	'Those classes at the fitness center were not in vain. You manage to quickly stand and kick Alexs leg out from under him, he falls and bangs his head, hard.'
 	'You run away, and only when you don''t think you can run any further, stop. You start looking for a way to free your hands and find a sharp stone.'
 	'After some time your hands are free, you remove the gag from your mouth, and finally you are able to close it. You jaw and teeth ache from running while wearing the ring-gag.'
 	'Your dress is trampled and torn in places, but still able to cover your body. You are lost, but after a while find the supermarket, where you met Dima.'
-	'Only then do you realise Alex took all your money.'
+	'Only then do you realize Alex took all your money.'
 
 	act 'Relax':gt 'street'
 end
@@ -606,7 +621,7 @@ if $ARGS[0] = 'dima38':
 	'You nod. Then Alex loosens the ties on your hands and, pointing to the bushes, says:'
 	'"There''s your stuff."'
 	'After Alex leaves, you free your hands, mouth, and find your stuff in the bushes.'
-	gs 'arousal', 'bj', 30, 'sub', 'deepthroat', 'rough', 'bound'
+	gs 'arousal', 'bj', 10, 'sub', 'deepthroat', 'rough', 'bound'
 	gs 'arousal', 'end'
 	gs 'stat'
 	act 'Leave':gt 'street'
@@ -625,13 +640,12 @@ if $ARGS[0] = 'dima39':
 end
 if $ARGS[0] = 'dima40':
 	cls
-	minut += 30
 	pcs_vag += 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/13606_zenzaragginikisweet113.jpg"></center>'
 	'"Good girl", With these words Alex pulls off your dress, His cock is already standing to attention, and he starts fucking you.'
 	'You begin to move rhythmically, but the bus keeps bouncing around, adding new sensations.'
-	gs 'arousal', 'vaginal', 30, 'sub', 'exhibitionism'
+	gs 'arousal', 'vaginal', 10, 'sub', 'exhibitionism'
 	gs 'stat'
 	act 'Change position':gt 'event', 'dima41'
 end
@@ -665,7 +679,7 @@ if $ARGS[0] = 'dima42':
 	'"There''s a good girl", he says "see what you can do, when you try. I don''t think there''s anything more I can teach you!"'
 	'Alex ties your hands and takes you, still naked, to the road. He pushes you to your knees, produces a marker and writes on your stomach "Cum" with an arrow pointing up, and tells you:'
 	'"I''ll be gone for a couple of hours, when I get back, I''ll bring your stuff. You just sit here and show off your skills, like a good little girl!"'
-	gs 'arousal', 'bj', 30, 'sub', 'deepthroat', 'bound'
+	gs 'arousal', 'bj', 10, 'sub', 'deepthroat', 'bound'
 	gs 'stat'
 	act 'Wait for his return':gt 'event', 'dima43'
 	act 'Leave':gt 'event', 'dima44'
@@ -686,7 +700,7 @@ if $ARGS[0] = 'dima43':
 end
 if $ARGS[0] = 'dima44':
 	cls
-	minut += 15
+	minut += 5
 	money = 0
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/13606_zenzaragginikisweet264.jpg"></center>'
@@ -752,10 +766,10 @@ if $ARGS[0] = 'dima47':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/15933_markdavisdonnaannika_494.jpg"></center>'
 	'"That''s wonderful", she says, "I''ll go tell your friend, give you some space so you''re not distracted". With these words, she points to the hole, which already has a new member.'
-	'You dutifully bend down, and begin to service the next stranger. This carrys on. Men erupt, leave and another appears.'
+	'You dutifully bend down, and begin to service the next stranger. This carries on. Men erupt, leave and another appears.'
 	'Lost in your enthusiasm, you don''t hear Alex enter the room.'
-	'The realization that you are not alone in the room hits you just as he forcfully rams his cock into your pusssy.'
-	'You have decide to try not to be distracted, and continue to suck, despite the pounding you are recieving.'
+	'The realization that you are not alone in the room hits you just as he forcefully rams his cock into your pussy.'
+	'You have decide to try not to be distracted, and continue to suck, despite the pounding you are receiving.'
 	'When the man you are serving finishes, you, as before, swallow and are ready to accept the next, but the hole remains empty. It seems you have work off the money Alex had gotten.'
 	'Alex efforts have not gone unnoticed, and soon you shake in orgasm. Almost immediately, He pulls out his penis, and turns your head so that it is jabbing you in the face.'
 	'It is now a reflex action for you to help him to finish. After you cleaned his cock, he leaves the booth.'
@@ -895,7 +909,6 @@ end
 
 if $ARGS[0] = 'scoreslut2':
 	cls
-	SUB += 2
 	minut += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/dmitry/sex/dima6.jpg"></center>'
@@ -906,7 +919,6 @@ end
 
 if $ARGS[0] = 'scoreslut3':
 	cls
-	SUB += 2
 	minut += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/dmitry/sex/dima6.jpg"></center>'

locations/famdorfride.qsrc

@@ -7,7 +7,7 @@ minut += 60
 gs 'stat'
 'When the clock strikes noon, your stepfather goes to get the Volga out of its garage. A few minutes later he arrives at your house and you and your mother get in. You quietly sit in the back of the car, watching the surroundings zip by. After roughly an hour you reach the village of Gadukino, where your grandparents live.'
 
-act 'Enter your grandparents'' house':gt 'Gadhouse'
+act 'Enter your grandparents'' house':gt 'gadhouse', 'start'
 
 --- famdorfride ---------------------------------
 

locations/farmhomeride.qsrc

@@ -5,21 +5,21 @@ onceridePerDay=daystart
 indorf = 0
 if month = 6 or month = 7 or month = 8:
 '<<$npc_nickname[''A29'']>> asks you "Well, <<$pcs_nickname>>, do you want to come home with us or spend summer in the village?"'
-     act'Go home with your parents':
+	 act'Go home with your parents':
 		*clr & cla
 		if hour < 20: hour = 20 & minut = 0
 		minut += 60
 		gs'stat'
-		'You leave the village by the Volga River with your family and an hour later you have returned to Paulovo.'
+		'You leave the village by the Volga River with your family and an hour later you have returned home in Pavlovsk.'
 		act 'Go home': gt'korrPar'
 	end
-	act'Stay in village':gt'Gadhouse'
+	act'Stay in village':gt 'gadhouse', 'start'
 else
 	if hour < 20: hour = 20 & minut = 0
 	gs 'stat'
 	minut += 60
 	gs 'stat'
-	'You leave the village by the Volga River with your family and an hour later you have returned to Paulovo.'
+	'You leave the village by the Volga River with your family and an hour later you have returned home in Pavlovsk.'
 
 	act 'Go home':gt 'korrPar'
 end

locations/fit.qsrc

@@ -453,32 +453,42 @@ if $ARGS[0] = 'exercise end':
 			'You see a nice guy on the weight machine.'
 
 			act 'Continue':gt 'fit', 'dressing room'
+			act 'Flirt':
+				cla
+				*clr
+				guy += 1
+				gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
+				gs 'boyStat', $npclastgenerated
+				samecount = 1
+				picrand = 17
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal2.jpg"></center>'
+				'You go up to the guy lying on the machine, squat and start stroking his cock through his pants. The man rises and kisses you on the lips, then lowers his pants releasing his impressive size dick.'
 
-			if pcs_dom > 0:
-				act 'Flirt':
-					cla
-					*clr
-					guy += 1
-					gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
-					gs 'boyStat', $npclastgenerated
-					samecount = 1
-					picrand = 17
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal2.jpg"></center>'
-					'You go up to the guy lying on the machine, squat and start stroking his cock through his pants. The man rises and kisses you on the lips, then lowers his pants releasing his impressive size dick.'
-
-					gs 'arousal', 'foreplay', 10, 'dom'
-					gs 'stat'
+				gs 'arousal', 'foreplay', 10, 'dom'
+				gs 'stat'
 
-					act 'Suck':gt 'sex', 'minet'
-				end
+				act 'Suck':gt 'sex', 'minet'
 			end
 		elseif RESULT = 1:
 			cla
 			*clr
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal3.jpg"></center>'
 			'As you finish training, a guy sits behind, caresses your breasts and kisses your ear, sucking the lobe.'
-
-			if pcs_dom > 0:act 'Hit him in the balls':pcs_dom += 1 & gt 'fit', 'dressing room'
+			gs 'willpower', 'misc', 'self', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Hit him in the balls (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					gt 'fit', 'dressing room'
+					
+					'Event text'
+					
+					act 'Next action': gt 'farawayistan'
+				end
+			else
+				act 'Hit him in the balls (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
 
 			act 'Enjoy':
 				cla

locations/foto_events.qsrc

@@ -69,18 +69,25 @@ if $ARGS[0] = 'studio_strip_talk1':
 					'"No," the manager replies. "I want to make sure you don''t just walk in and wait till I leave and not change. Take it off here."'
 					act'Do as he says and strip':gt'foto_events','underwear_steal'
 				end
-						
-				act'Plead':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-					'"Oh please!" you cry. "I''m just not ready for this. Maybe we can work something out? Can''t I just do this for a little while to get used to working here? I just need a while to adjust. Please can''t I do that?"'
-					'"Hmmm..." The manager rubs his chin, considering your request. "Okay, I''ll give you two weeks. But after that I expect to see you naked at all times unless you''re doing a shoot. Do you understand?"'
-					'You nod vigorously in response.'
-					'"Okay, good. Remember: Two weeks. Work on it."'
-					'As he walks away you sigh in relief. Two weeks isn''t a lot, but at least you''ll have a bit more time to get used to this whole "being naked" thing.'
-					studio_strip_talk = 1
-					studio_underwear = daystart + 14
-					act'Go back to the main floor':gt'foto','studio'
+				gs 'willpower', 'exhib', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act'Plead (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'exhib', 'resist', 'hard'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+						'"Oh please!" you cry. "I''m just not ready for this. Maybe we can work something out? Can''t I just do this for a little while to get used to working here? I just need a while to adjust. Please can''t I do that?"'
+						'"Hmmm..." The manager rubs his chin, considering your request. "Okay, I''ll give you two weeks. But after that I expect to see you naked at all times unless you''re doing a shoot. Do you understand?"'
+						'You nod vigorously in response.'
+						'"Okay, good. Remember: Two weeks. Work on it."'
+						'As he walks away you sigh in relief. Two weeks isn''t a lot, but at least you''ll have a bit more time to get used to this whole "being naked" thing.'
+						studio_strip_talk = 1
+						studio_underwear = daystart + 14
+						act'Go back to the main floor':gt'foto','studio'
+					end
+				else
+					act'Plead (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 			end
 		end
@@ -91,29 +98,34 @@ if $ARGS[0] = 'studio_strip_talk2':
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 	'You step out into the studio and you hear someone calling your name.'
-	'"Hey! <<$pcs_firstname>>! It''s been two weeks, what are you still doing your underwear? We had a deal, now take that off. Right now!"'
+	'"Hey! <<$pcs_firstname>>! It''s been two weeks, what are you still doing in your underwear? We had a deal, now take that off. Right now!"'
 	act'Do as he says and strip':gt'foto_events','underwear_steal'
 	if pcs_inhib < 30:
-		act'Try to bargain again':
-			studio_strip_talk = 2
-			studio_underwear = daystart + 7
-			cla & *clr
-			if $braworntype ! 'none':
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-				'"No! Please!"  you cry. "I''m still not ready! I need more time! What if I just keep my panties for a little longer? Just go topless instead of full nude?"'
-				'The manager looks at your already breasts with obvious confusion and resist the urge to cover them up with your hands with great difficulty.'
-				'"But you''re already topless."'
-				'"Exactly!" you say, trying to cover yourself with excuses. "I, uhh, purposely didn''t wear a bra today. I''m still not ready but I took the initiative to help myself get more used to it. That has to count for something right?"'
-			else
-				'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip1.mp4"><center>'
-				'"No! Please!"  you cry. "I''m still not ready! I need more time! What if I just keep my panties for a little longer? Just go topless instead of full nude?"'
-				gs'bras','remove'
-				gs'stat'
-				'In your desperation, you throw off your bra as fast as you can. You don''t feel confident enough to be doing this but even this is better than having to take off your panties and show your pussy too. Once your bra is on the floor, the manager glances up and down, back and forth between your breasts and your increasingly red face.'
+		gs 'willpower', 'exhib', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act'Try to bargain again (<<will_cost>> Willpower)':
+				studio_strip_talk = 2
+				studio_underwear = daystart + 7
+				cla & *clr
+				if $braworntype ! 'none':
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+					'"No! Please!"  you cry. "I''m still not ready! I need more time! What if I just keep my panties for a little longer? Just go topless instead of full nude?"'
+					'The manager looks at your already breasts with obvious confusion and resist the urge to cover them up with your hands with great difficulty.'
+					'"But you''re already topless."'
+					'"Exactly!" you say, trying to cover yourself with excuses. "I, uhh, purposely didn''t wear a bra today. I''m still not ready but I took the initiative to help myself get more used to it. That has to count for something right?"'
+				else
+					'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip1.mp4"><center>'
+					'"No! Please!"  you cry. "I''m still not ready! I need more time! What if I just keep my panties for a little longer? Just go topless instead of full nude?"'
+					gs'bras','remove'
+					gs'stat'
+					'In your desperation, you throw off your bra as fast as you can. You don''t feel confident enough to be doing this but even this is better than having to take off your panties and show your pussy too. Once your bra is on the floor, the manager glances up and down, back and forth between your breasts and your increasingly red face.'
+				end
+				'"Fine, fine," he grumbles. "I''ll give you one more week. But that''s it! At the end of this week I expect those panties to come off! Now get to work!"'
+				'The manager turns around and walks away and you heave a sigh of relief at his departure. It''s not exactly what you want, but you still have one more week now...'
+				act'Go back to the main floor':gt'foto','studio'
 			end
-			'"Fine, fine," he grumbles. "I''ll give you one more week. But that''s it! At the end of this week I expect those panties to come off! Now get to work!"'
-			'The manager turns around and walks away and you heave a sigh of relief at his departure. It''s not exactly what you want, but you still have one more week now...'
-			act'Go back to the main floor':gt'foto','studio'
+		else
+			act'Try to bargain again (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
@@ -352,85 +364,109 @@ if $ARGS[0] = 'fine_art':
 				'At the same time, you can''t help but think to yourself, <i>Really? He''s still soft after all this? I mean, damn! Kind of makes me feel bad about myself to be honest... Am I not hot enough to get a guy hard when his dick is practically rubbing up against my pussy?</i>'
 				'"No!"'
 				'The woman''s shout snaps you back to attention, wondering what is wrong. "Zis is not good enough! Not passionate enough! I cannot produce mah mazterpiece like zis! I shall require full penetration! Alexhandar! Please put your penis inside her."'
-				act'What?!':
-					cla & *clr
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-					'"What?!" you shriek.'
-					'At the woman''s command, you feel the man''s cock immediately stiffen, going from flaccid to rock hard and rubbing against your abdomen in two seconds flat. He starts to pull back and you feel his tip scraping backwards over the top of your stomach.'
-					act'Wait! Wait! Wait!':
-						cla
-						*nl
-						'"Wait! Wait! Wait!" you shout. Alexander pauses behind you, the tip of his member poised, hovering, right in front of the entrance to your pussy.'
-						'Hands on her hips, the woman leans forward, frowning at you with obvious displeasure.'
-						'"Vell? Vhat are we waiting for?"'
-						'"You can''t do this!"'
-						'"And vhy not?"'
-						if stat['vaginal'] = 0:
-							act'I''m a virgin!':
-								cla & *clr
-								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-								'"I''m a virgin! I''ve never had sex before! I can''t lose my virginity like this to some guy I''ve never met before in the middle of some modelling job!"'
-								'The woman''s eyes widen as you say this.'
-								'"You are a... virgin?" she asks, slowly'
-								'"Yes! You understand now, right?"'
-								'The woman begins laughing and jumping up and down with excitement. You stare at her in confusion, your mouth agape.'
-								'"Yez! Yez! A virgin! That''s what this piece was truly missing! Vhy did I not think of zis before? Yez! Zis is the key to my mazterpiece! I shall call it, ''Ze Final Flowher.'' No, vait, perhaps, ''Torn Petal.'' It iz perfhect!"'
-								act'Yell at her':
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'What?! (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'sex', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+						'"What?!" you shriek.'
+						'At the woman''s command, you feel the man''s cock immediately stiffen, going from flaccid to rock hard and rubbing against your abdomen in two seconds flat. He starts to pull back and you feel his tip scraping backwards over the top of your stomach.'
+						act'Wait! Wait! Wait!':
+							cla
+							*nl
+							'"Wait! Wait! Wait!" you shout. Alexander pauses behind you, the tip of his member poised, hovering, right in front of the entrance to your pussy.'
+							'Hands on her hips, the woman leans forward, frowning at you with obvious displeasure.'
+							'"Vell? Vhat are we waiting for?"'
+							'"You can''t do this!"'
+							'"And vhy not?"'
+							if stat['vaginal'] = 0:
+								act'I''m a virgin!':
 									cla & *clr
 									'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-									'"Hey! ... HEY!!" you yell at her.'
-									'She stops her maniacal laughing and finally looks back at you.'
-									'"That''s not the point! The point is that I don''t want to lose my virginity right now!" The woman frowns at you, this time with disappointment.'
-									'"And vhy not? Iz it becauze you have not found ze right man? Not to worry, Alexhandar iz great man. I know. He iz my zon. Zatisfies many girls. He vill-"'
-									'"NOOOO!!!" you yell at her again to stop her ranting. "I''m saying I don''t want to lose my virginity right now and in this way! Besides, I didn''t sign up for this! I thought I was just supposed to be posing as an art model, WITHOUT HAVING SEX WITH ANYONE!" you scream the last part, anticipating her objection that you can still be posing with a dick up your ass.'
-									'She stares at you flatly. "Okay, how about zis? I vill pay you an extra 30,000 <b>₽</b> on top of ze already agreed upon fee if you do zis for me. Not an inzignificant amount of money, but we muzt make zacrifices for great art! I vill zacrifice my money to you, if you zacrifice your virginity for me. Do ve have a deal?"'
-									act'No, I''m not losing my virginity':
-										cla & *clr
-										fine_art_deal = 3
-										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-										'"No," you say, standing firm. "I''m not about to lose my virginity just for a modelling job. You''ll have to make do with that, or get another model who''s willing to <b>whore herself</b> out for your art."'
-										'"Ugh," she rolls her eyes and waves her hand dismissively. "Vine, vine. I vill not take your virginity. Ve are vasting too much time. But Alexhandar, maintain your erection. I cannot have a flaccid penis in a piece that iz zat iz zupposed to exude <i>lust</i> and <i>eroticism!</i>"'
-										'You breathe out a sigh of relief and resume the pose she wants, waiting for further instruction.'
-										act'Continue':gt'foto_events','fine_art2'
+									'"I''m a virgin! I''ve never had sex before! I can''t lose my virginity like this to some guy I''ve never met before in the middle of some modelling job!"'
+									'The woman''s eyes widen as you say this.'
+									'"You are a... virgin?" she asks, slowly'
+									'"Yes! You understand now, right?"'
+									'The woman begins laughing and jumping up and down with excitement. You stare at her in confusion, your mouth agape.'
+									'"Yez! Yez! A virgin! That''s what this piece was truly missing! Vhy did I not think of zis before? Yez! Zis is the key to my mazterpiece! I shall call it, ''Ze Final Flowher.'' No, vait, perhaps, ''Torn Petal.'' It iz perfhect!"'
+									gs 'willpower', 'sex', 'resist'
+									if will_cost <= pcs_willpwr:
+										act'Yell at her (<<will_cost>> Willpower)':
+											cla & *clr
+											gs 'willpower', 'sex', 'resist'
+											gs 'willpower', 'pay', 'resist'
+											gs 'stat'
+											'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+											'"Hey! ... HEY!!" you yell at her.'
+											'She stops her maniacal laughing and finally looks back at you.'
+											'"That''s not the point! The point is that I don''t want to lose my virginity right now!" The woman frowns at you, this time with disappointment.'
+											'"And vhy not? Iz it becauze you have not found ze right man? Not to worry, Alexhandar iz great man. I know. He iz my zon. Zatisfies many girls. He vill-"'
+											'"NOOOO!!!" you yell at her again to stop her ranting. "I''m saying I don''t want to lose my virginity right now and in this way! Besides, I didn''t sign up for this! I thought I was just supposed to be posing as an art model, WITHOUT HAVING SEX WITH ANYONE!" you scream the last part, anticipating her objection that you can still be posing with a dick up your ass.'
+											'She stares at you flatly. "Okay, how about zis? I vill pay you an extra 30,000 <b>₽</b> on top of ze already agreed upon fee if you do zis for me. Not an inzignificant amount of money, but we muzt make zacrifices for great art! I vill zacrifice my money to you, if you zacrifice your virginity for me. Do ve have a deal?"'
+											gs 'willpower', 'sex', 'resist', 'hard'
+											if will_cost <= pcs_willpwr:
+												act'No, I''m not losing my virginity (<<will_cost>> Willpower)':
+													cla & *clr
+													gs 'willpower', 'sex', 'resist', 'hard'
+													gs 'willpower', 'pay', 'resist'
+													gs 'stat'
+													fine_art_deal = 3
+													'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+													'"No," you say, standing firm. "I''m not about to lose my virginity just for a modelling job. You''ll have to make do with that, or get another model who''s willing to <b>whore herself</b> out for your art."'
+													'"Ugh," she rolls her eyes and waves her hand dismissively. "Vine, vine. I vill not take your virginity. Ve are vasting too much time. But Alexhandar, maintain your erection. I cannot have a flaccid penis in a piece that iz zat iz zupposed to exude <i>lust</i> and <i>eroticism!</i>"'
+													'You breathe out a sigh of relief and resume the pose she wants, waiting for further instruction.'
+													act'Continue':gt'foto_events','fine_art2'
+												end
+											else
+												act'No, I''m not losing my virginity (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+											end
+											act'Take the deal':
+												cla & *clr
+												fine_art_deal = 1
+												'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+												'You gulp. 30,000<b>₽</b>... That''s a lot of money...'
+												'"I''ll take the deal."'
+												'The woman grins widely.'
+												'"Exzellent." She pulls you back into the posture she wants you in, and giving you new instructions, Alexander''s cock still hovering outside your entrance. "Do not hide your feelingz. Let them bubble to ze top. Let your emotions be vizible and zelf-evident. But maintain ze posture and hold still, or ze 3D scanner vill not capture you accurately. You vill not be paid if I do not get vhat I am here for. Do you underztand?"'
+												'You nod, swallowing one more time. The woman moves off to the side, and making sure all the equipment is set, she picks up a small device. Some kind of remote camera switch, you guess.'
+												'"And... now!"'
+												act'"AHH!!"':gt'foto_events','fine_art2'
+											end
+										end
+									else
+										act'Yell at her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 									end
-									act'Take the deal':
+
+									act'Resign yourself to your fate':
+										fine_art_deal = 2
 										cla & *clr
-										fine_art_deal = 1
-										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-										'You gulp. 30,000<b>₽</b>... That''s a lot of money...'
-										'"I''ll take the deal."'
-										'The woman grins widely.'
-										'"Exzellent." She pulls you back into the posture she wants you in, and giving you new instructions, Alexander''s cock still hovering outside your entrance. "Do not hide your feelingz. Let them bubble to ze top. Let your emotions be vizible and zelf-evident. But maintain ze posture and hold still, or ze 3D scanner vill not capture you accurately. You vill not be paid if I do not get vhat I am here for. Do you underztand?"'
-										'You nod, swallowing one more time. The woman moves off to the side, and making sure all the equipment is set, she picks up a small device. Some kind of remote camera switch, you guess.'
-										'"And... now!"'
+										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/art1.jpg"></center>'
+										'You look on in horror with the realization that there is nothing you can do to convince this woman to change her mind. Her obsession with art is too great.'
+										'She excitedly shouts instructions at you and her assistant.'
+										'"Do not hide your feelingz! Let them bubble to ze top! Let your emotions be vizible and zelf-evident! But maintain ze posture and hold still, or ze 3D scanner vill not capture you accurately. Are ve ready? Good! Do it! Do it now Alexhandar!"'
+										'And he thrusts his cock inside you.'
 										act'"AHH!!"':gt'foto_events','fine_art2'
 									end
 								end
-
-								act'Resign yourself to your fate':
-									fine_art_deal = 2
-									cla & *clr
-									'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/art1.jpg"></center>'
-									'You look on in horror with the realization that there is nothing you can do to convince this woman to change her mind. Her obsession with art is too great.'
-									'She excitedly shouts instructions at you and her assistant.'
-									'"Do not hide your feelingz! Let them bubble to ze top! Let your emotions be vizible and zelf-evident! But maintain ze posture and hold still, or ze 3D scanner vill not capture you accurately. Are ve ready? Good! Do it! Do it now Alexhandar!"'
-									'And he thrusts his cock inside you.'
-									act'"AHH!!"':gt'foto_events','fine_art2'
-								end
 							end
-						end
-						act'I''m not about to get fucked just because you asked':
-							cla & *clr
-							fine_art_deal = 3
-							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-							'"Because I''m not about to let some guy shove his dick in me just because you told him to!"'
-							'The woman sniffs in indignation. "He iz not just ''zome man.'' He iz my zon. Very good man."'
-							'"I don''t care who he is, he''s not putting his dick inside me! Either deal with that or get yourself a new model."'
-							'"Ugh," she rolls her eyes and waves her hand dismissively. "Vine, vine. Ve are vasting too much time. But Alexhandar, maintain your erection. I cannot have a flaccid penis in a piece that iz zat iz zupposed to exude <i>lust</i> and <i><eroticism!</i>"'
-							'You huff in annoyance, but the matter resolved, you resume the pose she wants and wait for further instruction.'
-							act'Continue':gt'foto_events','fine_art2'
+							act'I''m not about to get fucked just because you asked':
+								cla & *clr
+								fine_art_deal = 3
+								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
+								'"Because I''m not about to let some guy shove his dick in me just because you told him to!"'
+								'The woman sniffs in indignation. "He iz not just ''zome man.'' He iz my zon. Very good man."'
+								'"I don''t care who he is, he''s not putting his dick inside me! Either deal with that or get yourself a new model."'
+								'"Ugh," she rolls her eyes and waves her hand dismissively. "Vine, vine. Ve are vasting too much time. But Alexhandar, maintain your erection. I cannot have a flaccid penis in a piece that iz zat iz zupposed to exude <i>lust</i> and <i><eroticism!</i>"'
+								'You huff in annoyance, but the matter resolved, you resume the pose she wants and wait for further instruction.'
+								act'Continue':gt'foto_events','fine_art2'
+							end
 						end
 					end
+				else
+					act'What?! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 				if pcs_vag > 0:
 					act'Say nothing, do as instructed':
@@ -518,19 +554,19 @@ if $ARGS[0] = 'fine_art2':
 		minut += 90
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/art1.jpg"></center>'
 		if pcs_vag <= 10:
-			'Alexander pushes himself inside you. You can''t help but release a small grunt of discomfort as his 32 cm cock stretches your <<$pcdesc_pussy>> pussy. It takes a few tries to get his exceptional length and girth all the way inside before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
+			'Alexander pushes himself inside you. You can''t help but release a small grunt of discomfort as his 34 cm cock stretches your <<$pcdesc_pussy>> pussy. It takes a few tries to get his exceptional length and girth all the way inside before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
 			*nl
 			'90 minutes pass before she is finished sketching, your pussy more than a little bit uncomfortable from being overstuffed with Alexander''s enormous cock. When she is finished, she compares her sketch to a nearby computer screen, still trying to decide which form she wants her art to take. Clapping her hands, she calls an end to the shoot and you are allowed to break from your position, stretching your stiff muscles and sliding off of Alexander''s cock. Its absence leaves you feeling quite empty.'
 		elseif pcs_vag > 10 and pcs_vag <= 15:
-			'Alexander pushes himself inside you. You exhale slowly, relaxing to accommodate the enormous 32 cm cock sliding your <<$pcdesc_pussy>> pussy. You give yourself a moment to adjust to his sizable length and girth before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
+			'Alexander pushes himself inside you. You exhale slowly, relaxing to accommodate the enormous 34 cm cock sliding your <<$pcdesc_pussy>> pussy. You give yourself a moment to adjust to his sizable length and girth before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
 			*nl
 			'90 minutes pass before she is finished sketching, your pussy snuggly filled by Alexander''s cock for the duration. When she is finished, she compares her sketch to a nearby computer screen, still trying to decide which form she wants her art to take. Clapping her hands, she calls an end to the shoot and you are allowed to break from your position, stretching your stiff muscles and sliding off of Alexander''s cock. Its absence leaves you feeling quite empty.'
 		elseif pcs_vag > 15 and pcs_vag <= 25:
-			'Alexander pushes himself inside you. You relax, letting the enormous 32 cm cock slide into your <<$pcdesc_pussy>> pussy with relative ease. You check your position, making sure you can feel his balls against your clit and that he''s all the way inside before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
+			'Alexander pushes himself inside you. You relax, letting the enormous 34 cm cock slide into your <<$pcdesc_pussy>> pussy with relative ease. You check your position, making sure you can feel his balls against your clit and that he''s all the way inside before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
 			*nl
 			'90 minutes pass before she is finished sketching, your pussy comfortably filled by Alexander''s cock for the duration. When she is finished, she compares her sketch to a nearby computer screen, still trying to decide which form she wants her art to take. Clapping her hands, she calls an end to the shoot and you are allowed to break from your position, stretching your stiff muscles and sliding off of Alexander''s cock. Its absence leaves you feeling quite empty.'
 		else
-			'Alexander pushes himself inside you. His enormous 32 cm cock slides into you easily, your <<$pcdesc_pussy>> pussy readily stretching to accommodate his sizable length and girth. You check your position, making sure you can feel his balls against your clit and that he''s all the way inside before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
+			'Alexander pushes himself inside you. His enormous 34 cm cock slides into you easily, your <<$pcdesc_pussy>> pussy readily stretching to accommodate his sizable length and girth. You check your position, making sure you can feel his balls against your clit and that he''s all the way inside before settling back into the exact posture you were instructed to hold. The woman clicks a button and cameras flash all around you and the red line of scanners begin to slowly ascend your body from bottom to top. As the scanner moves, you see her sit down in front of an easel from the corner of your eye and begin to draw.'
 			*nl
 			'90 minutes pass before she is finished sketching, your pussy satisfyingly filled by Alexander''s cock for the duration. When she is finished, she compares her sketch to a nearby computer screen, still trying to decide which form she wants her art to take. Clapping her hands, she calls an end to the shoot and you are allowed to break from your position, stretching your stiff muscles and sliding off of Alexander''s cock. Its absence leaves you feeling quite empty.'
 		end
@@ -713,12 +749,20 @@ if $ARGS[0] = 'topless1':
 				'"Special offer? Like another commercial?"'
 				'"No, no. Not quite like that. We''ve been getting a lot of positive feedback about your work. One of the higher ups in the company asked us to put out a special issue that features exclusively you if you''re up for it. We wanted to do something special so the plan is to do it outside the studio in a place with more natural light. It''ll just be a topless shoot and will take a bit longer than usual to get there and set up, but we''ll pay you for it in addition to your normal once a week contract. What do you say? Are you in?"'
 				if first_fame_event = 0:first_fame_event = 1
-				act'"No thanks"':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-					'"Thanks for the offer but I''m happy just doing what I''m doing if that''s alright."'
-					'"That''s a shame. Well, maybe some other time then. I''ll tell the producer you said no."'
-					act'Back to the studio':gt'foto','studio'
+				gs 'willpower', 'exhib', 'resist', 'easy'
+				if will_cost <= pcs_willpwr:
+					act'"No thanks" (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'exhib', 'resist', 'easy'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+						'"Thanks for the offer but I''m happy just doing what I''m doing if that''s alright."'
+						'"That''s a shame. Well, maybe some other time then. I''ll tell the producer you said no."'
+						act'Back to the studio':gt'foto','studio'
+					end
+				else
+					act '"No thanks" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 
 				act'"Yeah! Let''s do it!"':
@@ -732,12 +776,20 @@ if $ARGS[0] = 'topless1':
 			else
 				'"What kind of offer?"'
 				'We''ve been getting a lot of positive feedback from subscribers about your work so a producer asked us to put out a special issue that features exclusively you. We wanted to do something special so the plan is to do it outside the studio in a place with more natural light. It''ll just be a topless shoot and will take a bit longer than usual to get there and set up, but we''ll pay you for it in addition to your normal once a week contract. What do you say? Are you in?"'
-				act'"No thanks"':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-					'"Thanks for the offer but I''m happy just doing what I''m doing if that''s alright."'
-					'"That''s a shame. Well, maybe some other time then. I''ll tell the producer you said no."'
-					act'Back to the studio':gt'foto','studio'
+				gs 'willpower', 'exhib', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'"No thanks" (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'exhib', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+						'"Thanks for the offer but I''m happy just doing what I''m doing if that''s alright."'
+						'"That''s a shame. Well, maybe some other time then. I''ll tell the producer you said no."'
+						act'Back to the studio':gt'foto','studio'
+					end
+				else
+					act '"No thanks" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 
 				act'"Yeah! Let''s do it!"':
@@ -844,21 +896,37 @@ if $ARGS[0] = 'pool1':
 			if city_modelling < 200:'"A nude pool shoot with you and a few of the other name girls we have here. You''ll all have equal part in it but you''ll all also get your own exclusive sections within the spread. This won''t count as your weekly shoot so you''ll get paid for it and it''s sure to give you a bump of fame as well. How about it?"'
 			if city_modelling >= 200:'"A nude pool shoot with you and a few rising girls. We''re hoping that the people who read the issue for you will help get exposure to these other girls, increase their profile. Even so, it''ll still be good publicity for you too. You''ve been working with us long enough that you know the drill and you''ll get paid for this. Are you in?"'
 			if city_modelling < 100:
-				act'"I''m not interested in getting famous"':
+				gs 'willpower', 'exhib', 'resist', 'easy'
+				if will_cost <= pcs_willpwr:
+					act'"I''m not interested in getting famous" (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'exhib', 'resist', 'easy'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+						'"Thanks for the offer but I''m not that interested in getting famous. I''m really only in this for the money and I don''t want my name being spread around too much."'
+						'"Okay. I understand. Maybe next time."'
+						act'Back to the studio':gt'foto','studio'
+					end
+				else
+					act'"I''m not interested in getting famous" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			end
+			
+			gs 'willpower', 'exhib', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'"Sorry, I had other plans" (<<will_cost>> Willpower)':
 					*clr & cla
+					gs 'willpower', 'exhib', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-					'"Thanks for the offer but I''m not that interested in getting famous. I''m really only in this for the money and I don''t want my name being spread around too much."'
-					'"Okay. I understand. Maybe next time."'
+					'"Sorry, I was planning to do some other kinds of shoots today. I just don''t want to today. Maybe next time?"'
+					'"Okay, I understand. Maybe next time."'
 					act'Back to the studio':gt'foto','studio'
 				end
-			end
-
-			act'"Sorry, I had other plans"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"Sorry, I was planning to do some other kinds of shoots today. I just don''t want to today. Maybe next time?"'
-				'"Okay, I understand. Maybe next time."'
-				act'Back to the studio':gt'foto','studio'
+			else
+				act'"Sorry, I had other plans" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act'"I''d be happy to help"':
@@ -922,23 +990,40 @@ if $ARGS[0] = 'tennis':
 			if city_modelling < 100:'"What would I be doing? What sport?"'
 			if city_modelling < 100:'"Tennis. We''re doing a bit of video for this shoot and you''d be doing tennis swings in slow motion. The thing is, we really do want someone who looks like they know what they''re doing, so that''s why we''d like to have you over someone else. Think you''re up for it? I think it would really increase your exposure and your profile."'
 			if city_modelling >= 100:'"You like tennis right? Some other magazines were talking about how much you liked the sport so we thought it''d be good put out some special material featuring you doing some tennis swings. We''re talking photography and video here. We think it''d be good publicity for you. What do you think? Want to do it?"'
-
-			act'"I''m not actually that into tennis..."':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"I''m not actually that into tennis... I wouldn''t really feel comfortable doing this."'
-				'"Oh. Okay. Our mistake. Maybe we can do something else today."'
-				'"Yeah. Maybe something else," you say as you walk into the main part of the studio with him.'
-				act'Back to the studio':gt'foto','studio'
+			if city_modelling < 100:
+				gs 'willpower', 'exhib', 'resist', 'easy'
+				if will_cost <= pcs_willpwr:
+					act'"I''m not actually that into tennis..." (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'exhib', 'resist', 'easy'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+						'"I''m not actually that into tennis... I wouldn''t really feel comfortable doing this."'
+						'"Oh. Okay. Our mistake. Maybe we can do something else today."'
+						'"Yeah. Maybe something else," you say as you walk into the main part of the studio with him.'
+						act'Back to the studio':gt'foto','studio'
+					end
+				else
+					act'"I''m not actually that into tennis..." (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
-
-			act'"Not today"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"Sorry, but I don''t really want to do this today. I know you have to get the issue out so we can''t really postpone it but maybe next issue?"'
-				'"Yeah... Maybe next issue..."'
-				'He seems really disappointed. You honestly feel kind of bad about it.'
-				act'Back to the studio':gt'foto','studio'
+			
+			gs 'willpower', 'exhib', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'"Not today" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'exhib', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"Sorry, but I don''t really want to do this today. I know you have to get the issue out so we can''t really postpone it but maybe next issue?"'
+					'"Yeah... Maybe next issue..."'
+					'He seems really disappointed. You honestly feel kind of bad about it.'
+					act'Back to the studio':gt'foto','studio'
+				end
+			else
+				act'"I''m not interested in getting famous" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act'"Sure, that sounds like fun"':
@@ -1000,13 +1085,22 @@ if $ARGS[0] = 'topless2':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"You''ve been doing well around here lately. We were going to do a sunny penthouse topless pool shoot off site. Wanted to know if you wanted to be our girl and get paid for an job this week? It''ll take an extra hour though so if you''re busy we can always grab one of the other girls. How ''bout it? You want in?"'
-			act'"No thanks"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"Thanks for the offer but I''m happy with my schedule for today. You can ask one of the other girls."'
-				'"Alright, I''ll see you around <<$pcs_firstname>>."'
-				'You wave goodbye as he goes off to find another girl.'
-				act'Back to the studio':gt'foto','studio'
+			
+			gs 'willpower', 'exhib', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'"No thanks" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'exhib', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"Thanks for the offer but I''m happy with my schedule for today. You can ask one of the other girls."'
+					'"Alright, I''ll see you around <<$pcs_firstname>>."'
+					'You wave goodbye as he goes off to find another girl.'
+					act'Back to the studio':gt'foto','studio'
+				end
+			else
+				act'"No thanks" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act'"Sure, why not?"':
@@ -1066,13 +1160,22 @@ if $ARGS[0] = 'beach2':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Hey <<$pcs_firstname>>, Looking to get an extra job in this week? We were planning on doing a topless beach shoot today. It''s a five hour job if you include the travel time but we''ll pay you extra on top of what you''d normally get as a bit of compensation. So, do you want it?'
-			act'"No thanks"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"Thanks for the offer but I''m happy with my schedule for today. Five hours <i>is</i> kind of a long time."'
-				'"Yeah, it''s fine. Maybe next time."'
-				'You wave goodbye as he goes off to find another girl.'
-				act'Back to the studio':gt'foto','studio'
+
+			gs 'willpower', 'exhib', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'"No thanks" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'exhib', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"Thanks for the offer but I''m happy with my schedule for today. Five hours <i>is</i> kind of a long time."'
+					'"Yeah, it''s fine. Maybe next time."'
+					'You wave goodbye as he goes off to find another girl.'
+					act'Back to the studio':gt'foto','studio'
+				end
+			else
+				act'"No thanks" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act'"Sure, sounds fun!"':
@@ -1142,13 +1245,22 @@ if $ARGS[0] = 'pool2':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			'"Hey <<$pcs_firstname>>, we were thinking about doing a topless pool shoot. It''s offsite so it''ll be an extra hour or two but it''s also an extra payday if you want it. So? Do you want it?'
-			act'"No thanks"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"Thanks for the offer but I''m happy with my schedule for today. Maybe next time."'
-				'"Yeah, it''s fine. I''ll go ask Katherine. She''s usually likes pool shoots."'
-				'You point him in the direction of the last place you saw her.'
-				act'Back to the studio':gt'foto','studio'
+
+			gs 'willpower', 'exhib', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'"No thanks" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'exhib', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"Thanks for the offer but I''m happy with my schedule for today. Maybe next time."'
+					'"Yeah, it''s fine. I''ll go ask Katherine. She''s usually likes pool shoots."'
+					'You point him in the direction of the last place you saw her.'
+					act'Back to the studio':gt'foto','studio'
+				end
+			else
+				act'"No thanks" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act'"Sure"':
@@ -1205,22 +1317,39 @@ if $ARGS[0] = 'runway2':
 			'Hey <<$pcs_firstname>>, listen. We have an emergency situation and we''re looking for whoever is available. A clothing company we sometimes shoot for is having a fashion show tonight but for some reason something''s gone wrong and they''re missing models."'
 			'"Missing models?" you gasp. "You mean like they''ve disappeared or something?"'
 			'He looks confused for a second and says, "What? No! Just for whatever reason, they don''t have enough models for tonight. I don''t know if it''s because some of them got sick or had an accident or if they just planned poorly and were supposed to have more than they hired. In any case, we need people to jump in tonight. It''s going to be an all day thing though. We can''t have anymore hiccups so if you agree you''ll have to stay here until the show starts and then the show itself runs until 22:00 tonight. We know it''s a big commitment so if you do we''re willing to shell out a ton of money to make this work. We''re talking a three grand bonus on top of your normal variety shoot rate. Can we count on you for tonight?"'
-			act'"I''m sorry, I can''t, I had plans for today"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"I''m really sorry but I have to say no. I had important plans for today and I can''t miss it. I''m <i>really</i> sorry!"'
-				'"Yeah, yeah, it''s fine, whatever," he says a bit more harshly than he needed to but you understand he''s under a lot of stress right now so you let it pass. At that moment, Anasasia passes by and the photographer''s attention is immediately diverted. "Anastasia! We need you! It''s an emergency!"'
-				'"Of course darling! What do you need?" As they frantically chatter away, you leave them be and go back to the main studio.'
-				act'Back to the studio':gt'foto','studio'
+
+			gs 'willpower', 'exhib', 'resist', 'easy'
+			if will_cost <= pcs_willpwr:
+				act'"I''m sorry, I can''t be out that late" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'exhib', 'resist', 'easy'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"I''m really sorry but I have to say no. I can''t be out that late or my <<$npc_nickname[''A29'']>>- er, for, uhh... reasons...."'
+					'"Yeah, yeah, it''s fine, whatever," he says a bit more harshly than he needed to but you understand he''s under a lot of stress right now so you let it pass. At that moment, Anasasia passes by and the photographer''s attention is immediately diverted. "Anastasia! We need you! It''s an emergency!"'
+					'"Of course darling! What do you need?" As they frantically chatter away, you leave them be and go back to the main studio.'
+					act'Back to the studio':gt'foto','studio'
+				end
+			else
+				act'"I''m sorry, I can''t be out that late" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
-			act'"I''m sorry, I can''t be out that late"':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-				'"I''m really sorry but I have to say no. I can''t be out that late or my <<$npc_nickname[''A29'']>>- er, for, uhh... reasons...."'
-				'"Yeah, yeah, it''s fine, whatever," he says a bit more harshly than he needed to but you understand he''s under a lot of stress right now so you let it pass. At that moment, Anasasia passes by and the photographer''s attention is immediately diverted. "Anastasia! We need you! It''s an emergency!"'
-				'"Of course darling! What do you need?" As they frantically chatter away, you leave them be and go back to the main studio.'
-				act'Back to the studio':gt'foto','studio'
+			gs 'willpower', 'exhib', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'"I''m sorry, I can''t, I had plans for today" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'exhib', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+					'"I''m really sorry but I have to say no. I had important plans for today and I can''t miss it. I''m <i>really</i> sorry!"'
+					'"Yeah, yeah, it''s fine, whatever," he says a bit more harshly than he needed to but you understand he''s under a lot of stress right now so you let it pass. At that moment, Anasasia passes by and the photographer''s attention is immediately diverted. "Anastasia! We need you! It''s an emergency!"'
+					'"Of course darling! What do you need?" As they frantically chatter away, you leave them be and go back to the main studio.'
+					act'Back to the studio':gt'foto','studio'
+				end
+			else
+				act'"I''m sorry, I can''t, I had plans for today" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 
 			act'"Yes! Of course!"':
@@ -1294,12 +1423,21 @@ if $ARGS[0] = 'wet':
 				*clr & cla
 				'"And the shoot is...?"  you ask leadingly.'
 				'He looks awkward like he doesn''t know what to say for a moment until he finally explains, "Well, it''s a shoot here in the studio but we need you to be wet for it. So we''re going to need you to get on set naked and then we''ll take a hose and spray you for the duration of the shoot. Most girls say no when we tell them what we''re going to do because they find it unpleasent. So? How about it? We''ll pay you for it and it won''t count as your weekly job."'
-				act'"Thanks but no thanks"':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
-					'"Thanks but no thanks. I don''t want to get sprayed with a hose for two hours just for some extra money."'
-					'"Yeah..." he sighs. "That''s what I thought you''d say. Dammit! Why won''t any of the girls agree to this anymore?!"'
-					act'Back to the studio':gt'foto','studio'
+				
+				gs 'willpower', 'exhib', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'"Thanks but no thanks" (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'exhib', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+						'"Thanks but no thanks. I don''t want to get sprayed with a hose for two hours just for some extra money."'
+						'"Yeah..." he sighs. "That''s what I thought you''d say. Dammit! Why won''t any of the girls agree to this anymore?!"'
+						act'Back to the studio':gt'foto','studio'
+					end
+				else
+					act'"Thanks but no thanks" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 
 				act'"Sure! Why not?"':

locations/foto_models.qsrc

@@ -145,7 +145,7 @@ if $ARGS[0] = 'mari_1':
 					cla
 					*clr
 					'<center><img src="images/locations/city/citycenter/photo/portraits/mari_e/meeting/4a.jpg"></center>'
-					'"You''re from Gadukino?" you exclaim. "My grandparents live in Gadukino! I''m from Pavlovsky right down the road!"'
+					'"You''re from Gadukino?" you exclaim. "My grandparents live in Gadukino! I''m from Pavlovsk right down the road!"'
 					'Her face breaks out into a smile as you say that.'
 					'"Well fancy that! Maybe we''re long lost cousins or something!"'
 					act 'Talk about Gadukino':

locations/furi.qsrc

@@ -68,24 +68,25 @@ act 'Try to get a lift':
 				'"Well hello there little missy," he says with a smirk as he blows out a waft of cigarette smoke from his nose. "I remember you. Really enjoyed what you did for me last time I saw you. I''d be willing to give you another lift if you''re willing to do it again. So what do you say, need another ride?"'
 			end
 			
-			act'Not today':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
-				'"Uhh, sorry, not today. I was just passing by for... something..."'
-				'"Oh." He seems more than a little disappointed and leans back on his truck, flicking away his burnt out cigarette and pulling out another.'
-				'"Well," he says as he sparks the new one. "If you ever need a ride, just let me know."'
-				'Nodding awkwardly, you retreat away from him and head back to the road.'
-				act 'Leave': minut += 5 & gt $curloc
-			end
-			
-			act'Nod meekly':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
-				'You nod meekly and his grin widens. Without saying anything, you step up to the passenger side and he flicks away his cigarette to climb into the driver''s seat.'
-				act 'Get into the truck': furisex = 100 & gt 'furisex'
+			gs 'willpower', 'bj', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'Not today (<<will_cost>> Willpower)':
+					cla & *clr
+					gs 'willpower', 'bj', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
+					'"Uhh, sorry, not today. I was just passing by for... something..."'
+					'"Oh." He seems more than a little disappointed and leans back on his truck, flicking away his burnt out cigarette and pulling out another.'
+					'"Well," he says as he sparks the new one. "If you ever need a ride, just let me know."'
+					'Nodding awkwardly, you retreat away from him and head back to the road.'
+					act 'Leave': minut += 5 & gt $curloc
+				end
+			else
+				act'Not today (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 			
-			if furibj >= 50:
+			if furibj >= 100:
 				act'Grin back':
 					cla & *clr
 !!Image needed					'<center><video autoplay loop src="images/locations/highway/hj_motion.mp4"></video></center>'
@@ -94,8 +95,7 @@ act 'Try to get a lift':
 					'"Of course!" you smile, pulling yourself into the passenger''s seat beside him. "Why would I use anything else?"'
 					act 'Get into the truck': furisex = 100 & gt 'furisex'
 				end
-			
-			
+			elseif furibj >= 50:
 				act'Another blowjob today?':
 					cla & *clr
 					'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
@@ -103,11 +103,30 @@ act 'Try to get a lift':
 					'He flicks his cigarette away and climbs into the driver''s seat, you following into the passenger''s.'
 					act 'Get into the truck': furisex = 100 & gt 'furisex'
 				end
+			else
+				act'Nod meekly':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
+					'You nod meekly and his grin widens. Without saying anything, you step up to the passenger side and he flicks away his cigarette to climb into the driver''s seat.'
+					act 'Get into the truck': furisex = 100 & gt 'furisex'
+				end
 			end
 		elseif furibj >= 150:
 			'"You''re road head girl right? I recognize you by the description of the other guys."'
 			'"Willing to do the same for me as you did for them? Blowjob for a lift?" He opens up the passenger door for you and waits expecantly.'
-			act 'Change your mind': minut += 5 & gt $curloc
+			gs 'willpower', 'bj', 'resist'
+			if will_cost <= pcs_willpwr:
+				act'Change your mind (<<will_cost>> Willpower)':
+					cla & *clr
+					gs 'willpower', 'bj', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					minut += 5
+					gs 'stat'
+					gt $curloc
+				end
+			else
+				act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 			act 'Get into the truck': furisex = 100 & gt 'furisex'
 		elseif furibj >= 100:
 			'He continues to look at you for a moment longer before saying, "Maybe. Are you road head girl?"'
@@ -118,7 +137,19 @@ act 'Try to get a lift':
 				'He grins widely at you. "Yeah. Truckers tend to talk a lot, part of the job. Based on what I hear you must''ve sucked off at least half the drivers out here. Apparently not including me, though I''d love to add to your scoreboard."'
 				'You frown. You''re not sure if you like the fact that you''re starting to become famous among truckers for this. Or the fact that you''re nickname is "road head girl."'
 				'"So, planning on living up to your name today?" He opens up the passenger door for you and waits expecantly.'
-				act 'Change your mind': minut += 5 & gt $curloc
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Change your mind (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						gs 'stat'
+						gt $curloc
+					end
+				else
+					act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Get into the truck': furisex = 100 & gt 'furisex'
 			else
 				act'Uhh...':
@@ -126,7 +157,19 @@ act 'Try to get a lift':
 					'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
 					'"Uhh..."'
 					'The driver grins at you some more. "I guess that''s a yes. So, road head for a ride. Is that a deal then?"'
-					act 'Change your mind': minut += 5 & gt $curloc
+					gs 'willpower', 'bj', 'resist'
+					if will_cost <= pcs_willpwr:
+						act'Change your mind (<<will_cost>> Willpower)':
+							cla & *clr
+							gs 'willpower', 'bj', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							minut += 5
+							gs 'stat'
+							gt $curloc
+						end
+					else
+						act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 					act 'Get into the truck': furisex = 100 & gt 'furisex'
 				end
 				act'That''s me!':
@@ -134,7 +177,19 @@ act 'Try to get a lift':
 					'<center><img <<$set_imgh>> src="images/locations/highway/furi.jpg"></center>'
 					'"That''s me!" you say cheerfully.'
 					'He smiles expectantly. "I was wondering when I''d get my turn with you." He opens up the passenger door and waits beside it. "So, are you gonna get in?"'
-					act 'Change your mind': minut += 5 & gt $curloc
+					gs 'willpower', 'bj', 'resist'
+					if will_cost <= pcs_willpwr:
+						act'Change your mind (<<will_cost>> Willpower)':
+							cla & *clr
+							gs 'willpower', 'bj', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							minut += 5
+							gs 'stat'
+							gt $curloc
+						end
+					else
+						act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 					act 'Get into the truck': furisex = 100 & gt 'furisex'
 				end
 			end
@@ -146,7 +201,19 @@ act 'Try to get a lift':
 				*nl
 				'"Uhh..."'
 				'The driver grins at you. "I guess that''s a yes. So, are you still operating on that kind of payment basis?" he asks, opening up the passenger door and looking at you expectantly.'
-				act 'Change your mind': minut += 5 & gt $curloc
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Change your mind (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						gs 'stat'
+						gt $curloc
+					end
+				else
+					act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Get into the truck': furisex = 100 & gt 'furisex'
 			end
 			act'That''s me!':
@@ -155,7 +222,19 @@ act 'Try to get a lift':
 				'"That''s me!" you say cheerfully.'
 				'He grins. "I hoped it was you. I heard rumors but I''ve always wanted to try you for myself."'
 				'He opens up the passenger door and starts to make his way around to the driver''s side.'
-				act 'Change your mind': minut += 5 & gt $curloc
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Change your mind (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						gs 'stat'
+						gt $curloc
+					end
+				else
+					act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Get into the truck': furisex = 100 & gt 'furisex'
 			end			
 		else
@@ -167,7 +246,19 @@ act 'Try to get a lift':
 				*nl
 				'"Uhh..."'
 				'The driver grins at you. "I guess that''s a yes. So, are you still operating on that kind of payment basis?" he asks, opening up the passenger door and looking at you expectantly.'
-				act 'Change your mind': minut += 5 & gt $curloc
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Change your mind (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						gs 'stat'
+						gt $curloc
+					end
+				else
+					act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Get into the truck': furisex = 100 & gt 'furisex'
 			end
 			act'That''s me!':
@@ -176,7 +267,19 @@ act 'Try to get a lift':
 				'"That''s me!" you say cheerfully.'
 				'He grins. "I hoped it was you. I heard rumors but I''ve always wanted to try you for myself."'
 				'He opens up the passenger door and starts to make his way around to the driver''s side.'
-				act 'Change your mind': minut += 5 & gt $curloc
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Change your mind (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						gs 'stat'
+						gt $curloc
+					end
+				else
+					act'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Get into the truck': furisex = 100 & gt 'furisex'
 			end		
 		end
@@ -184,7 +287,19 @@ act 'Try to get a lift':
 		'The truck driver gives you a knowing grin: "Ah, a hitchhiker? Of course I can, dear! But the real question is... how are you going to thank me if I do?"'
 		'He walks over to you and puts his hand on your buttocks, not leaving any question as to what he wants from you.'
 		'You quickly look around, but no other drivers are around to give you a ride instead; he''s your only option right now.'
-		act 'Refuse and leave':minut += 5 & gt $curloc
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act'Refuse and leave (<<will_cost>> Willpower)':
+				cla & *clr
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				minut += 5
+				gs 'stat'
+				gt $curloc
+			end
+		else
+			act'Refuse and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 
 		act 'Tell him you''ll suck him off':
 			*clr & cla
@@ -199,7 +314,19 @@ act 'Try to get a lift':
 				'"Uhh... no?" you admit, which upsets the man.'
 				'He shoos you away and says: "Do you think I''m crazy? I get sluts like you in my truck all the time, I''m not touching you without a condom! My wife would kill me if I came home with an STD!"'
 
-				act 'Leave':minut += 5 & gt $curloc
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act'Leave (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						minut += 5
+						gs 'stat'
+						gt $curloc
+					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 'Try to persuade him':
 					*clr & cla
@@ -214,7 +341,19 @@ act 'Try to get a lift':
 						'"Wait, please! Sir, you have to understand... I normally never do this! I''m clean, I swear!" you beg him. "Please, I really need this lift!"'
 						'The driver has another close look at you and sighs: "Damn you... you''re too cute, how could I say no? Fine, get in the truck before I change my mind."'
 					end
-					act 'Change your mind and leave':minut += 5 & gt $curloc
+					gs 'willpower', 'bj', 'resist'
+					if will_cost <= pcs_willpwr:
+						act'Change your mind and leave (<<will_cost>> Willpower)':
+							cla & *clr
+							gs 'willpower', 'bj', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							minut += 5
+							gs 'stat'
+							gt $curloc
+						end
+					else
+						act'Change your mind and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 					act 'Get into the truck':minut += 5 & furisex = 100 & gt 'furisex'
 				end
 			end
@@ -226,7 +365,19 @@ act 'Try to get a lift':
 					'You nod: "Yes, I do."'
 					'"Excellent... I love it when they come prepared", the driver smiles. He opens the door and invites you in: "Milady, after you!"'
 
-					act 'Change your mind and leave': minut += 5 & gt $curloc
+					gs 'willpower', 'bj', 'resist'
+					if will_cost <= pcs_willpwr:
+						act'Change your mind and leave (<<will_cost>> Willpower)':
+							cla & *clr
+							gs 'willpower', 'bj', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							minut += 5
+							gs 'stat'
+							gt $curloc
+						end
+					else
+						act'Change your mind and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 					act 'Get into the truck':
 						minut += 5 
 						furisex = 0

locations/gKristinaZv.qsrc

@@ -59,7 +59,7 @@ if $ARGS[0] = '0':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj.jpg"></center>'
 		'You nod obediently, not wanting Christina to beat you up again. You squat down in front of the dildo, and take it in your hands before carefully licking it and closing your lips around it. You expected an awful rubber taste, but it''s actually not that bad. You give the dildo a blowjob as all the girls in your class watch you, while Christina laughs. After a few minutes, she has seen enough and allows you to change.'
 
-		gs 'arousal', 'bj', 10, 'sub', 'humilation'
+		gs 'arousal', 'bj', 10, 'sub', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'stat'
 		
@@ -78,7 +78,7 @@ if $ARGS[0] = '1':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj2.jpg"></center>'
 		'You nod obediently, not wanting Christina to beat you up again. You kneel down in front of the dildo, and take it in your hands before carefully licking it and closing your lips around it. Then you stretch your body and rest your hands next to the stone before pushing yourself up. The dildo makes you have to push up higher than you normally would, and after only a few your arms get tired. As you struggle to keep your weight up, the dildo is driven further and further down your throat. All of the girls in your class watch you do your best to not choke on the dildo while Christina laughs evilly, and after a few more push-ups Christina has seen enough and allows you to stop and change.'
 
-		gs 'arousal', 'bj', 10, 'sub', 'humilation', 'deepthroat'
+		gs 'arousal', 'bj', 10, 'sub', 'humiliation', 'deepthroat'
 		gs 'arousal', 'end'
 		gs 'stat'
 		
@@ -97,7 +97,7 @@ if $ARGS[0] = '2':
 		'No moving your feet... this is going to be tricky. You spread your legs and awkwardly bend over, while one of the girls in your class holds the dildo up straight to help you out a little. Once you close your lips around it she pulls away, while you do your best to give the dildo a blowjob in this awkward position.'
 		'After a while, Christina nods approvingly: "Not bad, bitch. You''re getting good at this. Go get changed, I''ll have to think of something more challenging for you for next time."'
 
-		gs 'arousal', 'bj', 10, 'sub', 'humilation'
+		gs 'arousal', 'bj', 10, 'sub', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'stat'
 		
@@ -117,7 +117,7 @@ if $ARGS[0] = '3':
 		'You get down on your knees in front of the middle dildo, and take it in your mouth. You close your lips around it and begin to suck it off, while rhythmically stroking the other two with your hands. You hear the girls of your class quietly whisper things at once another while you do what you''re told, and while Christina applauds you. "Very nice, bitch! Very nice! You''re a natural! Or is this just something you do on a regular basis?"'
 		'After a few minutes, she allows you to get changed.'
 
-		gs 'arousal', 'bj', 10, 'sub', 'humilation'
+		gs 'arousal', 'bj', 10, 'sub', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'stat'
 		
@@ -138,7 +138,7 @@ if $ARGS[0] = '4':
 		'You get down on your haunches, and obediently lick the dildo before taking it in your mouth. You look yourself in the eye the whole time as instructed, and are rather fascinated by the look... this must be what you look like when you suck a guy off. Rather fascinated by the concept, you try to do some different things with your lips, and test out a few facial expressions.'
 		'Hearing the whispers of your classmates suddenly make you realize that you''re not alone here, there are a dozen girls watching you! Your face turns crimson red, and when Christina tells you can stop you feel deeply embarrassed.'
 
-		gs 'arousal', 'bj', 10, 'sub', 'humilation'
+		gs 'arousal', 'bj', 10, 'sub', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Continue': gt 'gschool_lessons2', 'postphys2'
@@ -157,7 +157,7 @@ if $ARGS[0] = '5':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj6.jpg"></center>'
 		'You move the dildo to your mouth, and slowly lick the head a few times. Urgh, this one tastes awful. Nevertheless, you don''t want to face the consequences for refusing so you open your mouth as wide as you can, and barely manage to get the dildo past your lips. It''s too big to go down your throat, so you spend the next minutes licking it and sucking on the tip, while the girls encourage you. After a few minutes, Christina says you can stop.'
 
-		gs 'arousal', 'bj', 10, 'sub', 'humilation'
+		gs 'arousal', 'bj', 10, 'sub', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'stat'
 		
@@ -172,7 +172,7 @@ if $ARGS[0] = '6':
 	'"Alright, bitch. We''re doing something a little different today. Show us your smelly pussy, now."'
 	'Knowing better than to disobey, you obediently sit down on the floor and spreads your legs wide. Then you move your fingers to your pussy lips and pull them aside, opening your pussy for Christina and the rest of the girls to see.'
 	
-	gs 'arousal', 'foreplay', 5, 'sub', 'humilation'
+	gs 'arousal', 'foreplay', 5, 'sub', 'humiliation'
 	gs 'stat'
 	
 	act 'Continue':
@@ -190,7 +190,7 @@ if $ARGS[0] = '6':
 				'You try for a minute, but your suspicions were right... it doesn''t fit. Christina sees your helpless look and says, disgruntled: "Fine, use your fingers instead. But you better make a good show of it, or else!"'
 				'You do as she says, slowly licking your fingers before slowly sliding one up your butthole. Once you get used to it you add a second, but Christina is already bored by then. She tells you to get dressed, while she threatens you: "That was weak, <<$pcs_lastname>>. I''ll definitely be expecting a better effort from you next time."'
 			
-				gs 'arousal', 'anal_finger', 10, 'sub', 'humilation'
+				gs 'arousal', 'anal_finger', 10, 'sub', 'humiliation'
 				gs 'arousal', 'end'
 				gs 'stat'
 		
@@ -202,10 +202,10 @@ if $ARGS[0] = '6':
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj10.jpg"></center>'
 				'Christina looks surprised: "Still a virgin? How unexpected. Alright, I''m nothing if not flexible. We''ll work on you ass skills instead then."'
 				'She grabs her bag and throws a dildo your way. You''re relieved to see it''s not the huge one, this one should fit okay.'
-				'You lean backwards and after you spit on the dildo a few times, move it against your backside. All of the girls from your class watch you attentively as you slowly work the head in, and then begin to f*** your ass with it. Christina smiles: "You''re quite good at taking stuff up your butt, <<$pcs_nickname>>. How is this so easy for you? Do you practise on a daily basis or something?"'
+				'You lean backwards and after you spit on the dildo a few times, move it against your backside. All of the girls from your class watch you attentively as you slowly work the head in, and then begin to f*** your ass with it. Christina smiles: "You''re quite good at taking stuff up your butt, <<$pcs_nickname>>. How is this so easy for you? Do you practice on a daily basis or something?"'
 				'After a while Christina has seen enough, and allows you to change.'
 			
-				gs 'arousal', 'anal_dildo', 10, 'sub', 'humilation'
+				gs 'arousal', 'anal_dildo', 10, 'sub', 'humiliation'
 				gs 'arousal', 'end'
 				gs 'stat'
 				
@@ -216,10 +216,10 @@ if $ARGS[0] = '6':
 				'She grabs her bag and throws a dildo your way. By now you''ve had bigger things up there, this shouldn''t be too hard.'
 				'You do as you''re told and ease the dildo into your ass. As you thought, it''s no challenge and it slides in rather easily.'
 				'Christina notices, and says: "Too easy, bitch! That dildo is too small for your broken ass. Give it back and use your hand instead!"'
-				'You meekly obey and give the dildo back, nefore you slowly begin to work your entire hand into your asshole. The other girls in your class are stunned by your performance, but Christina indifferently moves up to you and gives your wrists a few light tugs, watching your sphincter stretch to its limits around it: "Very nice, bitch. Much better."'
+				'You meekly obey and give the dildo back, before you slowly begin to work your entire hand into your asshole. The other girls in your class are stunned by your performance, but Christina indifferently moves up to you and gives your wrists a few light tugs, watching your sphincter stretch to its limits around it: "Very nice, bitch. Much better."'
 				'She then allows you to get dressed and leave.'
 				
-				gs 'arousal', 'anal_fist', 10, 'sub', 'humilation'
+				gs 'arousal', 'anal_fist', 10, 'sub', 'humiliation'
 				gs 'arousal', 'end'
 				gs 'stat'
 				
@@ -237,7 +237,7 @@ if $ARGS[0] = '6':
 			'"Good bitch. Now show us what you can do with it".'
 			'You nod obediently and stick the dildo onto the tiled floor. Then you squat over it, guiding its head to your snatch. You sink yourself down on it until it''s mostly inside you, and begin to ride it. The other girls watch you intently as you slowly increase the tempo... you can see one or two of them squirming in their seats.'
 			
-			gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humilation'
+			gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humiliation'
 			gs 'stat'
 				
 			if pcs_horny >= 100:
@@ -273,14 +273,13 @@ if $ARGS[0] = '7':
 		'Ride it... hmm. After you take a second to see how you could best approach this, Christina slaps your ass with a towel: "Today, bitch."'
 		'Okay, okay. You turn your back towards the dildo, letting it rest in your ass crack before you bend over. One of the other girls quickly moves a bench over for you to rest your hands on, and you give her a grateful smile as you bend over further and guide the dildo into your pussy. You can feel your pussy getting wetter and wetter from the sensations, and within minutes the showers are filled with the squishy sound of your pussy getting filled by the dildo over and over.'
 		
-		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humilation'
+		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
 			gs 'pain', 2, 'pinch', 'nipples'
 			gs 'pain', 2, 'slap', 'face'
 			pcs_horny -= rand(15,40)
-			pcs_dom += 1
 			gs 'stat'
 			'When you are close to reaching orgasm, you close your eyes and moan softly. Suddenly you feel a sharp pain in your nipples! It''s Christina, pinching them hard. She slaps you in the face and says: "Bad bitch! Whores don''t get to cum on my dildo!"'
 			$orgasm_or = 'no'
@@ -309,7 +308,7 @@ if $ARGS[0] = '8':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj14.jpg"></center>'
 		'You try to hide your smile. You have gotten used to the idea that this is how gym class will be from now on, and today''s assignment looks like it could even be fun. You stand directly over the dildo before you squat down and guide it inside you. You begin slowly, but soon enough you pick up the pace and need to support your weight with your arms as you grind your hips down on it.'
 		
-		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humilation'
+		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -346,7 +345,7 @@ if $ARGS[0] = '9':
 		'You sit down in front of the dildo and raise your hips to lower yourself down on it. Not fast enough for Christina''s tastes however, and she slaps your inner thigh with a towel: "Faster, bitch! We all have other places to be today!"'
 		'The other girls giggle as you slam your hips down on the rubber dong, and ride it. Christina instructs you to keep your legs spread while you ride the dildo, and keeps slapping you with her towel as you move your hips up and down. Your yelps of pain whenever the towel lands on your thighs put an evil grin on her face.'
 		
-		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humilation'
+		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -381,7 +380,7 @@ if $ARGS[0] = '10':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj16.jpg"></center>'
 		'Several of the girls walk towards the dong and spit on it, and you gratefully nod at them as you spread the saliva over it with your fingers, adding some of your own. Then you squat directly over the dildo and slowly rub it against your pussy lips. You can feel your snatch being stretched to its limits when you lower yourself down on it, and when you begin to move your hips you feel your pussy lips gripping the dildo tightly.'
 		
-		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humilation'
+		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -417,7 +416,7 @@ if $ARGS[0] = '11':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj17.jpg"></center>'
 		'You accept the brush obediently and lie down on the ground, spreading your legs. You poke the handle between your legs and slowly spread your pussy lips with it before pushing it in. It doesn''t quite feel as good as the dildos Christina usually has for you, and is not quite as big either. Nevertheless, the sopping of your pussy is quite audible in the locker room while the girls in your class change their clothes, and you see one of them glancing at her hairbrush with a dreamy look in her eyes.'
 		
-		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humilation'
+		gs 'arousal', 'vaginal_dildo', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -452,7 +451,7 @@ if $ARGS[0] = '12':
 		'Knowing she expects a show, you lean back against the wall with your legs spread wide. You rub your fingers over your pussy lips, and then begin to slide your fingers in one by one with a questioning look in your eyes. At three, Christina tells you: "Stop. Three will do for today, bitch. Start f***ing yourself with them."'
 		'You slowly move your hand, and can''t help but moan when you feel your pussy grasping around your fingers.'
 		
-		gs 'arousal', 'masturbate', 10, 'sub', 'humilation'
+		gs 'arousal', 'masturbate', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -487,7 +486,7 @@ if $ARGS[0] = '13':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj19,'+rand(0,1)+'.jpg"></center>'
 		'You nod and get comfortable, before squeezing your fingers together tightly. Several girls spit on your fingers for you and you push them against your vagina, slowly rotating your wrist as you work them in deeper and deeper. Taking deep breaths, you eventually manage to get your entire hand inside your snatch.'
 		
-		gs 'arousal', 'vaginal_fist', 10, 'sub', 'humilation'
+		gs 'arousal', 'vaginal_fist', 10, 'sub', 'humiliation'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -505,7 +504,7 @@ if $ARGS[0] = '13':
 		'Before you can answer, she leaves. You look around the locker room to try and figure out who just touched you, but their faces don''t give anything away as the girls proceed like nothing happened.'
 
 		$orgasm_or = 'yes'
-		gs 'arousal', 'vaginal_finger', 10, 'sub', 'humilation', 'lesbian'
+		gs 'arousal', 'vaginal_finger', 10, 'sub', 'humiliation', 'lesbian'
 		gs 'arousal', 'end'
 		gs 'stat'
 		
@@ -525,7 +524,7 @@ if $ARGS[0] = '14':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/christina/dildobj20,'+rand(0,1)+'.jpg"></center>'
 		'It''s been so long, you barely even remember why you''re doing this any more. Obeying Christina in front of the other girls after gym class has become your second nature, it''s just part of your daily duties... and you wouldn''t have it any other way. You quickly drop to your knees and crawl your way over to her, sexily waving your ass back and forth to the girls behind you. When you arrive at Christina''s feet, you rise up and obediently run your tongue over her folds, tasting her sweet juices as you begin to lick away at her snatch.'
 		
-		gs 'arousal', 'cuni_give', 20, 'sub', 'humilation', 'lesbian'
+		gs 'arousal', 'cuni_give', 20, 'sub', 'humiliation', 'lesbian'
 		gs 'stat'
 		
 		if pcs_horny >= 100:
@@ -561,7 +560,7 @@ if $ARGS[0] = '15':
 		'You notice the stream getting smaller, and Christina pushes your face away and tells you to gather the last of it in your hands. You open your eyes so you can see where to put your hand, and cup one to try to catch some. Most of it just trickles down your wrist or between your fingers and falls on the ground. Then the stream dries up completely.'
 		'The quiet murmurs of your classmates make you realize that all the other girls in your class had been watching the whole time! Christina notices them too and asks: "Does anyone else need to go? No one? Okay... <<$pcs_nickname>>, you can get dressed then. See you next time."'
 
-		gs 'arousal', 'foreplay', 5, 'sub', 'humilation'
+		gs 'arousal', 'pee', 5, 'sub', 'humilation', 'lesbian'
 		gs 'arousal', 'end'
 		gs 'stat'
 		

locations/gLakeNudeForest.qsrc

@@ -35,6 +35,7 @@ if temper >= 20 and month >= 5 and month <= 9 and hour >= 6 and hour <= 20:
 				gs 'willpower', 'pay', 'self'
 				gs 'gLakeNudeEvent','gLakeNude_nudist'
 				act 'Look': gt 'gLakeNudeForest'
+			end
 		else
 			act 'Spy on nudists (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end

locations/gadforestlost.qsrc

@@ -42,7 +42,7 @@ if $ARGS[0] = 'forestrescue':
 	if $clothingworntype ! 'nude' or swamp_clothes = 0:
 		'You can''t wait to get back to your grandparents house and have a bath and a nice hot meal.'
 
-		act 'To your grandparents house':gt'Gadhouse'
+		act 'To your grandparents house':gt 'gadhouse', 'start'
 	elseif $clothingworntype = 'nude' or swamp_clothes = 1:
 		'The ranger looks you up and down and you feel like he is about to ask you something but he decides against it.'
 		'You remember you left your clothes by the edge of the woods and ask the ranger to take you there instead.'

locations/gadriver.qsrc

@@ -1178,7 +1178,7 @@ if $ARGS[0] = 'fishing':
 					'As soon as you enter the house, Boniface immediately jumps down to the floor and twines around your feet. The furry beast starts yowling very loudly and pawing at your legs. He has obviously detected the smell of fresh fish. You treat Boniface to a small fish and within a few minutes all that remains is a pile of fish bones.'
 					if fish >0: fish = 0 & 'You try to give the rest of the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
 
-					act 'Finish': gt 'Gadhouse'
+					act 'Finish': gt 'gadhouse', 'start'
 				end
 				act 'Give the fish to your grandmother':
 					cla
@@ -1187,7 +1187,7 @@ if $ARGS[0] = 'fishing':
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/givefish.jpg"></center>'
 					'You try to give the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
 
-					act 'Finish': gt 'Gadhouse'
+					act 'Finish': gt 'gadhouse', 'start'
 				end
 			else
 				act 'Leave':gt $loc, $metka
@@ -1240,7 +1240,7 @@ if $ARGS[0] = 'fishing':
 				'As soon as you enter the house, Boniface immediately jumps down to the floor and twines around your feet. The furry beast starts yowling very loudly and pawing at your legs. He has obviously detected the smell of fresh fish. You treat Boniface to a small fish and within a few minutes all that remains is a pile of fish bones.'
 				if fish >0: fish = 0 & 'You try to give the rest of the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
 
-				act 'Finish': gt 'Gadhouse'
+				act 'Finish': gt 'gadhouse', 'start'
 			end
 			act 'Give the fish to your grandmother':
 				cla
@@ -1249,7 +1249,7 @@ if $ARGS[0] = 'fishing':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/givefish.jpg"></center>'
 				'You try to give the fish to your grandmother, but she takes one look at the intact fish and point at your grandfather. He sighs heavily then takes the fish outside to clean them.'
 
-				act 'Finish': gt 'Gadhouse'
+				act 'Finish': gt 'gadhouse', 'start'
 			end
 		else
 			act 'Leave':gt $loc, $metka

locations/gadukino_event.qsrc

@@ -1005,7 +1005,7 @@ if $ARGS[0] = 'go_home':
 					staygad = daystart
 					gadstay = 1 & !Flag to monthly pay scene
 					indorf = 0
-					gt 'gadhouse'
+					gt 'gadhouse', 'start'
 				end
 				act 'Go home': gs 'gadukino_event','go_home_ender'
 			else
@@ -1042,7 +1042,7 @@ if $ARGS[0] = 'to_gadukino':
 	minut += rand(15,25)
 	gs 'stat'
 	'You get into the Lada with the rest of your family and before you know, you''ve arrived in Gadukino. Your grandparents have lived here for forty years.'
-	act 'Go into the house': gt 'gadhouse'
+	act 'Go into the house': gt 'gadhouse', 'start'
 end
 
 !from 1.2.5, [zz_func]

locations/gaptek.qsrc

@@ -156,7 +156,7 @@ if $ARGS[0] = 'garden':
 			minut += rand(5, 15)
 			if gaprezikday ! daystart or gatabletkiday ! daystart or gabotmedday ! daystart or gabotsmlday ! daystart or gapregday ! daystart:
 				'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
-				'"Hi aunt Luda, my <<$npc_nickname[''A29'']>> needs a few more items for her garden."'
+				'"Hi Aunt Luda, my <<$npc_nickname[''A29'']>> needs a few more items for her garden."'
 				'"Your <<$npc_nickname[''A29'']>>, huh? Sure, sure... it''s right here, take your pick!" she chuckles, as you try to hide your blush.'
 				'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
 				'"No problem, <<$pcs_nickname>>. But seriously, tell Natasha she shouldn''t spend so much time gardening. We keep running low on stock."'

locations/garfather.qsrc

@@ -233,35 +233,28 @@ act 'Help':
 						end
 					end
 					if pcs_horny >= 30 or TouchedByFather = 1:
-						gs 'willpower', 'exhib', 'self', 'easy'
-						if will_cost <= pcs_willpwr:
-							act 'Fondle your breasts as you talk (<<will_cost>> Willpower)':
-								cls
-								gs 'willpower', 'exhib', 'self', 'easy'
-								gs 'willpower', 'pay', 'self'
-								gs 'arousal', 'flashlite', 5
-								gs 'arousal', 'foreplay', 5, 'incest', 'exhibitionism'
-								gs 'arousal', 'end'
-								minut -= 5
+						act 'Fondle your breasts as you talk':
+							cls
+							gs 'arousal', 'flashlite', 5
+							gs 'arousal', 'foreplay', 5, 'incest', 'exhibitionism'
+							gs 'arousal', 'end'
+							minut -= 5
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
+							'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
+
+							if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
+							if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = rand(1,4)
+							if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = rand(1,2)
+							if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+							if fatherLust>=2:
+								pcs_horny -= rand(1,5)
 								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
-								'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
-
-								if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-								if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = rand(1,4)
-								if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = rand(1,2)
-								if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
-								if fatherLust>=2:
-									pcs_horny -= rand(1,5)
-									gs 'stat'
-									'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.'
-								elseif fatherLust=1:
-									'Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.'
-								end
-								act 'Move away':gt $loc, $metka
+								'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.'
+							elseif fatherLust=1:
+								'Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.'
 							end
-						else
-							act 'Fondle your breasts as you talk (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+							act 'Move away':gt $loc, $metka
 						end
 					else
 						gs 'dinfather', 'garhelpchat'

locations/gdk.qsrc

@@ -21,13 +21,27 @@ end
 if hour >= 20 and hour <= 23 and week >= 5 and week < 7:
 	'The entrance to the Community Centre is full of young people, the guys are just hanging around smoking and joking. The girls in small groups, all dressed up and gossiping. You see the bushes moving, Pavlovsks'' famous make out garden.'
 	'You hear people in the alley beside the club. <a href="exec:minut += 5 & gt ''ugel''">Investigate</a>.'
-	if gdkin_in = daystart:
-		act 'Return to the dance':gt 'gdkin'
-	elseif money >= 25:
-		act 'Go to the dance (25 <b>₽</b>)':
-			money -= 25
-			minut += 5
-			gt 'gdkin'
+	if gdkincum = daystart and (cumloc[6] = 0 and cumloc[7] = 0) and cumloc[11] = 0:
+		gdkincum = 0
+	end
+	if gdkincum ! daystart:
+		if gdkin_in = daystart:
+			act 'Return to the dance':gt 'gdkin'
+		elseif money >= 25:
+			act 'Go to the dance (25 <b>₽</b>)':
+				money -= 25
+				minut += 5
+				gt 'gdkin'
+			end
+		end
+	else
+		*nl
+		if (cumloc[6] = 1 or cumloc[7] = 1) and cumloc[11] = 1:
+			'You should clean the cum off your face and clothes before heading back to the dance.'
+		elseif cumloc[11] = 1:
+			'You should clean the cum off your face before heading back to the dance.'
+		elseif cumloc[6] = 1 or cumloc[7] = 1:
+			'You should clean the cum off your clothes before heading back to the dance.'
 		end
 	end
 else

locations/gdkin.qsrc

@@ -57,9 +57,11 @@ if $ARGS[0] = '':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
 			if pcs_inhib < 40:inhib_exp += rand(1,2)
 			if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
-				pav_sex += 15
-
-				pcs_mood -= 80
+				gdkincum = daystart
+				gs 'fame', 'pav', 'sex', 5
+				pcs_mood -= 40
+				gs 'stat'
+				
 				'As you head out on the dance floor, A guy walks up to you and sees the cum still splattered on you. The guy points to you "Check out the cock-sucker! Hey guys, this chick has cum smeared all over her face." The ones standing near him come closer. "Did you forget to swallow, slut?" Your cheeks blush with shame and you quickly head for the exit.'
 
 				act 'Leave':gt 'gdk'
@@ -71,7 +73,6 @@ if $ARGS[0] = '':
 				danc_exp += 1
 
 				pcs_mood += 10
-				pcs_willpwr += 10
 				frost = 0
 				gs 'stat'
 
@@ -146,9 +147,11 @@ if $ARGS[0] = '':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_yaho.jpg"></center>'
 
 			if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
-				pav_sex += 15
-
-				pcs_mood -= 80
+				gdkincum = daystart
+				gs 'fame', 'pav', 'sex', 5
+				pcs_mood -= 40
+				gs 'stat'
+				
 				'While standing by the wall a guy notices cum on your clothes and he points and shouts. "This chick is covered in cum, wait did you fail to swallow slut?" He says to you laughing. Your cheeks blush with shame and you head for the exit.'
 
 				act 'Leave':gt 'gdk'
@@ -424,9 +427,17 @@ if $ARGS[0] = 'dance_vrp':
 		end
 
 		if alko < 6 or pcs_horny <= 75 or pav_slut <= 25:
-			act 'Refuse':
-				if pcs_sprt <= 30: sprt_exp += rand(0, 1)
-				gt 'gdkin'
+			gs 'willpower', 'drink', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					gs 'willpower', 'drink', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					if pcs_sprt <= 30: sprt_exp += rand(0, 1)
+					gs 'stat'
+					gt 'gdkin'
+				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
 		end
 
@@ -465,9 +476,17 @@ if $ARGS[0] = 'dance_vrp':
 					'You went outside with the man. As you walked he put his arm around your waist. "My name is <<$boydesc>>. What''s your name?" You answered "<<$pcs_nickname>>." The man continued, "<<$pcs_nickname>>, I''m in town on a business trip. I am staying at a nearby hotel, I live in the city itself. There is virtually nothing to do in this town you know. Come back to my hotel with me and we can drink whiskey, while we sit and have a nice chat."'
 
 					if alko < 6 or pcs_horny <= 75 or pav_slut <= 25:
-						act 'Refuse':
-							if pcs_sprt <= 30: sprt_exp += rand(0, 1)
-							gt 'gdkin'
+						gs 'willpower', 'drink', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Refuse (<<will_cost>> Willpower)':
+								gs 'willpower', 'drink', 'resist'
+								gs 'willpower', 'pay', 'resist'
+								if pcs_sprt <= 30: sprt_exp += rand(0, 1)
+								gs 'stat'
+								gt 'gdkin'
+							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
 					end
 

locations/gdksport.qsrc

@@ -246,7 +246,6 @@ if $ARGS[0] = 'albina1':
 
 		act 'I do not care':
 			*clr & cla
-			pcs_dom += 1
 			npc_rel['A23'] -= 5
 			gs 'stat'
 			'<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
@@ -294,7 +293,6 @@ if $ARGS[0] = 'albina2':
 
 		act 'I do not care':
 			*clr & cla
-			pcs_dom += 1
 			npc_rel['A23'] -= 5
 			gs 'stat'
 			'<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
@@ -433,10 +431,8 @@ if $ARGS[0] = 'starlets':
 	'<center><img <<$set_imgh>> src="images/locations/shared/gym/fit1.jpg"></center>'
 
 	if pcs_dancero < 15:
-		sub += 1
 		'You train together with the girls in "The Starlets". You danced badly and Albina constantly yelled at you and called you a bowlegged cow.'
 	elseif pcs_dancero < 30:
-		sub += 1
 		'You train together with the girls of "The Starlets". You sometimes managed to get the moves right, but most of the time you were out of synch or made the wrong move. Albina constantly yelled at you and called you a bowlegged cow.'
 	elseif pcs_dancero < 45:
 		'You train together with the girls of "The Starlets". You managed to get into the general rhythm and moved well with the other girls, but Albina is still not happy. "<<$pcs_nickname>>, you are very sluggish, you need to put more life into it."'
@@ -460,7 +456,7 @@ if $ARGS[0] = 'starlets':
 			end
 
 			if DanceWhoreT > 0: DanceWhoreT = 0
-			if AlbFather = 0 and DanceWhore > rand (5, 20):
+			if AlbFather = 0 and DanceWhore > rand(5,20):
 				AlbFather = 1
 				'Albina after training beckoned you to her. "Good work, <<$pcs_nickname>>. The clients were satisfied and you were very discrete. You''re doing fine, doing excellent, in fact. Stick with me and you will have all the money, cars and apartments you could want."'
 			end
@@ -489,41 +485,41 @@ if $ARGS[0] = 'starlets':
 				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 				if pcs_apprnc >= 52:
-					if pcs_apprnc < 64:wealthmanrand = rand(0, 15)
-					if pcs_apprnc >= 64 and pcs_apprnc < 72:wealthmanrand = rand(0, 12)
-					if pcs_apprnc >= 72:wealthmanrand = rand(0, 10)
+					if pcs_apprnc < 64:wealthmanrand = rand(0,15)
+					if pcs_apprnc >= 64 and pcs_apprnc < 72:wealthmanrand = rand(0,12)
+					if pcs_apprnc >= 72:wealthmanrand = rand(0,10)
 
 					if wealthmanrand = 0:
 						kolvomanparty = 1
-						danceWhorePay = rand(3, 8)
+						danceWhorePay = rand(3,8)
 						'You saw that a man in a decent suit went up to Albina and started to talk quietly with her.'
 					elseif wealthmanrand = 1:
 						kolvomanparty = 2
-						danceWhorePay = rand(5, 10)
+						danceWhorePay = rand(5,10)
 						'You saw that two guys approached Albina and started to talk to her.'
 					elseif wealthmanrand = 2:
 						kolvomanparty = 1
-						danceWhorePay = rand(4, 9)
+						danceWhorePay = rand(4,9)
 						'You saw that an Armenian went up to Albina and started talking to her and gesticulating wildly.'
 					elseif wealthmanrand = 3:
 						kolvomanparty = 2
-						danceWhorePay = rand(6, 12)
+						danceWhorePay = rand(6,12)
 						'You saw that two Armenians went up to Albina and started talking to her.'
 					elseif wealthmanrand = 4:
 						kolvomanparty = 3
-						danceWhorePay = rand(8, 14)
+						danceWhorePay = rand(8,14)
 						'You saw that three Armenians approached Albina and started talking to her.'
 					elseif wealthmanrand = 5:
 						kolvomanparty = 1
-						danceWhorePay = rand(5, 10)
+						danceWhorePay = rand(5,10)
 						'You saw that a black went up Albina and started talking to her.'
 					elseif wealthmanrand = 6:
 						kolvomanparty = 2
-						danceWhorePay = rand(7, 15)
+						danceWhorePay = rand(7,15)
 						'You saw that two black men went up Albina and started talking to her.'
 					elseif wealthmanrand = 7:
 						kolvomanparty = 3
-						danceWhorePay = rand(10, 20)
+						danceWhorePay = rand(10,20)
 						'You saw that three black men went up Albina and started talking to her.'
 					end
 
@@ -540,16 +536,23 @@ if $ARGS[0] = 'starlets':
 							else
 								'Albina came closer to you and quietly began to speak, "You see these guys? If you stay with them for a couple of hours and be affectionate, you will be able to earn <<danceWhorePay*1000>> <b>₽</b>."'
 							end
-
-							act 'Refuse and leave':
-								*clr & cla
-								minut += 15
-								otkazDanceWhore = 1
-								DanceWhoreT = 0
-								gs 'stat'
-								'You got in the car along with the rest of the troupe, and shortly you returned to town.'
-
-								act 'Leave':gt 'pavResidential'
+							
+							gs 'willpower', 'prostitution', 'resist', 'hard'
+							if will_cost <= pcs_willpwr:
+								act 'Refuse and leave (<<will_cost>> Willpower)':
+									*clr & cla
+									gs 'willpower', 'prostitution', 'resist', 'hard'
+									gs 'willpower', 'pay', 'resist'
+									minut += 15
+									otkazDanceWhore = 1
+									DanceWhoreT = 0
+									gs 'stat'
+									'You got in the car along with the rest of the troupe, and shortly you returned to town.'
+
+									act 'Leave':gt 'pavResidential'
+								end
+							else
+								act 'Refuse and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 							end
 
 							act 'Agree':
@@ -561,14 +564,14 @@ if $ARGS[0] = 'starlets':
 								slutty += 1
 								gs 'stat'
 								'You agreed to be "nice" and Albina counted out your money.'
-								if wealthmanrand = 0:act 'Go with a man':gt 'AlbStarsWhore', 'whore1'
-								if wealthmanrand = 1:act 'Go with men':gt 'AlbStarsWhore', 'whore2'
-								if wealthmanrand = 2:act 'Go in Caucasians':gt 'AlbStarsWhore', 'whore3'
-								if wealthmanrand = 3:act 'Go with Caucasians':gt 'AlbStarsWhore', 'whore4'
-								if wealthmanrand = 4:act 'Go with Caucasians':gt 'AlbStarsWhore', 'whore5'
-								if wealthmanrand = 5:act 'Start with a black man':gt 'AlbStarsWhore', 'whore6'
-								if wealthmanrand = 6:act 'Go with blacks':gt 'AlbStarsWhore', 'whore7'
-								if wealthmanrand = 7:act 'Go with blacks':gt 'AlbStarsWhore', 'whore8'
+								if wealthmanrand = 0:act 'Go with the man':gt 'AlbStarsWhore', 'whore1'
+								if wealthmanrand = 1:act 'Go with the men':gt 'AlbStarsWhore', 'whore2'
+								if wealthmanrand = 2:act 'Go with the Armenian':gt 'AlbStarsWhore', 'whore3'
+								if wealthmanrand = 3:act 'Go with the Armenians':gt 'AlbStarsWhore', 'whore4'
+								if wealthmanrand = 4:act 'Go with the Armenians':gt 'AlbStarsWhore', 'whore5'
+								if wealthmanrand = 5:act 'Go with the black man':gt 'AlbStarsWhore', 'whore6'
+								if wealthmanrand = 6:act 'Go with the blacks':gt 'AlbStarsWhore', 'whore7'
+								if wealthmanrand = 7:act 'Go with the blacks':gt 'AlbStarsWhore', 'whore8'
 							end
 						end
 					end
@@ -711,7 +714,6 @@ if $ARGS[0] = 'vball4':
 	loopcount = 0
 	timemult = 0
 	npc_rel['A69'] += 1
-	pcs_dom += 1
 	if pcs_inhib < 40:inhib_exp += rand(0,1)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/gdksport.jpg"></center>'
@@ -719,15 +721,23 @@ if $ARGS[0] = 'vball4':
 	'At the beginning of the workout you ran a few laps around the room. Afterwards the coach has you do push-ups and crunches. Then you practiced receiving and setting up plays and serving the ball. At the end of the workout you had a practice game.'
 	act 'Leave':gt 'gdksport', 'start'
 	if $pantyworntype = 'none' and rand(0,1) = 1 and (volleytanga = 1 or VoltrenerVoyeur >= 5):
-		act 'Correct clothing':
-			inhib_exp += rand(1,5)
-			*clr & cla
-			TrenerLust += 3
-			Voltrenersee += 1 & ! setcheck on gg without panties
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/game'+rand(1,2)+'.jpg"></center>'
-			'It seems the coach noticed you wasn''t wearing any panties, his eyes lit up and he said turning away: "<<$pcs_lastname>>. Come see me after training. I need to show you UH ... a few things" '
-			act 'Leave':gs'stat'& gt 'gdksport', 'start'
-			act 'Go to the coach''s office':gt 'Voltrenersex', 'start'
+		gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Correct clothing (<<will_cost>> Willpower)':
+				*clr & cla
+				inhib_exp += rand(1,5)
+				TrenerLust += 3
+				Voltrenersee += 1 & ! setcheck on gg without panties
+				gs 'willpower', 'exhib', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/game'+rand(1,2)+'.jpg"></center>'
+				'It seems the coach noticed you wasn''t wearing any panties, his eyes lit up and he said turning away: "<<$pcs_lastname>>. Come see me after training. I need to show you UH ... a few things" '
+				act 'Leave':gs'stat'& gt 'gdksport', 'start'
+				act 'Go to the coach''s office':gt 'Voltrenersex', 'start'
+			end
+		else
+			act 'Correct clothing (<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 'Talk to the coach':gt 'Voltrener', 'start'
@@ -752,7 +762,6 @@ if $ARGS[0] = 'vball5':
 		sorevday = daystart
 		if hour < 18: hour = 18 & minut = 0
 		timemult = 0
-		pcs_dom += 1
 		npc_rel['A69'] += 2
 		minut += 60 & !total time should be 4 hours, 2 hours for the game and 2 hours travel
 		gt 'gdksport', 'volley'
@@ -833,7 +842,6 @@ if $ARGS[0] = 'volley':
 
 					if npc_rel['A69'] >= rand(0, 80):
 						volleysostav = 2
-						pcs_dom += 1
 						poverkomand = ((pcs_vball*2) + ((pcs_stren + pcs_vital + pcs_agil + pcs_react)/2))/2
 						'The coach agrees to let you play the second half.'
 
@@ -940,19 +948,42 @@ if $ARGS[0] = 'shower':
 		if ShowerIvan = 1: ShowerIvan = 2
 		'You entered the women''s shower, turning the water on you began to lather up your body with a washcloth. Suddenly, you hear the door creak as it opened and you remember that you agreed not to lock it for Ivan.'
 		'You looked around and see Ivan Prokhorov standing there looking at you. "Hello <<$pcs_nickname>>. The men''s shower is full, so I thought I would join you instead." Ivan smiled after these words.'
-		act 'Further':gt 'gdksport', 'ShowerWithIvan'
+		act 'Shower with Ivan':gt 'gdksport', 'ShowerWithIvan'
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Not today (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
+				'You cover your breasts with one hand and turn sideways crossing your legs while flashing Ivan your best smile.'
+				'"How about another time Ivan? I''m not feeling it right now." Ivan just laughs and walk out of the shower room.'
+				'You quickly lock the door, before finishing your shower in peace.'
+				act 'Get out of the shower':gt 'gdksport', 'start'
+			end
+		else
+			act 'Not today (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	elseif kotovVSprohorov = 1 and ShowerIvan < 3:
 		kotovVSprohorov = 2
 		'You enter the women''s shower and turning the water on begin to lather your body with a washcloth. Suddenly, you hear the door creak as it opened and you remember that you forgot to lock it.'
 		'You looked around and saw Ivan Prokhorov standing in the doorway looking at you. "Hi <<$pcs_nickname>>. Can I join you? The men''s shower is full." Ivan smiled after these words.'
-		act 'Throw Ivan out':
-			*clr & cla
-			IvanShowerQW = 1
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
-			'You covered your chest with one hand and turn sideways crossing your legs as you hurl your washcloth at Ivan. He easily dodged the flying cloth and laughs as he exits the shower room.'
-			'You get out of the shower and quickly lock the door, before going back and quickly finishing your shower.'
-			act 'Get out of the shower':gt 'gdksport', 'start'
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Throw Ivan out (<<will_cost>> Willpower)':
+				*clr & cla
+				IvanShowerQW = 1
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
+				'You cover your breasts with one hand and turn sideways crossing your legs as you hurl your washcloth at Ivan. He easily dodged the flying cloth and laughs as he exits the shower room.'
+				'You quickly lock the door, before finishing your shower in peace.'
+				act 'Get out of the shower':gt 'gdksport', 'start'
+			end
+		else
+			act 'Throw Ivan 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 'Uh, what?':
@@ -960,14 +991,21 @@ if $ARGS[0] = 'shower':
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/shower2.jpg"></center>'
 			'You''re completely surprised and confused by Ivan''s sudden appearance, you are struck speechless. Ivan takes your inaction and silence as consent, as he walks into the shower room and closes the door behind him.'
-
-			act 'Escape from the shower':
-				*clr & cla
-				IvanShowerQW = 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
-				'You cover your breasts with one hand as you quickly grab your towel and run from the shower. As you run into the changing room, you can hear Ivan laughing.'
-				gt 'gdksport', 'start'
+			
+			gs 'willpower', 'bj', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Escape from the shower (<<will_cost>> Willpower)':
+					*clr & cla
+					IvanShowerQW = 1
+					gs 'willpower', 'bj', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
+					'You cover your breasts with one hand as you quickly grab your towel and run from the shower. As you run into the changing room, you can hear Ivan laughing.'
+					act 'Get out of the shower':gt 'gdksport', 'start'
+				end
+			else
+				act 'Escape from the shower (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 			act 'Wash together':
 				IvanShowerYes = 0
@@ -1020,7 +1058,7 @@ if $ARGS[0] = 'ShowerWithIvan':
 			gs 'stat'
 			act 'Allow him to continue':
 				cla & *clr
-				if pcs_throat<15:
+				if pcs_throat < 15:
 					'<center><video autoplay loop src="images/shared/sex/blowjob/shower6.mp4"></video></center>'
 					'Penetrating further and further into your mouth, then into your throat, his member blocked your breath, which caused a gag reflex, nearly causing you to vomit. Freeing your mouth from his dick and wiping your tears, you screamed at Ivan, "This isn''t some bottomless hole for you to shove your dick into, you know!" Ivan gave you a guilty look then he pulled you back to your feet again as he began to kiss you, caress your breasts and ass until you began to moan with desire. He turned you around then bent you over with your ass towards him.'
 				else
@@ -1103,6 +1141,20 @@ if $ARGS[0] = 'ShowerWithIvan':
 					end
 				end
 			end
+			gs 'willpower', 'anal', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'That''s enough for now (<<will_cost>> Willpower)':
+					gs 'willpower', 'anal', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/sex/community/shower1.jpg"></center>'
+					'Ivan pauses for a brief second and you use the chance to quickly stand up and jump out of the shower.'
+					'You look back at him and say, "I think you''ve had enough of me for today. Maybe you can have more next time."'
+					act 'Get out of the shower':gt 'gdksport', 'start'
+				end
+			else
+				act 'That''s enough for now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 		end
 	end
 end
@@ -1116,8 +1168,18 @@ if $ARGS[0] = 'Ivan_bored':
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/school/ivan2.jpg"></center>'
 	'You look at Ivan for a long moment and bite your lower lip and then whisper just loud enough he can barely hear you. "I''m bored." He looks at you a moment then smiles, he looks around, then takes you by the hand and leads you away from the others, into one of the lesser used area''s of the school. He stops at one of the boys restrooms, going inside and leaving you outside. A few moments later two younger boys are ushered out by Ivan and sent packing. He watches them go, once they round the corner he pulls you into the bathroom.'
-
-	act 'Leave': gt 'gschool_lessons', 'short_break'
+	
+	gs 'willpower', 'anal', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Leave (<<will_cost>> Willpower)':
+			gs 'willpower', 'anal', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'gschool_lessons', 'short_break'
+		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 'Go into the bathroom with Ivan':
 		*clr & cla

locations/gdktoilet.qsrc

@@ -22,7 +22,17 @@ if $ARGS[0] = 'start':
 	end
 	
 	if hour >= 8 and hour <= 23:
-		act 'Go in the Men''s toilet': gt 'gdktoilet', 'mens_entrance_events'
+		gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Go in the Men''s toilet (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'gdktoilet', 'mens_entrance_events'
+			end
+		else
+			act 'Go in the Men''s toilet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Go in the Women''s toilet': gt 'gdktoilet', 'womens'
 	end
 
@@ -37,13 +47,27 @@ if $ARGS[0] = 'start':
 			close all
 			pl '<a href="exec: music_on = 1 & gt $loc, $metka">Play music</a>'
 		end
-		if gdkin_in = daystart:
-			act 'Return to the dance':gt 'gdkin'
-		elseif money >= 25:
-			act 'Go to the dance (25 <b>₽</b>)':
-				money -= 25
-				minut += 5
-				gt 'gdkin'
+		if gdkincum = daystart and (cumloc[6] = 0 and cumloc[7] = 0) and cumloc[11] = 0:
+			gdkincum = 0
+		end
+		if gdkincum ! daystart:
+			if gdkin_in = daystart:
+				act 'Return to the dance':gt 'gdkin'
+			elseif money >= 25:
+				act 'Go to the dance (25 <b>₽</b>)':
+					money -= 25
+					minut += 5
+					gt 'gdkin'
+				end
+			end
+		else
+			*nl
+			if (cumloc[6] = 1 or cumloc[7] = 1) and cumloc[11] = 1:
+				'You should clean the cum off your face and clothes before heading back to the dance.'
+			elseif cumloc[11] = 1:
+				'You should clean the cum off your face before heading back to the dance.'
+			elseif cumloc[6] = 1 or cumloc[7] = 1:
+				'You should clean the cum off your clothes before heading back to the dance.'
 			end
 		end
 	end
@@ -70,71 +94,106 @@ if $ARGS[0] = 'mens_entrance_events':
 			'You decide to take a closer look, to your surprise, there is a naked man standing with his face to the wall. His body is pressed up close against the wall.'
 			if pcs_vag >= 1:
 				if pcs_horny >=80:
-					act 'Seduce him':
-						*clr & cla
-						gs 'stat'
-						if pcs_cupsize >= 20:
+					gs 'willpower', 'sex', 'force'
+					if will_cost <= pcs_willpwr:
+						act 'Seduce him (<<will_cost>> Willpower)':
 							*clr & cla
+							gs 'willpower', 'sex', 'force'
+							gs 'willpower', 'pay', 'force'
 							gs 'stat'
-							'<center><b><font color="maroon">Men''s Room</font></b></center>'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/grabbig.jpg"></center>'
-							'You look over his naked body and you wonder who''s on the other side. You bite your finger in appreciation of his naked body while grabbing your <<$titsize>>. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes all your clothes off and pushes you against the wall. Kissing you passionately.'
-							gs 'arousal', 'foreplay', 1
-							gs 'stat'
-							act 'Kiss him': gt'gdktoilet', 'mensglory'
-						elseif $pantyworntype ! 'none':
+							if pcs_cupsize >= 20:
+								*clr & cla
+								gs 'stat'
+								'<center><b><font color="maroon">Men''s Room</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/grabbig.jpg"></center>'
+								'You look over his naked body and you wonder who''s on the other side. You bite your finger in appreciation of his naked body while grabbing your <<$titsize>>. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes all your clothes off and pushes you against the wall. Kissing you passionately.'
+								gs 'arousal', 'foreplay', 1
+								gs 'stat'
+								act 'Kiss him': gt'gdktoilet', 'mensglory'
+							elseif $pantyworntype ! 'none':
+								*clr & cla
+								gs 'stat'
+								'<center><b><font color="maroon">Men''s Room</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/seducesmall.jpg"></center>'
+								'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your underwear and breasts. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
+								gs 'arousal', 'foreplay', 5
+								gs 'stat'
+								act 'Kiss him': gt'gdktoilet', 'mensglory'
+							else
+								*clr & cla
+								gs 'stat'
+								'<center><b><font color="maroon">Men''s Room</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/nakedsmall.jpg"></center>'
+								'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your breasts and pussy. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
+								gs 'arousal', 'foreplay', 1
+								gs 'stat'
+								act 'Kiss him': gt'gdktoilet', 'mensglory'
+							end
+						end
+					else
+						act 'Seduce him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+				elseif pcs_horny >=40:
+					gs 'willpower', 'mast', 'self'
+					if will_cost <= pcs_willpwr:
+						act 'Masturbate':
 							*clr & cla
+							gs 'willpower', 'mast', 'self'
+							gs 'willpower', 'pay', 'self'
 							gs 'stat'
-							'<center><b><font color="maroon">Men''s Room</font></b></center>'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/seducesmall.jpg"></center>'
-							'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your underwear and breasts. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
-							gs 'arousal', 'foreplay', 5
-							gs 'stat'
-							act 'Kiss him': gt'gdktoilet', 'mensglory'
-						else
-							*clr & cla
+							pcs_mood += 15
+							gs 'arousal', 'masturbate', 25
 							gs 'stat'
 							'<center><b><font color="maroon">Men''s Room</font></b></center>'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/nakedsmall.jpg"></center>'
-							'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your breasts and pussy. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
-							gs 'arousal', 'foreplay', 1
-							gs 'stat'
-							act 'Kiss him': gt'gdktoilet', 'mensglory'
-						end
-					end
-				elseif pcs_horny >=40 and pcs_dom >= 40:
-					act 'Masturbate':
-						*clr & cla
-						gs 'stat'
-						pcs_mood += 15
-						pcs_vag += 1
-						'<center><b><font color="maroon">Men''s Room</font></b></center>'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/masturbate.jpg"></center>'
-						'You decide to masturbate in front of him. You rub your clit while exposing your bare ass. He smile and nods appreciating your body. You start to feel warm as you keep rubbing your clit. Your body gets tense as you approach orgasm.'
-						gs 'arousal', 'masturbate', 25
-						gs 'stat'
-						if pcs_apprnc >= 80:
-							if pcs_dom <=80:
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/masturbate.jpg"></center>'
+							'You decide to masturbate in front of him. You rub your clit while exposing your bare ass. He smile and nods appreciating your body. You start to feel warm as you keep rubbing your clit. Your body gets tense as you approach orgasm.'
+							if pcs_apprnc >= 120:
 								*clr & cla
-								gs 'stat'
 								'<center><b><font color="maroon">Men''s Room</font></b></center>'
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
 								'Unable to resist the man pushes you against the wall kissing you.'
 								gs 'arousal', 'kiss', 5
 								gs 'stat'
 								act 'Give In': gt'gdktoilet', 'mensglory'
+								gs 'willpower', 'sex', 'resist'
+								if will_cost <= pcs_willpwr:
+									act 'Leave (<<will_cost>> Willpower)':
+										gs 'willpower', 'sex', 'resist'
+										gs 'willpower', 'pay', 'resist'
+										gs 'arousal', 'end'
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
+										'Not wanting to fuck this guy, you push him off you and quickly get dressed before telling him to fuck off!'
+										gt'gdktoilet', '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
+							elseif pcs_apprnc >= 80:
+								cla
+								*nl
+								'The man backs away from the wall and says, "Why don''t you come over here and we can have some fun."'
+								act 'Give In': gt'gdktoilet', 'mensglory'
+								gs 'willpower', 'sex', 'resist'
+								if will_cost <= pcs_willpwr:
+									act 'Leave (<<will_cost>> Willpower)':
+										gs 'willpower', 'sex', 'resist'
+										gs 'willpower', 'pay', 'resist'
+										gs 'arousal', 'end'
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
+										'Not wanting to fuck this guy, you quickly get dressed before telling him to fuck off!'
+										gt'gdktoilet', '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
 							else
-								*clr & cla
-								gs 'arousal', 'end'
-								gs 'stat'
-								'<center><b><font color="maroon">Men''s Room</font></b></center>'
-								'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
-								'The man backs away from the wall and says, "Why don''t you come over here and we can have some fun." Not wanting to fuck this guy, you quickly get dressed and tell him to fuck off!'
-								act 'Leave': gt'gdktoilet', 'start'
+								act 'Leave': gs 'arousal', 'end' & gt'gdktoilet', 'start'
 							end
-						else
-							act 'Leave': gs 'arousal', 'end' & gt'gdktoilet', 'start'
 						end
+					else
+					
 					end
 				else
 					gs 'stat'
@@ -203,62 +262,78 @@ if $ARGS[0] = 'mens_entrance_events':
 		'<center><b><font color="maroon">Men''s Room</font></b></center>'
 		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
 		'You look inside the men''s restroom and see Dimka grabbing some chick by the hair and forcing her down onto his 16cm penis.'
-		if sub >= 20 or DimaRudeQW > 0:
-			'You look at her giving him the blowjob and you want to be punished too.'
-			if DimaRudeQW = 0:
-				act 'Interrupt':
+			
+		if DimaRudeQW = 0:
+			gs 'willpower', 'bj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Interrupt (<<will_cost>> Willpower)':
 					*clr & cla
 					minut += 5
 					pcs_horny += 10
+					gs 'willpower', 'bj', 'self'
+					gs 'willpower', 'pay', 'self'
 					gs 'stat'
 					'<center><b><font color="maroon">Men''s Room</font></b></center>'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
 					'You decide to interrupt them and get in on the action. Dimka looks at you smiling and says "What the fuck are you interrupting me, get the fuck out." That''s when Dimka slaps you across the face. Your face now all red you quickly leave the restroom and leave.'
 					act 'Leave': gt'gdktoilet', 'start'
 				end
-			elseif DimaRudeQW > 0:
-				act 'Interrupt':
+			else
+				act 'Interrupt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			act 'Leave': gt'gdktoilet', 'start'
+		elseif DimaRudeQW > 0:
+			act 'Interrupt':
+				*clr & cla
+				minut += 5
+				dimkawarn = 0
+				gs 'stat'
+				'<center><b><font color="maroon">Men''s Room</font></b></center>'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
+				'Wanting some attention from your boyfriend you decide to interrupt them. Dimka sees you and says, "Look what we have here, one more of my bitches to join us." He turns to the girl on the ground and says to her "Get on the ground and lay down."'
+				act 'Climb on top':
 					*clr & cla
-					minut += 5
-					dimkawarn = 0
 					gs 'stat'
 					'<center><b><font color="maroon">Men''s Room</font></b></center>'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
-					'Wanting some attention from your boyfriend you decide to interrupt them. Dimka sees you and says, "Look what we have here, one more of my bitches to join us." He turns to the girl on the ground and says to her "Get on the ground and lay down."'
-					act 'Climb on top':
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanal.mp4"></video></center>'
+					'You take your clothes off and climb on top of her. She starts to lick your pussy while Dimka fucks your ass without any lubrication. With her licking your pussy and Dimka fucking your ass you start to orgasm.'
+					gs 'arousal', 'cuni', 10, 'lesbian', 'dom'
+					gs 'arousal', 'anal', 10, 'sub', 'rough'
+					minut -= 10
+					gs 'stat'
+					act 'Continue':
 						*clr & cla
+						pcs_mood += 15
+						if npc_sex['A1'] = 0: npc_sex['A1'] = 1 & guy += 1
+						girl += 1
+						minut += 10
+						gs 'cum_call', 'anus', 'A1', 1
 						gs 'stat'
 						'<center><b><font color="maroon">Men''s Room</font></b></center>'
-						'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanal.mp4"></video></center>'
-						'You take your clothes off and climb on top of her. She starts to lick your pussy while Dimka fucks your ass without any lubrication. With her licking your pussy and Dimka fucking your ass you start to orgasm.'
-						gs 'arousal', 'cuni', 10, 'lesbian', 'dom'
-						gs 'arousal', 'anal', 10, 'sub', 'rough'
-						minut -= 10
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanalcum.jpg"></center>'
+						'Starting to pound your ass harder, Dimka starts to grunt as he shoots his load in your ass. Pulling out his warm liquid flows out your ass spilling onto the girls face. He takes his dick and puts it in her mouth saying, "Clean the rest of this up slut and don''t forget to clean my bitch too." The girl starts to lick your ass clean. She is really good at it and you begin to have another orgasm. You finish and decide to get up and get dressed. Dimka pleased with your behaviour tells you, "You should come by my house more often, slave."'
+						$orgasm_or = 'yes'
+						cumspclnt = 15
+						gs 'cum_cleanup'
+						gs 'arousal', 'end'
 						gs 'stat'
-						act 'Continue':
-							*clr & cla
-							pcs_mood += 15
-							sub += 5
-							if npc_sex['A1'] = 0: npc_sex['A1'] = 1 & guy += 1
-							girl += 1
-							minut += 10
-							gs 'cum_call', 'anus', 'A1', 1
-							gs 'stat'
-							'<center><b><font color="maroon">Men''s Room</font></b></center>'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanalcum.jpg"></center>'
-							'Starting to pound your ass harder, Dimka starts to grunt as he shoots his load in your ass. Pulling out his warm liquid flows out your ass spilling onto the girls face. He takes his dick and puts it in her mouth saying, "Clean the rest of this up slut and don''t forget to clean my bitch too." The girl starts to lick your ass clean. She is really good at it and you begin to have another orgasm. You finish and decide to get up and get dressed. Dimka pleased with your behaviour tells you, "You should come by my house more often, slave."'
-							$orgasm_or = 'yes'
-							cumspclnt = 15
-							gs 'cum_cleanup'
-							gs 'arousal', 'end'
-							gs 'stat'
-							act 'Leave': gt'gdktoilet', 'start'
-						end
+						act 'Leave': gt'gdktoilet', 'start'
 					end
 				end
 			end
-		else
-			act 'Leave': gt'gdktoilet', 'start'
+			
+			gs 'willpower', 'bj', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'bj', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt'gdktoilet', '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
 		end
 	else
 		minut += 1
@@ -308,14 +383,20 @@ if $ARGS[0] = 'mens':
 		gs 'arousal', 'voyeur_sex', 5
 		gs 'stat'
 		act 'Move away': minut += 1 & gt'gdktoilet', 'mens'
-		if pcs_horny >=50:
-			act 'Masturbate':
-				cla
-				gs 'stat'
-				'You walk into one of the men''s stalls.'
-				gs 'arousal', 'masturbate', 5
-				gs 'stat'
-				act 'start': gt 'gdktoilet', 'mensmast'
+		if pcs_horny >= 50:
+			gs 'willpower', 'mast', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Masturbate (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'mast', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'arousal', 'masturbate', 5
+					gs 'stat'
+					'You walk into one of the men''s stalls.'
+					act 'start': gt 'gdktoilet', 'mensmast'
+				end
+			else
+				act 'Masturbate (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 	end
@@ -365,15 +446,18 @@ if $ARGS[0] = 'mensmast':
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast2.jpg"></center>'
 				'You grab some toilet paper and clean off your now wet clit. You think to yourself, "I hope nobody heard that."'
-				if rand(1, 100) >= 80:
+				if rand(1,100) >= 75:
 					gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
 					npc_dick[$npclastgenerated] = rand(10,24)
 					gs 'boyStat', $npclastgenerated
 					'You look up and notice the stall door opens. Right then a man in an orange jumpsuit walks in. He tells you, "Do you know where you are?" Unable to respond after your intense orgasm the man unzips his jumpsuit and takes out his <<npc_dick[$npclastgenerated]>>cm dick and places it near your mouth.'
-					if pcs_dom >= 20:
-						act 'Run away':
-							gs 'arousal', 'end'
+					gs 'willpower', 'bj', 'resist', 'hard'
+					if will_cost <= pcs_willpwr:
+						act 'Run away (<<will_cost>> Willpower)':
 							cla
+							gs 'willpower', 'bj', 'resist', 'hard'
+							gs 'willpower', 'pay', 'resist'
+							gs 'arousal', 'end'
 							*nl
 							if $pantyworntype ! 'none' or $braworntype ! 'none':
 								gs 'underwear', 'dispose'
@@ -389,52 +473,62 @@ if $ARGS[0] = 'mensmast':
 							end
 						end
 					else
-						act 'Suck':
+						act 'Run away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+					act 'Suck':
+						*clr & cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast3.jpg"></center>'
+						'You open your mouth and begin to suck his dick. You can feel your pussy getting itchy again so you start to rub it. You continue to rub your clit until the man is about to cum.'
+						gs 'arousal', 'bj', 5, 'sub', 'unknown'
+						gs 'arousal', 'masturbate', 5
+						minut -= 5
+						gs 'stat'
+						act 'Climax again':
 							*clr & cla
+							pcs_mood += 15
+							minut += 5
+							spafinloc = 11
+							facial += 1
+							gs 'cum_manage'
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast4.jpg"></center>'
+							$orgasm_or = 'custom'
+							$orgasm_txt = 'You continue to rub your clit more and more when all of a sudden you explode into another orgasm. The man tells you he''s about to cum and you stop sucking his dick. The second you stop sucking he cums around your mouth.'
+							gs 'arousal', 'masturbate', 2
+							gs 'arousal', 'end'
 							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast3.jpg"></center>'
-							'You open your mouth and begin to suck his dick. You can feel your pussy getting itchy again so you start to rub it. You continue to rub your clit until the man is about to cum.'
-							gs 'arousal', 'bj', 5, 'sub', 'unknown'
-							gs 'arousal', 'masturbate', 5
-							minut -= 5
-							gs 'stat'
-							act 'Climax again':
+							act 'Rest':
 								*clr & cla
-								pcs_mood += 15
 								minut += 5
-								spafinloc = 11
-								facial += 1
-								gs 'cum_manage'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast4.jpg"></center>'
-								$orgasm_or = 'custom'
-								$orgasm_txt = 'You continue to rub your clit more and more when all of a sudden you explode into another orgasm. The man tells you he''s about to cum and you stop sucking his dick. The second you stop sucking he cums around your mouth.'
-								gs 'arousal', 'masturbate', 2
-								gs 'arousal', 'end'
 								gs 'stat'
-								act 'Rest':
-									*clr & cla
-									minut += 5
-									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast5.jpg"></center>'
-									'The man leaves the stall, he mumbles something but you are too far gone and woozy. You stay crouched on the floor with cum all over your mouth as you try to recover.'
-									act 'Leave the stall':gt 'gdktoilet', 'mens'
-								end
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast5.jpg"></center>'
+								'The man leaves the stall, he mumbles something but you are too far gone and woozy. You stay crouched on the floor with cum all over your mouth as you try to recover.'
+								act 'Leave the stall':gt 'gdktoilet', 'mens'
 							end
 						end
 					end
+				else
+					act 'Leave Stall':gt 'gdktoilet', 'mens'
 				end
-				act 'Leave Stall':gt 'gdktoilet', 'mens'
 			end
 		end
 	else
 		act 'Continue': gt 'gdktoilet', 'mensmast'
 	end
-	act 'Stop':
-		cla
-		minut += 1
-		gs 'stat'
-		'You decide that you shouldn''t continue in fear of being discovered.'
-		act 'Leave Stall':gt 'gdktoilet', 'mens'
+	gs 'willpower', 'mast', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Stop (<<will_cost>> Willpower)':
+			cla
+			gs 'willpower', 'mast', 'self'
+			gs 'willpower', 'pay', 'self'
+			minut += 1
+			gs 'stat'
+			*nl
+			'You decide that you shouldn''t continue in fear of being discovered.'
+			act 'Leave Stall':gt 'gdktoilet', 'mens'
+		end
+	else
+		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -495,32 +589,46 @@ if $ARGS[0] = 'mensglory':
 								'You decide to swallow his cum. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
 								act 'Leave': gt'gdktoilet', 'start'
 							end
-							act 'Spit':
-								*clr & cla
-								minut +=5								
-								gs 'stat'
-								'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
-								'You spit out his cum which. The man says, "You don''t like the taste of cum?" You don''t respond and get up to get dressed and leave.'
-								act 'Leave': gt'gdktoilet', 'start'
+							gs 'willpower', 'swallow', 'resist'
+							if will_cost <= pcs_willpwr:
+								act 'Spit (<<will_cost>> Willpower)':
+									*clr & cla
+									gs 'willpower', 'swallow', 'resist'
+									gs 'willpower', 'pay', 'resist'
+									minut +=5						
+									gs 'stat'
+									'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
+									'You spit out his cum which. The man says, "You don''t like the taste of cum?" You don''t respond and get up to get dressed and leave.'
+									act 'Leave': gt'gdktoilet', 'start'
+								end
+							else
+								act 'Spit (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 							end
 						end
 					else
-						act 'Keep sucking':
-							*clr & cla
-							minut += 5
-							swallow += 1
-							gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
-							gs 'arousal', 'end'
-							gs 'stat'
-							if pcs_throat <= 25:
-								'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj91.mp4"></video></center>'
-								'You keep sucking taking in his entire dick. You stop when you feel his hard penis throbbing as a warm liquid fills your throat. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
-								act 'Leave': gt'gdktoilet', 'start'
-							else
-								'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj26.mp4"></video></center>'
-								'Unable to continue to fit his entire penis inside your mouth you keep sucking the tip of his dick until you feel his hard penis throbbing as a warm liquid fills the back of your mouth. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
-								act 'Leave': gt'gdktoilet', 'start'
+						gs 'willpower', 'sex', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Keep sucking (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'sex', 'resist'
+								gs 'willpower', 'pay', 'resist'
+								minut += 5
+								swallow += 1
+								gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
+								gs 'arousal', 'end'
+								gs 'stat'
+								if pcs_throat <= 25:
+									'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj91.mp4"></video></center>'
+									'You keep sucking taking in his entire dick. You stop when you feel his hard penis throbbing as a warm liquid fills your throat. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
+									act 'Leave': gt'gdktoilet', 'start'
+								else
+									'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj26.mp4"></video></center>'
+									'Unable to continue to fit his entire penis inside your mouth you keep sucking the tip of his dick until you feel his hard penis throbbing as a warm liquid fills the back of your mouth. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
+									act 'Leave': gt'gdktoilet', 'start'
+								end
 							end
+						else
+							act 'Keep sucking (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 						act 'Ride':
 							*clr & cla
@@ -621,28 +729,35 @@ if $ARGS[0] = 'emptystall':
 		'You walk down to the last stall. The large almost perfectly round hole is still there. You wonder how many women have used that hole. You feel a little excited as you contemplate your next move.'
 	end
 	if pcs_horny >=40:
-		act 'Caress Yourself':
-			if pcs_inhib < 40:inhib_exp += rand(1,3)
-			*clr & cla
-			gs 'stat'
-			picrand = rand(1,2)
-			if picrand = 1:
+		gs 'willpower', 'mast', 'self'
+		if will_cost <= pcs_willpwr:				
+			act 'Caress Yourself (<<will_cost>> Willpower)':
+				if pcs_inhib < 40:inhib_exp += rand(1,3)
 				*clr & cla
+				gs 'willpower', 'mast', 'self'
+				gs 'willpower', 'pay', 'self'
 				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
-				'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
-				gs 'arousal', 'masturbate', 4
-				gs 'stat'
-				act 'Continue': gs 'gdktoilet', 'contmast'
-			else
-				*clr & cla
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-				'Feeling a bit turned on, you close the door to the stall and you sit down exposing your pussy and begin to run your clit.'
-				gs 'arousal', 'masturbate', 4
-				gs 'stat'
-				act 'Continue': gs 'gdktoilet', 'contmast'
+				picrand = rand(1,2)
+				if picrand = 1:
+					*clr & cla
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
+					'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
+					gs 'arousal', 'masturbate', 4
+					gs 'stat'
+					act 'Continue': gs 'gdktoilet', 'contmast'
+				else
+					*clr & cla
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
+					'Feeling a bit turned on, you close the door to the stall and you sit down exposing your pussy and begin to run your clit.'
+					gs 'arousal', 'masturbate', 4
+					gs 'stat'
+					act 'Continue': gs 'gdktoilet', 'contmast'
+				end
 			end
+		else
+			act 'Caress Yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 	act 'Look at the Hole': gt 'gdktoilet', 'hole'
@@ -685,12 +800,20 @@ if $ARGS[0] = 'contmast':
 	else
 		act 'Continue': gt 'gdktoilet', 'contmast'
 	end
-	act 'Stop':
-		cla
-		gs 'arousal', 'end'
-		gs 'stat'
-		'You decide that you shouldn''t continue and stop yourself from finishing.'
-		act 'Leave Stall':gt 'gdktoilet', 'womens'
+	gs 'willpower', 'mast', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Stop (<<will_cost>> Willpower)':
+			cla
+			minut += 1
+			gs 'willpower', 'mast', 'self'
+			gs 'willpower', 'pay', 'self'
+			gs 'arousal', 'end'
+			gs 'stat'
+			'You decide that you shouldn''t continue and stop yourself from finishing.'
+			act 'Leave Stall':gt 'gdktoilet', 'womens'
+		end
+	else
+		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -711,12 +834,20 @@ if $ARGS[0] = 'hole':
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstartled.mp4"></video></center>'
 			'While looking through the hole you decided to write something on the wall just above it. While you were focused on writing, you didn''t notice the dick poking through the hole until the tip of it nearly went into your mouth. Startled you jerk away from the offending penis.'
 			act 'Suck it': gt 'gdktoilet', 'blowjob'
-			act 'Touch the shaft':gt 'gdktoilet', 'virgin'
-			act 'Quickly leave the stall':
-				*clr & cla
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-				'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
-				act'Leave':gt 'gdktoilet', 'womens'
+			if pcs_throat = 0:act 'Touch the shaft':gt 'gdktoilet', 'virgin'
+			gs 'willpower', 'bj', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Quickly leave the stall (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'bj', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
+					'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
+					act'Leave':gt 'gdktoilet', 'womens'
+				end
+			else
+				act 'Quickly leave the stall (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 	elseif rand(1, 10) >= 7 - (ghnow * 2):
@@ -729,29 +860,54 @@ if $ARGS[0] = 'hole':
 			'You move away from the hole reconsidering what you were about to do and quickly leave the stall.'
 			act 'Leave':gt 'gdktoilet', 'womens'
 		end
-		act 'Stick your finger in the hole':
-			*clr & cla
-			money += 100
-			minut += 10
-			gs 'stat'
-			if gloryhole = 0:
-				'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
-				'You put your finger in the hole hoping to entice a man to come over...'
-				'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
-				act 'Blow Him': gt 'gdktoilet', 'blowjob'
-			elseif gloryhole > 0:
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ready.jpg"></center>'
-				'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
-				'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
-				act 'Blow Him': gt 'gdktoilet', 'blowjob'
-			end
-			act 'Stop':
+		gs 'willpower', 'bj', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Stick your finger in the hole (<<will_cost>> Willpower)':
 				*clr & cla
-				'Seeing the dick poke through, you reconsider what you are about to do, do you really want to suck some strange man''s dick, through a hole in the bathroom for money?'
-				act 'Take his money and Leave':gt 'gdktoilet', 'rape'
-				act 'Give back the money and Leave': money -= 100 & gt 'gdktoilet', 'womens'
-				act 'Blow Him': gt 'gdktoilet', 'blowjob'
+				money += 100
+				minut += 10
+				gs 'willpower', 'bj', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				if gloryhole = 0:
+					'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
+					'You put your finger in the hole hoping to entice a man to come over...'
+					'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
+					act 'Blow Him': gt 'gdktoilet', 'blowjob'
+				elseif gloryhole > 0:
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ready.jpg"></center>'
+					'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
+					'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
+					act 'Blow Him': gt 'gdktoilet', 'blowjob'
+				end
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Stop (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'Seeing the dick poke through, you reconsider what you are about to do, do you really want to suck some strange man''s dick, through a hole in the bathroom for money?'
+						gs 'willpower', 'bj', 'resist', 'hard'
+						if will_cost <= pcs_willpwr:
+							act 'Take his money and Leave (<<will_cost>> Willpower)':
+								gs 'willpower', 'bj', 'resist', 'hard'
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gt 'gdktoilet', 'rape'
+							end
+						else
+							act 'Take his money and Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Give back the money and Leave': money -= 100 & gt 'gdktoilet', 'womens'
+						act 'Blow Him': gt 'gdktoilet', 'blowjob'
+					end
+				else
+					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
+		else
+			act 'Stick your finger in the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	else
 		*clr & cla
@@ -770,27 +926,41 @@ end
 if $ARGS[0] = 'virgin':
 	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghvirgin1.mp4"></video></center>'
 	'You tentatively reach out and gently touch the dick, half afraid to, but also half wanting to.'
-
-	act 'Quickly leave the stall':
-		*clr & cla
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-		'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
-		act'Leave':gt 'gdktoilet', 'womens'
-	end
 	
+	gs 'willpower', 'hj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Quickly leave the stall (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'hj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
+			'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
+			act'Leave':gt 'gdktoilet', 'womens'
+		end
+	else
+		act 'Quickly leave the stall (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 	act 'Grab it':
 		*clr & cla
 		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfeeling.mp4"></video></center>'
 		'Biting your lip and deciding you want to feel it some more, you reach over again and grab it. You caress it with your hand, it is harder than you expected and warm to the touch, it almost feels like it is throbbing in your hand. Unexplained feelings of excitement run through your body. You hear through the wall the guy saying, "Stop playing with it and stroke it." "Huh?" You reply, not knowing why he wants you to stroke it. He replies, "Really, you don''t know? Just grab it with your hand and slide it up and down."'
 		gs 'arousal', 'foreplay', 5, 'unknown'
 		gs 'stat'
-		act 'Stop':
-			*clr & cla
-			gs 'arousal', 'end'
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-			'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop?... Hello? Are you still there? What the fuck!"'
-			act 'Quickly get out': gt 'gdktoilet', 'womens'
+		gs 'willpower', 'hj', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'hj', 'resist', 'hard'
+				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
+				'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop?... Hello? Are you still there? What the fuck!"'
+				act 'Quickly get out': gt 'gdktoilet', 'womens'
+			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 'Slide your hand on his penis':
 			*clr & cla
@@ -842,15 +1012,22 @@ if $ARGS[0] = 'blowjob':
 			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
 			act 'Get up': gt'gdktoilet', 'emptystall'
 		end
-		act 'Step back':
-			*clr & cla
-			facial += 1
-			gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-			'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-			act 'Get up': gt'gdktoilet', 'emptystall'
+		gs 'willpower', 'swallow', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Step back (<<will_cost>> Willpower)':
+				*clr & cla
+				facial += 1
+				gs 'willpower', 'swallow', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
+				'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+				act 'Get up': gt'gdktoilet', 'emptystall'
+			end
+		else
+			act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
@@ -890,38 +1067,53 @@ if $ARGS[0] = 'anal':
 		gs 'arousal', 'anal', 5, 'unknown', 'sub'
 		gs 'stat'
 		
-		act 'Stop':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/analpain.jpg"></center>'
-			'The pain gets to be to much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
-			gs 'arousal', 'end'
-			gs 'stat'
-
-			act 'Leave': gt'gdktoilet', 'womens'
+		gs 'willpower', 'anal', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'anal', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/analpain.jpg"></center>'
+				'The pain gets to be to much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
+				act 'Leave': gt'gdktoilet', 'womens'
+			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 cum in your ass':
 			*clr & cla
 			gs 'cum_call', 'anus', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanalcream1.mp4"></video></center>'
-			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
 			gs 'arousal', 'anal', 10, 'unknown', 'sub'
 			minut -= 9
 			gs 'arousal', 'end'
 			gs 'stat'
+			
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanalcream1.mp4"></video></center>'
+			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
 
 			act 'Get up': gt'gdktoilet', 'emptystall'
 		end
-		act 'Let him cum all over your ass':
-			*clr & cla
-			gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcumonass.jpg"></center>'
-			'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
-			gs 'arousal', 'anal', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
+		gs 'willpower', 'cum_inside_anal', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Let him cum all over your ass (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'cum_inside_anal', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'anal', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcumonass.jpg"></center>'
+				'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
 
-			act 'Get up': gt'gdktoilet', 'emptystall'
+				act 'Get up': gt'gdktoilet', 'emptystall'
+			end
+		else
+			act 'Let him cum all over your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 		act 'Turn around, kneel and let him cum in your mouth':
 			*clr & cla
@@ -936,18 +1128,25 @@ if $ARGS[0] = 'anal':
 
 			act 'Get up': gt'gdktoilet', 'emptystall'
 		end
-		act 'Turn around, kneel and let him cum on your face':
-			*clr & cla
-			facial += 1
-			gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-			'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-			gs 'arousal', 'hj', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
+		gs 'willpower', 'swallow', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Turn around, kneel and let him cum on your face (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'swallow', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				facial += 1
+				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'hj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
+				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
 
-			act 'Get up': gt'gdktoilet', 'emptystall'
+				act 'Get up': gt'gdktoilet', 'emptystall'
+			end
+		else
+			act 'Turn around, kneel and let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
@@ -994,32 +1193,48 @@ if $ARGS[0] = 'pussy2':
 
 			act 'Get dressed': gt'gdktoilet', 'emptystall'
 		end
-		act 'Quickly turn around and get on your knees':
-			*clr & cla
-			act 'Let him cum in your mouth':
-				*clr & cla
-				swallow += 1
-				gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-				'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-				gs 'arousal', 'bj', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
-				gs 'stat'
-				act 'Get dressed': gt'gdktoilet', 'emptystall'
-			end
-			act 'Let him cum on your face':
+		gs 'willpower', 'cum_inside', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Quickly turn around and get on your knees (<<will_cost>> Willpower)':
 				*clr & cla
-				facial += 1
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-				gs 'arousal', 'hj', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
+				gs 'willpower', 'cum_inside', 'resist'
+				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
-				act 'Get dressed': gt'gdktoilet', 'emptystall'
+				act 'Let him cum in your mouth':
+					*clr & cla
+					swallow += 1
+					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
+					'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+					gs 'arousal', 'bj', 10, 'unknown', 'sub'
+					minut -= 9
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'Get dressed': gt'gdktoilet', 'emptystall'
+				end
+				gs 'willpower', 'swallow', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Let him cum on your face (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'swallow', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						facial += 1
+						gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+						gs 'arousal', 'hj', 10, 'unknown', 'sub'
+						minut -= 9
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
+						'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+
+						act 'Get dressed': gt'gdktoilet', 'emptystall'
+					end
+				else
+					act 'Let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
+		else
+			act 'Quickly turn around and get on your knees (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	else
 		if sexcontra = 4:

locations/gevent.qsrc

@@ -132,10 +132,6 @@ if $ARGS[0] = '3':
 	*clr & cla
 	menu_off = 1
 	gs 'drugs', 'alcohol', 'vodka', 3
-	minut += 120
-	stat['bj'] += 3
-	stat['anal'] += 3
-	stat['vaginal'] += 3
 	pcs_vag += 3
 	pcs_ass += 3
 	pcs_throat += 3
@@ -162,6 +158,13 @@ if $ARGS[0] = '3':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/3.jpg"></center>'
 	'You go with the Armenian to his home nearby. In the apartment there are two more guys, also Armenians. They speak to each other in their own language, while drinking alot of alcohol. You don''t realise just how strong it is until you are completely wasted, then they strip and fuck you, taking turns in all of your holes, finishing inside and all over you, all the while they are filming with there phones. Finally, when they are spent and bored of you, they kicked you out of the apartment.'
+	
+	gs 'arousal', 'bj', 50, 'rough', 'rape', 'humiliation', 'group'
+	gs 'arousal', 'vaginal', 50, 'rough', 'rape', 'humiliation', 'group'
+	gs 'arousal', 'anal', 50, 'rough', 'rape', 'humiliation', 'group'
+	minut -= 50
+	gs 'arousal', 'end'
+	gs 'stat'
 
 	act 'Continue':gt 'pavResidential'
 end
@@ -171,16 +174,18 @@ if $ARGS[0] = '4':
 	menu_off = 1
 	guy += 1
 	gs 'drugs', 'alcohol', 'vodka'
-	stat['vaginal'] += 1
 	pcs_vag += 1
 	cumprecheck = 1
 	gs 'cum_manage'
 	spafinloc = 4
 	gs 'cum_manage'
-	minut += 50
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/4.jpg"></center>'
 	'You accompany the guy to his house, where you enjoy a few beverages with him. A while later you find yourself on your back, getting pounded by this stranger. He rides you with his hairy body and pulls out right before he orgasms, draping his load all over your buttocks. Not bothering to clean it up, you simply get dressed. You sit back down and chat with him for a while, drinking some tea in an attempt to sober up before leaving. You still feel rather drunk when you close the door behind you, returning to the streets.'
+	
+	gs 'arousal', 'vaginal', 20, 'humiliation'
+	gs 'arousal', 'end'
+	gs 'stat'
 
 	act 'Return to Pavlovsk':gt 'pavResidential'
 end
@@ -189,13 +194,11 @@ if $ARGS[0] = '5':
 	*clr & cla
 	menu_off = 1
 	guy += 1
-	stat['vaginal'] += 1
 	pcs_vag += 1
 	cumprecheck = 1
 	gs 'cum_manage'
 	spafinloc = 4
 	gs 'cum_manage'
-	minut += 15
 	money += 100
 	slutty += 1
 	pav_prostitute += rand(2,4)
@@ -203,6 +206,10 @@ if $ARGS[0] = '5':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/5.jpg"></center>'
 	'The guy quickly pulls you into the bushes, separated enough from the main roads to get a quick fuck in without being noticed. Not even bothering to undress you, he simply pulls your clothes to the side and thrusts his dick inside you. Within minutes, his breathing grows heavier and he growls as he shoots his load onto your ass cheeks. He pants: "Nice, babe... you''re definitely worth the money", as he hands you 100 <b>₽</b> and leaves.'
 
+	gs 'arousal', 'vaginal', 15, 'prostitution'
+	gs 'arousal', 'end'
+	gs 'stat'
+	
 	act 'Straighten your clothes':gt 'pavResidential'
 end
 
@@ -210,13 +217,9 @@ if $ARGS[0] = '6':
 	*clr & cla
 	menu_off = 1
 	gs 'cikl'
-	hour = 12
-	minut = 17
 	pav_sex += rand(8,16)
 	guyondisco = rand(5, 10)
 	guy += guyondisco
-	stat['bj'] += guyondisco
-	stat['vaginal'] += guyondisco
 	pcs_vag += guyondisco
 	pcs_throat += guyondisco
 	gang += 1
@@ -258,6 +261,12 @@ if $ARGS[0] = '6':
 	'Taking their turns fucking your mouth and pussy mercilessly, some even came back for seconds while one of them made sure to capture all of it on camera. The last thing you remember is him taking some close-ups of your cum-covered face, saying: "Man look at this whore, no inhibitions whatsoever! This video is going to be a huge hit on the internet!"'
 	'By the time you wake up again it''s the middle of the next day, and you are lying naked in a ditch somewhere just outside of town, covered in semen. Luckily they were decent enough to at least give you your clothes back, which you find in a pile next to you with your other belongings. As you quickly get dressed you silently pray they reconsidered and didn''t share the video, but at the same time know better. As you make your way back to Pavlovsk you realize this probably hurt your reputation in town as a result, since many people will have seen the video by now.'
 
+	gs 'arousal', 'bj', 600, 'rough', 'rape', 'humiliation', 'group'
+	gs 'arousal', 'vaginal', 600, 'rough', 'rape', 'humiliation', 'group'
+	minut -= 600
+	gs 'arousal', 'end'
+	gs 'stat'
+	
 	act 'Return to the Pavlovsk streets':gt 'pavResidential'
 end
 
@@ -265,9 +274,6 @@ if $ARGS[0] = '7':
 	*clr & cla
 	menu_off = 1
 	guy += 2
-	stat['anal'] += 2
-	stat['bj'] += 2
-	stat['vaginal'] += 2
 	pcs_vag += 2
 	pcs_ass += 2
 	pcs_throat += 2
@@ -288,6 +294,13 @@ if $ARGS[0] = '7':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/7.jpg"></center>'
 	'The guys bring you back to their apartment, where they swiftly strip you of your clothes and subsequently fuck you in all holes, taking turns spitroasting you. When they''re close to cumming, they force you down on your knees and they both release their loads onto your face. Before you even get a chance to wash up they kick you out, leaving you to get dressed on the streets. You desperately grab your clothes from the ground and quickly hide behind a car as you put them on, hoping no random passers-by spotted you. One of the guys is watching you through the window the whole time, and you can hear his laughter while you run away as quickly as you can.'
 
+	gs 'arousal', 'bj', 50, 'rough', 'rape', 'humiliation', 'group'
+	gs 'arousal', 'vaginal', 50, 'rough', 'rape', 'humiliation', 'group'
+	gs 'arousal', 'anal', 50, 'rough', 'rape', 'humiliation', 'group'
+	minut -= 50
+	gs 'arousal', 'end'
+	gs 'stat'
+	
 	act 'Return to the Pavlovsk streets':gt 'pavResidential'
 end
 

locations/gopnew.qsrc

@@ -34,33 +34,56 @@ if $ARGS[0] = 'start0':
 	'Once they notice you walking into their alley, one of them steps towards you. He gives you a toothy grin as he says: "Hey babe! Want to come hang out with us? We have beer!"'
 
 	act 'Have a beer with them':gt 'gopnew', 'pivas'
-
-	act 'Decline and walk away':
-		cla
-		'You wordlessly shake your head and keep walking, hoping he''ll get the message and leave you alone. He''s not giving up that easily though, and follows you.'
-		'"Come on, babe! Relax! We''re decent guys, you don''t have to be scared around us! We just want to have a good time!" he reassures you. He seems fairly genuine in his offer.'
-
-		act 'Agree to have a beer with them':gt 'gopnew', 'pivas'
-		act 'Decline again, more clearly this time':
+	
+	gs 'willpower', 'drink', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Decline and walk away (<<will_cost>> Willpower)':
 			cla
-			*clr
-			'"I have no intentions of drinking beer with you. Leave me alone!" you snap at the guy.'
-			'He squints his eyes angrily and shouts: "What!? Are you one of those snobs who look down on us? What the fuck is your problem?"'
-			'The Gopniks are often looked down upon by others, and this guy is taking it very personally that you keep refusing his offer. He''s starting to get mad at you.'
-
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'You wordlessly shake your head and keep walking, hoping he''ll get the message and leave you alone. He''s not giving up that easily though, and follows you.'
+			'"Come on, babe! Relax! We''re decent guys, you don''t have to be scared around us! We just want to have a good time!" he reassures you. He seems fairly genuine in his offer.'
+		end
+		
+		act 'Agree to have a beer with them':gt 'gopnew', 'pivas'
+		
+		gs 'willpower', 'drink', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Decline again, more clearly this time (<<will_cost>> Willpower)':
+				cla & *clr
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'"I have no intentions of drinking beer with you. Leave me alone!" you snap at the guy.'
+				'He squints his eyes angrily and shouts: "What!? Are you one of those snobs who look down on us? What the fuck is your problem?"'
+				'The Gopniks are often looked down upon by others, and this guy is taking it very personally that you keep refusing his offer. He''s starting to get mad at you.'
+			end
+			
 			act 'Agree to have a beer after all':gt 'gopnew', 'pivas'
-
-			act 'Push him away and swear at him':
-				cla
-				'"Leave me the fuck alone!" you scream at the hoodlum, and push him away. He won''t let you leave though, and blocks the exit while he grabs you by the arm.'
-				'"All I wanted to do was be nice, and you had to go and be a rude bitch! You''re coming with me, now!" he shouts angrily. All the kindness is gone from his eyes, and he looks like he won''t hesitate to use violence if you don''t do as he says.'
-				'His friends look at the two of you intently now, also upset that you won''t join them. They''ll definitely help their friend, if you try to fight him... there''s no way you can take all three of them on.'
-
-				act 'Try to squirm free and run away':
+			
+			gs 'willpower', 'drink', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Push him away and swear at him (<<will_cost>> Willpower)':
 					cla
-					'You do your best to wrestle yourself free and run for it, but the guy doesn''t let you escape and gives you a resolving punch in the face. While you try to shake off the dizziness, he and his friends drag you further into the alley. At the back end, they roughly push you against a wall.'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'"Leave me the fuck alone!" you scream at the hoodlum, and push him away. He won''t let you leave though, and blocks the exit while he grabs you by the arm.'
+					'"All I wanted to do was be nice, and you had to go and be a rude bitch! You''re coming with me, now!" he shouts angrily. All the kindness is gone from his eyes, and he looks like he won''t hesitate to use violence if you don''t do as he says.'
+					'His friends look at the two of you intently now, also upset that you won''t join them. They''ll definitely help their friend, if you try to fight him... there''s no way you can take all three of them on.'
+				end
+				
+				gs 'willpower', 'rape', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Try to squirm free and run away (<<will_cost>> Willpower)':
+						cla
+						gs 'pain', 6, 'head', 'hit'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'You do your best to wrestle yourself free and run for it, but the guy doesn''t let you escape and gives you a resolving punch in the face. While you try to shake off the dizziness, he and his friends drag you further into the alley. At the back end, they roughly push you against a wall.'
 
-					act 'Ask what they want from you':gt 'gopnew', 'bazar'
+						act 'Ask what they want from you':gt 'gopnew', 'bazar'
+					end
+				else
+					act 'Try to squirm free and run away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 
 				act 'Submit and let him take you into the alley':
@@ -69,9 +92,15 @@ if $ARGS[0] = 'start0':
 
 					act 'Ask what they want from you':gt 'gopnew', 'bazar'
 				end
-			end
-		end
-	end
+			else
+				act 'Push him away and swear at him (<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 'Decline again, more clearly this time (<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 'Decline and 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] = 'start1':
@@ -84,7 +113,18 @@ if $ARGS[0] = 'start1':
 		'"Come on, babe!" he tries. "Surely you can spare like 30 minutes and have a chat with me?"'
 
 		act 'Go drink beer with him':gt 'gopnew', 'pivas'
-		act 'Decline and leave': minut += 5 & gt 'street'
+			
+		gs 'willpower', 'drink', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Decline and leave (<<will_cost>> Willpower)': 
+				minut += 5 
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'street'
+			end
+		else
+			act 'Decline and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 	end
 
 	act 'Go drink beer with him':gt 'gopnew', 'pivas'
@@ -100,7 +140,18 @@ if $ARGS[0] = 'start2':
 		'"Come on, babe!" he tries. "Surely you can spare like 30 minutes and have a chat with me?"'
 
 		act 'Go drink beer with him':gt 'gopnew', 'pivas'
-		act 'Decline and leave': minut += 5 & gt 'street'
+		
+		gs 'willpower', 'drink', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Decline and leave (<<will_cost>> Willpower)': 
+				minut += 5 
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'street'
+			end
+		else
+			act 'Decline and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 	end
 
 	act 'Go drink beer with him':gt 'gopnew', 'pivas'
@@ -159,7 +210,18 @@ if $ARGS[0] = 'start4':
 		'"Come on, babe!" he tries. "Surely you can spare like 30 minutes and have a chat with me?"'
 
 		act 'Go drink beer with him':gt 'gopnew', 'pivas'
-		act 'Decline and leave': minut += 5 & gt 'street'
+		
+		gs 'willpower', 'drink', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Decline and leave (<<will_cost>> Willpower)': 
+				minut += 5 
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'street'
+			end
+		else
+			act 'Decline and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 	end
 
 	act 'Go drink beer with him':gt 'gopnew', 'pivas'
@@ -286,7 +348,18 @@ if $ARGS[0] = 'start6':
 		'He rubs his groin awkwardly while he tells you: "How long has it been? I want you, now. Follow me."'
 
 		act 'Go with him':gt 'gopnew', 'sexstart'
-		act 'Walk away quickly': minut += 5 & gt 'street'
+		
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Quickly leave (<<will_cost>> Willpower)': 
+				minut += 5 
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'street'
+			end
+		else
+			act 'Quickly leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 	else
 		'When you approach them, he gives you a dismissive nod, noticing you didn''t ignore him. "Good, you listened. Now get out of here, before we change our minds."'
 
@@ -517,18 +590,26 @@ if $ARGS[0] = 'bazar':
 
 				act 'Kneel before him':gt 'gopnew', 'rapebj'
 
-				act 'Refuse to blow him':
-					cla
-					*clr
-					'When you shake your head, you feel an intense pain on the side of your head and fall down to the ground. When you manage to focus your blurry gaze again, you see Vasan standing over you with a raised fist. "I wasn''t fucking asking, whore! Open. Your. Mouth."'
+				gs 'willpower', 'bj', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse to blow him (<<will_cost>> Willpower)':
+						cla & *clr
+						gs 'willpower', 'pay', 'resist'
+						gs 'pain', 8, 'head', 'hit'
+						gs 'stat'
+						'When you shake your head, you feel an intense pain on the side of your head and fall down to the ground. When you manage to focus your blurry gaze again, you see Vasan standing over you with a raised fist. "I wasn''t fucking asking, whore! Open. Your. Mouth."'
 
-					act 'Kneel before him':gt 'gopnew', 'rapebj'
-				end
+						act 'Kneel before him':gt 'gopnew', 'rapebj'
+					end
+				else
+					act 'Refuse to blow him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end	
 			end
 
 			act 'Say you don''t':
-				cla
-				*clr
+				cla & *clr
+				gs 'pain', 8, 'stomach', 'hit'
+				gs 'stat'
 				'"More lies!" Vasan spits in your face.'
 				'He punches you in the stomach before you can respond, and you collapse to your knees before him.'
 				'"That''s right bitch, get on your knees where you belong. Open your fucking mouth!" he shouts, and begins to pull down his pants.'
@@ -546,40 +627,54 @@ if $ARGS[0] = 'bazar':
 		end
 	end
 
-	act 'Say you don''t owe them anything':
-		cla
-		*clr
-		'Vasan laughs and gives you an amused look: "Oh really, and why not? Are you saying I''m a liar and that you''re not a whore?"'
-
-		act 'Tell him he''s a liar':
-			cla
-			*clr
-			'Vasan punches you in the stomach before you can even finish your sentence, besides himself with rage. "You fucking... you''re the liar!"'
+	gs 'willpower', 'misc', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Say you don''t owe them anything (<<will_cost>> Willpower)':
+			cla & *clr
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'Vasan laughs and gives you an amused look: "Oh really, and why not? Are you saying I''m a liar and that you''re not a whore?"'
 
-			act 'Drop to your knees before him':gt 'gopnew', 'rapebj'
-		end
+			act 'Tell him he''s a liar':
+				cla & *clr
+				gs 'pain', 8, 'stomach', 'hit'
+				gs 'stat'
+				'Vasan punches you in the stomach before you can even finish your sentence, besides himself with rage. "You fucking... you''re the liar!"'
 
-		act 'Tell him he''s not a liar':
-			cla
-			*clr
-			'Vasan nods affirmatively: "If I''m not a liar, that means you''re a whore! And like Konstantin said: whores pay, or they get fucked up. What''s it gonna be?"'
+				act 'Drop to your knees before him':gt 'gopnew', 'rapebj'
+			end
 
-			act 'Agree to pay':
-				cla
-				'Vasan grins, when he notices you don''t object: "Good whore. Now, let''s talk money."'
+			act 'Tell him he''s not a liar':
+				cla & *clr
+				'Vasan nods affirmatively: "If I''m not a liar, that means you''re a whore! And like Konstantin said: whores pay, or they get fucked up. What''s it gonna be?"'
 
-				act 'Ask him how much he wants':gt 'gopnew', 'dolg'
-			end
+				act 'Agree to pay':
+					cla
+					'Vasan grins, when he notices you don''t object: "Good whore. Now, let''s talk money."'
 
-			act 'Refuse to pay':
-				cla
-				'"You''re stubborn, aren''t you?" Vasan roars, clearly annoyed. Before you know it he punches you in the face, causing you to fall back onto the ground.'
-				'He undoes his pants while he walks over to you and grunts: "Here''s what happens if you don''t pay..."'
+					act 'Ask him how much he wants':gt 'gopnew', 'dolg'
+				end
+				
+				gs 'willpower', 'misc', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse to pay (<<will_cost>> Willpower)':
+						cla
+						gs 'pain', 8, 'head', 'hit'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'"You''re stubborn, aren''t you?" Vasan roars, clearly annoyed. Before you know it he punches you in the face, causing you to fall back onto the ground.'
+						'He undoes his pants while he walks over to you and grunts: "Here''s what happens if you don''t pay..."'
 
-				act 'Crawl up to your knees':gt 'gopnew', 'rapebj'
+						act 'Crawl up to your knees':gt 'gopnew', 'rapebj'
+					end
+				else
+					act 'Refuse to pay (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end	
 			end
 		end
-	end
+	else
+		act 'Say you don''t owe them anything (<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] = 'rapebj':
@@ -593,12 +688,13 @@ if $ARGS[0] = 'rapebj':
 		*clr
 
 		if vasansex = 0:vasansex = 1 & guy += 1
-
-		stat['bj'] += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/rapebj1.jpg"></center>'
 		'You stare it down for another while, but realize they''re not going to let you go until they''re satisfied.'
 		'You hesitantly part your lips a little, and take the bulbous purple head of his cock between your lips. You suck on it a little without much enthusiasm, which he notices immediately.'
 		'"What is this garbage? Put some effort into it, slut! Or else..." he grunts.'
+		
+		gs 'arousal', 'bj', 3, 'rape', 'sub', 'humiliation'
+		gs 'stat'
 
 		act 'Put some effort into it':gt 'gopnew', 'tf'
 		act 'Keep doing what you''re doing':gt 'gopnew', 'tf'
@@ -614,40 +710,53 @@ if $ARGS[0] = 'rapebj':
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/rapebj2.jpg"></center>'
 		'You open your mouth but don''t take his cock in your mouth. Instead you run your tongue up and down his shaft repeatedly, without much enthusiasm.'
 		'"What is this garbage? Put some effort into it, slut! Or else..." he grunts.'
+		
+		gs 'arousal', 'foreplay', 3, 'rape', 'sub', 'humiliation'
+		gs 'stat'
 
 		act 'Start sucking':gt 'gopnew', 'tf'
 		act 'Keep licking':gt 'gopnew', 'tf'
 	end
+		
+	gs 'willpower', 'bj', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:	
+		act 'Keep your lips tightly together (<<will_cost>> Willpower)':
+			cla & *clr
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			if vasansex = 0:vasansex = 1 & guy += 1
 
-		act 'Keep your lips tightly together':
-		cla
-		*clr
-
-		if vasansex = 0:vasansex = 1 & guy += 1
-
-		stat['bj'] += 1
-		'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/rapebj3.jpg"></center>'
-		'Vasan puts one hand over your throat, slowly choking you out while he rubs his cock against your lips impatiently. His other hand goes behind your head, and he thrusts his cock into your mouth when you try to gasp for breath.'
-		'"That''s right, whore... all you need is a little encouragement!" he laughs, and begins to fuck your mouth while he keeps choking you."'
+			'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/rapebj3.jpg"></center>'
+			'Vasan puts one hand over your throat, slowly choking you out while he rubs his cock against your lips impatiently. His other hand goes behind your head, and he thrusts his cock into your mouth when you try to gasp for breath.'
+			'"That''s right, whore... all you need is a little encouragement!" he laughs, and begins to fuck your mouth while he keeps choking you."'
+		
+			gs 'arousal', 'bj', 3, 'rape', 'sub', 'humiliation', 'rough'
+			gs 'stat'
 
-		act 'Give in and do what he wants':gt 'gopnew', 'tf'
-	end
+			act 'Give in and do what he wants':gt 'gopnew', 'tf'
+		end
+	else
+		act 'Keep your lips tightly together (<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] = 'tf':
-	minut += 3
-	pcs_throat += 1
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/rapebjt2.jpg"></center>'
 	'Vasan grabs a fistful of your hair and begins to fuck your mouth in earnest. His cock causes a gag reflex every time he hits the back of your throat, and your eyes are tearing up quickly.'
 	'He''s not giving you much chance to breathe, and you''re gasping for breath every time he gives you a bit of a break to breathe. They never last long.'
+	
+	gs 'arousal', 'bj', 3, 'rape', 'sub', 'humiliation', 'rough', 'deepthroat'
+	gs 'stat'
 
 	act 'Continue':
 		cla
 		*clr
-		minut += 3
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/rapebjt.jpg"></center>'
 		'Suddenly Vasan thrusts his cock deeper down your throat, and holds your head firmly against his groin once he bottoms out in you.'
 		'You feel like you''re going to throw up!'
+		
+		gs 'arousal', 'bj', 3, 'rape', 'sub', 'humiliation', 'rough', 'deepthroat'
+		gs 'stat'
 
 		act 'Continue':
 			cla
@@ -688,6 +797,9 @@ if $ARGS[0] = 'tf':
 					'Then he grins to his friends: "She''s all yours, guys. Have fun."'
 					'Just when they came closer to you pulling their cocks out of their pants, you hear shouting at the end of the alley. Someone spotted you!'
 					'The Gopniks quickly run away, leaving you alone on the pavement covered in cum, saliva and tears. "Remember, whore... 2,000 <b>₽</b>! Tomorrow!" Vasan shouts, before he disappears around a corner.'
+					
+					gs 'arousal', 'end'
+					gs 'stat'
 
 					act 'Return to the streets': minut += 5 & gt 'street'
 				end
@@ -878,9 +990,7 @@ if $ARGS[0] = 'sexboy1':
 end
 
 if $ARGS[0] = '1':
-	minut += 15
 	pcs_vag += 1
-	stat['vaginal'] += 1
 	gs 'boyStat', $guygop
 	cumprecheck = 1
 	gs 'cum_manage'
@@ -897,24 +1007,28 @@ if $ARGS[0] = '1':
 		pcs_horny += 10
 		'You were not satisfied.'
 	else
-		pcs_horny = 0
-		orgasm += 1
+		$orgasm_or = 'yes'
 		'You orgasm with him, holding your hand over your mouth to stop yourself from crying out.'
 	end
 
 	'<<$boydesc>> wipes his cock on your ass cheeks and tucks it back into his pants. After that, he goes back to drinking beer with his friends, not paying any more attention to you.'
+	
+	gs 'arousal', 'vaginal', 15, 'sub', 'humiliation'
+	gs 'arousal', 'end'
+	gs 'stat'
 
 	act 'Leave': minut += 5 & gt 'street'
 end
 
 if $ARGS[0] = '11':
-	minut += 15
-	stat['bj'] += 1
 	pcs_throat += 1
 	gs 'stat'
 	picrand = rand(13, 22)
 	'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj<<picrand>>.jpg"></center>'
 	'<<$boydesc>> guides you to a quiet area, and waits impatiently for you to pull his cock out of his pants. He groans contently when you begin to suck him off diligently. A few minutes later, he groans that he''s about to cum.'
+	
+	gs 'arousal', 'bj', 15, 'sub', 'humiliation'
+	gs 'stat'
 
 	act 'Let him cum in your mouth':
 		cla
@@ -931,7 +1045,10 @@ if $ARGS[0] = '11':
 			gs 'cum_manage'
 			swallow += 1
 			'You swallow <<$boydesc>>''s sperm diligently after which he wipes his dick on your lips, making you lick the last remains off. Once he''s satisfied, he pulls his pants up again and returns to his friends.'
-
+			
+			gs 'arousal', 'end'
+			gs 'stat'
+	
 			act 'Leave': minut += 5 & gt 'street'
 		end
 
@@ -941,7 +1058,10 @@ if $ARGS[0] = '11':
 			sexvolume = 7
 			gs 'cum_manage'
 			'You wait for <<$boydesc>> to turn his back on you, and discreetly spit the semen onto the ground. He doesn''t seem to care what you do with it, he''s already walking away from you.'
-
+			
+			gs 'arousal', 'end'
+			gs 'stat'
+			
 			act 'Leave': minut += 5 & gt 'street'
 		end
 	end
@@ -966,8 +1086,6 @@ if $ARGS[0] = '11':
 end
 
 if $ARGS[0] = '12':
-	minut += 15
-	stat['anal'] += 1
 	pcs_ass += 1
 	gs 'boyStat', $guygop
 	spafinloc = 4
@@ -984,13 +1102,16 @@ if $ARGS[0] = '12':
 		pcs_horny += 10
 		'He doesn''t care about your pleasure, and you''re nowhere near satisfied by the time he finishes.'
 	else
-		pcs_horny = 0
-		orgasm += 1
+		$orgasm_or = 'yes'
 		'You orgasm with him, holding your hand over your mouth to stop yourself from crying out.'
 	end
 
 	'<<$boydesc>> pulls out right before he orgasms, and ends up spraying his sperm all over your ass cheeks. He wipes his cock clean on an unsoiled spot on your ass and tucks it back into his pants, returning to his friends for another beer. He no longer cares what you do or where you go next.'
-
+	
+	gs 'arousal', 'anal', 15, 'sub', 'humiliation'
+	gs 'arousal', 'end'
+	gs 'stat'
+	
 	act 'Leave': minut += 5 & gt 'street'
 end
 
@@ -1001,8 +1122,6 @@ if $ARGS[0] = '2':
 	if GLust ! 2:tiprand = rand(0, 1)
 
 	if tiprand = 0 and GLust ! 2:
-		stat['bj'] += 3
-		gang += 1
 		pcs_throat += 3
 		namgopctnc = 6
 		:goptipr0loop
@@ -1027,15 +1146,18 @@ if $ARGS[0] = '2':
 		'<<$namgop[0]>>. The guys make you kneel before them, and begin to slap their cocks against your face impatiently. You do your best to pay attention to all of them, sucking them off one by one and jerking off those you can''t put in your mouth.'
 
 		'They cum all over your face and in your mouth, and your face looks like a mess by the time they finally let you go.'
+		
+		gs 'arousal', 'bj', 15, 'sub', 'humiliation', 'gangbang'
+		gs 'arousal', 'hj', 15, 'sub', 'humiliation', 'gangbang'
+		minut -= 15
+		gs 'arousal', 'end'
+		gs 'stat'
 
 		act 'Leave': minut += 5 & gt 'street'
+		
 	elseif tiprand = 1 or GLust = 2:
-		stat['bj'] += 1
 		pcs_vag += 1
-		stat['vaginal'] += 1
-		stat['anal'] += 1
 		pcs_ass += 5
-		gang += 1
 		pcs_throat += 3
 		namgopctnc = 6
 		:goptipr1loop
@@ -1075,27 +1197,27 @@ if $ARGS[0] = '2':
 			pcs_horny += 10
 			'The guys don''t care about your pleasure, and you''re nowhere near satisfied by the time they all finish.'
 		else
-			pcs_horny = 0
-			orgasm += 1
+			$orgasm_or = 'yes'
 			'You orgasm during their relentless pounding, holding your hand over your mouth to stop yourself from crying out loud.'
 		end
 
 		'The guys just cum wherever they feel like while they''re fucking you, giving you no warning. By the time they all finish, you''re a mess. You should probably go take a shower...'
-
+		
+		gs 'arousal', 'bj', 15, 'sub', 'humiliation', 'gangbang'
+		gs 'arousal', 'vaginal', 15, 'sub', 'humiliation', 'gangbang'
+		gs 'arousal', 'anal', 15, 'sub', 'humiliation', 'gangbang'
+		minut -= 15
+		gs 'arousal', 'end'
+		gs 'stat'
+		
 		act 'Leave': minut += 5 & gt 'street'
 	end
 end
 
 if $ARGS[0] = '3':
-	minut += 30
 	gs 'stat'
-
-	stat['bj'] += 1
 	pcs_vag += 1
-	stat['vaginal'] += 1
-	stat['anal'] += 1
 	pcs_ass += 5
-	gang += 1
 	pcs_throat += 3
 
 	namgopctnc = 6
@@ -1131,22 +1253,28 @@ if $ARGS[0] = '3':
 		pcs_horny += 10
 		'The guys don''t care about your pleasure, and you''re nowhere near satisfied by the time they all finish.'
 	else
-		pcs_horny = 0
-		orgasm += 1
+		$orgasm_or = 'yes'
 		'You orgasm during their relentless pounding, holding your hand over your mouth to stop yourself from crying out loud.'
 	end
+	
+	gs 'arousal', 'bj', 15, 'sub', 'humiliation', 'gangbang'
+	gs 'arousal', 'vaginal', 15, 'sub', 'humiliation', 'gangbang'
+	gs 'arousal', 'anal', 15, 'sub', 'humiliation', 'gangbang'
+	minut -= 15
+	gs 'arousal', 'end'
+	gs 'stat'
 
 	act 'Leave': minut += 5 & gt 'street'
 end
 
 if $ARGS[0] = 'degrading':
-	minut += 120
 	pcs_vag += 10
 	pcs_ass += 10
-	stat['anal'] += 1
-	stat['vaginal'] += 1
-	rape += 1
 	gopopusday = daystart
+	gs 'pain', 6, 'cheeks', 'slap'
+	gs 'pain', 6, 'breasts', 'slap'
+	gs 'pain', 6, 'vaginal', 'stretch'
+	gs 'pain', 6, 'anal', 'stretch'
 	gs 'stat'
 
 	if VasanTut = 2 and vasansex = 0:vasansex = 1 & guy += 1
@@ -1158,6 +1286,12 @@ if $ARGS[0] = 'degrading':
 
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/deg'+rand(1, 9)+'.jpg"></center>'
 	'The guys drive you to a nearby building and drag you inside, forcing you to undress. They spend the next two hours degrading you in every way imaginable: they slap your face and tits, they spit in your face, but most of the time they try to force large objects into your vagina and ass. By the time you''re exhausted, they pick you up and dump you in the back yard with your clothes. When you catch your breath again, you slowly put your clothes on and try to find your way back to the main streets.'
+	
+	gs 'arousal', 'vaginal', 120, 'sub', 'humiliation', 'gangbang', 'rape'
+	gs 'arousal', 'anal', 120, 'sub', 'humiliation', 'gangbang', 'rape'
+	minut -= 15
+	gs 'arousal', 'end'
+	gs 'stat'
 
 	act 'Leave': minut += 5 & gt 'street'
 end

locations/gopsex.qsrc

@@ -194,7 +194,7 @@ if $ARGS[0] = 'gopsex_select':
 		act 'Sex with Vitek':
 			if shgopsex_vitya_count <= 0:
 				cla
-				'Vitek says: "Sorry <<$pcs_nickname>>, I can''t to fuck more today."'
+				'Vitek says: "Sorry <<$pcs_nickname>>, I can''t fuck you more today."'
 				act 'Leave': gt 'shulga_room', 'start'
 			else
 				$gopsex_n_npc = 2
@@ -211,7 +211,17 @@ if $ARGS[0] = 'gopsex_select':
 			end
 		end
 	end
-	act 'Leave': gt 'shulga_room', 'start'
+	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 'shulga_room', '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
 end
 !===========================================================!
 !Sex 1 on 1!
@@ -223,8 +233,8 @@ if $ARGS[0] = 'shgopsex':
 		'"So <<$boydesc>>, do you want to have fun with me?" You lick your lips sensually and ask him: "What can I do for you?"'
 		if mesec > 0:
 			'<font color = red><b>You warn him that you''re on your period and so your pussy is off limits!</b></font>'
-		elseif mesec <=0 and pcs_vag <=0:
-			'<font color = red><b>You tell him, that you want to save you virginity, so your pussy is available only for eating.</b></font>'
+		elseif mesec <= 0 and pcs_vag <= 0:
+			'<font color = red><b>You tell him, that you want to save your virginity, so your pussy is available only for eating.</b></font>'
 		end
 	end
 	act 'Hand job': gt 'gopsex', 'shgopsex_hj'
@@ -232,17 +242,25 @@ if $ARGS[0] = 'shgopsex':
 	if pcs_throat >= 20:
 		act 'Deep Throat': gt 'gopsex', 'shgopsex_throat'
 	end
-	if mesec <=0 and pcs_vag >=1:
+	if mesec <= 0 and pcs_vag >= 1:
 		act 'Sex': gt 'gopsex', 'shgopsex_vag'
 	end
 	act 'Anal sex': gt 'gopsex', 'shgopsex_anal'
 	act 'Grope boobs': gt 'gopsex', 'shgopsex_tits'
-	if mesec <=0:
+	if mesec <= 0:
 		act 'Sixty nine': gt 'gopsex', 'shgopsex_69'
 		act 'Cunnilingus': gt 'gopsex', 'shgopsex_lick'
-	end	
-	if pcs_dom >= 5: 
-		act 'Leave': gt 'shulga_room', 'start'
+	end
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Leave (<<will_cost>> Willpower)':
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'shulga_room', '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
 end
 !ending sex
@@ -274,7 +292,7 @@ if $ARGS[0] = 'shgopsex_lick':
 	!Vasya (NPC 1)
 	if $gopsex_n_npc = 1:
 		if pav_slut >= 100:
-			'<<$pcs_nickname>> you are a <<$gnikname>>, it''s unpleasant for me to lick cunt such girl, God knows how many cocks you have got there today. So go ahead, expose your whorish holes! I''m going to fuck you.'
+			'<<$pcs_nickname>> you are a <<$gnikname>>, it''s unpleasant for me to lick the cunt of such a girl, God knows how many cocks you have got there today. So go ahead, show me your whorish holes! I''m going to fuck you.'
 		elseif pav_slut < 100:
 			pcs_horny += 10
 			minut += ''+rand(3,7)+''
@@ -286,7 +304,7 @@ if $ARGS[0] = 'shgopsex_lick':
 	!Vitya (NPC 2)
 	if $gopsex_n_npc = 2:
 		if pav_slut >= 100:
-			'<<$pcs_nickname>> you are a <<$gnikname>>, it''s unpleasant for me to lick cunt such girl, God knows how many cocks you have got there today. So go ahead, show me better your whorish holes!'
+			'<<$pcs_nickname>> you are a <<$gnikname>>, it''s unpleasant for me to lick the cunt of such a girl, God knows how many cocks you have got there today. So go ahead, show me your whorish holes! I''m going to fuck you.'
 		elseif pav_slut < 100:
 			pcs_horny += 10
 			minut += ''+rand(3,7)+''
@@ -298,10 +316,10 @@ if $ARGS[0] = 'shgopsex_lick':
 	end
 	!Dan (NPC 0)
 	if $gopsex_n_npc = 0:
-	'"Dan, lick my pussy, please." You ask sweetly.'
-	'"<<$pcs_nickname>>, aren''t you screwy to asking me doing such stuff?"'
-	'"And what''s wrong with that? Are you ashamed to do me nicely?"'
-	'"Yes, it''s unpleasant for me to lick cunt of a slut, God knows how many cocks you have got there today ... So come on! Don''t fuck with me ... Expose your whorish holes! I''m going to fuck you."'
+		'"Dan, lick my pussy, please." You ask sweetly.'
+		'"<<$pcs_nickname>>, aren''t you screwy to asking me doing such stuff?"'
+		'"And what''s wrong with that? Are you ashamed to do me nicely?"'
+		'"Yes, it''s unpleasant for me to lick the cunt of a slut, God knows how many cocks you have got there today ... So come on! Don''t fuck with me ... Expose your whorish holes! I''m going to fuck you."'
 	end
 	act 'Sex selection': gs 'gopsex', 'shgopsex','cont'
 end
@@ -312,7 +330,7 @@ if $ARGS[0] = 'shgopsex_69':
 	gs 'stat'
 	if $gopsex_n_npc >= 1:
 		if pav_slut >= 100:
-			'<<$pcs_nickname>> you are a <<$gnikname>>, it''s unpleasant for me to lick cunt such girl, God knows how many cocks you have got there today. So go ahead, show me better your whorish holes!'
+			'<<$pcs_nickname>> you are a <<$gnikname>>, it''s unpleasant for me to lick the cunt of such a girl, God knows how many cocks you have got there today. So go ahead, show me better your whorish holes! I''m going to fuck you.'
 			act 'Sex selection': gs 'gopsex', 'shgopsex','cont'
 		elseif pav_slut < 100:
 			gs 'arousal', 'bj', 5
@@ -478,7 +496,7 @@ if $ARGS[0] = 'shgopsex_group':
 		act 'Suck all at once': gs 'gopsex','hide','group_sex_start' & gt 'gopsex','hide','shgopsex_group_bja'
 	end
 	if pcs_vag >=1 and mesec <=0:
-		act 'The pussy': gs 'gopsex','hide','group_sex_start' & gt 'gopsex','hide','shgopsex_group_vag'
+		act 'In the pussy': gs 'gopsex','hide','group_sex_start' & gt 'gopsex','hide','shgopsex_group_vag'
 	end
 	act 'In the ass': gs 'gopsex','hide','group_sex_start' & gt 'gopsex','hide','shgopsex_group_anal'
 	if pcs_vag >=1 and mesec <=0:
@@ -490,9 +508,6 @@ if $ARGS[0] = 'shgopsex_group':
 	if pcs_ass >= 30:
 		act 'Three cocks in the ass': gs 'gopsex','hide','group_sex_start' & gt 'gopsex','hide','shgopsex_group_tripleanal'
 	end
-	if pcs_dom => 10:
-		act 'Leave': gt 'shulga_room', 'start'
-	end
 	gs 'stat'
 end
 !hide small parts of code
@@ -982,7 +997,7 @@ if $ARGS[0] = 'hide':
 		killvar 'O'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/gopsex/group/cum/swallow'+rand(1,12)+'.jpg"></center>'
-		'One by one the '+func('gopsex','hide','gop_text_npcr')+' cumm their semen into your mouth and you swallow it all.'
+		'One by one the '+func('gopsex','hide','gop_text_npcr')+' cum their semen into your mouth and you swallow it all.'
 		gs 'arousal', 'end'
 		act 'Leave': gt 'shulga_room', 'start'
 	end &!--- shgopsex_group_swallow ---
@@ -1003,7 +1018,7 @@ if $ARGS[0] = 'hide':
 		gs 'arousal', 'end'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/gopsex/group/cum/cumbody'+rand(1,15)+'.jpg"></center>'
-		'The '+func('gopsex','hide','gop_text_npcr')+' come, squirting their hot sticky cum all over your body.' 
+		'The '+func('gopsex','hide','gop_text_npcr')+' cum, squirting their hot sticky cum all over your body.' 
 		act 'Leave': gt 'shulga_room', 'start'
 	end &!--- shgopsex_group_cumbelly ---
 
@@ -1023,7 +1038,7 @@ if $ARGS[0] = 'hide':
 		gs 'arousal', 'end'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/gopsex/group/cum/cumvag'+rand(1,4)+'.jpg"></center>'
-		'One by one the '+func('gopsex','hide','gop_text_npcr')+' take their turns and shot their hot cum onto your pussy.'
+		'One by one the '+func('gopsex','hide','gop_text_npcr')+' take their turns shooting their hot cum into your pussy.'
 		act 'Leave': gt 'shulga_room', 'start'
 	end &!--- shgopsex_group_cumvag ---
 

locations/gopskver.qsrc

@@ -28,13 +28,21 @@ if kotovLoveQW > 0:
 		else
 			'Vitek Kotov sees you walking in the park, and tells you to come over. When you approach him, he explains he''s drinking some beer with his friends in the park, and offers you to join them.'
 		end
-
-		act 'Decline and leave':
-			if $prevloc = 'gkafe':
-				gt 'gkafe'
-			else
-				gt 'gskver', 'start'
+		
+		gs 'willpower', 'drink', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Decline and leave (<<will_cost>> Willpower)':
+				gs 'willpower', 'drink', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				if $prevloc = 'gkafe':
+					gt 'gkafe'
+				else
+					gt 'gskver', 'start'
+				end
 			end
+		else
+			act 'Decline and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		act 'Drink beer with Vitek and the guys':
@@ -44,8 +52,8 @@ if kotovLoveQW > 0:
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/beer3.jpg"></center>'
 			'The guys pour out a beer for you, and you enjoy a nice cold beer in their company.'
-
-			act 'Continue':
+			
+			act 'Leave':
 				if $prevloc = 'gkafe':
 					gt 'gkafe'
 				else
@@ -56,10 +64,10 @@ if kotovLoveQW > 0:
 			if hour = 20:
 				*nl
 				if week = 5 or week = 6:
-					'It''s evening, and the boys are getting ready to go to the disco like they do every friday and saturday. You could call it a night and leave them alone, or tag along.'
+					'It''s evening, and the boys are getting ready to go to the disco like they do every Friday and Saturday. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 					act 'Go to the disco with the boys':minut += 15 & gt 'gdkin'
 				else
-					'It''s evening, and the boys are getting ready to go to Vasily'' Home. You could call it a night and leave them alone, or tag along.'
+					'It''s evening, and the boys are getting ready to go to Vasily'' Home. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 					act 'Go with the boys':minut += 15 & gt 'shulgahall'
 				end
 			end
@@ -83,10 +91,10 @@ if kotovLoveQW > 0:
 		*nl
 		act 'Leave':gt 'gskver', 'start'
 		if week = 5 or week = 6:
-			'It''s evening, and the boys are getting ready to go to the disco like they do every friday and saturday. You could call it a night and leave them alone, or tag along.'
+			'It''s evening, and the boys are getting ready to go to the disco like they do every Friday and Saturday. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 			act 'Go to the disco with the boys': minut += 15 & gt 'gdkin'
 		else
-			'It''s evening, and the boys are getting ready to go to Vasily''s home. You could call it a night and leave them alone, or tag along.'
+			'It''s evening, and the boys are getting ready to go to Vasily''s home. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 			act 'Go to with the boys': minut += 15 & gt 'shulgahall'
 		end
 	end
@@ -96,16 +104,26 @@ else
 			*nl
 			act 'Leave':gt 'gskver', 'start'
 			if week = 5 or week = 6:
-				'It''s evening, and the boys are getting ready to go to the disco like they do every friday and saturday. You could call it a night and leave them alone, or tag along.'
+				'It''s evening, and the boys are getting ready to go to the disco like they do every Friday and Saturday. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 				act 'Go to the disco with the boys': minut += 15 & gt 'gdkin'
 			else
-				'It''s evening, and the boys are getting ready to go to Vasily''s home. You could call it a night and leave them alone, or tag along.'
+				'It''s evening, and the boys are getting ready to go to Vasily''s home. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 				act 'Go to with the boys': minut += 15 & gt 'shulgahall'
 			end
-		elseif alko >= 9 and alko < 9 and DansOralSlut = 1:
+		elseif alko >= 6 and alko < 9 and DansOralSlut = 1:
 			'You''re quite drunk, and before going to the disco Dan offers to walk you home.'
-
-			if pcs_dom >= 5: act '"No need, I can find my own way home"': gt 'pavComplex', 'start'
+			
+			gs 'willpower', 'misc', 'resist'
+			if will_cost <= pcs_willpwr:
+				act '"No need, I can find my own way home" (<<will_cost>> Willpower)':
+					gs 'willpower', 'misc', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'pavComplex', 'start'
+				end
+			else
+				act '"No need, I can find my own way home" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 
 			act 'Go with Dan':
 				*clr & cla
@@ -114,21 +132,38 @@ else
 				gs 'stat'
 				'You''re walking down the street, feeling a bit wobbly from the alcohol while Dan supports your weight. He tells you funny stories and anecdotes along the way, and before you know it you''re at your apartment building. When you open the door and enter the building, Dan suddenly pulls you to the side. He''s quite rough about it, and shoves you into a dark corner of the stairwell. He takes your hand by the chin and whispers in your ear: "Your turn to make me feel good, slut. Otherwise I''m telling everyone."'
 				gs 'gopskver', 'dan_blowjob'
+				
+				gs 'willpower', 'bj', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Push him away and go home (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'fame', 'pav', 'sex', 60
+						gs 'willpower', 'bj', 'resist', 'hard'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'You push him away from you and say indignantly: "No way, Dan! Leave me alone!"'
+						'Dan''s eyes look murderous, but he doesn''t touch you. After a few seconds he bounces back, and he grins as he says: "Suit yourself, whore... your reputation in town will be ruined", and then walks away before you can get another word in.'
 
-				act 'Push him away':
-					*clr & cla
-					pav_prostitute += 60
-					gs 'stat'
-					'You push him away from you and say indignantly: "No way, Dan! Leave me alone!"'
-					'Dan''s eyes look murderous, but he doesn''t touch you. After a few seconds he bounces back, and he grins as he says: "Suit yourself, whore... your reputation in town will be ruined", and then walks away before you can get another word in.'
-
-					act 'Go home': gt 'pavComplex', 'start'
+						act 'Go home': gt 'pavComplex', 'start'
+					end
+				else
+					act 'Push him away and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 			end
 		elseif alko >= 6 and alko < 9 and DansOralSlut = 0:
 			'You''re quite drunk, and before going to the disco Dan offers to walk you home.'
 
-			if pcs_dom >= 5: act 'Decline': gt 'pavComplex', 'start'
+			gs 'willpower', 'misc', 'resist'
+			if will_cost <= pcs_willpwr:
+				act '"No need, I can find my own way home" (<<will_cost>> Willpower)':
+					gs 'willpower', 'misc', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'pavComplex', 'start'
+				end
+			else
+				act '"No need, I can find my own way home" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 
 			act 'Go with Dan':
 				*clr & cla
@@ -136,16 +171,36 @@ else
 				minut += 15
 				gs 'stat'
 				'You''re walking down the street, feeling a bit wobbly from the alcohol while Dan supports your weight. He tells you funny stories and anecdotes along the way, and before you know it you''re at your apartment building. When you open the door and enter the building, Dan suddenly pulls you to the side. He''s quite rough about it, and shoves you into a dark corner of the stairwell. He takes your hand by the chin and kisses your lips hard.'
-
-				if pcs_dom >= 10: act 'Push him away and go home': pcs_dom -= 2 & gt 'pavComplex', 'start'
+				
+				gs 'willpower', 'sex_other', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Push him away and go home (<<will_cost>> Willpower)':
+						gs 'willpower', 'sex_other', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'pavComplex', 'start'
+					end
+				else
+					act 'Push him away and go home (<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 back':
 					*clr & cla
 					pcs_horny += 10
 					gs 'stat'
-					'You return his kiss, unsure why he''s kissing you... he never seemed to be that interested in you. Then you feel his hands on your shoulders, and Dan firmly presses down on them trying to get you to drop to your knees. He whispers reassuringly: "Don''t worry, <<$pcs_nickname>>... I didn''t tell anyone about all the things you did. Do a good job, and your secret will stay safe."'
+					'You return his kiss, unsure why he''s kissing you... he never seemed to be that interested in you. Then you feel his hands on your shoulders, and Dan firmly presses down on them trying to get you to drop to your knees. He whispers reassuringly: "Don''t worry, <<$pcs_nickname>>... I won''t tell anyone about this. Do a good job, and this secret will stay between us."'
 
-					if pcs_dom >= 15: act 'Push him away and go home': pcs_dom -= 5 & gt 'pavComplex', 'start'
+					gs 'willpower', 'bj', 'resist'
+					if will_cost <= pcs_willpwr:
+						act 'Push him away and go home (<<will_cost>> Willpower)':
+							gs 'willpower', 'bj', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							gt 'pavComplex', 'start'
+						end
+					else
+						act 'Push him away and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 
 					gs 'gopskver', 'dan_blowjob'
 				end
@@ -153,7 +208,17 @@ else
 		elseif alko >= 9:
 			'You got absolutely hammered in the park, and are swaying from side to side when you walk down the pathway. Suddenly Vasily hugs your waist tightly and begins to lead you somewhere, with his friends following him.'
 
-			if pcs_dom >= 5: act 'Say you have to go and leave them': pcs_dom -= 1 & gt 'pavComplex', 'start'
+			gs 'willpower', 'gangbang', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Push them away and go home (<<will_cost>> Willpower)':
+					gs 'willpower', 'gangbang', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'pavComplex', 'start'
+				end
+			else
+				act 'Push them away and go home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 
 			act 'Go with the guys':
 				*clr & cla
@@ -197,12 +262,20 @@ else
 			if alko < 6:
 				iif($prevloc = 'gkafe','The boys ordered some extra beers ','The boys have some extra beers with them,') + 'and invite you to have a seat and join them.'
 
-				act 'Decline the beer and leave':
-					if $prevloc = 'gkafe' or $prevloc = 'pavtrainhall':
-						gt $prevloc
-					else
-						gt 'gskver', 'start'
+				gs 'willpower', 'drink', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Decline and leave (<<will_cost>> Willpower)':
+						gs 'willpower', 'drink', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						if $prevloc = 'gkafe' or $prevloc = 'pavtrainhall':
+							gt $prevloc
+						else
+							gt 'gskver', 'start'
+						end
 					end
+				else
+					act 'Decline and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 
 				act 'Drink beer with the guys':
@@ -213,7 +286,7 @@ else
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/beer3.jpg"></center>'
 					'The guys cheer and pour out a beer for you. Vasily gives you ' + iif($prevloc = 'gkafe','a glass','the cup') +' while the others propose a toast, already having beers in their hands. You happily join them in their toast, and spend the next 15 minutes chatting with them and having sips of your cold beer.'
 
-					act 'Continue':
+					act 'Leave':
 						if $prevloc = 'gkafe' or $prevloc = 'pavtrainhall':
 							gt $prevloc
 						else
@@ -223,10 +296,10 @@ else
 					if hour = 20:
 						*nl
 						if week = 5 or week = 6:
-							'It''s evening, and the boys are getting ready to go to the disco like they do every friday and saturday. You could call it a night and leave them alone, or tag along.'
+							'It''s evening, and the boys are getting ready to go to the disco like they do every Friday and Saturday. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 							act 'Go to the disco with the boys': minut += 15 & gt 'gdkin'
 						else
-							'It''s evening, and the boys are getting ready to go to Vasily''s home. You could call it a night and leave them alone, or tag along.'
+							'It''s evening, and the boys are getting ready to go to Vasily''s home. They invite you to come along with them. You could call it a night and leave them alone, or tag along.'
 							act 'Go with the boys': minut += 15 & gt 'shulgahall'
 						end
 					end
@@ -242,7 +315,7 @@ else
 						'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big11.jpg"></center>'
 						'Vasily puts his hand on your shoulder and tells you that his friends aren''t the kind of guys a nice girl should be getting drunk with and sends you on your way.'
 
-						act 'Continue':
+						act 'Leave':
 							if $prevloc = 'gkafe' or $prevloc = 'pavtrainhall':
 								gt $prevloc
 							else
@@ -266,14 +339,21 @@ else
 
 						act 'Thank them for the beer and leave':gt 'gskver', 'start'
 					end
+					
+					gs 'willpower', 'exhib', 'resist'
+					if will_cost <= pcs_willpwr:
+						act '"What? No!" (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'exhib', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							'You raise your voice a little and act surprised: "What? No way! Whoever told you that was lying!"'
+							'However, Dan doesn''t fall for your act, and matter-of-factly says: "<<$pcs_nickname>>, you''re a slut. We''ve all seen you, the whole town knows it. Why are you even trying to deny it? You''re such a terrible liar..."'
 
-					act '"What? No!"':
-						*clr & cla
-						gs 'stat'
-						'You raise your voice a little and act surprised: "What? No way! Whoever told you that was lying!"'
-						'However, Dan doesn''t fall for your act, and matter-of-factly says: "<<$pcs_nickname>>, you''re a slut. We''ve all seen you, the whole town knows it. Why are you even trying to deny it? You''re such a terrible liar..."'
-
-						act 'Leave':gt 'gskver', 'start'
+							act 'Leave':gt 'gskver', 'start'
+						end
+					else
+						act '"What? No!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
 				elseif pav_slut < 125:
 					if $prevloc = 'gkafe':'Vasily suggests to the guys to leave the cafe and continue drinking in the park. You are too drunk to resist so you just follow them to the park'
@@ -289,41 +369,53 @@ else
 							gs 'stat'
 							'You blush again but confirm: "Yes, I let them cum inside my mouth."'
 							'Vasily is excited now, squirming in his seat: "So... how about you put that pretty mouth of yours to work on us?"'
-
-							act '"No way!"':
-								*clr & cla
-								gs 'stat'
-								'You indignantly reject Vasily''s proposal: "No way, Shulga! I can''t just do that for everyone who asks!"'
-								'Dan suddenly growls at you: "Shut up, whore. I''ve seen you suck cocks of just about anyone you meet, and swallow their loads to the last drop! They make videos when you''re not paying attention... and now suddenly we''re not good enough for you?"'
-								'You''re a bit afraid of his sudden outburst and try to explain yourself: "Dan please, you have to understand! I don''t just su-"'
-								'He interrupts you: "Shut up! We won''t ask again... are you going to be a nice little slut and do as we ask, or are you going to keep pretending to be some stuck up bitch?"'
-
-								act 'Be a nice little slut':
+							
+							gs 'willpower', 'gangbang', 'resist'
+							if will_cost <= pcs_willpwr:
+								act '"No way!" (<<will_cost>> Willpower)':
 									*clr & cla
+									gs 'willpower', 'gangbang', 'resist'
+									gs 'willpower', 'pay', 'resist'
 									gs 'stat'
-									'You don''t want to anger Dan any further, and decide to back down. You softly say: "Relax, Dan... I''m sorry, I didn''t mean to insult you or your friends. I''ll do it."'
-									'Dan smirks at you: "I forgive you, slut... I guess you just didn''t know what to do yet, when someone asks you for your whore mouth. We''ll teach you what you need to know about your place in the world. Get down before me and start sucking!"'
-									gs 'gopskver', 'triple_blow'
-								end
-
-								act 'Keep refusing':
-									minut += 5
-									fingal += 1
-									body_write = 1
-									sub += 1
-									pcs_mood -= 5
-									*clr & cla
-									gs 'stat'
-
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/gop/body_cocksucker.jpg"></center>'
-									'You keep refusing, and try to get up and leave. Dan slaps your face hard, however, and you fall to the ground. He immediately pins you down, and begins to rip your clothes off. "Too proud, huh? We''ll have to take you down a peg!"'
-									'The boys take out some markers and write several obscene words onto your skin. Soon, the whole town can read what a huge slut you are!'
-									'You don''t want to anger them any further, knowing the boys are much stronger than you, and don''t dare to protest while they keep writing more things on you. Eventually they''re satisfied, and let you get up. They even let you put your clothes back on, so you can cover up at least the majority of the writings. Dan smirks: "Maybe that''ll help you remember what you are, slut. When you''re ready to apologize, you know where to find us."'
-
-									act 'Leave':gt 'gskver', 'start'
+									'You indignantly reject Vasily''s proposal: "No way, Shulga! I can''t just do that for everyone who asks!"'
+									'Dan suddenly growls at you: "Shut up, whore. I''ve seen you suck cocks of just about anyone you meet, and swallow their loads to the last drop! They make videos when you''re not paying attention... and now suddenly we''re not good enough for you?"'
+									'You''re a bit afraid of his sudden outburst and try to explain yourself: "Dan please, you have to understand! I don''t just su-"'
+									'He interrupts you: "Shut up! We won''t ask again... are you going to be a nice little slut and do as we ask, or are you going to keep pretending to be some stuck up bitch?"'
+
+									act 'Be a nice little slut':
+										*clr & cla
+										gs 'stat'
+										'You don''t want to anger Dan any further, and decide to back down. You softly say: "Relax, Dan... I''m sorry, I didn''t mean to insult you or your friends. I''ll do it."'
+										'Dan smirks at you: "I forgive you, slut... I guess you just didn''t know what to do yet, when someone asks you for your whore mouth. We''ll teach you what you need to know about your place in the world. Get down before me and start sucking!"'
+										gs 'gopskver', 'triple_blow'
+									end
+									
+									gs 'willpower', 'gangbang', 'resist', 'hard'
+									if will_cost <= pcs_willpwr:
+										act 'Keep refusing (<<will_cost>> Willpower)':
+											*clr & cla
+											minut += 5
+											fingal += 1
+											body_write = 1
+											pcs_mood -= 5
+											gs 'willpower', 'gangbang', 'resist', 'hard'
+											gs 'willpower', 'pay', 'resist'
+											gs 'stat'
+
+											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/gop/body_cocksucker.jpg"></center>'
+											'You keep refusing, and try to get up and leave. Dan slaps your face hard, however, and you fall to the ground. He immediately pins you down, and begins to rip your clothes off. "Too proud, huh? We''ll have to take you down a peg!"'
+											'The boys take out some markers and write several obscene words onto your skin. Soon, the whole town can read what a huge slut you are!'
+											'You don''t want to anger them any further, knowing the boys are much stronger than you, and don''t dare to protest while they keep writing more things on you. Eventually they''re satisfied, and let you get up. They even let you put your clothes back on, so you can cover up at least the majority of the writings. Dan smirks: "Maybe that''ll help you remember what you are, slut. When you''re ready to apologize, you know where to find us."'
+
+											act 'Leave':gt 'gskver', 'start'
+										end
+									else
+										act 'Keep refusing (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+									end
 								end
+							else
+								act '"No way!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 							end
-
 							act '"Well, maybe... just don''t tell anyone!"':
 								*clr & cla
 								gs 'stat'
@@ -331,30 +423,43 @@ else
 								gs 'gopskver', 'triple_blow'
 							end
 						end
+						
+						gs 'willpower', 'swallow', 'resist'
+						if will_cost <= pcs_willpwr:
+							act '"No, that''s a lie!" (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'swallow', 'resist'
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								'You spit on the ground, and pretend to be insulted: "No way, Vasily! That''s disgusting!"'
+
+								if swallow > 0:
+									'Dan suddenly snaps, and shouts at you: "<<$pcs_nickname>>, don''t bullshit us! The whole town knows you''re a huge cum guzzler, who loves little more than to take a big load into her mouth and swallow it all down! Stop lying!"'
+								elseif swallow = 0 and facial > 0:
+									'Dan suddenly chuckles: "But you love taking loads all over your face, right? I''ve seen several pictures of you, with your face and mouth all covered in cum."'
+								else
+									'Dan chuckles: "Maybe you can''t get a guy off with your mouth yet? Don''t worry <<$pcs_nickname>>, we will help you with your technique..."'
+								end
 
-						act '"No, that''s a lie!"':
+								'Dan sharply says as he reaches for his pants and exposes his hard cock: "Enough talk! I think it''s time <<$pcs_nickname>> shows us what a good little slut she is. Take it in your mouth!"'
+								gs 'gopskver', 'triple_blow'
+							end
+						else
+							act '"No, that''s a lie!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+					end
+					gs 'willpower', 'bj', 'resist'
+					if will_cost <= pcs_willpwr:
+						act '"No, that''s a lie!" (<<will_cost>> Willpower)':
 							*clr & cla
+							gs 'willpower', 'bj', 'resist'
+							gs 'willpower', 'pay', 'resist'
 							gs 'stat'
-							'You spit on the ground, and pretend to be insulted: "No way, Vasily! That''s disgusting!"'
-
-							if swallow > 0:
-								'Dan suddenly snaps, and shouts at you: "<<$pcs_nickname>>, don''t bullshit us! The whole town knows you''re a huge cum guzzler, who loves little more than to take a big load into her mouth and swallow it all down! Stop lying!"'
-							elseif swallow = 0 and facial > 0:
-								'Dan suddenly chuckles: "But you love taking loads all over your face, right? I''ve seen several pictures of you, with your face and mouth all covered in cum."'
-							else
-								'Dan chuckles: "Maybe you can''t get a guy off with your mouth yet? Don''t worry <<$pcs_nickname>>, we will help you with your technique..."'
-							end
-
-							'Dan sharply says as he reaches for his pants and exposes his hard cock: "Enough talk! I think it''s time <<$pcs_nickname>> shows us what a good little slut she is. Take it in your mouth!"'
+							'You pretend to be insulted at the mere notion, but Dan gets angry: "<<$pcs_nickname>>, you''re a slut! I know it, you know it, the whole fucking town knows it! Don''t be a stuck up bitch and start sucking!"'
 							gs 'gopskver', 'triple_blow'
 						end
-					end
-
-					act '"No, that''s a lie!"':
-						*clr & cla
-						gs 'stat'
-						'You pretend to be insulted at the mere notion, but Dan gets angry: "<<$pcs_nickname>>, you''re a slut! I know it, you know it, the whole fucking town knows it! Don''t be a stuck up bitch and start sucking!"'
-						gs 'gopskver', 'triple_blow'
+					else
+						act '"No, that''s a lie!" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
 				end
 			end
@@ -410,16 +515,23 @@ if $ARGS[0] = 'BjBeerStart':
 			act 'Open your legs for a beer': gt 'gopskver','BjBeerVag'
 			act 'Take it in the ass for beer': gt 'gopskver','BjBeerAnal'
 		end
-
-		if pcs_dom > 0 and pcs_stren + pcs_agil + pcs_run < 180: act 'Refuse and run': gt 'gopskver', 'BjBeerBeaten'
-
-		if pcs_dom > 0 and razradKik >= 3 or pcs_stren + pcs_agil + pcs_run >= 180:
-			act 'Refuse and run':
-				cla
-				cls
-				'The Gopniks don''t take your refusal very well, and try to force you anyway when they realize you''re not going to do what they want. However, your athletic training pays off and you manage to outrun them. Once you''re certain they''re no longer following you, you stop for a moment to catch your breath.'
-				act 'Return to the park': gt 'gskver', 'start'
+		
+		gs 'willpower', 'sex', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse and run away (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'sex', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				if pcs_stren + pcs_agil + pcs_run < 180:
+					gt 'gopskver', 'BjBeerBeaten'
+				elseif razradKik >= 3 or pcs_stren + pcs_agil + pcs_run >= 180
+					'The Gopniks don''t take your refusal very well, and try to force you anyway when they realize you''re not going to do what they want. However, your fitness and training pays off and you manage to outrun them. Once you''re certain they''re no longer following you, you stop for a moment to catch your breath.'
+					act 'Return to the park': gt 'gskver', 'start'
+				end
 			end
+		else
+			act 'Refuse and run 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
 end
@@ -430,12 +542,10 @@ if $ARGS[0] = 'BjBeerBeaten':
 	pcs_hairbsh = 0
 	minut += 10
 	spank += 1
-	sub += 3
 	spanked = 1
 	spankedtime = totminut
 	gs 'underwear', 'remove'
-	set pcs_mood= pcs_mood-10
-	set pcs_willpwr = pcs_willpwr - 10
+	pcs_mood -= 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'
 
@@ -452,14 +562,21 @@ if $ARGS[0] = 'BjBeerBeaten':
 		*pl
 		'Dan is not unhappy with your efforts, but feels bored after you move away from his cock again. He offers: "She''s got more than one hole, guys... why are we all sharing just the one?"'
 		'The thought barely registers in your mind at first, but finally it does: they''re going to fuck you too!?'
-		if pcs_dom>10 and pcs_vag = 0 and pcs_ass >5 and pcs_horny < 75:
-			act 'Offer your ass instead':
-				'You plead to the guys: "Please guys, I''m still a virgin! My <<$npc_nickname[''A29'']>> would kill me if I lost my virginity, she has me checked every month! Maybe... maybe there''s something else I could do to please you, if you leave my pussy alone?"'
-				act 'Take it in the ass':gt 'gopskver','BjBeerAnal'
+		if pcs_vag = 0:
+			gs 'willpower', 'sex', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Offer your ass instead (<<will_cost>> Willpower)':
+					gs 'willpower', 'sex', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'You plead to the guys: "Please guys, I''m still a virgin! My <<$npc_nickname[''A29'']>> would kill me if I lost my virginity, she has me checked every month! Maybe... maybe there''s something else I could do to please you, if you leave my pussy alone?"'
+					act 'Take it in the ass':gt 'gopskver','BjBeerAnal'
+				end
+			else
+				act 'Offer your ass instead (<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 'Let them fuck you': gt 'gopskver','BjBeerVag'
 		end
+		act 'Let them fuck you': gt 'gopskver','BjBeerVag'
 	elseif BjBeerQW = 4:
 		*pl
 		'You routinely drop to your knees, and suck the guys off one by one. Suddenly Vitek reaches down, and rubs his rough fingers over your holes. He grunts: "Listen, <<$pcs_nickname>>... ever got fucked in the ass before?"'
@@ -473,7 +590,17 @@ if $ARGS[0] = 'BjBeerBeaten':
 		end
 		act 'Submit and let them fuck your ass': gt 'gopskver','BjBeerAnal'
 	else
-		act 'Put some effort into sucking them off': gt 'gopskver', 'BjBeerAct'
+		gs 'willpower', 'bj', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Do your best when you suck them off (<<will_cost>> Willpower)':
+				gs 'willpower', 'bj', 'self', 'hard'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'gopskver', 'BjBeerAct'
+			end
+		else
+			act 'Do your best when you suck them off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Passively suck them off': gt 'gopskver', 'BjBeerPas'
 	end
 end
@@ -492,14 +619,21 @@ if $ARGS[0] = 'BjBeerYes':
 		'You obediently drop to your knees and lick your lips, looking up at the guys with your <<$glaza3>>.'
 		'Pleased with your eagerness, Vasily says: "I bet we could get more out of her than just a blowjob. Let''s go find a quiet place and put her other holes to work too!"'
 		'You meekly object, but it gets drowned out by the enthusiastic shouts of the others. They pull you up and guide you to a place where no one ever comes.'
-		if pcs_dom>10 and pcs_vag = 0 and pcs_ass >5 and pcs_horny < 75:
-			act 'Offer your ass instead':
-				'You plead to the guys: "Please guys, I''m still a virgin! My <<$npc_nickname[''A29'']>> would kill me if I lost my virginity, she has me checked every month! Maybe... maybe there''s something else I could do to please you, if you leave my pussy alone? Please?"'
-				act 'Take it in the ass':gt 'gopskver','BjBeerAnal'
+		if pcs_vag = 0:
+			gs 'willpower', 'sex', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Offer your ass instead (<<will_cost>> Willpower)':
+					gs 'willpower', 'sex', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'You plead to the guys: "Please guys, I''m still a virgin! My <<$npc_nickname[''A29'']>> would kill me if I lost my virginity, she has me checked every month! Maybe... maybe there''s something else I could do to please you, if you leave my pussy alone?"'
+					act 'Take it in the ass':gt 'gopskver','BjBeerAnal'
+				end
+			else
+				act 'Offer your ass instead (<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 'Let them fuck you': gt 'gopskver','BjBeerVag'
 		end
+		act 'Let them fuck you': gt 'gopskver','BjBeerVag'
 	elseif BjBeerQW = 4:
 		*pl
 		'You routinely drop to your knees, and suck the guys off one by one. Suddenly Vitek reaches down, and rubs his rough fingers over your holes. He grunts: "Listen, <<$pcs_nickname>>... ever got fucked in the ass before?"'
@@ -513,7 +647,17 @@ if $ARGS[0] = 'BjBeerYes':
 		end
 		act 'Submit and let them fuck your ass': gt 'gopskver','BjBeerAnal'
 	else
-		act 'Do your best when you suck them off': gt 'gopskver', 'BjBeerAct'
+		gs 'willpower', 'bj', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Do your best when you suck them off (<<will_cost>> Willpower)':
+				gs 'willpower', 'bj', 'self', 'hard'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'gopskver', 'BjBeerAct'
+			end
+		else
+			act 'Do your best when you suck them off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Just put in a token effort': gt 'gopskver', 'BjBeerPas'
 	end
 end
@@ -525,7 +669,7 @@ if $ARGS[0] = 'BjBeerAct':
 	pcs_throat += 1
 	swallow += 1
 	stat['bj'] += 1
-	eggs +=1
+	eggs += 1
 	spafinloc = 12
 	gs 'cum_manage'
 	BjBeerActiv = 1
@@ -550,7 +694,7 @@ if $ARGS[0] = 'BjBeerAct':
 		elseif BjBeerQW = 2:
 			act 'Serve the others': gt 'gopskver','BjBeerPalevo'
 		!elseif BjBeerQW = 3:
-		!act 'Serve the others': gt 'gopskver','BjBeerStraight'
+			!act 'Serve the others': gt 'gopskver','BjBeerStraight'
 		else
 			act 'Serve the others': gt 'gopskver','BjBeerDouble'
 		end
@@ -585,7 +729,7 @@ if $ARGS[0] = 'BjBeerPas':
 		elseif BjBeerQW = 2:
 			act 'Serve the others': gt 'gopskver','BjBeerPalevo'
 		!elseif BjBeerQW = 3:
-		!act 'Serve the others': gt 'gopskver','BjBeerStraight'
+			!act 'Serve the others': gt 'gopskver','BjBeerStraight'
 		else
 			act 'Serve the others': gt 'gopskver', 'BjBeerDouble'
 		end
@@ -653,7 +797,6 @@ if $ARGS[0] = 'BjBeerFace':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjbeer<<Beerrand>>.jpg"></center>'
 			'Dan grins at you and offers you his unfinished bottle, and smiles when you drink it eagerly. Your mood improves slightly.'
 			act 'Return to the park': BjBeerActiv = 0 & gt 'gskver', 'start'
-
 		elseif BjBeerActiv = 0:
 			pcs_mood = 0
 			BjBeerQW += 1
@@ -741,10 +884,9 @@ end
 if $ARGS[0] = 'BjBeerVag':
 	*clr & cla
 	minut += 10
-	rape = rape + 1
-	gang = gang + 1
-	sub += 3
-	if sub > 0:pcs_horny += sub
+	rape += 1
+	gang += 1
+	pcs_horny += 10
 	BjBeerQW += 1
 	BjBeerDay = daystart
 	gs 'stat'
@@ -752,7 +894,7 @@ if $ARGS[0] = 'BjBeerVag':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjbeervag.jpg" ></center>'
 	'The guys prop you down onto the bench with your legs wide, and unceremoniously begin to touch you everywhere. They pull your legs to the side, pinch your nipples, pull your clothes to the sides and put several fingers in your pussy.'
 	'You are trying to hide your feelings, but wail when they pinch your nipples or slap your bottom too roughly. Tears slowly form in your eyes when you realize you''re really nothing more but a set of holes to fuck for them.'
-	if sub > 20: 'However, at the same time, the humiliation and helplessness from your current position make you feel a tinge excited.'
+	'However, at the same time, the humiliation and helplessness from your current position make you feel a tinge excited.'
 	if analplugin = 1: 'Vasily suddenly exclaims: "A butt plug!? Were you preparing your tight little ass for us the whole time, <<$pcs_nickname>>? How sweet!" He roughly pulls the plug out of your ass, and just as abruptly shoves it back in. The other boys laugh, as they notice the grimace on your face.'
 	if pcs_pubes > 10:
 		'One of the boys fondles your nether region, but mumbles unhappily: "Man, it''s like the freaking rainforest down there. You should really shave next time, this is disgusting."'
@@ -866,10 +1008,9 @@ end
 
 if $ARGS[0] = 'BjBeerAnal':
 	*clr & cla
-	rape = rape + 1
-	gang = gang + 1
-	sub += 3
-	if sub > 0:pcs_horny += sub
+	rape += 1
+	gang += 1
+	pcs_horny += 10
 	BjBeerQW += 1
 	BjBeerDay = daystart
 	gs 'stat'
@@ -877,7 +1018,7 @@ if $ARGS[0] = 'BjBeerAnal':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjbeeranal.jpg" ></center>'
 	'The guys guide you to the by now familiar bench at the back of the park again. The boys unceremoniously push you over towards the bench, and make you kneel on top of it.'
 	'You dutifully await on the bench with your head down, slowly pulling your clothes to the side to expose your ass for the boys. You feel a shiver roll down your spine, while you feel them silently judging you.'
-	if sub > 20: 'However, at the same time, the humiliation and helplessness from your current position make you feel a tinge excited.'
+	'However, at the same time, the humiliation and helplessness from your current position make you feel a tinge excited.'
 	if pcs_ass <= 5: 'You hear a frantic discussion behind you, the guys are trying to figure out who gets to fuck your tight unexperienced ass first. Vasily ends up being the lucky one.'
 	if pcs_ass > 5: 'You hear a frantic discussion behind you, the guys are trying to figure out who gets to fuck your ass first. Vasily ends up being the lucky one.'
 	if tatupb > 0: 'When he sees the tattoo on your lower back, Vasily pats your ass approvingly: "Nice tramp stamp, whore."'
@@ -906,21 +1047,19 @@ if $ARGS[0] = 'BjBeerAnal':
 			'For some reason he''s upset, and when you look around you see why. You didn''t give yourself an enema, and his dick is all dirty! He thrusts his groin towards your face expectantly: "Clean that up, whore! That''s disgusting!"'
 			'You wrinkle your nose at his dirty and smelly erection... ugh!'
 
-		act'Clean him up':
-			Suckrand=rand(1,2)
-			cla
-			cls
-			sub +=1
-			minut +=5
-			pcs_mood = pcs_mood - 3
-			gs 'stat'
+			act 'Clean him up':
+				Suckrand=rand(1,2)
+				*clr & cla
+				minut +=5
+				pcs_mood -= 3
+				gs 'stat'
 
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjbeerdirtyanal<<Suckrand>>.jpg" ></center>'
-			'You hesitate for a second, but you realize that he''s not giving you a choice. You obediently fall to your knees before him and take his cock in your mouth, looking to correct your mistake.'
-			'The taste is horrible, and you have great difficulty suppressing your gag reflex as you carefully lick and suck his dick, humbly looking into his eyes in the hope of avoiding punishment.'
-			'You have an awful taste in your mouth, and you quietly berate yourself for not giving yourself an enema today. You don''t have much time to mull it over though, as Dan says: "That''s good enough. Now get back into position and spread your ass, slut."'
-			act 'Spread your ass cheeks': gt 'gopskver','BjBeerAnal2'
-		end
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjbeerdirtyanal<<Suckrand>>.jpg" ></center>'
+				'You hesitate for a second, but you realize that he''s not giving you a choice. You obediently fall to your knees before him and take his cock in your mouth, looking to correct your mistake.'
+				'The taste is horrible, and you have great difficulty suppressing your gag reflex as you carefully lick and suck his dick, humbly looking into his eyes in the hope of avoiding punishment.'
+				'You have an awful taste in your mouth, and you quietly berate yourself for not giving yourself an enema today. You don''t have much time to mull it over though, as Dan says: "That''s good enough. Now get back into position and spread your ass, slut."'
+				act 'Spread your ass cheeks': gt 'gopskver','BjBeerAnal2'
+			end
 
 		elseif klismaday = daystart:
 			'Fortunately, you gave yourself an enema earlier today and Vasily''s cock comes out clean. You don''t have much time to think about the assfucking he gave you though, as Dan says: "Not bad. Now get back into position and spread your ass, slut. You still have two more to go."'
@@ -980,7 +1119,6 @@ if $ARGS[0] = 'BjBeerAnal2':
 		act 'Show them':
 			*clr & cla
 			minut +=5
-			sub += 1
 			gs 'stat'
 
 			if pcs_ass <= 10:
@@ -1064,7 +1202,6 @@ if $ARGS[0] = 'triple_blow':
 		spafinloc = 12
 		gs 'cum_manage'
 		swallow += 1
-		sub += 1
 		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjgop.jpg"></center>'
@@ -1081,7 +1218,6 @@ if $ARGS[0] = 'triple_blow':
 			spafinloc = 11
 			gs 'cum_manage'
 			dick = 15
-			sub += 1
 			minut += 5
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjgop2.jpg"></center>'
@@ -1090,15 +1226,13 @@ if $ARGS[0] = 'triple_blow':
 
 			act 'Suck Vitek''s cock':
 				*clr & cla
-				stat['bj'] += 1
 
 				if npc_Sex['A9'] = 0: npc_Sex['A9'] = 1 & guy += 1
 
 				dick = 18
-				sub += 1
 				spafinloc = 11
 				gs 'cum_manage'
-				minut += 5
+				gs 'arousal', 'bj', 5, 'sub'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjgop3.jpg"></center>'
 				gs 'dinSex', 'bj_random'
@@ -1113,7 +1247,6 @@ if $ARGS[0] = 'triple_blow':
 
 					act 'Meekly nod':
 						*clr & cla
-						sub += 1
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/gop/bjgop3.jpg"></center>'
 						'You nod your head meekly and say in a soft voice: "I understand."'
@@ -1121,19 +1254,25 @@ if $ARGS[0] = 'triple_blow':
 
 						act 'Leave':gt 'gskver', 'start'
 					end
+					gs 'willpower', 'sex_other', 'resist'
+					if will_cost <= pcs_willpwr:
+						act 'Object (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'sex_other', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							gs 'arousal', 'pee', -5, 'sub', 'humilation', 'group'
+							gs 'arousal', 'end'
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/gop/goppee.jpg"></center>'
+							'Still rubbing your eyes, you shake your head and say: "No way, Dan! I''m no slut!"'
+							'Dan angrily replies: "Tough words, coming from some promiscuous whore still trying to rub the sperm out of her eyes. Looks like she needs another reminder, boys."'
+							'You don''t like the sound of that. When you carefully try to open your eyes again you notice the guys have surrounded you, and they all have their cocks out. Your vision is still blurry though, and you shriek in disgust when you feel a stream of urine hit your face. Then another, and a third. You realize you can''t fight off the three of them, and just let it happen.'
+							'Noticing your change in demeanour, Dan smirks at you when the streams have dried up: "That''s right, whore, just let it happen. Let that be a reminder for you.. now get the fuck out of here and clean yourself up, you look disgusting."'
 
-					act 'Object':
-						*clr & cla
-						sub += 5
-						pee += 1
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/gop/goppee.jpg"></center>'
-						'Still rubbing your eyes, you shake your head and say: "No way, Dan! I''m no slut!"'
-						'Dan angrily replies: "Tough words, coming from some promiscuous whore still trying to rub the sperm out of her eyes. Looks like she needs another reminder, boys."'
-						'You don''t like the sound of that. When you carefully try to open your eyes again you notice the guys have surrounded you, and they all have their cocks out. Your vision is still blurry though, and you shriek in disgust when you feel a stream of urine hit your face. Then another, and a third. You realize you can''t fight off the three of them, and just let it happen.'
-						'Noticing your change in demeanour, Dan smirks at you when the streams have dried up: "That''s right, whore, just let it happen. Let that be a reminder for you.. now get the fuck out of here and clean yourself up, you look disgusting."'
-
-						act 'Leave':gt 'gskver', 'start'
+							act 'Leave':gt 'gskver', 'start'
+						end
+					else
+						act 'Object (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
 				end
 			end

locations/gpoli.qsrc

@@ -859,16 +859,23 @@ if $ARGS[0] = 'spravka_arrange':
 		'He smiles jovially at you as he reaches out for you. He puts his hands on your shoulders and you automatically give in to him, slowly letting him push you down to your knees.'
 		'He smirks at you and mutters: "I understand why you are no longer a virgin, you little minx! So eager to please..."'
 		'Your face is at the same level as his crotch, and he slowly undoes his pants and drops them to his ankles. His erect cock is pointing at you eagerly, a bead of precum slowly dripping down from it. You can tell he wants you badly.'
-		act 'Grab a referral form and run out of the room':
-			*clr & cla
-			Gspravka = 30
-			GspravkaT = 1
-			Gspassed = 1
-			forge_referral = 1
-			gs 'stat'
-			'This is your chance! You quickly grab a nearly filled out form from his desk and run out of his examination room. Dr. Petrovich pulls up his pants again but doesn''t even follow you, knowing this would be way too awkward to explain to anyone else in the clinic. Looks like you win this one!'
-			'A while later, you fill out the rest of the form and nod to yourself as you think: "This should get <<$npc_nickname[''A29'']>> off my back for another month..."'
-			act 'Leave':gt 'gpoli'
+		gs 'willpower', 'bj', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Grab a referral form and run out of the room (<<will_cost>> Willpower)':
+				*clr & cla
+				Gspravka = 30
+				GspravkaT = 1
+				Gspassed = 1
+				forge_referral = 1
+				gs 'willpower', 'bj', 'resist', 'hard'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'This is your chance! You quickly grab a nearly filled out form from his desk and run out of his examination room. Dr. Petrovich pulls up his pants again but doesn''t even follow you, knowing this would be way too awkward to explain to anyone else in the clinic. Looks like you win this one!'
+				'A while later, you fill out the rest of the form and nod to yourself as you think: "This should get <<$npc_nickname[''A29'']>> off my back for another month..."'
+				act 'Leave':gt 'gpoli'
+			end
+		else
+			act 'Grab a referral form and run out of the room (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 	act 'You really don''t want your mother to find out...':
@@ -1018,13 +1025,21 @@ if $ARGS[0] = 'spravka_arrange':
 			end
 		end
 	end
-	act 'You can''t do that':
-		cla
-		'You frown. You really don''t want to have sex with him, sex is what got you into this whole mess in the first place! You try one more time: "I can''t do that doctor. Please, show some compassion... could you give me a break, just this once? I just need some time to figure out how to tell my <<$npc_nickname[''A29'']>> about all this!"'
-		'His gaze is stone cold, without any sign of compassion. He says in an even tone: "So be it. Sorry <<$pcs_nickname>>, but that''s not how it works. I''m running a big enough risk as it is. If you''re not helping me, I''m not helping you."'
-		act 'Try to negotiate': gt 'gpoli', 'spravka_arrange'
-		act 'Just accept the referral as is': gt 'gpoli', 'badend'
-	end
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'You can''t do that (<<will_cost>> Willpower)':
+			cla
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'You frown. You really don''t want to have sex with him, sex is what got you into this whole mess in the first place! You try one more time: "I can''t do that doctor. Please, show some compassion... could you give me a break, just this once? I just need some time to figure out how to tell my <<$npc_nickname[''A29'']>> about all this!"'
+			'His gaze is stone cold, without any sign of compassion. He says in an even tone: "So be it. Sorry <<$pcs_nickname>>, but that''s not how it works. I''m running a big enough risk as it is. If you''re not helping me, I''m not helping you."'
+			act 'Try to negotiate': gt 'gpoli', 'spravka_arrange'
+			act 'Just accept the referral as is': gt 'gpoli', 'badend'
+		end
+	else
+		act 'You can''t do that (<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] = 'spravka_money':
@@ -1120,15 +1135,22 @@ if $ARGS[0] = 'spravka_arrange_pale':
 		'"What do you..." you hesitate. You know exactly what he''s suggesting, but you can''t say it.'
 		'The doctor puts his hands on your hips and smiles at you confidently as he says: "A beautiful girl like you always has other options."'
 		'He gropes your <<$titsize>> boobs for a while, before he moves his hands to his trousers and undoes his belt.'
-		act 'Run out of the office':
-			*clr & cla
-			gs 'stat'
-			'In a panic, you grab your clothes and run out of the office. You know you can''t talk about this with anyone... if you say anything, Dr. Petrovich would tell your <<$npc_nickname[''A29'']>> about your addiction. You quickly get dressed again in an empty examination room, wondering how you''re going to get out of this mess now.'
-			if $loc = 'kuhrPar':
-				act 'leave': gt 'mother', 'referral'
-			else
-				act 'Leave':gt 'gpoli'
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Run out of the office (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'In a panic, you grab your clothes and run out of the office. You know you can''t talk about this with anyone... if you say anything, Dr. Petrovich would tell your <<$npc_nickname[''A29'']>> about your addiction. You quickly get dressed again in an empty examination room, wondering how you''re going to get out of this mess now.'
+				if $loc = 'kuhrPar':
+					act 'leave': gt 'mother', 'referral'
+				else
+					act 'Leave':gt 'gpoli'
+				end
 			end
+		else
+			act 'Run out of the office (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 	act 'Do what you have to do':
@@ -1307,7 +1329,7 @@ if $ARGS[0] = 'maternity_ward':
 					!!if orphanfeed = 1:
 					!!	'It seems like there is a crib with a baby inside in this room, too.'
 					!!end
-					act 'have your breasts pumped':
+					act 'Have your breasts pumped':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/mward/pump_room.jpg"></center>'
 						'You sit down and take off your top.'
@@ -1324,7 +1346,7 @@ if $ARGS[0] = 'maternity_ward':
 							'The nurse grabs the nipple balm and applies it to your nipples. It feels nice on your nipples as she rubs it in.'
 						end
 						lactation['nipple_cream_applied'] = 1
-						act 'continue':	gt 'gpoli', 'maternity_ward_donation'
+						act 'Continue':	gt 'gpoli', 'maternity_ward_donation'
 					end
 				end
 				act 'Check your file (0:05)':
@@ -1478,7 +1500,7 @@ if $ARGS[0] = 'maternity_ward':
 								'You look at her with wide eyes.'
 								'Nurse: So, what do you think?'
 								pcs_gpolimilkdonation = 2
-								act 'give it a try (0:15)':
+								act 'Give it a try (0:15)':
 									*clr & cla
 									minut += 15
 									pcs_gpolimilkdonation = 3
@@ -1538,17 +1560,17 @@ if $ARGS[0] = 'maternity_ward':
 										mward_donatesf = 10
 									end
 									if pcs_energy > 30:
-										mward_donatess = rand(69, 80)
+										mward_donatess = rand(69,80)
 									elseif sick > 1:
 										mward_donatess = rand(0,45)
 									else
-										mward_donatess = rand(45, 69)
+										mward_donatess = rand(45,69)
 									end
 									act 'Leave':gt 'gpoli'
 								end
-								act 'Deny to donate':
+								act 'Refuse to donate':
 									*clr & cla
-									'You deny to donate your breast milk. The nurse looks sad at you and let you leave.'
+									'You refuse to donate your breast milk. The nurse looks disappointed in you as you leave.'
 									act 'Leave':gt 'gpoli'
 								end
 							else
@@ -1630,9 +1652,9 @@ if $ARGS[0] = 'maternity_ward':
 									end
 									act 'Leave':gt 'gpoli'
 								end
-								act 'Deny to donate':
+								act 'Refuse to donate':
 									*clr & cla
-									'You deny to donate your breast milk. The nurse looks sad at you and let you leave.'
+									'You refuse to donate your breast milk. The nurse looks disappointed in you as you leave.'
 									act 'Leave':gt 'gpoli'
 								end
 							end
@@ -1804,8 +1826,8 @@ if $ARGS[0] = 'maternity_ward_donation':
 			if lactation['breastmv'] > lactation['breastmm']/2:
 				'The nurse looks at your breasts'
 				'Nurse: Looks like you could go for another pumping...shall we?'
-				act 'have your breasts pumped again': gt 'gpoli', 'maternity_ward_donation'
-				act 'enough for today':
+				act 'Have your breasts pumped again': gt 'gpoli', 'maternity_ward_donation'
+				act 'Enough for today':
 					*clr & cla
 					gs 'stat'
 					if pcs_gpoli_donationsessioncount > 0:
@@ -1814,14 +1836,14 @@ if $ARGS[0] = 'maternity_ward_donation':
 					else
 						'You put on your top'
 					end
-					act 'leave':
+					act 'Leave':
 						lact_ev['gpoli_milkedvolume'] = 0
 						gt 'gpoli', 'maternity_ward'
 					end
 				end
 			else
-				act 'ask to donate more': gt 'gpoli', 'maternity_ward_donation'
-				act 'enough for today':
+				act 'Ask to donate more': gt 'gpoli', 'maternity_ward_donation'
+				act 'Enough for today':
 					*clr & cla
 					gs 'stat'
 					if pcs_gpoli_donationsessioncount > 0:
@@ -1830,7 +1852,7 @@ if $ARGS[0] = 'maternity_ward_donation':
 					else
 						'You put on your top'
 					end
-					act 'leave':
+					act 'Leave':
 						lact_ev['gpoli_milkedvolume'] = 0
 						gt 'gpoli', 'maternity_ward'
 					end

locations/grandmahelp.qsrc

@@ -34,7 +34,7 @@ if $ARGS[0] = 'start':
 		gt 'grandmahelp', 'harvest'
 	else
 		'"There is nothing to do today <<$pcs_nickname>>, take a day off.'
-		act 'Go':gt'Gadhouse'			
+		act 'Go':gt 'gadhouse', 'start'
 	end
 end
 
@@ -50,7 +50,7 @@ if $ARGS[0] = 'cleanfloor':
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/washfloor.jpg"></center>'
 		'You grab a bucket and a rag, and get down on your knees and begin scrubbing the floor. Within the hour the floor shines and you are satisfied with the work you''ve done. You put the cleaning supplies into a corner and continue on with your day.'
 		
-		act 'Go':gt'Gadhouse'
+		act 'Go':gt 'gadhouse', 'start'
 	end
 end
 

locations/grandpahelp.qsrc

@@ -35,7 +35,7 @@ if $ARGS[0] = 'start':
 			grandmahelp += 1
 			gs'stat'
 
-			act 'Go':gt'Gadhouse'
+			act 'Go':gt 'gadhouse', 'start'
 		end
 	elseif grandpahelping = 1:
 		'"<<$pcs_nickname>>, I need you to go to the barn and feed Desperado."'
@@ -125,7 +125,7 @@ if $ARGS[0] = 'start':
 				'"You can take the day off."'
 			end
 		end
-		act 'Leave':gt'Gadhouse'
+		act 'Leave':gt 'gadhouse', 'start'
 	end
 end
 
@@ -287,7 +287,7 @@ if $ARGS[0] = 'pickforest':
 		'"How much should I pick, grandpa?"'
 		'"<<grandpa_boletus>> kg mushrooms and <<grandpa_bilberry>> kg of berries will be enough," grandfather replies. "Just don`t get lost."'
 	end
-	act 'Go':gt'Gadhouse'
+	act 'Go':gt 'gadhouse', 'start'
 end
 
 --- grandpahelp ---------------------------------

locations/grigory.qsrc

@@ -64,22 +64,29 @@ if $ARGS[0] = 'meet':
 
 				act 'Return': gt 'gadfield', 'field'
 			end
-
-			act 'Hug him goodbye':
-				*clr
-				cla
-				minut += 2
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/grigory/grigory.jpg"></center>'
-				'He seems surprised when you reach out, putting your arms around his powerful frame. Your arms barely reach all the way around his middle.'
-				'"Whoa," Grigory says in surprise, then bends down slightly as he wraps his own big arms around you.'
-				'The hug lingers, then just before it starts to become awkward, he lifts you off of your feet and twirls you around once before sitting you back on your feet. You can''t help but laugh as you remember all the times he did exactly the same thing to you when you were little.'
-				'"I really liked getting to see you again," You say through your dwindling laughter, "I hope to see you again soon."'
-				'You can see that he has a big grin on his face, one that you suspect matches your own, "I''ll be around."'
-				'With a friendly wave, the two of you part ways.'
-
-				act 'Return': gt 'gadfield', 'field'
-			end
+			
+			gs 'willpower', 'misc', 'self', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Hug him goodbye (<<will_cost>> Willpower)':
+					*clr
+					cla
+					minut += 2
+					gs 'willpower', 'misc', 'self', 'easy'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/grigory/grigory.jpg"></center>'
+					'He seems surprised when you reach out, putting your arms around his powerful frame. Your arms barely reach all the way around his middle.'
+					'"Whoa," Grigory says in surprise, then bends down slightly as he wraps his own big arms around you.'
+					'The hug lingers, then just before it starts to become awkward, he lifts you off of your feet and twirls you around once before sitting you back on your feet. You can''t help but laugh as you remember all the times he did exactly the same thing to you when you were little.'
+					'"I really liked getting to see you again," You say through your dwindling laughter, "I hope to see you again soon."'
+					'You can see that he has a big grin on his face, one that you suspect matches your own, "I''ll be around."'
+					'With a friendly wave, the two of you part ways.'
+
+					act 'Return': gt 'gadfield', 'field'
+				end
+			else
+				act 'Hug him goodbye (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
 		end
 	end
 end
@@ -110,30 +117,47 @@ if $ARGS[0] = 'barn':
 
 		act 'Talk for a bit': gt 'grigory', 'barn_stand'
 	end
+	
+	gs 'willpower', 'misc', 'self', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Flirt (<<will_cost>> Willpower)':
+			grigoryEV = 2
+			*clr
+			cla
+			minut += 2
+			gs 'willpower', 'misc', 'self', 'easy'
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/grigory/grigory.jpg"></center>'
+			'"Hi," You say, playfully biting your lip when you see him look your way.'
+			'You can see a hint of a smile touch his lips, "Well you''re a sight for sore eyes there Kiska," He replies, reaching into his back pocket before taking a sip, "You wouldn''t be trying to distract me with your feminine wiles would you?"'
+			'You put a hand to your chest in mock offence, unable to keep a smile off your face, "Would I do something like that?"'
+			'He laughs softly, shaking his head then starting to walk towards you. He stops just a couple of steps short of where you are, leaning against a piece of farm equipment.'
+			
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Move closer to him (<<will_cost>> Willpower)':
+					gs 'willpower', 'misc', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					gt 'grigory', 'barn_closer'
+				end
+			else
+				act 'Move closer to 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 'Flirt':
-		grigoryEV = 2
-		*clr
-		cla
-		minut += 2
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/grigory/grigory.jpg"></center>'
-		'"Hi," You say, playfully biting your lip when you see him look your way.'
-		'You can see a hint of a smile touch his lips, "Well you''re a sight for sore eyes there Kiska," He replies, reaching into his back pocket before taking a sip, "You wouldn''t be trying to distract me with your feminine wiles would you?"'
-		'You put a hand to your chest in mock offence, unable to keep a smile off your face, "Would I do something like that?"'
-		'He laughs softly, shaking his head then starting to walk towards you. He stops just a couple of steps short of where you are, leaning against a piece of farm equipment.'
-
-		act 'Move closer to him': gt 'grigory', 'barn_closer'
-
-		act 'Visit from where you''re standing': gt 'grigory', 'barn_stand'
-	end
+			act 'Chat with Grigory': gt 'grigory', 'barn_stand'
+		end
+	else
+		act 'Flirt (<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] = 'barn_closer':
 	'You take a few steps closer to him. He smiles at you, putting an arm around your shoulders.'
 	'For several seconds, he seems to search your eyes, then leans forward. When your lips meet, he kisses you roughly, his tongue pressing into your mouth. He tastes of alcohol.'
 
-	act 'Let it continue (leads to sex)':
+	act 'Let him continue':
 		*clr
 		cla
 		minut += 2
@@ -208,16 +232,23 @@ if $ARGS[0] = 'barn_closer':
 			act 'Continue': gt 'Gadsarai'
 		end
 	end
-
-	act 'Step back':
-		*clr
-		cla
-		minut += 2
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/grigory/grigory.jpg"></center>'
-		'"Whoa," You say, putting a hand on his chest and pushing lightly. Grigory is far too big of a man to be pushed away, but he takes a hint and steps back anyway.'
-		'With a slight grimace, he reaches for his flask and takes a sip.'
-		act 'Continue': gt 'grigory', 'barn_stand'
+	
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Resist his advances (<<will_cost>> Willpower)':
+			*clr
+			cla
+			minut += 2
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/grigory/grigory.jpg"></center>'
+			'"Whoa," You say, putting a hand on his chest and pushing lightly. Grigory is far too big of a man to be pushed away, but he takes a hint and steps back anyway.'
+			'With a slight grimace, he reaches for his flask and takes a sip.'
+			act 'Continue': gt 'grigory', 'barn_stand'
+		end
+	else
+		act 'Resist his advances (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -254,7 +285,7 @@ if $ARGS[0] = 'garden':
 		minut += 30
 		'You barely start to work in the garden before you see your grandfather''s approach.'
 		'"You''re a good child," He nods to himself, glancing at the garden, "A very good girl."'
-		'Realizing that''s as close to a thank you you''re likely to get from your frandfather, you smile to yourself and get back to work. You can hear the sound of his cane hitting the ground every step as he walks away.'
+		'Realizing that''s as close to a thank you you''re likely to get from your grandfather, you smile to yourself and get back to work. You can hear the sound of his cane hitting the ground every step as he walks away.'
 		act 'Continue': gt 'grigory','dummy'
 	elseif grigory_garden = 4:
 		grigory_garden += 1
@@ -314,12 +345,20 @@ if $ARGS[0] = 'garden':
 
 			act 'Tease him about it': gt 'grigory', 'garden_tease'
 		end
-		act 'Tease him':
-			'Smiling to yourself, you stretch a little, making sure to push your chest out in the direction of your voyeur.'
-			'When you return to working, you kneel with your back to him, pushing your bottom in his general direction, wiggling it playfully as you do so.'
-			'A short while later you glance back at him, its clear that he is still watching, but the bushes are too thick for you to make out much more than that.'
-			'Eventually you''re done working in the garden. When you stand up, you look at the bushes one last time, blowing a little kiss, then leaving the garden.'
-			act 'Continue': gt 'grigory','dummy'
+		gs 'willpower', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Tease him (<<will_cost>> Willpower)':
+				gs 'willpower', 'self', 'easy'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				'Smiling to yourself, you stretch a little, making sure to push your chest out in the direction of your voyeur.'
+				'When you return to working, you kneel with your back to him, pushing your bottom in his general direction, wiggling it playfully as you do so.'
+				'A short while later you glance back at him, its clear that he is still watching, but the bushes are too thick for you to make out much more than that.'
+				'Eventually you''re done working in the garden. When you stand up, you look at the bushes one last time, blowing a little kiss, then leaving the garden.'
+				act 'Continue': gt 'grigory','dummy'
+			end
+		else
+			act 'Tease him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
@@ -449,7 +488,7 @@ if $ARGS[0] = 'flower3':
 	'"But how do I find out who did it? Did you maybe see someone in the yard this morning?"'
 	'Grandfather barks a little laugh, "Even if I knew, and I don''t, I wouldnt tell you," He shakes his head, "Got to make the man work for it."'
 	'Waving dismissively, you know grandfather is done talking about it.'
-	act 'Continue':gt 'Gadhouse', 'Start'
+	act 'Continue':gt 'gadhouse', 'start'
 end
 
 if $ARGS[0] = 'flower4':
@@ -461,7 +500,7 @@ if $ARGS[0] = 'flower4':
 	'"But I don''t know who it is," You say, feeling a little overwhelmed.'
 	'"But that is the magic of it!" Grandmother says, clearly overjoyed by the situation. She leans forward, kissing your cheek, "Whoever this boy is, he will reveal himself if you just let him."'
 	'Not feeling much better, you thank her.'
-	act 'Continue':gt 'Gadhouse', 'Start'
+	act 'Continue':gt 'gadhouse', 'start'
 end
 
 if $ARGS[0] = 'flower5':
@@ -1021,7 +1060,7 @@ if $ARGS[0] = 'romantic_event':
 				'You''re unable to hide a little smile, "Until next time Grigory."'
 				'Turning on his heel, he starts to wander back towards the town''s center.'
 
-				act 'Continue':gt 'Gadhouse', 'Start'
+				act 'Continue':gt 'gadhouse', 'start'
 			end
 
 			act 'Grigory''s Home':

locations/gschool_chats2.qsrc

@@ -67,14 +67,14 @@ if $ARGS[0] = 'petka':
 	if artQW = 5 and arthakQW ! 11:
 		npc_rel['A6'] += 1
 		'A devious smile spreads across his face as he closes his book and sets it aside. You try your best to keep the conversation lighthearted, but Petka is determined to let you know how much he''s enjoying his after school "lessons" and how he can''t wait for the next one.'
-	elseif npc_rel['A6'] >= 50 and pav_slut < 100
+	elseif npc_rel['A6'] >= 50 and pav_slut < 100:
 		npc_rel['A6'] += 1
 		if grupTipe = 3:
 			'"You really have to read this book, <<$pcs_nickname>>! I''m pretty sure it''s one you''d enjoy." Petka says excitedly. He starts to tell you about an interesting part he just read, but stops himself with a laugh. "Don''t worry, I won''t spoil it for you."'
 		else
 			'"Oh, hey, <<$Pcs_nickname>>. Did you say something? I don''t think I heard you." He smiles sheepishly as he puts his book down. "This book is crazy interesting." He tells you, and before you know it he''s going on and on about all the interesting characters, plot holes and themes in the book.'
 		end
-	elseif npc_rel['A6'] <= 20 and pav_slut < 100
+	elseif npc_rel['A6'] <= 20 and pav_slut < 100:
 		npc_rel['A6'] += 1
 		if grupTipe = 3:
 			'"Can we talk later? I really want to finish this chapter before class starts." Petka says, only briefly looking up from his book to address you before burying his nose right back into it.'
@@ -177,7 +177,6 @@ if $ARGS[0] = 'natasha':
 			minut += 5
 			natotrab += 1
 			natsub += 1
-			pcs_dom += 1
 			gs 'stat'
 			'<center><b><font color="maroon">Girls Bathroom</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/girlsbathroom.jpg"></center>'
@@ -187,18 +186,16 @@ if $ARGS[0] = 'natasha':
 			act 'Continue':
 !!ToDo: Expand this content (nutluck)
 				*clr & cla
-				minut += 15
 				NatDolg -= 500
-				if npc_Sex['A16'] = 0: npc_Sex['A16'] = 1 & guy += 1
-				lesbian += 1
-				pcs_horny = 0
-				orgasm += 1
+				if npc_Sex['A16'] = 0: npc_Sex['A16'] = 1 & girl += 1
 				natlesb += 1
-				gs 'stat'
+				$orgasm_or = 'yes'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/school/natschoolowe.jpg"></center>'
 				'Her tongue starts to lick your clit, you bite your lip to try and keep from moaning too loudly. You lean back and relax, as you let Natasha pleasure you with her tongue. She is getting a lot better at this and if your not mistaken she is starting to like it a lot.'
 				'She starts using her fingers on you as well and is really getting into it, you start to pant and moan. Clamping a hand over your own mouth to keep yourself from crying out, it doesn''t take her long to bring you to a climax.'
+				gs 'arousal', 'cuni', 10, 'lesbian', 'dom'
 				'Your whole body shudders as the orgasm rocks your body, you grind your pussy against her face as it does. Once the sensation passes you look down and see Natasha smiling up at you, obviously pleased with herself. You lean down and give her a long slow passionate kiss, tasting your own pussy juices on her lips. A few moments later the bell rings and you both merrily hurry to class.'
+				gs 'stat'
 				act 'Time for the next class': gt 'gschool_lessons', 'short_break'
 			end
 		end

locations/gschool_girls_bathroom.qsrc

@@ -143,10 +143,11 @@ if $ARGS[0] = 'girl2':
 			*clr & cla
 			'<center><b><font color="maroon">Girls bathroom</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/school/sonialick.jpg"></center>'
-			'The treatment she gives your clit and nipples turns your panties into a soaked mess and your entire body is tense now, still a ways away from release but too far gone to even think about stopping now. She pushes you back into the stall and briefly covers you mouth with hers, her sweet perfume tickling your nose with the promise of sexual bliss, your tongues wrestling with each other as you practically tear eachother''s clothes off. Sonia sits you down on the edge of the toilet and spreads your legs wide; the smoldering look she gives you as she kneels down between them sends waves of excitement through your body. The girl takes her time as she kisses her way down from your breasts to your navel, to your pubic mound... then past your sex, down your inner thigh. Just as you open your mouth to protest, her tongue takes a lingering lap at your tongue.'
+			'The treatment she gives your clit and nipples turns your panties into a soaked mess and your entire body is tense now, still a ways away from release but too far gone to even think about stopping now. She pushes you back into the stall and briefly covers you mouth with hers, her sweet perfume tickling your nose with the promise of sexual bliss, your tongues wrestling with each other as you practically tear eachother''s clothes off. Sonia sits you down on the edge of the toilet and spreads your legs wide; the smoldering look she gives you as she kneels down between them sends waves of excitement through your body. The girl takes her time as she kisses her way down from your breasts to your navel, to your pubic mound... then past your sex, down your inner thigh. Just as you open your mouth to protest, her tongue takes a lingering lap at your lips.'
 			*nl
 			'For all the cock she is rumored to have sucked, she is mind-numbingly good at licking pussy, turning the sound you meant to utter into a sigh of pleasure. You briefly wonder if the two skills are related before her magic mouth and fingers put you in a state beyond coherence. You can feel the tension in your body taking palpable form, concentrating more and more in your lower stomach, building up. As you get closer and closer to climax, she slips two of her small fingers into your pussy, finger-fucking you while she licks, sucks and flicks your clit with her tongue. The sensation is overwhelming, the timing impeccable, hitting the right spot and rhythm in a way no man could. She somehow even holds you on the edge for a few more seconds before your body starts shaking in orgasm and you scream out in unbridled lust.'
 			gs 'arousal', 'cuni', 10, 'lesbian'
+			gs 'arousal', 'vaginal_finger', -5, 'lesbian'
 			gs 'stat'
 			act 'Return the favor':
 				*clr & cla
@@ -163,6 +164,7 @@ if $ARGS[0] = 'girl2':
 					*nl
 					'The question leaves you dumbfounded - it takes you a moment or two to realize that everything you just experienced with her took place in a school toilet and that you now have to return to ''reality''. "Uh, I think he said there would be a quiz, yeah. Maybe we should have studied instead of having fun." You can''t help but giggle, and Sonia joins in. You spend the rest of the hour till the bell rings talking about mundane stuff and (sigh) going over some chemistry notes. Still, if this is how good it can be, maybe you should skip class more often.'
 					gs 'arousal', 'cuni_give', 10, 'lesbian'
+					gs 'arousal', 'vaginal_finger_give', -5, 'lesbian'
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Go to Class':gt 'gschool_lessons', 'short_break'

locations/gschool_grounds.qsrc

@@ -633,6 +633,7 @@ if $ARGS[0] = 'SchoolRun2':
 end
 
 if $ARGS[0] = 'SchoolRun2_result':
+	cla
 	if begresult <= 15:
 		grupvalue[2] -= 2
 		'You barely manage to reach the finish line at all. There''s no point in checking where you finished, you already know you were last by quite a large margin.'

locations/gskino.qsrc

@@ -39,11 +39,15 @@ if money >= 100:
 			'You quietly watch the movie, but suddenly behind you there is a strange sound.'
 			act 'Turn around and look':
 				*clr & cla
-				pcs_horny += 3
 				gs'stat'
 				'<center><video autoplay loop src="images/locations/pavlovsk/park/theater/sex/kino.mp4"></video></center>'
 				'You see on the back row a girl sucking a guy, nobody reacts to the loud smacking sound that can be heard by the whole cinema.'
 				'You turn back and watch the rest of the film.'
+				
+				gs 'arousal', 'voyeur_sex', 2
+				gs 'arousal', 'end'
+				gs 'stat'
+				
 				act 'Leave the cinema':gt 'gskver', 'start'		
 			end
 		end