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

locations/FedorEv4.qsrc

@@ -2065,7 +2065,7 @@ if $ARGS[0] = 'Bedroom 2':
 				*clr & cla
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vag2.mp4"></video></center>'
 				'Fedor nods as he continues fucking you at an increased pace and soon pulls out of you and begins jerking his penis over your stomach, covering you in his cum. The warmth of his cum covers both your stomach and chest which greatly excites you. After Fedor finishes he looks down at you and says, "You''re amazing as always <<$pcs_firstname>>, The best fuck a man could ask for."'
-				'You look up at him and reply, "I could say about you, my love." Fedor gives you a passionate kiss before getting dressed and leaving the room.'
+				'You look up at him and reply, "I could say the same about you, my love." Fedor gives you a passionate kiss before getting dressed and leaving the room.'
 				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vagcum.mp4"></video></center>'
 				gs 'cum_call', 'stomach', $boy, 1
@@ -3062,24 +3062,24 @@ if $ARGS[0] = 'Regina Chat':
 	elseif cumloc[11] = 1 and ReginaKozQW = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and ReginaKozQW = 1:
 		'Regina gives you a blank stare. "I won''t pry into your love life but could you do me a favor and clean yourself up afterward?"'
 	end
-	if pcs_health < 100:
+	if pcs_health < healthmax:
 		'Regina looks at you and gasps. "Ohh no sweety, you''re hurt. Let me take a look at you."'
 	end
 
 	act 'Walk away':gt 'FedorEv4', 'Kitchen'
 	
-	if pcs_health < 100 and money >= 20:act 'Let Regina help you':gt 'FedorEv4', 'Check up'
+	if pcs_health < healthmax and money >= 20: act 'Let Regina help you':gt 'FedorEv4', 'Check up'
 
 	if ReginaIntro = 0:
-		act 'Introduce yourself':gt 'FedorEv4', 'Regina Intro'
+		act 'Introduce yourself': gt 'FedorEv4', 'Regina Intro'
 	else
 		act 'Chat':gt 'FedorEv4', 'Regina Chat 2'
 	end
 
-	if FedorShelter = 1:act 'Ask about moving in':gt 'FedorEv4', 'Fedor Shelter 2'
+	if FedorShelter = 1:act 'Ask about moving in': gt 'FedorEv4', 'Fedor Shelter 2'
 
 	if ReginaIntro = 1 and ReginaKoz_Daystart ! daystart:
-		act 'May I join you for dinner?':gt 'FedorEv4', 'Dinner 1'
+		act 'May I join you for dinner?': gt 'FedorEv4', 'Dinner 1'
 	end	
 end
 
@@ -3149,7 +3149,7 @@ end
 if $ARGS[0] = 'Check up':
 	*clr & cla
 	menu_off = 1
-	if pcs_health < 100:pcs_health = 150
+	if pcs_health < healthmax: pcs_health = healthmax
 	money -= 20
 	minut += 15
 	gs'stat'

locations/HotelHole.qsrc

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

locations/HotelWork.qsrc

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

locations/Katja_Tanga.qsrc

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

locations/Military.qsrc

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

locations/VoltrenerSexShower.qsrc

@@ -277,9 +277,9 @@ if $ARGS[0] = '5':
 										cls
 										gs 'willpower', 'pay', 'self'
 										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower27.jpg"></center>'
+										gs 'arousal', 'foreplay', -15, 'sub'
 										$orgasm_or = 'custom'
 										$orgasm_txt = 'Literally exhausted from your need for a cock inside you, you push the coach on the floor and mount his cock. The head parts your lips, and pushes deep into your pussy, causing wave after wave of pleasure. Starting to move up and down, side to side, you skewer yourself on his cock. Mikhail caresses your neck, then moved down to your chest and showers pleasure on your nipples. He proceeds to squeeze them and in that moment pleasure runs through you like an electric current, causing you to cry out in orgasm.'
-										gs 'arousal', 'foreplay', -15, 'sub'
 										gs 'arousal', 'vaginal', 15, 'sub'
 										gs 'arousal', 'end'
 										gs 'stat'

locations/arousal.qsrc

@@ -735,6 +735,7 @@ if $ARGS[0] = 'end':
 	stim['event'] = 0
 
 !!Adding to counts for character stats
+	gs 'arousal', 'count', 'foreplay'
 	gs 'arousal', 'count', 'mast'
 	gs 'arousal', 'count', 'porn'
 	gs 'arousal', 'count', 'cuni'

locations/gdksex.qsrc

@@ -457,7 +457,6 @@ if $ARGS[0] = 'kissing':
 								if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1
 
 								bmBJ[Tboynum] += 1
-								sub += 1
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/cocksuck.jpg"></center>'
 								'Without even realizing it, you move in to gently kiss the penis. After a few kisses and licks you let it slide into your mouth and begin to suck him off diligently, wanting to repay him for the pleasure he just gave you.'
@@ -681,7 +680,6 @@ if $ARGS[0] = 'blowjob':
 	if boynumBlock = 0:guy += 1
 	if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1
 
-	sub += 1
 	gs 'boymass', 'B'
 	bmBJ[Tboynum] += 1
 	gs 'stat'

locations/gopsex.qsrc

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

locations/gopskver.qsrc

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

locations/gpoli.qsrc

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

locations/grigory.qsrc

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

locations/hotel_resep.qsrc

@@ -92,7 +92,7 @@ if $ARGS[0] = '':
 			end
 
 			if money >= 5000:
-				act 'Yes (give it to her)':
+				act 'Yes, pay her the money':
 					cla & *nl
 					money -= 5000
 					nichHotelReferral = 2
@@ -331,19 +331,27 @@ if $ARGS[0] = 'pavlbarcont':
 		'"This was not what we agreed to." You say. "I need more..."'
 		'"Sure, you can have more, but you need to do some extra work for that."'
 		'<<$npc_nickname[''A217'']>> takes your hand and moves it towards his crotch.'
-
-		act 'Be content with what you have':
-			*clr & cla
-			'You wiggle your hand free from his grip, take the money and get up.'
-			'"This is really the last time you screwed me over." You say.'
-			'<<$npc_nickname[''A217'']>> is not really worried. He is confident you''ll be back.'
-			'He leans back in his chair and checks out your ass while you are leaving.'
-			act'Go back to the hotel lobby':gt'HotelHole','skip_resepevent'
+		
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Be content with what you have (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'You wiggle your hand free from his grip, take the money and get up.'
+				'"This is really the last time you screwed me over." You say.'
+				'<<$npc_nickname[''A217'']>> is not really worried. He is confident you''ll be back.'
+				'He leans back in his chair and checks out your ass while you are leaving.'
+				act'Go back to the hotel lobby':gt'HotelHole','skip_resepevent'
+			end
+		else
+			act 'Be content with what you have (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		act 'Do the extra work':
 			*clr & cla
-			pav_prostitute += 1
+			gs 'fame', 'pav', 'prostitute', 1
 			if npc_rel['A217'] >= 10:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_bj.jpg"></center>'
 				'"Fine" you say. You open his fly and take out his half-erect penis.'
@@ -356,7 +364,7 @@ if $ARGS[0] = 'pavlbarcont':
 			else
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_hj.jpg"></center>'
 				'"Fine" you say. You open his fly and take out his half-erect penis.'
-				'After two minutes of stroking you can feel him coming all over your hand.'
+				'After two minutes of stroking you can feel him cumming all over your hand.'
 				gs 'arousal', 'hj', 5, 'prostitution'
 			end
 			'With a stupid grin on his face he reaches in his pocket and hands you an extra 250 <b>₽</b>.'
@@ -385,15 +393,22 @@ if $ARGS[0] = 'pavlbarcont':
 		'"You are right <<$pcs_firstname>>, come with me to my car I''ll give you a bonus today."'
 		'You are excited at the prospect of finally getting the money you earned but you are unsure if you can trust <<$npc_nickname[''A217'']>>.'
 		minut += 5
-
-		act 'Take no chances, accept the amount for today':
-			*clr & cla
-			PavlinQW = 2
-			gs 'hotel_resep', 'getpaidpros'
-			gs 'stat'
-			'<br>"Actually, I have no time for this today, I have a doctor''s appointment in a few minutes. Next time I will expect that bonus."'
-			'"Sure <<$pcs_firstname>>, no problem."'
-			act'Go back to the hotel lobby':gt'HotelHole','skip_resepevent'
+		
+		gs 'willpower', 'misc', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Take no chances, accept the amount for today (<<will_cost>> Willpower)':
+				*clr & cla
+				PavlinQW = 2
+				gs 'willpower', 'misc', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'hotel_resep', 'getpaidpros'
+				gs 'stat'
+				'<br>"Actually, I have no time for this today, I have a doctor''s appointment in a few minutes. Next time I will expect that bonus."'
+				'"Sure <<$pcs_firstname>>, no problem."'
+				act'Go back to the hotel lobby':gt'HotelHole','skip_resepevent'
+			end
+		else
+			act 'Take no chances, accept the amount for today (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		act 'Follow him outside':
@@ -405,9 +420,9 @@ if $ARGS[0] = 'pavlbarcont':
 			'You are stunned and want to say something when suddenly <<$npc_nickname[''A217'']>> hits you with his fist in your face'
 			'"WHO DO YOU THINK YOU ARE, BITCH? You work for ME, I decide how much money you get. YOU UNDERSTAND ME?"'
 			'He is screaming and after every sentence he hits you in the face again.'
-			!only check for strength and dom at the moment, might change later
-
-			if pcs_dom > 50 and pcs_stren > 60:
+			!only check for strength at the moment, might change later
+			!TODO: Maybe add actual fight once the fighting system rework is finished
+			if pcs_stren > 60:
 				PavlinQW = 3
 				'You try to defend yourself and start hitting back. He did not expect this and is startled for a moment.'
 				'You see an opening and take advantage of it.'
@@ -504,15 +519,23 @@ if $ARGS[0] = 'pavgenpros':
 				firstfemalecust = 1
 				'"Wait, she?" You start.'
 				'"What?" He interrupts you angrily.'
-				act 'I don''t do female customers':
-					cla
-					pavprosnofemales = 1
-					custrand = 9
-					'"I-I''m sorry... That just won''t work for me." You start stammering trying to convince him. "She''ll notice right away."'
-					'He looks at you angrily and sighs. "Damn it <<$pcs_nickname>>, I don''t appreciate you fucking up my schedule. Fine. There''s a guy coming over to the room next door. I''ll get my girl in there to switch with you. Come with me.'
-					'He enters the room and leaves you in the hallway to talk with the other girl. After a minute a cute girl about your own age comes out of the door and tells you: "He''s waiting for you inside." Before leaving into the room you just exited.'
-					'"You''re lucky the guy wasn''t here yet. He should arrive any second."'
-					act 'Perform your duty': gt 'hotel_resep', 'clientselect'
+				gs 'willpower', 'prostitution', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'I don''t do female customers (<<will_cost>> Willpower)':
+						cla
+						pavprosnofemales = 1
+						custrand = 9
+						gs 'willpower', 'prostitution', 'resist', 'hard'
+						gs 'willpower', 'pay' 'resist'
+						gs 'stat'
+						'"I-I''m sorry... That just won''t work for me." You start stammering trying to convince him. "She''ll notice right away."'
+						'He looks at you angrily and sighs. "Damn it <<$pcs_nickname>>, I don''t appreciate you fucking up my schedule. Fine. There''s a guy coming over to the room next door. I''ll get my girl in there to switch with you. Come with me.'
+						'He enters the room and leaves you in the hallway to talk with the other girl. After a minute a cute girl about your own age comes out of the door and tells you: "He''s waiting for you inside." Before leaving into the room you just exited.'
+						'"You''re lucky the guy wasn''t here yet. He should arrive any second."'
+						act 'Perform your duty': gt 'hotel_resep', 'clientselect'
+					end
+				else
+					act 'I don''t do female customers (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 				act 'Agree to serve a female client':
 					cla
@@ -552,7 +575,7 @@ if $ARGS[0] = 'pavgenprosmf':
 	proshotelday = daystart
 	pavproscount += 1
 	guy += 1
-	pav_prostitute += rand(2,4)
+	gs 'fame', 'pav', 'prostitute', rand(2,4)
 	gs'stat'
 	gs 'npcgeneratec', '0', '', rand(18,40)
 	gs 'boyStat', $npclastgenerated
@@ -575,13 +598,25 @@ if $ARGS[0] = 'pavgenprosmf':
 			act 'Continue': gt 'hotel_resep', 'vaginalmf'
 		else
 			'<<$boydesc>> holds your head and pulls his dick out of your mouth saying: "Put a condom on me, it''s time to test that pussy of yours."'
-			'"I don''t have any." You tell him. "Besides, it feels a lot better without."'
-			if pcs_dom >= 25:
-				'He eyes you critically for a moment before giving in. "Fine, if that''s what you want."'
-				gs 'dinSex', 'std_trigger'
-				act 'Continue': gt 'hotel_resep', 'vaginalmf'
+			'"I don''t have any." You tell him.'
+			
+			gs 'willpower', 'sex_other', 'force'
+			if will_cost <= pcs_willpwr:
+				act 'It feels a lot better without a condom (<<will_cost>> Willpower)':
+					cla
+					'He eyes you critically for a moment before giving in. "Fine, if that''s what you want."'
+					gs 'willpower', 'sex_other', 'force'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gs 'dinSex', 'std_trigger'
+					act 'Continue': gt 'hotel_resep', 'vaginalmf'
+				end
 			else
-				'"The safer the better if feels. You''re lucky I brought some." He tells you as he grabs a condom from his pocket.'
+				act 'It feels a lot better without a condom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			act 'Let him to use a condom':
+				cla
+				'"The safer the better it feels. You''re lucky I brought some." He tells you as he grabs a condom from his pocket.'
 				gs 'dinsex', 'boy_puts_his_condom'
 				act 'Continue': gt 'hotel_resep', 'vaginalmf'
 			end
@@ -595,12 +630,23 @@ if $ARGS[0] = 'pavgenprosmf':
 		else
 			'You move his dick out of your mouth and tell him to fuck you.'
 			'"What about a condom?" He asks you.'
-			'"I don''t have any." You tell him. "Besides, it feels a lot better without."'
-			if pcs_dom >= 25:
-				'He eyes you critically for a moment before giving in. "Fine, if that''s what you want."'
-				gs 'dinSex', 'std_trigger'
-				act 'Continue': gt 'hotel_resep', 'vaginalmf'
+			'"I don''t have any." You tell him.'
+			gs 'willpower', 'sex_other', 'force'
+			if will_cost <= pcs_willpwr:
+				act 'It feels a lot better without a condom (<<will_cost>> Willpower)':
+					cla
+					'He eyes you critically for a moment before giving in. "Fine, if that''s what you want."'
+					gs 'willpower', 'sex_other', 'force'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					gs 'dinSex', 'std_trigger'
+					act 'Continue': gt 'hotel_resep', 'vaginalmf'
+				end
 			else
+				act 'It feels a lot better without a condom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			act 'Let him to use a condom'
+				cla
 				'"Well, I don''t fuck without one, good thing I brought some." He tells you as he grabs a condom from his pocket.'
 				gs 'dinsex', 'boy_puts_his_condom'
 				act 'Continue': gt 'hotel_resep', 'vaginalmf'
@@ -610,31 +656,29 @@ if $ARGS[0] = 'pavgenprosmf':
 		if prezik > 0:
 			'You move his dick out of your mouth and tell him to put on a condom and fuck you.'
 			'"I''d much rather fuck you raw. I hate condoms." He tells you with a pleading look in his eyes. "How about if I pay you an extra 300 to do it without?"'
-			if pcs_dom < 25:
-				act 'Agree':
-					cla
-					'"Fine." You say, holding out your hand.'
-					'He grabs his wallet and hands you 300 <b>₽</b> "There, now let''s try that pussy of yours.'
-					gs 'dinSex', 'std_trigger'
-					act 'Continue': gt 'hotel_resep', 'vaginalmf'
-				end
-			else
-				act 'Agree':
-					cla
-					'"Fine." You say, holding out your hand.'
-					'He grabs his wallet and hands you 300 <b>₽</b> "There, now let''s try that pussy of yours.'
-					money += 300
-					gs 'stat'
-					gs 'dinSex', 'std_trigger'
-					act 'Continue': gt 'hotel_resep', 'vaginalmf'
-				end
-				act 'Refuse':
+			act 'Agree':
+				cla
+				'"Fine." You say, holding out your hand.'
+				'He grabs his wallet and hands you 300 <b>₽</b> "There, now let''s try that pussy of yours.'
+				money += 300
+				gs 'stat'
+				gs 'dinSex', 'std_trigger'
+				act 'Continue': gt 'hotel_resep', 'vaginalmf'
+			end
+			gs 'willpower', 'sex_other', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
 					cla
 					'"You''ll get nothing but a blowjob if you don''t put on a condom." You tell him sternly.'
 					'"Fine, give me one." He says a bit dejected, holding out his hand.'
+					gs 'willpower', 'sex_other', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
 					gs 'dinsex', 'boy_puts_condom'
 					act 'Continue': gt 'hotel_resep', 'vaginalmf'
 				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
 		else
 			'You move his dick out of your mouth and tell him to fuck you.'
@@ -645,31 +689,43 @@ if $ARGS[0] = 'pavgenprosmf':
 		if prezik > 0:
 			'You move his dick out of your mouth and tell him to put on a condom and fuck you.'
 			'"I''d much rather fuck you raw. I hate condoms." He tells you.'
-			if pcs_dom < 25:
-				act 'Agree':
-					cla
-					'"Uhm. Ok then." You say, not quite sure how you should deal with this.'
-					'"There, now let''s try that pussy of yours.'
-					gs 'dinSex', 'std_trigger'
-					act 'Continue': gt 'hotel_resep', 'vaginalmf'
-				end
-			else
-				act 'Ask for more money':
+			act 'Agree':
+				cla
+				'"Uhm. Ok then." You say, not quite sure how you should deal with this.'
+				'"There, now let''s try that pussy of yours.'
+				gs 'dinSex', 'std_trigger'
+				act 'Continue': gt 'hotel_resep', 'vaginalmf'
+			end
+			gs 'willpower', 'prostitution', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Ask for more money (<<will_cost>> Willpower)':
 					cla
 					'"That''ll cost you an extra 300 honey." You tell him sweetly.'
 					'"Fine." He grabs his wallet and hands you 300 <b>₽</b> "There, now let''s try that pussy of yours.'
 					money += 300
+					gs 'willpower', 'prostitution', 'self'
+					gs 'willpower', 'pay', 'self'
 					gs 'stat'
 					gs 'dinSex', 'std_trigger'
 					act 'Continue': gt 'hotel_resep', 'vaginalmf'
 				end
-				act 'Refuse':
+			else
+				act 'Ask for more money (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			gs 'willpower', 'sex_other', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
 					cla
 					'"You''ll get nothing but a blowjob if you don''t put on a condom." You tell him sternly.'
 					'"Fine, give me one." He says a bit dejected, holding out his hand.'
+					gs 'willpower', 'sex_other', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
 					gs 'dinsex', 'boy_puts_condom'
 					act 'Continue': gt 'hotel_resep', 'vaginalmf'
 				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
 		else
 			'You move his dick out of your mouth and tell him to fuck you.'
@@ -680,25 +736,33 @@ if $ARGS[0] = 'pavgenprosmf':
 		if prezik > 0:
 			'You move his dick out of your mouth and tell him to put on a condom and fuck you.'
 			'"No, I''m going to fuck you raw. I hate condoms." He tells you angrily.'
-			if pcs_dom < 25:
-				act 'Agree':
-					cla
-					'You are afraid he''s going to hurt you if you don''t let him fuck you without a condom.'
-					'"Uhm. Ok then." You say, not quite sure how you should deal with this.'
-					'"That''s better, now let''s try that pussy of yours.'
-					gs 'dinSex', 'std_trigger'
-					act 'Continue': gt 'hotel_resep', 'vaginalmf'
-				end
-			else
-				act 'Ask for more money':
+			act 'Agree':
+				cla
+				'You are afraid he''s going to hurt you if you don''t let him fuck you without a condom.'
+				'"Uhm. Ok then." You say, not quite sure how you should deal with this.'
+				'"That''s better, now let''s try that pussy of yours.'
+				gs 'dinSex', 'std_trigger'
+				act 'Continue': gt 'hotel_resep', 'vaginalmf'
+			end
+			gs 'willpower', 'prostitution', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Ask for more money (<<will_cost>> Willpower)':
 					cla
+					gs 'willpower', 'prostitution', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
 					custangry = 1
 					'"That''ll cost you an extra 300 honey." You tell him sweetly.'
 					'He grabs you by the arm and starts shaking you. "I''ve already paid for you. Do you need me to knock some sense into you or are you going to be a good little whore?"'
-					if pcs_dom >= 50:
-						act 'Fight back':
+					gs 'willpower', 'sex', 'resist'
+					if will_cost <= pcs_willpwr:
+						act 'Fight back (<<will_cost>> Willpower)':
 							cla
-							if rand(0,1) = 0:
+							gs 'willpower' 'sex', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							!TODO: Maybe add actual fight once the fighting system rework is finished
+							if pcs_stren > 60:
 								'You shove him away from you with all your strength, making him trip up with his pants around his ankles.'
 								'"Get the fuck out!" You scream at him angrily.'
 								'He just sits there with a stunned expression on his face. After a moment he starts getting dressed again.'
@@ -713,16 +777,22 @@ if $ARGS[0] = 'pavgenprosmf':
 							end
 						end
 					else
-						act 'Submit':
-							cla
-							'"N-No... I-I''ll be good." You whimper.'
-							'"That''s more like it, whore." He tells you coldly as he shoves you on the bed.'
-							gs 'dinSex', 'std_trigger'
-							act 'Continue': gt 'hotel_resep', 'vaginalmf'
-						end
+						act 'Fight 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 'Submit':
+						cla
+						'"N-No... I-I''ll be good." You whimper.'
+						'"That''s more like it, whore." He tells you coldly as he shoves you on the bed.'
+						gs 'dinSex', 'std_trigger'
+						act 'Continue': gt 'hotel_resep', 'vaginalmf'
 					end
 				end
-				act 'Refuse':
+			else
+				act 'Ask for more money (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			gs 'willpower', 'sex_other', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
 					cla
 					'"You''ll get nothing but a blowjob if you don''t put on a condom." You tell him, standing your ground.'
 					'"Fucking whore." He shouts as he shoves you hard.'
@@ -732,9 +802,13 @@ if $ARGS[0] = 'pavgenprosmf':
 					'You sit down on the bed and delicately probe the back of your head, wincing each time you brush the spot where your head hit the wall. Luckily there doesn''t seem to be any blood.'
 					custleft = 1
 					gs 'pain', 5, 'head', 'Slam'
+					gs 'willpower', 'sex_other', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					act'Go to the bar':gt 'hotel_resep','pavlbar'
 				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
 		else
 			'You move his dick out of your mouth and tell him to fuck you.'
@@ -803,29 +877,30 @@ if $ARGS[0] = 'vaginalmf':
 			'"Wow your pussy is great, but I really want to try out this sweet little asshole." <<$boydesc>> says.'
 			'"No way, we didn''t agree to this."'
 			'"Oh, come on. You''ll love it."'
-			if pcs_ass > 10:
-				'"I bet you''re a little buttslut, aren''t you?" He says with a grin.'
-			end
-			if pcs_dom < 15:
-				act 'Allow it':
-					cla
+			if pcs_ass > 10: '"I bet you''re a little buttslut, aren''t you?" He says with a grin.'
+			act 'Allow it':
+				cla
+				if pcs_ass < 10:
 					'"O-Ok, but be gentle." You tell him as you present your ass to him.'
-					act 'Continue': gt 'hotel_resep', 'analmf'
-				end
-			else
-				act 'Allow it':
-					cla
+				else
 					'"Only if you do it properly. You''re lucky I actually do love a nice slow assfuck." You tell him as you present your ass to him.'
-					act 'Continue': gt 'hotel_resep', 'analmf'
 				end
-				act 'Ask for more money':
+				act 'Continue': gt 'hotel_resep', 'analmf'
+			end
+			gs 'willpower', 'prostitution', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Ask for more money (<<will_cost>> Willpower)':
 					cla
 					'"That''ll cost you an extra 500 honey." You tell him sweetly.'
 					'"Fine." He grabs his wallet and hands you 500 <b>₽</b> "There, now let''s try that ass of yours.'
 					money += 500
+					gs 'willpower', 'prostitution', 'self'
+					gs 'willpower', 'pay', 'self'
 					gs 'stat'
 					act 'Continue': gt 'hotel_resep', 'analmf'
 				end
+			else
+				act 'Ask for more money (<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
@@ -868,41 +943,46 @@ if $ARGS[0] = 'pavgenprosmmf':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/prostitution/mmf01.jpg"></center>'
 	'The customers introduce themselves as <<$boydesc[0]>> and <<$boydesc[1]>>. "I''m <<$pcs_nickname>>. You tell them.'
 	'"We''ve just booked you for the next hour. So let''s have some fun. <<$npc_nickname[''A217'']>> said we should agree on a price to fuck both of your holes with you. Oh, and I hope you won''t insist on condoms."'
-	if pcs_dom >= 25:
-		if prezik > 0:
-			act 'Insist on condoms':
+	if prezik > 0:
+		gs 'willpower', 'sex_other', 'force'
+		if will_cost <= pcs_willpwr:
+			act 'Insist on condoms (<<will_cost>> Willpower)':
 				cla
 				mmfextrapay = 1
 				mmfcond = 1
+				gs 'willpower', 'sex_other', 'force'
+				gs 'willpower', 'pay', 'force'
+				gs 'stat'
 				'"I''m afraid I have to insist on condoms boys." You tell them. "But don''t worry, fucking my ass and pussy is on the menu. Well, for an extra 1000 <b>₽</b> it is at least.'
 				'You catch the look that passes between them. After a moment you see <<$boydesc[1]>> nod while <<$boydesc[0]>> takes out his wallet and throws the money on the bed.'
 				act 'Continue': gt 'hotel_resep', 'sexmmf'
 			end
 		else
-			act 'Ask for 1000 <b>₽</b>':
-				cla
-				mmfextrapay = 1
-				mmfcond = 0
-				'"I don''t normally let my customers fuck my ass and without condoms at that. Hmm, maybe I''ll make an exception for you guys for an extra thousand." You tell them coyly. <<$boydesc[0]>> immediately takes out his wallet and throws the money on the bed.'
-				gs 'dinSex', 'std_trigger'
-				act 'Continue': gt 'hotel_resep', 'sexmmf'
-			end
-			act 'Allow it':
-				cla
-				mmfcond = 0
-				'"I don''t normally let my customers fuck my ass and without condoms at that. Hmm, but I''ll make an exception for you guys." You tell them coyly.'
-				gs 'dinSex', 'std_trigger'
-				act 'Continue': gt 'hotel_resep', 'sexmmf'
-			end
+			act 'Insist on condoms (<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 'Allow it':
+	end
+	gs 'willpower', 'prostitution', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Ask for 1000 <b>₽</b> (<<will_cost>> Willpower)':
 			cla
+			mmfextrapay = 1
 			mmfcond = 0
-			'"I don''t normally let my customers fuck my ass and without condoms at that. Hmm, but I''ll make an exception for you guys." You tell them coyly.'
+			gs 'willpower', 'prostitution', 'self'
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			'"I don''t normally let my customers fuck my ass and without condoms at that. Hmm, maybe I''ll make an exception for you guys for an extra thousand." You tell them coyly. <<$boydesc[0]>> immediately takes out his wallet and throws the money on the bed.'
 			gs 'dinSex', 'std_trigger'
 			act 'Continue': gt 'hotel_resep', 'sexmmf'
 		end
+	else
+		act 'Ask for 1000 <b>₽</b> (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+	act 'Allow it':
+		cla
+		mmfcond = 0
+		'"I don''t normally let my customers fuck my ass and without condoms at that. Hmm, but I''ll make an exception for you guys." You tell them coyly.'
+		gs 'dinSex', 'std_trigger'
+		act 'Continue': gt 'hotel_resep', 'sexmmf'
 	end
 end
 
@@ -1176,35 +1256,42 @@ if $ARGS[0] = 'ffshower':
 			'You glance at the clock and see that an hour has almost passed.'
 			gs 'arousal', 'cuni_give', 10, 'prostitution'
 			gs 'stat'
-			act 'Ask her to return the favour':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/prostitution/ffshower04.jpg"></center>'
-				pavproslate = 1
-				'When she raises her eyes to yours again you can practically feel your own desire spark through your pussy again. "Screw <<$npc_firstname[''A217'']>>. It won''t matter if I''m a little late." You think to yourself.'
-				'"Please... Would you..." You start and <<$boydesc>> starts laughing: "Eager, I like that. Get up."'
-				'you stand up and press yourself against the shower wall, opening your legs for her. "I really wouldn''t mind another taste." She says as she slowly starts licking your pussy.'
-				'"You do taste wonderful." She says, smiling up at you as her hand slowly slides up along the inside of your leg. When it reaches your pussy she looks up at you with a boyish grin on her face.'
-				'"Oh, P-Please. Your hands are... Aah" You can''t even complete your sentence as she pushes her fingers deep inside you, making you moan loudly.'
-				'<<$boydesc>> starts licking your clit while her fingers never stop moving in and out of your soaked pussy.'
-				'Suddenly your mind goes blank as your orgasm hits you hard. You can feel your entire body tremble as the waves wash over you.'
-				'Unable to stay on your feet you let yourself slide down to the floor next to <<$boydesc>>.'
-				gs 'arousal', 'kiss', 5, 'prostitution'
-				gs 'stat'
-				act 'Continue':
+			gs 'willpower', 'cuni', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Ask her to return the favour (<<will_cost>> Willpower)':
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/prostitution/ffshower05.jpg"></center>'
-					'"I wish we could do this forever." You tell <<$boydesc>> as you give her one last passionate kiss before getting up and grabbing a towel.'
-					'As she steps out of the shower after you, you pick up another towel and hand it to her.'
-					'"That was pretty incredible. I''ll make sure to ask for you when I''m in town again." She says as she puts her clothes back on.'
-					'"I''d love that. My... My clients usually aren''t as gentle with me as you were. I-I liked it. A lot." You say a bit abashed.'
-					'"See you next time then sweetie" She says and walks out of the hotelroom. "And remember to keep this our little secret."'
-					orgasm += 1
-					noShampoo = 1
-					dynamic $showerdin
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/prostitution/ffshower04.jpg"></center>'
+					pavproslate = 1
+					'When she raises her eyes to yours again you can practically feel your own desire spark through your pussy again. "Screw <<$npc_firstname[''A217'']>>. It won''t matter if I''m a little late." You think to yourself.'
+					'"Please... Would you..." You start and <<$boydesc>> starts laughing: "Eager, I like that. Get up."'
+					'You stand up and press yourself against the shower wall, opening your legs for her. "I really wouldn''t mind another taste." She says as she slowly starts licking your pussy.'
+					'"You do taste wonderful." She says, smiling up at you as her hand slowly slides up along the inside of your leg. When it reaches your pussy she looks up at you with a boyish grin on her face.'
+					'"Oh, P-Please. Your hands are... Aah" You can''t even complete your sentence as she pushes her fingers deep inside you, making you moan loudly.'
+					'<<$boydesc>> starts licking your clit while her fingers never stop moving in and out of your soaked pussy.'
+					'Suddenly your mind goes blank as your orgasm hits you hard. You can feel your entire body tremble as the waves wash over you.'
+					'Unable to stay on your feet you let yourself slide down to the floor next to <<$boydesc>>.'
 					gs 'arousal', 'kiss', 5, 'prostitution'
+					gs 'willpower', 'cuni', 'self'
+					gs 'willpower', 'pay', 'self'
 					gs 'stat'
-					act'Go to the bar':gt 'hotel_resep','pavlbar'
+					act 'Continue':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/prostitution/ffshower05.jpg"></center>'
+						'"I wish we could do this forever." You tell <<$boydesc>> as you give her one last passionate kiss before getting up and grabbing a towel.'
+						'As she steps out of the shower after you, you pick up another towel and hand it to her.'
+						'"That was pretty incredible. I''ll make sure to ask for you when I''m in town again." She says as she puts her clothes back on.'
+						'"I''d love that. My... My clients usually aren''t as gentle with me as you were. I-I liked it. A lot." You say a bit abashed.'
+						'"See you next time then sweetie" She says and walks out of the hotelroom. "And remember to keep this our little secret."'
+						orgasm += 1
+						noShampoo = 1
+						dynamic $showerdin
+						gs 'arousal', 'kiss', 5, 'prostitution'
+						gs 'stat'
+						act'Go to the bar':gt 'hotel_resep','pavlbar'
+					end
 				end
+			else
+				act 'Ask her to return the favour (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 			act 'Out of time':
 				*clr & cla

locations/ivanRoom.qsrc

@@ -29,21 +29,19 @@ if StoryLine = 0 or altQS = 1:
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/apartment/gun.jpg"></center>'
 			'As Juugo approaches to the door, you notice the tattoos on his face move seemingly having a life of their own, you notice them growing and twisting covering his face in black designs. As the designs settle on his face you notice his fists have increased in size and appear as if they are made of stone. With a  growl he launches a rock hard fist at the door bending the steel door inwards. Grabbing one of the exposed edges of the now damaged door Juugo tears the door from its frame and off it''s hinges. You run into the apartment after Juugo and see Ivan standing in the room holding a gun. Ivan fired a shot and Juugo twitched, then Ivan fired again and again. Juugo fell to the floor. The gun empty Ivan began frantically reloading the gun.'
 
-			if pcs_dom > 0:
-				act 'Embed Ivan':
+			act 'Embed Ivan':
+				cls
+				gs 'stat'
+				!!'<center><img <<$set_imgh>> src="images/locations/city/industrial/apartment/gun.jpg"></center>'
+				'You ran at Ivan attempting to kick him while he reloads the gun. Ivan suddenly jumped back into a bedroom and slams the door in your face.  Your inertia carries you into the solid interior door and you rebound off of it just as another shot explodes thru the door splintering the wood and narrowly misses hitting you. As you push yourself up from the floor you see Juugo, the black designs swirling all over his exposed skin, he growls low and dangerous in his chest and you see the bullet wounds expelling the bullets from his body and closing right before your eyes. His body almost totally black now with the magical tattos you see horns sprout from his forehead. Juugo shouts furiously "NOW YOU DIE!" and charges at the wooden door that Ivan is hiding behind, lowering his head and shoulders for the impact he doesn''t even slow as he crashes through the solid wood sending splinters and shards flying inward into the room. You follow close behind entering the room and skidding to a halt. Ivan has been thrown backwards and to the ground, he''s bleeding badly from several areas with many wooden spikes impaling his body in various parts.  No sign of his gun he must have dropped it when the door exploded on him. Juugo still iin a rage falls upon the prone body and with an inhuman roar begins to pummel the unconscious man. Small lightning bolts arc through the body as Juugo continues to pound the body quickly reducing Ivan to little more then pulp.'
+
+				act 'Run':
 					cls
 					gs 'stat'
 					!!'<center><img <<$set_imgh>> src="images/locations/city/industrial/apartment/gun.jpg"></center>'
-					'You ran at Ivan attempting to kick him while he reloads the gun. Ivan suddenly jumped back into a bedroom and slams the door in your face.  Your inertia carries you into the solid interior door and you rebound off of it just as another shot explodes thru the door splintering the wood and narrowly misses hitting you. As you push yourself up from the floor you see Juugo, the black designs swirling all over his exposed skin, he growls low and dangerous in his chest and you see the bullet wounds expelling the bullets from his body and closing right before your eyes. His body almost totally black now with the magical tattos you see horns sprout from his forehead. Juugo shouts furiously "NOW YOU DIE!" and charges at the wooden door that Ivan is hiding behind, lowering his head and shoulders for the impact he doesn''t even slow as he crashes through the solid wood sending splinters and shards flying inward into the room. You follow close behind entering the room and skidding to a halt. Ivan has been thrown backwards and to the ground, he''s bleeding badly from several areas with many wooden spikes impaling his body in various parts.  No sign of his gun he must have dropped it when the door exploded on him. Juugo still iin a rage falls upon the prone body and with an inhuman roar begins to pummel the unconscious man. Small lightning bolts arc through the body as Juugo continues to pound the body quickly reducing Ivan to little more then pulp.'
-
-					act 'Run':
-						cls
-						gs 'stat'
-						!!'<center><img <<$set_imgh>> src="images/locations/city/industrial/apartment/gun.jpg"></center>'
-						'You turn and run out of the apartment at seeing Juugo fall. Just as you near the entrance you hear and feel a powerful explosion shake the house, hit from behind by the force your flung out the front door.  With ears ringing and aches and pains all over you look around and realize that Ivan''s apartment has collapsed, bits of wood and concrete litter the area around where you were thrown.'
+					'You turn and run out of the apartment at seeing Juugo fall. Just as you near the entrance you hear and feel a powerful explosion shake the house, hit from behind by the force your flung out the front door.  With ears ringing and aches and pains all over you look around and realize that Ivan''s apartment has collapsed, bits of wood and concrete litter the area around where you were thrown.'
 
-						act 'Run away from the entrance':gt 'nord'
-					end
+					act 'Run away from the entrance':gt 'nord'
 				end
 			end
 

locations/lesbidomhouse.qsrc

@@ -80,7 +80,6 @@ if $ARGS[0] = 'QW1':
 			cla
 			*clr
 			minut = 1
-			sub += 5
 			pcs_horny += 30
 			MistressAdoration += 1
 			gs'stat'
@@ -118,12 +117,13 @@ if $ARGS[0] = 'QW1':
 				act 'Leave her apartment':gt'street'
 			end
 		end
-		if pcs_dom > 0:
-			act '"I''d rather not."':
-				cla
-				*clr
+
+		gs 'willpower', 'misc', 'resist'
+		if will_cost <= pcs_willpwr:
+			act '"I''d rather not." (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
 				minut += 5
-				pcs_dom += 3
 				MistressResist = 1
 				MistressAdoration -= 2
 				gs'stat'
@@ -161,6 +161,8 @@ if $ARGS[0] = 'QW1':
 					act 'Leave her apartment':gt'street'
 				end
 			end
+		else
+			act '"I''d rather not." (<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
@@ -206,12 +208,13 @@ if $ARGS[0] = 'QW2':
 		
 		act 'Leave her apartment':gt'street'
 	end
-	if pcs_dom > 0:
-		act 'Refuse to be naked':
-			cla
-			*clr
+
+	gs 'willpower', 'humiliation', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse to be naked (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
 			minut += 5
-			pcs_dom += 1
 			MistressResist = 1
 			MistressAdoration -= 2
 			gs'stat'
@@ -226,9 +229,7 @@ if $ARGS[0] = 'QW2':
 				cla
 				*clr
 				minut += 30
-				pcs_horny -= 20
-				sub += 2
-				
+				pcs_horny -= 20				
 				gs'stat'
 					
 				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom50.jpg"></center>'
@@ -243,39 +244,43 @@ if $ARGS[0] = 'QW2':
 				act 'Leave her apartment':gt'street'
 			end
 		end
-	elseif sub < 30:
-		act 'Ask her why you have to be naked':
-			cla
-			*clr
-			minut += 10
-			pcs_horny -= 20
-			MistressAdoration -= 2
-			gs'stat'
-				
-			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse.jpg"></center>'
-			'There is absolutely no way you''re doing that! With a blush on your face, you refuse: "What? Do I have to? That''s so humiliating! Can''t you just tell me?"'
-			'Mistress sighs wearily and quickly walks towards you. She grabs you by the chin, and roughly slaps your cheeks a few times.'
-			'"Was I not clear last time, girl? I warned you: if you come back, you do as I say. Unconditionally. No questions asked", she growls.'
-			'For the slender woman that she is, she''s actually quite powerful. You stop resisting after a while, realizing you can''t struggle your way out of her grip.'
-			'When she feels your body relaxing, she smiles. You can see it''s a fake smile, though; she''s still angry. For the next few minutes, she looks you in the eyes insistently while reminding you how you should behave in the presence of a domme. Immediate obedience is very important.'
-			act 'Suffer through your punishment':
-				cla
-				*clr
-				minut += 30
+	else
+		gs 'willpower', 'humiliation', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Ask her why you have to be naked (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				minut += 10
 				pcs_horny -= 20
-				sub += 3
+				MistressAdoration -= 2
 				gs'stat'
 					
-				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse1.jpg"></center>'
-				'After about ten minutes she forces you to strip, roughly assisting when you''re not going fast enough for her liking. Then she stands you up against the wall, holding a rod in her hand. "That was dreadful!" she scolds you. "Absolutely dreadful. I expect better behavior from you in the future. If I need to punish you again, it will be more than just words."'
-				'You gulp and nod obediently, that rod looks menacing!'
-				'She leaves you standing there against the wall for nearly half an hour. Mistress put the cane against the wall next to you as a constant reminder of what will happen if you disobey her again, and you feel uncomfortable whenever you look down at it. This is so humiliating! And scary! Yet... also rather invigorating! You don''t remember feeling this alive recently.'
-				'Meanwhile, she''s sitting at the dining room table, drinking a cup of coffee and leafing through a magazine. Occasionally Mistress glances over at you to check if you''re still obeying the rules, but for the most part she ignores you.'
-				'When the 30 minutes are over, she orders you to quickly dress and leave. She walks you to the door after watching you get dressed, and tells you with a steel expression: "If you decide to come back, you know what I expect from you. Today was unacceptable, and I will not tolerate it again."'
-				'When you step outside her door, you feel a bit unnerved. You didn''t learn anything! Mistress displayed a lot of control, though. You decide to give yourself some time to let today''s lesson sink in. Maybe you missed something?'
-					
-				act 'Leave her apartment':gt'street'
-			end					
+				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse.jpg"></center>'
+				'There is absolutely no way you''re doing that! With a blush on your face, you refuse: "What? Do I have to? That''s so humiliating! Can''t you just tell me?"'
+				'Mistress sighs wearily and quickly walks towards you. She grabs you by the chin, and roughly slaps your cheeks a few times.'
+				'"Was I not clear last time, girl? I warned you: if you come back, you do as I say. Unconditionally. No questions asked", she growls.'
+				'For the slender woman that she is, she''s actually quite powerful. You stop resisting after a while, realizing you can''t struggle your way out of her grip.'
+				'When she feels your body relaxing, she smiles. You can see it''s a fake smile, though; she''s still angry. For the next few minutes, she looks you in the eyes insistently while reminding you how you should behave in the presence of a domme. Immediate obedience is very important.'
+				act 'Suffer through your punishment':
+					cla
+					*clr
+					minut += 30
+					pcs_horny -= 20
+					gs'stat'
+
+					'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse1.jpg"></center>'
+					'After about ten minutes she forces you to strip, roughly assisting when you''re not going fast enough for her liking. Then she stands you up against the wall, holding a rod in her hand. "That was dreadful!" she scolds you. "Absolutely dreadful. I expect better behavior from you in the future. If I need to punish you again, it will be more than just words."'
+					'You gulp and nod obediently, that rod looks menacing!'
+					'She leaves you standing there against the wall for nearly half an hour. Mistress put the cane against the wall next to you as a constant reminder of what will happen if you disobey her again, and you feel uncomfortable whenever you look down at it. This is so humiliating! And scary! Yet... also rather invigorating! You don''t remember feeling this alive recently.'
+					'Meanwhile, she''s sitting at the dining room table, drinking a cup of coffee and leafing through a magazine. Occasionally Mistress glances over at you to check if you''re still obeying the rules, but for the most part she ignores you.'
+					'When the 30 minutes are over, she orders you to quickly dress and leave. She walks you to the door after watching you get dressed, and tells you with a steel expression: "If you decide to come back, you know what I expect from you. Today was unacceptable, and I will not tolerate it again."'
+					'When you step outside her door, you feel a bit unnerved. You didn''t learn anything! Mistress displayed a lot of control, though. You decide to give yourself some time to let today''s lesson sink in. Maybe you missed something?'
+						
+					act 'Leave her apartment':gt'street'
+				end					
+			end
+		else
+			act 'Ask her why you have to be naked (<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
@@ -319,7 +324,6 @@ if $ARGS[0] = 'QW3':
 			cla
 			*clr
 			minut += 5
-			pcs_dom += 2
 			MistressResist = 2
 			MistressAdoration -= 2
 			gs'stat'
@@ -467,44 +471,48 @@ if $ARGS[0] = 'QW3':
 				end
 			end
 		end
-	elseif sub < 25:
-		act 'You don''t want to take your clothes off':
-			cla
-			*clr
-			minut += 10
-			pcs_horny -= 10
-			MistressAdoration -= 2
-			dynamic '<<$clothingworntype>>[<<clothingwornnumber>>] -= 5'
-			gs'stat'
-				
-			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse2.jpg"></center>'
-			'You look at Mistress defiantly, refusing to take your clothes off. You barely know her! It''s so humiliating... why can''t she just talk to you about how she does things!?'
-			'Mistress just stares at you intently for several seconds, and the silence in the room is deafening. Then a sinister smile slowly forms on her lips, and you remember her promise. Uh oh.'
-			'She roughly grabs you by the hair and quickly strips you of your clothes, not caring if it gets damaged. Once you''re nude, she throws you down on the sofa and reaches for her cane.'
-			'"I told you I expect you to do, what I tell you to do, slave", she hisses at you. "This is what happens if you don''t."'
-				
-			act 'Try to apologize':
-				cla
-				*clr
-				minut += 30
-				pcs_horny = 0
-				sub += 3
-				spank += 1
-				gs 'sweat', 'add', 10
-				spanked = 3
-				spankedtime = totminut
+	else
+		gs 'willpower', 'humiliation', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'You don''t want to take your clothes off (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				minut += 10
+				pcs_horny -= 10
+				MistressAdoration -= 2
+				dynamic '<<$clothingworntype>>[<<clothingwornnumber>>] -= 5'
 				gs'stat'
 					
-				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse3.jpg"></center>'
-				'You quickly try to apologize, and grovel: "Please, Mistress! I''m sorry! Please don''t do thi-aaaah!"'
-				'You''re interrupted by a sharp burning pain across your buttocks, and you try to get away from the couch instinctively. Mistress expected this, and readily holds you tight before pushing you down onto the sofa again.'
-				'She scolds you: "I''m very disappointed at your lack of progress. Now lean your hands on the couch and present your ass so you can receive your deserved punishment! Now!"'
-				'Realizing you have no other option, you assume the position and whimper when the wooden cane hits your ass cheeks again. The searing pain brings tears to your eyes, and several are rolling down your cheeks when Mistress finally stops after two dozen strokes. And that was with her holding back.'
-				'She lets you stand in this position for ten more minutes, while she has a cup of coffee. When you''re finally allowed to put your clothes back on, you wince when the fabric touches the whip marks. You''re not sure how you''re going to sit down, for the next few days...'
-				'Mistress definitely made her point today; these ''lessons'' from her are not going to be easy. She will make it hurt, if you do not comply with what she wants. She will make it hurt badly. Is it really worth it?'
+				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse2.jpg"></center>'
+				'You look at Mistress defiantly, refusing to take your clothes off. You barely know her! It''s so humiliating... why can''t she just talk to you about how she does things!?'
+				'Mistress just stares at you intently for several seconds, and the silence in the room is deafening. Then a sinister smile slowly forms on her lips, and you remember her promise. Uh oh.'
+				'She roughly grabs you by the hair and quickly strips you of your clothes, not caring if it gets damaged. Once you''re nude, she throws you down on the sofa and reaches for her cane.'
+				'"I told you I expect you to do, what I tell you to do, slave", she hisses at you. "This is what happens if you don''t."'
 					
-				act 'Leave her apartment':gt'street'
+				act 'Try to apologize':
+					cla
+					*clr
+					minut += 30
+					pcs_horny = 0
+					spank += 1
+					gs 'sweat', 'add', 10
+					spanked = 3
+					spankedtime = totminut
+					gs'stat'
+						
+					'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse3.jpg"></center>'
+					'You quickly try to apologize, and grovel: "Please, Mistress! I''m sorry! Please don''t do thi-aaaah!"'
+					'You''re interrupted by a sharp burning pain across your buttocks, and you try to get away from the couch instinctively. Mistress expected this, and readily holds you tight before pushing you down onto the sofa again.'
+					'She scolds you: "I''m very disappointed at your lack of progress. Now lean your hands on the couch and present your ass so you can receive your deserved punishment! Now!"'
+					'Realizing you have no other option, you assume the position and whimper when the wooden cane hits your ass cheeks again. The searing pain brings tears to your eyes, and several are rolling down your cheeks when Mistress finally stops after two dozen strokes. And that was with her holding back.'
+					'She lets you stand in this position for ten more minutes, while she has a cup of coffee. When you''re finally allowed to put your clothes back on, you wince when the fabric touches the whip marks. You''re not sure how you''re going to sit down, for the next few days...'
+					'Mistress definitely made her point today; these ''lessons'' from her are not going to be easy. She will make it hurt, if you do not comply with what she wants. She will make it hurt badly. Is it really worth it?'
+						
+					act 'Leave her apartment':gt'street'
+				end
 			end
+		else
+			act 'You don''t want to take your clothes 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
@@ -564,7 +572,6 @@ if $ARGS[0] = 'QW4':
 			cla
 			*clr
 			minut += 6
-			sub += 1
 			gs'stat'
 
 			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/sub3.jpg"></center>'
@@ -581,7 +588,6 @@ if $ARGS[0] = 'QW4':
 				*clr
 				minut += 4
 				pcs_horny += 10
-				pcs_dom += 5
 				gs'stat'
 
 				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom59.jpg"></center>'
@@ -630,43 +636,46 @@ if $ARGS[0] = 'QW4':
 				end
 			end
 		end
-	elseif sub < 20:
-		act 'Refuse to show your pussy':
-			cla
-			*clr
-			minut += 6
-			pcs_horny = 0
-			spank += 1
-			spanked = 2
-			spankedtime = totminut
-			gs 'sweat', 'add', 10
-			sub += 1
-			MistressAdoration -= 2
-			lesbiQW = 5
-			gs'stat'
-
-			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse4.jpg"></center>'
-			'Showing your pussy to her? You barely know her! Why isn''t she teaching you things like she promised?'
-			'When you begin to shake your head, Mistress swears loudly and roughly grabs you by the hair. "Useless piece of shit, I knew you were going to be more trouble than you''re worth!"'
-			'She sits down on a chair, pulls you over her lap and spanks your ass with the first item she could get her hands on; a hairbrush. For the next few minutes she relentlessly beats your ass with it despite your begging and pleading, and she''s gasping for air by the time she finally stops. Not because she feels you had enough - only because her arm is too tired to continue.'
-
-			act 'Continue':
-				cla
-				*clr
-				minut += 4
-				pcs_horny += 10
+	else
+		gs 'willpower', 'humiliation', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse to show your pussy (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				minut += 6
+				pcs_horny = 0
+				spank += 1
+				spanked = 2
+				spankedtime = totminut
 				gs 'sweat', 'add', 10
-				sub += 1
+				MistressAdoration -= 2
+				lesbiQW = 5
 				gs'stat'
 
-				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse5.jpg"></center>'
-				'With a furious look in her eyes she throws you onto the ground, and kicks you in your stomach once out of sheer frustration. She changed her mind half-way during the kick, realizing that maybe this is a bit too harsh on a new girl like you, and doesn''t kick you very hard. It still makes you curl up into a ball, gasping for breath while your ass cheeks feel like someone set them on fire.'
-				'Hoping that maybe it''s not too late yet, you roll onto your back and spread your pussy lips for Mistress with tears in your eyes. "Here''s my pussy, Mistress! Please!" you beg.'
-				'She looks down at you a full minute and scans your body from head to toe, focusing on your pussy in particular. Still she shrugs: "Too late, slave. You ruined it."'
-				'Then, she passively waves her hand at you and tells you to get out. Not wanting to anger her any further, you quickly get dressed in the hallway before she can change her mind.'
+				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse4.jpg"></center>'
+				'Showing your pussy to her? You barely know her! Why isn''t she teaching you things like she promised?'
+				'When you begin to shake your head, Mistress swears loudly and roughly grabs you by the hair. "Useless piece of shit, I knew you were going to be more trouble than you''re worth!"'
+				'She sits down on a chair, pulls you over her lap and spanks your ass with the first item she could get her hands on; a hairbrush. For the next few minutes she relentlessly beats your ass with it despite your begging and pleading, and she''s gasping for air by the time she finally stops. Not because she feels you had enough - only because her arm is too tired to continue.'
 
-				act 'Leave her apartment':gt'street'
+				act 'Continue':
+					cla
+					*clr
+					minut += 4
+					pcs_horny += 10
+					gs 'sweat', 'add', 10
+					gs'stat'
+
+					'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse5.jpg"></center>'
+					'With a furious look in her eyes she throws you onto the ground, and kicks you in your stomach once out of sheer frustration. She changed her mind half-way during the kick, realizing that maybe this is a bit too harsh on a new girl like you, and doesn''t kick you very hard. It still makes you curl up into a ball, gasping for breath while your ass cheeks feel like someone set them on fire.'
+					'Hoping that maybe it''s not too late yet, you roll onto your back and spread your pussy lips for Mistress with tears in your eyes. "Here''s my pussy, Mistress! Please!" you beg.'
+					'She looks down at you a full minute and scans your body from head to toe, focusing on your pussy in particular. Still she shrugs: "Too late, slave. You ruined it."'
+					'Then, she passively waves her hand at you and tells you to get out. Not wanting to anger her any further, you quickly get dressed in the hallway before she can change her mind.'
+
+					act 'Leave her apartment':gt'street'
+				end
 			end
+		else
+			act 'Refuse to show your pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
@@ -733,13 +742,16 @@ if $ARGS[0] = 'QW5':
 			act 'Get dressed and leave':gt'street'
 		end
 	end
-	if sub < 15:
-		act 'Beg her not to do it':
+
+	gs 'willpower', 'BDSM', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Beg her not to do it (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
 			cla
 			*clr
 			minut += 5
 			pcs_horny += 1
-			sub += 2
 			gs'stat'
 
 			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/subrefuse6.jpg"></center>'
@@ -842,6 +854,8 @@ if $ARGS[0] = 'QW5':
 				end
 			end
 		end
+	else
+		act 'Beg her not to do 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
 
@@ -897,7 +911,6 @@ if $ARGS[0] = 'QW6':
 						minut += 5
 						pcs_horny += 0
 						agape = 3
-						sub += 3
 						gs 'sweat', 'add', 20
 						pcs_mood = 5
 						gs'stat'
@@ -1023,7 +1036,6 @@ if $ARGS[0] = 'QW7':
 	act 'Put it on and go to the terrace':
 		cla
 		*clr
-		sub += 1
 		minut += 10
 		pcs_horny += 30
 		gs'stat'
@@ -1106,7 +1118,6 @@ if $ARGS[0] = 'QW8':
 	*clr
 	minut += 5
 	pcs_horny += 20
-	sub += 1
 	lesbiday = daystart
 	gs'stat'
 
@@ -1184,10 +1195,11 @@ if $ARGS[0] = 'QW8':
 			act 'Leave her apartment':gt'street'
 		end
 	end
-	if sub < 10:
-		act 'Hesitate and stay where you are':
-			cla
-			*clr
+	gs 'willpower', 'exhib', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Hesitate and stay where you are (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
 			minut += 15
 			pcs_horny = 0
 			spank += 1
@@ -1256,7 +1268,6 @@ if $ARGS[0] = 'QW8':
 				*clr
 				minut += 5
 				lesbiQW = 10
-				sub += 5
 				gs 'sweat', 'add', 10
 				gs'stat'
 
@@ -1294,6 +1305,8 @@ if $ARGS[0] = 'QW8':
 				end
 			end
 		end
+	else
+		act 'Hesitate and stay where you are (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -1403,8 +1416,6 @@ if $ARGS[0] = 'QW10':
 	minut += 5
 	pcs_horny += 20
 	lesbiday = daystart
-	if sub < 75:sub += 1
-	if sub >= 75:lesbiQW = 11 & mistressqwest = 0
 	gs'stat'
 	temp = rand(0,2)
 
@@ -2126,7 +2137,6 @@ if $ARGS[0] = 'QW11':
 			*clr
 			pcs_horny = 0
 			pcs_mood = 5
-			sub += 5
 			pcs_health = 20
 			minut += 40
 			spank += 1

locations/narkopriton.qsrc

@@ -178,13 +178,21 @@ if $ARGS[0] = 'heroin':
 				'It''s obvious that you have no idea what to do. He takes pitty on you and cooks you up a shot. He loads the needle full and gives it to you.'
 				'"Thanks." You take the needle and go find a couch in the house to sit on.'
 				'Finding a couch, you sit down and look at the needle apprehensively, you question yourself...'
-				act 'You can''t help but think of all the horror stories and return the drugs':
-					*clr & cla
-					'<center><b>Local drug den</b></center>'
-					'<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
-					'You change your mind and give the syringe back to the guy.'
-					'"I don''t do refunds girl," he said.'
-					act '"I know," you say and leave': minut += 5 & gt 'street'
+				gs 'willpower', 'drugs', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'You can''t help but think of all the horror stories and return the drugs (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'drugs', 'resist', 'hard'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><b>Local drug den</b></center>'
+						'<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
+						'You change your mind and give the syringe back to the guy.'
+						'"I don''t do refunds girl," he said.'
+						act '"I know," you say and leave': minut += 5 & gt 'street'
+					end
+				else
+					act 'You can''t help but think of all the horror stories and return the drugs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 				act 'You remember the look of bliss on the junkies faces in the park and use the drugs':
 					*clr & cla
@@ -226,11 +234,23 @@ if $ARGS[0] = 'drugslut':
 	minut += 5
 	gs 'stat'
 
-	act 'Leave dejectedly':	minut += 5 & gt 'street'
-
 	if NarkShmaraTimes > 0:
 		'"Bobka, please! You remember me, right? I''m good for it, you can trust me!" you beg him, but he gives you a wicked grin.'
 		'"Come on, <<$pcs_nickname>>! You know I don''t do credit!" he snorts.'
+		
+		gs 'willpower', 'drugs', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave dejectedly (<<will_cost>> Willpower)':
+				minut += 5
+				gs 'willpower', 'drugs', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'street'
+			end
+		else
+			act 'Leave dejectedly (<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 begging, promising you''ll do anything':
 			*clr & cla
 			minut += 5
@@ -260,8 +280,19 @@ if $ARGS[0] = 'drugslut':
 				'You keep begging Bobka to give you some heroin, while you follow him to an empty room. He just laughs at you and says: <<$bobtalk>>'
 
 				act '<<$bobtext>>':	NarkShmaraTimes += 1 & gt 'bobka', bobrand
-
-				act 'Change your mind and leave': minut += 5 & gt 'street'
+				
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Change your mind and leave (<<will_cost>> Willpower)':
+						minut += 5
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'street'
+					end
+				else
+					act 'Change your mind and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
 		end
 
@@ -314,12 +345,23 @@ if $ARGS[0] = 'drugslut':
 				end
 			end
 		end
-
-		act 'Leave dejectedly': minut += 5 & gt 'street'
 	elseif NarkShmaraTimes = 0:
 		'You beg the man: "Please! I need a hit... I need it badly! Please, I''ll pay you back! I promise!"'
 		'The guy laughs: "Yea, sure. Do you know how many times a day I hear that? If I had a ruble for every time someone told me that, I would''ve retired by now! I don''t do credit, simple as that. Get lost."'
-
+		
+		gs 'willpower', 'drugs', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave dejectedly (<<will_cost>> Willpower)':
+				minut += 5
+				gs 'willpower', 'drugs', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'street'
+			end
+		else
+			act 'Leave dejectedly (<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 begging, promising you''ll do anything':
 			*clr & cla
 			minut += 5
@@ -367,7 +409,18 @@ if $ARGS[0] = 'drugslut':
 					end
 				end
 
-				act 'Change your mind and leave': minut += 5 & gt 'street'
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Change your mind and leave (<<will_cost>> Willpower)':
+						minut += 5
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'street'
+					end
+				else
+					act 'Change your mind and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			end
 		end
 	end

locations/parkBimbo.qsrc

@@ -9,8 +9,18 @@ if $ARGS[0] = 'pos1':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/parkbimbo1.jpg"></center>'
 	'You notice an old guy, who has to be in his sixties watching you. Then you notice he has his rather large dick out and he has a raging hard on.'
-	if pcs_horny > 50:act 'Help the old guy out':gt 'parkBimbo', 'pos2'
-	act 'Flip him the bird':gt 'gskver', 'start'
+	act 'Help the old guy out':gt 'parkBimbo', 'pos2'
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Flip him the bird (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'gskver', 'start'
+		end
+	else
+		act 'Flip him the bird (<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] = 'pos2':

locations/parksvid.qsrc

@@ -77,7 +77,7 @@ if $ARGS[0] = '1':
 		'"How should I know, come on and lets ask him."'
 		'"I''m not going to ask him, you ask him." said <<$telsob>>, making plaintive eyes.'
 
-		act 'Cancel and go for a walk on.':gt 'parksvid', '3'
+		act 'Forget it and continue on your walk':gt 'parksvid', '3'
 
 		act 'Ask him':
 			*clr & cla
@@ -92,8 +92,18 @@ if $ARGS[0] = '1':
 			'"Wow!" Comes her voice from under the kilt and after a few moments when she has said nothing more, you realise what is going on. "Well what are you staring there?" you ask noticing the huge smile on the guys face and the movement of her head under his kilt, while <<$telsob>> sucks him off right there and then.'
 			'A few minutes later she crawls out from under the kilt and wipes her lips.'
 			'"If you girls would like to see what else I can do with what''s under there, I know a spot.." suggests the guy still sporting a huge grin.'
-
-			act 'Decline and continue your walk':gt 'parksvid', '3'
+			
+			gs 'willpower', 'cuni', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Decline and continue your walk (<<will_cost>> Willpower)':
+					gs 'willpower', 'cuni', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'parksvid', '3'
+				end
+			else
+				act 'Decline and continue your walk (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 
 			act 'Go with the guy':
 				*clr & cla

locations/selfplay.qsrc

@@ -27,9 +27,11 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-	if dildo + middildo + largedildo + bigdildo + extradildo + superdildo + maddildo ! 0:
-		dildonumber = 0
-	end
+	! This keeps resetting your dildo choices and makes it impossible to masturbate with them. Sicaa
+	!if dildo + middildo + largedildo + bigdildo + extradildo + superdildo + maddildo ! 0:
+	!	dildonumber = 0
+	!end
+	if dildonumber > 0: gs 'boyStat', 'D<<dildonumber>>'
 
 	gs 'selfplay', 'dildo_options'
 

locations/serpent.qsrc

@@ -15,22 +15,24 @@ if findneck = 1:
 	'"Who are you ?  Where are you?" you yell.  Looking for the owner of the strange sibilant voice.'
 	'"I am Zzathrezzz.  Lord of Ssserpentsss." as the voice continues from above you see a large snake emerge out of the shadows.  Outside the barn you hear Bandit start to loudly bark.  Zathrez hisses in anoyance.'
 	'"That dog isss a noicccenccce!"'
-	act 'You stand frozen as the snake''s head glides down towards you': gt $loc
-
-	cls
-	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/serpent/serpent1_0.jpg"></center>'
 	'"Now, do we deal?" the sibilant voice continues.'
-
-	act '"Maybe, but first tell me more about what you can teach me." you place your hands on your hips and pose defiantly.':
-		serpent_path = 1
-		gt 'serpent'
-	end	
-
-	act '"No, leave me alone you freaky snake." you scream and throw the box aside as you run out of the barn':
-		serpent_path = 0
-		gt 'Gaddvor'
+	
+	gs 'willpower', 'misc', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'No, leave me alone you freaky snake (<<will_cost>> Willpower)': gs 'willpower', 'misc', 'self', 'hard' & gs 'willpower', 'pay', 'self' & serpent_path = 0 & gt 'Gaddvor'
+	else
+		act 'No, leave me alone you freaky snake (<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', 'skill', 'self', 'magik_lvl'
+	if will_cost <= pcs_willpwr:
+		act 'Maybe, but first tell me more about what you can teach me (<<will_cost>> Willpower)': gs 'willpower', 'skill', 'self', 'magik_lvl' & gs 'willpower', 'pay', 'self' & serpent_path = 1 & gt 'serpent'
+	else
+		act 'Maybe, but first tell me more about what you can teach me (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
+	
+	act 'You stand frozen as the snake''s head glides down towards you': gt $loc
 end
 
 if serpent_path = 1:

locations/shulgabath.qsrc

@@ -18,10 +18,10 @@ if $ARGS[0] = 'start':
 	menu_off = 0
 	!Sonia opening event in the bathroom
 	if soniaPS >= 2:
-		if RAND(0,100) >= 90 and sh_sonya_sexev > 2 and sonya_bazar_count > 0 and ev_sonya_count > 0 and hour <= 23 and ((week < 6 and hour >= 14) or (week >= 6 and hour >= 10)):
+		if rand(0,100) >= 90 and sh_sonya_sexev > 2 and sonya_bazar_count > 0 and ev_sonya_count > 0 and hour <= 23 and ((week < 6 and hour >= 14) or (week >= 6 and hour >= 10)):
 			gt 'shulgabath', 'ev'
 			exit
-		elseif RAND(0,90) <= 5 and npc_rel['A112'] >= 20 and sexev_sonya_count > 0 and hour <= 23 and ((week < 6 and hour >= 14) or (week >= 6 and hour >= 10)):
+		elseif rand(0,90) <= 5 and npc_rel['A112'] >= 20 and sexev_sonya_count > 0 and hour <= 23 and ((week < 6 and hour >= 14) or (week >= 6 and hour >= 10)):
 			gt 'shulgabath', 'sexev'
 			exit
 		end
@@ -30,7 +30,7 @@ if $ARGS[0] = 'start':
 	'<center><b><font color = maroon>Bathroom</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/vanna.jpg"></center>'
 	*nl
-	'Uncle Sergey''s bathroom is small and very unpretentious. Nevertheless, it has everything a bathroom needs. There is a <a href="exec:gt ''mirror'',''start''">mirror</a> above the sink, where you can ' + iif(pcs_hairbsh = 0,'<a href="exec:gt ''mirror'',''brush''">brush</a>','brush') + ' your hair, a shower and bath tub.'
+	'Uncle Sergey''s bathroom is small and very unpretentious. Nevertheless, it has everything a bathroom needs. There is a <a href="exec: gt ''mirror'',''start''">mirror</a> above the sink, where you can ' + iif(pcs_hairbsh = 0,'<a href="exec: gt ''mirror'',''brush''">brush</a>','brush') + ' your hair, a shower and bath tub.'
 	*nl
 
 	act 'Return to the hallway': gt'shulgahall'
@@ -41,7 +41,7 @@ end
 !Bathroom, Sonia choice opening event:
 if $ARGS[0] = 'sexev':
 	menu_off = 1
-	if RAND(0,100) < 50:
+	if rand(0,1) = 0:
 		gt 'shulgabath', 'sexev1'
 	else
 		gt 'shulgabath', 'sexev2'
@@ -125,7 +125,7 @@ end
 
 if $ARGS[0] = 'ev':
 	menu_off = 1
-	if RAND(0,100) <= 80:
+	if rand(0,100) <= 80:
 		gt 'shulgabath', 'ev1'
 	else
 		gt 'shulgabath', 'ev2'
@@ -143,11 +143,21 @@ if $ARGS[0] = 'ev1':
 	'When you go to the bathroom, you find Sonia already in there. "Hi!" she says cheerfully, before returning to touching up her make-up.'
 
 	act 'Chat with Sonia': gt 'shulgabath', 'bazar'
-	if sh_sonya_bazar > 5:
-		act 'Suggest you take a bath together': gt 'shulgabath', 'lesb'
+	if sh_sonya_bazar > 5 and mesec <= 0:
+		gs 'willpower', 'cuni', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Suggest you take a bath together (<<will_cost>> Willpower)': gs 'willpower', 'cuni', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'shulgabath', 'lesb'
+		else
+			act 'Suggest you take a bath together (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
-	if sh_sonya_bazar >= 25 and npc_rel['A112'] >= 50:
-		act 'Suggest you and Sonia fuck Sergey together': gt 'shulgabath', 'serg_sex'
+	if sh_sonya_bazar >= 25 and npc_rel['A112'] >= 50 and pcs_vag >= 1:
+		gs 'willpower', 'group', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Suggest you and Sonia fuck Sergey together (<<will_cost>> Willpower)': gs 'willpower', 'group', 'self' & gs 'willpower', 'pay', 'self' & gt 'shulgabath', 'serg_sex'
+		else
+			act 'Suggest you and Sonia fuck Sergey together (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
 
 	act 'Return to the hallway': gt'shulgahall'
@@ -181,7 +191,7 @@ if $ARGS[0] = 'bazar':
 	*nl
 	'Ever since Sonia inadvertedly got way too drunk and gave five guys including Vitek and his friends a simultaneous blowjob near the disco, her reputation in Pavlovsk has been in shambles. The girls in her class all give her the silent treatment, pretending she does not exist. Meanwhile the guys all treat her like a cheap whore and regularly ask (or sometimes even demand) sex from her, knowing she doesn''t have the strength to say no.'
 
-	sonya_textb_vanna = RAND(1,7)
+	sonya_textb_vanna = rand(1,7)
 	if sonya_textb_vanna = 1:$sonya_textb_vanna = 'You spend some time chatting about everyday things with Sonia.'
 	if sonya_textb_vanna = 2 and SchoolAtestat = 0:$sonya_textb_vanna	= 'When you ask Sonia how she''s doing in school, she laughs and says: "It''s very easy to get good grades at our school. All you have to do is get the teachers to like you. And as you may know, they all like me..."'
 	if sonya_textb_vanna = 2 and SchoolAtestat = 1:$sonya_textb_vanna	= 'When you ask Sonia about the kind of work she does since school ended, she shrugs: "It''s tough to get a decent job nowadays. I''m lucky I have some nice guys like Sergey helping me out with my bills, otherwise I wouldn''t know how to make ends meet!"'
@@ -199,11 +209,21 @@ if $ARGS[0] = 'bazar':
 		act 'Chat some more': gt 'shulgabath', 'bazar'
 	end
 
-	if sh_sonya_bazar > 5 and mesec <=0:
-		act 'Suggest you take a bath together': gt 'shulgabath', 'lesb'
+	if sh_sonya_bazar > 5 and mesec <= 0:
+		gs 'willpower', 'cuni', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Suggest you take a bath together (<<will_cost>> Willpower)': gs 'willpower', 'cuni', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'shulgabath', 'lesb'
+		else
+			act 'Suggest you take a bath together (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
-	if sh_sonya_bazar >= 25 and npc_rel['A112'] >= 50 and sonya_bazar_count >= 1 and pcs_vag >=1:
-		act 'Suggest you and Sonia fuck Sergey together': gt 'shulgabath', 'serg_sex'
+	if sh_sonya_bazar >= 25 and npc_rel['A112'] >= 50 and sonya_bazar_count >= 1 and pcs_vag >= 1:
+		gs 'willpower', 'group', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Suggest you and Sonia fuck Sergey together (<<will_cost>> Willpower)': gs 'willpower', 'group', 'self' & gs 'willpower', 'pay', 'self' & gt 'shulgabath', 'serg_sex'
+		else
+			act 'Suggest you and Sonia fuck Sergey together (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
 
 	act 'Return to the hallway': gt'shulgahall'
@@ -219,7 +239,7 @@ if $ARGS[0] = 'lesb':
 	pcs_makeup = 1
 	noShampoo = 1
 	dynamic $showerdin
-	if frost > 0:frost = 0
+	if frost > 0: frost = 0
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/ev1_1.jpg"></center>'
 	*nl
@@ -231,7 +251,6 @@ if $ARGS[0] = 'lesb':
 
 	act 'Continue':
 		*clr & cla
-		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/shuglinhome/vanna/ev1_2'+rand(1,2)+'.jpg"></center>'
 		*nl
@@ -244,7 +263,6 @@ if $ARGS[0] = 'lesb':
 			'Just when you were about to say something, Sonia moves closer to you and kisses you full on your mouth. You freeze for a second, and then think to yourself... why the hell not?'
 			'You kiss Sonia back eagerly, playing with her tongue as she thrusts it into your mouth.'
 			gs 'arousal', 'kiss', 10, 'lesbian'
-			minut -= 5
 			gs 'stat'
 			act 'Continue':
 				*clr & cla
@@ -252,15 +270,10 @@ if $ARGS[0] = 'lesb':
 				*nl
 				'Before you realize what''s going on, Sonia signals for you to lift your hips above the water, which you do immediately.'
 				'Sonia moves her head between your legs and licks your cunt eagerly, teasing your clitoris with her tongue. She teases you with one hand, thrusting two fingers inside your snatch while she licks you skilfully. The way she looks into your eyes the whole time makes it a very intimate experience... she''s really good at this!'
-				if pcs_horny >=70:
-					pcs_mood += 35
-					pcs_willpwr +=20
-					$orgasm_or = 'custom'
-					$orgasm_txt = 'Sonia''s constant teasing pushes you over the edge, and you orgasm loudly when she licks your clit again.'
-					gs 'arousal', 'cuni', 5, 'lesbian'
-					gs 'arousal', 'vaginal_finger', 5, 'lesbian'
-					minut -= 5
-				end
+				$orgasm_or = 'custom'
+				$orgasm_txt = 'Sonia''s constant teasing pushes you over the edge, and you orgasm loudly when she licks your clit again.'
+				gs 'arousal', 'cuni', 5, 'lesbian'
+				gs 'arousal', 'vaginal_finger', -5, 'lesbian'
 				'Sonia grins at you and asks playfully: "Did you like my tongue on your pussy, <<$pcs_nickname>>?"'
 				'"Absolutely!" you nod. "Come on, let me do the same for you! I want to taste you too!"'
 				'"I can''t right now, my mother is waiting for me at home", Sonia says wistfully. "Maybe next time?"'
@@ -303,13 +316,12 @@ if $ARGS[0] = 'serg_sex':
 		'"Enjoying yourself over there, Sonia?" you teasingly ask between moans. Sonia grins mischievously, and punishes you by grabbing a firmer hold on your hair and roughly grinding her pussy against your mouth.'
 		'Then Sergey decides it''s Sonia''s turn, and he makes her lie down on her back.'
 		gs 'arousal', 'vaginal', 5, 'sub', 'group'
-		gs 'arousal', 'cuni_give', 5, 'lesbian', 'sub', 'group'
-		minut -= 5
+		gs 'arousal', 'cuni_give', -5, 'lesbian', 'sub', 'group'
 		gs 'stat'
 		act 'Continue':
 			*clr & cla
-			minut += 5
 			pcs_horny += 15
+			if pcs_inhib < 30:inhib_exp += rand(1,3)
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/vanna/gr/ev1_3_'+rand(1,4)+'.jpg"></center>'
 			*nl
@@ -319,15 +331,10 @@ if $ARGS[0] = 'serg_sex':
 			'Sonia is too enthralled by the large dick fucking her snatch, and mostly just moans and groans into your pussy when you grind your groin against her face.'
 			'Sergey is railing her quite roughly now, and since Sonia is not doing a good job of pleasing you, you encourage him: "Fuck that pussy, Sergey! No need to hold back on this whore''s slit, she can take it! Pleasing you is what she''s made for!"'
 			'Suddenly Sonia becomes far more eager to please you, and you feel her tongue actively rubbing against your clit. You smirk when you realize why; Sonia must understand that you''re the reason why Sergey is fucking her so roughly, and is trying to please you so you''ll choose her side again.'
-			if pcs_horny >=70:
-				if pcs_inhib < 30:inhib_exp += rand(1,3)
-				pcs_mood += 35
-				pcs_willpwr +=20
-				$orgasm_or = 'custom'
-				$orgasm_txt = 'She does such a good job, she brings you to an orgasm before you can stop her. You loudly groan and your body trembles over hers, causing Sergey to give you some confused looks.'
-				gs 'arousal', 'cuni', 5, 'lesbian', 'dom', 'group'
-				gs 'stat'
-			end
+			$orgasm_or = 'custom'
+			$orgasm_txt = 'She does such a good job, she brings you to an orgasm before you can stop her. You loudly groan and your body trembles over hers, causing Sergey to give you some confused looks.'
+			gs 'arousal', 'cuni', 10, 'lesbian', 'dom', 'group'
+			gs 'stat'
 			act 'Continue':
 				*clr & cla
 				minut += 5

locations/shulgabed.qsrc

@@ -17,15 +17,15 @@ if $ARGS[0] = '' or $ARGS[0] = 'wakeup':
 	*nl
 	'Sergey''s bedroom looks just like any other bedroom. There''s a large bed, a television with a VCR connected to it, and a large cabinet to store clothes in. A random amount of junk is deposited on one of the nightstands.'
 
-	if hour < 7 or hour >= 23: 'When you come in you see that<<$serg_obr>> <a href="exec:gt ''Serge_Shulgin'',''sleep''">Sergey</a> is currently on his bed, sound asleep.'
+	if hour < 7 or hour >= 23: 'When you come in you see that<<$serg_obr>> <a href="exec: gt ''Serge_Shulgin'',''sleep''">Sergey</a> is currently on his bed, sound asleep.'
 
-	if week < 6 and ((hour >= 16 and hour < 18) or (hour >= 21 and hour < 23)): 'When you come in you see that<<$serg_obr>> <a href="exec:gt ''Serge_Shulgin'',''tv''">Sergey</a> is relaxing on his bed, watching TV.'
-	if week >= 6 and ((hour >= 7 and hour < 18) or (hour >= 21 and hour < 23)): 'When you come in you see that<<$serg_obr>> <a href="exec:gt ''Serge_Shulgin'',''tv''">Sergey</a> is relaxing on his bed, watching TV.'
+	if week < 6 and ((hour >= 16 and hour < 18) or (hour >= 21 and hour < 23)): 'When you come in you see that<<$serg_obr>> <a href="exec: gt ''Serge_Shulgin'',''tv''">Sergey</a> is relaxing on his bed, watching TV.'
+	if week >= 6 and ((hour >= 7 and hour < 18) or (hour >= 21 and hour < 23)): 'When you come in you see that<<$serg_obr>> <a href="exec: gt ''Serge_Shulgin'',''tv''">Sergey</a> is relaxing on his bed, watching TV.'
 
 	if week < 6 and hour >= 7 and hour < 16: gs 'shulgabed', 'sleep'
 
 	if RAND(0,100) <= 5 and soniaPS >= 1 and sexev_sonya_count > 0 and hour >= 15 and hour <= 23 and $ARGS[0] = '': gt 'shulgabed', 'sonya'
-	act 'Return to the hallway': gt'shulgahall'
+	act 'Return to the hallway': gt 'shulgahall'
 end
 
 if $ARGS[0] = 'sonya':
@@ -42,37 +42,43 @@ if $ARGS[0] = 'sonya':
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'gopsex', 'masturb_gg'
 	gs 'stat'
-	act 'Keep watching': 
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/sonya/ev1_2_'+rand(1,3)+'.jpg"></center>'
-		'Sergey groans: "Roll over so I can look you in the eye while I''m fucking you, slut."'
-		'Sonia immediately obeys him, turning around and spreading her legs wide to receive his cock again. Sergey wastes no time and immediately slams his cock back in.'
-		'You softly bite your lower lip, watching Sonia get railed by him. She really seems to enjoy it. He''s rough with her, sometimes even uncomfortably so, but you don''t think you''ve ever seen her this happy before. What if...'
-		'Sonia interrupts your train of thought by moaning louder and louder, clearly in a lot of pleasure. She even startles Sergey a bit, who quickly leans forward and kisses her on her mouth dominantly to shut her up.'
-		
-		gs 'arousal', 'voyeur_sex', 5
-		gs 'gopsex', 'masturb_gg'
-		gs 'stat'
-		act 'Keep watching': 
+	gs 'willpower', 'voyeur', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Keep watching (<<will_cost>> Willpower)':
 			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/sonya/ev1_3_'+rand(1,2)+'.jpg"></center>'
-			'When he pulls away from her and gets down on the bed so she can ride him, she immediately begins to moan loudly again. You can tell that Sergey is starting to get annoyed by this, and he puts his hand over her mouth.'
-			'"Keep it down! Do you want the whole building to come see what you and I are up to, here?" he hisses at her.'
-			'Sonia clamps her lips tightly together and shakes her head, still emitting some muffled moans.'
-			'"I didn''t think so", he rumbles. "I''ll tell you what, if you promise to keep quiet I will make it worth your while..."'
-			'He slaps her perfect butt cheek quite hard, leaving a bright red spot on your horny classmate''s buttock. Her body begins to tremble almost immediately, and Sonia''s really struggling to hold in her moans. Wow... is she orgasming from getting spanked like that!?'
-			'Sergey decides he''s toyed with Sonia long enough and fucks her intensely, while she''s having her orgasm. "That''s it, baby. Milk my load out of me. Maybe uncle Sergey feel good", he groans.'
-			'Seconds later you can tell he''s shooting his load deep inside Sonia''s cunt. He embraces her tightly while the two of them lie on the bad, panting and gasping for air. That was intense...'	
+			gs 'willpower', 'pay', 'self'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/sonya/ev1_2_'+rand(1,3)+'.jpg"></center>'
+			'Sergey groans: "Roll over so I can look you in the eye while I''m fucking you, slut."'
+			'Sonia immediately obeys him, turning around and spreading her legs wide to receive his cock again. Sergey wastes no time and immediately slams his cock back in.'
+			'You softly bite your lower lip, watching Sonia get railed by him. She really seems to enjoy it. He''s rough with her, sometimes even uncomfortably so, but you don''t think you''ve ever seen her this happy before. What if...'
+			'Sonia interrupts your train of thought by moaning louder and louder, clearly in a lot of pleasure. She even startles Sergey a bit, who quickly leans forward and kisses her on her mouth dominantly to shut her up.'
 			
 			gs 'arousal', 'voyeur_sex', 5
-			gs 'arousal', 'end'
-			gs 'stat'
 			gs 'gopsex', 'masturb_gg'
-			act 'Leave them alone': gt'shulgahall'
+			gs 'stat'
+			act 'Keep watching': 
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/sonya/ev1_3_'+rand(1,2)+'.jpg"></center>'
+				'When he pulls away from her and gets down on the bed so she can ride him, she immediately begins to moan loudly again. You can tell that Sergey is starting to get annoyed by this, and he puts his hand over her mouth.'
+				'"Keep it down! Do you want the whole building to come see what you and I are up to, here?" he hisses at her.'
+				'Sonia clamps her lips tightly together and shakes her head, still emitting some muffled moans.'
+				'"I didn''t think so", he rumbles. "I''ll tell you what, if you promise to keep quiet I will make it worth your while..."'
+				'He slaps her perfect butt cheek quite hard, leaving a bright red spot on your horny classmate''s buttock. Her body begins to tremble almost immediately, and Sonia''s really struggling to hold in her moans. Wow... is she orgasming from getting spanked like that!?'
+				'Sergey decides he''s toyed with Sonia long enough and fucks her intensely, while she''s having her orgasm. "That''s it, baby. Milk my load out of me. Maybe uncle Sergey feel good", he groans.'
+				'Seconds later you can tell he''s shooting his load deep inside Sonia''s cunt. He embraces her tightly while the two of them lie on the bad, panting and gasping for air. That was intense...'	
+				
+				gs 'arousal', 'voyeur_sex', 5
+				gs 'arousal', 'end'
+				gs 'stat'
+				gs 'gopsex', 'masturb_gg'
+				act 'Leave them alone': gt 'shulgahall'
+			end
+			act 'Leave them alone': gt 'shulgahall'
 		end
-		act 'Leave them alone': gt'shulgahall'
+	else
+		act 'Keep watching (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	act 'Leave them alone': gt'shulgahall'
+	act 'Leave them alone': gt 'shulgahall'
 end
 
 !sleep when the bed is empty

locations/willpower.qsrc

@@ -5,7 +5,7 @@
 !!List of actions: 
 !!		'voyeur', 'mast', 'hj', 'bj', 'cuni', 'sex', 'anal', 'group', 'gangbang', 'prostitution', 'swallow', 'cum_inside', 'cum_inside_anal', 'rape',
 !!		'humiliation', 'footjob', 'titjob', 'trib', 'rimming', 'BDSM', 'pee', 'cum_outside', 'drink', 'drugs', 'crime', 'exhib', 'sleep'
-!!		there is also 'sex_other' for things like touching and fondling
+!!		there is also 'foreplay' for things like touching and fondling
 !!		and two special cases 'misc' and 'skill' 
 !!Type: Determines what kind of willpower check sveta needs to do ('resist', 'force', 'self'). 
 !!		-'resist' is used if sveta is resisting to do the 'action' somebody else wants her to do. 
@@ -638,26 +638,26 @@ if $ARGS[0] = 'kiss':
 end
 
 ! Something for sex stuff that''s not covered by other caregories. Like touching, fondling, etc.
-if $ARGS[0] = 'sex_other':
+if $ARGS[0] = 'foreplay':
 	gs 'willpower', 'calc'
 	! Attempt at giving relevant things different weight. Throw away if it seems wrong
-	sex_other_check = ((stat['hj'] + stat['bj'])/2 + stat['vaginal'] + stat['anal'] + (stat['cuni'] + stat['trib'] + stat['massage'] + stat['massage_give'])/4)/4
+	foreplay_check = ((stat['hj'] + stat['bj'])/2 + stat['vaginal'] + stat['anal'] + (stat['cuni'] + stat['trib'] + stat['massage'] + stat['massage_give'])/4)/4
 	
 	if $ARGS[1] = 'self':
-		if sex_other_check <= 90:
-			will_cost = (100 - sex_other_check + will_calc)/10
+		if (stat['foreplay'] + stat['foreplay_give']) / 2 <= 90:
+			will_cost = (100 - ((stat['foreplay'] + stat['foreplay_give']) / 2) + will_calc)/10
 		else
 			will_cost = (10 + will_calc)/10
 		end
 	elseif $ARGS[1] = 'force':
-		if sex_other_check <= 40:
-			will_cost = (110 - will_enforced - sex_other_check + will_calc)/10
+		if stat['foreplay_give'] <= 40:
+			will_cost = (160 - will_enforced - stat['foreplay_give'] + will_calc)/10
 		else
 			will_cost = (70 - will_enforced + will_calc)/10
 		end	
 	else
-		if sex_other_check <= 90:
-			will_cost = (10 + sex_other_check + will_calc)/10
+		if stat['foreplay'] <= 90:
+			will_cost = (10 + stat['foreplay'] + will_calc)/10
 		else
 			will_cost = (100 + will_calc)/10
 		end