glife.qproj

@@ -65,6 +65,9 @@
 		<Location name="body_shape"/>
 		<Location name="lact_lib"/>
 		<Location name="lact_bp"/>
+		<Location name="body_din"/>
+		<Location name="medical_din"/>
+		<Location name="sweat"/>
 	</Folder>
 	<Folder name="Stimulus">
 		<Location name="boyStat"/>

locations/AlbStarsWhore.qsrc

@@ -1,5 +1,6 @@
 # AlbStarsWhore
 
+!!needs complete revamp, add willpower during revamp.
 menu_off = 1
 
 if $ARGS[0] = 'whore1':

locations/AleksandraGo.qsrc

@@ -3,21 +3,21 @@ menu_off = 1
 if npc_QW['A231'] = 1:
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
-!!Image needed	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+!!Image needed	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big62.jpg"></center>'
 	'You walk up to <<$npc_firstname[''A231'']>> and she asks you, "Are you ready to head to my house? Once I finish changing, we''ll head to the library."'
 	'You nod your head and say "Yes, I''m ready.  Let''s go."'
 	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'pre_library' & minut += 15
 elseif npc_QW['A231'] = 3:
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
-!!Image needed	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+!!Image needed	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big62.jpg"></center>'
 	'You walk up to <<$npc_firstname[''A231'']>> and she asks you, "Are you ready to head to my house?"'
 	'You nod your head and say "Yes, I''m ready.  Let''s go."'
 	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'study_confront' & minut += 15
 elseif npc_QW['A231'] = 5:
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
-!!Image needed	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+!!Image needed	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big62.jpg"></center>'
 	'You walk up to <<$npc_firstname[''A231'']>> and she asks you in a hesitant tone, "Are you ready to head to my house?"'
 	'You nod your head and say "Yes, I''m ready.  Let''s go."'
 	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'secret_confront' & minut += 15
@@ -28,7 +28,7 @@ elseif npc_QW['A231'] > 5:
 	gs 'arousal', 'kiss', '5', 'futa'
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
-!!Image needed	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+!!Image needed	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big62.jpg"></center>'
 	'As you walk up to <<$npc_firstname[''A231'']>> and she smiles and says, "Hey <<pcs_nickname>>, there you are."'
 	'Once you finally meet up with each other, she leans in an gives you a brief kiss on the lips. Once you break off the kiss, she asks "Are you ready to head to my house?"'
 	'You nod your head and say "Yes, I''m ready.  Let''s go."'

locations/BDsex.qsrc

@@ -79,20 +79,33 @@ 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'
-				if pcs_dom > 0:
-					act 'Lie on your back and spread your legs ':gt 'BDsex', 'sex'
-					act 'Stand on all fours':gt 'BDsex', 'sex2'
-				end
-			elseif brand >= 90:
+			gs 'willpower', 'sex', 'resist'
+			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'
+			else
+				act '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 'Stand on all fours (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		elseif brand >= 90:
 
 			'<<$boydesc>> tells you that he wants to take you in the ass.'
 
 			act 'Do anal':gt 'BDsex', 'anal2'
 
-			if pcs_dom > 0:
-				act 'I do not want to! Lie on your back and spread your legs instead ':gt 'BDsex', 'sex'
-				act 'Tell him that you''ll go into a doggystyle position, but that your ass is a no-go':gt 'BDsex', 'sex2'
-				act 'Take by mouth':gt 'BDsex', 'minet'
+			gs 'willpower', 'sex', 'resist'
+			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'
+			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'
+			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'
+			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
 		end
 	end
@@ -264,7 +277,7 @@ if $ARGS[0] = 'hj':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand2.jpg"></center>'
-				if protect = 1: 
+				if protect = 1:
 					gs 'cum_manage'
 					protect = 0
 					if sexcontra = 4:
@@ -322,10 +335,19 @@ if $ARGS[0] = 'hj':
 
 				act 'Anal':gt 'BDsex', 'anal2'
 
-				if pcs_dom > 5:
-					act '"I do not want to!" Lie on your back and spread your legs ':gt 'BDsex', 'sex'
-					act '"I''ll do it doggy style, but not in the ass!"':gt 'BDsex', 'sex2'
-					act 'Take by mouth':gt 'BDsex', 'minet'
+				gs 'willpower', 'sex', 'resist'
+				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'
+				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'
+				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'
+				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
 			elseif brand >= 80:
 				'<<$boydesc>> forces your face down on his member.'
@@ -358,7 +380,7 @@ if $ARGS[0] = 'minet':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand2.jpg"></center>'
-				if protect = 1: 
+				if protect = 1:
 					'<<$boydesc>> finishes, filling the condom with his cum.'
 					protect = 0
 					sexcontra = 0
@@ -368,9 +390,9 @@ if $ARGS[0] = 'minet':
 					'<<$boydesc>> finished all over your hands covering them in hot and sticky cum.'
 					spafinloc = 13
 					sexpartkno = 1
-					gs 'cum_manage'	
+					gs 'cum_manage'
 					gs 'arousal', 'end'
-					gs 'stat'				
+					gs 'stat'
 				end
 				act 'Leave':gt 'BDsex', 'end'
 			end
@@ -403,9 +425,13 @@ if $ARGS[0] = 'minet':
 
 				act 'Anal':gt 'BDsex', 'anal2'
 
-				if pcs_dom > 0:
-					act '"I do not want to!" Lie on your back and spread your legs ':gt 'BDsex', 'sex'
-					act '"I''ll do it doggy style, but not in the ass!"':gt 'BDsex', 'sex2'
+				gs 'willpower', 'sex', 'resist'
+				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'
+				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
 			end
 		end
@@ -420,7 +446,7 @@ if $ARGS[0] = 'minet':
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand2.jpg"></center>'
-				if protect = 1: 
+				if protect = 1:
 					'<<$boydesc>> finishes, filling the condom with his cum.'
 					protect = 0
 					sexcontra = 0
@@ -445,7 +471,7 @@ if $ARGS[0] = 'facial':
 	minut += 3
 	picrand = rand(11, 15)
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial<<picrand>>.jpg"></center>'
-	if protect = 1: 
+	if protect = 1:
 		'<<$boydesc>> finishes, filling the condom with his cum.'
 		protect = 0
 		sexcontra = 0
@@ -455,7 +481,7 @@ if $ARGS[0] = 'facial':
 		sexpartkno = 1
 		gs 'cum_manage'
 	end
-	gs 'stat'			
+	gs 'stat'
 	act 'Brush up':gt 'BDsex', 'end'
 end
 
@@ -463,7 +489,7 @@ if $ARGS[0] = 'swallow':
 	minut += 3
 	picrand = rand(20, 29)
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum<<picrand>>.jpg"></center>'
-	if protect = 1: 
+	if protect = 1:
 		'<<$boydesc>> finishes, and you feel the condom balloon up in your mouth.'
 		protect = 0
 		sexcontra = 0
@@ -474,7 +500,7 @@ if $ARGS[0] = 'swallow':
 		gs 'cum_manage'
 		swallow += 1
 	end
-	gs 'stat'			
+	gs 'stat'
 	act 'Brush up':gt 'BDsex', 'end'
 end
 
@@ -490,6 +516,7 @@ if $ARGS[0] = 'end':
 		gs 'cum_cleanup'
 		gs 'stat'
 		'Yuri lets you have a quick shower and dress before giving you a quick kiss on the cheek.'
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 		act 'Leave':gt 'nord'
 	elseif $boydesc = 'Michael N.':
 		act 'Leave':dynamic $brodilr
@@ -508,15 +535,18 @@ if $ARGS[0] = 'end':
 		cumspclnt = 4
 		gs 'cum_cleanup'
 		'You wash quickly in shower and <<$boydesc>> begins to hurry you out.'
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 		act 'Leave':dynamic $brodilr
 	elseif harakBoy = 0:
 		minut += 15
 		pcs_horny += 1
 		pcs_hairbsh = 1
 		pcs_makeup = 1
+		noShampoo = 1
 		dynamic $showerdin
 		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 		'You go into the bathroom and turn on the shower, lathering body and washing as well as you can.'
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 		act 'Leave':dynamic $brodilr
 	elseif harakBoy = 2:
 		'<<$boydesc>> won''t even let you go to the bathroom to clean up.'
@@ -772,7 +802,7 @@ if $ARGS[0] = 'autobj':
 		gs 'stat'
 	end
 
-	pcs_horny += pcs_throat + SUB - pcs_dom
+	pcs_horny += pcs_throat + 10 - (willpowermax / 10)
 	'His hard and hot cock slides into your wet mouth, filling it completely. Your lips are locked tightly around his dick in a lovers embrace.'
 
 	if pcs_horny >= 100:

locations/BelSex.qsrc

@@ -13,12 +13,12 @@ if $ARGS[0] = '' or $ARGS[0] = 'sex':
 
 	belact = rand(1,3)
 	'You suck <<$boydesc>>''s tongue as he kisses you, doing your best to please him in any way you can... because who knows what he''ll do if you don''t. He crudely kneads your butt and upper thighs, grabbing your ass cheeks and slapping them, making your ass cheeks jiggle.'
-	
+
 	gs 'arousal', 'kiss', 5, 'sub', 'prostitution'
 	gs 'arousal', 'foreplay', 5, 'sub', 'prostitution'
 	minut -= 5
 	gs 'stat'
-	
+
 	belybj = rand(0,2)
 	if belybj = 0:
 		'<<$boydesc>> puts his large hands on your shoulders and forces you downwards. Even though you''re trying to cooperate and drop to your knees as soon as you realize what he wants, he''s still kind of rough with you. "Start sucking, <<$pcs_nickname>>."'
@@ -42,7 +42,7 @@ if $ARGS[0] = 'bj1':
 
 	gs 'arousal', 'bj', 10, 'sub', 'prostitution', 'deepthroat'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		'<<$boydesc>> groans, clearly enjoying himself. He stands up, grabs you by the hair, and begins fucking your mouth. "Wider, you little slut, I don''t want to feel any teeth."'
 		'Not daring making him more upset you make sure your teeth don''t get in the way and open your mouth as wider.'
@@ -89,7 +89,7 @@ if $ARGS[0] = 'bj2':
 
 	gs 'arousal', 'bj', 10, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		'Your tongue is giving every bit of his cock it can reach its attention as you bob your head back and forth.'
 		'Your lust takes over and you take him as deep into your mouth as you can, keeping him there until you start to gag and have to come up for air. Taking few breaths to recover, you take him inside again, rapidly moving your head, sucking and deepthroating him for all you''re worth.'
@@ -122,7 +122,7 @@ if $ARGS[0] = 'bj2':
 		else
 			'<<$boydesc>> lies down on his back and begins playing with his cock waiting for you to straddle him.'
 			act 'Ride him':gt 'BelSex', 'cowgirl'
-		end 
+		end
 	end
 end
 
@@ -133,10 +133,10 @@ if $ARGS[0] = 'bj3':
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<picrand>>.mp4"></video></center>'
 	'"Get down on your knees!" he commands. Unfazed by his boldness, you kneel down in front of him and lick up and down his length a few times before you take his <<dick>> cm cock into your mouth. As his cock enters, a rank odor enters your nostrils. You disregard the nasty aroma and begin moving your tongue around the head and you suck his dick as you start bobbing your head up and down while your hands take turns playing with his hairy balls. It''s hard for you to decide whether you want to move slowly and tease him, or speed up to avoid getting caught, but what you are doing seems to be to his liking.'
 	'"Good girl", he whispers, "I knew you could suck cock as soon as I saw you." His praise causes you to smile a little around his dick and you take him a little deeper in response.'
-	
+
 	gs 'arousal', 'bj', 10, 'sub', 'prostitution', 'deepthroat'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		'<<$boydesc>> is grimacing, enjoying himself. He is sitting down, letting you do all the work. Encouraged, you take his cock deeper, trying to hold it down as long as possible.'
 		'"Good girl, keep on sucking my cock." All of a sudden his cock gets stiffer and he pulls out of your mouth. "I''m ready to cum..." You move your head towards his cock but he stops you...'
@@ -148,7 +148,7 @@ if $ARGS[0] = 'bj3':
 			belsexpayment = 300
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
 			'Instead, <<$boydesc>> starts jerking off, telling you "I''ll be done soon, <<$pcs_nickname>>. I want you to swallow every little drop." He doesn''t last much longer and cums all over your face.'
-			'He squeezes the last few drops of sperm into your mouth and then sticks his dick in your mouth. You swallow his cum obediently and then suck his dick clean, licking every tasty inch of it you can reach. Once he goes soft in your mouth, he pulls out his cock.' 
+			'He squeezes the last few drops of sperm into your mouth and then sticks his dick in your mouth. You swallow his cum obediently and then suck his dick clean, licking every tasty inch of it you can reach. Once he goes soft in your mouth, he pulls out his cock.'
 			swallow += 1
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -181,10 +181,10 @@ if $ARGS[0] = 'vaginal1':
 	'<<$boydesc>> lifts you up, grabs you by the hair, and shoves you onto the bed. You land on your back, as he quickly moves in, you spread your legs. He starts touching your pussy lips with his fat fingers, you let out a moan as he penetrates you with his finger.'
 	'"That''s enough, you''re all wet and ready now." he says. He grabs hold of his penis slowly slides his member into your wet cunt, softly parting your nether lips. As your pussy walls envelops his cock you let out a soft moan.'
 	'Hanging over you, looking into your eyes he starts build up quite a bit of speed. "You''re a pretty good fuck <<$pcs_nickname>>, but I''ve had better." he says as his sweat drips all over you.'
-	
+
 	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', '', 'A113', 1
 		gs'stat'
@@ -204,7 +204,7 @@ if $ARGS[0] = 'vaginal1':
 		else
 			'<<$boydesc>> pulls out of your pussy as the sensations make you moan; "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
 			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
-		end 
+		end
 	end
 end
 
@@ -213,13 +213,13 @@ if $ARGS[0] = 'vaginal2':
 	sex_temp += 1
 	picrand = rand(0,7)
 	'<center><video autoplay loop src="images/characters/pavlovsk/vadim/sex/mitka<<picrand>>.mp4"></video></center>'
-	'<<$boydesc>> lifts you up, grabs you by the hair, and shoves you onto the bed. His cock, well greased from the blowjob, easily slides into your pussy.' 
+	'<<$boydesc>> lifts you up, grabs you by the hair, and shoves you onto the bed. His cock, well greased from the blowjob, easily slides into your pussy.'
 	'You feel his glans stretching the inner walls of your pussy and you let out a loud moan with each penetration. As he keeps fucking you it doesn''t take long before you get accustomed to his movements.'
 	'"Let''s see how deep I can go," he says as he rams his cock so deep that your pubes touch. You scream out loud, breathing fast and heavily and he continues pounding you.'
-	
+
 	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', '', 'A113', 1
 		gs'stat'
@@ -239,7 +239,7 @@ if $ARGS[0] = 'vaginal2':
 		else
 			'<<$boydesc>> pulls out of your pussy as the sensations make you moan. "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
 			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
-		end 
+		end
 	end
 end
 
@@ -251,10 +251,10 @@ if $ARGS[0] = 'doggy':
 	'With his cock rock hard and nicely wet he lifts your body, turns you around, and tells you to get on all fours on the floor. He gets down on his knees. Streching your butt cheeks slowly, he runs his shaft along your wet pussy, teasing you, all of a sudden he shoves his cock into your pussy and starts pounding away, not caring about your enjoyment. He just wants to fuck.'
 	'Holding you by the hips, he pounds on without slowing the pace, only occasionally stopping to catch a breath. "Isn''t he going to slow down soon?" you think to yourself. But you''ve underestimated him, instead he grabs your hair and pushes himself even deeper inside.'
 	'You moan loudly as he rams his cock deeper and deeper. You hear him panting and grunting he must''ve reached his limit...'
-	
+
 	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', '', 'A113', 1
 		gs'stat'
@@ -274,7 +274,7 @@ if $ARGS[0] = 'doggy':
 		else
 			'<<$boydesc>> pulls out of your pussy as the sensations make you moan. "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
 			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
-		end 
+		end
 	end
 end
 
@@ -286,11 +286,11 @@ if $ARGS[0] = 'cowgirl':
 	'<<$boydesc>> lies on the bed. He smirks as he tells you that you''ll be doing all the work today. You look at him, still a bit confused after the blowjob you''ve given him. Wasn''t that enough? "Don''t waste my time <<$pcs_nickname>>. Come here!" Not daring to do upset him even more, you crawl on top of <<$boydesc>> and guide his cock inside your vagina.'
 	'He grabs your hips, controlling the rhythm as you to ride him. He wants it fast. Fast, deep and hard, without any regard to you, or that he actually bumps into your cervix in this position. You keep riding him at the same rhythm as he moves his hands grabbing you breasts instead.'
 	'Unable to think of anything but the pleasure, you moan so loudly that you are almost screaming. Wanting to ride out this intense feeling, you completely forget that you''re supposed to please <<$boydesc>> as you orgasm while riding him.'
-	
-	$orgasm_or = 'yes' 
+
+	$orgasm_or = 'yes'
 	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', '', 'A113', 1
 		gs'stat'
@@ -310,7 +310,7 @@ if $ARGS[0] = 'cowgirl':
 		else
 			'<<$boydesc>> pulls out of your pussy as the sensations make you moan. "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
 			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
-		end 
+		end
 	end
 end
 
@@ -320,10 +320,10 @@ if $ARGS[0] = 'anal1':
 	'<center><video autoplay loop src="images/shared/sex/anal/piledriver/kotovsexanal36.mp4"></video></center>'
 	'<<$boydesc>> begins rubbing the tip of his dick against you anus. Before you can even protest, his <<dick>> cm cock has already painfully penetrated your ass. You instinctively want to flinch away, but he grabs your hips with surprising strength and forces his dick as far into your ass as he can... before he starts hammering away.'
 	'"All the other girls I''ve fucked over the years loved getting their ass destroyed," he informs you between slaps of flesh against flesh. "I hope you don''t mind." The only response you manage to let out is a little squeak as if you''re giving him permission to continue on, not that he needs it.'
-	
+
 	gs 'arousal', 'anal', 15, 'sub', 'prostitution', 'rough'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', 'anus', 'A113', 1
 		gs'stat'
@@ -331,7 +331,7 @@ if $ARGS[0] = 'anal1':
 		picrand = rand(1,2)
 		'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal<<picrand>>.mp4"></video></center>'
 		'You can tell <<$boydesc>> is close to his orgasm. He huffs and puffs quite heavily now. Seconds later he firmly grabs your hips, his movements more erratic, and you feel his cock spasming inside you as he shoots his cum deep inside your asshole. The cum feels kind of warm inside you, and it slowly dribbles from you asshole once he pulls out his cock.'
-		
+
 		act'Take a shower':gt 'BelSex', 'shower'
 	end
 end
@@ -343,17 +343,17 @@ if $ARGS[0] = 'anal2':
 	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal<<picrand>>.mp4"></video></center>'
 	'<<$boydesc>> lies on the bed, as you climb on top of him. <<$boydesc>> grabs hold of his cock, guiding his cock inside your tight anus.'
 	'You gasp as you start moving back and forth, controlling the rhythm as you ride him. First, slowly, as you adjust yourself. Soon enough you''re speeding up: fast, deep, and hard. You feel a sharp pain that quickly turns into a pleasant ache. You keep riding him at the same pace as he begins panting more and more.'
-	
+
 	gs 'arousal', 'anal', 15, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', 'anus', 'A113', 1
 		gs'stat'
 		belsexpayment = 600
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/analcum.jpg"></center>'
 		'You can tell <<$boydesc>> is close to his orgasm. His cock is stiff and has gotten larger inside your anus. Seconds later he firmly grabs your hips and you feel his cock spasming inside you as he shoots his cum deep inside your asshole. The cum feels kind of warm inside you, and it slowly dribbles out as you get up off of him.'
-		
+
 		act'Take a shower':gt 'BelSex', 'shower'
 	end
 end
@@ -368,14 +368,14 @@ if $ARGS[0] = 'analdoggy':
 
 	gs 'arousal', 'anal', 15, 'sub', 'prostitution'
 	gs 'stat'
-	
+
 	if belact <= 0:
 		gs 'cum_call', 'anus', 'A113', 1
 		gs'stat'
 		belsexpayment = 600
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/kafeanpie.jpg"></center>'
 		'You''re at your limit and just as you want to beg him to take it easier, you feel him twitching behind you. All of a sudden you feel his warm cum shooting inside you. It slowly dribbles down your thighs as he pulls out of you.'
-		
+
 		act'Take a shower':gt 'BelSex', 'shower'
 	end
 end
@@ -384,6 +384,7 @@ if $ARGS[0] = 'shower':
 	'<<$boydesc>> is finally done with you. He looks at you all pleased as you get up and head off to the bathroom to take a quick shower and freshen up.'
 	act 'Take a 15 minute shower':
 		cls
+		noShampoo = 1
 		dynamic $showerdin
 		minut += 15
 		pav_prostitute += 1
@@ -394,13 +395,13 @@ if $ARGS[0] = 'shower':
 		gs 'stat'
 		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 		'You get into the nice, hot water stream of the shower and lather your body up with a soapy sponge. You carefully make sure to wash all of his cum that''s dripping out your holes, you then shampoo your hair and rinse that out as well. You''re squeaky clean now.'
-		
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 		act 'Get out of the bathroom':
 			cls
 			minut += 5
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
-	
+
 			if belgangPay <= 0:
 				money += belsexpayment
 				'Vadim looks at you and says: "That was a good fuck, <<$pcs_nickname>>. Here, this is for you," and with those words he hands you <<belsexpayment>> <b>₽</b>.'
@@ -417,12 +418,12 @@ if $ARGS[0] = 'shower':
 					'You have reduced your next weeks payment by: <<-1*belgangPayWeek>> <b>₽</b>'
 				end
 			end
-						
+
 			if $clothingworntype = 'swimwear': gs 'clothing', 'wear', $normalclothingworntype, normalclothingwornno
-								
+
 			gs 'arousal', 'end'
 			gs 'stat'
-			
+
 			act 'Leave': gt $loc
 		end
 	end

locations/BurgerTip.qsrc

@@ -425,7 +425,7 @@ if $ARGS[0] = 'work':
 										sexcontra = 0
 										dynamic 'showerdin'
 										'You head to the shower to wash up. When you return, you see that he is already dressed."<<$pcs_nickname>>, I''ve got to run, but you were great baby," he says, giving you a kiss before he leaves.'
-
+										if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 										gs 'arousal', 'vaginal', 15, 'sub'
 										gs 'arousal', 'end'
 										gs 'stat'

locations/Club2.qsrc

@@ -8,6 +8,7 @@ if $ARGS[0] = 'toilet1':
 	gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
 	gs 'boyStat', $npclastgenerated
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory.jpg"></center>'
+	*nl
 	'You went into the booth and closed the door. The walls are covered with obscene graffiti in the walls and booths carved strange round holes. Sitting on the toilet you hear what that noise in the next stall. Through the hole in the wall you looked someone''s eyes.'
 	'In a hole in the wall squeezed fat cock. Lustful voice said, "here''s a yum yum, baby."'
 	'This is so not surprisingly, that you do not believe in the reality of what is happening to touch the finger member. It is hard and hot.'
@@ -22,6 +23,7 @@ if $ARGS[0] = 'toilet1':
 		guy += 1
 		pcs_throat += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory1.jpg"></center>'
+		*nl
 		'You lean against a member, it''s so big, warm and solid, you licked it, then again and again.'
 		
 		gs 'arousal', 'bj', 5, 'sub'
@@ -30,6 +32,7 @@ if $ARGS[0] = 'toilet1':
 		act 'Cover lips':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory2.jpg"></center>'
+			*nl
 			'You bows member lips and start sucking it, trying to take it as deep as possible.'
 			'Suddenly, in your mouth and poured hot tart liquid.'
 
@@ -43,6 +46,7 @@ if $ARGS[0] = 'toilet1':
 				gs 'cum_manage'
 				money += 1000
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory3.jpg"></center>'
+				*nl
 				'You dial a mouthful of sperm, and then swallow it, sperm is not tasty, sticky and sharp taste.'
 				'A male voice telling you - excellent crumb, the money you deserve, a member of the hole and the hole disappears pushes 1,000 RUB.'
 
@@ -58,6 +62,7 @@ if $ARGS[0] = 'toilet1':
 				gs 'cum_manage'
 				money += 500
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory3.jpg"></center>'
+				*nl
 				'You dial a mouthful of sperm, the sperm is not tasty, sticky and sharp, you spit it on the floor.'
 				'A male voice telling you - excellent crumb, the money you deserve, a member of the hole and the hole disappears and is replaced by 500 RUB.'
 
@@ -87,6 +92,7 @@ if $ARGS[0] = 'toilet':
 		money += 500
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/mast/tomas.jpg"></center>'
+		*nl
 		'You caress his fingers swollen pussy until you orgasm does not cover.'
 		'After orgasm, you take it easy, but hear from the next stall pant, look at the wall you see that someone is peeking through the hole located in the wall.'
 		'The man behind the wall and realized that found giggled, great show. Eye of the holes in the wall and disappeared into it squeezed 500 RUB.'
@@ -108,78 +114,88 @@ if $ARGS[0] = 'toilet2':
 	act 'Leave':gt 'club', 'inside'
 
 	act 'Wait':
-		cla
+		*clr & cla
 		slutiness += 10
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory4.jpg"></center>'
+		*nl
 		'On both sides of your booth through holes in the walls climbed members. Voice on the wall said, come on, baby, come on, we''re fed.'
-		'You took both members and began to caress them, then bent over to one of the members and took it into his mouth.'
+		'You took both members and began to caress them, then bent over to one of the members and took it into your mouth.'
 		
 		gs 'arousal', 'hj', 10, 'sub', 'group'
 		gs 'arousal', 'bj', 10, 'sub', 'group'
 		minut -= 10
 		gs 'stat'
 		
-		wait 3000
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory5.jpg"></center>'
-		'You are enthusiastically fucked by both members in turn.'
-		
-		gs 'arousal', 'vaginal', 10, 'sub', 'group'
-		gs 'stat'
-		
-		wait 3000
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory6.jpg"></center>'
-		'Finally one of the men ends up in your mouth.'
-		'You lick and start to finish processing the second term.'
-		
-		gs 'arousal', 'bj', 10, 'sub', 'group'
-		gs 'stat'
-		
-		wait 3000
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory7.jpg"></center>'
-		'The second man also comes in your mouth.'
-		'You swallow a mouthful and wipe your face, but semen is smeared all over it.'
-		
-		gs 'arousal', 'bj', 10, 'sub', 'group'
-		gs 'stat'
-		
-		horand = rand(1, 100)
-
-		if horand > pcs_horny:pcs_horny += 10 & 'You were not satisfied.'
-		$orgasm_or = 'no'
-		gs 'stat'
-		if horand <= pcs_horny:pcs_horny = 0 & 'Orgasm washes over you.'
-		$orgasm_or = 'yes'
-		gs 'stat'
-
-		wait 3000
-		money += 2000
-		'Pleased voice says from behind the wall - "You''re a great pacifier, I think you''ve earned a reward."'
-		'2,000 RUB pokes through the hole in the wall.'
+		act 'Continue':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory5.jpg"></center>'
+			*nl
+			'You are enthusiastically fucked by both members in turn.'
+			
+			gs 'arousal', 'vaginal', 10, 'sub', 'group'
+			gs 'stat'
 		
-		gs 'arousal', 'end'
-		gs 'stat'
+			act 'Continue':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory6.jpg"></center>'
+				*nl
+				'Finally one of the men ends up in your mouth.'
+				'You lick and start to finish processing the second term.'
+				
+				gs 'arousal', 'bj', 10, 'sub', 'group'
+				gs 'stat'
 		
-		wait 1000
-		TQuest = 3
-
-		if pornstudio = 0:pornstudio = 2
-
-		guy += 2
-		swallow += 2
-		gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
-		gs 'boyStat', $npclastgenerated
-		spafinloc = 12
-		gs 'cum_manage'
-		gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
-		gs 'boyStat', $npclastgenerated
-		spafinloc = 12
-		gs 'cum_manage'
-		'A male voice says - "Some work for you. Take the card, come if you want to have fun and make money."'
-
-		act 'Leave':gt 'club', 'inside'
+				act 'Continue':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory7.jpg"></center>'
+					*nl
+					'The second man also comes in your mouth.'
+					'You swallow a mouthful and wipe your face, but semen is smeared all over it.'
+					
+					gs 'arousal', 'bj', 10, 'sub', 'group'
+					
+					horand = rand(1, 100)
+
+					if horand > pcs_horny:pcs_horny += 10 & 'You were not satisfied.'
+					$orgasm_or = 'no'
+					if horand <= pcs_horny:pcs_horny = 0 & 'Orgasm washes over you.'
+					$orgasm_or = 'yes'
+					gs 'stat'
+
+					act 'Continue':
+						cla
+						money += 2000
+						TQuest = 3
+						'Pleased voice says from behind the wall - "You''re a great pacifier, I think you''ve earned a reward."'
+						'2,000 RUB pokes through the hole in the wall.'
+
+						guy += 2
+						swallow += 2
+						gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 12
+						gs 'cum_manage'
+						gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
+						gs 'boyStat', $npclastgenerated
+						spafinloc = 12
+						gs 'cum_manage'
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						if pornstudio = 0:
+							act 'Continue':
+								pornstudio = 2
+								'A male voice says - "Some work for you. Take the card, come if you want to have fun and make money."'
+
+								act 'Leave':gt 'club', 'inside'
+							end
+						else
+							act 'Leave':gt 'club', 'inside'
+						end
+					end
+				end
+			end
+		end
 	end
 end
 

locations/Cum_Manage.qsrc

@@ -68,7 +68,9 @@
 !!	cumarrkno =  0 : 'You know somebody got sperm in you, but you don''t know that person'
 !!	cumarrkno =  1 : 'You know who got sperm in you'
 !!
+!!	Setting for no STD checks
 !!
+!!	cumnostd = 1 : No risk of STD, resets at end of file so must be used for all related cum_management calls
 !!
 !!	Locations to be defined by 'spafinloc'
 !!
@@ -122,9 +124,9 @@ if $ARGS[0] = '':
 !!{Check for previous deposit, and if it was by the same guy and precum, it sets cumarrtemp back by one}
 !!	if $cumarrnam[cumarrtemp-1] = $boy and cumarrkno[cumarrtemp-1] = -1:cumarrtemp -= 1 & sexspecpot = cumarrppt[cumarrtemp]
 
-	if cumprecheck = 1:
+	if cumprecheck = 1 and cumnostd = 0:
 		cumarrkno[cumarrtemp] = -1
-		dynamic $venerasiak
+		gs 'dinSex', 'std_trigger'
 	elseif sexunaware > 0:
 		cumarrkno[cumarrtemp] = -2
 	elseif sexpartkno = 1:
@@ -350,7 +352,7 @@ if $ARGS[0] = '':
 	!! creampie vaginal statistics:
 			if spafinloc = 0:
 				!!STD checks
-				dynamic $venerasiak
+				if cumnostd = 0: gs 'dinSex', 'std_trigger'
 				!! safe creampie (if cycle > 3 or on pill or succubus):
 				if cycle > 3 or pillcon2 > 1000 or succubusflag = 1:
 					if sexunaware = 1 or sexcontra = 6:
@@ -464,9 +466,9 @@ if $ARGS[0] = '':
 	end
 
 	!!STD from anal check
-	if spafinloc = 3: dynamic $venerasiak
+	if spafinloc = 3 and cumnostd = 0: gs 'dinSex', 'std_trigger'
 	!!STD from oral check
-	if spafinloc = 12: dynamic $venerasiakOral
+	if spafinloc = 12 and cumnostd = 0: gs 'dinSex', 'std_trigger_oral'
 
 	cumprecheck = 0
 	spafinloc = 0
@@ -488,6 +490,7 @@ if $ARGS[0] = '':
 
 	end
 	killvar 'sexspecpot'
+	killvar 'cumnostd'
 end
 
 

locations/EndFight.qsrc

@@ -33,7 +33,7 @@
 	!!you lost surrender
 !!end
 
-!!act '...':gt $loc
+!!act 'Finish':gt $loc
 
 !!if Ku > Kb:
 !!	if Ku > Kz:Uteh[1] += 10
@@ -145,7 +145,7 @@ elseif resultFight = 4:
 	SubLoss[a] += 1
 end
 
-act '...':gt $loc
+act 'Finish':gt $loc
 
 --- EndFight ---------------------------------
 

locations/FedorEv.qsrc

@@ -25,6 +25,7 @@ if $ARGS[0] = '' or $ARGS[0] = 'Start':
 		gt 'FedorEv2', 'Fedor Breakup'
 	elseif fedorKozlovQW >= 10 and dimaFilm = 1 and FedorvsDimka = 1:
 		gt 'FedorMisc', 'Fedor Vs Dimka'
+!!ToDo: sub and dom have to replaced, they can''t be changed into willpower in this case		
 	elseif fedorKozlovQW >= 20 and GorSlut < 2 and sub > 0:
 		gt 'FedorEv', 'Fedor Date 2'
 	elseif fedorKozlovQW >= 20 and GorSlut < 2 and pcs_dom >= 0:
@@ -135,7 +136,7 @@ if $ARGS[0] = 'Gorslut':
 			gs 'stat'
 			'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big5.jpg"></center>'
-			'"It was a stupid mistake that I wish I could take back, I had too many drinks and..." Fedor raises his hand and says, "You don''t need to tell me more, let''s just put this behind us." You lean forward and greatfully kiss Fedor on the cheek he then hugs you for a few moments and walks away.'
+			'"It was a stupid mistake that I wish I could take back, I had too many drinks and..." Fedor raises his hand and says, "You don''t need to tell me more, let''s just put this behind us." You lean forward and gratefully kiss Fedor on the cheek he then hugs you for a few moments and walks away.'
 
 			act 'Move away':
 				if $loc = 'gschool_lunch':

locations/FedorEv2.qsrc

@@ -31,7 +31,7 @@ if $ARGS[0] = 'Park Walk':
 	act 'I would love too.':
 		*clr & cla
 		pcs_mood += 5
-		pcs_willpwr += 5
+		!pcs_willpwr += 5
 		minut += 5
 		FedorLuv += 1						
 		gs'stat'
@@ -39,25 +39,31 @@ if $ARGS[0] = 'Park Walk':
 		'"That sounds like fun" Fedor then leads you to the swing and after you sit down Fedor grabs your waist firmly and gives you a light push and as you continue to swing he slowly increases the pace. After you have a good pace going then Fedor stands in front of you watching you swing while encouraging you to swing higher.'	
 		
 		if $pantyworntype = 'none':
-			act 'Flash Fedor':
-				*clr & cla
-				pcs_mood += 5
-				pcs_willpwr += 5
-				FedorLuv += 2
-				gs'stat'
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/swingflash.mp4"></video></center>'
-				'While swinging, you give Fedor a seductive grin, as you spread your legs after each swing, giving Fedor a close up of your vagina which gives you a rush of excitement. You can see a shocked look on Fedor''s face which soon turns to a very pleased grin, "<<$pcs_nickname>> you little minx." You then slide off the swing, landing on your feet and walk past Fedor, giving him a seductive wink while taking his hand and continuing your walk together.'
-				gs 'arousal', 'flash', 5
-				gs 'arousal', 'end'	
-				gs'stat'
-							
-				act 'Finish your walk':gt 'FedorEv2', 'Train Tracks'
-			end	
+			gs 'willpower', 'exhib', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Flash Fedor (<<will_cost>> Willpower)': 
+					gs 'willpower', 'pay', 'self'
+					*clr & cla
+					pcs_mood += 5
+					!pcs_willpwr += 5
+					FedorLuv += 2
+					gs'stat'
+					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/swingflash.mp4"></video></center>'
+					'While swinging, you give Fedor a seductive grin, as you spread your legs after each swing, giving Fedor a close up of your vagina which gives you a rush of excitement. You can see a shocked look on Fedor''s face which soon turns to a very pleased grin, "<<$pcs_nickname>> you little minx." You then slide off the swing, landing on your feet and walk past Fedor, giving him a seductive wink while taking his hand and continuing your walk together.'
+					gs 'arousal', 'flash', 5
+					gs 'arousal', 'end'	
+					gs'stat'
+								
+					act 'Finish your walk':gt 'FedorEv2', 'Train Tracks'
+				end	
+			else
+				act 'Flash Fedor (<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 'Ask Fedor to swing with you':
 			*clr & cla
 			pcs_mood += 5
-			pcs_willpwr += 5
+			!pcs_willpwr += 5
 			FedorLuv += 1
 			minut += 10
 			gs'stat'
@@ -83,7 +89,7 @@ if $ARGS[0] = 'Train Tracks':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 5
-	pcs_willpwr += 5
+	!pcs_willpwr += 5
 	minut += 20
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/tracks.jpg"></center>'
@@ -94,7 +100,7 @@ if $ARGS[0] = 'Train Tracks':
 	act 'Kiss Fedor':
 		*clr & cla
 		pcs_mood += 20
-		pcs_willpwr += 20
+		!pcs_willpwr += 20
 		FedorLuv += 2			
 		gs 'boyStat', 'A5'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/park/kiss.jpg"></center>'
@@ -108,7 +114,7 @@ if $ARGS[0] = 'Train Tracks':
 	act 'Offer him your hand':
 		*clr & cla
 		pcs_mood += 10
-		pcs_willpwr += 10
+		!pcs_willpwr += 10
 		minut += 10
 		FedorLuv -= 2			
 		gs'stat'
@@ -131,7 +137,7 @@ if $ARGS[0] = 'Movies':
 	act 'Hold hands':
 		*clr & cla
 		pcs_mood += 5
-		pcs_willpwr += 5
+		!pcs_willpwr += 5
 		FedorLuv += 1				
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/handkiss.jpg"></center>'
@@ -170,7 +176,7 @@ if $ARGS[0] = 'Cinema':
 			*clr & cla
 			pcs_health += 10
 			pcs_mood += 20
-			pcs_willpwr += 20
+			!pcs_willpwr += 20
 			pcs_energy += 20
 			pcs_hydra += 50
 			cumspclnt = 2
@@ -194,7 +200,7 @@ if $ARGS[0] = 'Cinema':
 			*clr & cla
 			pcs_health += 10
 			pcs_mood += 20
-			pcs_willpwr += 20
+			!pcs_willpwr += 20
 			fat += 1
 			pcs_energy += 30
 			pcs_hydra += 80
@@ -214,7 +220,7 @@ if $ARGS[0] = 'Movies 2':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 20
-	pcs_willpwr += 20
+	!pcs_willpwr += 20
 	minut += 60
 	gs'stat'
 	'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/scare.mp4"></video></center>'
@@ -224,7 +230,7 @@ if $ARGS[0] = 'Movies 2':
 	act 'Kiss him':
 		*clr & cla
 		pcs_mood += 20
-		pcs_willpwr += 20
+		!pcs_willpwr += 20
 		FedorLuv += 2				
 		gs 'boyStat', 'A5'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/scarekiss.mp4"></video></center>'
@@ -232,29 +238,35 @@ if $ARGS[0] = 'Movies 2':
 		gs 'arousal', 'kiss', 5	
 		gs'stat'
 
-		act 'Unzip his pants':
-			*clr & cla				
-			gs'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/cinema/sex/kinosex3.jpg"></center>'
-			'You slowly turn back to Fedor and notice that he forgot to zip his pants and you can see his underwear poking out, so you slowly reach out to zip it for him when you feel sudden excitement as your hand is over his crootch and with out thinking you reach into his pants and start rubbing on his penis. You can feel how rock hard his cock is and unable to stop yourself you start jerking him off hearing him softly moan. You then look up to him to see him biting his lip trying not to make to much noise.'
-			
-			act 'Continue jerking him':
-				*clr & cla
-				pcs_mood += 20
-				pcs_willpwr += 20
-				FedorLuv += 3
-				pcs_dom += 3						
+		gs 'willpower', 'hj', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Unzip his pants (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'self'
+				*clr & cla				
 				gs'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/hj.jpg"></center>'
-				'Feeling his warm penis in your hand and seeing his expression just fills you with excitement and a sense of power as you are in full control his pleasure. You continue to jerk him off as you admire the look of pleasure in his face and the slow throbbing of his cock. Soon Fedor''s head slams back in his chair and he lets out a muffled groan as his cock starts rapidly throbbing and erupting squirt after squire of semen on your pants and hands. Fedor lays back motionlessly for a few seconds then turns to you with a very satisfied look on his face, he leans toward you and kiss you on the cheek as he whispers "Wow <<$pcs_nickname>>, You are the best." then leans back in his chair, zipping his pants.'
-				gs 'arousal', 'hj', 5, 'dom'
-				gs 'cum_call', 'clothesgroin', $boy, 1 
-				gs 'cum_call', 'hands', $boy, 1						
-				gs 'arousal', 'end'
-				gs 'stat'						
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/cinema/sex/kinosex3.jpg"></center>'
+				'You slowly turn back to Fedor and notice that he forgot to zip his pants and you can see his underwear poking out, so you slowly reach out to zip it for him when you feel sudden excitement as your hand is over his crootch and with out thinking you reach into his pants and start rubbing on his penis. You can feel how rock hard his cock is and unable to stop yourself you start jerking him off hearing him softly moan. You then look up to him to see him biting his lip trying not to make to much noise.'
 				
-				act 'Finish watching movie':gt 'FedorEv2', 'Movie 3'
-			end	
+				act 'Continue jerking him':
+					*clr & cla
+					pcs_mood += 20
+					!pcs_willpwr += 20
+					FedorLuv += 3
+					!pcs_dom += 3						
+					gs'stat'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/hj.jpg"></center>'
+					'Feeling his warm penis in your hand and seeing his expression just fills you with excitement and a sense of power as you are in full control his pleasure. You continue to jerk him off as you admire the look of pleasure in his face and the slow throbbing of his cock. Soon Fedor''s head slams back in his chair and he lets out a muffled groan as his cock starts rapidly throbbing and erupting squirt after squire of semen on your pants and hands. Fedor lays back motionlessly for a few seconds then turns to you with a very satisfied look on his face, he leans toward you and kiss you on the cheek as he whispers "Wow <<$pcs_nickname>>, You are the best." then leans back in his chair, zipping his pants.'
+					gs 'arousal', 'hj', 5, 'dom'
+					gs 'cum_call', 'clothesgroin', $boy, 1 
+					gs 'cum_call', 'hands', $boy, 1						
+					gs 'arousal', 'end'
+					gs 'stat'						
+					
+					act 'Finish watching movie':gt 'FedorEv2', 'Movie 3'
+				end	
+			end
+		else
+			act 'Unzip his pants (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 		act 'Finish watching movie':gt 'FedorEv2', 'Movie 3'
 	end
@@ -273,7 +285,7 @@ if $ARGS[0] = 'Movie 3':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 20
-	pcs_willpwr += 20
+	!pcs_willpwr += 20
 	minut += 30
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/seat2.jpg"></center>'
@@ -294,7 +306,7 @@ if $ARGS[0] = 'Movie 4':
 	act 'Kiss Fedor':
 		*clr & cla
 		pcs_mood += 20
-		pcs_willpwr += 20
+		!pcs_willpwr += 20
 		FedorLuv += 3				
 		gs 'boyStat', 'A5'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/endkiss.mp4"></video></center>'
@@ -338,7 +350,7 @@ if $ARGS[0] = 'Home':
 			minut += 90
 			pcs_health += 15	
 			pcs_mood += 40
-			pcs_willpwr += 40
+			!pcs_willpwr += 40
 			fat += 2
 			pcs_energy += 90
 			pcs_hydra += 60
@@ -507,7 +519,7 @@ if $ARGS[0] = 'Virgin Sex':
 						gs 'cum_call', 'stomach', $boy, 1
 						gs'stat'			
 						
-						act 'Shower':gt 'FedorEv2', 'Wash Up'
+						act 'Take a shower':gt 'FedorEv2', 'Wash Up'
 					end					
 				end				
 			end			
@@ -564,7 +576,7 @@ if $ARGS[0] = 'Wash Up':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 25
-	pcs_willpwr += 25
+	!pcs_willpwr += 25
 	if pcs_health < 100:pcs_health = 100
 	sweat = 7 + rand(0,4)
 	hapri = 1
@@ -578,6 +590,7 @@ if $ARGS[0] = 'Wash Up':
 	'Fedor then picks you up and carries you to the shower where you both carefully wash each other while feeling the warm water washing over you and Fedor''s strong hands' 
 	'lathering your body. You turn around and start washing Fedor and after you both rinse off Fedor wraps his arms around your waist and kisses you very passionately before' 
 	'turning off the water and drying you off. Fedor then grabs his comb and carefully combs your hair then helps you into your clothes as you help him into his.'
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 	gs 'arousal', 'kiss', 10
 	gs 'arousal', 'end'		
 	gs'stat'				
@@ -653,7 +666,7 @@ if $ARGS[0] = 'Trip':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 10
-	pcs_willpwr += 10
+	!pcs_willpwr += 10
 	minut += 50
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/skate/skate1.jpg"></center>'
@@ -670,7 +683,7 @@ if $ARGS[0] = 'No Trip':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 15
-	pcs_willpwr += 15
+	!pcs_willpwr += 15
 	minut += 50
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/skate/skate3.jpg"></center>'
@@ -687,7 +700,7 @@ if $ARGS[0] = 'Skate Kiss':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 20
-	pcs_willpwr += 20
+	!pcs_willpwr += 20
 	gs 'boyStat', 'A5'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/skate/kiss.jpg"></center>'
 	'You slow down the speed of your skating then turn to face Fedor and look into his eyes. You slowly lean your head forward toward his as he does the same. After a second you feel his lips pressed against yours. You and Fedor enjoy a long kiss. After a minute you both pull away from each other then Fedor says, "I had a great time with you <<$pcs_firstname>>. would you like me to walk you home or will you be fine on your own?"'
@@ -704,7 +717,7 @@ if $ARGS[0] = 'Skate End':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 10
-	pcs_willpwr += 10
+	!pcs_willpwr += 10
 	minut += 5
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/skate/skate5.jpg"></center>'
@@ -752,7 +765,7 @@ if $ARGS[0] = 'Park 2':
 			act 'Kiss Fedor':	
 				*clr & cla
 				pcs_mood += 20
-				pcs_willpwr += 20
+				!pcs_willpwr += 20
 				FedorLuv += 2
 				gs 'boyStat', 'A5'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/swing2.jpg"></center>'
@@ -768,7 +781,7 @@ if $ARGS[0] = 'Park 2':
 			act 'Take his hand':	
 				*clr & cla
 				pcs_mood += 15
-				pcs_willpwr += 15
+				!pcs_willpwr += 15
 				minut += 10
 				gs'stat'
 				'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
@@ -794,7 +807,7 @@ if $ARGS[0] = 'Park 2':
 			act 'Kiss Fedor':	
 				*clr & cla
 				pcs_mood += 20
-				pcs_willpwr += 20
+				!pcs_willpwr += 20
 				FedorLuv += 2
 				gs 'boyStat', 'A5'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/swing4.jpg"></center>'
@@ -810,7 +823,7 @@ if $ARGS[0] = 'Park 2':
 			act 'Hug Fedor':	
 				*clr & cla
 				pcs_mood += 15
-				pcs_willpwr += 15
+				!pcs_willpwr += 15
 				FedorLuv += 1
 				minut += 10
 				gs'stat'
@@ -829,7 +842,7 @@ if $ARGS[0] = 'Park 2':
 			react_exp += rand(1, 2)	
 			fat -= 1
 			pcs_mood -= 5
-			pcs_sweat += 30			
+			gs 'sweat', 'add', 30			
 			minut += 30
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/swing5.jpg"></center>'
@@ -840,7 +853,7 @@ if $ARGS[0] = 'Park 2':
 				agil_exp += rand(1, 2)
 				fat -= 1
 				pcs_mood -= 5
-				pcs_sweat += 30			
+				gs 'sweat', 'add', 30			
 				minut += 30
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/swing5.jpg"></center>'
@@ -862,7 +875,7 @@ if $ARGS[0] = 'Park 2':
 		act 'Kiss Fedor':	
 			*clr & cla
 			pcs_mood += 20
-			pcs_willpwr += 20
+			!pcs_willpwr += 20
 			gs 'boyStat', 'A5'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/tree2.jpg"></center>'
 			'You and Fedor relax for a few minutes, chatting until you turn around to face Fedor then stare deep into his eyes for a few seconds before leaning forward to kiss him. Your lips press against Fedor''s as his tongue wanders into your mouth. You caress Fedor''s tongue with yours while enjoying his strong arms wraped around your waist. After kissing for a few minutes, Fedor pulls away then whispers "<<$pcs_firstname>> you are the sweetest girl I know and the hotest one as well." you give him a quick kiss before responding "You''re such a charmer." Fedor smiles as he gives you another kiss. "I better take you home before it gets too late or would you rather stay here?"'
@@ -878,7 +891,7 @@ if $ARGS[0] = 'Park 2':
 			*clr & cla
 			minut += 15
 			pcs_mood += 15
-			pcs_willpwr += 15
+			!pcs_willpwr += 15
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/tree1.jpg"></center>'
 			'You lay back, leaning against Fedor, feeling his heart beating as you both discuss current events for a few minutes. After you both feel fully rested, Fedor leans over your shoulder and tells you "It''s really good to just relax sometimes isn''t it?" you respond, "Sure is. I had a great time hanging out with you Fyodor." Redor gives you a smile as he responds, "Yeah we should do this again sometime. Are you ready to head home or would you like to stay here a bit longer?"'
@@ -887,56 +900,62 @@ if $ARGS[0] = 'Park 2':
 			
 			act 'I''ll be fine here':minut += 15 & gt 'pavResidential'
 		end
-		act 'Unzip his pants':	
-			*clr & cla
-			gs 'boyStat', 'A5'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/tree2.jpg"></center>'
-			'Fedor lays back against a tree as you sit next to him. You reach down and begin rubbing on his crotch and Fedor immediately looks up at you with a mischievous smile on his face. "In a public park? What a naughty girl you are." he then leans his head forward kissing your lips as you begin unbuttoning his pants.'
-			gs 'arousal', 'foreplay_give', 5, 'dom'
-			gs 'arousal', 'end'	
-			gs'stat'		
-			
-			act 'Continue':	
+		gs 'willpower', 'bj', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Unzip his pants (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'self'
 				*clr & cla
-				gs'stat'
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/sex/bj2.mp4"></video></center>'
-				'You give Fedor a seductive wink as you unbutton his pants then begin jerking his penis while staring him in the eyes before leaning forward and taking his dick into your mouth, caressing it with your tongue, trying your very best to bring him as much pleasure as you can while enjoying the warmth of his penis in your mouth. Fedor tries to stifle his moans as he occasionally looks around to see if anyone has noticed you. After a few more seconds Fedor whispers to you "I can''t last much longer. I''m gonna cum."'
-				gs 'arousal', 'bj', 10, 'dom'
+				gs 'boyStat', 'A5'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/tree2.jpg"></center>'
+				'Fedor lays back against a tree as you sit next to him. You reach down and begin rubbing on his crotch and Fedor immediately looks up at you with a mischievous smile on his face. "In a public park? What a naughty girl you are." he then leans his head forward kissing your lips as you begin unbuttoning his pants.'
+				gs 'arousal', 'foreplay_give', 5, 'dom'
 				gs 'arousal', 'end'	
 				gs'stat'		
 				
-				act 'Make him cum':	
+				act 'Continue':	
 					*clr & cla
-					pcs_mood += 20
-					pcs_willpwr += 20
-					FedorLuv += 4
 					gs'stat'
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj3.mp4"></video></center>'
-					'You give Fedor a wink as you continue sucking on his dick at an increased pace. Fedor tilts his head back then bites his lips as you feel a stream of warm cum filling your mouth and shooting down your throut, you begin swallowing every drop of Fedor''s cum as you stare up at him, enjoying the twitching of his body as he cums in your mouth. After a few seconds Fedor''s body eases as he leans his head against the tree behind him. He then looks down to you. "That was incredible <<$pcs_nickname>>. Thank you." you give Fedor a wink as you respond, "I know how to keep my man satisfed and maybe someday you will be <b>MY MAN</b>." Fedor smiles as he responds, "I better try real hard then." and you give Fedor a seductive wink. Fedor zips his pants then sits up and asks "Are you ready to go home or would you like to remain here?"'	
-					gs 'arousal', 'bj', 5, 'dom'
+					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/sex/bj2.mp4"></video></center>'
+					'You give Fedor a seductive wink as you unbutton his pants then begin jerking his penis while staring him in the eyes before leaning forward and taking his dick into your mouth, caressing it with your tongue, trying your very best to bring him as much pleasure as you can while enjoying the warmth of his penis in your mouth. Fedor tries to stifle his moans as he occasionally looks around to see if anyone has noticed you. After a few more seconds Fedor whispers to you "I can''t last much longer. I''m gonna cum."'
+					gs 'arousal', 'bj', 10, 'dom'
 					gs 'arousal', 'end'	
-					gs 'boyStat', 'A5'
-					gs 'cum_call', 'mouth', $boy, 1	
 					gs'stat'		
 					
-					act 'Take me home':gt 'FedorEv2', 'Park End'
-					
-					act 'I''ll be fine here':minut += 15 & gt 'pavResidential'
-				end
-				act 'Stop before he cums':	
-					*clr & cla
-					minut += 5
-					FedorLuv -= 5
-					gs'stat'
-					'<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/fedorsad.jpg"></center>'
-					'You pull away from him and say, "I would rather not get any cum on me right now." Fedor looks at you with a surprised look on his face. "C''mon <<$pcs_firstname>>, You can''t stop now." you give him a confident grin. "Maybe I''ll give you one later but for now I need to head home. See you later Fedor." You then get up and leave the park.'	
-					*nl
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/endbye.mp4"></video></center>'
-					
-					act 'Leave':minut += 15 & gt 'pavResidential'
-				end						
-			end	
+					act 'Make him cum':	
+						*clr & cla
+						pcs_mood += 20
+						!pcs_willpwr += 20
+						FedorLuv += 4
+						gs'stat'
+						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj3.mp4"></video></center>'
+						'You give Fedor a wink as you continue sucking on his dick at an increased pace. Fedor tilts his head back then bites his lips as you feel a stream of warm cum filling your mouth and shooting down your throut, you begin swallowing every drop of Fedor''s cum as you stare up at him, enjoying the twitching of his body as he cums in your mouth. After a few seconds Fedor''s body eases as he leans his head against the tree behind him. He then looks down to you. "That was incredible <<$pcs_nickname>>. Thank you." you give Fedor a wink as you respond, "I know how to keep my man satisfed and maybe someday you will be <b>MY MAN</b>." Fedor smiles as he responds, "I better try real hard then." and you give Fedor a seductive wink. Fedor zips his pants then sits up and asks "Are you ready to go home or would you like to remain here?"'	
+						gs 'arousal', 'bj', 5, 'dom'
+						gs 'arousal', 'end'	
+						gs 'boyStat', 'A5'
+						gs 'cum_call', 'mouth', $boy, 1	
+						gs'stat'		
+						
+						act 'Take me home':gt 'FedorEv2', 'Park End'
+						
+						act 'I''ll be fine here':minut += 15 & gt 'pavResidential'
+					end
+					act 'Stop before he cums':	
+						*clr & cla
+						minut += 5
+						FedorLuv -= 5
+						gs'stat'
+						'<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/fedorsad.jpg"></center>'
+						'You pull away from him and say, "I would rather not get any cum on me right now." Fedor looks at you with a surprised look on his face. "C''mon <<$pcs_firstname>>, You can''t stop now." you give him a confident grin. "Maybe I''ll give you one later but for now I need to head home. See you later Fedor." You then get up and leave the park.'	
+						*nl
+						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/movies/endbye.mp4"></video></center>'
+						
+						act 'Leave':minut += 15 & gt 'pavResidential'
+					end						
+				end	
+			end
+		else
+			act 'Unzip his pants (<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 'Train Tracks':	

locations/FedorEv3.qsrc

@@ -38,7 +38,7 @@ if $ARGS[0] = 'Food':
 	minut += 5		
 	pcs_health += 5	
 	pcs_mood += 15
-	pcs_willpwr += 15
+	!pcs_willpwr += 15
 	pcs_energy += 30
 	pcs_hydra += 50
 	cumspclnt = 2
@@ -62,7 +62,7 @@ if $ARGS[0] = 'Food 2':
 	minut += 5
 	pcs_health += 10	
 	pcs_mood += 20
-	pcs_willpwr += 20
+	!pcs_willpwr += 20
 	fat += 2
 	pcs_energy += 60
 	pcs_hydra += 80
@@ -98,7 +98,7 @@ if $ARGS[0] = 'Front':
 	act 'Take a seat':
 		*clr & cla
 		pcs_mood += 20
-		pcs_willpwr += 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 +188,7 @@ if $ARGS[0] = 'Middle':
 	act 'Take a seat':
 		*clr & cla
 		pcs_mood += 20
-		pcs_willpwr += 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 +245,7 @@ if $ARGS[0] = 'Back':
 	act 'Take a seat':
 		*clr & cla
 		pcs_mood += 20
-		pcs_willpwr += 20
+		!pcs_willpwr += 20
 		minut += 60
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/staring.jpg"></center>'
@@ -364,22 +364,28 @@ if $ARGS[0] = 'Back Preg':
 		gs 'stat'			
 	
 		act 'Finish watching the movie':gt 'FedorEv3', 'Movies 2'
-	end	
-	act 'Pull out please':
-		VK = rand(1,10)
-		if VK <= 7:
-			gt 'FedorEv3', 'Back Sex'
-		else	
-			gt 'FedorEv3', 'Back Caught'
-		end	
-	end		
+	end
+	gs 'willpower', 'cum_inside', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Pull out please (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'resist'
+			VK = rand(1,10)
+			if VK <= 7:
+				gt 'FedorEv3', 'Back Sex'
+			else	
+				gt 'FedorEv3', 'Back Caught'
+			end	
+		end
+	else
+		act 'Pull out please (<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] = 'Movies 2':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 20
-	pcs_willpwr += 20
+	!pcs_willpwr += 20
 	EndMovie = 1
 	minut += 5			
 	gs'stat'
@@ -762,43 +768,49 @@ if $ARGS[0] = 'Restroom Lady':
 						act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
 					end								
 				end	
-			end				
-			act 'Pull her head to your crotch':
-				*clr & cla
-				gs'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady6.jpg"></center>'
-				'You both continue kissing as your hands wander down her body, caressing her curves until you grab her by her hair then pull away from her as you begin laying backward on a nearby wall,' 
-				'lightly pulling her head down to your crotch. She looks up at you then begins eagarly licking your vaginal lips while working her way up to your clitoris.'
-				gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
-				gs 'stat'	
-						
-				act 'Rest your leg on the counter':
+			end
+			gs 'willpower', 'cuni', 'force'
+			if will_cost <= pcs_willpwr:
+				act 'Pull her head to your crotch (<<will_cost>> Willpower)':
+					gs 'willpower', 'pay', 'force'
 					*clr & cla
-					minut -= 5
 					gs'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady7.jpg"></center>'
-					'As the woman is licking your clitoris, you raise your right leg and place your foot on the counter giving the woamn easier access to your vagina which she takes full advantage of as she shoves her tongue inside your pussy,' 
-					'lapping up your juices. She returns to licking your clitoris doing the best she can to pleasure you which is working as you can feel the pleasure building quickly as she increases her pace.'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady6.jpg"></center>'
+					'You both continue kissing as your hands wander down her body, caressing her curves until you grab her by her hair then pull away from her as you begin laying backward on a nearby wall,' 
+					'lightly pulling her head down to your crotch. She looks up at you then begins eagarly licking your vaginal lips while working her way up to your clitoris.'
 					gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
-					gs 'stat'
-
-					act 'Cum':
+					gs 'stat'	
+							
+					act 'Rest your leg on the counter':
 						*clr & cla
+						minut -= 5
 						gs'stat'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady7.jpg"></center>'
-						'The pleasure begins building quickly as you close your eyes, surrendering yourself to the pleasure and soon you feel your entire body begin to heat up as you reach your breaking point. You suddenly feel your muscles stiffen as you hit an explosive' 
-						'orgasm causing your body to twitch and spasm as her soft tongue continues massaging your clit. You ride out your orgasm then take a few seconds to catch your breath before opening your eyes to see the woman''s face in front of yours as she says,' 
-						'"It looks like you enjoyed yourself. I guess I still have it. I have to go now but I had a great time and I do hope to see you again." she then gets dressed and leaves the restroom.'
-						*nl	
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/kiss1.jpg"></center>'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'kiss', 5, 'lesbian'
-						gs 'arousal', 'end'
-						gs 'stat'							
+						'As the woman is licking your clitoris, you raise your right leg and place your foot on the counter giving the woamn easier access to your vagina which she takes full advantage of as she shoves her tongue inside your pussy,' 
+						'lapping up your juices. She returns to licking your clitoris doing the best she can to pleasure you which is working as you can feel the pleasure building quickly as she increases her pace.'
+						gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
+						gs 'stat'
 
-						act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
-					end	
+						act 'Cum':
+							*clr & cla
+							gs'stat'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/lady7.jpg"></center>'
+							'The pleasure begins building quickly as you close your eyes, surrendering yourself to the pleasure and soon you feel your entire body begin to heat up as you reach your breaking point. You suddenly feel your muscles stiffen as you hit an explosive' 
+							'orgasm causing your body to twitch and spasm as her soft tongue continues massaging your clit. You ride out your orgasm then take a few seconds to catch your breath before opening your eyes to see the woman''s face in front of yours as she says,' 
+							'"It looks like you enjoyed yourself. I guess I still have it. I have to go now but I had a great time and I do hope to see you again." she then gets dressed and leaves the restroom.'
+							*nl	
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/ladies/kiss1.jpg"></center>'
+							$orgasm_or = 'yes'
+							gs 'arousal', 'kiss', 5, 'lesbian'
+							gs 'arousal', 'end'
+							gs 'stat'							
+
+							act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
+						end	
+					end
 				end
+			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
 		end
 	end	
@@ -814,63 +826,69 @@ if $ARGS[0] = 'Restroom Man':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/urinal.jpg"></center>'
 	'You approach the sink and turn on the water as a man enters the restroom and starts to use the urinal. The man clearly doesn''t notice you.'
 	
-	act 'Walk up behind him and grab his penis':
-		*clr & cla
-		minut -= 5
-		gs 'npcgeneratec', 0, 'Guy in restroom', rand(19,45)
-		gs 'boyStat', $npclastgenerated
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scene5.jpg"></center>'
-		'You walk up behind him and wait for him to finish peeing then you reach out and grab his penis. The man jumps up obviously surprised, He quickly turns to face you with a skocked look on his face but after looking you up and down he smiles and lays against the wall and enjoys your touch gently stroking your hair as you continue to slowly stroke his penis.'
-		gs 'arousal', 'hj', 5, 'dom'					
-		gs 'stat'
-		
-		act 'Anal':
-			*clr & cla 				
-			gs'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scenea1.jpg"></center>'
-			'The man grabs your shoulders and spins you around then begins undressing you as he kisses your ass and legs, he then turns on the tap and wets his fingers then uses them to lube up your anus. The man rubs his dick against your anus and then thrusts his dick in your ass causing you to moan loudly.' 
-			'The pain in your rectum is sharp at first but as he remains still inside you your asshole begins to adjust to his cock.'
-			gs 'arousal', 'anal', 5, 'sub'					
+	gs 'willpower', 'sex', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Walk up behind him and grab his penis (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'self'
+			*clr & cla
+			minut -= 5
+			gs 'npcgeneratec', 0, 'Guy in restroom', rand(19,45)
+			gs 'boyStat', $npclastgenerated
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scene5.jpg"></center>'
+			'You walk up behind him and wait for him to finish peeing then you reach out and grab his penis. The man jumps up obviously surprised, He quickly turns to face you with a skocked look on his face but after looking you up and down he smiles and lays against the wall and enjoys your touch gently stroking your hair as you continue to slowly stroke his penis.'
+			gs 'arousal', 'hj', 5, 'dom'					
 			gs 'stat'
 			
-			act 'Continue':
-				*clr & cla	
-				minut -= 5
+			act 'Anal':
+				*clr & cla 				
 				gs'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scenea2.jpg"></center>'
-				'The man begins thrusting his hips rubbing his cock against your anus slow at first then he continues picking up the pace until all you can hear is the smacking of his hips against your ass. You are moaning uncomtrolably as you feel the pain fade and pleasure build. You turn your head to see a reflection of yourself and the reality of the situation dawns on you causing you to think to yourself' 
-				'"I can''t believe that I am being fucked by a stranger in a public bathroom." before you can finish your thought you hear the man say, "OH FUCK I''m gonna cum!"'
-				gs 'arousal', 'anal', 5, 'sub', 'exhibitionism'				
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scenea1.jpg"></center>'
+				'The man grabs your shoulders and spins you around then begins undressing you as he kisses your ass and legs, he then turns on the tap and wets his fingers then uses them to lube up your anus. The man rubs his dick against your anus and then thrusts his dick in your ass causing you to moan loudly.' 
+				'The pain in your rectum is sharp at first but as he remains still inside you your asshole begins to adjust to his cock.'
+				gs 'arousal', 'anal', 5, 'sub'					
 				gs 'stat'
 				
-				act 'Get down on you knees':
-					*clr & cla				
-					gs 'stat'
-					'<center><video autoplay loop src="images/shared/sex/cum/facial/cumface1.mp4"></video></center>'
-					'You quickly pull off him and get on your knees in front of him as he qroans then paints your face with his seed. He continues to spray his load in your face until he has nothing left, he then takes a few seconds to catch his breath while admiring the view. You begin wiping the cum off of your eyelids as the man says,' 
-					'"Woah, I have to be the luckiest guy in the world right now, You were amazing girl. I hope we meet again." he then pulls up his pants then leaves the restroom.'
-					gs 'cum_call', 'face'						
-					gs 'arousal', 'hj', 5, 'sub'					
-					gs 'arousal', 'end'
-					gs 'stat'
-					
-					act 'Wash up':gt 'FedorEv3', 'Restroom Wash 2'
-				end
-				act 'Let him cum inside':
-					*clr & cla				
+				act 'Continue':
+					*clr & cla	
+					minut -= 5
 					gs'stat'
-					'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal1.mp4"></video></center>'
-					'Instead of pulling off him you start pushing against his crotch and he grabs your hips firmly as he groans and fills your ass with his seed. you can feel him pumping his seed into your ass almost filling you up completely, he then suddenly pulls out of you' 
-					'sending a splurt of semen to leak out of your ass and drip on the floor. The man watches you for a few seconds then says, "Damn girl, I don''t know what I did to deserve this but thank you, You are a real angel." He kisses you on the forehead as he pulls up his pants then leaves the restroom.'
-					gs 'cum_call', 'anus'							
-					gs 'arousal', 'anal', 5, 'dom'					
-					gs 'arousal', 'end'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scenea2.jpg"></center>'
+					'The man begins thrusting his hips rubbing his cock against your anus slow at first then he continues picking up the pace until all you can hear is the smacking of his hips against your ass. You are moaning uncomtrolably as you feel the pain fade and pleasure build. You turn your head to see a reflection of yourself and the reality of the situation dawns on you causing you to think to yourself' 
+					'"I can''t believe that I am being fucked by a stranger in a public bathroom." before you can finish your thought you hear the man say, "OH FUCK I''m gonna cum!"'
+					gs 'arousal', 'anal', 5, 'sub', 'exhibitionism'				
 					gs 'stat'
 					
-					act 'Wash up':gt 'FedorEv3', 'Restroom Wash 2'
-				end	
-			end
-		end	
+					act 'Get down on you knees':
+						*clr & cla				
+						gs 'stat'
+						'<center><video autoplay loop src="images/shared/sex/cum/facial/cumface1.mp4"></video></center>'
+						'You quickly pull off him and get on your knees in front of him as he qroans then paints your face with his seed. He continues to spray his load in your face until he has nothing left, he then takes a few seconds to catch his breath while admiring the view. You begin wiping the cum off of your eyelids as the man says,' 
+						'"Woah, I have to be the luckiest guy in the world right now, You were amazing girl. I hope we meet again." he then pulls up his pants then leaves the restroom.'
+						gs 'cum_call', 'face'						
+						gs 'arousal', 'hj', 5, 'sub'					
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Wash up':gt 'FedorEv3', 'Restroom Wash 2'
+					end
+					act 'Let him cum inside':
+						*clr & cla				
+						gs'stat'
+						'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal1.mp4"></video></center>'
+						'Instead of pulling off him you start pushing against his crotch and he grabs your hips firmly as he groans and fills your ass with his seed. you can feel him pumping his seed into your ass almost filling you up completely, he then suddenly pulls out of you' 
+						'sending a splurt of semen to leak out of your ass and drip on the floor. The man watches you for a few seconds then says, "Damn girl, I don''t know what I did to deserve this but thank you, You are a real angel." He kisses you on the forehead as he pulls up his pants then leaves the restroom.'
+						gs 'cum_call', 'anus'							
+						gs 'arousal', 'anal', 5, 'dom'					
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Wash up':gt 'FedorEv3', 'Restroom Wash 2'
+					end	
+				end
+			end	
+		end
+	else
+		act 'Walk up behind him and grab his penis (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	act 'Ignore him and continue washing up':gt 'FedorEv3', 'Restroom Wash 2'		
 end	
@@ -929,15 +947,20 @@ if $ARGS[0] = 'Restroom Man 2':
 				end	
 			end
 		end	
-	end	
-	act 'Splash water in his face':
-		VK = rand(1,3)
-		if VK = 1 or (succubusflag = 1 and succublvl > 1):
-			gt 'FedorEv3', 'Restroom Escape'
-		else
-			gt 'FedorEv3', 'Restroom Rape'
+	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	
-	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':
@@ -960,7 +983,7 @@ if $ARGS[0] = 'Restroom Rape':
 	menu_off = 1
 	pcs_health -= 10				
 	pcs_mood -= 20
-	pcs_willpwr -= 5	
+	!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>'
@@ -971,7 +994,7 @@ if $ARGS[0] = 'Restroom Rape':
 	act 'Plead':
 		*clr & cla
 		minut -= 5
-		sub += 3
+		!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!"' 
@@ -1041,160 +1064,172 @@ if $ARGS[0] = 'Restroom Gang':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/hide.jpg"></center>'
 	'You approach the sink then turn on the water, when you hear some rowdy guys outside, you quickly run into one of the stalls then hear the door slam open and the guys start hollering as they share stories that you can''t quite hear.'
 
-	act 'Eavesdrop':
-		*clr & cla 
-		gs'stat'
-		'You approach the door to listen to what they are talking about. One guy says, "You had to see the tits on that girl. She was basically flying out of her top." and the other guy said "That''s nothing. I had this one girl with tits so big you could fuck them for days." another guy replies, "This one bitch I saw claimed that she was..." One of the guys yells out "Hold on guys! We got a girl is in here." You look up to see a man peeking over the stall and your heart stops as someone starts pushing the stall door open.'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang.jpg"></center>'
-		
-		act 'Hold the door closed':
-			*clr & cla
-			minut += 5
-			gs'stat'	
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang1.jpg"></center>'
-			'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
+	gs 'willpower', 'misc', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Eavesdrop (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'self'
+			*clr & cla 
+			gs'stat'
+			'You approach the door to listen to what they are talking about. One guy says, "You had to see the tits on that girl. She was basically flying out of her top." and the other guy said "That''s nothing. I had this one girl with tits so big you could fuck them for days." another guy replies, "This one bitch I saw claimed that she was..." One of the guys yells out "Hold on guys! We got a girl is in here." You look up to see a man peeking over the stall and your heart stops as someone starts pushing the stall door open.'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang.jpg"></center>'
+			
+			act 'Hold the door closed':
+				*clr & cla
+				minut += 5
 				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.'
-
-				act 'Submit':
-					*clr & cla
-					minut -= 5
-					gs'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang3.jpg"></center>'
-					'Knowing that you are not strong enough to overpower them, you submit to them allowing them to remove your top as they bend you over, so that one of the guys cock is pressing against your lips. You wrap your lips around his dick provoking a moan from him as the rest of the guys touch you all over your body. "Look at this slut. She looks a lot better than that girl from the party. I bet she''s a better fuck too." and the other guy responds, "I bet you 200<b>₽</b> that she will be able to take all of our dicks without passing out." and the other guy gives him a high five.'
-					gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-					gs 'boyStat', $npclastgenerated
-					gs 'arousal', 'foreplay', 5, 'sub', 'rough', 'gangbang'	
-					gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
-					gs'stat'						
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang1.jpg"></center>'
+				'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
+					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.'
 
-					act 'Continue sucking':
-						*clr & cla 
+					act 'Submit':
+						*clr & cla
 						minut -= 5
 						gs'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang4.jpg"></center>'
-						'As you are sucking, The guy behind you shoves his dick into your vagina causing a rush of pain and pleasure. The pain quickly subsides and you start to actually feel less afraid as you enjoy the pleasure build up. You can hear one of the guys say, "Hey look at her. I think she''s starting to like it." and another responds, "I knew she was a dirty whore when I saw her." the words offend you at first but begin to excite you as you continue getting fucked.'
-						gs 'arousal', 'vaginal', 5, 'sub', 'rough', 'gangbang'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang3.jpg"></center>'
+						'Knowing that you are not strong enough to overpower them, you submit to them allowing them to remove your top as they bend you over, so that one of the guys cock is pressing against your lips. You wrap your lips around his dick provoking a moan from him as the rest of the guys touch you all over your body. "Look at this slut. She looks a lot better than that girl from the party. I bet she''s a better fuck too." and the other guy responds, "I bet you 200<b>₽</b> that she will be able to take all of our dicks without passing out." and the other guy gives him a high five.'
+						gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+						gs 'boyStat', $npclastgenerated
+						gs 'arousal', 'foreplay', 5, 'sub', 'rough', 'gangbang'	
 						gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
-						gs'stat'							
-											
-						act 'Enjoy':
-							*clr & cla
-							minut -= 10
+						gs'stat'						
+
+						act 'Continue sucking':
+							*clr & cla 
+							minut -= 5
 							gs'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang5.jpg"></center>'
-							'One of the guys grabs you by your legs and lifts you up as another one lays under you then you feel a sharp sting in your ass as you are lowered onto a guy''s dick. You let out a pained grunt as you feel another guy''s dick enter you vagina and one in your mouth so you continue sucking trying your best to make them cum, so that they will no longer need you and hopefully let you go.'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang4.jpg"></center>'
+							'As you are sucking, The guy behind you shoves his dick into your vagina causing a rush of pain and pleasure. The pain quickly subsides and you start to actually feel less afraid as you enjoy the pleasure build up. You can hear one of the guys say, "Hey look at her. I think she''s starting to like it." and another responds, "I knew she was a dirty whore when I saw her." the words offend you at first but begin to excite you as you continue getting fucked.'
 							gs 'arousal', 'vaginal', 5, 'sub', 'rough', 'gangbang'
-							gs 'arousal', 'anal', 5, 'sub', 'rough', 'gangbang'									
 							gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
-							gs'stat'						
-								
-							act 'Continue':
-								*clr & cla 
+							gs'stat'							
+												
+							act 'Enjoy':
+								*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>'
-								'You continue to let them do as they please and after a few minutes one of the guys grabs your throat. "Are you ready for our cum whore?"'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang5.jpg"></center>'
+								'One of the guys grabs you by your legs and lifts you up as another one lays under you then you feel a sharp sting in your ass as you are lowered onto a guy''s dick. You let out a pained grunt as you feel another guy''s dick enter you vagina and one in your mouth so you continue sucking trying your best to make them cum, so that they will no longer need you and hopefully let you go.'
 								gs 'arousal', 'vaginal', 5, 'sub', 'rough', 'gangbang'
 								gs 'arousal', 'anal', 5, 'sub', 'rough', 'gangbang'									
 								gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
-								gs'stat'											
-								
-								act 'Beg them to pull out':
-									*clr & cla
-									minut -= 15
+								gs'stat'						
+									
+								act 'Continue':
+									*clr & cla 
+									minut -= 10
 									gs'stat'
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/cum/cum1.jpg"></center>'
-									'"You plead. "Please pull out, I want your cum all over my body" and one of the guys responds, "You heard her gentlemen, let''s cover this bitch from head to toe." as they begin to pull out of you and one by one they release their load on a different part of your body covering you with their cum.'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'face'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'breasts'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'stomach'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'legs'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'labia'
-									gs 'arousal', 'anal', 10, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/gang6.jpg"></center>'
+									'You continue to let them do as they please and after a few minutes one of the guys grabs your throat. "Are you ready for our cum whore?"'
+									gs 'arousal', 'vaginal', 5, 'sub', 'rough', 'gangbang'
+									gs 'arousal', 'anal', 5, 'sub', 'rough', 'gangbang'									
 									gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'end'
-									gs 'stat'											
+									gs'stat'											
+									
+									gs 'willpower', 'cum_inside', 'resist', 'hard'
+									if will_cost <= pcs_willpwr:
+										act 'Eavesdrop (<<will_cost>> Willpower)':
+											gs 'willpower', 'pay', 'resist'
+											*clr & cla
+											minut -= 15
+											gs'stat'
+											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/cum/cum1.jpg"></center>'
+											'"You plead. "Please pull out, I want your cum all over my body" and one of the guys responds, "You heard her gentlemen, let''s cover this bitch from head to toe." as they begin to pull out of you and one by one they release their load on a different part of your body covering you with their cum.'
+											gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+											gs 'boyStat', $npclastgenerated
+											gs 'cum_call', 'face'
+											gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+											gs 'boyStat', $npclastgenerated
+											gs 'cum_call', 'breasts'
+											gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+											gs 'boyStat', $npclastgenerated
+											gs 'cum_call', 'stomach'
+											gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+											gs 'boyStat', $npclastgenerated
+											gs 'cum_call', 'legs'
+											gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+											gs 'boyStat', $npclastgenerated
+											gs 'cum_call', 'labia'
+											gs 'arousal', 'anal', 10, 'sub', 'rough', 'gangbang'
+											gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
+											gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
+											gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
+											gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'gangbang'
+											gs 'arousal', 'end'
+											gs 'stat'											
 
-									act 'See what they do':
+											act 'See what they do':
+												*clr & cla
+												minut += 5
+												gs'stat'
+												'Without even realizing it you are rubbing their cum all over your body as you stare at them gazing in adoration at you. "Whoa this whore is a real gem. I''ll be having dreams of this one." and another responds, "If you love her so much why don''t you marry her and have fun explaining it to that loud mouth bitch you call a mother!" Causing the first guy to tackle the other and the 2 guys begin fighting as the rest of them start cheering them on. You use this time to quickly grab your clothes then run out of the men''s room and into the ladies room.'
+												*nl	
+												'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/fight.jpg"></center>'
+												
+												act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
+											end	
+										end
+									else
+										act 'Beg them to pull 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 'Nod':
 										*clr & cla
-										minut += 5
+										minut -= 15
+										!sub += 5
 										gs'stat'
-										'Without even realizing it you are rubbing their cum all over your body as you stare at them gazing in adoration at you. "Whoa this whore is a real gem. I''ll be having dreams of this one." and another responds, "If you love her so much why don''t you marry her and have fun explaining it to that loud mouth bitch you call a mother!" Causing the first guy to tackle the other and the 2 guys begin fighting as the rest of them start cheering them on. You use this time to quickly grab your clothes then run out of the men''s room and into the ladies room.'
+										'<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' 
+										'holes and on your face and stomach. After they finish they pull out of you while slowly guiding you to the floor. You lay back to catch your' 
+										'breath as you feel the warm cum sliding down and dripping out of your vagina, anus and off your body. "This has got to be the filthiest whore' 
+										'I have ever seen." and another responds, "That''s exactly what I said after I fucked your sister." Causing the first guy to tackle the other'
+										*nl	
+										'and the 2 guys begin fighting as the rest of them start cheering them on. You use this time to quickly grab your clothes then run out of the' 
+										'men''s room and into the ladies room'
 										*nl	
 										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/fight.jpg"></center>'
+										gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+										gs 'boyStat', $npclastgenerated
+										gs 'cum_call', 'anus'
+										gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+										gs 'boyStat', $npclastgenerated
+										gs 'cum_call', 'face'
+										gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+										gs 'boyStat', $npclastgenerated
+										gs 'cum_call', 'breasts'
+										gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+										gs 'boyStat', $npclastgenerated
+										gs 'cum_call', 'stomach'
+										gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+										gs 'boyStat', $npclastgenerated
+										gs 'cum_call', 'legs'
+										gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
+										gs 'boyStat', $npclastgenerated
+										gs 'cum_call', 'labia'
+										gs 'arousal', 'anal', 10, 'sub', 'rough', 'gangbang'
+										gs 'cum_call'
+										gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
+										gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
+										gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
+										gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'gangbang'
+										gs 'arousal', 'end'
+										gs 'stat'
 										
 										act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
 									end	
-								end	
-								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' 
-									'holes and on your face and stomach. After they finish they pull out of you while slowly guiding you to the floor. You lay back to catch your' 
-									'breath as you feel the warm cum sliding down and dripping out of your vagina, anus and off your body. "This has got to be the filthiest whore' 
-									'I have ever seen." and another responds, "That''s exactly what I said after I fucked your sister." Causing the first guy to tackle the other'
-									*nl	
-									'and the 2 guys begin fighting as the rest of them start cheering them on. You use this time to quickly grab your clothes then run out of the' 
-									'men''s room and into the ladies room'
-									*nl	
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/fight.jpg"></center>'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'anus'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'face'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'breasts'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'stomach'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'legs'
-									gs 'npcgeneratec', 0, 'Rowdy guy', rand(18,30)
-									gs 'boyStat', $npclastgenerated
-									gs 'cum_call', 'labia'
-									gs 'arousal', 'anal', 10, 'sub', 'rough', 'gangbang'
-									gs 'cum_call'
-									gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'hj', 5, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'bj', 5, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'vaginal', 10, 'sub', 'rough', 'gangbang'
-									gs 'arousal', 'end'
-									gs 'stat'
-									
-									act 'Wash up':gt 'FedorEv3', 'Restroom Wash'
-								end	
-							end		
-						end			
-					end				
-				end					
-			end
-		end	
+								end		
+							end			
+						end				
+					end					
+				end
+			end	
+		end
+	else
+		act 'Eavesdrop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	act	'Hide':	
 		*clr & cla
@@ -1345,7 +1380,7 @@ if $ARGS[0] = 'Movies 3':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 10
-	pcs_willpwr += 10
+	!pcs_willpwr += 10
 	minut += 5			
 	FedorRest = 0
 	WithFedor = 0

locations/FedorMisc.qsrc

@@ -120,9 +120,19 @@ 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?"'
 
-	act 'Wanna fool around in the locker room?':gt 'FedorMisc', 'Locker Room'
+	gs 'willpower', 'sex', 'self'
+	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'
+	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
 
-	act 'Begin caressing Fedor':gt 'FedorMisc', 'Hall'
+	gs 'willpower', 'sex', 'self', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Begin caressing Fedor (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self', 'hard' & 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
 
 	act 'I could really use a smoke':gt 'FedorMisc', 'Smoke'
 
@@ -672,7 +682,7 @@ if $ARGS[0] = 'Strength':
 	stren_exp += rand(1, 4) + (steroid_dose - rand(0,steroid_dose)) & gs 'obj_din', 'steroids'
 	fat -= 1
 	pcs_mood += 5
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedormisc/gym/strength2.jpg"></center>'
 	'You and Fedor begin doing pushups together for a few minutes while Fedor cheers you on, pushing you further in your exercise to help maximize your workout. When you finish your work out, you watch Fedor continue to workout. You decide to crawl under him as he finishes his pushups then kiss his lips which stops him in his tracks as he returns the long passionate kiss. After a minute, you both get up and Fedor gives you a firm smack on the ass before walking out of the Sports center.'
@@ -716,7 +726,7 @@ if $ARGS[0] = 'Agility':
 	agil_exp += rand(1, 3)
 	fat -= 1
 	pcs_mood += 5
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	gs'stat'
 !!Image needed	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedormisc/gym/agility2.jpg"></center>'
 	'VKwip'
@@ -759,7 +769,7 @@ if $ARGS[0] = 'Endurance':
 	vital_exp += rand(1, 4)
 	fat -= 1
 	pcs_mood += 5
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedormisc/gym/endurance2.jpg"></center>'
 	'Fedor walks up to you and lifts you up by your hips then holds onto your legs and says, "Let''s see how many pull ups you can do in 15 minutes." you give him a wink before pulling your self up and making sure to kiss Fedor every time you reach the top. You continue the workout for 15 minutes before Fedor lowers you and asks "How did you like your workout?"'

locations/FightCrouch.qsrc

@@ -26,14 +26,14 @@ if crouch = 1:
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/cron.jpg"></center>'
 			'Your opponent manages to press themselves to the floor but you''re too fast and manage to grab hold of your opponent.'
 
-			act '...':gt 'fightfw'
+			act 'Continue':gt 'fightfw'
 		elseif enrand = 1:
 			point += 2
 			endurE -= 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/crob.jpg"></center>'
 			'You reverse the opponent''s attempt to roll you over and instead you lock them in.'
 
-			act '...':gt 'fight1'
+			act 'Continue':gt 'fight1'
 		end
 	end
 
@@ -47,14 +47,14 @@ if crouch = 1:
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/crou.jpg"></center>'
 			'Your opponent manages to press themselves to the floor and you''re unable to grab hold of your opponent.'
 
-			act '...':gt 'fight2'
+			act 'Continue':gt 'fight2'
 		elseif enrand = 1:
 			pointE += 1
 			endurE -= 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/cronu.jpg"></center>'
 			'You reverse the opponent''s attempt to roll you over and instead you lock them in.'
 
-			act '...':gt 'fight3'
+			act 'Continue':gt 'fight3'
 		elseif enrand = 2:
 			''
 		end
@@ -77,14 +77,14 @@ else
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/cron.jpg"></center>'
 			'The opponent is unable to perform the move.'
 
-			act '...':gt 'fightE'
+			act 'Continue':gt 'fightE'
 		elseif enrand = 1:
 			pointE += 1
 			endurE -= 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/crou.jpg"></center>'
 			'The opponent successfully performs a move.'
 
-			act '...':gt 'fightE1'
+			act 'Continue':gt 'fightE1'
 		end
 	end
 
@@ -99,14 +99,14 @@ else
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/crob.jpg"></center>'
 			'The opponent easily reverses you attempt and gains an advantage on you.'
 
-			act '...':gt 'fightE2'
+			act 'Continue':gt 'fightE2'
 		elseif enrand = 1:
 			point += 1
 			endurE -= 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/cronu.jpg"></center>'
 			'You successfully manage to perform the move on your opponent and grab hold of their back.'
 
-			act '...':gt 'fightE3'
+			act 'Continue':gt 'fightE3'
 		end
 	end
 end

locations/FightE.qsrc

@@ -8,19 +8,19 @@ $resultUderDinE = {
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/fu.jpg"></center>'
 		'<<$nameE>> successfully grabs hold of you.'
 
-		act '...':stoper = 0 & gt 'fightE1'
+		act 'Continue':stoper = 0 & gt 'fightE1'
 	elseif Aktiv < Passiv:
 		point += 1
 		Kz += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/fu1.jpg"></center>'
 		'<<$nameE>> can''t do anything as you''re able to reverse.'
 
-		act '...':stoper = 0 & gt 'fightE3'
+		act 'Continue':stoper = 0 & gt 'fightE3'
 	elseif Aktiv = Passiv:
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f.jpg"></center>'
 		'The two of you try to one up each other without being able to gain the superiority.'
 
-		act '...':gt $curloc
+		act 'Finish':gt $curloc
 	end
 }
 
@@ -34,19 +34,19 @@ $resultBrosDinE = {
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/fb.jpg"></center>'
 		'<<$nameE>> successfully mounted you.'
 
-		act '...':stoper = 0 & gt 'fightE2'
+		act 'Continue':stoper = 0 & gt 'fightE2'
 	elseif Aktiv < Passiv:
 		point += 1
 		Kz += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/fu1.jpg"></center>'
 		'<<$nameE>> can''t do anything as you''re able to reverse.'
 
-		act '...':stoper = 0 & gt 'fightE3'
+		act 'Continue':stoper = 0 & gt 'fightE3'
 	elseif Aktiv = Passiv:
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f.jpg"></center>'
 		'The two of you try to one up each other without being able to gain the superiority.'
 
-		act '...':gt $curloc
+		act 'Finish':gt $curloc
 	end
 }
 

locations/FightE1.qsrc

@@ -10,19 +10,19 @@ $resultUderDinE = {
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f2u.jpg"></center>'
 		'<<$nameE>> successfully grabs hold of you.'
 
-		act '...':gt 'fightE1'
+		act 'Continue':gt 'fightE1'
 	elseif Aktiv < Passiv:
 		point += 1
 		Kz += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f2u2.jpg"></center>'
 		'<<$nameE>> can''t do anything as you''re able to reverse.'
 
-		act '...':stoper = 0 & gt 'fightE3'
+		act 'Continue':stoper = 0 & gt 'fightE3'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f.jpg"></center>'
 		'The two of you try to one up each other without being able to gain the superiority.'
 
-		act '...':gt $curloc
+		act 'Finish':gt $curloc
 	end
 }
 

locations/FightE2.qsrc

@@ -8,19 +8,19 @@ $resultUderDinE = {
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f1u.jpg"></center>'
 		'<<$nameE>> successfully locks you in a hold.'
 
-		act '...':stoper = 0 & gt 'fightE1'
+		act 'Continue':stoper = 0 & gt 'fightE1'
 	elseif Aktiv < Passiv:
 		point += 1
 		Kz += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f1u1.jpg"></center>'
 		'<<$nameE>> can''t do anything as you''re able to reverse.'
 
-		act '...':stoper = 0 & gt 'fightE3'
+		act 'Continue':stoper = 0 & gt 'fightE3'
 	elseif Aktiv = Passiv:
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f1u2.jpg"></center>'
 		'The two of you try to one up each other without being able to gain the superiority.'
 
-		act '...':gt $curloc
+		act 'Finish':gt $curloc
 	end
 }
 

locations/FightE3.qsrc

@@ -8,14 +8,14 @@ cls
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f3u.jpg"></center>'
 		'<<$nameE>> manages to get the upper hand against you.'
 
-		act '...':stoper = 0 & gt 'fightE1'
+		act 'Continue':stoper = 0 & gt 'fightE1'
 	elseif Aktiv <= Passiv:
 		point += 1
 		Kz += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f3u2.jpg"></center>'
 		'<<$nameE>> can''t do anything about your wriggling and you slip out of her hold.'
 
-		act '...':gt 'RoundStop'
+		act 'Continue':gt 'RoundStop'
 end
 }
 
@@ -29,14 +29,14 @@ $resultBrosDinE = {
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f3b.jpg"></center>'
 		'<<$nameE>> successfully manages to throw you on the floor.'
 
-		act '...':stoper = 0 & gt 'fightE2'
+		act 'Continue':stoper = 0 & gt 'fightE2'
 	elseif Aktiv <= Passiv:
 		point += 1
 		Kz += 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/f3u2.jpg"></center>'
 		'<<$nameE>> can''t do anything as you''re able to reverse.'
 
-		act '...':gt 'RoundStop'
+		act 'Continue':gt 'RoundStop'
 	end
 }
 

locations/Gadbana.qsrc

@@ -46,7 +46,7 @@ if mira = 0:
 			*clr & cla
 			menu_off = 1
 			minut += 1
-			if gadbana_stripping ! daystart: 
+			if gadbana_stripping ! daystart:
 				gadbana_stripping = daystart
 				inhib_exp += 2
 				grandma_trouble += 1
@@ -63,7 +63,7 @@ if mira = 0:
 			*clr & cla
 			menu_off = 1
 			minut += 1
-			if gadbana_stripping ! daystart: 
+			if gadbana_stripping ! daystart:
 				gadbana_stripping = daystart
 				inhib_exp += 1
 				grandma_trouble += rand(0,1)
@@ -89,6 +89,7 @@ if mira = 0:
 					menu_off = 1
 					minut += 120
 					pcs_sweat = rand(0,5)
+					noShampoo = 1
 					dynamic $showerdin
 					pcs_hairbsh = 0
 					pcs_makeup = 1
@@ -105,6 +106,7 @@ if mira = 0:
 
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/par.jpg"></center>'
 					'You strip, sit down and relax. After a proper banya session, you pick up a bucket filled with cold water and pour it over yourself and head over to the shower. You feel like a completely new person.'
+					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 					act 'Finish': gt $loc, $metka
 				end
 			end
@@ -116,20 +118,25 @@ if mira = 0:
 	end
 	*nl
 
-	act 'Wash your body (0:25)':
-		cls
-		menu_off = 1
-		minut += 25
-		dynamic $showerdin
-		if frost > 0:frost = 0
-		!!gs 'clothing', 'strip', 'Gadbana'
-		gs 'clothing', 'strip'
-		if $pantyworntype ! 'none' and $braworntype ! 'none': gs 'underwear', 'remove'
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mit.jpg"></center>'
-		'You lather your body washcloth and start scrubbing your body. You rinse off the soap and start to lather the hair with the shampoo. After rising off the shampoo you are completely clean.'
+	if shampoo > 0:
+		act 'Wash your body (0:25)':
+			cls
+			menu_off = 1
+			minut += 25
+			dynamic $showerdin
+			if frost > 0:frost = 0
+			!!gs 'clothing', 'strip', 'Gadbana'
+			gs 'clothing', 'strip'
+			if $pantyworntype ! 'none' and $braworntype ! 'none': gs 'underwear', 'remove'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mit.jpg"></center>'
+			'You lather your body washcloth and start scrubbing your body. You rinse off the soap and start to lather the hair with the shampoo. After rising off the shampoo you are completely clean.'
+			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 
-		act 'Finish':gt $loc, $metka
+			act 'Finish':gt $loc, $metka
+		end
+	else
+		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
 	end
 
 	dynamic $bteeth
@@ -258,6 +265,7 @@ else
 			gs 'stat'
 			act 'Steam':
 				cls
+				noShampoo = 1
 				dynamic $showerdin
 				pcs_hairbsh = 0
 				pcs_makeup = 1
@@ -270,6 +278,7 @@ else
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/miraban2.jpg"></center>'
 				'Mira finally finishes lathering herself, you take the loofah and lather yourself from head to toe. You enjoy yourselves in the warm bath, relaxing in each other''s company, occasionally exchanging meaningless anecdotes...'
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 				gs 'arousal', 'voyeur', 120
 				gs 'arousal', 'end'
 				gs 'stat'

locations/Gadgarden.qsrc

@@ -36,7 +36,7 @@ if $ARGS[0] = 'garden':
 		    *clr
 			menu_off = 1
 		    minut += 180
-		    pcs_sweat += 10
+		    gs 'sweat', 'add', 10
             work_garden = 0
 		    grandmahelp += 3
 		    stren_exp += 1
@@ -55,7 +55,7 @@ if $ARGS[0] = 'garden':
 		    cla
 		    *clr
 			menu_off = 1
-		    pcs_sweat += 10
+		    gs 'sweat', 'add', 10
 		    minut += 60
 		    water_garden = 0
 		    grandmahelp += 1
@@ -76,7 +76,7 @@ if $ARGS[0] = 'garden':
 		    *clr
 			menu_off = 1
 		    minut += 180
-		    pcs_sweat += 10
+		    gs 'sweat', 'add', 10
 		    harvest_garden = 0
 		    grandmahelp += 3
 		    stren_exp += 1
@@ -146,7 +146,7 @@ if $ARGS[0] = 'strawberry':
 			*clr
 			menu_off = 1
 			minut += 180
-			pcs_sweat += 10
+			gs 'sweat', 'add', 10
 			collect_strawberries = 0
 			grandmahelp += 5
 		    agil_exp += 1
@@ -213,7 +213,7 @@ if $ARGS[0] = 'fruit_garden':
 			*clr
 			menu_off = 1
 			minut += 180
-			pcs_sweat += 10
+			gs 'sweat', 'add', 10
 			fruit_collect = 0
 			grandmahelp += 5
 		    agil_exp += 1

locations/Gnpc.qsrc

@@ -7,7 +7,7 @@ GvstreBoy = 0
 boyvstre[numnpc] += 1
 gs 'stat'
 '<center><h1><font color="maroon"><<$nameBoyfrend[numnpc]>></font></h1></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/<<numnpc>>.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big<<numnpc>>.jpg"></center>'
 
 $bfTitle[numnpc] = 'date'
 if boytimes[numnpc] = 0:
@@ -323,7 +323,7 @@ if sub < 20 and ((boytimes[numnpc] <= 4 and otnBoyFrend[numnpc] < 100) or (boyti
 			end
 		end
 
-		if  otnBoyFrend[numnpc] >= 40 and gnpcSex[numnpc] > 0:
+		if otnBoyFrend[numnpc] >= 40 and gnpcSex[numnpc] > 0:
 			act 'Just be friends':
 				cla
 				temprand = rand(0, 4)

locations/Gnpc2.qsrc

@@ -456,7 +456,7 @@ $din_gboy_go_to_disco = {
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/cocksucker.jpg"></center>'
 								'You squatted in front of him and bring your face to his cock.'
-								dynamic $dinrandbj
+								gs 'dinSex', 'bj_random'
 								'Soon <<$boydesc>> groaned "<<$pcs_nickname>>, I''m going to come."'
 
 								act 'suck on':
@@ -468,7 +468,7 @@ $din_gboy_go_to_disco = {
 									swallow += 1
 									gs 'stat'
 									'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum49.jpg"></center>'
-									gs 'dinsex','dinrandswallow'
+									gs 'dinsex','bj_swallow_random'
 
 									act 'Further':
 										cls
@@ -578,7 +578,7 @@ $din_gboy_go_to_disco = {
 											gs 'stat'
 											'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/cocksucker.jpg"></center>'
 											'You squat in front of your guy and bring your face to his cock.'
-											dynamic $dinrandbj
+											gs 'dinSex', 'bj_random'
 											'Soon <<$boydesc>> groaned "<<$pcs_nickname>>, I''m going to come."'
 
 											act 'suck on':
@@ -590,7 +590,7 @@ $din_gboy_go_to_disco = {
 												swallow += 1
 												gs 'stat'
 												'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum49.jpg"></center>'
-												gs 'dinsex','dinrandswallow'
+												gs 'dinsex','bj_swallow_random'
 
 												act 'Further':
 													cls
@@ -808,7 +808,7 @@ $din_gboy_tits = {
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/cocksucker.jpg"></center>'
 					'You squat in front of your guy and bring your face to his cock.'
-					dynamic $dinrandbj
+					gs 'dinSex', 'bj_random'
 					'Soon <<$boydesc>> groaned "<<$pcs_nickname>>, I''m going to come."'
 
 					act 'Suck on':
@@ -820,7 +820,7 @@ $din_gboy_tits = {
 						swallow += 1
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum49.jpg"></center>'
-						gs 'dinsex','dinrandswallow'
+						gs 'dinsex','bj_swallow_random'
 						act 'Go home':gt 'pavResidential'
 					end
 
@@ -1136,7 +1136,7 @@ $din_gboy_go_to_boyhome = {
 menu_off = 1
 gs 'stat'
 '<center><h1><font color="maroon"><<$boydesc>></font></h1></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/<<numnpc>>.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big<<numnpc>>.jpg"></center>'
 'You''re on a date with <<$boydesc>>. <<$bfRelationship[numnpc]>>'
 
 *nl

locations/Gshveyfab.qsrc

@@ -16,7 +16,7 @@ if $ARGS[0] = 'tailor':
 	'"Hello there young lady, do you want to adjust some of your clothing? It''ll cost you 500 <b>₽</b> per item."'
 
 	act 'Leave': gt 'pavIndustrial'
-	
+
 	if money >= 500:
 		act 'Resize the clothes you''re wearing (500 <b>₽</b>)':
 			*clr & cla
@@ -53,16 +53,16 @@ if $ARGS[0] = 'enter':
 	'First shift - 08:00 to 16:00.'
 	'Second shift - 16:00 to 20:00.'
 	*nl
-	if workFabrika = 0 and age >= 16 and age < 18:'You can apply for a <a href="exec:minut += 15 & gt ''Gshveyfab'', ''job_start''">part-time job</a> here.'
+	if workFabrika = 0 and age < 18:'You can apply for a <a href="exec:minut += 15 & gt ''Gshveyfab'', ''job_start''">part-time job</a> here.'
 	if work = 0 and workFabrika = 0 and age >= 18:'You can apply for a <a href="exec:minut += 15 & gt ''Gshveyfab'', ''job_start''">full-time job</a> here.'
 
 	act 'Leave': minut += 5 & gt 'pavIndustrial'
-	
+
 	if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 8 and hour < 9 and age >= 18:
 		'Your shift is starting now.'
 		act 'Start shift': gt'Gshveyfab','job'
 	end
-	if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 16 and hour < 17 and age >= 16 and age < 18:
+	if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 16 and hour < 17 and age < 18:
 		'Your shift is starting now.'
 		act 'Start shift': gt'Gshveyfab','job'
 	end
@@ -70,7 +70,7 @@ if $ARGS[0] = 'enter':
 		'You can quit your job, but quitting will lead to a deducted wage.'
 		act 'Quit job':
 			menu_off = 1
-			if age >= 16 and age < 18:
+			if age < 18:
 				smenaFabrika -= 1
 			elseif age >= 18:
 				smenaFabrika -= 2
@@ -100,10 +100,10 @@ if $ARGS[0] = 'job_start':
 	'<center><B>FOREMAN''S OFFICE</B></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/stepan/nachalnik.jpg" ></center>'
 	'You head into the factory foreman, Stepan Sergeyevich office, and ask him if there''s an available job.'
-	
+
 	act 'Leave': gt'Gshveyfab', 'enter'
-	
-	if age >= 16 and age < 18 and workFabrika = 0:
+
+	if age < 18 and workFabrika = 0:
 		'"Sure, have a seat," he says. "Now, the work is difficult and meticulous, but doesn''t require any special knowledge. You should catch on pretty quick. Since you are not an adult yet, you can only work half-time, and the pay is 105 <b>₽</b> per hour. Once you become an adult, we can transfer you to full-time. Naturally, as this is a state-recognized company, we do require all the appropriate documentation. The main shift is on weekdays from 08:00 to 16:00, but you will be working the second shift, from 16:00 to 20:00.'
 		'But beware, if you miss more than three days of work in a single month, you will be fired. You will be paid at the end of the month and getting fired before then will forfeit any pay not yet received. So, is that okay?"'
 
@@ -144,7 +144,7 @@ if $ARGS[0] = 'job':
 	menu_off = 1
 	FabrikaProgul -= 1
 	if FabrikaProgul < 0: FabrikaProgul = 0
-	if age >= 16 and age < 18:
+	if age < 18:
 		minut += 240
 		smenaFabrika += 1
 	end

locations/HotelHole.qsrc

@@ -12,7 +12,7 @@ $location_type = 'public_indoors'
 $receptionName = 'Elisabet'
 gs'stat'
 
-! use this args if  some event  transfers you directly to the lobby  and it is can happen  between  midnight and 01:00.
+! use this args if some event  transfers you directly to the lobby  and it is can happen  between  midnight and 01:00.
 if $ARGS[0] = 'skip_resepevent': jump 'skipresepevent'
 
 if hour = 0 and $prevloc ! 'HotelRoom':

locations/IgorEv.qsrc

@@ -189,9 +189,9 @@ if $ARGS[0] = 'din_sex':
 		gs 'stat'
 		'Both of you quickly undress, kissing, as you pull the clothes off each other.'
 		act 'Squat':
-			cls
+			*clr & cla
 			bja += 1
-			if npcSex[4] = 0: npcSex[4] = 1 & guy += 1
+			if npc_Sex['A4'] = 0: npc_Sex['A4'] = 1 & guy += 1
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/igor/sex/home/tinydick.jpg"></center>'
 			'You go down on your knees in front of him, playing with his small hard cock. You slide his skin back and forth, as you lick the penis head. You continue on caressing his cock. Igor is breathing hard whispering, "<<$pcs_nickname>>, don''t stop, I''m right on the edge!"'
@@ -382,6 +382,7 @@ if $ARGS[0] = 'strap on':
 				act 'Nevermind': gt 'igorhome', 'igorroom'
 				act 'It''s time.':
 					*clr & cla
+					igorstrap = 1
 				    '<center><video autoplay loop src="images/characters/pavlovsk/school/boy/igor/sex/home/ygov1.mp4"></video></center>'
 					'You put the wine glass down and take his away from him, placing it down as well. You lean in close to him. "Ok I think you''re ready for it. Let me show you an experience you''ll never forget?"'
 					'He nods, clearly nervous, thought he also looks very excited as well, almost eager.'

locations/IgorHunter.qsrc

@@ -21,22 +21,468 @@ boy_birth_date = 9
 boy_birth_month = 6
 gs 'stat'
 
-'<center><b><font color = maroon>Igor Anisimov</font></b></center>'
-'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
-'Igor is a hunter along with the Sergei and Andrei and is here visiting Andrei. He''s <<boyage>> years old. He is not married and lives in the City Center..'
-
-act 'Chat':
-    *clr & cla
-    minut += 60
-	menu_off = 1
-    
-    igor_base_opinion += 1
-
-    act 'Continue': gt $loc
+
+if $ARGS[0] = '':
+
+
+	'<center><b><font color = maroon>Igor Anisimov</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
+	'Igor is a hunter along with the Sergei and Andrei and is here visiting Andrei. He''s <<boyage>> years old. He is not married and lives in the City Center..'
+
+	act 'Chat':
+		*clr & cla
+		minut += 60
+		menu_off = 1
+
+		igor_base_opinion += 2
+
+		gs 'IgorHunter', 'check_opinion'
+		act 'Finish': gt $loc
+	end
 end
 
 if $ARGS[0] = 'check_opinion':
-    huntersIgorQw = igor_base_opinion + hunter_collective_opinion / 2 - hunter_sexual_comfort / 4
+	huntersIgorQw = igor_base_opinion + hunter_collective_opinion / 2 - hunter_sexual_comfort / 4
+
+	if huntersIgorQw > hunter_collective_opinion: huntersIgorQw = hunter_collective_opinion - hunter_sexual_comfort / 4
+
+	!TODO: Add igor_sexual_comfort: 'platonic', 'romantic', 'partial', 'full', 'extreme' or 0 to 4
+
+	gs 'stat'
+
+end
+
+if $ARGS[0] = 'schedule':
+	!TODO: Add energy/stamina and horniness stats for Igor
+end
+
+!Sex scenes
+if $ARGS[0] = 'creekside':
+	if $ARGS[1] = '':
+		cla
+		act 'You suddenly feel an arm on your shoulder':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/2.jpg"></center>'
+			'You turn back to see Igor standing over you. Watching the scenery you did not even notice him sneaking up to you.'
+			'After saying hi, you suddenly realize you are completely naked in front of him, giving him quite the view with the creek in the background'
+			act 'Cover your chest with your arms':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/1.jpg"></center>'
+				'You quickly cover your chest with your arms, looking away a bit ashamed. The clothing disparity is a bit embarassing, him clothed and you in your birthday suit.'
+				'"What is wrong?" asks Igor, landing a small kiss on your shoulder.'
+
+				gs 'arousal', 'flashlite', 2
+				gs 'stat'
+
+				act 'You are not feeling it':
+					cla
+					'"I...it''s just... I''m sorry, just not in the mood to seen naked" you stammer.'
+					'"No need to apologize, I''ll leave you alone" says Igor with a smile. "Catch you back at the hut maybe"'
+
+					gs 'arousal', 'flashlite', 2
+					mood -=5
+					gs 'stat'
+					gs 'arousal', 'end'
+
+					act 'Further': gt 'backwater'
+				end
+				act 'Kiss him back':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/3.jpg"></center>'
+					'Igor''s tender kiss on your bare skin dissolves whatever bit of embarrassment you had. Being naked in front off him like this is actually turning you on.'
+					'You respond by giving Igor a passionate kiss, his hand stroking the small of your back.'
+
+					gs 'arousal', 'kiss', 4
+					gs 'arousal', 'flashlite', 2
+					gs 'stat'
+
+					act 'You do not want to get carried away':
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/1.jpg"></center>'
+						'You cover up your chest and tell Igor you want to call it there "I do not want to do anything further. At least, not like this..." you say.'
+						'It would only take the right touch to change your mind, if Igor had noticed the growing dampness between your legs. Instead he smiles and gives you a kis on the shoulder before walking away.'
+
+						gs 'arousal', 'flashlite', 2
+						gs 'arousal', 'end'
+						gs 'stat'
+
+						act 'Further': gt 'backwater'
+					end
+					act 'Take him in your mouth': gt 'IgorHunter', 'creekside', 'bj'
+				end
+			end
+
+			act 'Greet him with a hug':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/4.jpg"></center>'
+				'With a smile, you stand up on the rock you were sitting and go in for a hug as Igor kneels down, his lips locking on your nipple.'
+				'You hug his neck as he suckles and flicks his tongue around your nipple, eliciting some deep sighs from you.'
+
+				gs 'arousal', 'foreplay', 4
+				gs 'arousal', 'breasts', 2
+				minut -= 3
+				gs 'stat'
+
+				act 'Not now':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/11.jpg"></center>'
+					'You gently push Igor away, not feeling like doing anything further.'
+					'"Maybe later", you say. Igor gives you another peck on the breasts before walking away.'
+
+					gs 'arousal', 'breasts', 2
+					gs 'stat'
+					gs 'arousal', 'end'
+
+					act 'Further': gt 'backwater'
+				end
+
+				act 'Lay back and spread your legs':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/5.jpg"></center>'
+					'Having your nipples teased like this is almost unbearable. You feel your pussy lips getting inflamed, the dampness between your legs growing.'
+					'Laying back, you spread your legs wide and look almost beggingly at Igor, wanting his attention right between them. He does not lose time starting to lick your now burning hot, soaking wet fuckhole'
+
+					gs 'arousal', 'cuni', 10
+					minut -= 4
+					gs 'stat'
+
+					act 'You want him inside you': gt 'IgorHunter', 'creekside', 'piv'
+				end
+			end
+		end
+	end
+
+	if $ARGS[1] = 'bj':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/6.jpg"></center>'
+		gs 'dinSex', 'bj_random'
+		gs 'arousal', 'bj', 9
+		minut -= 3
+		gs 'stat'
+
+		act 'Keep sucking him':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/7.jpg"></center>'
+			'As you keep sucking and stroking Igor''s <<$penis_desc>>, you start to feel his dick throb stronger and stronger. Igor tells you he is going to cum'
+			gs 'arousal', 'bj', 6
+			minut -= 3
+			gs 'stat'
+
+			act 'You want to swallow his cum':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/8.jpg"></center>'
+				gs 'dinSex', 'bj_swallow_random'
+				'You lock eyes	with Igor and open your mouth wide, sticking out your tongue to show how thoroughly you have cleaned his dick.'
+				gs 'cum_call', 'mouth', 'A173'
+				gs 'arousal', 'bj', 6
+				minut -= 3
+				gs 'stat'
+				gs 'arousal','end'
+
+				act 'Further': gt 'backwater'
+			end
+			act 'Make him pull out':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/9.jpg"></center>'
+				'Igor pulls out of your mouth the last moment, jerking off furiously and covering your chest in his warm spunk.'
+				gs 'cum_call', 'breasts', 'A173', 1
+				gs 'arousal', 'bj', 4
+				gs 'arousal', 'breasts', 4
+				minut -= 5
+				gs 'stat'
+
+				act 'Relax and enjoy the view together':
+					cla & *clr
+					gs 'arousal', 'breasts', 4
+					minut += 10
+					gs 'arousal', 'end'
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/10.jpg"></center>'
+					'You go back to relaxing and enjoying the view, Igor''s warm seed still covering your tits.'
+					'Igor cuddles you from behind as his hand idly plays with your boob, basking in the post-orgasmic bliss.'
+					act 'Further': gt 'backwater'
+				end
+			end
+		end
+	end
+
+
+	if $ARGS[1] = 'piv':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_2.jpg"></center>'
+		'You lean back further as Igor kisses all over your tit, your hand lightly playing with your other breast'
+
+		gs 'arousal', 'breasts', 5
+		gs 'arousal', 'foreplay', 5
+		minut -= 7
+		gs 'stat'
+
+		act 'Jump on Igor''s lap':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_5.jpg"></center>'
+			'You sit on Igor''s lap, slowly grinding your ass on his crotch as his dick pokes against your folds, the tip almost dipping into the dampness inside'
+
+			gs 'arousal', 'foreplay', 5
+			minut -= 2
+			gs 'stat'
+
+			act 'Take him inside you':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_6.jpg"></center>'
+				gs 'dinSex', 'vaginal_sex', 12
+				gs 'stat'
+
+				act 'You start feeling his cock start to twitch inside you':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/creekside/f_7.jpg"></center>'
+					pose = 3
+					gs 'dinSex', 'sexcum'
+					gs 'arousal', 'vaginal', 4
+					gs 'stat'
+					gs 'arousal', 'end'
+
+					act 'Further': gt 'backwater'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'cabin':
+	if $ARGS[1] = '' or $ARGS[1] = 'makeout':
+		if $ARGS[2] = '' or $ARGS[2] = 'light':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/cabin_makeout.jpg"></center>'
+			'You are making out with Igor on the couch, your hands roaming over his body as he passionately kisses you'
+			'As you both get more and more heated, you notice Igor''s hands gliding further and further up your thighs'
+
+			gs 'arousal', 'kiss', 6
+			gs 'arousal', 'foreplay', 2
+			minut -= 4
+			gs 'stat'
+
+			act 'You do not want to get carried away':
+				cla
+				'You tell Igor you do not want to do anything more. He keeps kissing you for a couple more minutes but the heat quickly dies down before Igor gives you a final kiss on the cheek and walks away.'
+				gs 'arousal', 'kiss', 2
+				gs 'stat'
+				gs 'arousal', 'end'
+
+				act 'Further': gt 'swamphouse'
+			end
+
+			act 'Keep making out': gt 'igorhunter', 'cabin', 'makeout', 'heavy'
+			act 'Blow him': gt 'igorhunter', 'cabin', 'bj'
+
+		end
+		if $ARGS[2] = 'heavy':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/cabin_makeout_2.jpg"></center>'
+			'You relax on the couch, letting Igor''s hands glide further up. He moves towards your midriff, lifting your bottom up and exposing your wet pussy as he strokes deliciously close to your nether lips, making you moan lightly'
+
+			gs 'arousal', 'foreplay', 4
+			gs 'stat'
+
+			act 'Suck Igor''s cock': gt 'igorhunter', 'cabin', 'bj'
+			act 'You want him to lick your pussy': gt 'igorhunter', 'cabin', 'cuni'
+			act '"I need you inside me, Igor!" you whisper': gt 'igorhunter', 'cabin', 'vaginal'
+		end
+	end
+
+	if $ARGS[1] = 'cuni':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/cabin_cuni.jpg"></center>'
+		'You smile and moan as Igor laps up your juices, pulling out and playing with your tit as he flick around your clit, getting you very excited.'
+
+		gs 'arousal', 'foreplay', 4
+		gs 'arousal', 'breasts', 3
+		gs 'arousal', 'cuni', 10
+		minut -= 10
+		gs 'stat'
+
+		act 'Return the favor': gt 'igorhunter', 'cabin', 'bj'
+		act 'You need your pussy filled and fucked proper': gt 'igorhunter', 'cabin', 'vaginal'
+	end
+
+	if $ARGS[1] = 'bj':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/bj_1.jpg"></center>'
+		'You go on your hands and knees in front of Igor, your exposed ass towards the door for anyone coming in to see your fuckholes.'
+		gs 'dinsex', 'bj_random'
+
+		gs 'arousal', 'bj', 7
+		gs 'arousal', 'flash', 5, 'exhibitionism'
+		minut -= 6
+		gs 'stat'
+
+		act 'Keep sucking him':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/bj_2.jpg"></center>'
+			'You keep sucking Igor on your knees, your hand pulling out and squeezing your tits. Igor lightly grabs your head and begins to lightly skulllfuck you. After a moment you notice his dick spasming right in your mouth, shooting his jizm right down your throat.'
+			gs 'dinsex', 'bj_swallow_random'
+
+			gs 'arousal', 'bj', 7
+			gs 'arousal', 'breasts', 5
+			minut -= 8
+			gs 'stat'
+			gs 'arousal', 'end'
+
+			act 'Further': gt 'swamphouse'
+		end
+	end
+
+	if $ARGS[1] = 'vaginal':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_1.jpg"></center>'
+		gs 'dinsex', 'vaginal_sex', 15
+
+		act 'Take off your top':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_2.jpg"></center>'
+			'You pretty much rip off your top and start kneading your tits as Igor keeps drilling your cunt, making you moan and scream like a whore.'
+
+			gs 'arousal', 'vaginal', 8
+			gs 'arousal', breasts, 4
+			gs 'stat'
+
+			act 'Igor suddenly pulls out':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_3.jpg"></center>'
+				'Jerking off his <<$penis_desc>>, he covers your stomach and tits with his warm spunk.'
+
+				gs 'cum_call', 'breasts', 'A173', 1
+				gs 'cum_call', 'stomach', 'A173', 1
+				minut += 2
+				gs 'stat'
+				gs 'arousal', 'end'
+
+				act 'Cuddle him':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/cabin/f_4.jpg"></center>'
+					'You cuddle with Igor still covered in his spunk, enjoying this intimate moment'
+					'After a few minutes, Igor pulls you closer and gives you a kiss on the cheek before getting dressed and walking out of the hut.'
+
+					minut += 8
+					mood += 10
+
+					act 'Further': gt 'swamphouse'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'woods':
+	if $ARGS[1] = '':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/2.jpg"></center>'
+		'You passionately kiss Igor, his tongue exploring your throat. As you are making out with Igor, you notice him undoing your buttons'
+
+		gs 'arousal', 'kiss', 3
+		gs 'stat'
+
+		act 'Pull back':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/misc/hangout_woods.jpg"></center>'
+			'You do not really want to do it here. Noticing you not really reciprocating, Igor pulls back and goes back to simply relaxing and chatting with you.'
+
+			gs 'arousal', 'end'
+
+			act 'Further': gt 'swamp_woods'
+		end
+
+		act 'Keep making out with him':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/3.jpg"></center>'
+			'You let him undo your top, continuing to make out with him until he exposes your tits to the warm, breezy air.'
+
+			gs 'arousal', 'foreplay', 2
+			gs 'stat'
+
+			act 'Continue':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/4.jpg"></center>'
+				'He pulls your outfit down and kisses down your chest before his lips find your nipple. You gasp when he starts to suckle and nibble, feeling a bit of wetness between your legs'
+
+				gs 'arousal', 'foreplay', 4
+				gs 'arousal', 'breasts', 4
+				minut -= 5
+				gs 'stat'
+
+				act 'Stand up so that he can strip you off':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/5_2.jpg"></center>'
+					'As soon as you stand up he starts pulling your outfit down your legs, exposing your already aching pussy.'
+
+					act 'Blow him': gt 'IgorHunter', 'woods', 'cuni'
+				end
+			end
+		end
+	end
+
+	if $ARGS[1] = 'cuni':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/6.jpg"></center>'
+		'Just as you start kneeling down, Igor picks you up and puts you up on the stump in one swift move'
+		'You let out a shriek part out of surprise and part how being manhandled like this got you aroused, spreading your legs wide for Igor'
+		'He does not lose time before starting to suck on your clit, pumping his finger in and out while you moan deeply.'
+
+		gs 'arousal', 'foreplay', 8, 'sub'
+		gs 'arousal', 'cuni', 12
+		gs 'arousal', 'vaginal_finger', 8
+		minut -= 20
+		gs 'stat'
+
+		act 'Get down and strip Igor': gt 'IgorHunter', 'woods', 'bj'
+	end
+
+	if $ARGS[1] = 'bj':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/8.jpg"></center>'
+		'Satisfied enough with Igor''s ''surprise'', you get down and undo his pants as he takes off his t-shirt.'
+		'You then pull down his boxers, exposing his diamond hard cock'
+
+		minut += 2
+		gs 'stat'
+
+		act 'Suck his dick':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/9.jpg"></center>'
+			gs 'dinsex', 'bj_random'
+			'After a few moments, you start feeling his dick rhytmically pulsing inside your mouth'
+
+			gs 'arousal', 'bj', 8
+			gs 'stat'
+
+			act 'Keep sucking and milk his dick':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/swallow.jpg"></center>'
+				'You keep on sucking and stroking Igor''s dick as his dick throbs harder and harder'
+				gs 'dinsex', 'bj_swallow_random'
+
+				gs 'arousal', 'bj', 4
+				gs 'cum_call', 'mouth', 'A173', 1
+				gs 'stat'
+				gs 'arousal', 'end'
+
+				act 'Further': gt 'swamp_woods'
+			end
+
+			act 'You want him to cum on your tits':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter_igor/woods/pnecklace.jpg"></center>'
+				'You take him out and jerk him off. It takes him only a few seconds to climax, covering your chest with his spunk'
+
+				gs 'arousal', 'hj', 4
+				gs 'cum_call', 'breasts', 'A173', 1
+				gs 'stat'
+				gs 'arousal', 'end'
+
+				act 'Further': gt 'swamp_woods'
+			end
+		end
+	end
 end
 
 --- Igorhunter ---------------------------------

locations/IrinaRoom.qsrc

@@ -92,7 +92,7 @@ if $ARGS[0] = 'kiss':
 
 	gs 'arousal', 'kiss', 10, 'lesbian'
 	gs 'stat'
-	
+
 	act 'Sex':gt 'IrinaRoom', 'sex'
 end
 
@@ -108,24 +108,24 @@ if $ARGS[0] = 'sex':
 
 	if pcs_horny < 50:
 		'Once in bed you caress each other with passion and lick each others wet pussies. But the excitement gradually disappears and you feel that you won''t orgasm this time.'
-		
+
 		$orgasm_or = 'no'
 		gs 'arousal', 'cuni', 60, 'lesbian'
 		gs 'arousal', 'cuni_give', 60, 'lesbian'
 		minut -= 60
 		gs 'stat'
-		
+
 	end
 
 	if pcs_horny >= 50:
 		'Once in bed you caress each other with passion and lick each others wet pussies. Finally you are both satisfied.'
-		
+
 		$orgasm_or = 'yes'
 		gs 'arousal', 'cuni', 60, 'lesbian'
 		gs 'arousal', 'cuni_give', 60, 'lesbian'
 		minut -= 60
 		gs 'stat'
-		
+
 	end
 
 	act 'Leave':
@@ -160,7 +160,7 @@ if $ARGS[0] = 'first3':
 
 	gs 'arousal', 'kiss', 5, 'lesbian'
 	gs 'stat'
-	
+
 	act 'Ira undress':gt 'IrinaRoom', 'first4'
 	act 'Ira drink more':gt 'IrinaRoom', 'first5'
 end
@@ -190,13 +190,14 @@ if $ARGS[0] = 'first5':
 	'<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw3.jpg"></center>'
 	'You pumped Ira with wine, she is highly intoxicated and spilled wine on myself. She went into the bathroom to change. You, too, went in and offered to help her.'
 	'She undresses and you have decided to follow suit and after undressing climb into the shower. You start lathering her body and see that she is flushed and her nipples erect.'
-
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
+	noShampoo = 1
 	dynamic $showerdin
 	if frost > 0:frost = 0
 
 	gs 'arousal', 'foreplay', 10, 'lesbian'
 	gs 'stat'
-	
+
 	act 'Kiss':gt 'IrinaRoom', 'first6'
 end
 
@@ -210,7 +211,7 @@ if $ARGS[0] = 'first6':
 
 	gs 'arousal', 'kiss', 5, 'lesbian'
 	gs 'stat'
-	
+
 	act 'Fondle breasts':gt 'IrinaRoom', 'first7'
 end
 
@@ -224,7 +225,7 @@ if $ARGS[0] = 'first7':
 
 	gs 'arousal', 'breasts', 5, 'lesbian'
 	gs 'stat'
-	
+
 	act 'Lick pussy':gt 'IrinaRoom', 'first8'
 end
 
@@ -244,7 +245,7 @@ if $ARGS[0] = 'first8':
 	gs 'arousal', 'cuni_give', 10, 'lesbian'
 	minut -= 10
 	gs 'stat'
-	
+
 	act 'Enjoy':gt 'IrinaRoom', 'first9'
 end
 
@@ -261,7 +262,7 @@ if $ARGS[0] = 'first9':
 	$orgasm_or = 'yes'
 	gs 'arousal', 'cuni', 10, 'lesbian'
 	gs 'stat'
-		
+
 	act 'Leave':
 		cla
 		minut += 5

locations/JuliaMilGo.qsrc

@@ -3,15 +3,16 @@
 menu_off = 1
 gs 'stat'
 '<center><b><font color="maroon">Julia Milova, your classmate</font></b></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 'As you approach Julia after school, she smiles at you and asks, "Hi <<$pcs_nickname>>! Want to go to my place? We can do our homework together, and maybe grab a bite to eat?"'
 
 act 'Go with Julia':
 	cls
 	minut += 15
+	BeInJulMilHome = 1
 	gs 'stat'
 	'<center><b><font color="maroon">Julia Milova, your classmate</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 	'You go to Julia''s apartment together, she lives just above you. During the 15 minute walk you chat about random things that happened at school that day.'
 
 	act 'Enter her apartment':gt 'JuliaMilHome'

locations/JuliaMilHome.qsrc

@@ -9,7 +9,7 @@ if BeInJulMilHome = 0:BeInJulMilHome = 1
 
 gs 'stat'
 '<center><b><font color="maroon"><<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>></font></b></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 'Julia has a nice room, decorated with high quality furnishings. There are books everywhere, she must really like to read.'
 
 if lernHome ! 0:
@@ -24,7 +24,7 @@ if lernHome ! 0:
 		lern += rand(3, 6)
 		intel_exp += rand(1, 2) + (mentats_dose - rand(0,mentats_dose))
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 		'You spend an hour doing your homework with Julia, and thanks to her you manage to learn quite a lot. She''s a very clever girl, and good at explaining things.'
 
 		act 'Relax after doing your homework':gt $curloc
@@ -47,7 +47,7 @@ elseif lernHome = 0:
 			pcs_breath = 0
 			eatJulMilDay = daystart
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 			'You follow her to the kitchen and have a meal together. When you''re both finished, you return to her room.'
 
 			act 'Hang out':gt $curloc
@@ -69,7 +69,7 @@ elseif lernHome = 0:
 				JulMilBestFrend += 1
 				pcs_horny += 10
 				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 				'You offer Julia some wine and she happily accepts, leaving the room quickly to get a corkscrew and some glasses. When she finishes pouring the wine, you propose a toast to your friendship and both have a sip. For the next half hour, the two of you enjoy the wine while sharing some juicy gossip. When the bottle is drained you both feel more than a bit tipsy and giggle happily, lying against each other on her bed.'
 
 				act 'Relax in Julia''s room':gt $curloc
@@ -82,7 +82,7 @@ elseif lernHome = 0:
 						if SexTalkJulia < 4:SexTalkJulia += 1
 
 						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 						'You steer the conversation towards sexual topics.'
 
 						if SexTalkJulia = 1:
@@ -189,7 +189,7 @@ elseif lernHome = 0:
 			minut += 15
 			JulMilBestFrend += 1
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/12.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
 			'You spend 15 minutes talking with Julia about whatever topics come to mind. She really is a nice girl.'
 			tiprand = rand(0, 5)
 

locations/JuliaMilVhod.qsrc

@@ -2,27 +2,22 @@
 
 CLOSE ALL
 menu_off = 1
-cla
-*clr
+*clr & cla
 
 if BeInJulMilHome = 0:BeInJulMilHome = 1
 gs'stat'
 
-GoInside = 1
-$byetext=''
-if hour <18 and kanikuli = 0 and week <6: $byetext='You ring the door bell, but no one comes to answer. Julia must not be home.' & GoInside = 0
-
-if hour > 20 : $byetext='It''s too late in the day to visit Julia.' & GoInside = 0
-
-if hour < 8 : $byetext='It''s too early in the day to visit Julia.' & GoInside = 0
-
-if GoInside ! 0:
+act 'Leave':gt'pod_ezd','etaj_3'
+if kanikuli = 0 and hour > 6 and hour < 15 and week < 6:
+	'You ring the door bell, but no one comes to answer. Julia must not be home.'
+elseif hour > 20 :
+	'It''s too late in the day to visit Julia.'
+elseif hour < 8:
+	'It''s too early in the day to visit Julia.'
+else
 	'You ring the door bell. You hear footsteps in the apartment and sure enough, a few seconds later Julia opens the door. "Oh, hi <<$pcs_nickname>>! Come on in!"'
 	act 'Enter Julia''s apartment':gt'JuliaMilHome'
-else
-	'<<$byetext>>'
 end
-act 'Move away from the door':gt'pod_ezd','etaj_3'
 
 --- JuliaMilVhod ---------------------------------
 

locations/KatjaHome.qsrc

@@ -4,7 +4,7 @@ cla
 *clr
 gs 'stat'
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_home.jpg"></center>'
-if hour >= 17 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:
+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."'
 
 	act 'Go to Katjas room':

locations/KatjaHomeTalk.qsrc

@@ -21,6 +21,7 @@ if $ARGS[0] = '':
 
 				act 'Wash alone':
 					cls
+					noShampoo = 1
 					dynamic $showerdin
 					minut += 15
 					pcs_horny += 1
@@ -34,6 +35,7 @@ if $ARGS[0] = '':
 					'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 					'You kick Katja out of the bathroom and close the door. You get into the shower and begin to lather your body with a cloth.'
 					'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'
+					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 					act 'Get out of the shower':gt 'KatjaHomeTalk'
 				end
@@ -41,6 +43,7 @@ if $ARGS[0] = '':
 				if mesec <= 0:
 					act 'Bathe together':
 						cls
+						noShampoo = 1
 						dynamic $showerdin
 						minut += 15
 						pcs_horny += 1
@@ -74,6 +77,7 @@ if $ARGS[0] = '':
 
 									act 'Get out of the shower':gt 'KatjaHomeTalk'
 								end
+								if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 							end
 						elseif pcs_pubes > 3:
 							'Katja eyes slide over your body lingering a little on your breasts and pubic hair. Katja smiles, "<<$pcs_nickname>>, you''ve got too much hair, it''s not fashionable. I''ll shave it off."'
@@ -97,11 +101,13 @@ if $ARGS[0] = '':
 
 									act 'Get out of the shower':gt 'KatjaHomeTalk'
 								end
+								if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 							end
 						end
 					end
 				end
 			elseif KatjaHorny < 50:
+				noShampoo = 1
 				dynamic $showerdin
 				minut += 15
 				pcs_horny += 1
@@ -114,6 +120,7 @@ if $ARGS[0] = '':
 				'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 				'Katja shows you where the toiletries are and leaves you to have a shower. You get into the shower and begin to lather your body with a cloth.'
 				'After washing off the soap you wash your hair with shampoo. Then, rinse off the shampoo you are completely clean.'
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 				act 'Get out of the shower':gt 'KatjaHomeTalk'
 			end
@@ -139,11 +146,11 @@ if $ARGS[0] = '':
 	!					act 'Further': gt 'katja_sex','park'
 	!				end
 	!			end
-				if flag_KissEV = 2: 
+				if flag_KissEV = 2:
 					'"Who do you think kissed more of the boys?" she asked.'
 					Act 'Not to argue':
 						*clr & cla
-						flag_KissEV = 0 
+						flag_KissEV = 0
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
 						'"We likely kissed about the same number of boys." you readily agreed. Kate breathed a sigh of relief.'
 						'"I shouldn''t have asked anyways." she said, kissing you with gratitude. '
@@ -183,7 +190,7 @@ if $ARGS[0] = '':
 
 				act 'Further':gt 'KatjaHomeTalk'
 			end
-			
+
 			if npc_sex['A14'] = 1 and pcs_dom >= KatjaDom:
 				act 'Offer to take a walk in the Park':
 					pcs_dom-=1
@@ -232,7 +239,11 @@ if $ARGS[0] = '':
 			KatConCheck = daystart
 			'"Are you pregnant? Why didn''t you tell me? I thought we were closer than that. I told you that I was pregnant. I need to think. We''ll talk later"'
 
-			act 'Say goodbye and go home':gt 'pavResidential'
+			if mey_vika['key'] = 1:
+				Act 'Leave the room': gt 'mey_home', 'start'
+			else
+				act 'Say goodbye and leave':minut += 5 & gt 'pavResidential'
+			end
 		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
 			act 'Tell her you''re pregnant':
 				cls
@@ -250,7 +261,11 @@ if $ARGS[0] = '':
 			KatConCheck = daystart
 			'"Are you pregnant? Why didn''t you tell me? I thought we were closer than that. I need to think. We''ll talk later"'
 
-			act 'Say goodbye and go home':gt 'pavResidential'
+			if mey_vika['key'] = 1:
+				Act 'Leave the room': gt 'mey_home', 'start'
+			else
+				act 'Say goodbye and leave':minut += 5 & gt 'pavResidential'
+			end
 		elseif KatjaPreg = 0 and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
 			act 'Tell her you''re pregnant':
 				cls
@@ -271,7 +286,11 @@ if $ARGS[0] = '':
 			KatjaConflict += 1
 			KatConCheck = daystart
 			'"You''re pregnant again?" Her face turns red and her expression is far angrier than you''ve ever seen her. "After everything, you still didn''t trust me enough to tell me," she screams. "I thought there was something special between us." Tears begin rolling down her cheeks. "Just leave me alone, I don''t even want to see you right now."'
-			act 'Say goodbye and go home':gt 'pavResidential'
+			if mey_vika['key'] = 1:
+				Act 'Leave the room': gt 'mey_home', 'start'
+			else
+				act 'Say goodbye and leave':minut += 5 & gt 'pavResidential'
+			end
 		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregchem > 0 and (KatjaConflict = 0 or katjaconflict = 2) and pregchem < 3600:
 			act 'Tell her you''re pregnant':
 				cls
@@ -313,19 +332,23 @@ if $ARGS[0] = '':
 		end
 	end
 
-	act 'Say goodbye and go home':gt 'pavResidential'
+	if mey_vika['key'] = 1:
+		Act 'Leave the room': gt 'mey_home', 'start'
+	else
+		act 'Say goodbye and leave':minut += 5 & gt 'pavResidential'
+	end
 end
 
 if $ARGS[0] = 'katjaknows':
-   cla
-   npc_pregtalk['A14'] = 1
+	cla
+	npc_pregtalk['A14'] = 1
 	*nl
 	if KatjaSlut < 60 and $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		''
 		'You tell Katja that you''re having Kolka''s baby.'
-		'"You were knocked up by your brother!? That''s so crazy. Is he at least good in bed?"' 
+		'"You were knocked up by your brother!? That''s so crazy. Is he at least good in bed?"'
 		'"I wouldn''t be pregnant if he wasn''t," you laugh. "I only let the best cock inside of me."'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
@@ -417,7 +440,7 @@ end
 if $ARGS[0] = 'katjaknows1':
 	cla
 	npc_pregtalk['A14'] = 1
-	if KatjaSlut < 60: 
+	if KatjaSlut < 60:
 		'"So, hot stuff. Same father as last time?"'
 	else
 		'"Fuck, I love seeing you pregnant. I hope you''re up for having lots of babies." She blushes intensely and kisses you. "So, who put this one into you?"'
@@ -428,11 +451,11 @@ if $ARGS[0] = 'katjaknows1':
 		'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
 		'"I just hope he makes you happy. It''s sometimes hard to believe that you''re the woman I fell in love with." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
 
-		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'	
+		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
 	elseif KatjaSlut >= 60 and arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
 		'You tell Katja that <<$wombthfath>> got you pregnant again.'
 		'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
-		'"God, you''re the hottest bitch I know. I didn''t think I could be any more in love with you." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'  
+		'"God, you''re the hottest bitch I know. I didn''t think I could be any more in love with you." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
 		'After a few minutes, she breaks the kiss, but keeps her lips millimeters from yours. "Don''t let this distract from my wanting you to become his breeding bitch. I want him to keep you pregnant. I need something to masturbate about when you’re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
 
 		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
@@ -477,12 +500,12 @@ if $ARGS[0] = 'shower_kiss_home':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/showerkiss.jpg"></center>'
 	'Katja gently hugs you with one hand and kisses you on the lips, you feel her soft palm on your naked pussy and her thin finger finds your clitoris begins to rub it.'
-	
+
 	gs 'arousal', 'kiss', 10, 'dom', 'lesbian'
 	gs 'arousal', 'vaginal_finger', 10, 'dom', 'lesbian'
 	minut -= 10
 	gs 'stat'
-	
+
 	if KatjaSlut >= 10:
 		'Katja, gently but firmly puts you on the edge of the tub.'
 	elseif KatjaSlut < 10:
@@ -496,7 +519,7 @@ if $ARGS[0] = 'shower_kiss_home':
 		KatjaSlut += 1
 
 		if npc_sex['A14'] = 0:npc_sex['A14'] = 1 & girl += 1 & KatjaSlut += 5 & KatjaLust += 5
-		
+
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/showersex.jpg"></center>'
 		'You sat on the edge of the tub and open your legs to expose your wet pussy. Katja gets on her knees in front of you and gently licks your swollen red petals.'
@@ -507,7 +530,7 @@ if $ARGS[0] = 'shower_kiss_home':
 		$orgasm_or = 'yes'
 		gs 'arousal', 'cuni', 10, 'dom', 'lesbian'
 		gs 'stat'
-	
+
 		act 'Get out of the shower':
 			gs 'arousal', 'end'
 			gt 'KatjaHomeTalk'
@@ -635,7 +658,7 @@ if $ARGS[0] = 'Sextalk':
 
 						gs 'arousal', 'cuni_give', 15, 'sub', 'lesbian'
 						gs 'stat'
-						
+
 						act 'Further':
 							gs 'arousal', 'end'
 							gt 'KatjaHomeTalk'

locations/Katja_Tanga.qsrc

@@ -109,7 +109,7 @@ if $ARGS[0] = 'school':
 		*clr & cla
 		if KatjaSlut > 80 and n_tanga >= 4:
 			gt 'Katja_Tanga', 'school5'
-		elseif  katschoolsex >= 1 and KatjaSlut > 60 and param = 0:
+		elseif katschoolsex >= 1 and KatjaSlut > 60 and param = 0:
 			gt 'Katja_Tanga', 'school4'
 		elseif KatjaSlut > 40 and katschoolsex = 0:
 			gt 'Katja_Tanga', 'school3'
@@ -245,7 +245,7 @@ if $ARGS[0] = 'dance':
 				'Katja unbuttons her shirt and exposes her pretty bra.'
 			end
 		elseif KatjaSlut <= 80:
-			if 	KatjaHorny > 70:
+			if	KatjaHorny > 70:
 				pcs_horny += 10
 				KatjaHorny += 10
 				KatjaSlut += 1
@@ -262,7 +262,7 @@ if $ARGS[0] = 'dance':
 				act 'Tease her':
 					*clr & cla
 					'<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."'
+					'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

locations/Komp.qsrc

@@ -170,7 +170,7 @@ if $ARGS[0] = 'masturbate':
 	cls
 	internet -= 1
 	elektro += 1
-	pcs_sweat += 10
+	gs 'sweat', 'add', 10
 
 	if divanmastr = 0:
 		divanmastr = 1

locations/LBZhouse.qsrc

@@ -4,7 +4,7 @@ CLOSE ALL
 $LBZH_sex={
 	act 'Give up your pussy':
 		cls
-		gs'stat' 
+		gs'stat'
 		mrapic=rand(0,7)
 		!'<<mrapic>>'
 		'<center><video autoplay loop src="images/characters/pavlovsk/vadim/sex/mitka<<mrapic>>.mp4"></video></center>'
@@ -19,14 +19,14 @@ $LBZH_sex={
 $LBZH_anal={
 	act 'Give up your ass':
 		cls
-		gs'stat' 
+		gs'stat'
 		mrapic=rand(0,7)
 		!'<<mrapic>>'
 		'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal<<mrapic>>.mp4"></video></center>'
 		''
 		gs 'arousal', 'anal', 10, 'sub'
 		gs 'stat'
-		
+
 		spafinloc = 3
 		gs 'cum_manage'
 		'<<$boydesc>> groaned and came filling your ass with his warm sperm.'
@@ -38,7 +38,7 @@ $LBZH_anal={
 $LBZH_bj={
 	act 'Suck':
 		cls
-		gs'stat' 
+		gs'stat'
 		mrapic=rand(0,12)
 		'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<mrapic>>.mp4"></video></center>'
 		'You take a cock in your mouth and start sucking it. You get busy working up and down his dick with your mouth. Your lips lock tightly around his shaft while your tongue licks and plays with his dick.'
@@ -46,7 +46,7 @@ $LBZH_bj={
 
 		gs 'arousal', 'bj', 5, 'sub'
 		gs 'stat'
-			
+
 		 act 'Swallow':
 			cls
 			swallow += 1
@@ -61,7 +61,7 @@ $LBZH_bj={
 
 			act 'Finish':dynamic $LBZH_end
 		end
-	 
+
 		dynamic $LBZH_sex
 		dynamic $LBZH_anal
 	end
@@ -75,6 +75,7 @@ $LBZH_end={
 
 	act 'Wash in the shower':
 		cls
+		noShampoo = 1
 		dynamic $showerdin
 		minut += 15
 		pcs_horny = pcs_horny + 1
@@ -84,13 +85,14 @@ $LBZH_end={
 		gs'stat'
 		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 		'In the bathroom you take a shower to clean up.'
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 		act 'Get out of the bathroom':
 			cls
 			gs'stat'
 			'After you are done washing you get dressed and blow <<$boydesc>> a kiss before you leave.'
-			
-			
+
+
 			act 'Leave':
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -119,20 +121,20 @@ act 'Sex':
 	if tiprand<=70:
 		'<<$boydesc>> gently pushes your shoulders down and you kneel in front of him, waiting for his hard shaft.'
 		dynamic $LBZH_bj
-	     
+
 		act 'Masturbate':
 			cls
 			temp_hj+=1
 			temp_guy+=1
-			gs'stat' 
+			gs'stat'
 			mrapic=0
 			'<center><video autoplay loop src="images/shared/sex/handjob/hj<<mrapic>>.mp4"></video></center>'
 			'You immediately take his cock in your hand and start jerking him off.'
 			'Soon <<$boydesc>> starts to pant heavily and moans out. "<<$pcs_nickname>>, I''m about to cum."'
-			
+
 			gs 'arousal', 'hj', 5, 'sub'
 			gs 'stat'
-			
+
 			dynamic $LBZH_sex
 			dynamic $LBZH_anal
 		end

locations/LCporn.qsrc

@@ -34,7 +34,7 @@ if $ARGS[0] = 'firsttime':
 		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 = -1
+		LCEugenefirst = 0
 
 		act 'Continue':gt 'nord'
 	end

locations/LCwork.qsrc

@@ -4,8 +4,8 @@ if $ARGS[0] = 'start1':
 	*clr
 	horand = rand(1, 100)+ 40
 	facial += 1
-	dynamic $venerasiakOral
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger_oral'
+	gs 'dinSex', 'std_trigger'
 	randLCpay = 1000
 	guy += randguycafe
 
@@ -44,6 +44,7 @@ if $ARGS[0] = 'start1':
 		    '<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/1b.jpg"></center>'
 		    'By the end, the guys tell you to kneel down in the center of the room and to bring them all to orgasm. You kneel down in the middle of them, sucking one off while your jerk off two more, it takes you a bit to work your way around and get them all off, by the time the last one cums on you, your entire body is covered in cum.'
 		    'Fortunately, they allow you to take a shower and one of them even drives you home. He pays you <<randLCpay>> <b>₽</b>, and says he hopes you''ll be their waitress again some day.'
+			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 			gs 'arousal', 'bj', 10, 'sub', 'gangbang', 'prostitution'
 			gs 'arousal', 'hj', 10, 'sub', 'gangbang', 'prostitution'
 			minut -= 10
@@ -67,7 +68,7 @@ if $ARGS[0] = 'start2':
 	if pcs_vag < 18:pcs_vag += 1
 
 	guy += 1
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger'
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/2a.jpg"></center>'
 	'You walk up to the older man and give him a friendly smile as you say: "Good evening, sir. I will be your waitress tonight."'
 	'The older man gives you a dirty grin, and ogles your body for a few seconds before he says: "Very good, you will do. Follow me."'
@@ -110,7 +111,7 @@ if $ARGS[0] = 'start3':
 
 	if pcs_vag < 18:pcs_vag += 2
 
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger'
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/3a.jpg"></center>'
 	'You walk up to the two men in the corner and give them a friendly smile as you say: "Good evening, sirs. I will be your waitress tonight."'
 	'One of the men laughs when the other begins to place another order, and says: "She''s not here for drinks, Dmitri."'
@@ -154,8 +155,8 @@ if $ARGS[0] = 'start4':
 
 	if pcs_ass < 18:pcs_ass += 1
 
-	dynamic $venerasiak
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger'
+	gs 'dinSex', 'std_trigger_oral'
 	
 	if lcwork_counter = 0:
 		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/4a.jpg"></center>'
@@ -244,7 +245,7 @@ if $ARGS[0] = 'start5':
 	horand = rand(1, 100)
 	randLCpay = 500
 	girl += 1
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger'
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/5.jpg"></center>'
 	'The girl looks fairly shy, and seems a bit taken aback when you walk up to her and say: "Hello, miss. I will be your waitress tonight."'
 	'She''s a bit hesitant, afraid to ask if that means what she thinks it means, but relaxes when you take her by the hand and purr: "So where are you taking me tonight, sweetie?"'
@@ -278,8 +279,8 @@ if $ARGS[0] = 'start6':
 
 	if pcs_vag < 18:pcs_vag += 1
 
-	dynamic $venerasiak
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger'
+	gs 'dinSex', 'std_trigger_oral'
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/6a.jpg"></center>'
 	'You walk up to the older man and give him a friendly smile as you say: "Good evening, sir. I will be your waitress tonight."'
 	'"My waitress, huh?" he laughs. "That''s adorable!"'
@@ -300,6 +301,7 @@ if $ARGS[0] = 'start6':
 		'Finally, the man''s cock erupts in your mouth, and he doesn''t explain when you take his cock out of your mouth after a few spurts and release the rest onto your boobies.'
 		'He gives you a satisfied grin and lets you use his shower to clean yourself up before you go. He peeks into the shower once or twice while you''re washing yourself, but you don''t care, it''s not like he hasn''t seen you naked before!'
 		'He gives you <<randLCpay>> <b>₽</b>, and walks you to the door when you''re all freshened up.'
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'	
 		
 		gs 'arousal', 'end'
 		gs 'stat'

locations/LariskaGo.qsrc

@@ -3,7 +3,7 @@ menu_off = 1
 gs'stat'
 
 '<center><b><font color="maroon"><<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>></font></b></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/13.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big13.jpg"></center>'
 'You go to Lariska and walk to her home.'
 
 act 'Go with Lariska':
@@ -12,7 +12,7 @@ act 'Go with Lariska':
 	gs'stat'
 
 	'<center><b><font color="maroon"><<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>></font></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/13.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big13.jpg"></center>'
 	'You walk down the street to the house of Lariska for 15 minutes, discussing all the small stuff.'
 
 	act 'Enter her apartment':gt'LariskaHome'

locations/LariskaHome.qsrc

@@ -81,7 +81,7 @@ if $ARGS[0] = 'in':
 		cls
 		minut += 10
 		gs'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/13.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big13.jpg"></center>'
 		'You talked with Lariska about whatever came to mind.'
 		
 		act 'Continue':gt 'LariskaHome','in'
@@ -93,51 +93,49 @@ if $ARGS[0] = 'in':
 		act 'Say goodbye and go home':gt'pavResidential'
 		exit
 	end
-	if pcs_energy <= 60:
-		act 'Ask for a drink':
+	act 'Ask for a drink':
+		cls
+		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big13.jpg"></center>'
+		'Lariska casually waves towards the door, "You know where the kitchen is, help yourself"'
+		act 'Go and get a drink':
 			cls
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/13.jpg"></center>'
-			'Lariska casually waves towards the door, "You know where the kitchen is, help yourself"'
-			act 'Go and get a drink':
-				cls
-				minut += 5
-				pcs_energy += 40
-				pcs_hydra += 60
-				gs'stat'
-
-				if week < 6 and doorpeek = 0:
-					doorlocked = 1
-					'On your way back from the kitchen, you notice that the room next to the toilet is closed, curiosity takes over and you try to open it but it is locked.'
-					act 'Return to Lariska''s room':gt 'LariskaHome','in'
-				elseif week < 6 and doorpeek ! 0:
-					'On your way back from the kitchen, you notice that the room with the BDSM stuff is closed, you try to open it but it is locked again.'
-					act 'Return to Lariska''s room':gt 'LariskaHome','in'
-				elseif week >= 6:
-					lariskaRand = rand(1,100)
-					doorpeek = 1
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/lariska/home_2.jpg"></center>'
-					if doorlocked = 1 or lariskaBDSM > 0:
-						doorlocked = 0
-						'On your way back from the kitchen, you notice that the room next to the toilet is closed, curiosity takes over and you try to open it. You open the door and you see a room full of what appears to be BDSM accessories and toys.'
-					elseif lariskaRand <= 10 and lariskaBDSM < 10:
-						'You open the door and you see that the room is full of what appears to be BDSM accessories and toys. In the center of the room stands Lariska''s mother, Anna Igorevna, in a suit of leather. She is doing something with a rope. You quietly close the door, hoping she didn''t notice you.'
-						lariskaBDSM += 1
-					elseif lariskaRand >= 90 and lariskaBDSM < 10:
-						'You open the door and you see that the room is full of what appears to be BDSM accessories and toys. In the center of the room stands Lariska''s mother, Anna Igorevna, in a suit of leather. She is doing something with a rope. She obviously notices you and smiles. You quickly shut the door.'
-						lariskaBDSM += 1
-					elseif lariskaRand <= 10 and lariskaBDSM >= 10:
-						'You open the door to the room full of BDSM accessories and toys. In the center of the room stands Anna Igorevna in a suit of leather, she is doing something with a rope. She invites you to have fun.'
-						lariskaBDSM += 1
-					else
-						'You open the door to the room full of BDSM accessories and toys. Anna Igorevna is not there so you close the door.'
-					end
+			minut += 5
+			pcs_energy += 40
+			pcs_hydra += 60
+			gs'stat'
 
-					act 'Return to Lariska''s room':gt 'LariskaHome','in'
+			if week < 6 and doorpeek = 0:
+				doorlocked = 1
+				'On your way back from the kitchen, you notice that the room next to the toilet is closed, curiosity takes over and you try to open it but it is locked.'
+				act 'Return to Lariska''s room':gt 'LariskaHome','in'
+			elseif week < 6 and doorpeek ! 0:
+				'On your way back from the kitchen, you notice that the room with the BDSM stuff is closed, you try to open it but it is locked again.'
+				act 'Return to Lariska''s room':gt 'LariskaHome','in'
+			elseif week >= 6:
+				lariskaRand = rand(1,100)
+				doorpeek = 1
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/lariska/home_2.jpg"></center>'
+				if doorlocked = 1 or lariskaBDSM > 0:
+					doorlocked = 0
+					'On your way back from the kitchen, you notice that the room next to the toilet is closed, curiosity takes over and you try to open it. You open the door and you see a room full of what appears to be BDSM accessories and toys.'
+				elseif lariskaRand <= 10 and lariskaBDSM < 10:
+					'You open the door and you see that the room is full of what appears to be BDSM accessories and toys. In the center of the room stands Lariska''s mother, Anna Igorevna, in a suit of leather. She is doing something with a rope. You quietly close the door, hoping she didn''t notice you.'
+					lariskaBDSM += 1
+				elseif lariskaRand >= 90 and lariskaBDSM < 10:
+					'You open the door and you see that the room is full of what appears to be BDSM accessories and toys. In the center of the room stands Lariska''s mother, Anna Igorevna, in a suit of leather. She is doing something with a rope. She obviously notices you and smiles. You quickly shut the door.'
+					lariskaBDSM += 1
+				elseif lariskaRand <= 10 and lariskaBDSM >= 10:
+					'You open the door to the room full of BDSM accessories and toys. In the center of the room stands Anna Igorevna in a suit of leather, she is doing something with a rope. She invites you to have fun.'
+					lariskaBDSM += 1
+				else
+					'You open the door to the room full of BDSM accessories and toys. Anna Igorevna is not there so you close the door.'
 				end
-			end
 
-			act 'Change Your mind':gt 'LariskaHome','in'
+				act 'Return to Lariska''s room':gt 'LariskaHome','in'
+			end
 		end
+
+		act 'Change Your mind':gt 'LariskaHome','in'
 	end
 !!	if lariskaMotherKnown > 0:
 !!		act 'Go to my mother Lariska':
@@ -150,7 +148,7 @@ if $ARGS[0] = 'in':
 			cls
 			minut += 5
 			gs'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/13.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big13.jpg"></center>'
 			'You decided to talk to Lariska about joining the professional volleyball team.'
 			'"Lariska, you are an excellent volleyball player. Coach Mikheil Nikolayevich has a professional team, why don''t you ask to join it?" you ask your friend.'
 			'"Well, I guess I''m afraid he''ll tell me I''m not good enough. I''ve seen him tell other good players they aren''t good enough to play for him."'

locations/LariskaStart.qsrc

@@ -243,7 +243,7 @@ if $ARGS[0] = 'end':
 						'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
 						'You walk slowly to Ivan and incline your face towards his. You hug and kiss and Ivan starts stroking gently your back.'
 						act 'Run your hand into his pants':
-							cls
+							*clr & cla
 							pcs_horny += 10
 							minut += 3
 							gs'stat'
@@ -252,9 +252,9 @@ if $ARGS[0] = 'end':
 							'You shove your hand deeper into Ivan''s pants and your fingers are touching his big hard cock.'
 
 							act 'Masturbate':
-								cls
+								*clr & cla
 								minut += 5
-								if npcSex[numnpc] = 0:npcSex[numnpc] = 1 & guy += 1
+								if npc_Sex['A3'] = 0: npc_Sex['A3'] = 1 & guy += 1
 								stat['hj'] += 1
 								gs'stat'
 								laris_rand1 = rand(0,2)
@@ -482,7 +482,7 @@ if $ARGS[0] = 'IvanHelp_down':
 			if laris_rand1>=30:'<center><video autoplay loop src="images/locations/pavlovsk/park/sex/publ0,0.mp4"></video></center>'
 			'You sit down on his haunches and begin to suck Ivan.'
 
-			dynamic $dinrandswallow
+			gs 'dinSex', 'bj_swallow_random'
 
 			act 'Go home':gt'korrPar'
 		end
@@ -498,16 +498,16 @@ if $ARGS[0] = 'IvanHelp_sex':
 
 	gs 'boyStat', 'A3'
 	pose = 1
-	if npcSex[numnpc] = 0:npcSex[numnpc] = 1 & guy += 1
+	if npc_Sex['A3'] = 0: npc_Sex['A3'] = 1 & guy += 1
 
 	laris_rand1 = rand(0,50)
 	if laris_rand1<5:'<center><img <<$set_imgh>> src="images/shared/sex/public/boysex.jpg"></center>'
 	if laris_rand1>=5 and laris_rand1<30:'<center><video autoplay loop src="images/shared/sex/public/publ1,'+rand(0,2)+'.mp4"></video></center>'
 	if laris_rand1>=30:'<center><img <<$set_imgh>> src="images/shared/sex/public/publ1,'+rand(0,6)+'.jpg"></center>'
 	'You bend down and have him fuck you from behind.'
-	dynamic $sexstart
-	dynamic $sexstart2
-	dynamic $sexcum
+	gs 'dinSex', 'wear_condom'
+	gs 'dinSex', 'vaginal_sex'
+	gs 'dinSex', 'sexcum'
 
 	act 'Go home':gt'korrPar'
 end

locations/MartinSex.qsrc

@@ -118,7 +118,7 @@ if $ARGS[0] = '':
 					'You are half-tempted to go on the offensive, show him what he''s missing out on by acting like a knight in shining armor and see if that won''t change his mind, but then you remember that you are on your period, so stripping isn''t really a sexy option right now.'
 				end
 
-				if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20 and cycle ! 0:
+				if exhibitionist_lvl > 0 and pcs_dom > 50 and stat['bj'] > 20 and cycle ! 0:
 					'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be.'
 				elseif exhibitionist_lvl > 0 and pcs_dom > 50 and cycle = 0:
 					'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be, and your period certainly isn''t going to stand in the way of <i>that</i>.'
@@ -128,7 +128,7 @@ if $ARGS[0] = '':
 					act 'Go on the offensive - Strip':MartinStripVar = 1 & gt'MartinSex','MartinTease'
 				end
 
-				if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
+				if exhibitionist_lvl > 0 and pcs_dom > 50 and stat['bj'] > 20:
 					act 'Be even more aggressive - Give Martin a blowjob': MartinConvinceBJ = 1 & gt'MartinSex3','MartinBlowTease'
 				end
 
@@ -184,7 +184,7 @@ if $ARGS[0] = '':
 			'Maybe he just needs a little push. Maybe, all you have to do is show him that you aren''t too young, show him what he is missing out on.'
 			if cycle = 0: 'But, damn, since you are currently on your period, that isn''t an option today. You will have to think of something else or come back some other time.'
 
-			if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
+			if exhibitionist_lvl > 0 and pcs_dom > 50 and stat['bj'] > 20:
 				if cycle = 0:
 					'A good blowjob would probably set him straight right quick, no matter what time of the month it is.'
 				else
@@ -240,7 +240,7 @@ if $ARGS[0] = '':
 			act 'Go on the offensive - Strip':MartinStripVar = 1 & gt'MartinSex','MartinTease'
 		end
 
-		if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
+		if exhibitionist_lvl > 0 and pcs_dom > 50 and stat['bj'] > 20:
 			act 'Be even more aggressive - Give Martin a blowjob': MartinConvinceBJ = 1 & gt'MartinSex3','MartinBlowTease'
 		end
 
@@ -260,7 +260,7 @@ if $ARGS[0] = '':
 			'You are half-tempted to go on the offensive, show him what he''s missing out on by acting like a knight in shining armor and see if that won''t change his mind, but then you remember that you are on your period, so stripping isn''t really a sexy option right now.'
 		end
 
-		if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20 and cycle ! 0:
+		if exhibitionist_lvl > 0 and pcs_dom > 50 and stat['bj'] > 20 and cycle ! 0:
 			'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be.'
 		elseif exhibitionist_lvl > 0 and pcs_dom > 50 and cycle = 0:
 			'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be, and your period certainly isn''t going to stand in the way of <i>that</i>.'
@@ -390,7 +390,7 @@ if $ARGS[0] = '':
 			act 'Go on the offensive - Strip':MartinStripVar = 1 & gt'MartinSex','MartinTease'
 		end
 
-		if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
+		if exhibitionist_lvl > 0 and pcs_dom > 50 and stat['bj'] > 20:
 			act 'Be even more aggressive - Give Martin a blowjob': MartinConvinceBJ = 1 & gt'MartinSex3','MartinBlowTease'
 		end
 

locations/Miroslava.qsrc

@@ -82,7 +82,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 				if salo > 3 and cheatNoFat = 0:salo -= RAND(1,3)
 				fat -= 5
 				run_exp += 1
-				pcs_sweat += 10
+				gs 'sweat', 'add', 10
 				pcs_mood += 5
 				if temper >= 25 and sunWeather = 1:pcs_hydra -= 24
 				gs 'stat'
@@ -99,7 +99,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 					minut += 60
 					pcs_mood += 10
 					pcs_tan += 1
-					pcs_sweat += 10
+					gs 'sweat', 'add', 10
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/graze_cow_sun_mira.jpg"></center>'
 					'You lie down next to Mira and tan together in the sun.'
@@ -124,6 +124,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river_mira.jpg"></center>'
 				'You wade in the river, splashing around with Mira is lot of fun.'
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 
 				act 'Continue':gt'gadfield','cow2'
 			end
@@ -132,7 +133,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 				menu_off = 1
 				*clr & cla
 				minut += 30
-				pcs_sweat += 10
+				gs 'sweat', 'add', 10
 				pcs_mood += 5
 				pcs_tan += 1
 				gs 'stat'

locations/NatBelGo.qsrc

@@ -4,7 +4,7 @@ menu_off = 1
 
 gs 'stat'
 '<center><b><font color="maroon"><<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>></font></b></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big16.jpg"></center>'
 'You go up to Natasha and she asks you, "Will you come to my house to do our homework?"'
 
 act 'Go with Natasha':
@@ -13,7 +13,7 @@ act 'Go with Natasha':
 	BeInNatBelHome = 1
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>></font></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big16.jpg"></center>'
 	'It takes you 15 minutes to walk to Natasha''s home. You discuss all the small stuff in your lives that amuse you.'
 
 	if NatashaQW < 2:

locations/NatBelHome.qsrc

@@ -1,607 +0,0 @@
-# NatBelHome
-
-$location_type = 'indoors'
-menu_off = 1
-CLOSE ALL
-if BeInNatBelHome = 0:BeInNatBelHome = 1
-
-gs 'stat'
-'<center><b><font color="maroon"><<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>></font></b></center>'
-if natpregday > 0 and (daystart-natpregday) > (280 + rand(-2,2)):
-	!!baby born
-	natbabycount += 1
-	natpregday = 0
-end
-if (daystart-natpregday) > 84 and natpregday > 0:
-	if (daystart-natpregday) < 200:
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/16(2).jpg" width="356"></center>'
-	else 
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/16(3).jpg" width="356"></center>'
-	end
-	'The state of the room and the whole apartment shows, that the occupant is very poor.'
-	'Looking at Natasha, it is obvious that she is pregnant; you have a strong suspicion that she carries your niece or nephew.'
-	''
-	act 'Touch her belly':
-		if nataskedbaby = 1:
-			delact 'Touch her belly'
-			nataskedbaby = 0
-		end
-		''
-		'She looks at you with a strange smile.'
-		'"Yes", she answers the question you didn''t voice, "your little brother has actually knocked me up. I hope you are happy with that because I can''t afford an abortion."'
-		'Her tone is a lot less accusing than you expected. In fact, she seems... happy.'
-		nataskedbaby = 1
-	end
-else 
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-	'The state of the room and the whole apartment shows that the occupants are very poor: The color and even parts of the plaster are coming down everywhere, there are cracks in the floor and the furniture seems to have been bought secondhand and with no direction or style in mind.'
-end
-
-if lernHome ! 0:
-	'Natasha arranges her books on the table and looks at you expectantly. After all, you came here to study with her, right?'
-
-	act 'Study with Natasha':
-		*clr & cla
-		minut += 60
-		npc_rel['A16'] += 5
-		lernHome = 0
-		lern += rand(3, 6)
-		intel_exp += rand(1, 2)
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-		'You spend an hour doing your homework with Natasha and reading up on what you did in class. Natasha might be poor but she''s a great study partner.'
-
-		act 'Next':gt $curloc
-	end
-elseif lernHome = 0:
-	'Natasha sits down on her bed and, polite as she is, offers you a seat in her semi-hospitable room.'
-
-	act 'Chat with Natasha':
-		*clr & cla
-		minut += 15
-		NatBelBestFrend += 1
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-		'You talk with Natasha about this and that, passing fifteen minutes with ease.'
-
-		if NatBelBestFrend = 1:'Natasha knows that she lives in a very poor family. She has no father and her mother works for a pittance at the garment factory. You feel sorry for her.'
-		if NatBelBestFrend >= 2:'Natasha is envious that other girls can dress smartly and buy cosmetics while she has to wear her mother''s things.'
-
-		act 'Continue':gt $curloc
-	end
-
-	if NatDolg <= 0 and money >= 2000 and natsub > 0:
-		'Hesitantly, Natasha asks you, "<<$pcs_nickname>>, can you lend me a couple of thousand <b>₽</b>? I''ll pay you back, I promise."'
-
-		act 'Give Natasha some money (2000 <b>₽</b>)':
-			*clr & cla
-			minut += 15
-			NatDolg = 2000
-			money -= 2000
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-			'You get your purse and give Natasha the money. At this point, both of you know very well that she is not going to be able to repay you and that you will treat her like a sextoy as long as she is in your debt. Doesn''t this make her a prostitute?'
-
-			act 'Next':gt $curloc
-		end
-	elseif NatBelBestFrend >= 3 and NatDolg = 0 and money >= 5000 and natsub = 0:
-		'Natasha looks down in embarrassment, "<<$pcs_nickname>>, you have lots of money. Could you lend me 5000 <b>₽</b>? I will pay it back, I give you my word."'
-
-		act 'Lend Natasha the 5000 <b>₽</b>':
-			*clr & cla
-			minut += 15
-			NatDolg = 5000
-			money -= 5000
-			NatDolgDay = daystart+30
-			NatBelBestFrend += 1
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-			'You get your purse and give Natasha the money. Natasha is delighted and says that she will pay it back in a month.'
-
-			act 'rest':gt $curloc
-		end
-	elseif NatDolg > 0 and NatDolgDay > daystart:
-		'Natasha promises you to repay the <<NatDolg>> <b>₽</b> in <<NatDolgDay-daystart>> days.'
-	elseif NatDolg > 0 and NatDolgDay <= daystart:
-		'Natasha looks at the floor, "<<$pcs_nickname>>, I... I''m sorry, I don''t have your money."'
-
-		act 'Forgive Natasha''s debt':
-			*clr & cla
-			minut += 15
-			NatDolg = 0
-			NatDolgDay = 0
-			NatBelBestFrend += 10
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-			'You decide to forgive the Natasha''s debt. She is delighted and thanks you with all her heart.'
-
-			act 'Rest':gt $curloc
-		end
-
-		if pcs_dom >= 10 and natotrab = 0:
-			act 'Demand repayment':
-				*clr & cla
-				minut += 15
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-				'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"' 
-				''
-				'Natasha looks at you with fearful eyes and you are getting some ideas as to how you could "use" her. She did say "anything", after all...' 
-				'You snarl at her with an evil hiss: "You''ll be my little pet until you''ve worked off every last kopeck. And don''t you dare tell anyone about this!"' 
-				'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
-
-				act 'On your knees! Open your mouth!':
-					*clr & cla
-					minut += 5
-					natotrab += 1
-					natsub += 1
-					pcs_dom += 1
-					!!natknee
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natknee.jpg"></center>'
-					'You bark at Natasha to get on her knees. She immediately kneels down at your feet and obediently opens her mouth.'
-
-					act 'Spit in her face':
-						*clr & cla
-						minut += 5
-						natsub += 1
-						pcs_dom += 1
-						NatDolg -= 500
-						!!natknee
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natknee.jpg"></center>'
-						'You collect the saliva in your mouth and, with relish spit in Natasha''s face. She jerks and squeezes her eyes shut but makes no move to wipe the spittle away.' 
-						'You smile, "Fair enough, you are forgiven."'
-						'Natasha opens her eyes and asks in disbelief, "It''s forgiven?"' 
-						'You laugh, "500 <b>₽</b> of debt is forgiven, fool. You will do everything I tell you until the entire debt is gone."'
-
-						act 'Next':gt $curloc
-					end
-				end
-			end
-		elseif natotrab > 0 and NatDolg > 0:
-			'Natasha still doesn''t have the <<NatDolg>> <b>₽</b>.'
-
-			act 'On your knees! Open your mouth!':
-				*clr & cla
-				minut += 5
-				natotrab += 1
-				natsub += 1
-				pcs_dom += 1
-				!!natknee
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natknee.jpg"></center>'
-				'You bark at Natasha to get on her knees. She immediately kneels down at your feet and obediently opens her mouth.'
-
-				act 'Spit in her face':
-					*clr & cla
-					minut += 5
-					natsub += 1
-					pcs_dom += 1
-					NatDolg -= 500
-					!!natknee
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natspit.jpg"></center>'
-					'You collect the saliva in your mouth and, with relish spit in Natasha''s face. She jerks and squeezes her eyes shut but makes no move to wipe the spittle away.'
-
-					act 'Next':gt $curloc
-				end
-				if natsub >= 4:
-					act 'Make her lick':
-						*clr & cla
-						minut += 5
-						natsub += 1
-						pcs_dom += 1
-						NatDolg -= 500
-
-						if npcSex[16] = 0:npcSex[16] = 1 & girl += 1
-
-						lesbian += 1
-						!!pcs_horny = 0
-						!!orgasm += 1
-						natlesb += 1
-						!!natknee
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natlick.jpg"></center>'
-						'You force Natasha to undress you and then watch as she undresses herself before she returns to kneeling at your feet. You pull her face into your pussy and snarl at her, "Now lick!". Natasha fearfully starts to work.'
-
-						if natsub < 10:
-							'This useless cunt can''t even find your clitoris and only sluggishly works her mouth on your pussy without any enthusiasm.'
-
-							if pcs_dom >= 20 and NatDolg >= 500:
-								act 'Piss in her mouth':
-									*clr & cla
-									minut += 5
-									natsub += 1
-									pcs_dom += 1
-									NatDolg -= 500
-									natpee += 1
-									!!natknee
-									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natpee.jpg"></center>'
-									'You are angry at this bitch so you release your urine in Natasha''s face. She closes her eyes and bows her head down but does not recoil and silently accepts your golden shower until the very end.'
-									
-									act 'Next':gt $curloc
-								end
-							else 
-								act 'Make her stop':
-									*clr & cla
-									minut += 5
-									pcs_horny -= 10
-									money -= 50
-									
-									gs 'stat'
-									$ImageNeededPlaceholder
-									'<center><img <<$set_imgh>> src="images/shared/food/icecreem.jpg"></center>'
-									'You get tired of her lackluster attempts to get you off, in fact, she is doing such a bad job that it is actually turning you off.'
-									'"You are hopeless. Here, go buy an icecream and practice licking. You''d better do better next time, bitch." You throw a 50 ruble note at her as she stops licking you.'
-									
-									act 'Next':gt $curloc
-								end
-							end
-						else
-							orgasm += 1
-							pcs_horny = 0
-							gs 'stat'
-							'Natasha enthusiastically goes to work on your pussy, using her mouth and tongue. She fucks you with her tongue then switches to sucking on your now engorged clitoris. You grab her head and roughly grind your pussy on her face as your orgasm rolls over your body.'
-						end
-
-						act 'Next':gt $curloc
-					end
-				end
-			
-				if hour >= 18 and hour < 21 and natsub >= 6 and natfuckday < daystart:
-					act 'Call your brother':
-						*clr & cla
-						minut += 15
-						natsub += 1
-						pcs_dom += 1
-						NatDolg -= 500
-						natbj += 1
-						natbro += 1
-						natfuckday = daystart
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbj.jpg"></center>'
-					
-						'You call your brother and he quickly comes up to Natasha''s apartment. You briefly explain the situation to your brother.'
-						'"And you, bitch, you''re going to use that mouth of yours to make Kolka feel good, you got it?" You hiss at Natasha, grabbing her jaw and staring into her eyes.'
-						'Natasha jerkily nods and kneels at Kolka''s feet. She reaches up with trembling hands to unfasten Kolka''s pants and pulls out his semi-hard dick. She tentatively begins to lick it and after a moment takes the now fully hard shaft into her mouth. Kolka starts fucking her in the mouth.'
-
-						if natsub >= 10 and brotherSex > 0 and NatDolg > 0 and natbro > 0:
-							act 'Make her fuck your brother for 500':
-								*clr & cla
-								pcs_dom += 2
-								NatDolg -= 500
-								minut += 15
-								natsub += 1
-								natfuck += 1
-								npc_rel['A34'] += 5
-								gs 'stat'
-								'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natfuck.mp4"></video></center>'
-								'In a few minutes your brother is hard and panting, but you stop him, and pull away Natasha to whisper into her ear.'
-								'"I''ll forgive another 500 of your debt if you fuck him."'
-								'Natasha stares at you, then nods her head without a glance at Kolka, then she gets in doggie position. Still staring at you, she says "He can fuck me."'
-								'You smile at your brother, and playfully slap her very nice ass to incite him. "She is yours, bro. Fuck her hard!"'
-								'He pushes inside her pussy, insistently but patiently, then starts to fuck her fast and hard. As Natasha''s body moves with the thrusts, you lean forward and start kissing her.'
-								if natcp = 0:
-									'She responds eagerly, and you keep kissing until Kolka says, "I''m cumming!"'
-									'Natasha suddenly tries to pull away from Kolka, saying "Pull out, not inside! I don''t want to end up pregnant!"'
-								elseif natpregday > 0 and (daystart-natpregday) > 20 and (daystart-natpregday) < 84:
-									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t seems to bother her that Kolka may knock her up.'
-								elseif natpregday > 0 and (daystart-natpregday) >= 84:
-									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t really matter now, since Kolka has already knocked her up.'
-								elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount = 0:
-									'Natasha looks at you and almost inaudably whispers "Please let him cum inside me. I want a baby too."'
-								elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount > 0:
-									'Natasha looks at you and moans "Please let him cum inside me. I need him to give me another baby."'		
-								else
-									'Natasha looks at you questioningly, whether will you let him cum inside of her and risking her getting pregnant with your niece or nephew, or letting her pull away from you brother.'
-								end
-								if natsub >= 20 and pcs_dom > 20 and natcp > 0 and npc_pregtalk['A16'] = 0:
-									act 'Let him cum inside her':
-										cla
-										natcp += 1
-										natsub += 1
-										pcs_dom += 3
-										'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcp.mp4"></video></center>'
-										'You grab her head, and say to her, "He will not pull out. The deal was a fuck, so that''s what he gets."'
-										'She looks at you submissively then nods, just as Kolka groans and fills her womb with his semen.'
-										if rand(1,100) >= 93 and natpregday = 0:natpregday = daystart
-										gs 'stat'
-										act 'Next':gt $curloc
-									end
-								elseif natsub >= 20 and pcs_dom > 20 and natcp > 0 and npc_pregtalk['A16'] = 1:
-									act 'Let him cum inside her':
-										cla
-										natcp += 1
-										natsub += 1
-										pcs_dom += 3
-										'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcp.mp4"></video></center>'
-										'You grab her head and say, "That''s right, whore. Take his cum deep in your slutty pussy and get knocked up."'
-										'She looks at you joyfully as Kolka groans and fills her womb with his semen.'
-										if rand(1,100) >= 93 and natpregday = 0:natpregday = daystart
-										gs 'stat'
-										act 'Next':gt $curloc
-									end
-								end
-								if natsub >= 20 and pcs_dom > 30:
-									act 'Have Kolka fuck and cum in Natasha''s ass instead':
-										cla
-										natsub += 2
-										npc_rel['A34'] += 5
-										gs 'stat'
-										'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal11.mp4"></video></center>'
-										'You tell your brother to stop moving, put a finger under her chin and look at her imperiously. "How would you like to get fucked in the ass by my brother?"'
-										''
-										if natanal = 0:
-											natanal += 1
-											pcs_dom += 3
-											'She whimpers. "But... but I''ve never had anal sex before."'
-											'Instead of dissuading you, her words cause you to smile cruelly. "Well, if you''d rather have Kolka cum inside your pussy and knock you up..."'
-											''
-											if natcp = 0:
-												'"No!", she cries, "no, please don''t! He... he can fuck my ass."'
-											elseif natcp >= 1:
-												'"I... I don''t know." She seems to be pondering back and forth. He''s come inside her before so the thought doesn''t scare her as much as it used to. Maybe she''s a little bit curious about anal too because after only a few more seconds, she nods. "I... I guess he can fuck my ass, if he wants to."'
-											end
-											''
-											'You are a little disappointed, actually. You expected her to resist more, especially when it was about popping her anal cherry, but Natasha was so used to being dominated by you that defying you never really was an option. Her debt to you was basically just a formality at this point.'
-											''
-											'Kolka lines his dick up with her puckered hole and pushes. Natasha''s cries of pain aside, it goes surprisingly well. Fast, too. Afterwards, you were wondering if it was Kolka''s first anal, too - it would explain why he was so rough and excited.'
-											'Tears are streaming down your girl toy''s face but she doesn''t protest beyond her sobs. She doesn''t have to hold out for long: The sex and tightness of her anus are too much for Kolka and he groans loudly as he cums in her ass for the first time.'
-											''
-											'You gently kiss Natasha''s tears away and gently speak to her, praise her, encourage her. By the time Kolka leaves, she''s stopped crying at least.'
-										
-										elseif natanal >= 1:
-											'"I... I guess he can fuck my ass again, if he wants to."'
-											'"Then ask him to", you order.'
-											'Natasha remains silent for a while. Even after quite a bit of humiliation by you and Kolka, she doesn''t seem all that comfortable with demeaning herself. There''s no doubt as to her submissive streak or her enjoyment of it, however. All she needs is a little nudge here and there.'
-											''
-											'"Please fuck my ass", she whispers, barely audible. You consider having her repeat it but that''s all the encouragement your brother needs: Before you know it, his well-lubricated dick is pushing against her sphincter, causing her to groan in pain.'
-											''
-											'It''s nowhere near as difficult as the first time he took her ass - perhaps because he''s also a little more experienced now than he was before. His movements are slow and gentle at first so she can get used to the cock in her ass.'
-											'And after a while, it sounds like she does - her groans more and more turn into soft coos of pleasure and when you kiss Natasha, she excitedly breathes into your mouth. As if on command, your brother picks up the pace. Caught between pain and pleasure, Natasha doesn''t try to escape his rough treatment but instead moves with him.'
-											'The sex before and the tightness of her anus soon prove too much for your younger brother and Natasha''s moans tell you that he''s cum into her ass.' 
-											''
-											'Natasha doesn''t even pretend to be unhappy with that.'
-										
-										
-										end
-										act 'Next': gt $curloc
-									end
-								end
-								act 'Let her pull away':
-									cla
-									if rand(0,9) = 0:
-										natcp += 1
-										'You let her pull away from your brother, but it appears Kolka was really close, and before anyone could do anything, your brother pumps his seed in Natasha''s body.'
-										'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcp.mp4"></video></center>'
-										'"Fuck, I really am sorry, Natasha!", he says apologetically. "It is just, you are so hot!"'
-										'Natalia doesn''t even listen to him, just looks at you with a strange expression on her face. You can''t really decide whether she is scared that Kolka came in her pussy, or enjoyed it. Maybe both at the same time?'
-										'You quietly signal your brother to dress up and leave while you kiss her deeply. "I hope you enjoyed it, pet. We may repeat it."'
-										if rand(1,100) >= 95 and natpregday = 0:natpregday = daystart
-									else
-										'You let her pull away from your brother, so that you brother''s dick slips out of her just in time. His seed sprays Natasha''s ass, back and hair, and it even reaches your face and hair.'
-										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natkolfacial.jpg"></center>'
-										'"Nice shot, bro!", you say laughing, wiping his seed away from your eyelid. "That was quite the distance!"'
-										'"That was close," whispers Nat, with a strange look in her face. You actually can''t decide whether she is relieved or disappointed that Kolka didn''t cum in her pussy.'
-										'You quietly signal your brother to dress up and leave while you kiss her deeply. "I hope you enjoyed it, pet. We may repeat it."'
-										gs 'boyStat', 'A34'
-										spafinloc = 11
-										sexpartkno = 1
-										gs 'cum_manage'
-										spafinloc = 16
-										sexpartkno = 1
-										gs 'cum_manage'
-									end
-									gs 'stat'
-									act 'Next':gt $curloc
-								end
-							end
-						end
-
-						act 'Continue':
-							*clr & cla
-							minut += 5
-						
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum50.jpg"></center>'
-						
-							'Kolka holds Natasha by the hair as he pistons his cock into her mouth rapidly. Natasha''s chin is covered with her drool and it is soaking the front of her shirt. With a grunt, Kolka pulls his dick from Natasha''s mouth and she automatically opens her mouth and sticks out her tongue. Kolka pumps his dick a few times then shoots his cum into Natasha''s waiting mouth.'
-							'"Swallow it, slut." You command, when Kolka is done, before Natasha can spit the sperm out.'
-							'Natasha grimaces but complies, swallowing Kolka''s load then opening her mouth to show that it is all gone.'
-					
-							act 'Next':gt $curloc
-						end
-					end	
-				end
-				if olufirst = 3 and oluuosegunday ! daystart:
-					act 'Take her to see Olu for 500':
-						oluuosegunday = daystart
-						gs 'boystat', 'A55'
-						*clr & cla
-						pcs_dom += 2
-						NatDolg -= 500
-						minut += 5
-						natsub += 1
-						natfuck += 1
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-						'You know you need to help out with Olu soon, but your ass is still too sore. Then you get a great idea, kill two birds with one stone. Have Natasha have sex with him, she owes you anyways, besides it might be fun to make the little bitch squeal.'
-						'"Since I know you don''t have my money, I have a way you can help me out and pay off some of that debt. We are going to see my Aunt''s boyfriend Olu, he has a massive... sex drive and she can''t keep up and I need a break too."'
-						'Natasha seems a little unsure about this and perhaps a bit confused but she nods her head, you smile to her and lead her across the hall to your Aunts place.'
-						act 'Introduce Olu':
-							*clr
-							cla
-							minut += 5
-							'<center><b><font color=maroon>Apartment Aunt</font></b></center>'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/olu.jpg"></center>'
-							'You take off your shoes and go straight to the living room, where you find Olu resting on the couch.'
-							'He looks at you, that perpetual smile still on his face. "Hi, <<$pcs_nickname>>! Who''s your friend?"'
-							'"Hello, Olu! This is my friend Natasha, she wants you to fuck her." You say to him, pointing at his crotch and then slapping Natasha on the ass. He seems to understand quickly and nods with a huge grin holding up the bottle of lube.'
-							'You glance at Natasha. "Well take off your clothes." She nods and does as you ask.'
-							act 'Undress Natasha':
-								*clr & cla
-								minut += 5
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/sex/olu4.jpg"></center>'
-								'You can''t help but smile, when you glance over and see Olu already naked with his massive dick swinging. She looks up and catches sight of his huge dick and freezes looking at you with a slightly panicked look.'
-								'You smile at her. "Yep it''s huge I know, my ass needs a break and you need to pay me back so..." you trail off, it only takes a moment for Natasha to understand and then it hits her you said ass.'
-								'She squeaks a reply. "You want him to fuck me in the ass with that thing?" she says in disbelief.'
-								'"Yes I do, my ass could use a break and you owe me..."'
-								'After a moment she lowers her gaze and then nods her head. You pat her shoulder. "Good girl and it won''t be too bad, we have plenty of lube, wink, wink."'
-								act 'Let the fun begin':
-									*clr & cla
-									minut += 15
-									natanal += 1
-									pcs_horny += 10
-									Olu_pay += 1
-									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/sex/olunat.jpg"></center>'
-									'You help Natasha get undressed and then get her down on all fours in front of Olu, while he lubes up his dick and her ass, you get undressed as well. No reason he should have all the fun. You kneels down beside Natasha and grab her butt cheeks with your hands and spread them wide for Olu. Not needing any more invitation than that, she squeals loudly as his <<dick>>cm <<$dick_girth>> cock slides in her ass.'
-									'He starts fucking her slowly at first but you encourage him to go faster and deeper, pulling on her hips. You feel your pussy getting wet listening to Natasha cry out and watching the <<dick>>cm <<$dick_girth>> cock rip up her ass. You start rubbing your clit as you watch.'
-									'Getting up, you move to sit in front of Natasha and spread your legs, you pull her face to your pussy and she wastes no time and starts licking your pussy. You''re loving it, grinding your pussy into her face, her muffled cries as she eats you, while Olu pounds her ass. You keep encouraging Olu to fuck her harder. The more she squeals the more turned on you get. Before long you are cumming, apparently seeing this is a turn on for Olu as well. As he shoots his load deep in her ass with in a few moments of watching you cum.'
-									'Once you are dressed you help Natasha back to her apartment, as she seems to be having a little trouble walking. You feel a little bad for her. "You did great, it gets better I promise. Next time it won''t hurt as much, I promise." Then you give her a passionate kiss on the lips. She gives you a smile at that and nods her head and goes back into her apartment walking quite painfully.'
-
-									act 'Finish':gt 'pod_ezd','etaj_4'
-								end
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-end
-
-if npc_pregtalk['A16'] = 0 and kid = 0:
-	if natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and pregchem >= 3600:
-		*clr & cla
-		gs 'stat'
-		'"<<$pcs_nickname>>, are you pregnant, too? Well, I guess I don''t have to worry about being the only pregnant girl at school," she giggles.'
-
-		act 'Next':gt 'NatBelhome', 'natknows'
-	elseif natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
-		act 'Tell her you''re pregnant':
-			*clr & cla
-			'"If you were worried about being the only pregnant girl at school, that won''t be a problem anymore." You smirk while rubbing your midriff. "It looks like I got myself knocked up as well."'
-			'Natasha smiles at you excitedly. "Really? Congratulations!"'
-			*nl
-			act 'Next':gt 'NatBelhome', 'natknows'
-		end
-	elseif pregchem > 0 and knowpreg = 1 and natsub = 0 and (daystart-natpregday) < 84:
-		act 'Tell her you''re pregnant':
-			cla
-			*nl
-			'"<<$pcs_nickname>>, you''re," she pauses momentarily before continuing in a tone of shock mixed with disgust, "pregnant? Have you been sleeping around? This will definitely impact your studies."'
-			act 'Continue' :gt 'NatBelhome'
-			npc_pregtalk['A16'] = 1
-		end
-	elseif pregchem > 0 and knowpreg = 1 and natsub > 0 and (daystart-natpregday) < 84:
-		act 'Tell her you''re pregnant':
-			cla
-			*nl
-			'"You''re pregnant? Who''s the father?"'
-			*nl
-			if $wombthfath = '':
-				'"Honestly, I don''t even know."'
-				'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
-				act 'Continue' :gt 'NatBelhome'
-				npc_pregtalk['A16'] = 1
-			else
-				'You tell her that <<$wombthfath>> is the father and then give her brief details as to how you got pregnant, without getting too explicit.'
-				*nl
-				'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
-				act 'Continue' :gt 'NatBelhome'
-				npc_pregtalk['A16'] = 1
-			end
-		end
-	end
-end
-
-if npc_pregtalk['A16'] = 0 and kid > 0:
-	if (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and pregchem >= 3600:
-		*clr & cla
-		gs 'stat'
-		'"Wow, <<$pcs_nickname>>, you''re pregnant again? You''re really committed to making sure I''m not the only young mother around here, huh?" She playfully smiles and puts a hand on your shoulder. "It''s good to know you''re looking out for me."'
-
-		act 'Next':gt 'NatBelhome', 'natknows1'
-	elseif (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
-		act 'Tell her you''re pregnant':
-			*clr & cla
-			'"Hey, guess who''s pregnant again. You know, I''m glad I forced you to let Kolka impregnate you so that I could have someone I can relate to."'
-			'Natasha stares at you for a moment, stunned, trying to determine if the second half of your statement was a joke, before the first half clicks in her mind. "Oh my God, that''s wonderful!" she exclaims as she throws her arms around you and hugs you. When she finally lets go, she asks'
-			*nl
-			act 'Next':gt 'NatBelhome', 'natknows1'
-		end
-	elseif pregchem > 0 and natsub = 0 and knowpreg = 1:
-		act 'Tell her you''re pregnant':
-			*clr & cla
-			*nl
-			'"Really? You''re pregnant again? You should really try to be more careful."'
-			act 'Continue' :gt 'NatBelhome'
-			npc_pregtalk['A16'] = 1
-		end
-	elseif pregchem > 0 and natsub > 0 and (daystart-natpregday) < 84 and knowpreg = 1:
-		act 'Tell her you''re pregnant':
-			*clr & cla
-			*nl
-			'"You got pregnant again. It must be wonderful…" She trails off, clearly envious.'
-			act 'Continue' :gt 'NatBelhome'
-			npc_pregtalk['A16'] = 1
-		end
-	end
-end
-
-if $ARGS[0] = 'natknows':
-	cla
-	npc_pregtalk['A16'] = 1
-	if pav_slut < 125: '"So, who''s the father?"'
-	if pav_slut >= 125: '"So, do you know who the father is?"'
-	*nl
-	if $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
-		'You smile. "I''m sure you won''t be surprised to hear Kolka got me pregnant."'
-		'"Wow. He really has a thing for knocking girls up," she says touching her own pregnant belly. "I didn''t expect him to extend that to his own sister, though."'
-		'"Yeah, you know how it is. Some men just want to conquer as many wombs as they can, It doesn''t matter who they''re attached to," you reply. "But don''t worry, he still has a permanent claim on yours. We''ll make sure he has plenty of opportunities to keep getting you pregnant. Who knows how many of his children you''ll have before he''s finished."'
-		'Natasha''s face goes completely red with embarrassment and she starts to mumble something before you cut her off with a passionate kiss. When you finally break the kiss, she is still visibly red, but she isn''t protesting your suggestion. You know what she wants.'
-	elseif $wombthfath = '':
-		'"I don''t actually know." You laugh. "I guess my life has gotten a little out of hand recently."'
-		'"Yeah, it sounds like it has." She smiles. "Regardless, I''m glad I won''t be going through pregnancy alone."'
-	else
-		'"It looks like I got knocked up by <<$wombthfath>>"'
-		'"Well, I hope for the best for both of you. After our babies are both born, we should start setting up play dates." She pauses for a moment before adding "Honestly, I''m really glad I won''t be going through this alone."'
-	end
-	act 'Continue':gt 'NatBelhome'	
-end
-
-!When pregnancy fetish is added, another reaction will be added here
-if $ARGS[0] = 'natknows1':
-	cla
-	npc_pregtalk['A16'] = 1
-	if pav_slut < 125: '"Is it the same father as last time?"'
-	if pav_slut >= 125: '"Do you know if it''s the same father as last time?"'
-	*nl
-	if $wombthfath = 'Kolka' and npc_rel['A34'] > 50 and arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
-		'"Yeah, I think you’re right. I’m not sure if I’ll let him get me pregnant again after this though." You pull your face as close to Natasha’s as you can without actually touching her and sultrily whisper, "You, on the other hand, are going to be his personal breeding bitch. There won’t be a single moment where your womb doesn’t contain either his baby or his cum. He is going to keep you knocked up until he gets bored of you and leaves you a single mother."'
-		'As soon as you finish speaking you give Natasha a deep, passionate kiss. You pull away, a string of saliva still hanging between you. Natasha just stares at you, unable to respond, but very visibly aroused.'
-	elseif arrpos('$ChildThFath','Kolka') = arrsize('$ChildThFath')-1:
-		'"Not this time. My body is far too fantastic to limit myself. My brother can''t be the only person to put a baby in me," you joke. "Plus, he already has a baby factory. That''s your job." You punctuate your sentence by kissing Natasha. After you pull away, she stares at you in silence, face red, trying to determine if you were serious.'
-	elseif $wombthfath = 'Kolka' and npc_rel['A34'] > 50 and arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1:
-		'"No, this time it''s Kolka''s," you inform her.'
-		'"Wow. He really has a thing for knocking girls up," she says.'
-		'"Yeah, it seems like he does," you reply. "But don''t worry, we''ll make sure he has plenty of opportunities to keep getting you pregnant. Who knows how many of his children you''ll have before he''s finished."'
-		'Natasha''s face goes completely red with embarrassment and she starts to mumble something before you cut her off with a passionate kiss. When you finally break the kiss, she is still visibly red, but she isn''t protesting your suggestion. You know what she wants.'
-	elseif $wombthfath ! 'Kolka' and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
-		'"Yeah. I guess I needed him to give me another baby before I could be satisfied," you jest.' 
-		'"Well, I hope you find satisfaction," she laughs.'
-	elseif $wombthfath ! 'Kolka' and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
-		'"No, I needed to test drive someone else before I could decide what father I like best."'
-		'"If you''re going that route, you might as well keep shopping around." You laugh together for a while before moving on to another topic.'
-		end
-	act 'Continue':gt 'NatBelhome'	
-end
-
-act 'Go home':gt 'pod_ezd','etaj_4'
-
---- NatBelHome ---------------------------------
-

locations/NatBelVhod.qsrc

@@ -1,25 +0,0 @@
-# NatBelVhod
-CLOSE ALL
-
-menu_off = 1
-if BeInNatBelHome = 0:BeInNatBelHome = 1
-gs'stat'
-
-GoInside = 1
-$byetext=''
-if hour <18 and kanikuli = 0 and week <6: $byetext='You knock on the door, but nobody answers.' & GoInside = 0
-
-if hour > 20 : $byetext='It is to late to go to visit.' & GoInside = 0
-
-if hour < 8 : $byetext='It is to early to go to visit.' & GoInside = 0
-
-act 'Leave':gt'pod_ezd','etaj_4'
-if GoInside ! 0:
-	'You knock on the door. Natasha answers and invites you in.'
-	act 'Go into the apartment':gt'NatBelHome'
-else
-	'<<$byetext>>'
-end
-
---- NatBelVhod ---------------------------------
-

locations/NikoDates.qsrc

@@ -344,6 +344,7 @@ if $ARGS[0] = 'Date 2':
 						'<center><b><h4><font color="red"><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
 						'You shake your head as you respond, "No way. I''m not that kind of girl. I told you that." Niko get noticeably angry. "Come on <<$pcs_firstname>>. I''m not asking you to donate one of your kidneys. Just give a quick.." You cut him off. "I SAID NO!" Niko grabs your head then begins pushing it toward his crotch, as he says, "Come on <<$pcs_nickname>>, it won''t take long.". You quickly pull away then slap him across his face, causing him to pause for a second before he raises his hand then smacks you across the face, as he shouts, "YOU FUCKING UNGRATEFUL BITCH! I have done so much for you, and you toss it in my face. Get the fuck out and swim!" Niko grabs you by the neck, and pushes you off the boat then begins angrily paddling away, as you do your best to swim back to the shore. You arrive at the shore completely drenched, so you hang your clothes on a nearby tree, and wait for it to dry. You take a few seconds to think to yourself, <font color=#FF00FF>What the fuck was his problem!? What a nutjob!</font>'
+						if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 						*nl
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/fight/grab.jpg"></center>'
 
@@ -410,7 +411,7 @@ if $ARGS[0] = 'Date 2_2':
 					*nl
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/train.mp4"></video></center>'
 
-					act '...':gt 'NikoDates', 'Date Rape'
+					act 'Continue':gt 'NikoDates', 'Date Rape'
 				end
 			end
 		end
@@ -459,7 +460,7 @@ if $ARGS[0] = 'Date Rape':
 				gs 'arousal', 'end'
 				gs'stat'
 
-				act '...':
+				act 'Continue':
 					cls
 					gs 'clothing', 'wear_last_worn'
 					if NikoEv < 4:NikoEv = 4
@@ -1675,7 +1676,7 @@ if $ARGS[0] = 'Exposed':
 											gs 'arousal', 'end'
 											gs 'stat'
 
-											act '...':gs 'clothing', 'wear_last_worn' & gt 'NikoDreams', 'Family'
+											act 'Continue':gs 'clothing', 'wear_last_worn' & gt 'NikoDreams', 'Family'
 										end
 									end
 								end

locations/NikoDreams.qsrc

@@ -53,7 +53,7 @@ if $ARGS[0] =  'Family':
 						*nl
 						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum10.mp4"></video></center>'
 
-						act '...':gt 'SoniaHome', 'Aftermath'
+						act 'Continue':gt 'SoniaHome', 'Aftermath'
 					end
 				end
 			end
@@ -324,7 +324,7 @@ if $ARGS[0] =  'TeeHee':
 		*nl
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/butterfly6.jpg"></center>'
 
-		act '...':VKTeeHee = 1 & VKWoods = -1 & VKSmiley = 3 & gt 'SoniaHome', 'Aftermath 2'
+		act 'Continue':VKTeeHee = 1 & VKWoods = -1 & VKSmiley = 3 & gt 'SoniaHome', 'Aftermath 2'
 	end
 
 	act 'Walk away':VKTeeHee = 1 & gt 'NikoDreams', 'Woods Home'
@@ -430,7 +430,7 @@ if $ARGS[0] =  'Friends':
 						*nl
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/friends/darkness.jpg"></center>'
 
-						act '...':minut += 120 & gt 'NikoEv2', 'Niko Wake'
+						act 'Continue':minut += 120 & gt 'NikoEv2', 'Niko Wake'
 					end
 				end
 			end
@@ -539,7 +539,7 @@ if $ARGS[0] = 'Puppeteer':
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/residents/puppeteer.jpg"></center>'
 							'You turn around but quickly get grabbed by your cheeks then launched onto the ground by a horrific looking man with an orange suit and long sharp nails. You quickly roll to the side, dodging a swipe of his nails before quickly crawling away just to get grabbed by your ankles and dragged back. You let out a loud scream before you hear the man say, "Ahh another one for my collection. You belong to me now puppet." The man then pulls you toward him. You try to grab onto something to stop yourself from getting dragged away but can find nothing to grab onto. You can do nothing but cry and scream as you get pulled out of the school into a dark mist which envelopes you....'
 
-							act '...':
+							act 'Continue':
 								*clr & cla
 								music_loop = 0
 								close all

locations/Nudelake.qsrc

@@ -140,7 +140,7 @@ if $ARGS[0] = 'zagarat':
 	$location_type = 'event_outdoors'
 	*clr & cla
 	minut += 30
-	if pcs_sweat < 35 : pcs_sweat += 5
+	if pcs_sweat < 35 : gs 'sweat', 'add', 5
 	inhib_exp += rand(1,3)
 	pcs_mood += 5
 	menu_off = 1
@@ -187,6 +187,7 @@ if $ARGS[0] = 'swim':
 
 	'<center><img <<$set_imgh>> src="images/locations/shared/lake/nudeswim.jpg"></center>'
 	'You go for a swim.'
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 
 	act 'Finish':gt 'Nudelake'
 end

locations/ParChurch.qsrc

@@ -412,15 +412,15 @@ if $ARGS[0] = 'tease':
 		if kirillsex ! 0:
 			'"Very nice, <<$pcs_nickname>>." Father Kirill whispers as he reaches out and caresses your firm breasts before pulling your top back into place, covering you once again. "Follow me."'
 			act 'Follow him': gt 'ParChurch2', 'sex'
-			gs 'willpower', 'sex'
+			gs 'willpower', 'sex', 'resist'
 			if will_cost <= pcs_willpwr:
 				act 'Leave the church (<<will_cost>> Willpower)':
-					gs 'willpower', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					gt 'ParChurch' , 'start'
 				end
 			else
-				'<br>You don''t have enough willpower to refuse.'
+				act 'Leave the church (<br><font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		else
 			'"Very nice, <<$pcs_nickname>>." Father Kirill whispers with a smile as he reaches out and softly caresses your breasts before pulling your top back into place, covering you up once again.' 

locations/ParChurch2.qsrc

@@ -218,11 +218,11 @@ if $ARGS[0] = 'confession':
 				'You feel yourself grow concerned maybe there is something to this after all. "How can we do that father?"'
 				'He licks his lips a moment. "I will give of myself and absorb your lust, so that you have no desire to lay your hands upon others."'
 				act 'Let the father slake your lust with his body': gt 'ParChurch2', 'hj'
-				gs 'willpower', 'hj'
+				gs 'willpower', 'hj', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Refuse to give the father a hand job (<<will_cost>> Willpower)':
 						*clr & cla
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 						'You shake your head. "I don''t think that is a good idea father, perhaps just a prayer of absolution instead."'
@@ -235,7 +235,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to give the father a hand job (<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 'Finish':
@@ -282,10 +282,10 @@ if $ARGS[0] = 'confession':
 				'You feel yourself grow concerned maybe their is something to this after all. "How can we do that father?"'
 				'He licks his lips a moment. "I will give of myself and absorb your lust, so that you have no desire to take the penis of others into your mouth."'
 				act 'Let the father slake your lust with his body': gt 'ParChurch2', 'bj'
-				gs 'willpower', 'bj'
+				gs 'willpower', 'bj', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Refuse to give the father a blow job (<<will_cost>> Willpower)':
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 						'You shake your head. "I don''t think that is a good idea father, perhaps just a prayer of absolution instead."'
@@ -298,7 +298,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to give the father a blow job (<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 'Finish':
@@ -345,10 +345,10 @@ if $ARGS[0] = 'confession':
 				'You feel yourself grow concerned maybe their is something to this after all. "How can we do that father?"'
 				'He licks his lips a moment. "I will give of myself and absorb your lust, so that you have no desire to let others perform sodomy upon your body."'
 				act 'Let the father slake your lust with his body': gt 'ParChurch2', 'anal'
-				gs 'willpower', 'anal'
+				gs 'willpower', 'anal', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Refuse to let the father fuck your ass (<<will_cost>> Willpower)':
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 						'You shake your head. "I don''t think that is a good idea father, perhaps just a prayer of absolution instead."'
@@ -361,7 +361,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to let the father 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
 			end
 			act 'Finish':
@@ -408,10 +408,10 @@ if $ARGS[0] = 'confession':
 				'You feel yourself grow concerned maybe their is something to this after all. "How can we do that father?"'
 				'He licks his lips a moment. "I will give of myself and absorb your lust, so that you have no desire to lay with others."'
 				act 'Let the father slake your lust with his body': gt 'ParChurch2', 'sex'
-				gs 'willpower', 'sex'
+				gs 'willpower', 'sex', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Refuse to let the father fuck you (<<will_cost>> Willpower)':
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 						'You shake your head. "I don''t think that is a good idea father, perhaps just a prayer of absolution instead."'
@@ -424,7 +424,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to let the father fuck you (<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 'Finish':
@@ -511,10 +511,10 @@ if $ARGS[0] = 'confession':
 				'You feel yourself grow concerned maybe their is something to this after all. "How can we do that father?"'
 				'He licks his lips a moment. "I will pray as you slake your lust and absorb your sin, freeing you from it."'
 				act 'Do as the father commands': gt 'ParChurch2', 'mast'
-				gs 'willpower', 'exhib'
+				gs 'willpower', 'exhib', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Refuse to masturbate in front of the father (<<will_cost>> Willpower)':
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 						'You shake your head. "I don''t think that is a good idea father, perhaps just a prayer of absolution instead."'
@@ -527,7 +527,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to masturbate in front of the father (<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 'Finish':
@@ -584,7 +584,7 @@ if $ARGS[0] = 'confession':
 			'"Hmm? Of course you may, <<$pcs_firstname>>," he replied with a smile, "It is Kirill. Father Kirill."'
 			'You knelt next to Father Kirill.'
 			'"Father, I''m no longer an virgin." you confess.'
-			if gpoliuborka = 2:
+			if forge_referral = 1:
 				'"I''ve lied to my mother about it and given her a fake note from the gynecologist saying I''m still a virgin." you admitted shamefully.'
 			else
 				'"<<$npc_nickname[''A29'']>> will make me go to the gynecologist soon and he''ll report that I''m no longer a virgin." you say fearfully, "My <<$npc_nickname[''A29'']>> will be so mad. I don''t know what to do."'
@@ -657,7 +657,7 @@ if $ARGS[0] = 'secrets':
 			else
 				'"Really?" Father Kirill answered eagerly, "I imagine that it was an educational experience then. Did you and the boys further your education in any way beyond the movies?"'
 			end
-			if evgenQW < 2:
+			if evgenQW < 3:
 				'You shake your head then realize that Father Kirill can''t see you.'
 				'"No, Father. we only watched the movies." you tell him.'
 				'"Well then, no harm done then." he says, almost sounding disappointed.'
@@ -668,7 +668,7 @@ if $ARGS[0] = 'secrets':
 					act 'Return to Narthex': gt 'ParChurch', 'Narthex'
 				end
 			end
-			if evgenQW >= 2:
+			if evgenQW = 3:
 				act 'Admit to jerking the boys':
 					*clr & cla
 					Kirill_Crpt += 1
@@ -687,7 +687,7 @@ if $ARGS[0] = 'secrets':
 					end
 				end
 			end
-			if evgenQW >= 3:
+			if evgenQW >= 4:
 				act 'Admit to sucking the boys':
 					*clr & cla
 					Kirill_Crpt += 1
@@ -723,6 +723,7 @@ if $ARGS[0] = 'secrets':
 								*clr & cla
 								Kirill_Crpt += 1
 								minut += 5
+								if Kirill_brotherBJ = 0: Kirill_brotherBJ = 1
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
 								'"He was there." you confess, "He didn''t do anything the first couple of times, I only jerked his friends. Then one time he just went and stuck his cock, I mean, penis into my mouth while I was jerking his friends."'
 								if Kirill_Crpt <= 20:
@@ -764,6 +765,63 @@ if $ARGS[0] = 'secrets':
 			end
 		end
 	end
+	if Kirill_brotherBJ = 1 and Kirill_Crpt > 20:
+		*nl
+		'...you remember last time you told Father Kirill about sucking off your brother after watching porn, he didn''t chastise you about engaging in incest. ' + iif(Kirill_Crpt > 60, 'In fact, you''re pretty sure he enjoyed hearing about it. ', '') + 'Maybe you could tell him about the other things you and your brother have been up to.'
+		act 'Tell him about having sex with your brother':
+			*clr & cla
+			confK += 1
+			moral += 1
+			Kirill += 1
+			Kirill_Crpt += 2
+			minut += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
+			'"Father.. I don''t know how to say this," you say, fidgeting in your seat, "Me and my brother have grown quite close lately."'
+			'"Why would you think that''s a sin, child? God looks favourably upon close-knit families, especially when siblings are friends, rather than fighting."'
+			'"Well we certainly haven''t been fighting ever since..." The last part of the sentence gets caught in your throat, and you''re suddenly all too aware of what you''re about to confess to.'
+			'"Ever since what?" the priest asks gently, "What happened between your brother and you?"'
+			'You blush fiercely, and then start telling the priest about how you caught your brother watching you shower and started showing off your naked body to him every chance you got.'
+			if brothershowertalk ! 0: 'How that soon wasn''t enough for you, and you started inviting him in under the pretense of wanting to talk to him, but in reality you just wanted to give him a better view.'
+			if brother_shower_times ! 0: 'Eventually you wanted to feel more than just his eyes on your skin, and invited him to shower together with you, which of course he jumped at the chance to do.'
+			'You continue describing your fall into incestual deviancy' + iif(brother_homework > 0, ', how you let him feel you up while you help him with his homework', '') + iif(npc_QW['A34'] => 4, ', how you''ve used your naked body to show him the secrets of the female anatomy', '') + iif(brotherMorningSex > 0 or brotherNightSex > 0 or brotherEvSex > 0, ', how you regularly help each other with your sexual urges', '') + iif(brotherMorningSex = daystart or brotherNightSex = daystart or brotherEvSex = daystart, ', and that one of those times was just earlier today', '') + ', all the while Father Kirill sits there calmly and waits for you to finish.'
+			if Kirill_Crpt <= 60:
+				'When you''re finally done he speaks up "Hmmm. This is quite disturbing. Incest is a sure path to hell, but on the other hand it is natural for two young people who have grown close to want to explore their sexuality together."'
+				'"I fear that your soul could become stained by your actions, however you must be sure to inform me of such acts lest they lead to greater sins in the future." the priest scolded you as he draped his stole over your head and began the Prayer of Absolution.'
+			else
+				'By now his breathing has become much heavier and there''s a clear tenting in the front of his robe.'
+				'"Hmmm." Father Kirill answeres eagerly, "Such experimentation is indeed problematic, child. I fear that your soul will become stained by your actions, if we do not purge this sin from you body at once."'
+				'You feel yourself grow concerned maybe there is something to this after all. "How can we do that father?"'
+				'He licks his lips for a moment. "I will give of myself and absorb your lust, so that you have no desire to lay with your brother."'
+				act 'Let the father slake your lust with his body': gt 'ParChurch2', 'sex'
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse to let the father fuck you (<<will_cost>> Willpower)':
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
+						'You shake your head. "I don''t think that is a good idea father, perhaps just a prayer of absolution instead."'
+						'He hesitates only a moment. "Yes of our course my child."'
+						act 'Finish':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
+							'After confessing, Father Kirill kneels next to you and drapes the end of his stole over your head. Together, you chant the prayer of absolution. Father Kirill admonishes you to be a good girl and tells you to come back to see him anytime you feel the need.'
+							act 'Return to Narthex': gt 'ParChurch', 'Narthex'
+						end
+					end
+				else
+					act 'Refuse to let the father fuck you (<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 'Finish':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/confession.jpg"></center>'
+				'After confessing, Father Kirill kneels next to you and drapes the end of his stole over your head. Together, you chant the prayer of absolution. Father Kirill admonishes you to be a good girl and tells you to come back to see him anytime you feel the need.'
+				act 'Return to Narthex': gt 'ParChurch', 'Narthex'
+			end
+		end
+	end
+
 end
 
 if $ARGS[0] = 'mast':
@@ -777,13 +835,13 @@ if $ARGS[0] = 'mast':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/mast2.jpg"></center>'
 		'You start rubbing your clit as the priest watches you, after a few moments he starts to pray, but his eyes never leave your pussy. The more you rub your pussy the louder he starts to pray.'
-		gs 'arousal', 'mast', 5, 'exhibitionism'
+		gs 'arousal', 'masturbate', 5, 'exhibitionism'
 		gs 'stat'
 		act 'Keep masturbating':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/mast3.jpg"></center>'
 			'As you start to really get in a rhythm and begin to moan he says. "Lord forgive her of her sins, cleans her soul with your divine love." He continues to pray as you keep masturbating.'
-			gs 'arousal', 'mast', 5, 'exhibitionism'
+			gs 'arousal', 'masturbate', 5, 'exhibitionism'
 			gs 'stat'
 			act 'Orgasm':
 				*clr & cla
@@ -791,7 +849,7 @@ if $ARGS[0] = 'mast':
 				'You feel yourself getting close to orgasming. Apparently the father can tell or just guessed. "Yes you must purge this lust from your body, let it all out before God."'
 				$orgasm_or = 'yes'
 				$orgasm_txt = 'Then your body is wracked by a powerful orgasm, you feel your whole body shaking from the spasms.'
-				gs 'arousal', 'mast', 5, 'exhibitionism'
+				gs 'arousal', 'masturbate', 5, 'exhibitionism'
 				gs 'arousal', 'end'
 				gs 'stat'
 				killvar '$orgasm_txt'
@@ -813,25 +871,25 @@ if $ARGS[0] = 'hj':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/hj1.jpg"></center>'
 	'He directs you to kneel on the floor and you do as you are told. Then he frees his dick from his pants, you can see it is already hard and says. "Now take my penis into your hands."'
 	'You do as he asks and take his cock into your hand, you full it''s hardness as you begin to stroke it.'
-	gs 'arousal', 'hj', 3, 'unknown'
+	gs 'arousal', 'hj', 3
 	gs 'stat'
 	act 'Stroke him':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/hj2.jpg"></center>'
 		'You feel it grow slightly more in your hand, you stroke the full length of his <<dick>>cm <<$dick_girth>> cock with your hand. He moans and prays for your soul and for god to take away your sin. "Please lord release this child from the lust she is consumed by."'
-		gs 'arousal', 'hj', 5, 'unknown'
+		gs 'arousal', 'hj', 5
 		gs 'stat'
 		act 'Keep stroking it':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/hj3.jpg"></center>'
 			'As you keep stroking him he gets louder in his prayers. "Yes Lord, I feel your presence, let her lust be taken from her, leaving behind nothing but pureness again."'
-			gs 'arousal', 'hj', 5, 'unknown'
+			gs 'arousal', 'hj', 5
 			gs 'stat'
 			act 'On the face':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/hj4.jpg"></center>'
 				'As you keep stroking him he says. "Forgive us your children for our sins." With that cum starts spurting from his dick, mostly hitting you in the face as you keep stroking him until it finally stops.'
-				gs 'arousal', 'hj', 5, 'unknown'
+				gs 'arousal', 'hj', 5
 				gs 'cum_call', 'face', 'A166'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -859,19 +917,19 @@ if $ARGS[0] = 'bj':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/bj2.jpg"></center>'
 		'You do as he tells you and open your mouth. Once your mouth is fully open he slides his <<dick>>cm <<$dick_girth>> dick into your mouth and you close your lips around it. He lets out a moan which turns into a moaning prayer. "Oh heavily father forgive the sins of this child." He says as he starts to slowly and gently fuck your mouth.'
-		gs 'arousal', 'bj', 5, 'unknown'
+		gs 'arousal', 'bj', 5
 		gs 'stat'
 		act 'Keep sucking':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/bj3.jpg"></center>'
 			'As you suck his cock you can feel his hand go to the back of your hand, you can feel his restraint as he keeps himself for forcing himself down your throat, allowing you to guide the action. While you suck him he gets louder in his prayers. "Yes Lord I feel your presence, let her lust be taken from her, leaving behind nothing but pureness again."'
-			gs 'arousal', 'bj', 5, 'unknown'
+			gs 'arousal', 'bj', 5
 			gs 'stat'
 			act 'Suck him off':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/cum.jpg"></center>'
 				'As you suck his cock he prays more. "Forgive us, your children, for our sins." With that pulls his dick out of your mouth just in time for cum to start spurting from his dick, mostly hitting you in the face until it finally stops.'
-				gs 'arousal', 'bj', 5, 'unknown'
+				gs 'arousal', 'bj', 5
 				gs 'cum_call', 'face', 'A166'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -893,45 +951,45 @@ if $ARGS[0] = 'sex':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/foreplay2.jpg"></center>'
 	'He stands up and gently pushes you against the wall. His hands roam your body, slowly removing your clothes until your breasts are exposed and his hand is rubbing your clit. "We must purge the lust from your body and banish your sexual desires." As he says that you feel one of his fingers slide inside of your wet pussy, he slowly fucks you with one finger before adding a second.'
-	gs 'arousal', 'vaginal_finger', 5, 'unknown'
+	gs 'arousal', 'vaginal_finger', 5
 	gs 'stat'
 	act 'Open to purging':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/foreplay3.jpg"></center>'
 		'Once you are nice and wet from the fingering he drops down to his knees and places his face between your legs, as you lean back against the wall. He begins to eagerly lick at you clit and pussy, causing you to moan in pleasure. After several minutes he stops and stands back up and ask you. "Kneel my child."'
-		gs 'arousal', 'cuni', 5, 'unknown'
+		gs 'arousal', 'cuni', 5
 		gs 'stat'
 		act 'Kneel':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/foreplay4.jpg"></center>'
 			'As you kneel down he pulls his dick out of his pants, it is already hard, but he strokes it several times as he says. "Open your mouth my child."'
-			gs 'arousal', 'mast', 5, 'unknown'
+			gs 'arousal', 'masturbate', 5
 			gs 'stat'
 			act 'Open your mouth':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/bj2.jpg"></center>'
 				'You open your mouth, once it is fully open he slides his dick in and you close your lips around his shaft. Slowly and steadily, you start to suck him off. He lets out a moan which turns into a moaning prayer. "Oh heavily father, forgive the sins of this child."'
 				'After a few minutes of sucking his dick he pulls it out of your mouth. "Undress and lean forward, placing your hands on the ground."'
-				gs 'arousal', 'bj', 5, 'unknown'
+				gs 'arousal', 'bj', 5
 				gs 'arousal', 'end'
 				gs 'stat'
 				act 'Undress and bend over':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/sex1.jpg"></center>'
 					'You remove all your clothes as he watches, stroking his dick with one hand. Once you are fully naked on your knees you lean forward until your hands touch the floor. Father Kirill kneels down behind you, he rubs your pussy a few times with his fingers at first. Then you feel the head of is dick rubbing against your wet slit, he gently pushes it into you. You both moan as his <<dick>>cm <<$dick_girth>> dick slides into you. He begins to gentle fuck you, holding onto your hips with one hand.'
-					gs 'arousal', 'vaginal', 5, 'unknown'
+					gs 'arousal', 'vaginal', 5
 					gs 'stat'
 					act 'Have the sin fucked out of you':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/sex2.jpg"></center>'
 						'He starts fucking you a bit harder but then slows down to a slower, steady pace. "Forgive us, your children, for our sins." He prays as he fucks you steadily. Several minutes goes by and then he suddenly pulls out of you. "Rise," He says.'
-						gs 'arousal', 'vaginal', 5, 'unknown'
+						gs 'arousal', 'vaginal', 5
 						gs 'stat'
 						act 'Rise up':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/cum.jpg"></center>'
 							'As you get off your hands to rise into a kneeling position he stands up with his pants still around his ankles. You turn your face toward him right into him stroking his cock, just as a blast of cum hits you right in the face, followed by several more, coating most of your face in his cum.'
-							gs 'arousal', 'vaginal', 5, 'unknown'
+							gs 'arousal', 'vaginal', 5
 							gs 'cum_call', 'face', 'A166'
 							gs 'arousal', 'end'
 							gs 'stat'
@@ -962,27 +1020,27 @@ if $ARGS[0] = 'anal':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/anal2.jpg"></center>'
 		'You do as he tells you and open your mouth. Once your mouth is fully open, he slides his dick in and you close your lips around it. He lets out a moan which turns into a moaning prayer. "Oh heavily father forgive the sins of this child." He says as he starts to slowly and gently fuck your mouth.'
-		gs 'arousal', 'bj', 5, 'unknown'
+		gs 'arousal', 'bj', 5
 		gs 'stat'
 		act 'Keep sucking':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/anal1.jpg"></center>'
 			'As you suck his cock you can feel his hand go to the back of your head. You can feel his restraint as he keeps himself for forcing himself down your throat, allowing you to guide the action. While you suck him he gets louder in his prayers. "Yes Lord I feel your presence, let her lust be taken from her, leaving behind nothing but pureness again."'
 			'He pulls his dick from your mouth and walks over to his desk. "Please bend over the bench, we must now purge the sin of sodomy from you." He says as he begins to apply lubrication to his dick as he walks back over to you. You have no idea why a priest has lubrication, but you''re glad he does.'
-			gs 'arousal', 'bj', 3, 'unknown'
+			gs 'arousal', 'bj', 3
 			gs 'stat'
 			act 'Bend over':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/anal3.jpg"></center>'
 				'Once you are bent over he applies some lube to your anus and rubs it in with his fingers. He presses the head of his dick against your asshole, you feel the pressure build up until the tip pops into your ass, causing you to cry out slightly in a little pain and pleasure. He pauses a moment to let you get use to it before he slowly and gently begins fucking your ass with his <<dick>>cm <<$dick_girth>> dick.'
 				gs 'pain', 1, 'asshole', 'stretch'
-				gs 'arousal', 'anal', 5, 'unknown'
+				gs 'arousal', 'anal', 5
 				gs 'stat'
 				act 'It''s starting to feel good':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/anal4.jpg"></center>'
 					'As he gently fucks your ass he prays. "Lord help me guide this lost lamb back from the sins of sodomy and into your loving light once more." As he gets into it, he starts to fucking a little harder and faster, but each time he notices any discomfort from you, he slows down once more.'
-					gs 'arousal', 'anal', 5, 'unknown'
+					gs 'arousal', 'anal', 5
 					gs 'stat'
 					act 'Yes, Father':
 						*clr & cla
@@ -990,14 +1048,14 @@ if $ARGS[0] = 'anal':
 						'It starts feeling good and you start moaning louder and louder in pleasure. "Yes, Father! Fuck my ass," You tell him.'
 						'"Lord forgive her, for she knows not what she says," He says loudly as he keeps fucking your ass with renewed vigor after hearing you moan in pleasure.'
 						'After a few minutes he suddenly pulls out of your ass and urgently says. "Turn around and kneel."'
-						gs 'arousal', 'anal', 5, 'unknown'
+						gs 'arousal', 'anal', 5
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Turn around and kneel':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/sex/anal6.jpg"></center>'
 							'You turn around, kneeling and opening your mouth. Your knees barely touch the floor before spurts of cum start splattering on your face. Most of his cum ends up on your face but a little ends up in your mouth. He groans out as he squeezes the last drop of cum from his cock. "God forgive us for our sins."'
-							gs 'arousal', 'anal', 5, 'unknown'
+							gs 'arousal', 'anal', 5
 							gs 'cum_call', 'face', 'A166'
 							gs 'arousal', 'end'
 							gs 'stat'

locations/Prostitute.qsrc

@@ -388,7 +388,7 @@ if $ARGS[0] = 'work2':
 					money += ProsMoney * 100
 					'You proceed to give him a blowjob, licking and sucking his condom-clad penis. The taste of the rubber is a bit unpleasant, but you do a good job regardless. In no time the guy groans loudly.'
 					'When you feel his cock finally soften between your lips, you pull your head back. The man ties a knot in the condom and tosses it out of the window carelessly, then he gives you the money he owes you.'
-					dynamic $venerasiakOral
+					gs 'dinSex', 'std_trigger_oral'
 					gs 'arousal', 'bj', 5, 'prostitution', 'unknown'
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -424,7 +424,7 @@ if $ARGS[0] = 'work2':
 						
 						'After a few minutes of fucking you, the man groans and you feel his hips spasming against yours. He pulls out of you and takes the filled condom off his slowly shrinking cock.'
 						'He ties a knot in the condom and tosses it out of the window carelessly, and gives you the money he owes you.'
-						dynamic $venerasiak
+						gs 'dinSex', 'std_trigger'
 						gs 'arousal', 'end'
 						gs 'stat'
 						protect = 0
@@ -467,7 +467,7 @@ if $ARGS[0] = 'work2':
 
 						'After a few minutes of fucking your ass, the man groans and you feel his hips spasming against yours. He pulls out of you and takes the filled condom off his slowly shrinking cock.'
 						'The man ties a knot in the condom and tosses it out of the window carelessly, and gives you the money he owes you.'
-						dynamic $venerasiak
+						gs 'dinSex', 'std_trigger'
 						protect = 0
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -480,7 +480,7 @@ if $ARGS[0] = 'work2':
 				cla
 				clr
 				*clr
-				dynamic $venerasiakOral
+				gs 'dinSex', 'std_trigger_oral'
 				gs 'stat'
 				picrand = rand(8, 13)
 				'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjp<<picrand>>.jpg"></center>'
@@ -575,7 +575,7 @@ if $ARGS[0] = 'work2':
 							money += ProsMoney * 100
 							gs 'stat'
 							prostRand = rand(1, 100)
-							dynamic $venerasiak
+							gs 'dinSex', 'std_trigger'
 
 							
 							if prostRand <= 50:
@@ -641,7 +641,7 @@ if $ARGS[0] = 'work2':
 								'Your anus has no difficulty adjusting to the size of his member, and it actually feels fairly pleasant when he shoves his length in. Your anus clasps around the base of his cock from time to time, and the man begins to thrust his hips against yours enthusiastically when he notices you can take it.'
 								gs 'arousal', 'anal', 10, 'prostitution', 'unknown'
 								gs 'stat'
-								dynamic $venerasiak
+								gs 'dinSex', 'std_trigger'
 							end
 
 							if klismaday ! daystart:
@@ -669,7 +669,7 @@ if $ARGS[0] = 'work2':
 										spafinloc = 12
 										gs 'cum_manage'
 										pcs_breath = 0
-										dynamic $venerasiakOral
+										gs 'dinSex', 'std_trigger_oral'
 										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjr.jpg"></center>'
 										'"Hey, I did what you wanted! You owe m-" you begin, but he doesn''t let you finish. The man angrily punches you in the stomach, making you double over in pain.'
@@ -690,7 +690,7 @@ if $ARGS[0] = 'work2':
 											cla
 											*clr
 											pcs_throat += 1
-											dynamic $venerasiakOral
+											gs 'dinSex', 'std_trigger_oral'
 											gs 'stat'
 											'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bjr1.jpg"></center>'
 											'You understand perfectly why he''s upset... that wasn''t very smart of you. You''ll have to think of a solution fast!'
@@ -706,7 +706,7 @@ if $ARGS[0] = 'work2':
 												pcs_vag += 1
 												money += ProsMoney * 110
 												protect = 1
-												dynamic $venerasiak
+												gs 'dinSex', 'std_trigger'
 												protect = 0
 												gs 'stat'
 												'<center><img <<$set_imgh>> src="images/locations/shared/sex/car/sexcar20.jpg"></center>'

locations/RoundEnd.qsrc

@@ -23,7 +23,7 @@ stoper = 0
 			resultFight = 2
 		end
 
-		act '...':gt 'EndFight'
+		act 'Continue':gt 'EndFight'
 	elseif round < Formula + 1:
 		endur += lustw * 25 / 100
 		endurE += lustwe * 25 / 100

locations/Snpc.qsrc

@@ -557,7 +557,7 @@ if numnpc = 16:
 				*clr & cla
 				minut += 15
 				NatDolg -= 500
-				if npcSex[16] = 0:npcSex[16] = 1 & girl += 1
+				if npc_Sex['A16'] = 0: npc_Sex['A16'] = 1 & guy += 1
 				lesbian += 1
 				pcs_horny = 0
 				orgasm += 1

locations/SoniaHome.qsrc

@@ -11,7 +11,7 @@ if $ARGS[0] = 'Aftermath':
 	pcs_sleep += 45
 	cumspclnt = 1
 	gs 'cum_cleanup'
-	pcs_sweat += 5
+	gs 'sweat', 'add', 5
 	minut += 270
 	NikoAftermath = 1
 	$location_type = 'private'
@@ -69,7 +69,7 @@ if $ARGS[0] = 'Aftermath 2':
 	music_loop = 0
 	close all
 	pcs_sleep += 10
-	pcs_sweat += 10
+	gs 'sweat', 'add', 10
 	minut += 60
 	gs'stat'
 	'<center><b><h4><font color=#ff0090><<"Katja Meynold">></font></h4></b></center>'
@@ -262,6 +262,7 @@ if $ARGS[0] = 'Sonia Shower':
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/shower/wash.jpg"></center>'
 	'You climb into the shower, and begin lathering your body, cleaning yourself, as thoroughly, as possible before turning off the water. You grab a spare towel, and begin drying yourself off before getting dressed then leaving the bathroom.'
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 	act 'Bedroom':gt 'SoniaHome', 'Bedroom'
 end

locations/SubLoss.qsrc

@@ -6,7 +6,7 @@
 resultFight = 4
 'You signal the referee that you''re no longer able to continue fighting and give up.'
 
-act '...':gt 'EndFight'
+act 'Continue':gt 'EndFight'
 
 --- SubLoss ---------------------------------
 

locations/SubWin.qsrc

@@ -6,7 +6,7 @@
 resultFight = 0
 '<<$nameE>> is done. The referee signals, that she can no longer continue on fighting and she''s given up.'
 
-act '...':gt 'EndFight'
+act 'Continue':gt 'EndFight'
 
 --- SubWin ---------------------------------
 

locations/Vnlake1.qsrc

@@ -1,8 +1,16 @@
 # Vnlake1
 '<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/vnlake1/vnlake1.jpg"></center>'
 'While you were sunbathing a tipsy girl holding a bottle of wine walks up to you, she sits down next to you and begins to stroke your back.'
-
-act 'Drive her off':gt 'Nudelake'
+	
+gs 'willpower', 'sex', 'resist'
+if will_cost <= pcs_willpwr:	
+	act 'Drive her off (<<will_cost>> Willpower)':
+		gs 'willpower', 'pay', 'resist'
+		gt 'Nudelake'
+	end
+else
+    act 'Drive her 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 'Kiss':
 	cla

locations/Vnlake2.qsrc

@@ -2,7 +2,15 @@
 '<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/vnlake2/vnlake1.jpg"></center>'
 'Whilst tanning you doze off, and you dream about your breasts being caressed, as someones tongue pleasures your pussy. You open your eyes and understand that this is not a dream, next to you two men one caressing your breasts, the second has already dug his head between your legs.'
 
-act 'Push them away':gt 'Nudelake'
+gs 'willpower', 'sex', 'resist'
+if will_cost <= pcs_willpwr:		
+	act 'Push them away (<<will_cost>> Willpower)':
+		gs 'willpower', 'pay', 'resist'
+		gt 'Nudelake'
+	end
+else
+    act 'Push them 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 'Touch member':
 	cls

locations/VoltrenerSexShower.qsrc

@@ -123,7 +123,11 @@ if $ARGS[0] = '3':
 				gs 'arousal', 'flash', 10
 				gs 'arousal', 'end'
 				gs 'stat'
-				act 'Wash your ass':dynamic $showerdin & gt 'gdksport', 'start'
+				act 'Wash your ass':
+					noShampoo = 1
+					dynamic $showerdin
+					gt 'gdksport', 'start'
+				end
 			end
 			act 'Cover up':
 				cls
@@ -132,7 +136,11 @@ if $ARGS[0] = '3':
 				'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':dynamic $showerdin & gt 'gdksport', 'start'
+				act 'Wash your ass':
+					noShampoo = 1
+					dynamic $showerdin
+					gt 'gdksport', 'start'
+				end
 			end
 		end
 	end

locations/WorkHosp.qsrc

@@ -11,7 +11,7 @@ if $ARGS[0] = 'start':
 	gs 'stat'
 	'<center><b><font color="maroon">Clinic</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/hospital.jpg"></center>'
-	'The hospital staff are hard at work, with many patients waiting in the lobbies.  Doctors and nurses rush from office to office trying to keep the flow of patients going as quickly as possible.'
+	'The hospital staff are hard at work, with many patients waiting in the lobbies. Doctors and nurses rush from office to office trying to keep the flow of patients going as quickly as possible.'
 	jobhosprand = rand(0, 9)
 
 	act 'Work in the Operating Room (1:00)':
@@ -57,7 +57,7 @@ if $ARGS[0] = 'start':
 					picrand = 11
 					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/mastr11.jpg"></center>'
 					'You begin to secretly masturbate whenever nobody is watching.'
-					$orgasm_or = 'custom'
+					$orgasm_or = 'yes'
 					$orgasm_txt = 'Gradually a pleasant warmth and sensation radiates from your needy sex, culminating in a powerful orgasm that sends waves of pleasure through your entire body.'
 					gs 'arousal', 'masturbate', 15
 					gs 'stat'
@@ -93,7 +93,7 @@ if $ARGS[0] = 'start':
 		cls
 		'<center><b><font color="maroon">Clinic</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/hospital.jpg"></center>'
-		'Your shift ended.'
+		'Your shift has ended.'
 
 		act 'Go home':gt 'street'
 	end
@@ -102,16 +102,14 @@ end
 if $ARGS[0] = 'milit':
 	cla
 	military = 1
-	'"Listen, I am scheduled to work this weekend, but I have plans. Here''s the deal: War games are often held not far from the city and well, according to the rules, they need doctors on site before they can begin. Don''t worry, you will have a doctor with you, so the most you''ll need to do is apply some bandages. If you feel up to it, on Saturday you can catch a bus at the clinic between 6 and 9. Oh yeah, I almost forgot! The pay for two days is 5000."'
-
+	'"Listen, I am scheduled to work this weekend, but I have plans. Here''s the deal, War games are often held not far from the city and well, according to the rules, they need doctors on site before they can begin. Don''t worry, you will have a doctor with you, so the most you''ll need to do is apply some bandages. If you feel up to it, on Saturday you can catch a bus at the clinic between 6 and 9. Oh yeah, I almost forgot! The pay for two days is 5000 <b>₽</b>. So what do you say?" asks Kat.'
 
 	act 'Move away':gt 'WorkHosp', 'start'
 end
 
 if $ARGS[0] = '0':
     $location_type = 'event'
-	cla
-	*clr
+	cla & *clr
 	katprorand = rand(0, 2)
 
 	if katprorand = 0:
@@ -120,7 +118,7 @@ if $ARGS[0] = '0':
 		xgt 'lezbsex', 'var'
 	elseif katprorand = 1:
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex7.jpg"></center>'
-		'You and Kat just began to fondle each other when a patient entered the room. You backed away from her trying to pretend that nothing was happening.  On the contrary, Kat did not hesitate and was lying on the couch with her legs spread wide, proudly showing off her wet pussy.  She guides you back down to her pussy, leaving no doubt what she expects your tongue to be doing, while looking hungrily at the guy and inviting him to join in the fun.'
+		'You and Kat just began to fondle each other when a patient entered the room. You backed away from her trying to pretend that nothing was happening. On the contrary, Kat did not hesitate and was lying on the couch with her legs spread wide, proudly showing off her wet pussy. She guides you back down to her pussy, leaving no doubt what she expects your tongue to be doing, while looking hungrily at the guy and inviting him to join in the fun.'
 		gs 'arousal', 'cuni_give', 10, 'lesbian'
 		gs 'stat'
 		act 'Leave':gt 'WorkHosp', 'start'
@@ -134,14 +132,14 @@ if $ARGS[0] = '0':
 			gs 'boyStat', $npclastgenerated
 			gt 'podrsex', 'suck'
 			gs 'arousal', 'cuni_give', 10, 'lesbian'
-			gs 'arousal', 'vaginal', 10, 'unkown'
+			gs 'arousal', 'vaginal', 10, 'unknown'
 			minut -= 10
 			gs 'arousal', 'end'
 			gs 'stat'
 		end
 	elseif katprorand = 2:
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex8.jpg"></center>'
-		'While your tryst with Kate was in full swing, two doctors came in. You were both so engrossed with each other, that you didn''t even notice them until they started to caress you. You both spread your legs wider, inviting them to join the fun.'
+		'While Kat and you are in full swing, two doctors enter the room. You are both engrossed with each other, that you didn''t even notice them until they started to caress you. You both spread your legs wider, inviting them to join the fun.'
 
 		act 'Entertain them':
 			gang += 1
@@ -155,19 +153,18 @@ if $ARGS[0] = '0':
 			gs 'WorkHosp', 'randdoc'
 			if $boydesc = $boydesc[1]:docfuck[randdoc] -= 1 & jump 'docloop'
 			if docfuck[randdoc] = 1:guy += 1
-			xgt 'sexdvanadva', 'var'
 			gs 'arousal', 'bj', 10, 'group'
 			gs 'arousal', 'vaginal', 10, 'group'
 			minut -= 10
 			gs 'arousal', 'end'
 			gs 'stat'
+			xgt 'sexdvanadva', 'var'
 		end
 	end
 end
 
 if $ARGS[0] = '1':
-	cla
-	*clr
+	cla & *clr
 	mastrrand = rand(0, 1)
 
 	if mastrrand = 0:
@@ -175,75 +172,115 @@ if $ARGS[0] = '1':
 		'As you masturbate, you totally abandon yourself to the pleasure of your coming orgasm. A doctor enters the room but you are so absorbed in your own pleasure that you only notice him when his hand starts to guide your head to his erect cock.'
 		gs 'arousal', 'masturbate', 10
 		gs 'stat'
-		if pcs_horny < 50:act 'Break and run':gs 'arousal', 'end' & gt 'WorkHosp', 'start'
-
-		act 'Go along with it':
-			guy += 1
-			picrand = 12
-			gs 'WorkHosp', 'randdoc'
-			if docfuck[randdoc] = 1:guy += 1
-			gt 'sex', 'minet'
+		if pcs_horny < 50:
+			
+			act 'Break and run':
+				gs 'arousal', 'end'
+				gt 'WorkHosp', 'start'
+			end
+			
+			gs 'willpower', 'sex', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Go along with it (<<will_cost>> Willpower)':
+					guy += 1
+					picrand = 12
+					gs 'WorkHosp', 'randdoc'
+					if docfuck[randdoc] = 1:guy += 1
+					gs 'willpower', 'pay', 'self'
+					gt 'sex', 'minet'
+				end
+			else
+				act 'Go along with 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
 	else
 		picrand = rand(12, 13)
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex10.jpg"></center>'
 		'As you lose yourself in pleasure, two doctors come into the room. You are so distracted, that you only notice them when they start to openly masturbate in front of you.'
-
-		if pcs_horny < 50:
-			act 'Leave':gt 'WorkHosp', 'start'
-		end
-
-		act 'Play with them':
-			sexpartkno = 1
-			gs 'WorkHosp', 'randdoc'
-			$boy[1] = $boy
-			$boydesc[1] = $boydesc
-			if docfuck[randdoc] = 1:guy += 1
-			:docloop2
-			gs 'WorkHosp', 'randdoc'
-			if $boydesc = $boydesc[1]:docfuck[randdoc] -= 1 & jump 'docloop2'
-			if docfuck[randdoc] = 1:guy += 1
-			xgt 'sexdvoe', 'var'
-			gs 'arousal', 'bj', 10, 'group'
-			gs 'arousal', 'vaginal', 10, 'group'
-			minut -= 10
+		gs 'arousal', 'masturbate', 10
+		gs 'stat'
+					
+		act 'Leave':
 			gs 'arousal', 'end'
-			gs 'stat'
+			gt 'WorkHosp', 'start'
+		end
+		
+		gs 'willpower', 'sex', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Play with them (<<will_cost>> Willpower)':
+				sexpartkno = 1
+				gs 'WorkHosp', 'randdoc'
+				$boy[1] = $boy
+				$boydesc[1] = $boydesc
+				if docfuck[randdoc] = 1:guy += 1
+				:docloop2
+				gs 'WorkHosp', 'randdoc'
+				if $boydesc = $boydesc[1]:docfuck[randdoc] -= 1 & jump 'docloop2'
+				if docfuck[randdoc] = 1:guy += 1
+				gs 'arousal', 'bj', 10, 'group'
+				gs 'arousal', 'vaginal', 10, 'group'
+				minut -= 10
+				gs 'willpower', 'pay', 'self'
+				gs 'arousal', 'end'
+				gs 'stat'
+				xgt 'sexdvoe', 'var'
+			end
+		else
+			act 'Play with them (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
 
 if $ARGS[0] = '2':
-	cla
-	*clr
+	*clr & cla
 	picrand = rand(13, 15)
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex11.jpg"></center>'
 	'A patient comes through the door and takes off his pants to show you his flaccid penis. He asks you to help him, as he can''t seem to get an erection and it''s causing him depression. You realize that it''s all just a silly game and that he hopes to fuck you, but you still feel sorry for him. You wonder what caused him to come up with this plan, and decide it might just be that he has no luck with girls, and if today is not his lucky day, he may jump out of the window.'
-	act 'Oust him':medcn_exp += rand (0,1) & gt 'WorkHosp', 'start'
-	act 'Give him what he wants':guy += 1 & gt 'sex', 'minet'
+	
+	act 'Oust him':
+		medcn_exp += rand (0,1) 
+		gt 'WorkHosp', 'start'
+	end
+	
+	gs 'willpower', 'sex', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Give him what he wants (<<will_cost>> Willpower)':
+			guy += 1
+			gs 'willpower', 'pay', 'self'
+			gt 'sex', 'minet'
+		end
+	else
+		act 'Give him what he wants (<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] = '3':
-	cla
-	*clr
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/hospsex12.jpg"></center>'
-	'A pretty patient comes into the room and the doctor tries to examine her.  Then she touches his trousers near his poorly hidden erection.  The doctor glances at you with a question in his eyes.'
+	'A pretty patient comes into the room and the doctor tries to examine her. Then she touches his trousers near his poorly hidden erection. The doctor glances at you with a question in his eyes.'
+	
 	act 'Ask if she actually needs treatment':medcn_exp += rand (0,1) & gt 'WorkHosp', 'start'
-     
-	act 'Play along':
-		guy += 1
-		girl += 1
-		lesbian += 1
-		picrand = 13
-		sexpartkno = 1
-		gs 'WorkHosp', 'randdoc'
-		if docfuck[randdoc] = 1:guy += 1
-		gt 'podrsex', 'suck'
-		gs 'arousal', 'cuni_give', 10, 'group'
-		gs 'arousal', 'vaginal', 10, 'group'
-		minut -= 10
-		gs 'arousal', 'end'
-		gs 'stat'
+    
+	gs 'willpower', 'sex', 'self'
+	if will_cost <= pcs_willpwr: 
+		act 'Play along (<<will_cost>> Willpower)':
+			guy += 1
+			girl += 1
+			lesbian += 1
+			picrand = 13
+			sexpartkno = 1
+			gs 'WorkHosp', 'randdoc'
+			if docfuck[randdoc] = 1:guy += 1
+			gt 'podrsex', 'suck'
+			gs 'arousal', 'cuni_give', 10, 'group'
+			gs 'arousal', 'vaginal', 10, 'group'
+			minut -= 10
+			gs 'willpower', 'pay', 'self'
+			gs 'arousal', 'end'
+			gs 'stat'
+		end
+	else
+		act 'Play along (<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/_body_image.qsrc

@@ -110,9 +110,9 @@ if $ARGS[0] = 'panties':
 			if pubestyle = 8: $RESULT = $pubeimage
 			if pubestyle ! 8: $RESULT = 'images/pc/body/pussy/spussy.jpg'
 		elseif pcs_pubes > 20 and pcs_pubes <= 25:
-			$RESULT = 'images/pc/body/pussy/hpussy.jpg'
-		elseif pcs_pubes > 25 and pcs_pubes <= 30:
 			$RESULT = 'images/pc/body/pussy/shave/s_bush1.jpg'
+		elseif pcs_pubes > 25 and pcs_pubes <= 30:
+			$RESULT = 'images/pc/body/pussy/hpussy.jpg'
 		elseif pcs_pubes >= 31:
 			$RESULT = 'images/pc/body/pussy/hrypussy.jpg'
 		end

locations/abduction.qsrc

@@ -49,12 +49,20 @@ if $ARGS[0] = 'abdRoomFirstChaining':
 	vitamin_bak = vitamin
 	kosmetica_bak = kosmetica
 	lipbalm_bak = lipbalm
+	tampon_bak = tampon
+	shampoo_bak = shampoo
+	stanok_bak = stanok
+	deodorant_bak = deodorant
 
 	painkiller = 0
 	prezik = 0
 	vitamin = 0
 	kosmetica = 0
 	lipbalm = 0
+	tampon = 0
+	shampoo = 0
+	stanok = 0
+	deodorant = 0
 
 	tabletkishot = rand(84,91)
 	shotdays = 84
@@ -230,16 +238,7 @@ if $ARGS[0] = 'abdExam2':
 	'"Now there, our little slave, we will make sure you are healthy and ready to be trained."'
 	'He injects all the solutions into you.'
 	'The examination is at an end. The doctor leaves, you are untied, blindfolded again and led back down into the basement.'
-	venera = 0
-	GerpesOnce = 0
-	Gerpes = 0
-	SifacOnce = 0
-	Sifilis = 0
-	TriperOnce = 0
-	Triper = 0
-	TriperOral = 0
-	KandidozOnce = 0
-	Kandidoz = 0
+	gs 'medical_din','healSTDs'
 
 	examed = 1
 	act 'Continue':gt 'abduction', 'abdRoom'
@@ -532,6 +531,10 @@ if $ARGS[0] = 'abdEscapeWindow3':
 	vitamin = vitamin_bak
 	kosmetica = kosmetica_bak
 	lipbalm = lipbalm_bak
+	tampon = tampon_bak
+	shampoo = shampoo_bak
+	stanok = stanok_bak
+	deodorant = deodorant_bak
 
 	act 'Turn and run the opposite direction':gt 'road'
 	act 'Run left':gt 'Nord'
@@ -635,20 +638,16 @@ if $ARGS[0] = 'abdFood':
 	act 'Look in the mirror': gt 'mirror', 'start'
 	if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
 	act 'Take a cold shower (0:15)':
-		cumspclnt = 1
-		gs 'cum_cleanup'
-		if pcs_sweat > 10: pcs_sweat = 10 + rand(0,4)
-
 		*clr & cla
 		menu_off = 1
-		shampoo -= 1
 		minut += 15
 		pcs_horny += 1
-		pcs_hairbsh = 0
-		pcs_makeup = 1
+		noShampoo = 1
+		dynamic $showerdin
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/shower1.jpg"></center>'
-		'The shower is cold but at least you got clean again...'
+		'The shower is cold and you don''t have any shampoo, but at least you got clean again...'
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 		act 'Get back':gt 'abduction', 'abdFood'
 	end
 	act 'Get back to your bed':gt 'abduction', 'abdRoom'
@@ -1055,6 +1054,10 @@ if $ARGS[0] = 'abdSoldSauna':
 	vitamin = vitamin_bak
 	kosmetica = kosmetica_bak
 	lipbalm = lipbalm_bak
+	tampon = tampon_bak
+	shampoo = shampoo_bak
+	stanok = stanok_bak
+	deodorant = deodorant_bak
 
 	act 'Continue':gt 'sauna', 'saunaroom'
 end

locations/albinaEv.qsrc

@@ -26,7 +26,7 @@ if albinaCar = 0:
 		gs 'stat'
 
 		'<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/23.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
 		'You ask Albina "Is this your car?"'
 		'Albina squirms, grimacing and answers in a contemptious tone "What? Of course not, this is my fathers car, I would never have bought this thing. The X5 is a car for those newly rich and not for decent people."'
 		'You shake your head, "Do you even have a drivers license?"'
@@ -59,10 +59,12 @@ if albinaCar = 0:
 					'"I''ve brought you an inobedient girl who knows too much about my dancing business."'
 					'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!'
-
-					if pcs_dom > 0:
-						act 'Jump behind the wheel':
+					
+					gs 'willpower', 'misc', 'self', 'hard'
+					if will_cost <= pcs_willpwr:
+						act 'Jump behind the wheel (<<will_cost>> Willpower)':
 							*clr & cla
+							gs 'willpower', 'pay', 'self'
 							minut += 5
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/event/bmw.jpg"></center>'
@@ -103,6 +105,8 @@ if albinaCar = 0:
 								dynamic $din_albina_get_over_car
 							end
 						end
+					else
+						act 'Jump behind the wheel (<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 out of the car':

locations/albinaRide.qsrc

@@ -4,7 +4,7 @@ menu_off = 1
 albrideday = daystart
 gs 'stat'
 '<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
-'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/23.jpg"></center>'
+'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
 'Albina smiles at you and says, "Let''s go to my place and talk."'
 
 act 'Go with Albina':

locations/albinahome.qsrc

@@ -1,4 +1,5 @@
 # albinahome
+
 CLOSE ALL
 
 if $ARGS[0] = 'start' or $ARGS[0] = '':
@@ -6,147 +7,160 @@ if $ARGS[0] = 'start' or $ARGS[0] = '':
 	*clr & cla
 	menu_off = 1
 	frost = 0
+	albroom = rand(1,2)
 	gs 'stat'
-
 	'<center><b><font color="maroon"><<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>></font></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/23.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
 	''
+	if hour >= 20 and week >= 5 and week < 7:
+		'Albina says that she wants to go to the disco.'
 
-	if hour < 20:
-		if npcSex[23] = 0:
-			'Albina smiles at you affably and says, "<<$pcs_firstname>> I have a bottle of fine wine here, let''s drink."'
-
-			act 'Drink':
+		act 'Say goodbye and go home':gt 'pavResidential'
+		if money >= 25: act 'Go to the disco':money -= 25 & minut += 15 & gt 'gdkin'
+	elseif hour < 20 and npc_sex['A23'] = 0:
+		'Albina smiles at you affably and says, "<<$pcs_firstname>> I have a bottle of fine wine here, let''s drink."'
+		act 'Drink':
+			*clr & cla
+			minut += 15
+			gs 'drugs', 'alcohol', 'wine'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
+			'You sat down at the table while Albina grabs a bottle of wine. She deftly opens the bottle and pours wine in two glasses.'
+			'You drink together with Albina. She smiles and says "Once again, you warned me. They still have a case on me, but they''ll have to work very hard to get enough evidence.'
+			'My father is of course not very happy. His political career was doomed to fail anyway, regardless of what I did or didn''t do."'
+			act 'Ask her how her father reacted when he learned of her business':
 				*clr & cla
 				minut += 15
 				gs 'drugs', 'alcohol', 'wine'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-				'You sat down at the table while Albina grabs a bottle of wine. She deftly opens the bottle and pours wine in two glasses.'
-				'You drink together with Albina. She smiles and says "Once again, you warned me. They still have a case on me, but they''ll have to work very hard to get enough evidence.'
-				'My father is of course not very happy. His political career was doomed to fail anyway, regardless of what I did or didn''t do."'
-
-				act 'Ask her how her father reacted when he learned of her business':
+				'You ask Albina "And how did he react when he found out about your business?"'
+				'Albina laughs and pours more wine in both glasses. "He knew from the beginning."'
+				'Surprised, you look at Albina and ask "How do you know?"'
+				'Laughing, Albina answers "I have a very strange little family, so it''s perhaps not easy for you to understand. Let''s have another drink."'
+				'You sit quietly for a while, sipping on your wine and thinking about what Albina has just told you.'
+				'Suddenly, Albina says: "Actually, my dad is a bastard. If there is a hell, my dad has a special place reserved for him there to atone for what he''s done."'
+				act 'Ask her what she''s talking about':
 					*clr & cla
 					minut += 15
 					gs 'drugs', 'alcohol', 'wine'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-					'You ask Albina "And how did he react when he found out about your business?"'
-					'Albina laughs and pours more wine in both glasses. "He knew from the beginning."'
-					'Surprised, you look at Albina and ask "How do you know?"'
-					'Laughing, Albina answers "I have a very strange little family, so it''s perhaps not easy for you to understand. Let''s have another drink."'
-					'You sit quietly for a while, sipping on your wine and thinking about what Albina has just told you.'
-					'Suddenly, Albina says: "Actually, my dad is a bastard. If there is a hell, my dad has a special place reserved for him there to atone for what he''s done."'
-
-					act 'Ask her what she''s talking about':
+					'You shake your head in amazement, "What are you talking about?"'
+					'Albina suddenly sobers up and her face turns dark and grim. With a hiss she answers:'
+					'"Fine, you want to get into the belly of the beast, be my guest.'
+					'My dad has raped and abused me from an early age, I don''t even remember when it all began. I''ve spent my entire life being his plaything.'
+					'When my mother found out, my bastard father went to Durkee. Yes, he even had some connections there.'
+					*nl
+					'The truth is now the scum is losing ground constantly. All his life he was a senior cop, but now that he is retired he doesn''t have any money left. All his businesses went bankrupt.'
+					'His political career is his last chance to get back to where he once was." She stops talking for a few seconds to pour more wine in the glasses, and as she does you can clearly see her hands shaking violently. "You see this rich house? Guard at the entrance, expensive furniture, all this luxury? It''s all a charade. My father isn''t even on the verge of bankruptcy, he is already far beyond. Without my business bringing in money, we would be begging for scraps and sleeping under bridges."'
+
+					act 'Ask her how she knows her father is bankrupt':
 						*clr & cla
 						minut += 15
 						gs 'drugs', 'alcohol', 'wine'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-						'You shake your head in amazement, "What are you talking about?"'
-						'Albina suddenly sobers up and her face turns dark and grim. With a hiss she answers:'
-						'"Fine, you want to get into the belly of the beast, be my guest.'
-						'My dad has raped and abused me from an early age, I don''t even remember when it all began. I''ve spent my entire life being his plaything.'
-						'When my mother found out, my bastard father went to Durkee. Yes, he even had some connections there.'
-						'The truth is now the scum is losing ground constantly. All his life he was a senior cop, but now that he is retired he doesn''t have any money left. All his businesses went bankrupt.'
-						'His political career is his last chance to get back to where he once was." She stops talking for a few seconds to pour more wine in the glasses, and as she does you can clearly see her hands shaking violently. "You see this rich house? Guard at the entrance, expensive furniture, all this luxury? It''s all a charade. My father isn''t even on the verge of bankruptcy, he is already far beyond. Without my business bringing in money, we would be begging for scraps and sleeping under bridges."'
+						'You asked Albina "How do you know your fathers businesses are bankrupt?"'
+						'Albina shrugged "I''m just guessing. Dad poured all our assets into his election campaign. We still have some money left, but not much. And now it''s over. My business is gone, and so is his political career. There is only a mountain of debts and bad creditors."'
+						'She grabs the bottle and pours more wine.'
 
-						act 'Ask her how she knows her father is bankrupt':
+						act 'Tell Albina that you didn''t get the whole picture':
 							*clr & cla
 							minut += 15
 							gs 'drugs', 'alcohol', 'wine'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-							'You asked Albina "How do you know your fathers businesses are bankrupt?"'
-							'Albina shrugged "I''m just guessing. Dad poured all our assets into his election campaign. We still have some money left, but not much. And now it''s over. My business is gone, and so is his political career. There is only a mountain of debts and bad creditors."'
-							'She grabs the bottle and pours more wine.'
+							'You murmur "I''m not quite sure I understand everything."'
+							'Albina smirks and says, "What is there to understand. Dad is a pedophile and fucked me ever since I was a child. His connections were enough to cover his tracks."'
+							'She paused and added, "The worst part is, he made me a monster. I just have not had a chance to grow up like a normal person.'
+							'I understand all this, but there''s nothing I can do about it. I like to fuck, and I don''t care with whom. I''m down and out, a pervert not quite capable of being a normal mother and wife."'
+							'The always cold and ironic Albina has tears in her eyes as she pours more wine into your glasses.'
 
-							act 'Tell Albina that you didn''t get the whole picture':
+							act 'Drink':
 								*clr & cla
 								minut += 15
 								gs 'drugs', 'alcohol', 'wine'
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-								'You murmur "I''m not quite sure I understand everything."'
-								'Albina smirks and says, "What is there to understand. Dad is a pedophile and fucked me ever since I was a child. His connections were enough to cover his tracks."'
-								'She paused and added, "The worst part is, he made me a monster. I just have not had a chance to grow up like a normal person.'
-								'I understand all this, but there''s nothing I can do about it. I like to fuck, and I don''t care with whom. I''m down and out, a pervert not quite capable of being a normal mother and wife."'
-								'The always cold and ironic Albina has tears in her eyes as she pours more wine into your glasses.'
-
-								act 'Drink':
+								'Once again you sit quietly for a while, sipping your wine.'
+								'After a while Albina speaks again. "Sorry about getting all bleedy. I''m just tired of it all. Anyone would be in this backwater town. Everyone is a bigot here. They all want to shove their dicks down your throat and face-fuck you. But the men rarely want to use their tongues, they just want to get in your pants without permission or excuse. You feel like a piece of meat. And most don''t know anything about giving pleasure, although they all have an ego the size of a planet. And kissing! Almost no one knows how to kiss properly."'
+								'She smiles as she tilts her head towards your face.'
+								gs 'willpower', 'cuni', 'resist', 'medium'
+								if will_cost <= pcs_willpwr:
+									act 'Pull away (<<will_cost>> Willpower)':
+										*clr & cla
+										minut += 5
+										npc_rel['A23'] -= 5
+										gs 'willpower', 'pay', 'resist'
+										gs 'drugs', 'alcohol', 'wine'
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
+										'You pull away from her, not wanting to kiss her. "Sorry I just..." She places her finger to your lips to stop you.'
+										'"It''s ok <<$pcs_nickname>>." You continue to drink some wine but now things feel a little akward and once you finish your glass of wine you put the empty glass down.'
+										'"I should really get going, I''m sorry, I wish I could help." Albina nods her head in understanding. "I will see you later ok?" You tell her.'
+										'She smiles. "Of course, <<$pcs_nickname>>." Then you get up and leave her house.'
+										
+										act 'Continue':gt 'pavResidential'
+									end
+								else
+									act 'Pull 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 'Kiss her':
 									*clr & cla
-									minut += 15
-									gs 'drugs', 'alcohol', 'wine'
+									npc_rel['A23'] += 2
+									gs 'stat'
+									'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss2.jpg"></center>'
+									'Unsure if it''s the alcohol or just the fact that she''s so beautiful, you lean towards Albina and pucker your lips.'
+									'She gives you a hot and tender kiss on the lips, and you feel your excitement growing as your skin becomes flush with heat.'
+									gs 'arousal', 'kiss', 2
 									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-									'Once again you sit quietly for a while, sipping your wine.'
-									'After a while Albina speaks again. "Sorry about getting all bleedy. I''m just tired of it all.'
-									'Anyone would be in this backwater town. Everyone is a bigot here. They all want to shove their dicks down your throat and face-fuck you.'
-									'But the men rarely want to use their tongues, they just want to get in your pants without permission or excuse. You feel like a piece of meat.'
-									'And most don''t know anything about giving pleasure, although they all have an ego the size of a planet.'
-									'And kissing! Almost no one knows how to kiss properly."'
-									'She smiles as she tilts her head towards your face.'
-
 									act 'Kiss':
 										*clr & cla
 										gs 'stat'
-										'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss2.jpg"></center>'
-										'Unsure if it''s the alcohol or just the fact that she''s so beautiful, you lean towards Albina and pucker your lips.'
-										'She gives you a hot and tender kiss on the lips, and you feel your excitement growing as your skin becomes flush with heat.'
-										gs 'arousal', 'kiss', 5
+										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/kiss2.jpg"></center>'
+										'As you continue kissing Albina, you feel her hand slowly working its way up your inner thigh.'
+										'Reaching your crotch, she moves it gently over the front of your panties before slowly sliding your panties to the side.'
+										'As her fingers begin exploring your pussy, you moan into her mouth and move your hips to give her easier access.'
+										gs 'arousal', 'kiss', 2
+										gs 'arousal', 'vaginal_finger', 2
+										minut -= 5
 										gs 'stat'
-
 										act 'Kiss':
 											*clr & cla
 											gs 'stat'
-											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/kiss2.jpg"></center>'
-											'As you continue kissing Albina, you feel her hand slowly working its way up your inner thigh.'
-											'Reaching your crotch, she moves it gently over the front of your panties before slowly sliding your panties to the side.'
-											'As her fingers begin exploring your pussy, you moan into her mouth and move your hips to give her easier access.'
+											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/kiss3.jpg"></center>'
+											'Without breaking your kiss, Albina slowly inserts a finger in your wet vagina, and a rush of pleasure runs through your body.'
+											'As her finger caresses the inside of your pussy, it creates a wet, sloppy sound.'
+											'Albina''s free hand slowly works its way down your body, stopping only to lightly pinch your nipples through your clothing.'
+											'When her hand makes its way down to your legs, she gently pushes them further apart.'
 											gs 'arousal', 'kiss', 5
 											gs 'arousal', 'vaginal_finger', 5
 											minut -= 5
 											gs 'stat'
-
-											act 'Kiss':
+												
+											act 'Spread your legs':
 												*clr & cla
+												if npc_sex['A23'] = 0: npc_sex['A23'] = 1 & girl += 1
+												lesbian += 1
 												gs 'stat'
-												'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/kiss3.jpg"></center>'
-												'Without breaking your kiss, Albina slowly inserts a finger in your wet vagina, and a rush of pleasure runs through your body.'
-												'As her finger caresses the inside of your pussy, it creates a wet, sloppy sound.'
-												'Albina''s free hand slowly works its way down your body, stopping only to lightly pinch your nipples through your clothing.'
-												'When her hand makes its way down to your legs, she gently pushes them further apart.'
-												gs 'arousal', 'kiss', 5
-												gs 'arousal', 'vaginal_finger', 5
-												minut -= 5
-												gs 'stat'
+												'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lesb.jpg"></center>'
+												'Kneeling down in front of you, Albina begins trailing kisses up your inner thigh.'
+												'As she gets closer and closer to your pussy, you move one hand up to your breasts and begin kneading and pulling on your nipples.'
+												'Soon you feel the warm touch of her lips on your labia, and shudder with pleasure as her tongue finds its way to your clitoris.'
+												*nl
+												'Moaning, you feel a fire begin to burn in your abdomen and you buck your hips to get Albina''s face buried in your pussy.'
+												'Then an intense pleasure overtakes you, and you momentarily lose control of your body. Moaning loudly, you grab hold of Albina''s hair as an intense orgasm washes over you.'
+												'During your orgasm, you black out for a few seconds and when you regain your senses you find yourself sitting next Albina, who''s smiling prettily.'
 												
-												act 'Further':
-													*clr & cla
-
-													if npcSex[23] = 0:npcSex[23] = 1 & girl += 1
-
-													lesbian += 1
-													gs 'stat'
-													'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lesb.jpg"></center>'
-													'Kneeling down in front of you, Albina begins trailing kisses up your inner thigh.'
-													'As she gets closer and closer to your pussy, you move one hand up to your breasts and begin kneading and pulling on your nipples.'
-													'Soon you feel the warm touch of her lips on your labia, and shudder with pleasure as her tongue finds its way to your clitoris.'
-													'Moaning, you feel a fire begin to burn in your abdomen and you buck your hips to get Albina''s face buried in your pussy.'
-													'Then an intense pleasure overtakes you, and you momentarily lose control of your body. Moaning loudly, you grab hold of Albina''s hair as an intense orgasm washes over you.'
-													'During your orgasm, you black out for a few seconds and when you regain your senses you find yourself sitting next Albina, who''s smiling prettily.'
-													
-													gs 'arousal', 'kiss', 30
-													$orgasm_or = 'yes'
-													gs 'arousal', 'cuni', 30
-													gs 'arousal', 'end'
-													minut -= 30
-													gs 'stat'
+												gs 'arousal', 'kiss', 30
+												$orgasm_or = 'yes'
+												gs 'arousal', 'cuni', 30
+												gs 'arousal', 'end'
+												minut -= 30
+												gs 'stat'
 													
-													act 'Say goodbye and go home':gt 'pavResidential'
-												end
+												act 'Say goodbye and go home':gt 'pavResidential'
 											end
 										end
 									end
@@ -156,246 +170,152 @@ if $ARGS[0] = 'start' or $ARGS[0] = '':
 					end
 				end
 			end
+		end
+	elseif albroom = 1
+		if albsporthome = 0:
+			*clr & cla
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/train.jpg"></center>'
+			'Albina is training in her room, doing some stretching exercises.'
+			act 'Ask why she doesn''t train at the gym.':
+				*clr & cla
+				albsporthome = 1
+				minut += 15
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big23.jpg"></center>'
+				'Albina smiles at you and says, "I can''t afford to pay the gym, so I have to exercise at home if I want to stay in shape.'
+				'By the way, I could teach you to about stripping and poledancing if you want."'
+				act 'Tell Albina that you don''t want to.':albsportday = daystart & gt 'albinahome'
+				act 'Teach me stripping': gt 'albinahome', 'stripping'
+				act 'Teach me poledancing': gt 'albinahome', 'poledancing'
+			end
 		else
-			if albsporthome = 0:
+			if albsportday ! daystart:
 				*clr & cla
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/train.jpg"></center>'
 				'Albina is training in her room, doing some stretching exercises.'
-
-				act 'Chat':
-					*clr & cla
-					albsporthome = 1
-					minut += 15
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/23.jpg"></center>'
-					'Albina smiles at you and says, "I can''t afford to pay the gym, so I have to exercise at home if I want to stay in shape.'
-					'By the way, I could teach you to about stripping and poledancing if you want."'
-
-					act 'Further':gt 'albinahome'
-				end
-			else
-				if albsportday ! daystart:
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/train.jpg"></center>'
-					'Albina is training in her room, doing some stretching exercises.'
-					'She smiles at you and asks "Well? Want me to teach you?"'
-
-					act 'Learn striptease (2:00)':
-						cla
-						*clr
-						albsportday = daystart
-						minut += 120
-						fat -= 5
-						agil_exp += rand (1, 3)
-						pcs_mood -= 8
-						pcs_sweat += 30
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/stripdance.jpg"></center>'
-						if pcs_inhib < 60:inhib_exp += rand(2,3)
-
-						if pcs_danc >= 40:
-							dancero_exp += rand(2, 10)
-							'Albina taught you how to passionately dance to the music while stripping.'
-
-							if pcs_dancero >= 100:'But you could not learn anything new, you already know everything she could teach you.'
-						else
-							danc_exp += rand(5, 15)
-							'Striptease is too complex for you, you''re not able to dance and strip at the same time.'
-							'Albina recommends that you start with learning to dance.'
-						end
-
-						act 'Rest':gt 'albinahome'
-					end
-					if pcs_stren >= 40 and pcs_dancero > 50:
-						act 'Learn poledancing (2:00)':
-							cla
-							*clr
-							albsportday = daystart
-							if pcs_inhib < 60:inhib_exp += rand(2,3)
-							timemult = 8
-							loopcount = 1
-							:timeloop1
-							gs 'exercise', 'tier2', 0, 'stren_exp', 'vital_exp', 'dancpol_exp'
-							if loopcount < timemult: loopcount += 1 & jump 'timeloop1'
-							loopcount = 0
-							timemult = 0
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/poledance.jpg"></center>'
-
-							'Albina taught you various acrobatic moves on the pole.'
-
-							if pcs_dancpol >= 100:
-								'You could not learn anything new, you already know everything she could teach you.'
-							end
-
-							act 'Rest':gt 'albinahome'
-						end
-					elseif pcs_stren < 40:
-						'Albina grins "You''re still too weak for poledancing, we can practice developing your strength instead."'
-
-						act 'Develop strength (2:00)':
-							*clr & cla
-							albsportday = daystart
-							timemult = 8
-							loopcount = 1
-							:timeloop2
-							gs 'exercise', 'tier2', 0, 'stren_exp', 'vital_exp'
-							if loopcount < timemult: loopcount += 1 & jump 'timeloop2'
-							loopcount = 0
-							timemult = 0
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/stren.jpg"></center>'
-							'Albina shows you how to develop your strength using various exercises.'
-
-							act 'Rest':gt 'albinahome'
-						end
-					end
-
-					act 'Tell Albina that you are not in the mood':albsportday = daystart & gt 'albinahome'
-				elseif albsportday = daystart:
-					if pcs_sweat <= 20:
-						if pcs_hairbsh <= 0:
-							pcs_hairbsh = 1
-							gs 'stat'
-							'Looking at your tousled hair, Albina smiles, picks up a comb and proceeds to do your hair.'
-						end
-
-						if albdinday ! daystart:
-							albdinday = daystart
-							temp = rand(0, 3)
-
-							if temp = 0:
-								'Albina offers to play a video game.'
-
-								gt 'albinahome', 'game'
-							elseif temp = 1:
-								'Albina offers to try on clothes with her.'
-
-								gt 'albinahome', 'dressing'
-							elseif temp = 2:
-								'Albina offers to chat.'
-
-								gt 'albinahome', 'chat'
-							else
-								'Albina offers a glass of wine.'
-
-								gt 'albinahome', 'vine'
-							end
-						end
-					elseif pcs_sweat > 20:
-						'Albina grins and says, "Go take a shower <<$pcs_nickname>>, you are all sweaty now."'
-
-						act 'Get in the shower (0:15)':
-							*clr & cla
-							dynamic $showerdin
-							minut += 15
-							! WD: Remove old Cheat code
-							pcs_horny += 1
-							pcs_hairbsh = 0
-							pcs_makeup = 1
-							if frost > 0:frost = 0
-
-							gs 'stat'
-							'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
-							'You get in the shower and begin to lather your body with a washcloth, and then shampoo your hair.'
-							'After washing off the soap and rinsing off the shampoo you feel completely clean.'
-
-							act 'Get out of the shower':gt 'albinahome'
-						end
-					end
-				end
+				'She smiles at you and asks "Well? Want me to teach you?"'
+				act 'Tell Albina that you don''t want to.':albsportday = daystart & gt 'albinahome'
+				act 'Teach me stripping': gt 'albinahome', 'stripping'
+				act 'Teach me poledancing': gt 'albinahome', 'poledancing'
 			end
 		end
+	elseif albroom = 2
+		*clr & cla
+		menu_off = 1
+		minut += 5
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'You find Albina sitting on her bed when you enter her room, as you walk over you take a seat next to her and start chatting to her about the stuff you both experienced since you last spoke.'
+		act 'Say goodbye and go home':gt 'pavResidential'
+		act 'Just chat': gt 'albinahome', 'chat'
+		act 'Talk about video games': gt 'albinahome', 'game'
+		act 'Talk about clothes': gt 'albinahome', 'dressing'
 	end
+end
 
-	if hour >= 20 and week >= 5 and week < 7:
-		'Albina says that she wants to go to the disco.'
-
-		if money >= 25:act 'Go to the disco':money -= 25 & minut += 15 & gt 'gdkin'
+if $ARGS[0] = 'stripping':
+	*clr & cla
+	albsportday = daystart
+	minut += 120
+	fat -= 5
+	agil_exp += rand (1, 3)
+	npc_rel['A23'] += 1
+	gs 'sweat', 'add', 30
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/stripdance.jpg"></center>'
+	if pcs_inhib < 60:inhib_exp += rand(2,3)
+
+	if pcs_danc >= 40:
+		dancero_exp += rand(2, 10)
+		'Albina taught you how to passionately dance to the music while stripping.'
+
+		if pcs_dancero >= 100:'But you could not learn anything new, you already know everything she could teach you.'
+	else
+		danc_exp += rand(5, 15)
+		'Striptease is too complex for you, you''re not able to dance and strip at the same time.'
+		'Albina recommends that you start with learning to dance.'
 	end
-
 	act 'Say goodbye and go home':gt 'pavResidential'
+	act 'Rest':gt 'albinahome'
 end
 
-if $ARGS[0] = 'game':
-	act 'Play':
-		*clr & cla
-		menu_off = 1
-		minut += 60
-		pcs_mood += 15
-		pcs_willpwr += 20
-		react_exp += rand(0, 1)
+if $ARGS[0] = 'poledancing':
+	*clr & cla
+	albsportday = daystart
+	npc_rel['A23'] += 1
+	if pcs_stren >= 40 and pcs_dancero > 50:
+		if pcs_inhib < 60:inhib_exp += rand(2,3)
+		timemult = 8
+		loopcount = 1
+		:timeloop1
+		gs 'exercise', 'tier2', 0, 'stren_exp', 'vital_exp', 'dancpol_exp'
+		if loopcount < timemult: loopcount += 1 & jump 'timeloop1'
+		loopcount = 0
+		timemult = 0
 		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/poledance.jpg"></center>'
+		'Albina taught you various acrobatic moves on the pole.'
+		if pcs_dancpol >= 100: 'You could not learn anything new, you already know everything she could teach you.'
 
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/game.jpg"></center>'
-		'You and Albina laid down in front of a huge TV with a set-top box.'
-		'Albina turned on the game and you started playing together with her.'
-
-		if albsexday = daystart:
+		act 'Say goodbye and go home':gt 'pavResidential'
+		act 'Rest':gt 'albinahome'
+	elseif pcs_stren < 40 and pcs_dancero > 50:		
+		'Albina grins "You''re still too weak for poledancing, we can practice developing your strength instead."'
+		act 'Develop strength (2:00)':
+			*clr & cla
+			timemult = 8
+			loopcount = 1
+			:timeloop2
+			gs 'exercise', 'tier2', 0, 'stren_exp', 'vital_exp'
+			if loopcount < timemult: loopcount += 1 & jump 'timeloop2'
+			loopcount = 0
+			timemult = 0
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/stren.jpg"></center>'
+			'Albina shows you how to develop your strength using various exercises.'
 			act 'Rest':gt 'albinahome'
+			act 'Say goodbye and go home':gt 'pavResidential'
+		end
+	else		
+		minut += 120
+		fat -= 5
+		agil_exp += rand (1, 3)
+		gs 'sweat', 'add', 30
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/stripdance.jpg"></center>'
+		if pcs_inhib < 60:inhib_exp += rand(2,3)
+		'Albina grins "You''re still can''t strip well enough for poledancing, we should practice that first."'
+		if pcs_danc >= 40:
+			dancero_exp += rand(2, 10)
+			'Albina taught you how to passionately dance to the music while stripping.'
+
+			if pcs_dancero >= 100:'But you could not learn anything new, you already know everything she could teach you.'
 		else
-			'Albina winks at you and says "<<$pcs_firstname>>, let''s have a wager. If I win, I can do anything I want with you, and if you win you can do anything you want with me"'
-
-			act 'Refuse':gt 'albinahome'
-
-			act 'Bring it on':
-				*clr & cla
-				albsexday = daystart
-
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/game.jpg"></center>'
-
-				temp = rand(1, 100)
-				if pcs_react >= 75 and temp >= 40:
-					albplay = 1
-				elseif pcs_react >= 50 and temp >= 50:
-					albplay = 1
-				elseif pcs_react >= 25 and temp >= 75:
-					albplay = 1
-				else
-					albplay = 0
-				end
-
-				if albplay = 0:
-					'Although you tried your best, Albina proved a worthy opponent. Laughing like the villain of a theater play, she slaps you on the ass with the palm of her hand, saying "Show me your ass, <<$pcs_firstname>>! You are my bitch now!"'
-
-					if rand(0, 1) = 0:
-						gt 'albinahome', 'vag_strapon'
-					else
-						gt 'albinahome', 'anal_strapon'
-					end
-				else
-
-					'Looking slightly disappointed, Albina hands you a strap-on. "On, Bey do not regret Chapaya."'
-
-					gt 'albinahome', 'akt_vag'
-					gt 'albinahome', 'akt_anal'
-				end
-			end
+			danc_exp += rand(5, 15)
+			'Striptease is too complex for you, you''re not able to dance and strip at the same time.'
+			'Albina recommends that you start with learning to dance.'
 		end
+		act 'Say goodbye and go home':gt 'pavResidential'
+		act 'Rest':gt 'albinahome'
 	end
 end
 
-
 if $ARGS[0] = 'dressing':
 	act 'Go try on some clothes':
 		*clr & cla
 		minut += 60
-		pcs_mood += 20
-		pcs_willpwr += 20
+		pcs_mood += 10
+		pcs_willpwr += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/dressing.jpg"></center>'
 		'You and Albina open her huge wardrobe and begin digging into her various dresses.'
 		'As you rummage around in her wardrobe, you are amazed by how many different clothes she can fit in there. It feels like her wardrobe is a bottomless pit filled with dresses, leggings, jeans, and all kinds of other clothes!'
 		'You end up spending an hour trying on various dresses with Albina.'
-
-		if albsexday ! daystart:
-			act 'Rest':gt 'albinahome'
-		elseif albsexday = daystart:
-			act 'Rest':gt 'albinahome'
-		end
+		act 'Say goodbye and go home':gt 'pavResidential'
+		act 'Chat some': gt 'albinahome', 'chat'
+		act 'Talk about video games': gt 'albinahome', 'game'
 	end
 end
 
@@ -403,132 +323,322 @@ if $ARGS[0] = 'chat':
 	act 'Chat':
 		*clr & cla
 		menu_off = 1
-		minut += 60
-		pcs_mood += 10
-		pcs_willpwr += 20
+		minut += 20
+		pcs_mood += 5
+		pcs_willpwr += 5
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-		'You chat with Albina.'
-
-		if albsexday ! daystart:
-			act 'Rest':gt 'albinahome'
-		elseif albsexday = daystart:
-			act 'Rest':gt 'albinahome'
-		end
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'You chat with Albina about school, love interest, family, makeup up, even the latest tv shows or movies you have watched.'
+		act 'Say goodbye and go home':gt 'pavResidential'
+		act 'Keep chatting': gt 'albinahome', 'chat'
+		act 'Talk about video games': gt 'albinahome', 'game'
+		act 'Talk about clothes': gt 'albinahome', 'dressing'
 	end
 end
 
-if $ARGS[0] = 'vine':
-	act 'Drink wine':
+if $ARGS[0] = 'game':
+	*clr & cla
+	menu_off = 1
+	minut += 2
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+	'Having noticed the big flat screen tv and both a x-box and playstation in front of it, with a rows of video games just under the tv you decide to comment on it. "You have a lot of games, I wish I could afford a console."'
+	'She smiles to you. "Do you want to play some?"'
+	act 'No':
 		*clr & cla
 		menu_off = 1
-		minut += 60
-		gs 'drugs', 'alcohol', 'wine'
+		minut += 2
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/drink_wine.jpg"></center>'
-		'You drink a glass of wine with Albina.'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'You shake your head no. "Not right now, thanks. I was just noticed all of them is all, maybe some other time."'
+		'She shrugs. "Sure if you ever want to, all you have to do is ask."'
+		act 'Say goodbye and go home':gt 'pavResidential'
+		act 'Just chat': gt 'albinahome', 'chat'
+		act 'Talk about clothes': gt 'albinahome', 'dressing'
+	end
+	act 'Yes':
+		*clr & cla
+		menu_off = 1
+		minut += 30
+		pcs_mood += 15
+		react_exp += rand(0, 1)
+		pcs_gaming_exp += rand(1, 2)
+		npc_rel['A23'] += 1
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/game.jpg"></center>'
+		if gamebet = 1:
+			'You and Albina lay down in front of a huge flat screen TV, after picking one of the games. She turns towards you and gives you a grin. "Feel like putting your ass on the line and betting again?"'
+			act 'Accept the bet': gt 'albinahome', 'game_bet'
+			gs 'willpower', 'sex', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse the bet (<<will_cost>> Willpower)':
+					*clr & cla
+					menu_off = 1
+					minut += 60
+					pcs_mood += 15
+					react_exp += rand(0, 1)
+					pcs_gaming_exp += rand(1, 2)
+					npc_rel['A23'] -= 1
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'You shake your head no. "Not this time, maybe next time.."'
+					'You can tell she is a little disappointed, but then turns her attention to the game instead. "You are so going to lose this time." With that the two of you play games for awhile though things are a little awkward after you turned down her offer. After about another hour of games, Albina stops. "Well I had fun but there is some stuff I need to take care of." She says as she turns the game system off.'
+					'Getting the hint you get up as well. "Yeah I should probably get going myself." You exchange a brief hug before you leave.'
+					act 'Say goodbye and go home':gt 'pavResidential'
+				end
+			else
+				act 'Refuse the bet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else
+			'You and Albina lay down in front of a huge flat screen TV, after picking one of the games. The two of you play as you chat about varies things and trash talk, though neither one of you is giving your full attention to the game, instead you are just having fun together.'
+			act 'Say goodbye and go home':gt 'pavResidential'
+			act 'Keep playing video games': gt 'albinahome', 'playgame'
+			act 'Just chat': gt 'albinahome', 'chat'
+			act 'Talk about clothes': gt 'albinahome', 'dressing'
+		end
+	end
+end
 
-		if albsexday ! daystart:
-			act 'Rest':gt 'albinahome'
-		elseif albsexday = daystart:
-			act 'Rest':gt 'albinahome'
+if $ARGS[0] = 'playgame':
+	*clr & cla
+	menu_off = 1
+	minut += 30
+	pcs_mood += 15
+	react_exp += rand(0, 1)
+	pcs_gaming_exp += rand(1, 2)
+	npc_rel['A23'] += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/game.jpg"></center>'
+	'The two of you keep playing video games and trash talking each other, even bumping each other to try and screw the other one up, but neither of you are still taking it all that seriously though. Mostly you just laugh at the silly mistakes you both make while only partially paying attention to the game.'
+	if hotcat >= 5:
+		'Once you finished the last game. Albina turns towards you instead of starting another one. "How about we see who is actually better and actually try and win." She says with a confident smile.'
+		'You laugh at that and nods. "Sure but you are so going down."'
+		'She laughs in response. "You''re that sure? Then how about we make it interesting then?"'
+		'You arch you brow a bit curious. "Just what do you have in mind?"'
+		'She gives you a big grin, then gets up and goes over to her dresser and rummages around in it for a moment before lifting out a strapon harness with a attached dildo. "The winner gets to use this on the loser how ever they want."'
+		
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse the bet (<<will_cost>> Willpower)':
+				*clr & cla
+				menu_off = 1
+				minut += 60
+				pcs_mood += 15
+				react_exp += rand(0, 1)
+				pcs_gaming_exp += rand(1, 2)
+				npc_rel['A23'] -= 2
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'You shake your head no. "Uh that''s ok. I really am not intersted in that."'
+				'Albina puts the strapon away, but you can tell she is a little disappointed. Then she comes back over and lays down beside you again. "You are so going to lose this time." With that the two of you play games for awhile though things are a little awkward after you turned down her offer. After about another hour of games, Albina stops. "Well I had fun but there is some stuff I need to take care of." She says as she turns the game system off.'
+				'Getting the hint you get up as well. "Yeah I should probably get going myself." You exchange a brief hug before you leave.'
+				act 'Say goodbye and go home':gt 'pavResidential'
+			end
+		else
+			act 'Refuse the bet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
+		act 'Accept the bet': gt 'albinahome', 'game_bet'
+	else
+		'Albina turns to you. "So want to lose again?"'
+		'You shove her gently. "Oh please I was winning."'
+		act 'Keep playing video games': gt 'albinahome', 'playgame'
+		act 'Just chat': gt 'albinahome', 'chat'
+		act 'Talk about clothes': gt 'albinahome', 'dressing'
+		act 'Say goodbye and go home':gt 'pavResidential'	
 	end
 end
 
-if $ARGS[0] = 'vag_strapon':
-	act 'Get on all fours':
+if $ARGS[0] = 'game_bet':
+	*clr & cla
+	menu_off = 1
+	gamebet = 1
+	minut += 30
+	pcs_mood += 15
+	react_exp += rand(0, 1)
+	pcs_gaming_exp += rand(1, 2)
+	npc_rel['A23'] += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/game.jpg"></center>'
+	'You give her your most confident look. "You''re on and you are so going to get fucked."'
+	'Albina laughs at that as she brings the strapon over and a bottle of lube, playing it on the floor, as she lays back down beside you and picks the control up. "Please you are so going to lose." She starts the game and you both focus on just the game trying as hard as you both can to be the winner.'
+	act 'Play until someone wins':
 		*clr & cla
 		menu_off = 1
-		albsexday = daystart
-		gs 'boystat', 'A23'
-
-		if pcs_vag < 10:gs 'boyStat', 'D1'
-		if pcs_vag >= 10:gs 'boyStat', 'D<<pcs_vag/7>>'
-		npc_sex['A23'] += 1
-		lesbian += 1
-		straponVagPass += 1
+		gameresult = rand(1, 100) + pcs_gaming
+		if gameresult >= 150:
+			albplay = 3
+		elseif gameresult  >= 100:
+			albplay = 2
+		elseif gameresult  >= 75:
+			albplay = 1
+		else
+			albplay = 0
+		end
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/strapon.jpg"></center>'
-		'Albina takes a <<dick>> cm strap-on harness and attaches it to herself.'
-		'Having strapped herself in, you feel her hands gently stroking the inside of your thighs, slowly working their way to your pussy.'
-		gs 'dinsex2', 'd_strapon_vag', 15, 'sub', 'lesbian'
-		act 'Rest':gt 'albinahome'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/game.jpg"></center>'
+		if albplay = 3:
+			'You complete trounce her, she isn''t even close to you in score. Before the end she finally gives a exacerbated sigh and tosses the control down giving up, knowing she has no chance of beating you, you give her a gloating smirk. She reaches over and grabs the strapon harness and hands it to you. You grin as you start putting the harness on and she starts taking off her clothes.'
+			act 'Fuck her with the strapon': gt 'albinahome', 'wear_strapon'
+		elseif albplay = 2:
+			'It is really close it could go either way, but finally at the end you just manage to do better than her and win the game. "Yes!" You exclaim as you just manage to beat her and taunt her a little. She laughs a little at that but reaches over and grabs the strapon harness and hands it to you. You grin as you start putting the harness on and she starts taking off her clothes.'
+			act 'Fuck her with the strapon': gt 'albinahome', 'wear_strapon'
+		elseif albplay = 1:
+			'Although you tried your best, Albina proved a worthy opponent and manages to just barely beat you at the end. Laughing like the villain of a theater play, she slaps you on the ass with the palm of her hand, saying "Show me your ass, <<$pcs_nickname>>! You are my bitch now!" Well a bets a bet, you start talking off your clothes as she start putting the harness on.'
+			act 'Get fucked by a strapon': gt 'albinahome', 'receive_strapon'
+		elseif albplay = 0:
+			'Although you tried your best, Albina is just simply outplays you at every turn. You really stand no chance and she easily beats you. Laughing like the villain of a theater play, she slaps you on the ass with the palm of her hand, saying "Show me your ass, <<$pcs_nickname>>! You are my bitch now!" Well a bets a bet, you start talking off your clothes as she start putting the harness on.'
+			act 'Get fucked by a strapon': gt 'albinahome', 'receive_strapon'
+		end
 	end
 end
 
-if $ARGS[0] = 'anal_strapon':
-	act 'Get on all fours':
+if $ARGS[0] = 'wear_strapon':
+	*clr & cla
+	menu_off = 1
+	npc_sex['A23'] += 1
+	lesbian += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/straponsuck.jpg"></center>'
+	'With the strapon firmly in place you get on the bed with her and pull her head down to the dildo. "Suck my dick, like a good little slut." You tell her with a giggle.'
+	'She gets down on all fours and takes the dildo in her mouth and starts sucking on it and stroking the shaft with one hand. It looks like she has had a lot of practice sucking on things. You spend several minutes making her suck on the dildo, getting it nice and wet with her slobber.'
+	gs 'arousal', 'foreplay', 5, 'lesbian'
+	gs 'stat'
+	act 'Fuck her pussy':
 		*clr & cla
-		menu_off = 1
-		albsexday = daystart
-		gs 'boystat', 'A23'
-		if pcs_ass < 10: gs 'boyStat', 'D1'
-		if pcs_ass >= 10:gs 'boyStat', 'D<<pcs_ass/7>>'
-		npc_Sex['A23'] += 1
-		lesbian += 1
-		straponAnalPass += 1
+		gs 'boyStat', 'D3' 
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/analstrapon.jpg"></center>'
-		'Albina takes a <<dick>> cm strap-on harness and attaches it to herself.'
-		'Having strapped herself in, you feel her hands gently stroking your butt, slowly working their way to your anus.'
-		gs 'dinsex2', 'd_strapon_anal', 15, 'sub', 'lesbian'
-
-		act 'Rest':gt 'albinahome'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/givevag1.jpg"></center>'
+		'You pull away till the dildo slides out of her mouth and then you lay on your back. "Come on and ride''m cowgirl." You tell her, she crawls up and straddles you, lowering herself down until the <<dick>>cm <<$dick_girth>> dildo slides easily inside of her wet pussy, causing her to moan in pleasure. She starts riding your slow but start to slowly pick up speed as she starts moaning louder and louder.'
+		gs 'arousal', 'vaginal_strap_give', 8, 'lesbian'
+		gs 'stat'
+		act 'Fuck her ass': gt 'albinahome', 'fuck_ablina_ass'
+		act 'Ride it like you mean it':
+			*clr & cla 
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/givevag2.jpg"></center>'
+			'You slap her on the ass. "Come on Albina, ride it like you mean it." You tell her. With your encouragement she starts really riding you hard and fast, moaning louder and louder until several minutes later she cries out in ecstasy and nearly collapses on you as a orgasm shakes her body. Once the shudders pass she gives you a huge smile, obviously having enjoyed herself very much.'
+			gs 'arousal', 'vaginal_strap_give', 7, 'lesbian'
+			gs 'stat'
+			act 'Fuck her ass': gt 'albinahome', 'fuck_ablina_ass'
+			act 'Finish': gt 'albinahome', 'strapon_finish'
+		end
 	end
+	act 'Fuck her ass': gt 'albinahome', 'fuck_ablina_ass'
 end
 
-if $ARGS[0] = 'akt_vag':
-	act 'Put Albina on all fours and fuck her pussy':
+if $ARGS[0] = 'fuck_ablina_ass':
+	*clr & cla
+	menu_off = 1
+	npc_sex['A23'] += 1
+	lesbian += 1
+	gs 'boyStat', 'D3' 
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/giveanal1.jpg"></center>'
+	'You slap her on the butt. "Get up and get on all fours, I''m not finished with you yet." She arches a brow at that but does as you command. She gets up on all fours. You grab the bottle of lube she had brought it and squirt some onto the dildo, rubbing it up and down the shaft until it is very slick and well lubricated.'
+	'You kneel down behind her and line the head of the dildo up with her asshole and then push forward. There is a bit of resistance but with a little more pressure the <<dick>>cm <<$dick_girth>> dildo pops into her ass. Causing her to moan and groan in a mixture of pain and pleasure. You start off slow, taking slow shallow strokes, as her groans of pain turn into moans of pleasure you take deeper and faster strokes. After a bit you pull out of her ass, she looks back over her shoulder obviously wondering why you stopped.'
+	gs 'arousal', 'anal_strap_give', 5, 'lesbian'
+	gs 'stat'
+	act 'Finish': gt 'albinahome', 'strapon_finish'
+	act 'Keep fucking her ass':
 		*clr & cla
-		menu_off = 1
-		albsexday = daystart
-
-		if npcSex[23] = 0:npcSex[23] = 1 & girl += 1
-		straponVagAkt += 1
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/straponakt.jpg"></center>'
-		'You begin gently probing Albina''s nether regions with the strap-on, and soon enough she''s moaning and bucking her hips.'
-		'Deciding it''s time to give her the real deal, you spit on your plastic phallus, give it a nice rub to coat it in saliva and line it up with Albina''s pussy.'
-		'As you enter her, you can see her tense up from pleasure and hear soft moans escape her mouth.'
-		'Slowly ramping up the speed of your thrusts, Albina''s moans get louder and louder and her butt moves in rhythm with you as she nears orgasm.'
-		'Finally Albina cums. Trying to stifle a scream, she grabs on to the sheets and shoves her face down into them as her body shakes slightly from the intense pleasure.'
-		'Done dispensing your punishment, you climb out of the strap-on harness and lie down next to Albina for a few seconds to catch your breath.'
-		
-		gs 'arousal', 'anal_strap_give', 15, 'dom', 'lesbian'
-		gs 'arousal', 'end'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/giveanal2.jpg"></center>'
+		'You can tell by the way she looks at you, that she wants you to keep fucking her butt. So you slide the dildo back in and this time it slides in easily, making her moan in pleasure. You grab onto her hips and start giving her full length balls deep strokes, filling her ass completely with the dildo. Several minutes of this gets her crying out, as her body is rocked by a intense orgasm. You keep fucking her throughout the whole orgasm only stopping and pulling out once her shudders have passed.'
+		gs 'arousal', 'anal_strap_give', 5, 'lesbian'
 		gs 'stat'
-		act 'Rest':gt 'albinahome'
+		act 'Finish': gt 'albinahome', 'strapon_finish'
 	end
 end
 
-if $ARGS[0] = 'akt_anal':
-	act 'Put Albina on all fours and fuck her ass':
+if $ARGS[0] = 'receive_strapon':
+	*clr & cla
+	menu_off = 1
+	npc_sex['A23'] += 1
+	lesbian += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/straponsuck.jpg"></center>'
+	'You strip off your clothes while she tightens the straps on the strapon, with the strapon firmly in place you get on the bed with her and she pulls your head down to the dildo. "Suck my dick." She commands.'
+	'You get down on all fours and takes the dildo in your mouth and start sucking on it, while stroking the shaft with one hand. "You look like you have done this a lot before <<$pcs_nickname>>, your a real pro at sucking cock." You spend several minutes sucking on the dildo, getting it nice and wet with your slobber. Then she pulls it out of your mouth. "Ok I want to fuck you now!"'
+	gs 'arousal', 'foreplay', 5, 'lesbian'
+	gs 'stat'
+	if pcs_vag = 0: 
+		act 'Tell her you''re a virgin':
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/straponsuck.jpg"></center>'
+			'You blush deeply at her comment. She seems to notice. "What is it?" She asks you.'
+			'Blushing even more you tell her. "I''m still a virgin."'
+			'She looks surprised at this. "Oh... well I can just fuck your ass if you want." Then pauses and grins. "Unless you want me to pop your cherry that is."'
+			act 'Just fuck my ass': gt 'albinahome', 'ablina_ass_fucks_you'
+			act 'Pop my cherry':
+				*clr & cla
+				gs 'boyStat', 'D3' 
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag1.jpg"></center>'
+				'She nods "Ok don''t worry I will be gentle, since it is your first time. Lay on your back and spread you legs." You do as she commands, she scoots up between your legs and rubs your pussy with her fingers a bit to make sure it is wet enough. She adds a little lube to the dildo anyways, before she guides it to your slit. You feel the dildo rubbing against your slit causing it to open a bit. Then she gentle and slowly slide the <<dick>>cm <<$dick_girth>> dildo in your virgin pussy, it hurts and feels great at the same time. You moan a bit as she slowly fucks your pussy. After a bit it starts to feel better and hurt less but it still hurts a little. Then she stops. "Ok that''s enough, don''t want to wear it out the first time, but I''m not finished with you. Roll over so I can fuck that tight little butt of yours."'
+				gs 'arousal', 'vaginal_strap', 5, 'lesbian'
+				gs 'stat'
+				act 'Take it up the ass': gt 'albinahome', 'ablina_ass_fucks_you'
+			end
+		end
+	else
+		act 'Get your pussy fucked':
+			*clr & cla
+			gs 'boyStat', 'D3' 
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag1.jpg"></center>'
+			'"Lay on your back and spread you legs." You do as she commands, she scoots up between your legs and rubs your pussy with her fingers a bit to make sure it is wet enough, before she guides it to your slit. You feel the dildo rubbing against your slit causing it to open a bit. Then she gentle and slowly slide the <<dick>>cm <<$dick_girth>> dildo in your pussy. You moan a bit as she slowly fucks your pussy. As you start to moan louder she starts fucking you a little faster.'
+			gs 'arousal', 'vaginal_strap', 8, 'lesbian'
+			gs 'stat'
+			act 'Keep getting your pussy fucked':
+				*clr & cla 
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag2.jpg"></center>'
+				'She reads your body well, she fucks you harder and faster the more you moan, but when it starts to get a little rough she backs off a bit. She then just fucks you at a near perfect rhythm, you can feel youself getting wetter and wetter. Then she stops. "Ok that''s enough that, but I''m not finished with you just yet. Roll over so I can fuck that tight little butt of yours."'
+				gs 'arousal', 'vaginal_strap', 7, 'lesbian'
+				gs 'stat'
+				act 'Take it up the ass': gt 'albinahome', 'ablina_ass_fucks_you'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'ablina_ass_fucks_you':
+	*clr & cla
+	menu_off = 1
+	npc_sex['A23'] += 1
+	lesbian += 1
+	gs 'boyStat', 'D3' 
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getanal1.jpg"></center>'
+	'As you roll over onto all fours you glance back and see her applying lube to the dildo. She squirts plenty on the dildo and strokes the shaft with it, getting it nice and lubed up. Then she rubs the excess lube off her hand onto your asshole. Once both the dildo and your anus is lubed up, she knee walks up behind you, you feel the tip of the dildo press against your anus a few moments later. The pressure builds up into the tip pops into your ass causing your to groan slightly in pain. She slowly starts to sroke the <<dick>>cm <<$dick_girth>> dildo up your butt, steadily working it just a little deeper with each stroke.'
+	gs 'arousal', 'anal_strap', 5, 'lesbian'
+	gs 'stat'
+	act 'Get your ass ploughed':
 		*clr & cla
-		menu_off = 1
-		albsexday = daystart
-		if npcSex[23] = 0:npcSex[23] = 1 & girl += 1
-		straponVagAkt += 1
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/straponaktanal.jpg"></center>'
-		'You begin gently kneading Albina''s butt, letting your hands roam all over her supple butt-cheeks and grazing her tight anus.'
-		'As you explore her bum, you realize her anus might be too tight for the strap-on. You lick your index finger and insert it in Albina''s anus. Slowly pushing your finger further in, you can hear her moaning softly.'
-		'As you finger-fuck Albina''s anus, you slowly introduce more and more fingers until three of your fingers are inside her.'
-		'Deciding it''s time to give her the real deal, you spit on your plastic phallus, give it a nice rub to coat it in saliva and line it up with Albina''s anus.'
-		'As you enter her, you can see her tense up from pleasure and hear soft moans escape her mouth. You notice she is gently rubbing her clitoris with one of her hands.'
-		'Slowly ramping up the speed of your thrusts, Albina''s moans get louder and louder and her butt moves in rhythm with you as she nears orgasm.'
-		'Finally Albina cums. Trying to stifle a scream, she grabs on to the sheets and shoves her face down into them as her body shakes slightly from the intense pleasure.'
-		'Done dispensing your punishment, you climb out of the strap-on harness and lie down next to Albina for a few seconds to catch your breath.'
-		
-		gs 'arousal', 'anal_finger_give', 15, 'lesbian'
-		gs 'arousal', 'anal_strap_give', 15, 'dom', 'lesbian'
-		gs 'arousal', 'end'
-		minut -= 15
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getanal2.jpg"></center>'
+		'After you seem to be use to the dildo all the way up you ass, she stands up over you and starts getting harder and faster with the ass fucking she is giving you. When it starts getting a little to rough she seems to notice and backs off just a little and then gets into a nice rhythm of slaming the dildo up your butt. Just as it is starting to hurt a little she suddenly stops and pulls out of you. "You was such a good little butt slut <<$pcs_nickname>>" She tells you as she takes off the harness, apparently finished with you.'
+		gs 'arousal', 'anal_strap', 10, 'lesbian'
 		gs 'stat'
-		
-		act 'Rest':gt 'albinahome'
+		act 'Finish': gt 'albinahome', 'strapon_finish'
 	end
 end
 
+if $ARGS[0] = 'strapon_finish':
+	*clr & cla
+	menu_off = 1
+	npc_sex['A23'] += 1
+	lesbian += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/aftermath.jpg"></center>'
+	'Once finished the two of you meet for a long passionate kiss. With the moment passed the two of you start to get dressed again, she takes the strapon and cleans it up as well. Not long after the two of you finish getting cleaned up and dressed her phone buzzes. She looks at it obviously reading a text message, she frowns a bit. "Sorry I need to go <<$pcs_nickname>>, catch you later ok."'
+	'You nod in understanding. "Sure not a problem, I had fun, see you later." With that you to share a quick final kiss before you leave.'
+	gs 'arousal', 'foreplay', 5, 'lesbian'
+	gs 'arousal', 'end'
+	gs 'stat'
+	act 'Say goodbye and go home':gt 'pavResidential'
+end
+
+
 --- albinahome ---------------------------------
 

locations/alexgang.qsrc

@@ -48,7 +48,7 @@ act 'Get on your knees and give head':
 		picrand = rand(16, 25)
 		'<center><img <<$set_imgh>> src="images/shared/sex/group/gang<<picrand>>.jpg"></center>'
 		'Standing on all fours, you start sucking Sasha''s limp cock. As you lick, suck and roll your tongue around his dick, you can feel it slowly stiffening in your mouth.'
-		dynamic $sexstart
+		gs 'dinSex', 'wear_condom'
 		'The position you''re in doesn''t make it easy for you to move your head the right way. However, with some determination you manage to keep Sasha''s cock in your mouth.'
 		gs 'dinsex','vaginal_sex',10
 		'After a while, you feel Sasha''s hard cock begin to throb in your mouth. With a low grunt, he thrusts his hips forward and you feel his sperm coat the insides of your mouth.'

locations/annafrends.qsrc

@@ -258,11 +258,13 @@ 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.'
-			if pcs_dom > 5:
-				act 'Step back':
+			gs 'willpower', 'misc', 'self', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Step back (<<will_cost>> Willpower)':
 					*clr & cla
+					gs 'willpower', 'pay', 'self'
 					minut += 5
-					pcs_dom += 1
+					!pcs_dom += 1
 					rex -= 1
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/event/community/rexnet.jpg"></center>'
@@ -270,6 +272,8 @@ if $ARGS[0] = 'scene1':
 					'"No problem, I can manage that."'
 					act 'Continue to drink beer':gt 'annafrends', 'scene2'
 				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
 			act 'Wait':
 				*clr & cla

locations/anushapt.qsrc

@@ -147,14 +147,14 @@ if $ARGS[0] = 'home':
 				'<center><img src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/listen.jpg"></center>'
 				'As you get down to Anushka''s bedroom door you can hear voices inside. One of them her and the others obviously a guy. You can''t quite make out what they are saying. You lean against the door to hear better and you hear the guy say. "Turn around and let me see that fine ass of yours."'
 				
-				gs 'willpower', 'exhib'
+				gs 'willpower', 'exhib', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Leave them in peace and leave the apartment (<<will_cost>> Willpower)': 
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gt 'pavComplex','start'
 					end
 				else
-					'You don''t have enough willpower to resist the temptation.'
+					act 'Leave them in peace and leave the apartment (<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 a peek':
 					*clr & cla
@@ -190,14 +190,14 @@ if $ARGS[0] = 'home':
 				AnushkaLoc = 2
 				'<center><img src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/listen.jpg"></center>'
 				'As you get down to Anushka''s bedroom door you can hear voices inside. One of them her and the others obviously a guy. You can''t quite make out what they are saying. You lean against the door to hear better and you hear the guy say. "You wanna fuck?"'
-				gs 'willpower', 'exhib'
+				gs 'willpower', 'exhib', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Leave them in peace and leave the apartment (<<will_cost>> Willpower)':
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gt 'pavComplex','start'
 					end
 				else
-					'You don''t have enough willpower to resist the temptation.'
+					act 'Leave them in peace and leave the apartment (<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 a peek':
 					*clr & cla
@@ -230,14 +230,14 @@ if $ARGS[0] = 'home':
 				AnushkaLoc = 2
 				'<center><img src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/listen.jpg"></center>'
 				'As you get down to Anushka''s bedroom door you can hear voices inside. One of them her and the others obviously a guy. You can''t quite make out what they are saying. You lean against the door to hear better and you hear the guy say. "God your so beautiful."'
-				gs 'willpower', 'exhib'
+				gs 'willpower', 'exhib', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'Leave them in peace and leave the apartment (<<will_cost>> Willpower)': 
-						gs 'willpower', 'resist'
+						gs 'willpower', 'pay', 'resist'
 						gt 'pavComplex','start'
 					end
 				else
-					'You don''t have enough willpower to resist the temptation.'
+					act 'Leave them in peace and leave the apartment (<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 a peek':
 					*clr & cla
@@ -346,6 +346,7 @@ if $ARGS[0] = 'bathroom':
 		*clr & cla
 		menu_off = 1
 		minut += 10
+		noShampoo = 1
 		dynamic $showerdin
 		gs 'stat'
 		temp = rand(0,4)
@@ -402,6 +403,7 @@ if $ARGS[0] = 'bathroom':
 			end
 			act 'Get out of the shower': gt 'anushapt','bathroom'
 		end
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 	end
 	dynamic $bath
 	dynamic $bteeth
@@ -483,22 +485,22 @@ if $ARGS[0] = 'computer':
 			npc_rel['A144'] += 1
 			'She hit the nail right on the head, and given how open she is about everything, you don''t feel like it''s necessary to lie to her about it; so you nod. "Yeah, I guess I am."'
 			'Anushka''s smile broadens and lust flares up in her eyes. "We could watch some together, if you want..."'
-			act 'You don''t want to':
-				*clr & cla
-				'As appealing as watching porn sounds right now, you''re not in the mood to watch it with her, at least not right now.'
-				'"Nah, I''d really rather do something else right now," you say.'
-				'Anushka shrugs. "Alright, that''s cool." She seems to be rubbing her legs together, though - maybe even the idea of watching porn with you got her a little worked up.'
-				act 'Find something else to do':gt 'anushapt','anushroom'
-			end
-			gs 'willpower', 'exhib'
+			
+			gs 'willpower', 'misc', 'resist', 'hard'
 			if will_cost <= pcs_willpwr:
-				act 'Agree to watch porn (<<will_cost>> Willpower)': 
-					gs 'willpower', 'force'
-					gt 'anushapt','agreeporn'
+				act 'You don''t want to (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'As appealing as watching porn sounds right now, you''re not in the mood to watch it with her, at least not right now.'
+					'"Nah, I''d really rather do something else right now," you say.'
+					'Anushka shrugs. "Alright, that''s cool." She seems to be rubbing her legs together, though - maybe even the idea of watching porn with you got her a little worked up.'
+					act 'Find something else to do':gt 'anushapt','anushroom'
 				end
 			else
-				'You don''t have enough willpower to refuse.'
+				act 'You don''t want to (<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 to watch porn': gt 'anushapt','agreeporn'
 		end
 	elseif AnushkaCompUse > 0 and AnushkaLoc ! 2:
 		*clr & cla
@@ -1894,11 +1896,11 @@ if $ARGS[0] = 'nushshower':
 				'"Yes when I want to, now go on get out of here." She says while making a shooing motion with one of her hands.'
 				'You know deep down she really doesn''t care, she loves showing off her body to much, but maybe you should give her some privacy.'
 				act 'Go wait for her': gt 'anushapt', 'shower_wait'
-				gs 'willpower', 'exhib'
+				gs 'willpower', 'exhib', 'force'
 				if will_cost <= pcs_willpwr:
 					act 'Show me a little skin (<<will_cost>> Willpower)':
 						*clr & cla
-						gs 'willpower', 'force'
+						gs 'willpower', 'pay', 'force'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/bathroom/photo2.jpg"></center>'
 						'You move around to get in a better spot. "Don''t be like that, show me a little skin. Come on you know you want to." You say in a teasing tone.'
 						'She smiles a bit that quickly turns into a smirk as she turns her back to you and drops off the towel some to show off her back.'
@@ -1954,7 +1956,7 @@ if $ARGS[0] = 'nushshower':
 						end
 					end
 				else
-					'You don''t have enough willpower to refuse.'
+					act 'Show me a little skin (<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/anushka.qsrc

@@ -14,7 +14,7 @@ if $ARGS[0] = 'plan':
 	*nl
 	'You look at the pills, turning them this way and that uncertainly, and look up at the two of them again. "What exactly will these do to him?"'
 	'Valentin answers before Anushka can. "Make him tired, is all. He will sleep for a few hours and feel a little groggy for the rest of the day but nothing serious - we''re just gonna make detention a bit less boring, <<$pcs_nickname>>, we''re not trying to kill him. So, you going to do it or not?"'
-	gs 'willpower', 'crime'
+	gs 'willpower', 'crime', 'resist'
 	if will_cost <= pcs_willpwr:
 		act 'This is WAY too sketchy - Refuse (<<will_cost>> Willpower)':
 			*clr & cla
@@ -22,7 +22,8 @@ if $ARGS[0] = 'plan':
 			npc_rel['A158'] -= 2
 			grupvalue[4] -= 3
 			Anushka_toilet = -1
-			gs 'willpower', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
 			'<center><b><font color="maroon">Detention</font></b></center>'
 			'<center><img src="images/locations/pavlovsk/school/detention/detention.jpg"></center>'
 			'You shake your head and hand back the pills. "Sorry, guys, but I can''t be part of that. It just... does''nt feel right."'
@@ -32,7 +33,7 @@ if $ARGS[0] = 'plan':
 			act 'Go home': gt 'gschool_detention', 'end'
 		end
 	else
-		'You don''t have enough willpower to refuse.'
+		act 'This is WAY too sketchy - Refuse (<font color="red"><<will_cost>> Willpower</font)':'<br><font color="red">You don''t have enough willpower to refuse.</font>'
 	end
 	act 'Well, they did say it''s harmless - Agree':
 		*clr & cla
@@ -60,7 +61,7 @@ if $ARGS[0] = 'plan':
 			'<center><b><font color="maroon">Detention</font></b></center>'
 			'<center><img src="images/locations/pavlovsk/school/detention/sex/det3sum.jpg"></center>'
 			'Once the teacher starts snoring, Valentin gets up. "Come on, let''s go." Anushka follows suit and pulls you up as well. You wander down the halls ''til the three of you reach the teachers'' lounge. Valentin pulls some lockpicks from his pocket and expertly uses them to unlock the door. You and your companions head inside quickly and he locks the door behind you. While he does, Anushka pulls you towards a big leather couch. You both flop down on the comfy couch and Valentin sits down between you a few seconds later. He pulls a small flask from his jacket pocket and takes a quick gulp from it before passing it to Anushka, who takes a healthy swig and passes it to you.'
-			gs 'willpower', 'drink'
+			gs 'willpower', 'drink', 'resist'
 			if will_cost <= pcs_willpwr:
 				act 'No thanks (<<will_cost>> Willpower)':
 					*clr & cla
@@ -68,7 +69,7 @@ if $ARGS[0] = 'plan':
 					npc_rel['A158'] -= 1
 					grupvalue[4] -= 1
 					minut += 3
-					gs 'willpower', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					'<center><b><font color="maroon">Detention</font></b></center>'
 					'<center><img src="images/locations/pavlovsk/school/detention/sex/det3sum.jpg"></center>'
@@ -77,12 +78,13 @@ if $ARGS[0] = 'plan':
 					gs 'stat'
 					if hotcat >= 6:
 						'As Anushka and Valentin make out she reaches down to close her hand around his cock, immediately starting to jerk him. After she has him good and hard, she reaches toward you with both hands, grabs your head and pushes you down into his lap.'
-						gs 'willpower', 'bj'
+						gs 'willpower', 'bj', 'resist'
 						if will_cost <= pcs_willpwr:
 							act 'Pull away (<<will_cost>> Willpower)':
 								*clr & cla
 								npc_rel['A158'] -= 1
-								gs 'willpower', 'resist'
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
 								'<center><img src="images/locations/pavlovsk/school/detention/sex/det3sum.jpg"></center>'
 								'Before your face gets too close to his cock you pull away, Anushka doesn''t really try to stop you when she feels you resist. "Sorry guys, but I just wanted out of detention, I don''t want to have a orgy with the two of you."'
 								'Anushka seems completely unfazed and before you even finish speaking she lowers her head and starts sucking Valentin''s cock.'
@@ -92,7 +94,7 @@ if $ARGS[0] = 'plan':
 								act 'Go home': gt 'gschool_detention', 'end'
 							end
 						else
-							'You don''t have enough willpower to refuse.'
+							act 'Pull away (<font color="red"><<will_cost>> Willpower</font>)':'<br><font color="red">You don''t have enough willpower to refuse.</font>'
 						end
 						act 'Suck him':
 							*clr & cla
@@ -111,7 +113,7 @@ if $ARGS[0] = 'plan':
 					end
 				end
 			else
-				'<br>You don''t have enough willpower to refuse.'
+				act 'No thanks (<font color="red"><<will_cost>> Willpower</font>)':'<br><font color="red">You don''t have enough willpower to refuse.</font>'
 			end
 			act 'Take a drink':
 				*clr & cla
@@ -119,6 +121,7 @@ if $ARGS[0] = 'plan':
 				npc_rel['A158'] += 1
 				grupvalue[4] += 1
 				minut += 3
+				joint += 1
 				gs 'drugs', 'alcohol',  'moonshine', 1
 				gs 'drugs', 'joint'
 				gs 'stat'
@@ -128,13 +131,14 @@ if $ARGS[0] = 'plan':
 				*nl
 				gs 'stat'
 				if hotcat >= 6:
-					'As Anushka and Valentin make out she reaches down to close her hand around his cock, immediately starting to jerk him. After she has him good and hard, she reaches toward you with both hands, grabs your head and pushes you down into his lap.'			
-					gs 'willpower', 'bj'
+					'As Anushka and Valentin make out she reaches down to close her hand around his cock, immediately starting to jerk him. After she has him good and hard, she reaches towards you with both hands, grabs your head and pushes you down into his lap.'			
+					gs 'willpower', 'bj', 'resist'
 					if will_cost <= pcs_willpwr:
 						act 'Pull away (<<will_cost>> Willpower)':
 							*clr & cla
 							npc_rel['A158'] -= 1
-							gs 'willpower', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
 							'<center><img src="images/locations/pavlovsk/school/detention/sex/det3sum.jpg"></center>'
 							'Before your face gets too close to his cock you pull away, Anushka doesn''t really try to stop you when she feels you resist. "Sorry guys, but I just wanted out of detention, I don''t want to have a orgy with the two of you."'
 							'Anushka seems completely unfazed and before you even finish speaking she lowers her head and starts sucking Valentin''s cock.'
@@ -144,7 +148,7 @@ if $ARGS[0] = 'plan':
 							act 'Go home': gt 'gschool_detention', 'end'
 						end
 					else
-						'You don''t have enough willpower to refuse.'
+						act 'Pull away (<font color="red"><<will_cost>> Willpower</font>)':'<br><font color="red">You don''t have enough willpower to refuse.</font>'
 					end
 					act 'Suck him':
 						*clr & cla
@@ -377,11 +381,12 @@ if $ARGS[0] = 'temptation':
 				'"Sorry I just can''t." Then you turn and head back to your table in detention. You just can''t. The rest of detention passes very slowly, you don''t see her for the rest of it.'
 				act 'Go home':minut += 15 & gt 'gschool_grounds', 'main'
 			end
-			gs 'willpower', 'exhib'
+			gs 'willpower', 'exhib', 'self'
 			if will_cost <= pcs_willpwr:
 				act 'I would like to but... (<<will_cost>> Willpower)':
 					*clr & cla
-					gs 'willpower', 'resist'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
 					'<center><b><font color="maroon">Detention</font></b></center>'
 					'<center><img src="images/characters/pavlovsk/school/girl/anushka/getnaked.jpg"></center>'
 					'You blush a little at the thought and bite your lip, it could be fun and you actually would like to, but what if you got caught? "I don''t know Nush, what if we get caught?"'
@@ -390,7 +395,7 @@ if $ARGS[0] = 'temptation':
 					act 'Get Naked': gt 'anushka', 'naked'
 				end
 			else
-				'You don''t have enough willpower to refuse.'
+				act 'I would like to but... (<font color="red"><<will_cost>> Willpower</font>)':'<br><font color="red">You don''t have enough willpower to refuse.</font>'
 			end
 			act 'Get Naked': gt 'anushka', 'naked'
 		end
@@ -431,12 +436,12 @@ if $ARGS[0] = 'naked':
 				'You smile and take it from her, taking a long drag from the joint. Maybe it will help take your mind off the thought of getting caught naked in a classroom by the school janitor. You pass it back and forth between you as you make small talk, listening to the machine steadily getting closer.'
 				act 'Wait for the janitor to pass': anushLimitedQuestions = 4 & gt 'anushka', 'chatwhilewaiting'
 			end
-			gs 'willpower', 'drugs'
+			gs 'willpower', 'drugs', 'resist'
 			if will_cost <= pcs_willpwr:
 				act 'Decline (<<will_cost>> Willpower)':
 					*clr & cla
 					npc_rel['A144'] -= 1
-					gs 'willpower', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					'<center><b><font color="maroon">Detention</font></b></center>'
 					'<center><img src="images/characters/pavlovsk/school/girl/anushka/hiding.jpg"></center>'
@@ -444,7 +449,7 @@ if $ARGS[0] = 'naked':
 					act 'Wait for the janitor to pass': anushLimitedQuestions = 4 & gt 'anushka', 'chatwhilewaiting'
 				end
 			else
-				'You don''t have enough willpower to refuse.'
+				act 'Decline (<font color="red"><<will_cost>> Willpower</font>)':'<br><font color="red">You don''t have enough willpower to refuse.</font>'
 			end
 		end
 	end

locations/anushkaev1.qsrc

@@ -568,11 +568,11 @@ if $ARGS[0] = 'couch_strapon_give':
 			act 'Fuck her': gt 'anushkaev1','couch_fuck_her'
 			act 'Fuck her ass': gt 'anushkaev1','couch_fuck_her_ass'
 		end
-		gs 'willpower', 'cuni'
+		gs 'willpower', 'cuni', 'force'
 		if will_cost <= pcs_willpwr:
 			act 'Sit on her face (<<will_cost>> Willpower)':
 				*clr & cla
-				gs 'willpower', 'force'
+				gs 'willpower', 'pay', 'force'
 				'<center><img src="images/characters/pavlovsk/school/girl/anushka/sex/livingroom/couchstrap4.jpg"></center>'
 				'You use her hair to pull her head back, she gives you a questioning look. You just keep leaning forward and pulling her hair back until she has to lay on her back. Once on her back, you trail your tongue up her stomach, across her breasts to her face, before you raise back up. You scoot forward and straddle her face, lowering your twat down against her face. She starts darting her tongue into your wet pussy, while you ride and rub your clit against her face.'
 				gs 'arousal', 'cuni', 3, 'lesbian'
@@ -588,7 +588,7 @@ if $ARGS[0] = 'couch_strapon_give':
 				end
 			end
 		else
-			'You lack the willpower to force her to lick you.'
+			act 'Sit on her 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
@@ -638,11 +638,11 @@ if $ARGS[0] = 'couch_fuck_her_ass':
 		gs 'stat'
 		act 'Finish': gt 'anushkaev1','couch_strap_finish'
 	end
-	gs 'willpower', 'anal'
+	gs 'willpower', 'anal', 'force'
 	if will_cost <= pcs_willpwr:
 		act 'Fuck her ass hard (<<will_cost>> Willpower)':
 			*clr & cla
-			gs 'willpower', 'force'
+			gs 'willpower', 'pay', 'force'
 			gs 'stat'
 			'<center><img src="images/characters/pavlovsk/school/girl/anushka/sex/livingroom/couchstrap9.jpg"></center>'
 			'"Oh you want me to <b>FUCK</b> your ass, I''ll fuck your ass like the dirty anal slut you are." You say as you take a really hard grip on her hips and slam the strapon balls deep into her ass and start really pounding her ass as hard and fast as you can. You can feel her try to pull away some and you see her gripping the back of the couch hard. But you don''t let her pull away, you jerk back on her hips, not allowing her to escape the fucking you are giving her.'
@@ -679,7 +679,7 @@ if $ARGS[0] = 'couch_fuck_her_ass':
 			end
 		end
 	else
-		'You don''t have enough willpower to make yourself fuck her even harder.'
+		act 'Fuck her ass hard (<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/arousal.qsrc

@@ -138,8 +138,8 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		!! when the boy is skilled, he does not harm PC with his long dick
 		if (temp_silavag = 2) and (altdif > 0): altdif = 0
 		!! lube can compensate the difference a bit
-		if  agrdif > anal_slip: agrdif = agrdif - anal_slip else if agrdif > 0: agrdif = 0
 		if -agrdif > anal_slip: agrdif = agrdif + anal_slip else if agrdif < 0: agrdif = 0
+		if agrdif > anal_slip: agrdif = agrdif - anal_slip else if agrdif > 0: agrdif = 0
 
 		stim['act'] = 80 - (iif(altdif>0,altdif,-altdif) + iif(agrdif >0,agrdif,-agrdif)) + temp_silavag*8
 		!! if the dick is smaller, it cannot harm PC
@@ -175,7 +175,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		altdif = altdif / (temp_silavag+1)
 		agrdif = agrdif *(5/4 - 1/(4 - temp_silavag))
 		if (temp_silavag = 2) and (altdif > 0): altdif = 0
-		if  agrdif > anal_slip: agrdif = agrdif - anal_slip else if agrdif > 0: agrdif = 0
+		if agrdif > anal_slip: agrdif = agrdif - anal_slip else if agrdif > 0: agrdif = 0
 		if -agrdif > anal_slip: agrdif = agrdif + anal_slip else if agrdif < 0: agrdif = 0
 		stim['act'] = 80 - (iif(altdif>0,altdif,-altdif) + iif(agrdif >0,agrdif,-agrdif)) + temp_silavag*8
 		if agrdif < 0: agrdif = 0
@@ -193,7 +193,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		altdif = altdif / (temp_silavag+1)
 		agrdif = agrdif *(5/4 - 1/(4 - temp_silavag))
 		if (temp_silavag = 2) and (altdif > 0): altdif = 0
-		if  agrdif > anal_slip: agrdif = agrdif - anal_slip else if agrdif > 0: agrdif = 0
+		if agrdif > anal_slip: agrdif = agrdif - anal_slip else if agrdif > 0: agrdif = 0
 		if -agrdif > anal_slip: agrdif = agrdif + anal_slip else if agrdif < 0: agrdif = 0
 		stim['act'] = 80 - (iif(altdif>0,altdif,-altdif) + iif(agrdif >0,agrdif,-agrdif)) + temp_silavag*8
 		if agrdif < 0: agrdif = 0
@@ -237,7 +237,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		!! when the boy is skilled, he does not harm PC with his long dick
 		if (temp_silavag = 2) and (vltdif > 0): vltdif = 0
 		!! even PC horniness can compensate the difference 
-		if    vgrdif > vaginal_slip: vgrdif = vgrdif - vaginal_slip else if (vgrdif > 0): vgrdif = 0
+		if vgrdif > vaginal_slip: vgrdif = vgrdif - vaginal_slip else if (vgrdif > 0): vgrdif = 0
 		if -1*vgrdif > vaginal_slip: vgrdif = vgrdif + vaginal_slip else if (vgrdif < 0): vgrdif = 0
 
 		stim['act'] = 80 - (iif(vltdif>0,vltdif,-vltdif) + iif(vgrdif >0,vgrdif,-vgrdif)) + temp_silavag*8
@@ -274,7 +274,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		vltdif = vltdif / (temp_silavag+1)
 		vgrdif = vgrdif *(5/4 - 1/(4 - temp_silavag))
 		if (temp_silavag = 2) and (vltdif > 0): vltdif = 0
-		if    vgrdif > vaginal_slip: vgrdif = vgrdif - vaginal_slip else if (vgrdif > 0): vgrdif = 0
+		if vgrdif > vaginal_slip: vgrdif = vgrdif - vaginal_slip else if (vgrdif > 0): vgrdif = 0
 		if -1*vgrdif > vaginal_slip: vgrdif = vgrdif + vaginal_slip else if (vgrdif < 0): vgrdif = 0
 		stim['act'] = 80 - (iif(vltdif>0,vltdif,-vltdif) + iif(vgrdif >0,vgrdif,-vgrdif)) + temp_silavag*8
 		if vgrdif < 0: vgrdif = 0
@@ -295,7 +295,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		vltdif = vltdif / (temp_silavag+1)
 		vgrdif = vgrdif *(5/4 - 1/(4 - temp_silavag))
 		if (temp_silavag = 2) and (vltdif > 0): vltdif = 0
-		if    vgrdif > vaginal_slip: vgrdif = vgrdif - vaginal_slip else if (vgrdif > 0): vgrdif = 0
+		if vgrdif > vaginal_slip: vgrdif = vgrdif - vaginal_slip else if (vgrdif > 0): vgrdif = 0
 		if -1*vgrdif > vaginal_slip: vgrdif = vgrdif + vaginal_slip else if (vgrdif < 0): vgrdif = 0
 		stim['act'] = 80 - (iif(vltdif>0,vltdif,-vltdif) + iif(vgrdif >0,vgrdif,-vgrdif)) + temp_silavag*8
 		if vgrdif < 0: vgrdif = 0
@@ -621,20 +621,25 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 			gs 'orgasm', $ARGS[0]
 		end
 	end
+
+	if $orgasm_or ! 'no' and orgasm_buildup >= 300 and pcs_horny >= 60: gs 'orgasm', $ARGS[0]
+
 	killvar 'temp_dick'
 	killvar 'temp_unaware'
 	killvar '$orgasm_txt'
 	killvar '$stim_les'
 	killvar '$stim_foot'
-
+	
+	gs 'nichUtil','onArouse',$ARGS[0]
+	
 end
 
 !!-----------------------------------------------
 
 if $ARGS[0] = 'end':
-	if orgasm_buildup > 250: orgasm_buildup = 250
+	if orgasm_buildup > 350: orgasm_buildup = 350
+	if orgasm_buildup > 300: orgasm_buildup -= 10
 	if orgasm_buildup > 200: orgasm_buildup -= 10
-	if orgasm_buildup > 150: orgasm_buildup -= 10
 	if orgasm_buildup > 100: orgasm_buildup -= 10
 	if stim['lesbian'] = 1: lesbian += 1
 	if stim['hidden_lesbian'] = 1: hidden_lesbian += 1

locations/artemEv.qsrc

@@ -23,9 +23,9 @@ if $ARGS[0] = 'bj':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/artombj.jpg"></center>'
 	npc_sex[$boy] += 1
-	gs 'dinSex','dinrandbj'
+	gs 'dinSex','bj_random'
 	gs 'arousal','bj',5,'sub'
-	gs 'dinSex','dinrandswallow'
+	gs 'dinSex','bj_swallow_random'
 	gs 'cum_call','mouth',$boy,1
 	artemBJQW += 1
 	swallow += 1
@@ -113,86 +113,104 @@ if $ARGS[0] = 'learn':
 				'After you finish your homework, Artem has a serious look on his face when he says: "<<$pcs_nickname>>, with how much I''ve been helping you... We both know what you are willing to do. I think it''s only fair you give me a little something in return."'
 				act 'Suck him off': gt 'artemEv','bj'
 				
-				act '"No way!"':
-					cla
-					pcs_dom += 1
-					artemLernQW = -1
-					artemblok = 1
-					npc_rel['A2'] = 0
-					gs 'stat'
-	
-					'"No, I won''t do it again. It ends here."'
-					act 'Leave Artem''s apartment':gt 'artemhome','leave',5
+				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
+						gs 'stat'
+						
+						'"No, I won''t do it again. It ends here."'
+						act 'Leave Artem''s apartment':gt 'artemhome','leave',5
+					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
 			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'
-
-				act '"No way!"':
-					cla
-					pcs_dom += 1
-					artemLernQW = -1
-					artemblok = 1
-					npc_rel['A2'] = 0
-					gs 'stat'
-	
-					'You decline, and he''s very offended by that: "Look <<$pcs_nickname>>, I spent a lot of time and effort helping you out. Meanwhile, you... you suck off or fuck pretty much everyone who asks! But you won''t touch me? That''s so not fair! We''re done... find someone else to help you. Good luck, with that attitude."'
-					'You can tell Artem is seriously offended by your refusal, and won''t help you any further. Hopefully someone else can help you with your homework.'
-					act 'Leave Artem''s apartment':gt 'artemhome','leave',5
+				!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
+						gs 'stat'
+		
+						'You decline, and he''s very offended by that: "Look <<$pcs_nickname>>, I spent a lot of time and effort helping you out. Meanwhile, you... you suck off or fuck pretty much everyone who asks! But you won''t touch me? That''s so not fair! We''re done... find someone else to help you. Good luck, with that attitude."'
+						'You can tell Artem is seriously offended by your refusal, and won''t help you any further. Hopefully someone else can help you with your homework.'
+						act 'Leave Artem''s apartment':gt 'artemhome','leave',5
+					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
 			end
 		elseif (artemBJQW > 0 and artemBJQW < 10 and artemsex = 0) or (artemStripSee = 3 and artemsex = 0 and artemTouch > daystart) or (artemBJQW > 0 and artQW = 5):
 			cla
 			'Artem unbuttons his pants and pulls his stiff erection from his pants.'
 			'He looks at you expectantly: "You know our deal, <<$pcs_nickname>>. If you want my help, I want your mouth."'
-
+			!Candidate for willpower expansion
 			act 'Suck him off': gt 'artemEv','bj'
 		elseif artemBJQW = 10 and artemsex = 0 and artQW ! 5:
 			cla
 			'After you finish your homework with Artem, he says a little shyly: "You know... I''ve never seen a girl naked before. Only on pictures. Maybe you could..."'
-			if pcs_dom >= 30 and dimaFilm > 0 and arthakQW = 0 and pcs_vag > 0:
-				act 'Agree to strip, in exchange for a favor':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/anatomy.jpg"></center>'
-					'You give him a serious look when you say: "You want me to get naked for you? You know what... I''ll show you what you want to see, but I need something in return."'
-					'Artem is mostly surprised you''re not ripping him a new one and nods enthusiastically, pretty much agreeing to whatever it is you want without even asking what it is.'
-					'You tell him: "But if you do not keep your promise, I know some guys that will break your nose. And that''d be just the beginning. Are we clear?"'
-					'You see him gulp, but he''s still interested in seeing you nude. You continue: "Now, about the service... Dimka Nosov has some video footage of me. I need it to disappear. I need you to break into his computer and remove it. Can you do that for me?"'
-					'Artem looks a bit unsure, but says: "Yea... I think I can do that. What''s on the recording?"'
-					'You smile at him and tell him a lie while you take off your clothes: "Oh, don''t worry about it. It''s just me dancing after I had a few drinks in the disco. My <<$npc_nickname[''A29'']>> doesn''t know I sometimes drink alcohol, and he threatened to show her."'
-					*pl
-					'Once you''re naked, Artem unbuttons his pants and looks at you expectantly: "You know our deal, <<$pcs_nickname>>. If you want my help, I want your mouth."'
-					minut += 5
-					artemhakday = daystart
-					arthakQW = 1
-					gs 'stat'
-					artemStripSee = 1
-					dimaRevenge = 1
-
-					act 'Suck him off': gt 'artemEv','bj'
-				end
-			else
-				act 'Agree to strip, but ask for money':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/anatomy.jpg"></center>'
-					'You think it over for a second, but realize Artem is not a very good negotiator. You figure you can probably get something in exchange.'
-					'You look at him, feigning doubt: "I don''t know, Artem. I guess I could give you some female anatomy lessons, but my family is kinda pressed for cash. You see, my sister really needs some medication, and we can''t afford it. If you''d give me 300 <b>₽</b>, that would go a long way... maybe we can help each other out?"'
-					'Artem readily agrees, and gives you the money without a second thought: "Of course, of course! That sounds fair. Here you go... now, your clothes?"'
-					'Well... fair''s fair, he paid for it. You slowly take off your clothes, making a little show out of it. When you''re completely naked you sit back and spread your legs, exposing your bare pussy to Artem.'
-					'You were clear he''s not allowed to touch you, but you spread your pussy lips and show him everything he wants to see.'
-					*pl
-					'Once you''re naked, Artem unbuttons his pants and looks at you expectantly: "Our previous deal still stands, <<$pcs_nickname>>. If you want my help, I want your mouth."'
-					money += 300
-					artemStripSee = 1
-					minut += 5
-					gs 'stat'
-
-					act 'Suck him off': gt 'artemEv','bj'
+			if dimaFilm > 0 and arthakQW = 0 and pcs_vag > 0:
+				gs 'willpower', 'exhib', 'self'
+				if will_cost <= pcs_willpwr:
+					act 'Agree to strip, in exchange for help with Dimka (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'self'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/anatomy.jpg"></center>'
+						'You give him a serious look when you say: "You want me to get naked for you? You know what... I''ll show you what you want to see, but I need something in return."'
+						'Artem is mostly surprised you''re not ripping him a new one and nods enthusiastically, pretty much agreeing to whatever it is you want without even asking what it is.'
+						'You tell him: "But if you do not keep your promise, I know some guys that will break your nose. And that''d be just the beginning. Are we clear?"'
+						'You see him gulp, but he''s still interested in seeing you nude. You continue: "Now, about the service... Dimka Nosov has some video footage of me. I need it to disappear. I need you to break into his computer and remove it. Can you do that for me?"'
+						'Artem looks a bit unsure, but says: "Yea... I think I can do that. What''s on the recording?"'
+						'You smile at him and tell him a lie while you take off your clothes: "Oh, don''t worry about it. It''s just me dancing after I had a few drinks in the disco. My <<$npc_nickname[''A29'']>> doesn''t know I sometimes drink alcohol, and he threatened to show her."'
+						*pl
+						'Once you''re naked, Artem unbuttons his pants and looks at you expectantly: "You know our deal, <<$pcs_nickname>>. If you want my help, I want your mouth."'
+						minut += 5
+						artemhakday = daystart
+						arthakQW = 1
+						gs 'stat'
+						artemStripSee = 1
+						dimaRevenge = 1
+						
+						act 'Suck him off': gt 'artemEv','bj'
+					end
+				else
+					act 'Agree to strip, in exchange for help with Dimka (<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 'Agree to strip, but ask for money':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/anatomy.jpg"></center>'
+				'You think it over for a second, but realize Artem is not a very good negotiator. You figure you can probably get something in exchange.'
+				'You look at him, feigning doubt: "I don''t know, Artem. I guess I could give you some female anatomy lessons, but my family is kinda pressed for cash. You see, my sister really needs some medication, and we can''t afford it. If you''d give me 300 <b>₽</b>, that would go a long way... maybe we can help each other out?"'
+				'Artem readily agrees, and gives you the money without a second thought: "Of course, of course! That sounds fair. Here you go... now, your clothes?"'
+				'Well... fair''s fair, he paid for it. You slowly take off your clothes, making a little show out of it. When you''re completely naked you sit back and spread your legs, exposing your bare pussy to Artem.'
+				'You were clear he''s not allowed to touch you, but you spread your pussy lips and show him everything he wants to see.'
+				*pl
+				'Once you''re naked, Artem unbuttons his pants and looks at you expectantly: "Our previous deal still stands, <<$pcs_nickname>>. If you want my help, I want your mouth."'
+				money += 300
+				artemStripSee = 1
+				minut += 5
+				gs 'stat'
+				
+				act 'Suck him off': gt 'artemEv','bj'
+			end
 		elseif artemBJQW > 10 and artemStripSee < 2 and artQW ! 5:
 			artemRand = rand(0,5)
 			*clr & cla
+			!Candidate for willpower expansion
 			if artemRand = 5:
 				'After you finish your homework with Artem, he puts 300 <b>₽</b> down on the table out of nowhere.'
 				'He has a greedy grin on his face when he says: "Let''s repeat that anatomy lesson you gave me... get rid of those clothes, <<$pcs_nickname>>."'
@@ -230,6 +248,7 @@ if $ARGS[0] = 'learn':
 			artemTouch = daystart + 7
 			artemStripSee = 3
 			gs 'stat'
+			!Candidate for willpower expansion
 			act 'Let him touch you':
 				if pcs_horny >= 80:
 					*clr & cla
@@ -308,18 +327,24 @@ if $ARGS[0] = 'learn':
 			'Artem pressures you: "Come on... you need the money, right? We would both pay you."'
 			minut += 5
 			gs 'stat'
-			act 'Refuse to meet his friend':
-				cla
-				'You can''t do it. You tell him: "It''s not about the money. Sorry Artem, but I don''t feel comfortable doing that."'
-				'Artem is deeply insulted: "Really, <<$pcs_nickname>>? Plenty of other guys have sex with you, a lot of them not even offering you anything in return, but we''re not good enough for you? Despite me always helping you out with school, and making you a very fair offer?"'
-				'He continues: "If you''re not willing to help, pack up your stuff and get out. And find someone else to help you with your homework, I''m not doing it any more."'
-				pcs_dom += 1
-				artemLernQW = -1
-				artemblok = 1
-				npc_rel['A2'] = 0
-				gs 'stat'
+			gs 'willpower', 'prostitution', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse to meet his friend (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'resist'
+					'You can''t do it. You tell him: "It''s not about the money. Sorry Artem, but I don''t feel comfortable doing that."'
+					'Artem is deeply insulted: "Really, <<$pcs_nickname>>? Plenty of other guys have sex with you, a lot of them not even offering you anything in return, but we''re not good enough for you? Despite me always helping you out with school, and making you a very fair offer?"'
+					'He continues: "If you''re not willing to help, pack up your stuff and get out. And find someone else to help you with your homework, I''m not doing it any more."'
+					!pcs_dom += 1
+					artemLernQW = -1
+					artemblok = 1
+					npc_rel['A2'] = 0
+					gs 'stat'
 
-				act 'Leave Artem''s apartment':gt 'artemhome','leave',15
+					act 'Leave Artem''s apartment':gt 'artemhome','leave',15
+				end
+			else
+				act 'Refuse to meet his friend (<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 to meet his friend':
 				cla
@@ -341,7 +366,7 @@ if $ARGS[0] = 'learn':
 			'Artem notices his reluctance and suggests: "Maybe start with her breasts? <<$pcs_nickname>>, show Petka your boobs."'
 			minut += 5
 			gs 'stat'
-
+			!Candidate for willpower expansion
 			act 'Show him your boobs':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/ap_anatomy1_1.jpg"></center>'
@@ -396,6 +421,7 @@ if $ARGS[0] = 'learn':
 			else
 				artemAndPetjaRand = rand(0,5)
 			end
+			!Candidate for willpower expansion
 			if artemAndPetjaRand ! 0:
 				'Artem unbuttons his pants and looks at you expectantly: "Our previous deal still stands, <<$pcs_nickname>>. If you want my help, I want your mouth."'
 
@@ -638,7 +664,7 @@ if $ARGS[0] = 'learn':
 				sub += 10
 				gang += 1
 				gs 'stat'
-				
+				!Candidate for willpower expansion
 				act 'Drink it all':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/ap_anatomy6_3.jpg"></center>'
@@ -692,30 +718,39 @@ 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'
-		if pcs_dom > 0:
-			act 'Strip and let Artem rub his dick against your ass': gt 'artemEv','leghump2'
+		gs 'willpower', 'exhib', 'force'
+		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'
+		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
 	end
 
 	if artQW = 3:
 		if pcs_horny < 50:
-			act 'Reluctantly masturbate Artem':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj1.jpg"></center>'
-				'Well... you don''t feel particularly aroused, but you''d feel bad saying no to the guy. You reluctantly nod and tell him to take his pants off, which he joyfully does.'
-				'Without much enthusiasm you rub your hand over his foreskin for a second, before pulling it back and slowly spreading his precum out with your fingers. You then clasp your fingers around the head of his cock, and slowly jerk him off. Within minutes you see Artem tense up, and he groans your name right as he shoots his warm load over your hand.'
-				'You give him a few more strokes to make sure he''s finished, and then quickly go wash his cum off your hand in the bathroom. You return to his room with a slightly faked smile. He''s completely oblivious to the fact that you didn''t really want to do it, and seems happy.'
-				npc_sex['A2'] += 1
-				hja += 1
-				gs 'arousal','hj',15,'sub'
-				if pcs_mood > 50:pcs_mood = 50
-				gs 'cum_call','hands',$boy,1
-				cumspclnt = 9
-				gs 'cum_cleanup'
-				gs 'arousal','end'
-				gs 'stat'
+			gs 'willpower', 'hj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Reluctantly masturbate Artem (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'self'
+					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj1.jpg"></center>'
+					'Well... you don''t feel particularly aroused, but you''d feel bad saying no to the guy. You reluctantly nod and tell him to take his pants off, which he joyfully does.'
+					'Without much enthusiasm you rub your hand over his foreskin for a second, before pulling it back and slowly spreading his precum out with your fingers. You then clasp your fingers around the head of his cock, and slowly jerk him off. Within minutes you see Artem tense up, and he groans your name right as he shoots his warm load over your hand.'
+					'You give him a few more strokes to make sure he''s finished, and then quickly go wash his cum off your hand in the bathroom. You return to his room with a slightly faked smile. He''s completely oblivious to the fact that you didn''t really want to do it, and seems happy.'
+					npc_sex['A2'] += 1
+					hja += 1
+					gs 'arousal','hj',15,'sub'
+					if pcs_mood > 50:pcs_mood = 50
+					gs 'cum_call','hands',$boy,1
+					cumspclnt = 9
+					gs 'cum_cleanup'
+					gs 'arousal','end'
+					gs 'stat'
 
-				act 'Continue':gt 'artemhome','inside'
+					act 'Continue':gt 'artemhome','inside'
+				end
+			else
+				act 'Reluctantly masturbate Artem (<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 'Jerk off Artem':
@@ -1017,132 +1052,81 @@ if $ARGS[0] = 'artemGopSkver':
 
 		act 'Go inside with Artem':gt 'artemhome','inside'
 	end
-	act 'Stand up to them':
-		cla
-		'You indignantly reply: "He''s not a bitch, Artem is my friend!"'
-		'The Gopnik walks up to Artem, and pokes him in the chest with his finger. He asks: "Oh really... what do you think, bitch? Are you a bitch or what?"'
-		act 'Get between them':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_knee.jpg"></center>'
-			'You quickly get inbetween Artem and the Gopnik, shielding him with your body. You threaten them: Don''t touch him! I''ll call the police!"'
-			'The Gopnik is not impressed. He pulls out a knife and puts it against your throat: "Why are you wasting your time with this loser, <<$pcs_nickname>>?"'
-			'You can see his friends slowly encroaching around you. There''s no way you can run away now.'
-			'You look into his eyes and sigh: "Come on... just let us leave. Please? You can take my money."'
-			'The Gopnik is satisfied with that prospect, and lowers the knife. After you give him all your money, he lets you and Artem leave. You feel bad for getting robbed like that, but you still feel you did the right thing. Who knows what they would''ve done to Artem, if you didn''t get involved!'
-			minut += 5
-			money = 0
-			gs 'stat'
-
-			act 'Go to Artem''s apartment':gt 'artemhome','inside'
-		end
-		act 'Watch in silence':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_udar.jpg"></center>'
-			'"I''m not a bitch", Artyom says quietly.'
-			'The Gopnik grins: "We''ll see about that!"'
-			'He hits Artem hard in the stomach. Artem buckles over and falls to his knees. The Gopnik and his friends laugh while Artem lies groaning on the ground.'
-			'He turns to you: "Everyone can see he''s a bitch, <<$pcs_nickname>>. What do you even see him him? Seriously..."'
-			'Then he continues, with an evil smirk on his face: "So... you really like him? Enough to help him out of this mess he talked himself into? There is one thing you could do..."'
-			'The other Gopniks are all laughing when their leader suggests: "Do a striptease! If it''s a good one, we''ll leave him alone. Someone, play some music."'
-			minut += 5
-			gs 'stat'
+	gs 'willpower', 'misc', 'self', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Stand up to them (<<will_cost>> Willpower)':
+			gs 'willpower', 'pay', 'self'
+			cla
+			'You indignantly reply: "He''s not a bitch, Artem is my friend!"'
+			'The Gopnik walks up to Artem, and pokes him in the chest with his finger. He asks: "Oh really... what do you think, bitch? Are you a bitch or what?"'
+			gs 'willpower', 'misc', 'self', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Get between them (<<will_cost>> Willpower)':
+					gs 'willpower', 'pay', 'self'
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_knee.jpg"></center>'
+					'You quickly get inbetween Artem and the Gopnik, shielding him with your body. You threaten them: Don''t touch him! I''ll call the police!"'
+					'The Gopnik is not impressed. He pulls out a knife and puts it against your throat: "Why are you wasting your time with this loser, <<$pcs_nickname>>?"'
+					'You can see his friends slowly encroaching around you. There''s no way you can run away now.'
+					'You look into his eyes and sigh: "Come on... just let us leave. Please? You can take my money."'
+					'The Gopnik is satisfied with that prospect, and lowers the knife. After you give him all your money, he lets you and Artem leave. You feel bad for getting robbed like that, but you still feel you did the right thing. Who knows what they would''ve done to Artem, if you didn''t get involved!'
+					minut += 5
+					money = 0
+					gs 'stat'
 
-			act 'Refuse':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_udar2.jpg"></center>'
-				'Wait, what!?'
-				'You answer: "No way, you perverts! Just leave us alone!"'
-				'The Gopnik walks back over to Artem and kicks him in the face. A few seconds later, one of his friends also kicks Artem in the back. You quickly throw yourself on top of Artem and hug him, so they can''t kick him any more.'
-				'The Gopnik looks down at the two of you, and spits on the ground. He sighs: "Whatever..."'
-				'The Gopniks leave you alone and go deeper into the park, probably to go drink some beer or something. You help Artem up on his feet, carefully.'
-				'Artem wipes the blood from his face, deeply embarrassed you have to see him like this. You walk in silence as you help him get home.'
-				minut += 5
-				gs 'stat'
-				act 'Put him in bed and leave':gt 'artemhome','leave',15
+					act 'Go to Artem''s apartment':gt 'artemhome','inside'
+				end
+			else
+				act 'Get between them (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
-			act 'Dance for them':
-				inhib_exp += rand(0,1)
+			act 'Watch in silence':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_strip.jpg"></center>'
-				'Well, if that''s what you have to do to get out of here...'
-				'You begin to dance to the music a bit awkwardly, and immediately get boo''d.'
-				'The Gopnik threatens: "We said striptease, <<$pcs_nickname>>! Not dance!"'
-				'You nod and slowly begin to undress to the music, trying to avoid their greedy looks.'
-				'Artem noticed their looks as well and shouts: "<<$pcs_nickname>>, stop! You don''t have to do this!"'
-				'The Gopnik punches him in the ribs and tells him: "Shut up, bitch! She''s saving your ass, show some respect."'
-				'Artem is too afraid to argue with them, and soon the only thing you''re still wearing is your boots.'
-				'All of the Gopniks gather around you. Their leader grins and gives you a choice: "Not bad <<$pcs_nickname>>, nice tits. It''s a shame you''re wasting them on him. And now, you''re going to suck us all off. If you do a good job, we''ll let you go."'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_udar.jpg"></center>'
+				'"I''m not a bitch", Artyom says quietly.'
+				'The Gopnik grins: "We''ll see about that!"'
+				'He hits Artem hard in the stomach. Artem buckles over and falls to his knees. The Gopnik and his friends laugh while Artem lies groaning on the ground.'
+				'He turns to you: "Everyone can see he''s a bitch, <<$pcs_nickname>>. What do you even see him him? Seriously..."'
+				'Then he continues, with an evil smirk on his face: "So... you really like him? Enough to help him out of this mess he talked himself into? There is one thing you could do..."'
+				'The other Gopniks are all laughing when their leader suggests: "Do a striptease! If it''s a good one, we''ll leave him alone. Someone, play some music."'
 				minut += 5
-				gs 'shortgs','undress'
 				gs 'stat'
-
-				act 'Get down on your knees':
-					*clr & cla
-					gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
-					gs 'boyStat', $npclastgenerated,1
-					npc_sex[$npclastgenerated] += 1
-					gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
-					gs 'boyStat', $npclastgenerated,2
-					npc_sex[$npclastgenerated] += 1
-					gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
-					gs 'boyStat', $npclastgenerated,3
-					npc_sex[$npclastgenerated] += 1
-
-					gs 'arousal','bj','dick[1]',5,'sub','group','rough'
-					gs 'arousal','bj','dick[2]',5,'sub','group','rough'
-					gs 'arousal','bj','dick[3]',5,'sub','group','rough'
-					gs 'cum_call','face',$boy[1],0
-					gs 'cum_call','face',$boy[2],0
-					gs 'cum_call','face',$boy[3],0
-
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_bj.jpg"></center>'
-					'You quickly glance around you and realize there''s no way you can get past them and outrun them all. With a deep sigh, you drop to your knees and reach out for one of the exposed cocks the Gopniks are already shoving in your face.'
-					'Three of the Gopniks leave you and go keep an eye out, satisfied that you can''t run away from this position without their friends easily stopping you. The other three all offer you their cocks.'
-					'For a few seconds you try to give the first guy a blowjob, but it''s quite obvious they don''t need your cooperation. The guy roughly shoves his dick down your throat and then begins to thrust his hips against your face, roughly fucking his throat while he keeps your head in place by grabbing onto your hair.'
-					'They run a train on your face, and you''re never without a cock in your mouth for long. As soon as one guy finishes, the next takes over. After what feels like forever the third guy finally finishes, and your face is completely covered with their sperm. You can hardly open your eyes and your throat feels sore.'
-					'The Gopniks all gather around for one last laugh, and then leave you and Artem be. Artem quietly helps you put your clothes back on before walking you home.'
-					act 'Go home':
-						gs 'shortgs','dress'
+				
+				gs 'willpower', 'humiliation', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse (<<will_cost>> Willpower)':
+						gs 'willpower', 'pay', 'resist'
 						*clr & cla
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_udar2.jpg"></center>'
+						'Wait, what!?'
+						'You answer: "No way, you perverts! Just leave us alone!"'
+						'The Gopnik walks back over to Artem and kicks him in the face. A few seconds later, one of his friends also kicks Artem in the back. You quickly throw yourself on top of Artem and hug him, so they can''t kick him any more.'
+						'The Gopnik looks down at the two of you, and spits on the ground. He sighs: "Whatever..."'
+						'The Gopniks leave you alone and go deeper into the park, probably to go drink some beer or something. You help Artem up on his feet, carefully.'
+						'Artem wipes the blood from his face, deeply embarrassed you have to see him like this. You walk in silence as you help him get home.'
+						minut += 5
 						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/walk_slap.jpg"></center>'
-						'You can see Artem is mulling something over, while you walk back home.'
-						'Once you reach your apartment building, Artem says: "<<$pcs_nickname>>... I don''t think we should see each other any more, after what just happened. That was gross!"'
-						'That fucking bastard... you did that to save him! Too angry to say anything, you slap him in the face as hard as you can and then storm off, vowing to never speak to him again.'
-						act 'Leave':
-							minut += 15
-							artemblok = 1
-							artemLernQW = -1
-							gt 'artemhome','leave',5
-						end
+						act 'Put him in bed and leave':gt 'artemhome','leave',15
 					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 'Run away':
+				act 'Dance for them':
+					inhib_exp += rand(0,1)
 					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_strip.jpg"></center>'
+					'Well, if that''s what you have to do to get out of here...'
+					'You begin to dance to the music a bit awkwardly, and immediately get boo''d.'
+					'The Gopnik threatens: "We said striptease, <<$pcs_nickname>>! Not dance!"'
+					'You nod and slowly begin to undress to the music, trying to avoid their greedy looks.'
+					'Artem noticed their looks as well and shouts: "<<$pcs_nickname>>, stop! You don''t have to do this!"'
+					'The Gopnik punches him in the ribs and tells him: "Shut up, bitch! She''s saving your ass, show some respect."'
+					'Artem is too afraid to argue with them, and soon the only thing you''re still wearing is your boots.'
+					'All of the Gopniks gather around you. Their leader grins and gives you a choice: "Not bad <<$pcs_nickname>>, nice tits. It''s a shame you''re wasting them on him. And now, you''re going to suck us all off. If you do a good job, we''ll let you go."'
 					minut += 5
+					gs 'shortgs','undress'
 					gs 'stat'
-					artemGopRange = speed + pcs_agil + pcs_run
-					if artemGopRange < 50:
-						artemRand = rand(0,1)
-					elseif artemGopRange >= 50 and artemGopRange < 100:
-						artemRand = rand(0,2)
-					elseif artemGopRange >= 100 and artemGopRange < 150:
-						artemRand = rand(0,5)
-					elseif artemGopRange >= 150 and artemGopRange < 200:
-						artemRand = rand(0,10)
-					else
-						artemRand = rand(0,20)
-					end
-
-					if artemRand ! 0:
-						pcs_dom += 5
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/walk_save.jpg"></center>'
-						'You look around you, and suddenly shout in a random direction: "Dad, I''m over here!"'
-						'As the Gopniks turn around to see who you''re shouting at, you quickly grab Artem by the arm and start running. When you''re satisfied the Gopniks are no longer following you, you find a quiet area and put your clothes back on.'
-						act 'Go back to Artem''s apartment':gt 'artemhome','inside'
-					else
+					
+					act 'Get down on your knees':
 						*clr & cla
 						gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
 						gs 'boyStat', $npclastgenerated,1
@@ -1153,55 +1137,130 @@ if $ARGS[0] = 'artemGopSkver':
 						gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
 						gs 'boyStat', $npclastgenerated,3
 						npc_sex[$npclastgenerated] += 1
-						gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
-						gs 'boyStat', $npclastgenerated,4
-						npc_sex[$npclastgenerated] += 1
-						gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
-						gs 'boyStat', $npclastgenerated,5
-						npc_sex[$npclastgenerated] += 1
-						gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
-						gs 'boyStat', $npclastgenerated,6
-						npc_sex[$npclastgenerated] += 1
 
-						rape += 1
-						gang += 1
-						gs 'arousal','anal','dick[1]',5,'sub','group','rough'
+						gs 'arousal','bj','dick[1]',5,'sub','group','rough'
 						gs 'arousal','bj','dick[2]',5,'sub','group','rough'
 						gs 'arousal','bj','dick[3]',5,'sub','group','rough'
-						gs 'arousal','','dick[4]',5,'sub','group','rough'
-						gs 'arousal','bj','dick[5]',5,'sub','group','rough'
-						gs 'arousal','','dick[6]',5,'sub','group','rough'
-						gs 'arousal','bj','dick[1]',5,'sub','group','rough'
-						gs 'arousal','','dick[2]',5,'sub','group','rough'
-						gs 'arousal','anal','dick[3]',5,'sub','group','rough'
-						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'
-						minut -= 20
-						gs 'cum_call','anus',$boy[1],0
+						gs 'cum_call','face',$boy[1],0
 						gs 'cum_call','face',$boy[2],0
-						gs 'cum_call','mouth',$boy[3],0
-						gs 'cum_call','face',$boy[4],0
-						gs 'cum_call','face',$boy[5],0
-						gs 'cum_call','face',$boy[6],0
+						gs 'cum_call','face',$boy[3],0
 
 						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_rape.jpg"></center>'
-						'You look around you, and suddenly shout: "Dad, I''m over here!"'
-						'As the Gopniks turn around to see who you''re shouting at, you quickly grab Artem by the arm and start running. Unfortunately, one of the Gopniks wasn''t fooled by your diversion, and you trip over his foot when he tackles you.'
-						'The guy drops to his knees and grabs you by the hair while you lie flat on your stomach: "We warned you, <<$pcs_nickname>>. You''re all ours now."'
-						'One of them takes off his pants and drops to his knees in front of you, while the other holds his knife to your neck. He threatens: "Open up whore, or we''ll be spilling your guts all over the ground."'
-						'Two of them go stand watch, while the other four gather around you. Two of them hold you down, while the third fucks your throat and the last one fucks your pussy. They keep switching places, fucking your helpless body relentlessly while Artem watches, unable to assist you in any way.'
-						'By this point you''re too tired to resist and just let them have their way with you, and just groan through the pain when one of them puts you on your hands and knees and fucks your tight asshole. Several more follow his example, and after what feels like forever they tell you to get up to your knees.'
-						'You do as they say, and meekly open your mouth while they jerk themselves off over your face one by one. Then they all spit into your mouth, and force you to swallow it.'
-						'To add insult to injury, several of them finish it off by urinating all over you. They laugh as they get dressed again, and their leader grins benevolently: "Go home and get cleaned up. We have nothing against you, but remember this lesson, <<$pcs_nickname>>... if you keep hanging out with bitches, people will treat you like one too. You know where to find us, when you decide you want a real man". Then they leave.'
-						'Artem quietly helps you get dressed, and quietly walks you home. When you get home he finally says something: "<<$pcs_nickname>>, I''m so sorry. I know what you did for me and... I owe you. Big time. I don''t know what I can do to repay you, but if you ever need anything... please. I''m there for you."'
-						gs 'shortgs','dress'
-						act 'Leave': artemblag = 1 & gt 'artemhome','leave',15
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_bj.jpg"></center>'
+						'You quickly glance around you and realize there''s no way you can get past them and outrun them all. With a deep sigh, you drop to your knees and reach out for one of the exposed cocks the Gopniks are already shoving in your face.'
+						'Three of the Gopniks leave you and go keep an eye out, satisfied that you can''t run away from this position without their friends easily stopping you. The other three all offer you their cocks.'
+						'For a few seconds you try to give the first guy a blowjob, but it''s quite obvious they don''t need your cooperation. The guy roughly shoves his dick down your throat and then begins to thrust his hips against your face, roughly fucking his throat while he keeps your head in place by grabbing onto your hair.'
+						'They run a train on your face, and you''re never without a cock in your mouth for long. As soon as one guy finishes, the next takes over. After what feels like forever the third guy finally finishes, and your face is completely covered with their sperm. You can hardly open your eyes and your throat feels sore.'
+						'The Gopniks all gather around for one last laugh, and then leave you and Artem be. Artem quietly helps you put your clothes back on before walking you home.'
+						act 'Go home':
+							gs 'shortgs','dress'
+							*clr & cla
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/walk_slap.jpg"></center>'
+							'You can see Artem is mulling something over, while you walk back home.'
+							'Once you reach your apartment building, Artem says: "<<$pcs_nickname>>... I don''t think we should see each other any more, after what just happened. That was gross!"'
+							'That fucking bastard... you did that to save him! Too angry to say anything, you slap him in the face as hard as you can and then storm off, vowing to never speak to him again.'
+							act 'Leave':
+								minut += 15
+								artemblok = 1
+								artemLernQW = -1
+								gt 'artemhome','leave',5
+							end
+						end
+					end
+					gs 'willpower', 'group', 'resist'
+					if will_cost <= pcs_willpwr:
+						act 'Run away (<<will_cost>> Willpower)':
+							gs 'willpower', 'pay', 'resist'
+							*clr & cla
+							minut += 5
+							gs 'stat'
+							artemGopRange = speed + pcs_agil + pcs_run
+							if artemGopRange < 50:
+								artemRand = rand(0,1)
+							elseif artemGopRange >= 50 and artemGopRange < 100:
+								artemRand = rand(0,2)
+							elseif artemGopRange >= 100 and artemGopRange < 150:
+								artemRand = rand(0,5)
+							elseif artemGopRange >= 150 and artemGopRange < 200:
+								artemRand = rand(0,10)
+							else
+								artemRand = rand(0,20)
+							end
+
+							if artemRand ! 0:
+								!pcs_dom += 5
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/walk_save.jpg"></center>'
+								'You look around you, and suddenly shout in a random direction: "Dad, I''m over here!"'
+								'As the Gopniks turn around to see who you''re shouting at, you quickly grab Artem by the arm and start running. When you''re satisfied the Gopniks are no longer following you, you find a quiet area and put your clothes back on.'
+								act 'Go back to Artem''s apartment':gt 'artemhome','inside'
+							else
+								*clr & cla
+								gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
+								gs 'boyStat', $npclastgenerated,1
+								npc_sex[$npclastgenerated] += 1
+								gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
+								gs 'boyStat', $npclastgenerated,2
+								npc_sex[$npclastgenerated] += 1
+								gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
+								gs 'boyStat', $npclastgenerated,3
+								npc_sex[$npclastgenerated] += 1
+								gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
+								gs 'boyStat', $npclastgenerated,4
+								npc_sex[$npclastgenerated] += 1
+								gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
+								gs 'boyStat', $npclastgenerated,5
+								npc_sex[$npclastgenerated] += 1
+								gs 'npcgeneratec', 0, 'Gopnik', rand(16,24)
+								gs 'boyStat', $npclastgenerated,6
+								npc_sex[$npclastgenerated] += 1
+
+								rape += 1
+								gang += 1
+								gs 'arousal','anal','dick[1]',5,'sub','group','rough'
+								gs 'arousal','bj','dick[2]',5,'sub','group','rough'
+								gs 'arousal','bj','dick[3]',5,'sub','group','rough'
+								gs 'arousal','','dick[4]',5,'sub','group','rough'
+								gs 'arousal','bj','dick[5]',5,'sub','group','rough'
+								gs 'arousal','','dick[6]',5,'sub','group','rough'
+								gs 'arousal','bj','dick[1]',5,'sub','group','rough'
+								gs 'arousal','','dick[2]',5,'sub','group','rough'
+								gs 'arousal','anal','dick[3]',5,'sub','group','rough'
+								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'
+								minut -= 20
+								gs 'cum_call','anus',$boy[1],0
+								gs 'cum_call','face',$boy[2],0
+								gs 'cum_call','mouth',$boy[3],0
+								gs 'cum_call','face',$boy[4],0
+								gs 'cum_call','face',$boy[5],0
+								gs 'cum_call','face',$boy[6],0
+
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_rape.jpg"></center>'
+								'You look around you, and suddenly shout: "Dad, I''m over here!"'
+								'As the Gopniks turn around to see who you''re shouting at, you quickly grab Artem by the arm and start running. Unfortunately, one of the Gopniks wasn''t fooled by your diversion, and you trip over his foot when he tackles you.'
+								'The guy drops to his knees and grabs you by the hair while you lie flat on your stomach: "We warned you, <<$pcs_nickname>>. You''re all ours now."'
+								'One of them takes off his pants and drops to his knees in front of you, while the other holds his knife to your neck. He threatens: "Open up whore, or we''ll be spilling your guts all over the ground."'
+								'Two of them go stand watch, while the other four gather around you. Two of them hold you down, while the third fucks your throat and the last one fucks your pussy. They keep switching places, fucking your helpless body relentlessly while Artem watches, unable to assist you in any way.'
+								'By this point you''re too tired to resist and just let them have their way with you, and just groan through the pain when one of them puts you on your hands and knees and fucks your tight asshole. Several more follow his example, and after what feels like forever they tell you to get up to your knees.'
+								'You do as they say, and meekly open your mouth while they jerk themselves off over your face one by one. Then they all spit into your mouth, and force you to swallow it.'
+								'To add insult to injury, several of them finish it off by urinating all over you. They laugh as they get dressed again, and their leader grins benevolently: "Go home and get cleaned up. We have nothing against you, but remember this lesson, <<$pcs_nickname>>... if you keep hanging out with bitches, people will treat you like one too. You know where to find us, when you decide you want a real man". Then they leave.'
+								'Artem quietly helps you get dressed, and quietly walks you home. When you get home he finally says something: "<<$pcs_nickname>>, I''m so sorry. I know what you did for me and... I owe you. Big time. I don''t know what I can do to repay you, but if you ever need anything... please. I''m there for you."'
+								gs 'shortgs','dress'
+								act 'Leave': artemblag = 1 & gt 'artemhome','leave',15
+							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
 			end
 		end
+	else
+		act 'Stand up to them (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end &! --- artemgopSkver ---
 
@@ -1218,11 +1277,15 @@ if $ARGS[0] = 'start':
 		'Vitek frowns though, and says: "He ''kindly offered''... right. I don''t trust that freak! Just look at him, he''s eyeing you up and down constantly!"'
 		'Artem is getting quite nervous, and tries to appease Vitek: "Vitek, come on man! You know I would never do that! I''m only helping <<$pcs_nickname>> out with her studies, I swear!"'
 		'You can see Vitek''s body tense. He''s not buying Artem''s story at all, and looks at Artem with distrust.'
-
-		if pcs_dom >= 10:
-			act 'Reassure Vitek he can trust you':
+		
+		gs 'willpower', 'skill', 'force', 'chrsm_lvl'
+		if will_cost <= pcs_willpwr:
+			act 'Reassure Vitek he can trust you (<<will_cost>> Willpower)':
+				! I think passing this warrants some chrsm_exp. If you dont think so just remove this line
+				chrsm_exp += rand(0,will_cost)
+				gs 'willpower', 'pay', 'force'
 				cla
-				sub += 10
+				!sub += 10
 				artemVitokQW = 1
 				gs 'stat'
 				'You decide that you should step up for Artem, but also reassure Vitek you''re still with him. You need to be delicate about it, though.'
@@ -1233,8 +1296,9 @@ if $ARGS[0] = 'start':
 				'Vitek leaves you be, and you go to Artem''s home with him to study. You can see Artem''s body still trembling as you walk down the streets.'
 				act 'Do homework with Artem': gt 'artemEv','learn'
 			end
+		else
+			act 'Reassure Vitek he can trust 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 'Say nothing':
 			cla
 			artemVitokQW = 2

locations/artgar.qsrc

@@ -24,8 +24,8 @@ if apmeet = 0:
 	act 'Stay on your back':
 		*clr & cla
 		minut += 15
-		if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
-		if npcSex[6] = 0:npcSex[6] = 1 & guy += 1
+		if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
+		if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 		cumface += 2
 		facial += 1
 		gs 'pain', 1, 'eyes', 'burn'
@@ -73,8 +73,8 @@ elseif apmeet = 1:
 
 		act 'Give them a blowjob':
 			*clr & cla
-			if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
-			if npcSex[6] = 0:npcSex[6] = 1 & guy += 1
+			if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
+			if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 			cumface += 2
 			facial += 1
 			gs 'arousal', 'bj', 10, 'sub', 'humiliation', 'group'
@@ -156,8 +156,8 @@ elseif apmeet = 2:
 					pcs_hydra += 20
 					spafinloc = 12
 					gs 'cum_manage'
-					if npcSex[2] = 0:npcSex[2] = 1 & guy += 1
-					if npcSex[6] = 0:npcSex[6] = 1 & guy += 1
+					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', 'end'
 					gs 'pain', 2, 'throat', 'stretch'
@@ -351,7 +351,7 @@ elseif apmeet = 3:
 elseif apmeet = 4:
 	*clr & cla
 	minut += 30
-	sub += 1
+	!sub += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big2.jpg"></center>'
 	'When you leave school, Artem is waiting for you by the entrance like he said he would. Without saying a word, he takes you by the hand and guides you to his parents'' garage. Peter said he would be a bit late this week, so you take your time walking there. While you walk, you ask Artem: "Did you ask Petka about my suggestion for this week?"'
@@ -430,7 +430,7 @@ elseif apmeet = 5:
 	*clr & cla
 	minut += 30
 	apmeet = 6
-	pcs_dom += 10
+	!pcs_dom += 10
 	gs 'stat'
 	arthakQW = 11
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/meet6.jpg"></center>'

locations/backwater.qsrc

@@ -11,187 +11,195 @@ cls
 gs'stat'
 clothesAtLocation = FUNC('lost_clothes_here',$CURLOC)
 
-act 'Go back to the hut':minut += 5 & gt'swamp_yard'
+if $ARGS[0] = '':
+	act 'Go back to the hut':minut += 5 & gt'swamp_yard'
 
-'<center><B>Backwater</B></center>'
+	'<center><B>Backwater</B></center>'
 
-if month >= 4 and month <= 10:
-	if hour >= 6 and hour < 22:
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_night.jpg"></center>'
-	end
-else
-	if hour >= 8 and hour < 18:
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_winter.jpg"></center>'
+	if month >= 4 and month <= 10:
+		if hour >= 6 and hour < 22:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_night.jpg"></center>'
+		end
 	else
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_winter_night.jpg"></center>'
-	end
-end
-*nl
-
-'A small creek with relatively clean water. If the weather is warm you can clean yourself up. Also, if your clothes are dirty you can wash them here.'
-*nl
-if clothesAtLocation = 1:'Your clothes lie on the shore.'
-
-if $clothingworntype = 'nude':
-	act 'Wash self':
-		cla
-		*clr
-		menu_off = 1
-		dynamic $showerdin
-		face_write = 0
-		body_write = 0
-		minut += 30
-		pcs_mood += 10
-		pcs_willpwr += 5
-		inhib_exp += rand(1,3)
-		if huntersRape = 1: huntersRape = 2
-
-		if $pantyworntype = 'none':
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim2.jpg"></center>'
+		if hour >= 8 and hour < 18:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_winter.jpg"></center>'
 		else
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim1.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwater_winter_night.jpg"></center>'
 		end
-			*nl
-		'You washed yourself in the creek.'
-
-		act 'Finish':gt 'backwater'
 	end
-end
-if cumloc[11] = 1 or cumloc[12] = 1:
-	act 'Clean the sperm from your face (0:10)':
-		cla
-		*clr
-		menu_off = 1
-		pcs_makeup = 1
-		cumspclnt = 9
-		gs 'cum_cleanup'
-		cumspclnt = 13
-		gs 'cum_cleanup'
-		if pcs_sweat > 19 : pcs_sweat -= 5
-		minut += 10
-		if huntersRape = 1: huntersRape = 2
-		gs 'stat'
-
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim1.jpg"></center>'
-		*nl
-		'You carefully wash off the sperm in the creek.'
-		act 'Finish':gt 'backwater'
-	end
-end
-if body_write > 0 or face_write > 0:
-	act 'Wash the writings off your body (0:10)':
-		cla
-		*clr
-		menu_off = 1
-		body_write = 0
-		face_write = 0
-		minut += 10
-		gs'stat'
-
-		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/wash1.jpg"></center>'
-		*nl
-		'You wash off the indecent inscriptions on your body.'
+	*nl
 
-		act 'Finish':menu_off = 0 & gt $loc, $metka
-	end
-end
-if cumloc[6] = 1 or cumloc[7] = 1:
-	act 'Wipe the cum off your clothes (0:10)':
-		cla
-		*clr
-		menu_off = 1
-		cumspclnt = 6
-		gs 'cum_cleanup'
-		minut += 10
-		if huntersRape = 1: huntersRape = 2
-		gs'stat'
+	'A small creek with relatively clean water. If the weather is warm you can clean yourself up. Also, if your clothes are dirty you can wash them here.'
+	*nl
+	if clothesAtLocation = 1:'Your clothes lie on the shore.'
 
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/cumwash.jpg"></center>'
-		*nl
-		'You clean the cum stains off your clothes.'
+	if $clothingworntype = 'nude':
+		act 'Wash self':
+			cla
+			*clr
+			menu_off = 1
+			noShampoo = 1
+			dynamic $showerdin
+			face_write = 0
+			body_write = 0
+			minut += 30
+			pcs_mood += 10
+			pcs_willpwr += 5
+			inhib_exp += rand(1,3)
+			if huntersRape = 1: huntersRape = 2
 
-		act 'Finish':gt 'backwater'
+			if $pantyworntype = 'none':
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim2.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim1.jpg"></center>'
+			end
+				*nl
+			'You washed yourself in the creek.'
+			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
+			act 'Finish':gt 'backwater'
+		end
 	end
-end
+	if cumloc[11] = 1 or cumloc[12] = 1:
+		act 'Clean the sperm from your face (0:10)':
+			cla
+			*clr
+			menu_off = 1
+			pcs_makeup = 1
+			cumspclnt = 9
+			gs 'cum_cleanup'
+			cumspclnt = 13
+			gs 'cum_cleanup'
+			if pcs_sweat > 19 : pcs_sweat -= 5
+			minut += 10
+			if huntersRape = 1: huntersRape = 2
+			gs 'stat'
 
-if spdirty > 0:
-	act 'Quick wash (0:15)':
-		cla
-		*clr
-		menu_off = 1
-		cumspclnt = 4
-		gs 'cum_cleanup'
-		if pcs_sweat < 30:
-			pcs_sweat = 15 + rand(0,4)
-		else
-			pcs_sweat -= 10 + rand(0,4)
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterswim1.jpg"></center>'
+			*nl
+			'You carefully wash off the sperm in the creek.'
+			act 'Finish':gt 'backwater'
 		end
-		minut += 15
-		if huntersRape = 1: huntersRape = 2
-		gs'stat'
-		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facesp.jpg"></center>'
-		*nl
-		'You carefully wash your face, removing any impurities.'
-		act 'Finish':gt 'backwater'
 	end
-end
-
-if clothesAtLocation = 0:
-	if $clothingworntype ! 'nude' and temper >= 15:
-		act'Get undressed':
+	if body_write > 0 or face_write > 0:
+		act 'Wash the writings off your body (0:10)':
+			cla
+			*clr
 			menu_off = 1
-			if huntersKnowSlut > 0 or hunters = 0 or hour < 8 or hour >= 20 or pcs_inhib > 35:
-				cla
-				*clr
-				minut+=5
-				gs 'underwear', 'remove'
-				if huntersRape = 1: huntersRape = 2
+			body_write = 0
+			face_write = 0
+			minut += 10
+			gs'stat'
 
-				if CloSkirtShortness > 0:
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterundress_ski.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterundress.jpg"></center>'
-				end
-				gs 'clothing', 'strip', 'backwater'
-				'You do not hesitate getting undressed, not caring if anyone is watching.'
-				act'Back':gt'backwater'
-			else
-				cla
-				*clr
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/noundress.jpg"></center>'
-				'You hesitate getting undressed, what if someone suddenly sees you?'
-				act'Back':gt'backwater'
-			end
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/wash1.jpg"></center>'
+			*nl
+			'You wash off the indecent inscriptions on your body.'
+
+			act 'Finish':menu_off = 0 & gt $loc, $metka
 		end
-	else
-	'It''s too cold to undress. Maybe you should bathe inside the hut'
 	end
-else
-	if $clothingworntype ! 'nude':
-		act 'Pick up your clothes':
+	if cumloc[6] = 1 or cumloc[7] = 1:
+		act 'Wipe the cum off your clothes (0:10)':
 			cla
 			*clr
 			menu_off = 1
-			gs 'clothing', 'recover_lost_clothes', 'backwater'
-			'You pick up your clothes laying on the ground.'
-			gt $loc, $metka
+			cumspclnt = 6
+			gs 'cum_cleanup'
+			minut += 10
+			if huntersRape = 1: huntersRape = 2
+			gs'stat'
+
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/cumwash.jpg"></center>'
+			*nl
+			'You clean the cum stains off your clothes.'
+
+			act 'Finish':gt 'backwater'
 		end
-	elseif forced_naked_day < daystart:
-		act 'Get dressed':
+	end
+
+	if spdirty > 0:
+		act 'Quick wash (0:15)':
 			cla
 			*clr
 			menu_off = 1
-			gs 'clothing', 'recover_lost_clothes', 'backwater', 1
-			gs 'underwear', 'wear'
-			'You pick up your clothes laying on the ground and get dressed.'
-			gt $loc, $metka
+			cumspclnt = 4
+			gs 'cum_cleanup'
+			if pcs_sweat < 30:
+				pcs_sweat = 15 + rand(0,4)
+			else
+				pcs_sweat -= 10 + rand(0,4)
+			end
+			minut += 15
+			if huntersRape = 1: huntersRape = 2
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facesp.jpg"></center>'
+			*nl
+			'You carefully wash your face, removing any impurities.'
+			act 'Finish':gt 'backwater'
+		end
+	end
+
+	if clothesAtLocation = 0:
+		if $clothingworntype ! 'nude' and temper >= 15:
+			act'Get undressed':
+				menu_off = 1
+				if huntersKnowSlut > 0 or hunters = 0 or hour < 8 or hour >= 20 or pcs_inhib > 35:
+					cla
+					*clr
+					minut+=5
+					gs 'underwear', 'remove'
+					if huntersRape = 1: huntersRape = 2
+
+					if CloSkirtShortness > 0:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterundress_ski.jpg"></center>'
+					else
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/backwaterundress.jpg"></center>'
+					end
+					gs 'clothing', 'strip', 'backwater'
+					'You do not hesitate getting undressed, not caring if anyone is watching.'
+					act'Back':gt'backwater'
+				else
+					cla
+					*clr
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/noundress.jpg"></center>'
+					'You hesitate getting undressed, what if someone suddenly sees you?'
+					act'Back':gt'backwater'
+				end
+			end
+		else
+		'It''s too cold to undress. Maybe you should bathe inside the hut'
+		end
+	else
+		if $clothingworntype ! 'nude':
+			act 'Pick up your clothes':
+				cla
+				*clr
+				menu_off = 1
+				gs 'clothing', 'recover_lost_clothes', 'backwater'
+				'You pick up your clothes laying on the ground.'
+				gt $loc, $metka
+			end
+		elseif forced_naked_day < daystart:
+			act 'Get dressed':
+				cla
+				*clr
+				menu_off = 1
+				gs 'clothing', 'recover_lost_clothes', 'backwater', 1
+				gs 'underwear', 'wear'
+				'You pick up your clothes laying on the ground and get dressed.'
+				gt $loc, $metka
+			end
 		end
 	end
+
+end
+
+if $ARGS[0] = 'creekside_relax':
+
 end
 
-if $clothingworntype = 'nude' and huntersKnowSlut = 0 and hunters = 1 and hour > 8 and hour < 20 and hunterknowday < day:
+if $clothingworntype = 'nude' and igor_away = 'no' and rand(1,10) = 1:
 	cla
 	*clr
 	menu_off = 1

locations/bass.qsrc

@@ -56,7 +56,7 @@ if $ARGS[0] = 'a':
 				'"Hi! I''m <<$pcs_nickname>>."'
 				'"How about we take a swim together, <<$pcs_nickname>>?"'
 				'Before you''re able to answer, Kisame grabs you by the waist and takes a powerful leap into the middle of the pool.'
-
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 				act 'Next':gt 'kisameQW', 'start'
 			end
 
@@ -66,7 +66,7 @@ if $ARGS[0] = 'a':
 				'"That''s not nice!" he replies.'
 				'Before you''re able to blink, he grabs you by the waist and throws you into the middle of the pool.'
 				'As you surface, you notice Kisame rapidly approaching you...'
-
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 				act 'Next':gt 'kisameQW', 'start'
 			end
 		end
@@ -149,7 +149,7 @@ if $ARGS[0] = 'a':
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/pool/poolswimpreg.jpg"></center>'
 		end
 		'You take a swim in the pool, which invigorates you, making you feel refreshed.'
-
+		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 		act 'Get out of the water':gt 'bass', 'start'
 	end
 

locations/bed2.qsrc

@@ -150,9 +150,7 @@ if $ARGS[0] = 'sleep':
 		notathomesleep = 0
 	end
 
-	if $loc = 'nichBedroomServant':
-		gs 'nichBedroomServant', 'sleepEvents'
-	end
+	
 
 	if succubusflag = 1 and sucwalkday <= daystart and (succublvl <= rand(1,20) or pcs_willpwr < ((succublvl * willpowermax) / 10) or sucpowzeroed >= 3): gs 'succubus', 'sucwalkinginit'
 
@@ -243,6 +241,11 @@ if $ARGS[0] = 'sleep':
 end
 
 if $ARGS[0] = 'dream':
+
+	if $loc = 'nichBedroomServant':
+		gs 'nichBedroomServant', 'sleepEvents'
+	end
+
 	*clr & cla
 	menu_off = 1
 	InSleep = 1

locations/bedrPar.qsrc

@@ -44,14 +44,14 @@ if sisterHere = 2 and popugai2 = 1 and sispopconf = 0:
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
-	'"What is that ?" your sister asks while pointing at <<$namepopu2>> in his cage'
+	'"What is that?" your sister asks while pointing at <<$namepopu2>> in his cage'
 	'"I went to the shopping center and bought this bird. Isn''t he the cutest ?"'
 	if npc_rel['A33'] > 50:
-		'"Not really, but I can see this is something you really want. So as long as he doesn''t make too much noise I don''t really care"'
+		'"Not really, but I can see this is something you really want. As long as he doesn''t make too much noise, I don''t really care"'
 		sispopconf = 1
 	end
 	if npc_rel['A33']  <= 50:
-		'"No he is not cute, and I suggest you take it out of here, I am not sharing my room with a bird. "'
+		'"No he isn''t cute, and I suggest you take it out of here, I am not sharing my room with a bird."'
 		'You feel kind of sad but you understand your sister. You should have asked her before buying it.'
 		'You go to the window, open it and release the bird'
 		popugai2 = 0
@@ -79,7 +79,7 @@ if popugai2 = 1:
 	if daystart - parbuydate > 40 and daystart - parbuydate <= 50: 'When <<$namepopu2>> sees you he starts ''speaking''. He is saying "<b><<$npc_firstname[''A33'']>> you''re the best</b>"'
 	if daystart - parbuydate > 50 and daystart - parbuydate <= 55: 'When <<$namepopu2>> sees you he starts ''speaking''. He is saying "<b>Yeah <<$npc_firstname[''A33'']>> swallow it all</b>"'
 	if daystart - parbuydate > 55 and saveparQW < 3: 'When <<$namepopu2>> sees you he starts ''speaking''. He is saying "<b>Yeah <<$npc_firstname[''A33'']>>  your pussy tastes great</b>"'
-	if  saveparQW = 3:
+	if saveparQW = 3:
 		parfixrand = rand(0,9)
 		if parfixrand = 0:'When <<$namepopu2>> sees you he starts ''speaking''. He  is saying "<b>What Did You Say To Me?</b>"'
 		if parfixrand = 1:'When <<$namepopu2>> sees you he starts ''speaking''. He  is saying "<b>3.1415926535897932384 ....</b>"'
@@ -147,7 +147,7 @@ else
 
 			pcs_mood -= 10
 			'<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
-			'You sit down at the desk and do your coursework, you''ve finished <<kursovik>> percent of it.'
+			'You sit down at the desk and do your coursework. You''ve finished <<kursovik>> percent of it.'
 
 			act 'Leave your desk':gt $curloc
 		end
@@ -165,7 +165,7 @@ else
 
 	gs 'events', 'read'
 
-	if tovarL > 0:'You currently have <<tovarL>> trinkets to sell at the station. The maximum you can carry with you is 30.'
+	if tovarL > 0:'You currently have <<tovarL>> trinkets to sell at the station. The maximum you can carry is 30.'
 
 	if vcard > 0: act 'View your vintage porn cards':card_deck = 0 & gt 'card'
 	if card > 0: act 'View your new porn cards':card_deck = 1 & gt 'card'

locations/beg.qsrc

@@ -14,7 +14,7 @@ if $ARGS[0] = 'start':
 		abonement -= 1
 		pcs_mood += 2
 		fat -= 2
-		pcs_sweat += 30
+		gs 'sweat', 'add', 30
 		pcs_stam -= 30
 		run_exp += rand(2, 3)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit5.jpg"></center>'

locations/beg1.qsrc

@@ -72,7 +72,7 @@ if $ARGS[0] = 'br':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
 	if salo > 40: begminus = ((salo - 35)/5)
@@ -82,7 +82,15 @@ if $ARGS[0] = 'br':
 	'Your discipline: The Women''s 400 Meter Dash.' 
 	'After changing into your running gear, you spend some time warming up in the empty stadium before the race starts.' 
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 	
 	if begresult <= 18:  
 		'Sadly, you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
@@ -122,7 +130,7 @@ if $ARGS[0] = '3':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
 	if salo > 40: begminus = ((salo - 35)/5)
@@ -132,7 +140,15 @@ if $ARGS[0] = '3':
 	'Your discipline: The Women''s 400 Meter Dash.' 
 	'After changing into your running gear, you spend some time warming up in the empty stadium before the race starts.' 
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 18:
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
@@ -168,7 +184,7 @@ if $ARGS[0] = '2':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
 	if salo > 40: begminus = ((salo - 35)/5)
@@ -178,7 +194,15 @@ if $ARGS[0] = '2':
 	'Your discipline: The Women''s 400 Meter Dash.' 
 	'After changing into your running gear, you spend some time warming up in the stadium before the race starts, only a hundred people or so on the ranks watching you but with how big the stadium is, you can barely even see them.' 
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 18:
 		gs 'fame', 'city', 'running', 1
@@ -215,7 +239,7 @@ if $ARGS[0] = '1':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
 	if salo > 40: begminus = ((salo - 35)/5)
@@ -226,7 +250,15 @@ if $ARGS[0] = '1':
 	'After changing into your running gear, you spend some time warming up in the stadium before the race starts.' 
 	'Only 1,000 people came to watch the city championship, spread out over the large stadium.' 
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 18:
 		gs 'fame', 'city', 'running', 1
@@ -252,7 +284,7 @@ if $ARGS[0] = '1':
 	elseif begresult < 46:
 		gs 'fame', 'city', 'running', 5
 		silverbeg += 1 & money += 3000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 3, 000 <b>₽</b>'
-	elseif  begresult >= 46:
+	elseif begresult >= 46:
 		gs 'fame', 'city', 'running', 6
 		razradbeg = 4 & goldbeg += 1 & money += 4000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 4000 <b>₽</b> and became the "Track Champion of the Leningrad Oblast", not only putting you on the list of the 50 best track athletes in the Russian Federation but also qualifying you for the next district championship!'
 	end
@@ -263,7 +295,7 @@ if $ARGS[0] = 'kms':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
 	if salo > 40: begminus = ((salo - 35)/5)
@@ -274,7 +306,15 @@ if $ARGS[0] = 'kms':
 	'After changing into your running gear, you spend some time warming up in the stadium before the race starts.' 
 	'Maybe 5,000 people came to watch the district championship, the stadium far from full.' 
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 18:
 		gs 'fame', 'city', 'running', 2
@@ -311,7 +351,7 @@ if $ARGS[0] = 'ross':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
 	if salo > 40: begminus = ((salo - 35)/5)
@@ -323,7 +363,15 @@ if $ARGS[0] = 'ross':
 	'At least 30,000 people came to national championship, putting the stadium at a little less than half capacity.'
 !! Took the Krestovsky Stadium for reference.
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 18:
 		gs 'fame', 'city', 'running', 4
@@ -360,7 +408,7 @@ if $ARGS[0] = 'kval':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	razradbeg += 1
 	
@@ -371,7 +419,15 @@ if $ARGS[0] = 'kval':
 	'Your discipline: The Women''s 400 Meter Dash.' 
 	'After changing into your running gear, you spend some time warming up in the empty stadium before the race starts.' 
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 18:
 		gs 'fame', 'city', 'running', 4
@@ -408,7 +464,7 @@ if $ARGS[0] = 'evro':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	razradbeg += 1
 	
@@ -421,7 +477,15 @@ if $ARGS[0] = 'evro':
 	'The stadium is well-attended - about 50,000 people, you''d wager - here to watch athletics competitions between the best European athletes, you one of them.'
 	!! Took the Krestovsky Stadium for reference.
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 
 	if begresult <= 16:
 		gs 'fame', 'city', 'running', 6
@@ -465,7 +529,7 @@ if $ARGS[0] = 'Int':
 	cla
 	run_exp += 1
 	fat -= 2
-	pcs_sweat += 30
+	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	razradbeg += 1
 	
@@ -477,7 +541,15 @@ if $ARGS[0] = 'Int':
 	'The stadium is full, almost bursting with people. There must be 70,000 people here to watch athletics competitions with competitors from all over the world. Only the best of the best even made it here and you are proud to be one of them.'
 	!! Took the Krestovsky Stadium for reference.
 	'When you and the other runners are called, you walk to your starting position, tense but ready.' 
+	wait 725
 	'You get in position. Then, you hear the starting shot: The race begins!'
+	wait 725
+	'On your marks...'
+	wait 725
+	'Get set...'
+	wait 725
+	'Go! - You''re away!'
+	wait 725
 	
 	if begresult < 18:
 		gs 'fame', 'city', 'running', 10

locations/bicycle.qsrc

@@ -31,7 +31,7 @@ if $ARGS[0] = 'sarai':
 				stren_exp += rand(0,2)
 				fat -= 5
 				pcs_mood += 5
-				pcs_sweat += 2
+				gs 'sweat', 'add', 2
 				findvelrand = RAND(0,100)
 				if $clothingworntype = 'nude':
 					pcs_horny += 20
@@ -111,7 +111,7 @@ if $ARGS[0] = 'sarai':
 			stren_exp += rand(0,1)
 			fat -= 1
 			pcs_mood += 5
-			pcs_sweat += 1
+			gs 'sweat', 'add', 1
 			findvel = 3
 			gs'stat'
 			!gs'time'
@@ -203,7 +203,7 @@ if $ARGS[0] = 'swamp':
 			run_exp += RAND(0,1)
 			stren_exp += rand(0,1)
 			fat -= 1
-			pcs_sweat += 1
+			gs 'sweat', 'add', 1
 			pcs_mood += 10
 			findvel = 1
 			hunters = 0

locations/blowPR.qsrc

@@ -12,7 +12,7 @@ if $ARGS[0] = 'start':
 	pcs_throat += 1
 	prosta += 1
 	!pcs_sleep = pcs_sleep - 1
-	if RAND(0,100) >= 70:dynamic $venerasiak
+	if RAND(0,100) >= 70:gs 'dinSex', 'std_trigger'
 	gs'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/shared/sex/car/bj.jpg"></center>'
@@ -27,7 +27,7 @@ if $ARGS[0] = '1':
 	$loc = $CURLOC
     $location_type = 'event'
 	protect = 1
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	protect = 0
 	*clr & cla
 	minut = minut + 5
@@ -69,7 +69,7 @@ if $ARGS[0] = '2':
     $location_type = 'event'
 	*clr & cla
 	menu_off = 1
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	minut = minut + 5
 	gs'stat'
 

locations/bobka.qsrc

@@ -21,7 +21,7 @@ if ARGS[0] = 0:
 	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
 	gs 'stat'
 	
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	dynamic $bobkabj
 	
 	gs 'arousal', 'end'
@@ -35,7 +35,7 @@ if ARGS[0] = 1:
 	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
 	gs 'stat'
 	
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	dynamic $bobkabj
 	gs 'stat'
 
@@ -46,7 +46,7 @@ if ARGS[0] = 1:
 		sexpartkno = 1
 		dick = npc_dick['A49']
 		silavag = npc_sexskill['A49']
-		dynamic $venerasiak
+		gs 'dinSex', 'std_trigger'
 		'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/doggy.jpg"></center>'
 		
 		gs 'arousal', 'vaginal', 5, 'sub'
@@ -70,14 +70,14 @@ if ARGS[0] = 2:
 	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
 	gs 'stat'
 	
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger'
 	dynamic $bobkabj
 	gs 'stat'
 
 	act 'Drop down into a doggystyle position for Bobka':
 		cls
 		gs 'boyStat', 'A49'
-		dynamic $venerasiak
+		gs 'dinSex', 'std_trigger'
 		$boydesc = $npc_usedname['A49']
 		sexpartkno = 1
 		dick = npc_dick['A49']

locations/body_din.qsrc

@@ -0,0 +1,40 @@
+# body_din
+!! Medical procedures, such as abortions, are located at medical_din
+
+
+!! Determines whether a NPC sees that another character is pregnant.
+!! If ARGS 1-3 are not set the observed character is the player character (Sveta)
+!! Usage: visible = FUNC('body_din','pregnancyVisibility')
+!! Return values:
+!!				0: Has no reason to believe Sveta is pregnant
+!!				1: Believes Sveta is pregnant
+!! Parameters:
+!!				ARGS[1]; The current pregnancy state (default: pregchem)
+!!				$ARGS[2]: The worn clothing type (default $clothingworntype)
+!!				ARGS[3]: The worn clothing numer  (default: clothingwornnumber)
+
+if $ARGS[0] = 'pregnancyVisibility':
+	RESULT = 0
+	pregchemTemp = iif(ARGS[1] = 0,pregchem,ARGS[1])
+	$clothingworntypeTemp = iif(ARGS[2] = '',$clothingworntype,ARGS[2])
+	clothingwornnumberTemp = iif(ARGS[3] = 0,clothingwornnumber,ARGS[3])
+	
+	gs 'clothing_attributes',$clothingworntypeTemp,clothingwornnumberTemp
+	if (CloThinness >= 5 or $clothingworntypeTemp = 'nude') and pregchemTemp > 2000: 
+		RESULT = 1
+	elseif CloThinness = 4 and pregchemTemp > 3460: 
+		RESULT = 1
+	elseif CloThinness = 3 and pregchemTemp > 3990: 
+		RESULT = 1	
+	elseif CloThinness = 2 and pregchemTemp > 4200: 
+		RESULT = 1	
+	elseif pregchemTemp > 5200: 
+		RESULT = 1	
+	end
+
+	killvar 'pregchemTemp'
+	killvar '$clothingworntypeTemp'
+	killvar 'clothingwornnumberTemp'
+end
+
+--- body_din ---------------------------------

locations/bordel.qsrc

@@ -129,7 +129,7 @@ if $ARGS[0] = 'var':
 			minut += 10
 			zpprand = rand(0, 100)
 
-			if zpprand >= 70:dynamic $venerasiak
+			if zpprand >= 70:gs 'dinSex', 'std_trigger'
 
 			picrand = rand(0,40)
 			gt 'sex', 'start'
@@ -147,7 +147,7 @@ if $ARGS[0] = 'var':
 			minut += 10
 			zpprand = rand(0, 100)
 
-			if zpprand >= 70:dynamic $venerasiak
+			if zpprand >= 70:gs 'dinSex', 'std_trigger'
 
 			gt 'podrsex', 'start'
 		end
@@ -164,7 +164,7 @@ if $ARGS[0] = 'var':
 			minut += 10
 			zpprand = rand(0, 100)
 
-			if zpprand >= 70:dynamic $venerasiak
+			if zpprand >= 70:gs 'dinSex', 'std_trigger'
 
 			gt 'sexdvoe', 'start'
 		end
@@ -181,7 +181,7 @@ if $ARGS[0] = 'var':
 			minut += 10
 			zpprand = rand(0, 100)
 
-			if zpprand >= 70:dynamic $venerasiak
+			if zpprand >= 70:gs 'dinSex', 'std_trigger'
 
 			gt 'sexdvanadva', 'start'
 		end
@@ -198,7 +198,7 @@ if $ARGS[0] = 'var':
 			minut += 10
 			zpprand = rand(0, 100)
 
-			if zpprand >= 70:dynamic $venerasiak
+			if zpprand >= 70:gs 'dinSex', 'std_trigger'
 
 			guy += 3
 			killvar '$boy'

locations/brosh.qsrc

@@ -126,7 +126,7 @@ elseif evgentipe = 2:
 				if brosh_rand1 >= 5 and brosh_rand1 < 30:'<center><video autoplay loop src="images/shared/sex/public/publ1,<<rand(0,2)>>.mp4"></video></center>'
 				if brosh_rand1 >= 30:'<center><img <<$set_imgh>> src="images/shared/sex/public/publ1,<<rand(0,6)>>.jpg"></center>'
 				'You bend over and let your brother take you from behind.'
-				dynamic $sexstart
+				gs 'dinSex', 'wear_condom'
 				gs 'dinsex','vaginal_sex',10
 				gs 'dinsex','sexcum'
 

locations/brothel.qsrc

@@ -513,7 +513,7 @@ if $ARGS[0] = 'brothel:section1:girlroom':
 	 *nl
 	'A room made for the working girls, like yourself.'
 	'It is equipped with a shower, almost on every wall hangs a large <a href="exec:gt ''mirror'', ''start''">mirror</a>. There is a water cooler beside the door, and some light snacks on the table, in case the girls get hungry or thirsty between sessions.'
-	'In a box beneath a table you can take some '+iif(kosmetica < 1,'<a href="exec: kosmetica += 5 & gt ''brothel'', $metka">cosmetics</a>','cosmetics')+' (you have '+kosmetica+') or, '+iif(lipbalm < 1,'<a href="exec: lipbalm += 5 & gt ''brothel'', $metka">lip balm</a>','lip balm')+' (you have '+lipbalm+'), or '+iif(stanok < 1,'<a href="exec: stanok += 5 & gt ''brothel'', $metka">shaving</a>','shaving')+' equipment (you have '+stanok+'), if you don''t have any. <a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
+	'In a box beneath a table you can take some '+iif(kosmetica < 1,'<a href="exec: kosmetica += 5 & gt ''brothel'', $metka">cosmetics</a>','cosmetics')+' (you have '+kosmetica+') or, '+iif(shampoo < 1,'<a href="exec: shampoo += 5 & gt ''brothel'', $metka">shampoo</a>','shampoo')+', '+iif(lipbalm < 1,'<a href="exec: lipbalm += 5 & gt ''brothel'', $metka">lip balm</a>','lip balm')+' (you have '+lipbalm+'), or '+iif(stanok < 1,'<a href="exec: stanok += 5 & gt ''brothel'', $metka">shaving</a>','shaving')+' equipment (you have '+stanok+'), if you don''t have any. <a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
 	'For obvious reasons there is also a box with an '+iif(klisma < 1,'<a href="exec: klisma += 1 & gt ''brothel'', $metka">enema kit</a>','enema kit')+'. A box with some '+iif(painkiller < 1,'<a href="exec: painkiller += 5 & gt ''brothel'', $metka">painkillers</a>','painkillers')+' (you have '+painkiller+') is there, in case someone needs pain relief.'
 	'On the table lies a list with instructions, in case you don''t already remember them:'
 	*nl
@@ -533,17 +533,22 @@ if $ARGS[0] = 'brothel:section1:girlroom':
 	act 'Have a glass of water (0:05)':gs 'beverage', 'bev_wat'
 	act 'Change your clothes':gt 'wardrobe', 'start'
 	act 'Look in the mirror': gt 'mirror', 'start'
-	act 'Have a shower':
-		cls
-		dynamic $showerdin
-		gs 'stat'
-		'<h3>Girl room</h3>'
-		'<h5>Shower</h5>'
-		'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
-		''
-		'After taking off all of your clothes, you gather up your towel, washcloth and soap, then head to the shower. You wash yourself thoroughly to be as clean as possible to potential clients.'
-		dynamic $dryOff
-		if stanok > 0: dynamic $brit
+	if shampoo > 0:
+		act 'Have a shower':
+			cls
+			dynamic $showerdin
+			gs 'stat'
+			'<h3>Girl room</h3>'
+			'<h5>Shower</h5>'
+			'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
+			''
+			'After taking off all of your clothes, you gather up your towel, washcloth and soap, then head to the shower. You wash yourself thoroughly to be as clean as possible to potential clients.'
+			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
+			dynamic $dryOff
+			if stanok > 0: dynamic $brit
+		end
+	else
+		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
 	end
 	gs 'din_van', 'prvt_pee'
 	dynamic $toymanage

locations/brother.qsrc

@@ -398,7 +398,7 @@ if $ARGS[0] = 'playfootball':
 		minut += 60
 		if npc_rel['A34'] <50:npc_rel['A34'] += rand(1,2)
 		agil_exp += rand(0, 2)
-		pcs_sweat += 30
+		gs 'sweat', 'add', 30
 		run_exp += rand(0, 2)
 		fat -= rand(2, 7)
 		gs 'stat'
@@ -741,7 +741,7 @@ if $ARGS[0] = 'brotherSexStart':
 
 			gs 'arousal', 'bj', 5, 'incest'
 			gs 'stat'
-			gs 'dinsex','dinrandbj'
+			gs 'dinsex','bj_random'
 
 			'It isn''t long before you hear your brother moan, "I''m gonna cum, <<$pcs_nickname>>!"'
 
@@ -757,7 +757,7 @@ if $ARGS[0] = 'brotherSexStart':
 				gs 'arousal', 'bj', 5, 'incest'
 				gs 'stat'
 
-				gs 'dinsex','dinrandswallow'
+				gs 'dinsex','bj_swallow_random'
 
 				gs 'brother', 'brotherSexEnd'
 			end
@@ -974,7 +974,7 @@ if $ARGS[0] = 'brother_voyeur_ev2':
 	picrand = rand(1,7)
 	if npc_rel['A34'] <50:npc_rel['A34'] += rand(1,2)
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/shower/c (<<picrand>>).jpg"></center>'
-	'You turn to face the door, giving Kolka a better view of your body and then erotically squeeze your <<$titsize>> tits. Your fingers graze over your <<pcdesc_nipples>> nipples and you can''t help but give them a slight pinch. You reach for the detachable shower head and begin spraying water over your chest, all the way gazing at your awestruck sibling. You close your eyes and in the heat of the moment, your heart flutters and you let out a light moan.'
+	'You turn to face the door, giving Kolka a better view of your body and then erotically squeeze your <<$titsize>> tits. Your fingers graze over your <<$pcdesc_nipples>> nipples and you can''t help but give them a slight pinch. You reach for the detachable shower head and begin spraying water over your chest, all the way gazing at your awestruck sibling. You close your eyes and in the heat of the moment, your heart flutters and you let out a light moan.'
 
 	gs 'arousal','breasts', 3, 'incest'
 	gs 'stat'
@@ -1460,22 +1460,22 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 end
 
 if $ARGS[0] = 'pregreact':
-	if knowpreg = 1 and kid = 0:
-		if $clothingworntype = 'nude' and pregchem > 2000 and brotherSex < 7 and kid = 0:
+	if knowpreg = 1 and kid = 0 and FUNC('body_din','pregnancyVisibility') = 1:
+		if $clothingworntype = 'nude' and brotherSex < 7:
 			'Surprised, your brother looks at your stomach. "<<$pcs_nickname>>, are you pregnant? <<$npc_nickname[''A29'']>> and dad are going to be pissed!" After a moments pause he adds, "You do still look good, though."'
 			npc_pregtalk['A34'] = 1
 
 			act 'Continue' :gt 'sitrPar'
 		exit
 
-		elseif $clothingworntype ! 'nude' and pregchem > 3460 and brotherSex < 7 and kid = 0:
+		elseif $clothingworntype ! 'nude' and brotherSex < 7:
 			'Surprised, your brother looks at your stomach, "<<$pcs_nickname>>, why didn''t you tell me I''m going to be an uncle?"'
 			npc_pregtalk['A34'] = 1
 
 			act 'Continue' :gt 'sitrPar'
 			exit
-
-		elseif brotherSex >= 7 and kid = 0 and npc_pregtalk['A29'] = 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
+		
+		elseif brotherSex >= 7 and npc_pregtalk['A29'] = 0:
 			cla
 			'Surprised, your brother looks at your stomach, "Are you really pregnant? It... it''s not mine, is it?"'
 			*nl
@@ -1490,7 +1490,7 @@ if $ARGS[0] = 'pregreact':
 			end
 			exit
 		end
-	elseif brotherSex < 7 and kid > 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem > 3460)):
+	elseif brotherSex < 7 and kid > 0 and FUNC('body_din','pregnancyVisibility') = 1:
 		'"You''re already pregnant again? This is starting to look like a new hobby," he laughs.'
 		'"You know what? Maybe it is," you joke back. "Some girls play sports, I get serially impregnated."'
 		'Kolka pokes his tongue out at you, "Well, congratulations on taking home the gold in getting knocked up."'
@@ -1500,7 +1500,7 @@ if $ARGS[0] = 'pregreact':
 		'You leave your brother to what he was doing before, glad that the two of you have the relationship that you do.'
 
 		act 'Continue' :npc_pregtalk['A34'] = 1 & gt 'sitrPar'
-	elseif brotherSex >= 7 and kid > 0 and npc_pregtalk['A29'] = 0 and (($clothingworntype = 'nude' and pregchem >= 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460)):
+	elseif brotherSex >= 7 and kid > 0 and npc_pregtalk['A29'] = 0 and FUNC('body_din','pregnancyVisibility') = 1:
 		cla
 		'Kolka looks at your stomach for moment before asking, "Wow, you''re pregnant again? Is it mine?"'
 		*nl

locations/brother_lessons.qsrc

@@ -38,9 +38,9 @@ if $ARGS[0] = 'homework':
 						'After you finish explaining the new material, Kolka goes red with excitement and asks:'
 						'"<<$pcs_nickname>>, Can you help me out here now?"'
 						if pcs_horny > 80:
-							act 'How could i say no if you keep asking so nice?': gs 'brother', 'brotherSexStart'
+							act 'How could I say no if you keep asking so nice?': gs 'brother', 'brotherSexStart'
 						else
-							act 'I think i could teach you a thing or two': gs 'brother', 'brotherSexStart'
+							act 'I think I could teach you a thing or two': gs 'brother', 'brotherSexStart'
 							act 'Maybe next time...': gt 'sitrPar'
 						end
 					end

locations/brother_voyeur.qsrc

@@ -59,7 +59,7 @@ if $ARGS[0] = 'showertalk1':
 		'"Of course not silly! I''m not even mad! I just wanted to catch up with my favorite little brother and I thought, since you were right there, why not now?"'
 		'"Oh, okay..." he nods, still looking away.'
 		if npc_rel['A34'] <50:npc_rel['A34'] += rand(1,3)
-		
+
 		if pcs_inhib >= 40 or npc_rel['A34'] >= 90:
 			act'"You can look at me you know"':
 				npc_rel['A34'] += 5
@@ -153,7 +153,7 @@ if $ARGS[0] = 'showertalk2':
 			npc_rel['A34'] += 5
 			bro_ass_compliment = rand(1,3)
 			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothertalk4.jpg"></center>'
-			
+
 			'"Kolka..." When you say this he starts to turn towards you a little bit but then stops himself and continues to stare at the wall. You sigh sympathetically. "It''s okay to look at me you know."'
 			'He perks up and turns towards you slowly. "R-really?" His wide eyes rapidly flit between your face, your breasts, your <<$pcdesc_pubes>> pussy, the walls, and the floor, unable to make up his mind of where he should be looking.'
 			'"Yes really!" you laugh. "Yeah, yeah, I know. I''ve got boobs. I''ve got a pussy instead of a penis. I know it''s strange and distracting and all that, but you''re my brother and I love you! I don''t want to have to share my conversations between you and the wall. So, I don''t mind you looking. If it means I can spend this time getting closer to you, you can look all you want. Okay?"'
@@ -209,7 +209,7 @@ if $ARGS[0] = 'showertalk2':
 			if brothershowertalk <= 5:
 				'You casually chat with him about how he''s doing in school while you shower. He sits on the toilet seat and faces away from you, awkwardly answering all your questions and queries, but you still see him occasionally stealing glances at your naked body. Not that it bothers you any, as you simply smile to yourself, amused that he thinks he''s still being sneaky.'
 				act'Continue':gt'brother_voyeur','shave'
-				
+
 			elseif brothershowertalk > 5:
 				'He energetically talks to you about school and how it''s going for him, though he still sits on the toilet facing away. He also still takes a few looks at you now and again but they aren''t as sneaky and they mostly seem to be glances to see your face. <i>Not that his eyes don''t wander downward anyways...</i> you notice with a smile.'
 				brothershowerschooltalk = rand(1,3)
@@ -222,7 +222,7 @@ if $ARGS[0] = 'showertalk2':
 					elseif pcs_grades < 50:
 						'"Blegh! Yeah, you''re right. Math sucks!" you grumble in agreement.'
 					end
-					
+
 					act'Continue':gt'brother_voyeur','shave'
 
 				elseif brothershowerschooltalk = 2:
@@ -271,7 +271,7 @@ if $ARGS[0] = 'showertalk2':
 					act'Continue':gt'brother_voyeur','shave'
 
 				elseif brothershowerfriendtalk = 3:
-					'"... I wish I had more time to play football with Zhendos and Mishan though," he says, snapping you out of your idle thoughts and bringing you back to the room. "I can''t do anything with them when <<$npc_nickname[''A29'']>> is dragging us to Gadukino every other weekend."'
+					'"I wish I had more time to play football with Zhendos and Mishan though," he says, snapping you out of your idle thoughts and bringing you back to the room. "I can''t do anything with them when <<$npc_nickname[''A29'']>> is dragging us to Gadukino every other weekend."'
 					*nl
 					if seepornofut = 0:
 						'"It''s okay Kolka," you console him. "Just enjoy the time you have with them. In a couple years <<$npc_nickname[''A29'']>> might not force you to go anymore but you all might end up too busy to hang out."'
@@ -285,7 +285,7 @@ if $ARGS[0] = 'showertalk2':
 				end
 			end
 		end
-		
+
 		if pcs_horny >= 55:
 			act'Use the showerhead on your pussy':
 				cla & *clr
@@ -330,7 +330,7 @@ if $ARGS[0] = 'showertalk2':
 							'As your orgasm winds down, you breathe deeply and glance upward towards your brother. You quickly stiffen up when you see what looks to be like the finishing movements of his shoulders turning back forward. Were you so caught up in pleasure that you didn''t notice that he was watching you masturbate in front of him?'
 							'You gulp and try to continue the conversation normally. His responses seem more or less the same and the conversation doesn''t seem to be any different other than a burning in your cheeks. Maybe he didn''t see anything after all? But you can''t be sure...'
 						end
-						
+
 						if pcs_pubes >= 4 or pcs_leghair >= 4:
 							act'Continue':gt'brother_voyeur','shave'
 						else
@@ -760,7 +760,7 @@ if $ARGS[0] = 'brother_shower_together':
 					end
 				end
 			end
-			act'"Give him "shower head"':
+			act'Give him shower head':
 				cla
 				npc_rel['A34'] += 5
 				if brotherbj < 1 and brotherfuck < 1:
@@ -1448,7 +1448,7 @@ if $ARGS[0] = 'brother_shower_end':
 			end
 		end
 	end
-	
+
 	act'Kick him out':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
@@ -2334,7 +2334,7 @@ if $ARGS[0] = 'brother_fuck_cum':
 				'"But that''s not fair! So what I want doesn''t count for anything?"'
 				'"Nope! But I get to decide if I''m feeling generous."'
 				'With Kolka''s hands balled into fists at his side and your hands on your hips, the two of you glare at each other, scowling. This turned into a much bigger argument than you meant it to.'
-				if succubusflag = 0:	
+				if succubusflag = 0:
 					if knowpreg = 1 or thinkpreg = 1:
 						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
 					elseif pillcon >= 30000 or tabletkishot >= 1:
@@ -2355,7 +2355,7 @@ if $ARGS[0] = 'brother_fuck_cum':
 				'"I''m sorry Kolka! Your cock just felt so good, I couldn''t stop! You can''t be mad at me for being too addicted to your cock to stop, right?" You kneel down, trying to apologize by cleaning him up with your tongue.'
 				'He grumbles a bit but you can tell that he''s not mad at you. "I guess I can''t be mad about that... But next time I ask, I want to cum on your face!"'
 				'"Okay, it''s a promise!" you say, standing back up and kissing him on the cheek. "So long as I can stop myself that is."'
-				if succubusflag = 0:	
+				if succubusflag = 0:
 					if knowpreg = 1 or thinkpreg = 1:
 						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
 					elseif pillcon >= 30000 or tabletkishot >= 1:
@@ -2370,7 +2370,7 @@ if $ARGS[0] = 'brother_fuck_cum':
 				end
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
-			
+
 			if succubusflag = 0:
 				act'Too much mess':
 					cla
@@ -2475,6 +2475,7 @@ end
 
 if $ARGS[0] = 'brother_shower_fuck_end':
 	cla & *clr
+	noShampoo = 1
 	dynamic $showerdin
 	brother_shower_times += 1
 	minut += 2

locations/buklinik_event.qsrc

@@ -131,7 +131,7 @@ if $ARGS[0] = 'pos8':
 	*clr
     medcn_exp += rand (0,3)
 	if bumtolik = 8:bumtolik = 9
-     
+
 	buklinikDay = daystart
 	minut += 120
 	pcs_mood += 20
@@ -183,11 +183,11 @@ end
 
 !events from 1.2.4
 ! nanny_act - action''s counter
-! nanny_cleaning 
+! nanny_cleaning
 ! nanny_food
 ! nanny_story
 ! nanny_vika
- 
+
 ! --- LOCATIONS --- !
 if $ARGS[0] = 'hall':
 	cls
@@ -232,7 +232,7 @@ if $ARGS[0] = 'room':
 	end
 	'<a href="exec:gt ''buklinik_event'',''misha''">Michael</a> lying in bed and reading a book.'
 
-	act 'Out': gt 'buklinik_event', 'hall'	
+	act 'Out': gt 'buklinik_event', 'hall'
 end
 
 if $ARGS[0] = 'kitchen':
@@ -253,7 +253,7 @@ if $ARGS[0] = 'kitchen':
 			nanny_food = 1
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/gotovka.jpg"></center>'
 			'You cooked the food and fed Michael.'
-			act '...': gt $loc, $metka
+			act 'Finish': gt $loc, $metka
 		end
 	end
 	act 'Out': gt 'buklinik_event', 'hall'
@@ -298,7 +298,7 @@ if $ARGS[0] = 'vika':
 		'- So Far, Vic.'
 		'Well, I guess I gotta go to Michael, thought you.'
 		act 'For the work': gt 'buklinik_event', 'hall'
-	end	
+	end
 
 	act '<B>Depart</B>': gt 'buklinik_event', 'hall'
 end
@@ -318,7 +318,7 @@ if $ARGS[0] = 'misha':
 		$zz_str[0] = 'You were talking with Michael I learned that he was born in Pavlovo, in the same way as you. His family moved to here when he was seven. The family had four children, he is a senior. He says he often remembers about the life he''d led before he contracted polio.'
 		$zz_str[1] = 'At an early age I died a sister, Anastasia, died of pneumonia, then for several years I suffered from poliomyelitis, and since then I couldn''t shake the feeling of guilt. It seemed to him that the parents, especially the mother, had paid him too much attention and didn''t notice that Karen needs help until it is too late. There was nothing to show that his fears are justified but to get rid of feelings of guilt, Mikhail was not able.'
 		$zz_str[2] = 'He explains that in his childhood loved to play with the neighborhood children... But the disease hit me when I was six years old, and I immediately became the main concern of his family, especially the mother. She''s totally dedicated to me. Throughout the early years of my life she fed me with unfailing kindness and patience.'
-		$zz_str[3] = 'Despite the physical difficulties which had to be overcome, Michael received a diploma in English language at University, and his poems and articles were published. He worked on a word processor with a stick, which was holding my mouth. The master''s degree he was going to get the specialty of the reporter, but soon began to the consequences of poliomyelitis affecting muscles. From study had to be abandoned.'	
+		$zz_str[3] = 'Despite the physical difficulties which had to be overcome, Michael received a diploma in English language at University, and his poems and articles were published. He worked on a word processor with a stick, which was holding my mouth. The master''s degree he was going to get the specialty of the reporter, but soon began to the consequences of poliomyelitis affecting muscles. From study had to be abandoned.'
 		$zz_str[4] = 'You talk with Michael, he told you about "iron lung", this device allows him to breathe, but he can do without it for several hours using a portable respirator and it depends on how he feels.'
 		$zz_str[5] = 'You talk with Michael, he told you that he''s not that lame, just it not work the muscle.'
 		$zz_str[6] = '- Are you a believer? - he asked you. - Yes not particularly, as it. - answered you. - And I still believe, '' he said. - I though of someone to blame it all on what was happening to me. - with a smile he said.'
@@ -343,7 +343,7 @@ if $ARGS[0] = 'event0':
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_olga.jpg"></center>'
 
 	'- The fact that we need to send a nurse to one special person, his name is Misha, he is disabled.'
-	'Most of his thirty-six years Michael spent inside of a device called «iron lung», after six years ill with polio.' 
+	'Most of his thirty-six years Michael spent inside of a device called «iron lung», after six years ill with polio.'
 	'He alone can breathe only a short time, he constantly needs breathing apparatus.'
 	'- Wow! - answered you in surprise.'
 	'- In General, go to this address - there to you will explain what you need to do.'
@@ -361,7 +361,7 @@ if $ARGS[0] = 'event1':
 	medcn_exp += rand (0,3)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/vika/3.jpg"></center>'
-	'You came to the address and knocked on the door. You opened the young girl and asked: 
+	'You came to the address and knocked on the door. You opened the young girl and asked:
 	- You from the clinic of mercy?'
 	'- Yes. - you replied, looking at the girl, she had pokazalas you are quite cute . She was invited to enter.'
 	act 'Enter':
@@ -394,8 +394,8 @@ if $ARGS[0] = 'event1':
 	- Well, okay, then, I went as Michael. - she kissed him on the forehead man. - Before, Dating Svetlana. - she waved her hand to me and closed the door.
 	- Here we are all alone. - a little sadly said Michael.'
 					act 'Don''t worry everything will be fine': gt 'buklinik_event', 'hall'
-				end		
-			end		
+				end
+			end
 		end
 	end
 end
@@ -407,11 +407,11 @@ if $ARGS[0] = 'entrance':
 	buklinikDay = daystart
 	minut += 20
 	gs 'stat'
-	
+
 	'<center><img <<$set_imgh>> src="images/characters/city/vika/'+iif(ARGS[1]=0,5,3)+'.jpg"></center>'
 
 	if ARGS[1] = 0:
-		'You''ve come to the address and knocked on the door. You opened Vic. 
+		'You''ve come to the address and knocked on the door. You opened Vic.
 		- Oh, Hey, <<$pcs_nickname>>, you don''t mind that I turn to you?
 		- Yes, no, not against. - answered with a smile you.
 		- And Misha, I told you what pleasant interlocutor, and he with you like!
@@ -425,7 +425,7 @@ if $ARGS[0] = 'entrance':
 		- Well here I am. - Answered you.
 		- Let''s go. Well, I ran.'
 	end
-	
+
 	if ARGS[1] = 2 or ARGS[1] = 4:
 		'You come to Michael, the door you opened Vic.
 		- Hi, <<$pcs_nickname>>.
@@ -456,13 +456,13 @@ if $ARGS[0] = 'entrance':
 		end
 	end
 
-	act '...': gt 'buklinik_event', 'hall'
+	act 'Continue': gt 'buklinik_event', 'hall'
 end
 
 if $ARGS[0] = 'event2':
 	act '<B>Leave</B>': gt 'buklinik_event', 'room'
 	if nanny_cleaning = 0 or nanny_food = 0: exit
-	
+
 	if MishaLove = 1:
 		act 'I am finished':
 			cls
@@ -507,7 +507,7 @@ if $ARGS[0] = 'event2':
 					act 'Listen':
 						cls
 						'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/6.mp4"></video></center>'
-						'And I decided to invite her on a picnic, and she consented.'	
+						'And I decided to invite her on a picnic, and she consented.'
 						act 'Further':
 							cls
 							'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/shave.mp4"></video></center>'
@@ -699,13 +699,13 @@ if $ARGS[0] = 'event2':
 						'- As you think, you can already start, you can look at your body?'
 						'Yeah, I''d like to do.'
 						act'Undress him':
-							cls	
+							cls
 							'Now I had to undress, so I had to remove Michael''s clothes and for the first time to see his body. Suddenly I was gripped by fear. He was so fragile. What if I hurt him or do anything with his body?'
 							'- Misha, at any time, if I do something you don''t like it, let me know. Not only for our collaboration, but for you it is important to learn how to talk to your partner about how you feel. If it makes you feel bad, uncomfortable, just tell me to stop, okay?'
 							'"Okay," he replied, and his face ran a shade of anxiety.'
 							'Remember, we do it all for you, so if you want me to do something slower or stopped doing at all, just tell me about it.'
 							'You gently raised the blanket. He was dressed in a red long-sleeved shirt and black training pants. «Slowly and carefully, slowly and gently, said I to myself, as the spell. - Start with shirts». I undid the first button, and then the other until the very end. Then a button on the wrist of the left sleeve. Then, pulled out the sleeve as much as possible. The collar came down on one shoulder. It is very little time spent on the street and was very pale. Against the red fabric of the shirt his skin was as pure white as salt. I vigorously rubbed my hands together to warm them up, and slipped his hand under the shirt. You gently took his thin hand, simultaneously pulling the sleeve and putting his hand on the bed. When the sleeve was almost cleared, Michael shouted - very loudly. Oh my God! Did I hurt it?'
-							act 'Oh my God! what happened?':	
+							act 'Oh my God! what happened?':
 								cls
 								'- What happened? asked you.'
 								'"Nail, nail caught on the shirt." he said.'
@@ -729,7 +729,7 @@ if $ARGS[0] = 'event2':
 										'- I''ve never seen a naked woman, said he, stammering.'
 										'Despite a thin body, Michael had chubby cheeks, which now was covered with a pink blush.'
 										'- That''s why I''m here - you cheered him and laid next to him on the bed. - For sex brought pleasure, it is very important to be able to relax, so now I''ll show you an exercise that will help.'
-										act 'Further': 
+										act 'Further':
 											cls
 											'At this point you have decided to learn to breathe deeply, from your diaphragm, focusing exclusively on the process of breathing: a long, full breath, and immediately slow exhale. Mikhail couldn''t take deep breaths, but I still asked him to focus on the breath, even if it was difficult.'
 											'Close your eyes and try to clear your mind of everything unnecessary, to think only about breathing, you said.'
@@ -793,7 +793,7 @@ if $ARGS[0] = 'event2':
 			nanny_cleaning = 0
 			nanny_food = 0
 			nanny_act = 5
-			
+
 			bumtolik = 14
 			buklinikDay = daystart
 			gs 'stat'
@@ -811,7 +811,7 @@ if $ARGS[0] = 'event2':
 				'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/pants.mp4" ></video></center>'
 		'Haven''t stripped Michael to the end, you notice that he''s already excited. When you removed your pants, you had to pull the rubber band, because she''s touching his hard cock.'
 				act 'Undress herself':
-					cls	
+					cls
 		'You undressed.'
 					act'Lie down on the bed':
 						cls
@@ -833,7 +833,7 @@ if $ARGS[0] = 'event2':
 		- There are worse things I could choke, said Michael.
 		You slowly bent arm, twisting the hip to the left to lower the right nipple to his lips. Michael grabbed his wet mouth and drew in.
 		- It is very nice.
-		After a few seconds, you took the nipple from his lips.'		
+		After a few seconds, you took the nipple from his lips.'
 							act'You need air?':
 								cls
 		'- Do you need air? - crosely you.
@@ -847,17 +847,17 @@ if $ARGS[0] = 'event2':
 									act'Want Cooney':
 										stat['cuni'] += 1
 										cls
-		'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/facesitting.mp4"></video></center>'									
+		'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/facesitting.mp4"></video></center>'
 		'You told him about it. he immediately agreed. You sat on his face and began to slowly move his hips. Arousal gushed on and you reschili...'
 										act'To accelerate the pace':
 											cls
-		'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/tube.mp4"></video></center>'										
+		'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/tube.mp4"></video></center>'
 		'With excitement you began, almost jumping on his face he heard:
 		- Ahem... bwhc... I can''t breathe!
 		- God, my! - you screamed.
 		- Respirator... pipes... - after saying the last word you gave him.
 		- I think it''s worth to wait for later. - you said.
-		After inhaling he asked if we could have sex. you asked him to listen to your breath, reached into my purse for a condom and quickly put it on.'								 
+		After inhaling he asked if we could have sex. you asked him to listen to your breath, reached into my purse for a condom and quickly put it on.'
 											act'Take the dick':
 												cls
 												gs 'boyStat', 'A185'
@@ -895,18 +895,20 @@ if $ARGS[0] = 'event2':
 														'So long as men can breathe or eyes can see,'
 														'So long lives this, and this gives life to thee.'
 
-														'Finished Michael.'	
+														'Finished Michael.'
 														act'That''s fine':
 															cls
 															gs'stat'
 															'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/sex/end.jpg" ></center>'
 		'- Misha, it was perfect. I want you to know how glad I am that we met and that we had a chance to help you.
-		You ran a finger along his hip and down the leg. You felt an excitement not yet experienced at all the time that you were together. You took his face in her hands and kissed her forehead'													
+		You ran a finger along his hip and down the leg. You felt an excitement not yet experienced at all the time that you were together. You took his face in her hands and kissed her forehead'
 															act'Well on this we''re finished':
 																cls
 																nanny_vika = 1
+																noShampoo = 1
 																dynamic $showerdin
 																'You take a quick shower and get dressed, then you say goodbye to Michael and you are ready to leave. Soon Vika arrives.'
+																if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 																act 'Leave': gt'buklinik','olga2'
 															end
 														end
@@ -963,7 +965,7 @@ if $ARGS[0] = 'event2':
 							gs 'boyStat', 'A185'
 							gs 'Cum_Manage'
 							'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/sex.mp4" ></video></center>'
-							'You took his cock in hand and brought the head in her pussy, asking him to rate the level of arousal. First you didn''t move, and then fell down. After about a minute came the orgasm.'						
+							'You took his cock in hand and brought the head in her pussy, asking him to rate the level of arousal. First you didn''t move, and then fell down. After about a minute came the orgasm.'
 							act'Further':
 								cls
 								'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/misha.jpg" ></center>'
@@ -978,8 +980,10 @@ if $ARGS[0] = 'event2':
 									cls
 									nanny_vika = 1
 									gs'stat'
+									noShampoo = 1
 									dynamic $showerdin
 									'You take a quick shower and dress yourself and Michael, then you say goodbye to Michael and you are ready to leave. Soon Vika arrives.'
+									if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 									act 'Go': gt 'buklinik', 'olga2'
 								end
 							end
@@ -987,7 +991,7 @@ if $ARGS[0] = 'event2':
 					end
 				end
 			end
-		end							
+		end
 	elseif nanny_act = 6 and nanny_vika = 0:
 		act'So let''s start':
 			cla
@@ -999,7 +1003,7 @@ if $ARGS[0] = 'event2':
 			act'Further':
 				cls
 				stat['hj'] += 1
-				'You held his penis in his hands for a few minutes and he asked if he could kiss my vagina.'			
+				'You held his penis in his hands for a few minutes and he asked if he could kiss my vagina.'
 				act'Of course':
 					cls
 					'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/lick.mp4"></video></center>'
@@ -1011,7 +1015,7 @@ if $ARGS[0] = 'event2':
 						act'Suck':
 							cls
 							stat['bj'] += 1
-							'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/suck.mp4"></video></center>'						
+							'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/suck.mp4"></video></center>'
 							'You suck dick'
 							act'Take the dick':
 								stat['vaginal'] += 1
@@ -1019,7 +1023,7 @@ if $ARGS[0] = 'event2':
 								gs 'boyStat', 'A185'
 								gs 'Cum_Manage'
 								cls
-								'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/anal.mp4"></video></center>'	
+								'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/sex/anal.mp4"></video></center>'
 								'You put on a condom and slide your finger on the back, easy to tighten the member by hand. You slung it over your foot to cock was inside you, and began to move, rocking. You felt the vagina begins to swell. Together with him you reached the highest point of excitation. Did you do the breath, but then stopped to ask Michael how he assessed the level of arousal.'
 								'- About eight, he said.'
 								'You quickened the pace. Michael came. His excitement lasted longer than any of our previous classes. Even after orgasm his cock was still hard, so you can make a few more movements up and down and to cum.'
@@ -1042,25 +1046,27 @@ if $ARGS[0] = 'event2':
 									act'Wait For Vika':
 										cls
 										nanny_vika = 1
+										noShampoo = 1
 										dynamic $showerdin
 										'You take a quick shower and dress yourself and Michael.'
+										if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.<br>'
 										'Vick soon came, and quickly proneslas past you, saying: Oh, izvinite, I need the toilet!.'
 										'- Well it''s time to say goodbye, Misha. - sad to say you.'
 										act'Kiss on the cheek':
 											cls
 											nanny_story = 1
 											bumtolik = 16
-											'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/kiss_cheek.jpg" ></center>'	
+											'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/kiss_cheek.jpg" ></center>'
 											'Goodbye, Michael.'
 											act'Go': gt'buklinik','olga2'
-										end	
+										end
 										act'A kiss on the lips':
 											cls
 											nanny_story = 1
 											bumtolik = 16
 											MishaLove = 1
-											'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/kiss_lips.mp4" ></video></center>'	
-											'Good-Bye, Micha.'	
+											'<center><video autoplay loop src="images/locations/city/industrial/mercyclinic/kiss_lips.mp4" ></video></center>'
+											'Good-Bye, Micha.'
 											act 'Go': gt'buklinik', 'olga2'
 										end
 									end
@@ -1069,7 +1075,7 @@ if $ARGS[0] = 'event2':
 						end
 					end
 				end
-			end		
+			end
 		end
 	end
 end

locations/burger.qsrc

@@ -139,7 +139,7 @@ if $ARGS[0] = 'dishes':
 	posuda += 1
 	pcs_mood -= 15
 	money += 70
-	pcs_sweat += 10
+	gs 'sweat', 'add', 10
 
 	if bistroQW = 10:bistroQW = 0
 
@@ -624,7 +624,7 @@ if $ARGS[0] = 'dishes':
 			minut -= 3
 			gs 'stat'
 
-			act '...':
+			act 'Continue':
 				*clr & cla
 				gs 'boyStat', 'A75'
 				sexpartkno = 1
@@ -670,7 +670,7 @@ if $ARGS[0] = 'floor':
 	posuda += 1
 	pcs_mood -= 15
 	money += 70
-	pcs_sweat += 10
+	gs 'sweat', 'add', 10
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
 	'You wash the floors of the bistro for an hour. Afterwards you are given 70 <b>₽</b> for your work.'
 

locations/cafe3.qsrc

@@ -46,7 +46,7 @@ if $ARGS[0] = 'house':
 					'You bend, bringing your face to his groin and your lips wrap around his cock and you start sucking him.'
 					gs 'arousal', 'bj', 15, 'sub'
 					gs 'stat'
-					dynamic $venerasiakOral
+					gs 'dinSex', 'std_trigger_oral'
 					'Finally, the guy fills your mouth with his hot sperm you have nowhere to go so you swallow it. The taxi stopped and <<$boydesc>> you puts you out on the street.'
 					swallow += 1
 					sexpartkno = 1
@@ -264,7 +264,7 @@ if $ARGS[0] = 'toilet':
 	act 'Suck it':
 		cla
 		guy += 1
-		dynamic $venerasiakOral
+		gs 'dinSex', 'std_trigger_oral'
 		picrand = rand(13, 22)
 		'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj<<picrand>>.jpg"></center>'
 		'<<$boydesc>> pulls out his dick'
@@ -331,8 +331,8 @@ end
 
 if $ARGS[0] = 'kompashka':
 	cla
-	dynamic $venerasiak
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger'
+	gs 'dinSex', 'std_trigger_oral'
 	picrand = rand(1, 15)
 	'<center><img <<$set_imgh>> src="images/shared/sex/group/gang<<picrand>>.jpg"></center>'
 	'You are driving somewhere with the guys in a car. You''re drunk and you sit on the back seat with two guys finally, the machine stops and you get out of the car.'
@@ -380,7 +380,7 @@ end
 
 if $ARGS[0] = 'coffee':
 	cla
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger'
 	guy += 1
 	gs 'stat'
 	gs 'dinsexFX'

locations/cikl.qsrc

@@ -362,7 +362,7 @@ end
 if hbraids > 0: hbraids -= 1
 
 
-pcs_sweat += 2
+gs 'sweat', 'add', 2
 
 if pcs_tan > 0: pcs_tan -= 1
 
@@ -1270,6 +1270,48 @@ if storyline = 1:
 
 
 	if SchoolAtestat = 0:
+		if kanikuli = 0 and week < 6:			
+			!!Maximum increase for grupvalues is 5 (6 - 1 decay)
+			if oldgrupvalue_set = 0:
+				oldgrupvalue_set = 1
+				old_grupvalue[1] = grupvalue[1]
+				old_grupvalue[2] = grupvalue[2]
+				old_grupvalue[3] = grupvalue[3]
+				old_grupvalue[4] = grupvalue[4]
+			else
+				if old_grupvalue[1] + 6 < grupvalue[1]: grupvalue[1] = old_grupvalue[1] + 6
+				if old_grupvalue[2] + 6 < grupvalue[2]: grupvalue[2] = old_grupvalue[2] + 6
+				if old_grupvalue[3] + 6 < grupvalue[3]: grupvalue[3] = old_grupvalue[3] + 6
+				if old_grupvalue[4] + 6 < grupvalue[4]: grupvalue[4] = old_grupvalue[4] + 6
+			end
+			
+			!!Decay for the school groups
+			if grupvalue[1] > 0:
+				grupvalue[1] -= 1
+			else
+				grupvalue[1] = 0
+			end
+			if grupvalue[2] > 0:
+				grupvalue[2] -= 1
+			else
+				grupvalue[2] = 0
+			end
+			if grupvalue[3] > 0:
+				grupvalue[3] -= 1
+			else
+				grupvalue[3] = 0
+			end
+			if grupvalue[4] > 0:
+				grupvalue[4] -= 1
+			else
+				grupvalue[4] = 0
+			end		
+
+			old_grupvalue[1] = grupvalue[1]
+			old_grupvalue[2] = grupvalue[2]
+			old_grupvalue[3] = grupvalue[3]
+			old_grupvalue[4] = grupvalue[4]			
+		end
 		if month = 12 and day > 25:
 			if day < 31:
 				$holyday = '<b>Winter Break in <<32-day>> days.</b>'
@@ -1345,7 +1387,7 @@ if storyline = 1:
 			elseif day = 11:
 				kanikuli = 1
 				$holyday = '<b>Last day of Autumn Break.</b>'
-			end
+			end 
 		end
     elseif SchoolAtestat = -1:
         if ParHomeBlock = 1:
@@ -1355,16 +1397,16 @@ if storyline = 1:
         end
 	end
 	!!Brother''s dick growth as he gets older
-	
-	if kolka_dick_day + 30 < daystart and npc_dick['A34'] < 26: 
-		kolka_dick_day = daystart
-		npc_dick['A34'] += 1
-	end
-	if npc_dick['A34'] < 20 and npc_dick['A34'] > 16:
-		$npc_thdick['A34'] = 'well proportioned'
-	elseif npc_dick['A34'] >= 20 and npc_dick['A34'] <= 26:
-		$npc_thdick['A34'] = 'thick'
-	end
+	!Commented out till some future time
+	!if kolka_dick_day + 30 < daystart and npc_dick['A34'] < 26: 
+	!	kolka_dick_day = daystart
+	!	npc_dick['A34'] += 1
+	!end
+	!if npc_dick['A34'] < 20 and npc_dick['A34'] > 16:
+	!	$npc_thdick['A34'] = 'well proportioned'
+	!elseif npc_dick['A34'] >= 20 and npc_dick['A34'] <= 26:
+	!	$npc_thdick['A34'] = 'thick'
+	!end
 end
 
 killvar 'natholi'

locations/clener.qsrc

@@ -244,7 +244,7 @@ if $ARGS[0] = 'start':
 			clener += 1
 			pcs_mood -= 15
 			money += 65
-			pcs_sweat += 20
+			gs 'sweat', 'add', 20
 			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
 
 			if clener < 5:
@@ -311,7 +311,7 @@ if $ARGS[0] = 'start':
 			clenerT += 1
 			pcs_mood -= 25
 			money += 65
-			pcs_sweat += 30
+			gs 'sweat', 'add', 30
 			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
 
 			if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0 and jouryResult = 0:

locations/club.qsrc

@@ -26,7 +26,6 @@ if $ARGS[0] = 'start':
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club.jpg"></center>'
 			'You tell the bouncer you are here to work for Erik'
 			'He looks you over.'
-			wait 250
 			if pcs_makeup > 1 and pcs_sweat < 30 and (PCloSkirt > 2 or PCloPants > 4 or $clothingworntype = 'exhibit'):
 				minut += 5
 				'He nods and says something into his walkie-talkie. A couple of minutes later you meet Erik in the foyer.'
@@ -264,7 +263,7 @@ if $ARGS[0] = 'dance':
 			menu_off = 1
 			minut += 15
 			pcs_stam -= 5
-			pcs_sweat += 3
+			gs 'sweat', 'add', 3
 			fat -= 1
 			danc_exp += 1
 			if pcs_inhib < 40:inhib_exp += rand(1,2)
@@ -737,7 +736,7 @@ end
 if $ARGS[0] = 'sex':
 	*clr & cla
 	menu_off = 1
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
 	gs 'boyStat', $npclastgenerated
 	dick = rand(10, 18)
@@ -755,7 +754,7 @@ if $ARGS[0] = 'sex':
 		guy += 1
 		pcs_horny += 5
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubbj.jpg"></center>'
-		dynamic $venerasiakOral
+		gs 'dinSex', 'std_trigger_oral'
 		gs 'arousal', 'bj', 5, 'sub'
 		gs 'stat'
 
@@ -991,7 +990,7 @@ if $ARGS[0] = 'bar2':
 	cla
 	*clr
 	menu_off = 1
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	guy += 1
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barminet.jpg"></center>'
@@ -1088,7 +1087,7 @@ if $ARGS[0] = 'rape':
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barcum.jpg"></center>'
 				'A few minutes later he is finally done and pushes your head against his crotch, forcing you to swallow his cum. You can''t help but to enjoy the tase of his semen in your mouth.'
 
-				dynamic $venerasiakOral
+				gs 'dinSex', 'std_trigger_oral'
 				gs 'arousal', 'end'
 				gs 'stat'
 
@@ -1104,7 +1103,7 @@ if $ARGS[0] = 'rape':
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barsex.jpg"></center>'
 				'The bloke takes his cock out of your mouth, tells you position yourself in the stool and then he begins to fuck you roughly. As you''re drunk you barely register anything, but you catch yourself moaning heavy. Not even ten minutes laters he takes his cock out of your pussy and cums on your ass.'
 
-				dynamic $venerasiak
+				gs 'dinSex', 'std_trigger'
 				gs 'arousal', 'vaginal', 10, 'sub', 'rough'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -1117,7 +1116,7 @@ if $ARGS[0] = 'rape':
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barsex.jpg"></center>'
 		'You are trying to send it, but your tongue drunk guy is braided and seeing that you are not able to resist, pulls out his cock turns you on a stool and saliva-moistened member enters your vagina, it tears you to force shoving his dick as deep as possible, and finally finishing the leaves.'
 
-		dynamic $venerasiak
+		gs 'dinSex', 'std_trigger'
 		gs 'arousal', 'vaginal', 10, 'sub', 'rough'
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -1148,7 +1147,7 @@ if $ARGS[0] = 'lezbsort1':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortukuni.jpg"></center>'
 	'You remove her pants and sit down on the toilet. She happily does as you told her. She spreads her legs and you begin to lick her cunt furiously. She moans heavily and plays with her erect nipples. Some time later you make cum.'
 
-	dynamic $venerasiak
+	gs 'dinSex', 'std_trigger'
 	gs 'arousal', 'cuni_give', 10, 'sub', 'lesbian'
 	gs 'stat'
 
@@ -1169,7 +1168,7 @@ if $ARGS[0] = 'lezbsort2':
 	'You sit donw on the toilet and move your feet up. "Lick it", you tell her. She seductively bites her lips and happily follows your orders. The woman parts your pussy lips and begins to lick your cunt. Every so often she switches between licking your pink flesh and your flower. She doesn''t stop until you cry out in pleasure and cum.'
 
 	$orgasm_or = 'yes'
-	dynamic $venerasiakOral
+	gs 'dinSex', 'std_trigger_oral'
 	gs 'arousal', 'cuni', 10, 'sub', 'lesbian'
 	gs 'stat'
 

locations/dateM.qsrc

@@ -471,74 +471,80 @@ if $ARGS[0] = 'datecinema':
 					'As you''re about to grab some popcorn from the tub, <<$boydesc>> unknowingly goes to grab some popcorn too, touching your hand.'
 					'He''s startled as he didn''t expect your hand to be there either. You acknowledge his touch by teasingly whispering, "Are you trying to make a move on me?"'
 					'<<$boydesc>> nervously smiles at you. "Sorry it wasn''t my intentions to make you feel uncomfortable."'
-					act 'Tease him':
-						*clr & cla
-						minut += 5
-						gs 'stat'
-						'<center><img src="images/locations/shared/date/theatertease.jpg"></center>'
-						'Feeling frisky and not wanting to let go of the opportunity you tell him, "Come on, no need to get so defensive. Let me show you a thing."'
-						'You look around checking if everyone else is concentrating on the movie and then quickly remove your top. <<$boydesc>> not knowing how to respond looks in awe. Not wanting to wait on him anymore you decide to take action.'
-						'"Let me show you a great time." you slyly tell him. "Just relax and enjoy yourself."'
-						act 'Get on your knees':
+					gs 'willpower', 'exhib', 'self'
+					if will_cost <= pcs_willpwr:
+						act 'Tease him (<<will_cost>> Willpower)':
+							gs 'willpower', 'pay', 'self'
 							*clr & cla
-							'<center><img src="images/locations/shared/date/theaterbj.jpg"></center>'
-							'You go down on your knees removing your shirt and bra showing your body to <<$boydesc>>. You begin playing with his rock hard penis through the pants.'
-							'<<$boydesc>> looks at you with lust. His eyes are quite revealing, he wants you to please him with your mouth and he wants it now.'
-							'You unbutton his pants and pull down his briefs. The rock hard cock pops out while you look at <<$boydesc>> smiling. "Keep quiet now we don''t want to get caught."'
-							'You grab <<$boydesc>> by the shaft and your lips embrace the top of his cock. After a while you pick up the pace moving the head up and down while <<$boydesc>> is trying his best to keep quiet.'
-							gs 'arousal', 'bj', 5, 'dom', 'exhibitionism'
+							minut += 5
 							gs 'stat'
-							act 'Lay down on the seat':
+							'<center><img src="images/locations/shared/date/theatertease.jpg"></center>'
+							'Feeling frisky and not wanting to let go of the opportunity you tell him, "Come on, no need to get so defensive. Let me show you a thing."'
+							'You look around checking if everyone else is concentrating on the movie and then quickly remove your top. <<$boydesc>> not knowing how to respond looks in awe. Not wanting to wait on him anymore you decide to take action.'
+							'"Let me show you a great time." you slyly tell him. "Just relax and enjoy yourself."'
+							act 'Get on your knees':
 								*clr & cla
-								'<center><img src="images/locations/shared/date/theatercuni.jpg"></center>'
-								'After a few minutes you stop and get up, lean into him telling him that it''s his turn to impress you.'
-								'You lay down on the empty seats next to you and spread your legs. <<$boydesc>> by now very aroused dives in and begins playing with your wet clit.'
-								'His tongue does wonders to your clit and there are a few times you can''t contain yourself just wanting to scream out loud in pleasure.'
-								gs 'arousal', 'cuni', 5, 'dom', 'exhibitionism'
+								'<center><img src="images/locations/shared/date/theaterbj.jpg"></center>'
+								'You go down on your knees removing your shirt and bra showing your body to <<$boydesc>>. You begin playing with his rock hard penis through the pants.'
+								'<<$boydesc>> looks at you with lust. His eyes are quite revealing, he wants you to please him with your mouth and he wants it now.'
+								'You unbutton his pants and pull down his briefs. The rock hard cock pops out while you look at <<$boydesc>> smiling. "Keep quiet now we don''t want to get caught."'
+								'You grab <<$boydesc>> by the shaft and your lips embrace the top of his cock. After a while you pick up the pace moving the head up and down while <<$boydesc>> is trying his best to keep quiet.'
+								gs 'arousal', 'bj', 5, 'dom', 'exhibitionism'
 								gs 'stat'
-								act 'Reverse cowgirl':
+								act 'Lay down on the seat':
 									*clr & cla
-									'<center><img src="images/locations/shared/date/theatercow.jpg"></center>'
-									'He stops to let you rest just as you''re nearing the orgasm, feeling irritated you decide to get even.'
-									'You make <<$boydesc>> sit down again and plant yourself on top of his cock, letting out a quiet whimper as you don''t want the guy in front of you to find out what the two of you are doing.'
-									'As you control the pace you switch it up multiple times bouncing up and down as you see this as a payback for not letting you orgasm before. <<$boydesc>> is clearly having some trouble holding himself as his cock is growing inside you.'
-									gs 'arousal', 'vaginal', 5, 'dom', 'exhibitionism'
+									'<center><img src="images/locations/shared/date/theatercuni.jpg"></center>'
+									'After a few minutes you stop and get up, lean into him telling him that it''s his turn to impress you.'
+									'You lay down on the empty seats next to you and spread your legs. <<$boydesc>> by now very aroused dives in and begins playing with your wet clit.'
+									'His tongue does wonders to your clit and there are a few times you can''t contain yourself just wanting to scream out loud in pleasure.'
+									gs 'arousal', 'cuni', 5, 'dom', 'exhibitionism'
 									gs 'stat'
-									act 'Back to laying down':
+									act 'Reverse cowgirl':
 										*clr & cla
-										gs 'cum_call', 'stomach', $boydesc
-										gs 'cum_call', 'breasts', $boydesc
-										'<center><img src="images/locations/shared/date/theatervag.jpg"></center>'
-										'By now <<$boydesc>> is almost drained and the smallest touch would make him cum. You decide to give him a breather as you once again lay down spreading your legs once again while your pussy juice drips all over the seat.'
-										'As soon as <<$boydesc>> enters you he''s already heavily panting. You whisper angrily to him "Don''t you dare cum yet. I''m still not pleased." <<$boydesc>> does his best and keeps thrusting for a minute or two not being able to hold on anymore.'
+										'<center><img src="images/locations/shared/date/theatercow.jpg"></center>'
+										'He stops to let you rest just as you''re nearing the orgasm, feeling irritated you decide to get even.'
+										'You make <<$boydesc>> sit down again and plant yourself on top of his cock, letting out a quiet whimper as you don''t want the guy in front of you to find out what the two of you are doing.'
+										'As you control the pace you switch it up multiple times bouncing up and down as you see this as a payback for not letting you orgasm before. <<$boydesc>> is clearly having some trouble holding himself as his cock is growing inside you.'
 										gs 'arousal', 'vaginal', 5, 'dom', 'exhibitionism'
 										gs 'stat'
-										'He starts groaning pulling out his cock out of you and shoots the load all over you. His warm spunk hits your stomach and breast as he jerks out the last drips. You take your finger and swipe a small sample off your stomach putting it in your mouth. It tastes great.'
-										act 'Caught':
+										act 'Back to laying down':
 											*clr & cla
-											minut += 10
+											gs 'cum_call', 'stomach', $boydesc
+											gs 'cum_call', 'breasts', $boydesc
+											'<center><img src="images/locations/shared/date/theatervag.jpg"></center>'
+											'By now <<$boydesc>> is almost drained and the smallest touch would make him cum. You decide to give him a breather as you once again lay down spreading your legs once again while your pussy juice drips all over the seat.'
+											'As soon as <<$boydesc>> enters you he''s already heavily panting. You whisper angrily to him "Don''t you dare cum yet. I''m still not pleased." <<$boydesc>> does his best and keeps thrusting for a minute or two not being able to hold on anymore.'
+											gs 'arousal', 'vaginal', 5, 'dom', 'exhibitionism'
 											gs 'stat'
-											'<center><img src="images/locations/shared/date/theatercaught.jpg"></center>'
-											'While the two of you are returning to your senses all of a sudden someone flashes a light at you. It''s the usher... You''re totally caught as you''re still laying down naked with <<$boydesc>> cum splattered all over you.'
-											'"What the hell are you two doing!" the usher yells. The guy that sat in front of you stands up noticing you laying naked quickly picks up the phone and tries taking some pictures. <<$boydesc>> pulls up his pants and gets dressed, leaving you all naked to fend for yourself.'
-											'"Kids these days. It''s the third time I catch couples doing this shit this week. Pick up your stuff and get the hell out of here, you''re lucky I don''t have the time to call the cops."'
-											'You''re blemishing red as you quickly get dressed, grabbing your stuff, running out of the theater. You can hear some of the other people commenting on the situation as you walk past them. <<$boydesc>> is walking besides you and also has his head down looking at the ground as ashamed as you.'
-											act 'Outside':
+											'He starts groaning pulling out his cock out of you and shoots the load all over you. His warm spunk hits your stomach and breast as he jerks out the last drips. You take your finger and swipe a small sample off your stomach putting it in your mouth. It tastes great.'
+											act 'Caught':
 												*clr & cla
-												minut += 5
+												minut += 10
 												gs 'stat'
-												'<center><img src="images/locations/pavlovsk/park/theater/kinoteatr.jpg"></center>'
-												'"Wow, that''s never happened to me before." <<$boydesc>> tells you.'
-												'"I only regret us getting caught. If we''ve only been able to keep quiet. Nothing do anything about that now." you say smiling.'
-												'"I guess I should ask for your for your number now that we''ve got to know each other really well?"'
-												act 'Sure': gt 'dateM', 'cinema_sure'
-												act 'Sorry': gt 'dateM', 'cinema_sorry'
+												'<center><img src="images/locations/shared/date/theatercaught.jpg"></center>'
+												'While the two of you are returning to your senses all of a sudden someone flashes a light at you. It''s the usher... You''re totally caught as you''re still laying down naked with <<$boydesc>> cum splattered all over you.'
+												'"What the hell are you two doing!" the usher yells. The guy that sat in front of you stands up noticing you laying naked quickly picks up the phone and tries taking some pictures. <<$boydesc>> pulls up his pants and gets dressed, leaving you all naked to fend for yourself.'
+												'"Kids these days. It''s the third time I catch couples doing this shit this week. Pick up your stuff and get the hell out of here, you''re lucky I don''t have the time to call the cops."'
+												'You''re blemishing red as you quickly get dressed, grabbing your stuff, running out of the theater. You can hear some of the other people commenting on the situation as you walk past them. <<$boydesc>> is walking besides you and also has his head down looking at the ground as ashamed as you.'
+												act 'Outside':
+													*clr & cla
+													minut += 5
+													gs 'stat'
+													'<center><img src="images/locations/pavlovsk/park/theater/kinoteatr.jpg"></center>'
+													'"Wow, that''s never happened to me before." <<$boydesc>> tells you.'
+													'"I only regret us getting caught. If we''ve only been able to keep quiet. Nothing do anything about that now." you say smiling.'
+													'"I guess I should ask for your for your number now that we''ve got to know each other really well?"'
+													act 'Sure': gt 'dateM', 'cinema_sure'
+													act 'Sorry': gt 'dateM', 'cinema_sorry'
+												end
 											end
 										end
 									end
 								end
 							end
 						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
 					act 'Keep watching the movie':
 						*clr & cla
@@ -613,17 +619,24 @@ if $ARGS[0] = 'datecafe':
 			'She scribbles down your order, as she re-reads the order, she manages to stammer through your order but when it comes to <<$boydesc>> she messes up.'
 			'"What is wrong with you? Can''t you write down a simple order?" <<$boydesc>> reacts.'
 			'You sit there looking in shock wondering what you should do...'
-			act 'React':
-				*clr & cla
-				minut += 10
-				gs 'stat'
-				'<center><img src="images/locations/shared/date/cafereact.jpg"></center>'
-				'The poor waitress returns after a while with your order. You look at her with an apologetic look.'
-				'"Hope everything is in order." <<$boydesc>> says. Feeling a bit irritated you kick him under the table, while thanking her.'
-				'<<$boydesc>> looks at you in dispair, "What? Did I do anything wrong?"'
-				'"Well, first off, you don''t need to be a jerk to the waitress." you angrily tell him.'
-				'"I''m sorry but I''m just really nervous being on a date with you so I acted out." You can see that he''s remorseful but you still don''t want to carry on a conversation with him.'
-				act 'Continue date':gt 'dateM', 'cafepeople'
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'React (<<will_cost>> Willpower)':
+					gs 'willpower', 'misc', 'self'
+					gs 'willpower', 'pay', 'self'
+					*clr & cla
+					minut += 10
+					gs 'stat'
+					'<center><img src="images/locations/shared/date/cafereact.jpg"></center>'
+					'The poor waitress returns after a while with your order. You look at her with an apologetic look.'
+					'"Hope everything is in order." <<$boydesc>> says. Feeling a bit irritated you kick him under the table, while thanking her.'
+					'<<$boydesc>> looks at you in dispair, "What? Did I do anything wrong?"'
+					'"Well, first off, you don''t need to be a jerk to the waitress." you angrily tell him.'
+					'"I''m sorry but I''m just really nervous being on a date with you so I acted out." You can see that he''s remorseful but you still don''t want to carry on a conversation with him.'
+					act 'Continue date':gt 'dateM', 'cafepeople'
+				end
+			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
 			act 'Keep quiet':
 				*clr & cla
@@ -648,14 +661,21 @@ if $ARGS[0] = 'datecafe':
 				'"Thanks, one should not be accepting bad service no matter who you are."'
 				act 'Continue date':gt 'dateM', 'cafepeople'
 			end
-			act 'Tell him off':
-				*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
+			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
@@ -826,14 +846,20 @@ if $ARGS[0] = 'bartalk':
 										end
 									end
 								end
-								act 'Decide to stop':
-									*clr & cla
-									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
+								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

@@ -1,6 +1,6 @@
 # dimaEv
 
-!!files that can be deleted dima, dimagohome2, dimahome, dimkawarning, dimaev, dimaRudeEV
+!!needs a revamp to add options and choices add willpower then. unable to as their is no choices currently.
 
 menu_off = 1