Parcourir la source

[changed] willpower additions by nutluck

julzor il y a 5 ans
Parent
commit
54fefded7b

+ 64 - 90
locations/NikoDreams.qsrc

@@ -1,9 +1,11 @@
 # NikoDreams
 
 menu_off = 1
-
+!!ToDo: add this dream to the dreams Sveta can have at home in bed, trigger below, do this after willpower is seeded.
+!!Problem: Dreams are called in the middle of the sleep cycle and dreams with actions leave the sleep, sleep probably will have to be rewritten so that you go to sleep (start) go to sleep (dreams) and at the end go to sleep (end)
+!!if NikoVolkovQW = 10 and NikoEv = 12:
 if $ARGS[0] =  'Family':
-	cls
+	*clr & cla
 	pcs_hairbsh = 0
 	pcs_makeup = 1
 	cumspclnt = 1
@@ -14,55 +16,50 @@ if $ARGS[0] =  'Family':
 	'You feel hands, patting your leg. You open your eyes to see Anya kneeling next to you. "<<$pcs_firstname>> are you alright? It looks like you were having a bad dream." You quickly look around and realize that you are in your bedroom. Anya stands up then says, "Come on <<$pcs_nickname>>, everyone is waiting for us." You tilt your head as you reply, "Who''s waiting for us?" Anya responds, "You know, <<$npc_nickname[''A29'']>>, Dad, Kolka. Have you hit your head your something? Come on you know that we can''t eat breakfast without you." Anya takes your hand then leads you to the kitchen.'
 
 	act 'Enter kitchen':
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><b><h4><font color="green"><<"Vladimir <<$pcs_lastname>>">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
-		'You enter the kitchen to see Your stepfather and Kolka laughing at a joke that you can''t quite hear. They both stop laughing as you enter. Anya offers you a chair which you sit on, as Anya sits down next to you. You look around in relief, <font color=#FF00FF>That whole thing was just a dream. Oh it feels so good to be back home.</font> Your mother backs out of the kitchen with a tray of food then places a dish on food in front of each of you then says, "Nice of you to finally join us <<$pcs_firstname>>. I was beginning to think that you were never going to wake up." You giggle as you begin eating.'
-		'<center><b><h4><font color=#FF00FF><<"Natasha <<$pcs_lastname>>">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost'+rand(4,6)+'.jpg"></center>'
+		'You enter the kitchen to see Your stepfather and Kolka laughing at a joke that you can''t quite hear. They both stop laughing as you enter. Anya offers you a chair which you sit on, as Anya sits down next to you. You look around in relief, That whole thing was just a dream. Your mother backs out of the kitchen with a tray of food then places a dish on food in front of each of you then says, "Nice of you to finally join us <<$pcs_firstname>>. I was beginning to think that you were never going to wake up." You giggle as you begin eating.'
 
 		act 'Eat breakfast':
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><b><h4><font color=#FF00FF><<"Natasha <<$pcs_lastname>>">></font></h4></b></center>'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost'+rand(4,6)+'.jpg"></center>'
-			'Your mother suddenly exclaims, "HEY! No eating until your brother gets here!" You look and see your stepfather whispering in Kolka''s ear, but stopping as soon as you face them. You point to Kolka as you say, "<<$npc_nickname[''A29'']>>, Kolka is right there." Your mother crosses her arms as she replies, "I''m not talking about Kolka." She then walks back to the kitchen as Your brother and stepfather continue cackling while whispering into each others ears. You look around in confusion until you hear light moaning nearby. You then peek over the kitchen doorway to see your mother bent over the stove with a dark burly figure pressing against her bottom. You suddenly feel someone''s hand on one of your breasts.'
+			'Your mother suddenly exclaims, "HEY! No eating until your brother gets here!" You look and see your stepfather whispering in Kolka''s ear, but stopping as soon as you face them. You point to Kolka as you say, "<<$npc_nickname[''A29'']>>, Kolka is right there." Your mother crosses her arms as she replies, "I''m not talking about Kolka." She then walks back to the kitchen as your brother and stepfather continue cackling while whispering into each others ears. You look around in confusion until you hear light moaning nearby. You then peek over the kitchen doorway to see your mother bent over the stove with a dark burly figure pressing against her bottom. You suddenly feel someone''s hand on one of your breasts.'
 
 			act 'Turn around':
-				cls
+				*clr & cla
 				gs'stat'
-				'<center><b><h4><font color="green"><<"Kolka <<$pcs_lastname>>">></font></h4></b></center>'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
-				'You turn to see Kolka squeezing your breast as he gives your stepfather a thumbs up. You push Kolka away then hear your stepfather shout, "Hey don''t push your little brother like that!" You respond, "But he touched me!" You mother enters the room with her pants at her angles. "Come on <<$pcs_nickname>>, it''s not like all the other boys haven''t already fucked you before. Why not let your brother have a chance?" Kolka quickly adds, "Yeah <<$pcs_firstname>>, don''t be selfish!" You see everyone in the room scolding you then hear a voice shout. "Don''t worry everyone, I will put this bitch in her place!" You see Yurik Volkov without any clothes on, walking into the room before grabbing you by your throat then pushing you against the wall.'
 				'<center><b><h4><font color="red"><<"Yurik Volkov">></font></h4></b></center>'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/yurikev/avatars/threaten1.jpg"></center>'
+				'You turn to see Kolka squeezing your breast as he gives your stepfather a thumbs up. You push Kolka away then hear your stepfather shout, "Hey don''t push your little brother like that!" You respond, "But he touched me!" You mother enters the room with her pants at her angles. "Come on <<$pcs_nickname>>, it''s not like all the other boys haven''t already fucked you before. Why not let your brother have a chance?" Kolka quickly adds, "Yeah <<$pcs_firstname>>, don''t be selfish!" You see everyone in the room scolding you then hear a voice shout. "Don''t worry everyone, I will put this bitch in her place!" You see Yurik Volkov without any clothes on, walking into the room before grabbing you by your throat then pushing you against the wall.'
 
 				act 'Continue':
-					cls
+					*clr & cla
 					gs'stat'
 					'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/event/gif/ra8.mp4"></video></center>'
 					'You can faintly feel something entering your vagina, and can feel your tears leaking down your cheeks. You can faintly hear some soft voices in the distance. "Hey watch her head!...Don''t drop her!....Come on get that door open!" A few seconds later, you hear someone whispering in your ear. "It''s ok <<$pcs_firstname>>. This is your place now. You didn''t think that you can keep that precious body to yourself, did you?"'
 
 					act 'Turn around':
-						cls
+						*clr & cla
 						gs'stat'
 						'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/smile1.jpg"></center>'
-						'You slowly turn to see Niko standing right next to you with a wide grin on his face. You suddenly hear Yurik groan as he begins pumping his cum inside of your pussy before walking away while saying to Niko, "What a worthless whore. Couldn''t even rock her hips a bit. If I wanted to fuck a blow up doll, I would have kept fucking her mother." He then leaves, as you start hearing the soft voices again, but they sound closer. "Is she going to be alright?....She will be fine. She just needs some more rest....She''s moving. Do you think she is?..."'
-						*nl
-						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum10.mp4"></video></center>'
+						'You slowly turn to see Niko standing right next to you with a wide grin on his face. You suddenly hear Yurik groan as he begins pumping his cum inside of your pussy before walking away while saying to Niko, "What a worthless whore. Couldn''t even rock her hips a bit. If I wanted to fuck a blow up doll, I would have kept fucking her mother." He then leaves, as you start hearing a beeping noise. Then you suddenly wake up in your own bed, with the alarm going off.'
 
-						act 'Continue':gt 'SoniaHome', 'Aftermath'
+						act 'Get up': gt !!this should be the same as after any dream Sveta had and wake up in her room
 					end
 				end
 			end
 		end
 	end
 end
-
+!!add this dream to the dreams Sveta can have at home in bed, trigger below, do this after willpower is seeded.
+!!if NikoVolkovQW = 10 and NikoEv = 12:
 if $ARGS[0] =  'Woods':
-	cls
+	*clr & cla
 	if music_on = 1:
 		$track_loop = 'sound/happyhome/HappyHome.mp3'
 		volume = 100
@@ -78,7 +75,7 @@ if $ARGS[0] =  'Woods':
 	VKSmiley = 3
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/1.jpg"></center>'
-	'You can feel grass on your face which you quickly brush away before looking around, and noticing that you are in the middle of the woods with a mist that surrounds you. <font color=#FF00FF>What''s going on? Why am I here? How did I get here? Where am I?</font> You stand up then look around to try to get your bearings when you begin hearing music along with the sounds of laughing in the far distance. <font color=#FF00FF>Where is this music coming from? Was that a person laughing? Maybe they can help me.</font> you begin heading in that direction when you suddenly feel a cold chill down your spine. <font color=#FF00FF>Something about that laughter is...unnerving.</font>'
+	'You can feel grass on your face which you quickly brush away before looking around, and noticing that you are in the middle of the woods with a mist that surrounds you. You don''t know where you are or how you got here. You stand up then look around to try to get your bearings when you begin hearing music along with the sounds of laughing in the far distance. You begin heading in that direction when you suddenly feel a cold chill down your spine. Something about that laughter is...unnerving.'
 	*nl
 	'You can hear someone laughing, far away.'
 
@@ -86,12 +83,12 @@ if $ARGS[0] =  'Woods':
 end
 
 if $ARGS[0] =  'Woods 2':
-	cls
+	*clr & cla
 	VKWoods = 2
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/2.jpg"></center>'
-	'<font color=#FF00FF>These woods are so dark. How did I get here?</font>'
+	'These woods are so dark and you have no idea how you got here.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -113,12 +110,12 @@ if $ARGS[0] =  'Woods 2':
 end
 
 if $ARGS[0] =  'Woods 3':
-	cls
+	*clr & cla
 	VKWoods = 3
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/3.jpg"></center>'
-	'<font color=#FF00FF>Still so dark. Am I even going the right way?</font>'
+	'Still so dark. You don''t even know if you are going the right way.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -140,12 +137,12 @@ if $ARGS[0] =  'Woods 3':
 end
 
 if $ARGS[0] =  'Woods 4':
-	cls
+	*clr & cla
 	VKWoods = 4
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/4.jpg"></center>'
-	'<font color=#FF00FF>More woods? At least I can see some light.</font>'
+	'More woods? At least you can see some light.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -167,12 +164,12 @@ if $ARGS[0] =  'Woods 4':
 end
 
 if $ARGS[0] =  'Woods 5':
-	cls
+	*clr & cla
 	VKWoods = 5
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/5.jpg"></center>'
-	'<font color=#FF00FF>Must keep moving. There must be a way out of here.</font>'
+	'You keep moving. Trying to find a way out of here.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -194,12 +191,12 @@ if $ARGS[0] =  'Woods 5':
 end
 
 if $ARGS[0] =  'Woods 6':
-	cls
+	*clr & cla
 	VKWoods = 6
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/6.jpg"></center>'
-	'<font color=#FF00FF>Will this ever end? That freak is still lurking around.</font>'
+	'The woods seem to never end.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -221,13 +218,13 @@ if $ARGS[0] =  'Woods 6':
 end
 
 if $ARGS[0] =  'Woods 7':
-	cls
+	*clr & cla
 	PLAY 'sound/happyhome/weepee.mp3', 50
 	VKWoods = 7
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/7.jpg"></center>'
-	'<font color=#FF00FF>Will I be trapped here forever? Oh wait, what is that?</font> You can see a pair of train tracks ahead of you, and you can hear the music getting louder, as you approach the tracks.'
+	'You can see a pair of train tracks ahead of you, and you can hear the music getting louder, as you approach the tracks.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -250,13 +247,13 @@ if $ARGS[0] =  'Woods 7':
 end
 
 if $ARGS[0] =  'Woods 8':
-	cls
+	*clr & cla
 	PLAY 'sound/happyhome/weepee.mp3', 100
 	VKWoods = 8
 	VKSmiley -= 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/woods/8.jpg"></center>'
-	'You begin walking on the train tracks toward a light at what appears to be, the end of the forest. <font color=#FF00FF>Is this it? Am I out of this forest?</font>'
+	'You begin walking on the train tracks toward a light at what appears to be, the end of the forest.'
 	if VKSmiley = 1:
 		'You can hear laughing close by.'
 		PLAY 'sound/happyhome/smiley.mp3', 100
@@ -279,14 +276,14 @@ if $ARGS[0] =  'Woods 8':
 end
 
 if $ARGS[0] =  'Woods Home':
-	cls
+	*clr & cla
 	PLAY 'sound/happyhome/weepee.mp3', 100
 	if VKHappyHome = 0:VKHappyHome = 1
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Happy Home">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/mansion/happyhome.jpg"></center>'
 	if VKTeeHee = 0:
-		'You finally approach the end of the forest when you see an old derelict mansion. As you walk toward the mansion, you can see; what appears to be a woman standing in the middle of the path, leading to the house. She appears to be crying with some kind of dark essence surrounding her. <font color=#FF00FF>She must be stranded here like me. Maybe I can help her.</font> you suddenly feel a cold chill down your spine before seeing a strange looking <a href="exec:gt ''NikoDreams'', ''TeeHee''">cat</a> on a tree stump, licking its paw.'
+		'You finally approach the end of the forest when you see an old derelict mansion. As you walk toward the mansion, you can see; what appears to be a woman standing in the middle of the path, leading to the house. She appears to be crying with some kind of dark essence surrounding her. You suddenly feel a cold chill down your spine before seeing a strange looking <a href="exec:gt ''NikoDreams'', ''TeeHee''">cat</a> on a tree stump, licking its paw.'
 	else
 		'There is an old derelict mansion in the distance, but the path to the mansion is blocked by a crying woman with a dark essence surrounding her. <a href="exec:gt ''NikoDreams'', ''TeeHee''">TeeHee</a> continuously rubs against your leg while purring softly, obviously wanting your attention.'
 	end
@@ -297,7 +294,7 @@ if $ARGS[0] =  'Woods Home':
 end
 
 if $ARGS[0] =  'TeeHee':
-	cls
+	*clr & cla
 	PLAY 'sound/happyhome/teehee.mp3', 100
 	gs'stat'
 	if VKTeeHee = 0:
@@ -323,37 +320,38 @@ if $ARGS[0] =  'TeeHee':
 		'You nod your head then say, "Okay, I am ready to go." TeeHee grins as she uses her tail to knock the top off of a jar, sitting next to her, releasing several glowing butterflies that circle around you, covering you with a glowing powder that lifts you in the air before suddenly pulling you back through the mist.'
 		*nl
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/butterfly6.jpg"></center>'
+		
 
-		act 'Continue':VKTeeHee = 1 & VKWoods = -1 & VKSmiley = 3 & gt 'SoniaHome', 'Aftermath 2'
+		act 'Continue':VKTeeHee = 1 & VKWoods = -1 & VKSmiley = 3 & gt !!this should be the same as after any dream Sveta had and wake up in her room
 	end
 
 	act 'Walk away':VKTeeHee = 1 & gt 'NikoDreams', 'Woods Home'
 end
 
 if $ARGS[0] =  'Smiley 1':
-	cls
+	*clr & cla
 	PLAY 'sound/happyhome/rip1.mp3', 90
 	gs'stat'
 	'<center><b><h4><font color="red"><<"Smiley">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/residents/smiley2.jpg"></center>'
 	'As you are walking through the forest you hear loud laughing behind you then suddenly feel something rubbing across your throat, causing a stream of blood to begin pouring out of your neck. You let out a scream as your energy fades, and the ground rushes toward you...'
 
-	act 'Rest in peace': VKSmiley = 3 & gt 'SoniaHome', 'Aftermath 2'
+	act 'Rest in peace': VKSmiley = 3 & gt !!this should be the same as after any dream Sveta had and wake up in her room
 end
 
 if $ARGS[0] =  'WeePee 1':
-	cls
+	*clr & cla
 	PLAY 'sound/happyhome/rip2.mp3', 100
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"WeePee">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/residents/weepee.jpg"></center>'
 	'As you approach the crying woman, she instantly turns around then lunges toward you, shoving her hand into your chest, and pulling out your heart, as she stares into your eyes, watching your life slowly drain away...'
 
-	act 'Rest in peace': VKWeePeeHeart = 1 & VKHappyHome = 0 & gt 'SoniaHome', 'Aftermath 2'
+	act 'Rest in peace': VKWeePeeHeart = 1 & VKHappyHome = 0 & gt !!this should be the same as after any dream Sveta had and wake up in her room
 end
 
 if $ARGS[0] =  'Woods Hide':
-	cls
+	*clr & cla
 	gs'stat'
 	if VKSmiley = 1:
 		'<center><b><h4><font color="red"><<"Smiley">></font></h4></b></center>'
@@ -373,22 +371,20 @@ if $ARGS[0] =  'Woods Hide':
 end
 
 if $ARGS[0] =  'Friends':
-	cls
+	*clr & cla
 	gs'stat'
 	'<center><b><h4><font color=#FF00FF><<"Sonia Ivanko">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/bedroom/soniawake.jpg"></center>'
 	'You slowly open your eyes, and see Sonia Ivanko holding a weird doll, with a goofy look on her face, causing you to giggle. "Hello sleepy head. Did you sleep well?" You give Sonia a warm smile. "I guess...Where am I?" Sonia replies, "After what happened at school, we were bored, so we decided to have you dance for us." You tilt your head. "Dance..for us?" Sonia giggles, as she points to her right. You turn to see Katja Meynold, and Julia Milov sitting on the seats right next to the bed. Katja says, "Come on <<$pcs_firstname>>. What are you waiting for?" Julia adds, "Don''t worry, I threw away all your clothes. Whores don''t need clothes." You look down and notice that you are naked. Katja suddenly slams the bed frame. "Enough messing around! DANCE WHORE!"'
-	'<center><b><h4><font color=#ff0090><<"Katja Meynold">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/bedroom/katja.jpg"></center>'
 
 	act 'Dance':
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/cam/cam2.mp4"></video></center>'
-		'You quickly stand up then begin dancing. <font color=#FF00FF>I need to keep dancing because ...Umm...Why am I dancing?</font> Sonia reaches forward then shoves her fingers inside of your vagina while Katja sticks her finger in your ass. Julia walks up to you then begins squeezing your breasts. Sonia says, "And they call me a whore." Katja giggles, as she responds, "That''s just silly <<$pcs_firstname>> is the only whore here." Julia replies, "I agree, I don''t even know why she thought that she could hide it." <font color=#FF00FF>Why are they being so mean to me? and why can''t I stop dancing?</font> Sonia gives your ass a firm smack, as she says, "Alright, we kept the boys waiting long enough."'
+		'You quickly stand up then begin dancing. <font color=#FF00FF>I need to keep dancing because ...Umm...Why am I dancing?</font> Sonia reaches forward then shoves her fingers inside of your vagina while Katja sticks her finger in your ass. Julia walks up to you then begins squeezing your breasts. Sonia says, "And they call me a whore." Katja giggles, as she responds, "That''s just silly <<$pcs_firstname>> is the only whore here." Julia replies, "I agree, I don''t even know why she thought that she could hide it." You don''t know why are they being so mean to you and why you can''t stop dancing. Sonia gives your ass a firm smack, as she says, "Alright, we kept the boys waiting long enough."'
 
 		act 'Boys?':
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/exposed1.jpg"></center>'
 			'Sonia pulls you toward the door which opens on its own, and you end up in the school cafeteria with all the boys hollering. "Hey everyone! The whore is here!" The boys all charge you and begin rubbing on your body while making lude comments,'
@@ -396,39 +392,30 @@ if $ARGS[0] =  'Friends':
 			'Petka: I know right? She is such a worthless whore. I almost don''t even want her anymore.'
 			'Radomir: I know right? Her pussy is probably all stretched out by now. It''s like ground zero.'
 			'Lesko: It may be used up but I might as well try it. Lesko then grabs you by your hair then pulls out his dick then shoves it in your mouth.'
-			'<center><b><h4><font color=#ffa200><<"Lesco Tsarev">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big7.jpg"></center>'
 
 			act 'Suck Lesco''s dick':
-				cls
+				*clr & cla
 				gs'stat'
-				'<center><video autoplay loop src="images/shared/sex/blowjob/blowjob3.mp4"></video></center>'
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall1.mp4"></video></center>'
 				'You begin sucking Lesko''s dick as the boys around you begin hollering.'
 				'Ivan: Wow <<$pcs_firstname>> is even sucking Lesko''s dick. What the fuck?'
 				'Petia: She seems to be enjoying it too. Gross!'
 				'Mr Anatoly: Don''t look at me. I never taught her that.'
-				'Lesko then pulls you up on top of him, and you begin riding his dick while tears stream down your face. <font color=#FF00FF>Why is this happening? Why are they all laughing at me? Please someone make this stop!</font>'
-				*nl
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall1.mp4"></video></center>'
+				'Lesko then pulls you up on top of him, and you begin riding his dick while tears stream down your face.'
 
 				act 'Continue':
-					cls
+					*clr & cla
 					gs'stat'
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum3.mp4"></video></center>'
 					'Lesko groans then begin pumping his cum inside of you. You look down to see an almost endless stream of cum filling you up, causing your belly to inflate. Suddenly Anya grabs you by your hair then leads you to the door, as she says, "<<$pcs_firstname>> <<$npc_nickname[''A29'']>> needs to speak with you."'
-					'<center><b><h4><font color=#00eaff><<"Anya <<$pcs_lastname>>">></font></h4></b></center>'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/progulka.jpg"></center>'
 
 					act 'Walk through the door':
-						cls
+						*clr & cla
 						gs'stat'
-						'<center><b><h4><font color=#FF00FF><<"Natasha <<$pcs_lastname>>">></font></h4></b></center>'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost'+rand(4,6)+'.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/friends/darkness.jpg"></center>'
 						'You enter the room, recognizing it as your apartment. Your mother is standing in front of you with a sneer on her face. "<<$pcs_firstname>> You let those boys get you prenant? I can''t believe you!" Anya adds, "Not only that but she has also been eating my pussy." Your mother''s eyes widen, "SHE WHAT?" Kolka speaks up too. "She also had sex with me, and is the mother of my child." Your mother is seething with rage, as she grabs onto a knife then drives it into your stomach, causing a large stream of cum to leak out.'
 						*nl
-						'You fall to the ground then stare at your stomach, watching on as an almost endless stream of cum, pours out of you. You suddenly hear someone whisper in your ear, "Hey are you alright?" You look around to see who said that, but see nothing at all. You are surrounded by darkness. <font color=#FF00FF>Where did everyone go? Where am I? It''s so dark.</font> You hear the voice whisper again, "<<$pcs_firstname>> wake up..."'
-						*nl
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/friends/darkness.jpg"></center>'
+						'You fall to the ground then stare at your stomach, watching on as an almost endless stream of cum, pours out of you. You suddenly hear someone whisper in your ear, "Hey are you alright?" You look around to see who said that, but see nothing at all. You are surrounded by darkness. You hear the voice whisper again, "<<$pcs_firstname>> wake up..."'
 
 						act 'Continue':minut += 120 & gt 'NikoEv2', 'Niko Wake'
 					end
@@ -439,7 +426,7 @@ if $ARGS[0] =  'Friends':
 end
 
 if $ARGS[0] =  'Classroom Dream':
-	cls
+	*clr & cla
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/class/rest.jpg"></center>'
 	'You can feel yourself getting tired, so you lay your head down on your desk to rest, as you wait for the school period to end. After a few seconds, you hear, "Who''s that sleeping in my class?" You immediately sit up, pretending that you weren''t laying down, as you continue listening to the teacher teach the lesson, "Always remember to double check the problem, so that you can be confident with your solution." Now let''s move on to the next lesson... How to treat a whore. For this lesson I will need a volunteer. Miss <<$pcs_lastname>>, come up in front of the class."'
@@ -447,31 +434,25 @@ if $ARGS[0] =  'Classroom Dream':
 	'You recoil in shock. "Wha...Me?" The teacher places both hands on the desk then says, "Of course I mean you. Do you know of any other whores that haven''t already volunteered?" You can just barely make out Sonia under the table sucking on the teacher''s dick.'
 
 	act 'Walk to the front of the class':
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/class/stand.jpg"></center>'
 		'As you reach the front of the class you feel your clothes falling off, you quickly try to grab them, but they dissolve in your hands. You try covering your body, but then the teacher shouts, "STOP COVERING YOURSELF YOUNG LADY! Whores should always keep their fuckholes on display." You can feel your body trembling, as you finally approach the front of the class. The teacher says, "Now this is what you do to a whore. Notice her pussy here? This is the best place to fuck, but don''t get carried away, or she could end up pregnant with a whore baby." He then motions you to come toward him.'
 
 		act 'Move closer':
-			cls
+			*clr & cla
 			gs'stat'
-			'<center><video autoplay loop src="images/shared/sex/blowjob/blowjob1.mp4"></video></center>'
-			'As soon as you get close the teacher grabs you then pushes you onto your knees. He pushes his penis against your lips, and says, "Open up, for your reward." You open your mouth, allowing his penis to enter. You begin sucking his dick eagerly, for what feels like a few minutes before he grabs your waist then lifts you up, dropping you on top of his desk. He then pushes you over then rams his dick inside of you, and begins thrusting. All you can think about if the humiliation of being fucked by your teacher, in front of your class.'
-			*nl
-			'<font color=#FF00FF>Why is this happening. Why me? Will I never have a normal life again? Will I always be...</font> You suddenly hear a soft voice whispering in your ear, "Hey <<$pcs_firstname>>, are you ok? Come on, get up..."'
-			*nl
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/class/sex.jpg"></center>'
+			'As soon as you get close the teacher grabs you then pushes you onto your knees. He pushes his penis against your lips, and says, "Open up, for your reward." You open your mouth, allowing his penis to enter. You begin sucking his dick eagerly, for what feels like a few minutes before he grabs your waist then lifts you up, dropping you on top of his desk. He then pushes you over then rams his dick inside of you, and begins thrusting. All you can think about if the humiliation of being fucked by your teacher, in front of your class. You suddenly hear a soft voice whispering in your ear, "Hey <<$pcs_firstname>>, are you ok? Come on, get up..."'
 
 			act 'Continue':
-				cls
+				*clr & cla
 				NikoEv = 13
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/class/leave.jpg"></center>'
 				'You open your eyes then see all of the students getting out of their chairs and leaving the class while chatting with each other. You feel a hand on your shoulder shaking you, so you quickly turn to see Julia with a concerned look on her face. "Are you alright <<$pcs_firstname>>?" You take a second to collect your thoughts before responding, "I don''t know why I keep having these terrible nightmares." Julia rubs your back, as she responds, "Things must be, so hard for you. I''m so sorry." not wanting to worry Julia, you give her a fake smile then say, "They''re just dreams, I''ll be fine."'
 				*nl
 				'Julia rubs on your forehead when you suddenly hear heavy breathing then turn to see Petia who says, "Are you two gonna kiss?" Julia recoils in shock then shouts, "Go away, you perv!" Petia quickly walks away. Julia looks back to you then says, "We can talk later." You smile as you respond, "That sounds great." You both walk out of the class.'
-				'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/love/smile1.jpg"></center>'
 
 				act 'Leave Classroom':minut += 5 & gt 'NikoEv2', 'Lunch Chat'
 			end
@@ -490,7 +471,7 @@ if $ARGS[0] = 'Puppeteer':
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/home/bedroom/dream/class/1.jpg"></center>'
-		'You awake then slowly lift your head, looking around the room, but immediately recoil in shock when you notice how dark the classroom is. You quickly think to yourself, <font color=#FF00CC>Whoa, how long did I sleep? Ohh shit, I must have slept through the whole day. I should probably get home before the school doors are locked up for the day.</font> You quickly shove your books into your bag then quickly walk for the door.'
+		'You awake then slowly lift your head, looking around the room, but immediately recoil in shock when you notice how dark the classroom is. You must have slept through the whole day. You should probably get home before the school doors are locked up for the day. You quickly shove your books into your bag then quickly walk for the door.'
 
 		act 'Go to the hallway':
 			*clr & cla
@@ -507,21 +488,21 @@ if $ARGS[0] = 'Puppeteer':
 			PLAY 'sound/happyhome/puppet.mp3', 25
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/shared/home/bedroom/dream/class/2.jpg"></center>'
-			'As soon as you reach the hallway, you hear a strange muffled laugh in the distance, along with a strange melody which sounds very far away. <font color=#FF00CC>Who could that be? Maybe someone is flooding one of the bathrooms again, but that music though. Where is it coming from? Maybe outside?</font>'
+			'As soon as you reach the hallway, you hear a strange muffled laugh in the distance, along with a strange melody which sounds very far away.'
 
 			act 'Head downstairs':
 				*clr & cla
 				PLAY 'sound/happyhome/puppet.mp3', 50
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/shared/home/bedroom/dream/class/3.jpg"></center>'
-				'You reach the bottom of the stairs to hear the laughing getting louder. <font color=#FF00CC>Hmm I must be getting closer to whoever is laughing.</font> The hallway is so dark but you can see a light at the end.'
+				'You reach the bottom of the stairs to hear the laughing getting louder. The hallway is so dark but you can see a light at the end.'
 
 				act 'Continue down the hallway':
 					*clr & cla
 					PLAY 'sound/happyhome/puppet.mp3',75
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/shared/home/bedroom/dream/class/4.jpg"></center>'
-					'You continue walking down the hallway until you reach a strange puddle on the floor, coming from one of the lockers. <font color=#FF00CC>What is this stuff? Did someone have a drink in their locker which spilled?</font> When you look closer, you notice that the locker is slightly open, leaking with the strange liquid.'
+					'You continue walking down the hallway until you reach a strange puddle on the floor, coming from one of the lockers. When you look closer, you notice that the locker is slightly open, leaking with the strange liquid.'
 
 					act 'Open the locker':
 						*clr & cla
@@ -529,7 +510,7 @@ if $ARGS[0] = 'Puppeteer':
 						gs'stat'
 						'<center><b><h4><font color=#FFA200><<"Puppet">></font></h4></b></center>'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/nightmares/happyhome/residents/puppet.jpg"></center>'
-						'You slowly open the locker to find a creepy doll there, which is constantly laughing in an automated voice. <font color=#FF00CC>Who left this doll here? and why is it all wet? What is this stuff?</font> The doll is heavier than it looks and seems to be covered in a thick warm liquid. <font color=#FF00CC>What is this?</font> You look closely at the liquid as you hold up the doll to the light then notice that the liquid is dark red; almost like blood. The doll has some strings attached to both of its wrists and ankles. <font color=#FF00CC>Maybe it''s a puppet?</font> You look into its eyes and notice your own reflection next to something else...'
+						'You slowly open the locker to find a creepy doll there, which is constantly laughing in an automated voice. The doll is heavier than it looks and seems to be covered in a thick warm liquid. You look closely at the liquid as you hold up the doll to the light then notice that the liquid is dark red; almost like blood. The doll has some strings attached to both of its wrists and ankles. You look into its eyes and notice your own reflection next to something else...'
 
 						act 'Turn around':
 							*clr & cla
@@ -551,7 +532,7 @@ if $ARGS[0] = 'Puppeteer':
 								'Arkadi: "Whoa, what is her problem?"'
 								'Niko: "Maybe <<$pcs_nickname>> is on the pipe or something?"'
 								'Julia: "I hope that she is okay."'
-								'Christina: "I bet she was just looking for attention. i wouldn''t put it past her."'
+								'Christina: "I bet she was just looking for attention. I wouldn''t put it past her."'
 
 								act 'Quickly leave the classroom': gt 'gschool_lessons', 'short_break'
 							end
@@ -563,12 +544,5 @@ if $ARGS[0] = 'Puppeteer':
 	end
 end
 
-if $ARGS[0] = 'Night Out':
-	gt 'NikoDreams','Puppeteer'
-end
-if $ARGS[0] = 'Toilet Time':
-	gt 'NikoDreams','Puppeteer'
-end
-
 --- NikoDreams ---------------------------------
 

+ 44 - 12
locations/kotovEv.qsrc

@@ -19,12 +19,14 @@ if kotovLoveQW > 0 and pav_slut >= 25 and kotovsluttalk ! daystart:
 		act 'Leave him':gt $loc, $metka
 	end
 
-	if pcs_dom >= 20:
-		act '"It''s all lies, babe!"':
-			cls
-			sub += 20
-			pav_sex = 0
-			pav_prostitute = 0
+	gs 'willpower', 'misc', 'self', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'It''s all lies, babe! (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			gs 'fame', 'pav', 'sex', -20
+			gs 'fame', 'pav', 'prostitute', -20
 			kotovsluttalk = daystart
 			gs 'stat'
 			'What he heard is true, but there is absolutely no way you''re going to tell him that. Especially not in his current state.'
@@ -36,7 +38,9 @@ if kotovLoveQW > 0 and pav_slut >= 25 and kotovsluttalk ! daystart:
 
 			act 'Continue':gt $loc, $metka
 		end
-	end
+	else
+		act 'It''s all lies, babe! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 
 	exit
 end
@@ -73,8 +77,17 @@ if $loc = 'gdksport':
 	end
 elseif $loc = 'gskver':
 	'Vitek sees you walk by, and waves his hand: "Hey <<$pcs_nickname>>! Come on, join me!"'
-
-	act '"No time right now, sorry!"':gt $loc, $metka
+	gs 'willpower', 'misc', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'No time right now, sorry! (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt $loc, $metka
+		end
+	else
+		act 'No time right now, sorry! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 
 	act 'Walk over to him':
 		cls
@@ -96,8 +109,17 @@ elseif $loc = 'gskver':
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big9.jpg"></center>'
 				'You enjoyed your time with Vitek, but you have to get on with your day. Vitek is a bit disappointed to see you leave and hugs you tightly, while kissing you on your lips. You kiss him back, and can''t help but feel a bit more aroused when he lets you go. He smiles at you and says: "<<$pcs_nickname>>, babe... want to go to my place for a while?"'
-
-				if pcs_dom > 0:act '"No time right now, sorry!"':sub += 1 & gt $loc, $metka
+				gs 'willpower', 'misc', 'resist', 'medium'
+				if will_cost <= pcs_willpwr:
+					act 'No time right now, sorry! (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt $loc, $metka
+					end
+				else
+					act 'No time right now, sorry! (<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 to Vitek''s house with him':
 					cls
@@ -111,7 +133,17 @@ elseif $loc = 'gskver':
 			end
 		end
 
-		act '"No time right now, sorry!"':gt $loc, $metka
+		gs 'willpower', 'misc', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'No time right now, sorry! (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt $loc, $metka
+			end
+		else
+			act 'No time right now, sorry! (<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
 

Fichier diff supprimé car celui-ci est trop grand
+ 305 - 270
locations/kotovSex.qsrc


+ 4 - 4
locations/kotovdom.qsrc

@@ -1,5 +1,4 @@
 # kotovdom
-!new from 1.2.3 fix2
 
 $menu_loc = 'kotovdom'
 
@@ -10,7 +9,7 @@ if $ARGS[0] = 'walk':
 	kotov_bj_times = 0
 	anal_no = 0
 	gs 'npc_intro',$boy,'images/shared/sex/grab/kotovpr.'+ $iif(rand(0,1)= 0,'jpg','gif'),'',' '
-	'You smile and occasionally glance at Vitek when he walks you home, neither of you saying much on the way there.'
+	'You smile and occasionally glance at Vitek while he walks you home, neither of you saying much on the way there.'
 	'When you climb to the second floor of your apartment building and reach the door, Vitek hugs you tightly in his powerful arms. He kisses you passionately, and his hands grope your butt roughly.'
 	'For a moment you wonder if he''s going to want to have sex with you right here in the stairwell, but as soon as you think that he lets you go. He grins and says: "I''ll see you soon, kitten. Don''t miss me too much!" before turning around and walking down the stairs.'
 	gs 'stat'
@@ -21,14 +20,15 @@ if $ARGS[0] = 'kotov_kom':
 	$location_type = 'event'
 	menu_off = 1
 	minut += 1
+	gs 'arousal', 'end'
 	gs 'stat'
 	gs 'npc_intro',$boy,'images/locations/pavlovsk/resident/vitekhome/kotovkom.jpg','',' '
 	if pain['asshole'] + (agape * 10) > 40: gs 'dinsex','after_anal','no_plug' else gs 'dinsex','after_anal','boy',$boydesc
-	if npc_rel[$boy] > 200 and $clothingworntype ! 'nude' and pcs_sweat < 20 :
+	if npc_rel[$boy] > 50 and $clothingworntype ! 'nude' and pcs_sweat < 20 :
 		'"Are you ready?" he asks, looking up at you from the bed. Seeing that you are, he gets up from the bed and puts on some clothes while he says: "Come on, I''ll walk you home."'
 		act 'Walk home with Vitek': gt 'kotovdom', 'walk'
 	end
-	if npc_rel[$boy] <= 200 and $clothingworntype ! 'nude' and pcs_sweat < 20 :
+	if npc_rel[$boy] <= 50 and $clothingworntype ! 'nude' and pcs_sweat < 20 :
 		'"Thanks for fun <<$pcs_nickname>>. " he says looking up at you from the bed. Seeing that you are ready to go, he tells: "Take care, You are always welcome here."'
 		act 'Say goodbye and leave his apartment':gt 'pavResidential'
 	end

+ 51 - 10
locations/kotovtalker.qsrc

@@ -1,13 +1,21 @@
 # kotovtalker
-!!!!!!!!!!!!!!!!!
-!!!Vitek Cats!!!
-!!!!!!!!!!!!!!!!!
+
 if numnpc = 9 and pav_slut < 100 and kotovLoveQW >= 0 and (npc_rel['A9'] >= 80 or hotcat >= 5):
 	if $loc = 'gdkin':
 		if alko < 3:
 			'<<$npc_firstname[''A9'']>>: "<<$pcs_nickname>> Hey, let''s get drunk and then do something dumb."'
-
-			act 'Refuse':npc_rel['A9'] -= 5 & gt $loc, $metka
+			gs 'willpower', 'drink', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					npc_rel['A9'] -= 5
+					gs 'stat'
+					gt $loc, $metka
+				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 'Drink beer':
 				*clr & cla
@@ -24,7 +32,18 @@ if numnpc = 9 and pav_slut < 100 and kotovLoveQW >= 0 and (npc_rel['A9'] >= 80 o
 		elseif alko >= 3:
 			'<<$npc_firstname[''A9'']>>: "<<$pcs_nickname>> Hey, let''s dance."'
 
-			act 'Refuse':npc_rel['A9'] -= 5 & gt $loc, $metka
+			gs 'willpower', 'misc', 'resist', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					npc_rel['A9'] -= 5
+					gs 'stat'
+					gt $loc, $metka
+				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 'Dance':
 				*clr & cla
@@ -66,9 +85,20 @@ if numnpc = 9 and pav_slut < 100 and kotovLoveQW >= 0 and (npc_rel['A9'] >= 80 o
 						end
 					end
 				elseif kotovLoveQW > 0:
-					'The dance ends and Vitek hugged you "<<$pcs_nickname>>, lets go to my house."'
+					'The dance ends and Vitek hugged you "<<$pcs_nickname>>, lets go to my house, where I can have my way with you." He says in his best seductive tone.'
 
-					act 'Move away':gt $loc, $metka
+					gs 'willpower', 'sex', 'resist', 'medium'
+					if will_cost <= pcs_willpwr:
+						act 'Refuse (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'pay', 'resist'
+							npc_rel['A9'] -= 5
+							gs 'stat'
+							gt $loc, $metka
+						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 'Go with Vitek.':
 						*clr & cla
@@ -119,10 +149,21 @@ elseif kotovLoveQW > 0 and pav_slut > 100:
 		act 'Argue that it''s not true (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 elseif $loc = 'gdkin':
-	if pav_slut < 150:
+	if pav_slut < 140:
 		'<<$npc_firstname[$static_num]>>: "<<$pcs_nickname>> Hey, let''s get drunk and then do something dumb."'
 
-		act 'Refuse':npc_rel[$static_num] -= 5 & gt $loc, $metka
+		gs 'willpower', 'drink', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				npc_rel['A9'] -= 5
+				gs 'stat'
+				gt $loc, $metka
+			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 'Drink beer':
 			*clr & cla

+ 11 - 1
locations/party_boy.qsrc

@@ -28,7 +28,17 @@ if $ARGS[0] = 'party_boy':
 		'The guy messes with the soundboard and makes the sound even louder. You are again allowed to <a href="exec:gt ''dinParty'', ''dj_cock''">twist</a> some knobs on the turntable.'
 	end
 	act 'Move away':gt $loc,$metka
-	if dj_bad = 1 and alko >=3: act 'Bare chest':gt 'dinParty', 'dj_boobs'
+	gs 'willpower', 'exhib', 'self', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Flash boobs (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+			gt 'dinParty', 'dj_boobs'
+		end
+	else
+		act 'Flash boobs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 --- party_boy ---------------------------------

+ 46 - 27
locations/party_boys.qsrc

@@ -8,6 +8,7 @@ if $ARGS[0] = 'drink':
 	$menu_loc = 'party_boys'
 	$menu_arg = 'drink'
 	menu_off = 0
+	minut += 5
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_2_' + rand(1,4) + '.jpg"></center>'
 	i = rand(1,6)
@@ -35,9 +36,7 @@ if $ARGS[0] = 'drink':
 		'"There will be mosquitoes everywhere!"'
 		'"We''ll turn off the lights."'
 		'"But then the cockroaches come out!"'
-
 	end
-
 	act 'Move away':gt $loc,$metka
 
 	if party_boys_drink > 2:
@@ -48,9 +47,19 @@ if $ARGS[0] = 'drink':
 		'"Guys, you poured too much into the glass. I''m drunk already." , you say."'
 		'"Come on <<$pcs_nickname>>, lets have another." with that, one of the guys puts his arm around you and bares your breasts. The touchy guy is surprisingly nice and you are a little amused by this situation.'
 		if rex >= 50:'You notice Rex in the room...'
-		if rex >= 50: act 'Take a look at Rex':minut += 5 & gt 'party_boys', 'Rex_save'
-		act 'Giggle':minut += 5 & gt 'party_boys', 'smile'
-		if pcs_dom >= 10: act 'Try to escape':minut += 5 & gt 'party_boys', 'Try_save'
+		if rex >= 50: act 'Get Rex''s attention': gt 'party_boys', 'Rex_save'
+		act 'Have fun with them': gt 'party_boys', 'smile'
+		gs 'willpower', 'action', 'type', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Break free of them (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'type'
+				gs 'stat'
+				gt 'party_boys', 'Try_save'
+			end
+		else
+			act 'Break free of them (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 	end
 end
 
@@ -60,13 +69,14 @@ if $ARGS[0] = 'Rex_save':
 	$menu_loc = 'party_boys'
 	$menu_arg = 'Rex_save'
 	menu_off = 0
+	minut += 5
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_10.jpg"></center>'
 	'You glance over to Rex. He seems ready to help you out of this awkward situation.'
 	'He quickly exclaims, "Hey boys, are you insane? Take your hands off my fucking girl. One more time and I will kick your ass!"'
 	'The guy takes his hands off of you, "Rex, bro, we were just having a bit of drunken fun. I''m sorry, if I hurt your girl."'
 	'Rex comes up to you and picks you up, "Come on, sweety. I''ll make sure the other guys leave you alone. Lets go to another room."'
-	act 'Go to the Rex''s room':minut += 5 & gt 'party_boys', 'V_komnatu'
+	act 'Go to the Rex''s room':gt 'party_boys', 'V_komnatu'
 end
 
 if $ARGS[0] = 'smile':
@@ -87,9 +97,8 @@ if $ARGS[0] = 'smile':
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_' + rand(1,3) + '.jpg"></center>'
 	'You give the guys a faint smile, showing your availability. They quickly realize the situation and come over to you and start to stroke your hair and massage your neck. It is very relaxing and you give a soft sigh which turns into a moan. You have the full attention of the boys and they decide to drag you.'
-	i = rand(1,2)
-	if i = 1:act 'Go outside Rex''s house':gt 'party_boys', 'out'
-	if i = 2:act 'Go to another room':minut += 5 & gt 'party_boys', 'V_komnatu'
+	act 'Go outside Rex''s house':gt 'party_boys', 'out'
+	act 'Go to another room':minut += 5 & gt 'party_boys', 'V_komnatu'
 end
 
 if $ARGS[0] = 'Try_save':
@@ -97,12 +106,13 @@ if $ARGS[0] = 'Try_save':
 	$menu_loc = 'party_boys'
 	$menu_arg = 'Try_save'
 	menu_off = 0
+	minut += 5
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_3.jpg"></center>'
 	'You find the strength to break free of the grasping hands, shouting "Let me go, I don''t want that. Get your filthy hands off me."'
 	'"Come on, <<$pcs_nickname>>, we''re just having fun. Just admit that you liked where this was going." the touchy guy responds.'
 	act 'Move away':gt $loc,$metka
-	act 'Giggle':minut += 5 & gt 'party_boys', 'smile'
+	act 'Have fun with them':gt 'party_boys', 'smile'
 end
 
 if $ARGS[0] = 'V_komnatu':
@@ -161,21 +171,17 @@ if $ARGS[0] = 'out':
 	if i = 1:
 		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_4.mp4"></video></center>'
 		'Together they get you out to the street and one of the guys pushes you down to your knees and pull his cock out. "Come on, <<$pcs_nickname>>, start sucking." You put you hand on his member and start to lick the whole length before wrapping your lips around the head. You keep sucking, taking turns on the guy''s dicks, until they are all hard and ready. Then one of them tells you to bend over.'
-		
 		gs 'arousal', 'bj', 5, 'sub', 'group'
 		gs 'stat'
-		
 		act 'Bend over':
 			cls
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_5.mp4"></video></center>'
 			'"Bend over, <<$pcs_nickname>>, and show us your tight, wet hole." You get in a comfortable position and the guys take turns fucking your wet pussy. You really enjoy yourself as you move your hips towards their rock hard members, making them glide in and out of your pussy, occasionally they switch to your ass, fucking it as well. The guys finish on your ass and back, except the last one who groans and tells you: "Ah, <<$pcs_nickname>>, open up, I want to cum in your mouth!"'
-			
 			gs 'arousal', 'vaginal', 5, 'sub', 'group'
 			gs 'arousal', 'anal', 5, 'sub', 'group'
 			minut -= 5
 			gs 'stat'
-		
 			act 'Open your mouth':
 				cls
 				minut += 5
@@ -534,9 +540,19 @@ if $ARGS[0] = 'gost_drink':
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_1.jpg"></center>'
 	'You happily make a couple of sips. Some guys urge you to show off more of your body.'
-	if alko >= 5:'"Hey, how about you show us your great tits. Just for fun?"'
-	if alko < 7: act 'Move away':gt $loc,$metka
-	if alko >= 5 and alko < 7: act 'Show your tits':gt 'party_boys', 'boobs'
+	'"Hey, how about you show us your great tits. Just for fun?"'
+	gs 'willpower', 'exhib', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Move away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt $loc,$metka
+		end
+	else
+		act 'Move 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 'Show your tits':gt 'party_boys', 'boobs'
 	if alko >= 7: act 'Fall asleep drunk':gt 'dinParty', 'sleep'
 end
 
@@ -547,11 +563,9 @@ if $ARGS[0] = 'boobs_yes':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_3.jpg"></center>'
 	if Rex_Love = 1:'You completely ignore Rex and laugh at the seemingly happy guys.'
 	'They grab at your stunning body, fondling your tits and ass. You enjoy their attention.'
-	
 	gs 'arousal', 'foreplay', 5, 'sub', 'group'
 	gs 'stat'
-	
-	act 'Giggle':
+	act 'Have fun with them':
 		cls
 		minut += 5
 		gs'stat'
@@ -630,10 +644,20 @@ if $ARGS[0] = 'boobs':
 	'"You are a straight up sex grenade, and I would like to pull your pin." one of the guys answers. With these words, they come over to you.'
 	if Rex_Love = 1:'Rex looks unhappily in your direction, his eyes flashing with anger and jealousy.'
 	if Rex_Love = 1: act 'Drag Rex to the restroom':gt 'party_girls', 'rex'
-	gs 'arousal', 'flashlite', 5, 'exhibitionism'
+	gs 'arousal', 'flash', 5, 'exhibitionism'
 	gs 'stat'
 	act 'Move closer':gt 'party_boys', 'boobs_yes'
-	act 'Move away':gt $loc,$metka
+	gs 'willpower', 'exhib', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Move away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt $loc,$metka
+		end
+	else
+		act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'gost_drink_else':
@@ -655,17 +679,14 @@ if $ARGS[0] = 'gost_drink_else':
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_9_42.mp4"></video></center>'
 			'You start sucking the dicks surrounding your face, paying attention to every single one. But this is not enough for the guys: "Look, how eager she is. But we can''t get all our dicks in her mouth at once. Good thing, there are other options." It only takes a moment for you to realize what they have on their mind.'
-			
 			gs 'arousal', 'bj', 5, 'sub', 'group'
 			gs 'stat'
-			
 			act 'Surrender':
 				cls
 				guy += 5
 				gang += 1
 				pcs_vag += 3
 				pcs_ass += 3
-
 				gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
 				$boy[1] = $npclastgenerated
 				gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
@@ -677,13 +698,11 @@ if $ARGS[0] = 'gost_drink_else':
 				gs'stat'
 				'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_9_43.mp4"></video></center>'
 				'The first one, without caring about your comfort, roughly drives his dick balls deep into your pussy and begins to fuck you while the others stand around you in a circle using your mouth. You just feel their dicks randomly switching between your hand, mouth and pussy. In time as your pussy gets looser from the five dicks fucking it, they start fucking you in the ass instead. The guys can not hold up this pace for long and are soon ready to cum.'
-				
 				gs 'arousal', 'bj', 5, 'sub', 'group'
 				gs 'arousal', 'vaginal', 5, 'sub', 'group'
 				gs 'arousal', 'anal', 5, 'sub', 'group'
 				minut -= 5
 				gs 'stat'
-		
 				act 'Cum':
 					cls
 					minut += 5

+ 165 - 89
locations/party_girls.qsrc

@@ -76,7 +76,17 @@ if $ARGS[0] = 'smoke':
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_3_1.jpg"></center>'
 		'"Girls, look what I stole from my worthless, addicted brother.", one of the girls says, showing you two bags of marijuana. "So, do you want to keep staring at me, or do you want to have fun?"'
 		act 'Start smoking':gt'party_girls','smoke'
-		act 'Move away':gt'sbReksHome','party_home'
+		gs 'willpower', 'drugs', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Move away (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt'sbReksHome','party_home'
+			end
+		else
+			act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	else
 		girls_smoke += 1
 		pcs_mood += 30
@@ -144,56 +154,64 @@ if $ARGS[0] = 'fun':
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_' + rand(1,5) + '.jpg"></center>'
 					'You enthusiastically examine each others breasts, when a couple of guys burst into the room. You decide that the guys should evaluate your boobs with their hands and call them closer.'
 					iif(Rex_Love = 0,'The guys have fun touching your boobs.','Rex is right in front of you and gently squeezes your breasts with his hands.')
-					act 'Move away':gt'sbReksHome','party_home'
-					if pcs_horny > 50 and (rex>=80 or Rex_Love = 0):
-						act 'Moan':
+					gs 'willpower', 'sex', 'resist', 'medium'
+					if will_cost <= pcs_willpwr:
+						act 'Move away (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							gt'sbReksHome','party_home'
+						end
+					else
+						act 'Move 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 'Moan':
+						cls
+						minut += 5
+						pcs_horny += 10
+						gs'stat'
+						'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_' + rand(6,7) + '.mp4"></video></center>'
+						'Getting touched by ' + iif(Rex_Love = 0,'one of the guys','Rex') + ' you can''t help but to start moaning. When ' + iif(Rex_Love = 0,'the guy','Rex') + ' notices he begins to caress you even more insistently, grabbing your breasts firmly and licking your nipples. "Hey baby, if you like it so much, maybe we should go further."	Then ' + iif(Rex_Love = 0,'the guy','Rex') + ' grabs you by the waist...'
+						act 'Surrender':
 							cls
-							minut += 5
-							pcs_horny += 10
+							if Rex_Love = 0:
+								guy += 1
+								gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
+								gs 'boyStat', $npclastgenerated
+							else
+								sexa += 1
+								if rexSex = 0: rexSex = 1 & guy += 1
+								gs 'boyStat', 'A57'
+							end
 							gs'stat'
-							'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_' + rand(6,7) + '.mp4"></video></center>'
-							'Getting touched by ' + iif(Rex_Love = 0,'one of the guys','Rex') + ' you can''t help but to start moaning. When ' + iif(Rex_Love = 0,'the guy','Rex') + ' notices he begins to caress you even more insistently, grabbing your breasts firmly and licking your nipples. "Hey baby, if you like it so much, maybe we should go further."	Then ' + iif(Rex_Love = 0,'the guy','Rex') + ' grabs you by the waist...'
-							act 'Surrender':
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_8.jpg"></center>'
+							'He pulls your clothes off and then lays down on his back on the floor, pulling his <<dick>>cm <<$dick_girth>> cock out. You climb on him straddling him, you lower yourself onto his cock, feeling is slip inside of your wet pussy, working your down till he is completely inside of you as deep as you can take him.'
+							'The two of you begin to rhythmically fuck in front of the others. The girls cheer you on fervently, filming everything on their phones. "Come on <<$pcs_nickname>>, move your ass faster." You feel his hard member inside of you, and soon realize that he is about to come.'
+							gs 'arousal', 'vaginal', 5, 'exhibitionism'
+							act 'Let him come on you':
+								cls
+								minut += 5
+								pcs_horny += 10
+								gs'stat'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_9.jpg"></center>'
+								iif(Rex_Love = 0,'The guy','Rex') + ' quickly pulls his dick out of you and pushes you off him. He stands up while you remain on your knees, he jerks his dick a few times until he starts shooting his cum all over you, leaving streaks of semen on your chest and abdomen. After he finishes the other girls sit down next to you and have a lot of fun as they lick all the sperm off of your body.'
+								gs 'cum_call', 'stomach', $boy
+								gs 'arousal', 'cuni', 15, 'exhibitionism'
+								gs 'arousal', 'end'
+								cumspclnt = 14 & gs 'cum_cleanup'
+								act 'Move away':gt'sbReksHome','party_home'
+							end
+							act 'Move faster':
 								cls
-								if Rex_Love = 0:
-									guy += 1
-									gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
-									gs 'boyStat', $npclastgenerated
-								else
-									sexa += 1
-									if rexSex = 0: rexSex = 1 & guy += 1
-									gs 'boyStat', 'A57'
-								end
+								minut += 5
+								pcs_horny += 10
 								gs'stat'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_8.jpg"></center>'
-								'He pulls your clothes off and then lays down on his back on the floor, pulling his <<dick>>cm <<$dick_girth>> cock out. You climb on him straddling him, you lower yourself onto his cock, feeling is slip inside of your wet pussy, working your down till he is completely inside of you as deep as you can take him.'
-								'The two of you begin to rhythmically fuck in front of the others. The girls cheer you on fervently, filming everything on their phones. "Come on <<$pcs_nickname>>, move your ass faster." You feel his hard member inside of you, and soon realize that he is about to come.'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_9.jpg"></center>'
+								iif(Rex_Love = 0,'The guy','Rex') + ' you move faster as he requests, and you push him over the top. He halfheartedly tries to push you off him, but then it is too late. He shoots his load into you, as you rock back and forth on top of him. You stand up, his cock coming out trailing spent sperm across him. The other girls sit down, cleaning him up with their tongues.'
 								gs 'arousal', 'vaginal', 5, 'exhibitionism'
-								act 'Let him come on you':
-									cls
-									minut += 5
-									pcs_horny += 10
-									gs'stat'
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_9.jpg"></center>'
-									iif(Rex_Love = 0,'The guy','Rex') + ' quickly pulls his dick out of you and pushes you off him. He stands up while you remain on your knees, he jerks his dick a few times until he starts shooting his cum all over you, leaving streaks of semen on your chest and abdomen. After he finishes the other girls sit down next to you and have a lot of fun as they lick all the sperm off of your body.'
-									gs 'cum_call', 'stomach', $boy
-									gs 'arousal', 'cuni', 15, 'exhibitionism'
-									gs 'arousal', 'end'
-									cumspclnt = 14 & gs 'cum_cleanup'
-									act 'Move away':gt'sbReksHome','party_home'
-								end
-								act 'Move faster':
-									cls
-									minut += 5
-									pcs_horny += 10
-									gs'stat'
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_9.jpg"></center>'
-									iif(Rex_Love = 0,'The guy','Rex') + ' you move faster as he requests, and you push him over the top. He halfheartedly tries to push you off him, but then it is too late. He shoots his load into you, as you rock back and forth on top of him. You stand up, his cock coming out trailing spent sperm across him. The other girls sit down, cleaning him up with their tongues.'
-									gs 'arousal', 'vaginal', 5, 'exhibitionism'
-									gs 'arousal', 'end'
-									gs 'Cum_Manage'
-									act 'Move away':gt'sbReksHome','party_home'
-								end
+								gs 'arousal', 'end'
+								gs 'Cum_Manage'
+								act 'Move away':gt'sbReksHome','party_home'
 							end
 						end
 					end
@@ -203,7 +221,17 @@ if $ARGS[0] = 'fun':
 					gs'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_7_' + rand(1,5) + '.jpg"></center>'
 					'You are having fun and get very excited. One of the girls, can''t resist and starts to lick your erect nipples, gently sucking on them and teasing them with her tongue. You enjoy it.'
-					act 'Move away':gt'sbReksHome','party_home'
+					gs 'willpower', 'cuni', 'resist', 'medium'
+					if will_cost <= pcs_willpwr:
+						act 'Move away (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							gt'sbReksHome','party_home'
+						end
+					else
+						act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
 					if pcs_horny > 50:
 						act 'Moan':
 							cls
@@ -232,45 +260,64 @@ if $ARGS[0] = 'fun':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_' + rand(1,3) + '.jpg"></center>'
 			'You call in the guys and announce that you and the girls want to check out the contents of their pants. Excitedly they unzip their pants and pull out their dicks.'
 			iif(reksMeet = 1,'You have Rex'' member in front of you and compare it with your arm.','One of the more persistent guys comes up to you and you compare his penis with your arm.')
-			act 'Move away':gt'sbReksHome','party_home'
-			if pcs_horny > 50:
-				act 'Suck him':
-					cls
-					minut += 5
-					stat['bj'] += 1
-					if Rex_Love = 1: bja += 1
-					gs'stat'
-					$party_suck = {
-						act 'Make him cum':
-							cls
-							minut += 5
-							spafinloc = 12
-							gs 'cum_manage'
-							spafinloc = 11
-							gs 'cum_manage'
-							facial += 1
-							gs'stat'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_' + rand(6,12) + '.jpg"></center>'
-							'You open your mouth and stick out your tongue.'
-							iif(Rex_Love = 0,'The guy','Rex') + ' cums hard, filling up your mouth and smearing sperm all over your face.'
-							act 'Move away':gt'sbReksHome','party_home'
-						end
-					}
-					if rand(1,2) = 1:
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_4.jpg"></center>'
-						'Strong desire clouds your mind, and you grab ' + iif(Rex_Love = 0,'the guy''s','Rex''s') + ' member in full view of all the girls. You gently masturbate it with your hand, then take it in your mouth and begin to suck on its head.'
-						iif(Rex_Love = 0,'The guy','Rex') + ' can''t resist for long and starts...'
-						dynamic $party_suck
-					else
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_5.jpg"></center>'
-						'One of the girls takes the dick in front of her in her mouth. Feeling encouraged you take ' + iif(Rex_Love = 0,'the guy''s','Rex''s') + ' dick and gently masturbate it with your hand. Soon you put it in your mouth and begin to suck on its head, watching the other girl giving head at the same time.'
-						iif(Rex_Love = 0,'The guy','Rex') + ' can''t resist for long and starts...'
-						dynamic $party_suck
+			gs 'willpower', 'bj', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Move away (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt'sbReksHome','party_home'
+				end
+			else
+				act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			act 'Suck him':
+				cls
+				minut += 5
+				stat['bj'] += 1
+				if Rex_Love = 1: bja += 1
+				gs 'stat'
+				$party_suck = {
+					act 'Make him cum':
+						cls
+						minut += 5
+						spafinloc = 12
+						gs 'cum_manage'
+						spafinloc = 11
+						gs 'cum_manage'
+						facial += 1
+						gs'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_' + rand(6,12) + '.jpg"></center>'
+						'You open your mouth and stick out your tongue.'
+						iif(Rex_Love = 0,'The guy','Rex') + ' cums hard, filling up your mouth and smearing sperm all over your face.'
+						act 'Move away':gt'sbReksHome','party_home'
 					end
+				}
+				if rand(1,2) = 1:
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_4.jpg"></center>'
+					'Strong desire clouds your mind, and you grab ' + iif(Rex_Love = 0,'the guy''s','Rex''s') + ' member in full view of all the girls. You gently masturbate it with your hand, then take it in your mouth and begin to suck on its head.'
+					iif(Rex_Love = 0,'The guy','Rex') + ' can''t resist for long and starts...'
+					dynamic $party_suck
+				else
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_5.jpg"></center>'
+					'One of the girls takes the dick in front of her in her mouth. Feeling encouraged you take ' + iif(Rex_Love = 0,'the guy''s','Rex''s') + ' dick and gently masturbate it with your hand. Soon you put it in your mouth and begin to suck on its head, watching the other girl giving head at the same time.'
+					iif(Rex_Love = 0,'The guy','Rex') + ' can''t resist for long and starts...'
+					dynamic $party_suck
 				end
 			end
 		end
 	end
+	gs 'willpower', 'exhib', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Move away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt'sbReksHome','party_home'
+		end
+	else
+		act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'drunk':
@@ -318,7 +365,17 @@ if $ARGS[0] = 'bra':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_5_' + rand(1,3) + '.jpg"></center>'
 	'Yielding to the general madness, you pull your top off exposing your bra to the frantic shouts of the boys. In this state your dancing clearly will look much more spectacular.'
 	if Rex_Love = 1: 'Rex watches you closely, but says nothing.'
-	act 'Move away':gt $loc,$metka
+	gs 'willpower', 'exhib', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Move away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt'sbReksHome','party_home'
+		end
+	else
+		act 'Move 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 'Dance topless':
 		cls
 		inhib_exp += rand(0,2)
@@ -397,9 +454,19 @@ if $ARGS[0] = 'drink':
 	'The girls have some booze with them and you are happy to share a drink with them. You and the girls keep drinking during dancing. Your drunk yelling drowned out by the music, as the girls tell you they want to have even more fun...'
 	if alko >= 7:'You are dizzy, and feel very ill.'
 	if alko >= 7: act 'Sleep':gt 'dinParty', 'sleep'
-	if alko < 7: act 'Move away':gt $loc,$metka
-	if alko < 7: act 'Drink more':gt 'party_girls', 'drunk'
-	if alko < 7: act 'Take off your top':gt 'party_girls', 'bra'
+	gs 'willpower', 'exhib', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Move away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt'sbReksHome','party_home'
+		end
+	else
+		act 'Move 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 'Drink more':gt 'party_girls', 'drunk'
+	act 'Take off your top':gt 'party_girls', 'bra'
 end
 
 if $ARGS[0] = 'boys':
@@ -521,7 +588,17 @@ if $ARGS[0] = 'dirty':
 	'You have a lot of fun as you dance with the girls under the deafening music. During the dance you are pressed against each other and the other girls touch you in all sorts of places. Suddenly a pair of hands pull up you skirts and bare your ass. One of the girls pulls down your panties and starts to kiss and lick you.'
 	if Rex_Love = 1:'Rex watches you with interest as you have fun with the girls.'
 	'The girls are only getting warmed up and offer you more.'
-	act 'Move away':gt $loc,$metka
+	gs 'willpower', 'cuni', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Move away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt'sbReksHome','party_home'
+		end
+	else
+		act 'Move 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 'Give in':
 		cla
 		*clr
@@ -529,9 +606,8 @@ if $ARGS[0] = 'dirty':
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_15_' + rand(1,8) + '.jpg"></center>'
 		'"Come on <<$pcs_nickname>>, lets get wild." You give in to the general madness, taking off all your clothes, and diving headlong into the abyss of insane lesbian fervor.'
-		i = rand(1,2)
-		if i = 1: act 'Have fun with the guys':gt 'party_girls', 'boys'
-		if i = 2: act 'Go into another room with the girls':gt 'party_girls', 'girls'
+		act 'Have fun with the guys':gt 'party_girls', 'boys'
+		act 'Go into another room with the girls':gt 'party_girls', 'girls'
 	end
 end
 if $ARGS[0] = 'dance':

+ 82 - 16
locations/pod_ezd.qsrc

@@ -51,7 +51,17 @@ if $ARGS[0] = 'etaj_1' or $ARGS[0] = '':
 			'<font color=red>Are you sure? Your mother will worry if you go out at this time.</font>'
 			cla
 			act 'No, stay inside': gt 'pod_ezd','etaj_1'
-			act 'Yes, go outside':gt 'pavcomplex', 'start'
+			gs 'willpower', 'misc', 'self', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Yes, go outside (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					gt 'pavcomplex', 'start'
+				end
+			else
+				act 'Yes, go outside (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
 		else
 			gt 'pavcomplex', 'start'
 		end
@@ -449,16 +459,22 @@ if $ARGS[0] = 'floor2_events':
 		gs 'arousal', 'voyeur', 3
 		gs 'stat'
 		act 'Leave': gt 'pod_ezd', 'etaj_2'
-		act 'Keep watching':
-			*clr & cla
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/event/ev1_2.jpg"></center>'
-			'The girl notices you, and gives you a cute wink. She keeps talking with her partner, and pulls her boobs out of her shirt while spreading her legs even further. You''re confused is she doing this for you, or for him?'
-			'You know you really should not be staring, especially when she knows, but at the same time you can''t take your eyes off her. After a few minutes, the guy helps her up and they head upstairs, towards one of the apartments there. The girl flashes you a conspiratory smile as her face disappears around the corner.'
-			gs 'arousal', 'voyeur', 3
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave': gt 'pod_ezd', 'etaj_2'
+		gs 'willpower', 'voyeur', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Keep watching (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/event/ev1_2.jpg"></center>'
+				'The girl notices you, and gives you a cute wink. She keeps talking with her partner, and pulls her boobs out of her shirt while spreading her legs even further. You''re confused is she doing this for you, or for him?'
+				'You know you really should not be staring, especially when she knows, but at the same time you can''t take your eyes off her. After a few minutes, the guy helps her up and they head upstairs, towards one of the apartments there. The girl flashes you a conspiratory smile as her face disappears around the corner.'
+				gs 'arousal', 'voyeur', 3
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Leave': gt 'pod_ezd', 'etaj_2'
+			end
+		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
 	else
 		gt 'pod_ezd', 'etaj_2'
@@ -599,7 +615,17 @@ if $ARGS[0] = 'floor4_events':
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'pod_ezd', 'etaj_4'
-		act 'Hide and watch them': gt 'pod_ezd', 'lena_show'
+		gs 'willpower', 'voyeur', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Hide and watch them (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'pod_ezd', 'lena_show'
+			end
+		else
+			act 'Hide and watch them (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	elseif floor4 = 7:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/event/opendoor.jpg"></center>'
 		'You glance down the stairs and see that the apartment at the bottom has it''s door open. You can see inside the apartment, all the way to the bathroom, which also has it''s door wide open. Apparently the girl inside didn''t notice or maybe she did it on purpose. As she stands there naked applying facial cream to her face in the mirror.'
@@ -652,7 +678,17 @@ if $ARGS[0] = 'floor5_events':
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'pod_ezd', 'etaj_5'
-		act 'Hide and keep watching': gt 'pod_ezd', 'home_movie1'
+		gs 'willpower', 'voyeur', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Hide and keep watching (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'pod_ezd', 'home_movie1'
+			end
+		else
+			act 'Hide and 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
 	elseif floor5 = 2:
 		*clr & cla
 		menu_off = 1
@@ -661,7 +697,17 @@ if $ARGS[0] = 'floor5_events':
 		gs 'arousal', 'voyeur', 3
 		gs 'stat'
 		act 'Leave': gt 'pod_ezd', 'etaj_5'
-		act 'Hide and keep watching': gt 'pod_ezd', 'home_movie2'
+		gs 'willpower', 'voyeur', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Hide and keep watching (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'pod_ezd', 'home_movie2'
+			end
+		else
+			act 'Hide and 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
 	elseif floor5 = 3:
 		*clr & cla
 		menu_off = 1
@@ -670,7 +716,17 @@ if $ARGS[0] = 'floor5_events':
 		gs 'arousal', 'voyeur', 3
 		gs 'stat'
 		act 'Leave': gt 'pod_ezd', 'etaj_5'
-		act 'Hide and keep watching': gt 'pod_ezd', 'home_movie3'
+		gs 'willpower', 'voyeur', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Hide and keep watching (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'pod_ezd', 'home_movie3'
+			end
+		else
+			act 'Hide and 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
 	elseif floor5 = 4:
 		*clr & cla
 		menu_off = 1
@@ -679,7 +735,17 @@ if $ARGS[0] = 'floor5_events':
 		gs 'arousal', 'voyeur', 3
 		gs 'stat'
 		act 'Leave': gt 'pod_ezd', 'etaj_5'
-		act 'Hide and keep watching': gt 'pod_ezd', 'home_movie4'
+		gs 'willpower', 'voyeur', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Hide and keep watching (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'pod_ezd', 'home_movie4'
+			end
+		else
+			act 'Hide and 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
 	elseif (floor5 = 5 or floor6 = 6) and ((hour >= 14 and hour < 17) or (week = 7 and hour >= 20 and hour <= 24) or (week >= 6 and hour >= 11 and hour < 14) or (week = 6 and hour >= 20 and hour <= 24)):
 		*clr & cla
 		menu_off = 1

+ 66 - 6
locations/pod_whore.qsrc

@@ -31,12 +31,32 @@ if $ARGS[0] = 'client_talk':
 			'The man looks a tad embarrassed to bring it up, but he''s too horny to back down now: "I hear you''re a prostitute, who services men in the stairwell here. Is that right?"'
 			if pcs_sleep >= 10 and pod_whore_client_count > 0:
 				act 'Give him your price list': gt 'pod_whore','hide','pod_whore_price'
-				act 'Decline, you don''t want to fuck him': gt 'pod_whore','hide','pod_whore_no'
+				gs 'willpower', 'prostitution', 'resist', 'medium'
+				if will_cost <= pcs_willpwr:
+					act 'Decline, you don''t want to fuck him (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'pod_whore','hide','pod_whore_no'
+					end
+				else
+					act 'Decline, you don''t want to fuck him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end	
 			else
 				act 'Decline, you''re too tired': gt 'pod_whore','hide','pod_client_talk_noson'
 			end
 		end
-		act '"Nope, never heard of her!"': gt 'pod_whore','hide','pod_client_talk_no'
+		gs 'willpower', 'misc', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act '"Nope, never heard of her!" (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'pod_whore','hide','pod_client_talk_no'
+			end
+		else
+			act '"Nope, never heard of her!" (<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
 
@@ -521,7 +541,17 @@ if $ARGS[0] = 'hide':
 		if pod_whore_countQW <= 15:
 			'The man apologizes again: "I''m so sorry, I must''ve gotten the wrong address."'
 			'He turns around and leaves before you can tell him otherwise.'
-			act 'Close the door': gt 'korrPar'
+			gs 'willpower', 'prostitution', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Close the door (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'korrPar'
+				end
+			else
+				act 'Close the door (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
 		elseif pod_whore_countQW > 15:
 			'He looks at you defiantly and says: "Look, girl. You can''t blame me for being confused... it even says so right there on the wall! A whore lives here!"'
 			act 'Scold him': gt 'pod_whore','hide','pod_client_talk_bazar3'
@@ -536,7 +566,17 @@ if $ARGS[0] = 'hide':
 		'You act insulted and shout at him: "Any idiot can write down that crap on someone''s wall, that doesn''t make it true!"'
 		'The man raises his hands in defense and mutters: "Alright alright, I get it... she''s not here. I''m sorry, I should go."'
 		act '"Are you sure?"': gt 'pod_whore','hide','pod_client_talk_bazar9'
-		act 'Close the door': gt 'korrPar'
+		gs 'willpower', 'prostitution', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Close the door (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'korrPar'
+			end
+		else
+			act 'Close the door (<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[1] = 'pod_client_talk_bazar4':
@@ -549,7 +589,17 @@ if $ARGS[0] = 'hide':
 		'You smirk at him: "Just because someone wrote it there, that doesn''t make it true... for all I know, you were the one who put that there!"'
 		'He goes in full defensive mode now: "Wait, what? I didn''t do anything!"'
 		act 'Keep teasing him': gt 'pod_whore','hide','pod_client_talk_bazar6'
-		act 'End the conversation': gt 'pod_whore','hide','pod_client_talk_bazar7'
+		gs 'willpower', 'prostitution', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'End the conversation (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'pod_whore','hide','pod_client_talk_bazar7'
+			end
+		else
+			act 'End the conversation (<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[1] = 'pod_client_talk_bazar6':
 		cla
@@ -558,7 +608,17 @@ if $ARGS[0] = 'hide':
 		'You keep teasing him: "Well, you could always just go from door to door, trying to find a girl named <<$pcs_nickname>>...", while you do your best not to laugh.'
 		'The guy is clearly taken aback, his face deeply red with embarrassment.'
 		act 'Confess you''re <<$pcs_nickname>>': gt 'pod_whore','hide','pod_client_talk_bazar8'
-		act 'End the conversation': gt 'pod_whore','hide','pod_client_talk_bazar7'
+		gs 'willpower', 'prostitution', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'End the conversation (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'pod_whore','hide','pod_client_talk_bazar7'
+			end
+		else
+			act 'End the conversation (<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[1] = 'pod_client_talk_bazar7':
 		cla

+ 74 - 25
locations/podezdM.qsrc

@@ -132,14 +132,19 @@ if $ARGS[0] = 'Walk':
 
 	gs 'arousal', 'kiss', 3
 	gs 'stat'
-
-	act 'Break away':
-		cla
-		pcs_dom += 1
-		loverrelation[lover_number] -= 1
-		'You push against him, hard, and finally manage to push him off you, making him stumble back a step. He seems confused that you pushed him away. "What the fuck?! Don''t think you can treat me like you please, I''m not as easy as you think!" With that, you turn and walk away.'
-		act 'I have to go, maybe I''ll call you later':dynamic $go_home
-	end
+	gs 'willpower', 'sex', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Break away (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			loverrelation[lover_number] -= 1
+			gs 'stat'
+			'You push against him, hard, and finally manage to push him off you, making him stumble back a step. He seems confused that you pushed him away. "What the fuck?! Don''t think you can treat me like you please, I''m not as easy as you think!" With that, you turn and walk away.'
+			act 'I have to go, maybe I''ll call you later':dynamic $go_home
+		end
+	else
+		act 'Break away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 	if home_owned[1] > 0:
 		act 'Kiss':
 			cla
@@ -181,16 +186,22 @@ if $ARGS[0] = 'grup':
 	*clr
 	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/podezdm1.jpg"></center>'
 	'A few guys are drinking in the stairwell. When you come in, they see <<$loverdesc[lover_number]>> and greet him loudly. They offer you both a drink from their bottle of vodka.'
+	gs 'willpower', 'drink', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse to drink (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			if haraklover[lover_number] = 0:loverrelation[lover_number] += 1
+			if haraklover[lover_number] = 1:loverrelation[lover_number] -= 1
+			if haraklover[lover_number] = 2:loverrelation[lover_number] -= 2
 
-	act 'Refuse to drink':
-		cla
-
-		if haraklover[lover_number] = 0:loverrelation[lover_number] += 1
-		if haraklover[lover_number] = 1:loverrelation[lover_number] -= 1
-		if haraklover[lover_number] = 2:loverrelation[lover_number] -= 2
+			gt 'podezdM', 'grup1'
+		end
+	else
+		act 'Refuse to drink (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 
-		gt 'podezdM', 'grup1'
-	end
 
 	act 'Drink a little':
 		cla
@@ -236,29 +247,65 @@ if $ARGS[0] = 'grup2':
 
 		'<<$loverdesc[lover_number]>> petulantly mumbles, "Come on guys, that''s <i>my</i> girl."'
 		'The drunken guys just laugh at him and begin pulling off your clothes.'
-
-		act 'Resist':gt 'sexm', 'gangrape'
+		gs 'willpower', 'gangbang', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Resist (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'sexm', 'gangrape'
+			end
+		else
+			act 'Resist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 		act 'Surrender':gt 'sexm', 'gangbang'
 
 	elseif haraklover[lover_number] = 1:
 		'<<$loverdesc[lover_number]>> stands up and yells, "Hey, not cool bro! That''s my chick, hands off!"'
 		'The guys let go of you and put up their hands. "No problem man, we was just having a little harmless fun, we didn''t mean anything by it."'
-
-		act 'Go upstairs':gt 'sexm', 'start'
+		gs 'willpower', 'gangbang', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Go upstairs (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'sexm', 'start'
+			end
+		else
+			act 'Go upstairs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 		act 'Ignore <<$loverdesc[lover_number]>> and kiss the guys':gt 'sexm', 'gangbang'
 
 	elseif haraklover[lover_number] = 2 and izvrat = 0:
 		'<<$loverdesc[lover_number]>> stands up and, without saying anything, steps over to the guy pawing at your breasts and breaks his bottle over the guy''s head. Dazed, the guy just falls to the ground, groaning in pain and confusion. Quietly and quite confidently, <<$loverdesc[lover_number]>> asks, "Who else wants some?"'
 		'The guys instantly release you and move aside.'
-
-		act 'Go upstairs':gt 'sexm', 'start'
+		gs 'willpower', 'gangbang', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Go upstairs (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'sexm', 'start'
+			end
+		else
+			act 'Go upstairs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 		act 'Or maybe all together ..?':gt 'sexm', 'gangbang'
 
 	elseif haraklover[lover_number] = 2 and izvrat = 1:
 		'Seeing the guys starting to fool around with you, <<$loverdesc[lover_number]>> starts laughing and exclaims, "Lets have some fun with this little slut!"'
 		'The drunk guys are very enthusiastic about the proposal and start pulling your clothes off as fast as they can grab them.'
-
-		act 'Resist':gt 'sexm', 'gangrape'
+		gs 'willpower', 'gangbang', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Resist (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'sexm', 'gangrape'
+			end
+		else
+			act 'Resist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 		act 'Surrender':gt 'sexm', 'gangbang'
 
 	end
@@ -272,7 +319,8 @@ if $ARGS[0] = 'alleyway':
 	'<center><video autoplay loop src="images/characters/city/boyfriend/sex/alleyway.mp4"></video></center>'
 	'As soon as he hears this, he grabs you and drags you into the nearest alleyway, going past a dumpster and around the corner. Just out of view from the street, <<$loverdesc[lover_number]>> pushes you against the wall and pulls just enough of your clothes aside to expose your ass and give him free access to your pussy.'
 	'He quickly turns you to face the wall, reaches around and lifts your leg up in the air while holding you by your thigh, spreading your pussy wide open. He lines up his dick with his other hand, rubbing it between your pussy lips and getting the tip nice and wet. Satisfied that he''s all lubed up, he slides his dick into your pussy in one smooth motion and starts fucking you with gusto.'
-	'You grab onto a nearby chain hanging from the fire escape on the side of the building, trying to keep your balance while also pushing back against him, the thought of getting caught turns you on more than you care to admit. You can hear peoplepassing by on the sidewalk, out of view just a few meters away. You try to be as quiet as you can, but soon you can''t control yourself any longer and your moans start getting louder and louder. "Oh god yes <<$loverdesc[lover_number]>>, fuck me, fuck me harder!" You try to say it quietly but it was obviously much louder than you intended, as he gives your ass a slap and starts hammering your pussy as hard as he can, grunting as he does.'
+	*nl
+	'You grab onto a nearby chain hanging from the fire escape on the side of the building, trying to keep your balance while also pushing back against him, the thought of getting caught turns you on more than you care to admit. You can hear people passing by on the sidewalk, out of view just a few meters away. You try to be as quiet as you can, but soon you can''t control yourself any longer and your moans start getting louder and louder. "Oh god yes <<$loverdesc[lover_number]>>, fuck me, fuck me harder!" You try to say it quietly but it was obviously much louder than you intended, as he gives your ass a slap and starts hammering your pussy as hard as he can, grunting as he does.'
 	gs 'arousal', 'vaginal', 15, 'sub', 'rough'
 	gs 'stat'
 
@@ -280,6 +328,7 @@ if $ARGS[0] = 'alleyway':
 		cls
 	    '<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/alleycum.jpg"></center>'
 	    'At that pace it doesn''t take him much longer, he turns your head towards him and kisses you passionately. A few moments later, with a couple more grunts he quickly jerks his cock out of your pussy, barely making it in time as you feel hot spurts of his cum landing all over your ass, before slowly running down your crack.'
+		*nl
 	    'After catching his breath, he turns you back to face him, giving you a passionate kiss while playing with your clit to make sure you get yours as well. After a minute or so, he stops and pulls up his pants, while you straighten out your clothes. The two you walk out of the alleyway like nothing had happened, he looks at you with a huge grin on his face and gives you another beer. After walking further for a ways you decide to go your separate ways for the day.'
 		gs 'arousal', 'kiss', 5, 'sub'
 		gs 'arousal', 'vaginal', 5, 'sub'

+ 4 - 24
locations/podrsex.qsrc

@@ -15,30 +15,10 @@ if $ARGS[0] = 'var':
 	menu_off = 1
 	randhorny = rand(50,100)
 	gs 'stat'
-	if sub <= 0:
-		if sexvar ! 1:
-			act 'Suck his dick':gt 'podrsex', 'suck'
-			act 'Let him fuck your pussy':gt 'podrsex', 'pussy'
-			act 'Let him fuck your ass':gt 'podrsex', 'ass'
-			act 'Watch him fuck the other girl':gt 'podrsex', 'voy'
-		else
-			act 'Suck him off':gt 'podrsex', 'suck'
-			act 'Ask him to cum in your pussy':gt 'podrsex', 'pussy'
-			act 'Ask him to cum in your ass':gt 'podrsex', 'ass'
-			if pcs_dom > 10:act 'Make him cum in the other girl':gt 'podrsex', 'voy'
-		end
-	else
-		podrand = rand(0,3)
-		if podrand = 0:
-			xgt 'podrsex', 'suck'
-		elseif podrand = 1:
-			xgt 'podrsex', 'pussy'
-		elseif podrand = 2:
-			xgt 'podrsex', 'ass'
-		else
-			xgt 'podrsex', 'voy'
-		end
-	end
+	act 'Suck his dick':gt 'podrsex', 'suck'
+	act 'Let him fuck your pussy':gt 'podrsex', 'pussy'
+	act 'Let him fuck your ass':gt 'podrsex', 'ass'
+	act 'Watch him fuck the other girl':gt 'podrsex', 'voy'
 end
 
 if $ARGS[0] = 'suck':

+ 1 - 1
locations/podval_rape.qsrc

@@ -1,5 +1,5 @@
 # podval_rape
-
+!!park scene needs to be revamped when park is revamped.
 menu_off = 1
 
 gs 'stat'

+ 163 - 121
locations/train.qsrc

@@ -1,6 +1,5 @@
 # train
 
-!!destination 3
 if $ARGS[0] = 'communal':
 	*clr & cla
 	$menu_loc = 'train'
@@ -173,7 +172,6 @@ if $ARGS[0] = 'communal_pavlovsk':
 	act 'Get off the train': gt 'pavtrainhall', 'platform'
 end
 
-!!destination 4
 if $ARGS[0] = 'village':
 	$loc = 'train'
 	$metka = 'village'
@@ -363,7 +361,6 @@ if $ARGS[0] = 'village_pavlovsk':
 	end
 end
 
-!!destination 5
 if $ARGS[0] = 'oldtown':
 	*clr & cla
 	$menu_loc = 'train'
@@ -540,9 +537,6 @@ if $ARGS[0] = 'oldtown_pavlovsk':
 	end
 end
 
-!!new train and train station events.
-!!chances are for leaving Pavlovsk to the city. Private compartment 10%, oldman 10%, fit 15%, young 20%, weed 20%, gopnik 25%. 
-!!chances are for leaving the city for Pavlovsk. Private compartment 15%, oldman 10%, fit 20%, young 25%, gopnik 30%. 
 if $ARGS[0] = 'events':
 	event_random = rand(15, 100)
 	if event_random < 25:
@@ -556,7 +550,6 @@ if $ARGS[0] = 'events':
 	end
 end
 
-!!event Weed
 if $ARGS[0] = 'weed':
 	train_event = 1
 	menu_off = 1
@@ -573,56 +566,22 @@ if $ARGS[0] = 'weed':
 		'Only a few minutes have passed when you hear someone walk up behind you and stop. You know they must be mere inches away, so you turn to look. Standing there is a young man, smiling at you, holding up a self-rolled cigarette... that looks suspiciously like a joint. The guy doesn''t seem too concerned about somebody catching him with that in public, though, and focuses entirely on you:'
 		*nl		
 		'"Hey beautiful, I couldn''t help but notice you sitting here all by yourself. Guess you missed the train, too, huh?" He looks around, as if he only just noticed that he was walking around a public place with a joint in his hand, then leans down and whispers conspiratorially: "How about we blaze one while we wait?"'
-
-		act 'Refuse':
-			*clr
-			cla
-			'<center><h4>Pavlovsk Station</h4></center>'
-			'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
-			'You have no idea what could be in it and have no intention of being caught out in the open with marijuana either, so you shake your head. "No, thanks."'
-			'He shrugs and steps away. "Alright, just trying to be friendly. It''s your loss."'
-			*nl
-			'He wanders around for a bit. Eventually another young woman comes down to the platform. You watch him go over, and you are sure he''s making her the same offer, but unlike you, she nods and they smoke the joint together.'
-			*nl
-			'You can see them talk a little and even from where you''re sitting you can tell that the woman is giving him wanton looks. Before long, the two of them sneak off across the tracks and disappear; just as the train arrives, they come rushing back, clothes out of place and hair disheveled.'
-			'It isn''t hard to guess what they were doing to kill time.'
-
-			act 'Board the train to the city':
+		gs 'willpower', 'drugs', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
 				*clr & cla
-				minut += 40
+				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
-				'After 40 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
-				act 'Get off the train':
-					if rand(1, 100) <= 5: gt 'train_incidental', 'end'
-					gt 'pavtrainhall', 'platform'
-				end
-			end
-		end
-		act 'Smoke with him':
-			*clr & cla
-!!arousal maxes after smoking the laced weed.
-			pcs_horny = 100
-			gs 'stat'
-			'<center><h4>Pavlovsk Station</h4></center>'
-			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedsmoke.jpg" ></center>'
-			'You smile and nod, taking the joint from him - you only live once and it''s as good a pastime as any. He lights it as you take a long slow drag off it and hold it in, feeling it in your lungs... until you start coughing, causing him to chuckle. You feel the relaxing effect almost at once, your head feeling both lighter and heavier, your mind slowing down... but you notice a slightly odd taste to the smoke that you can''t place - maybe that''s just what this variety tastes like. You pace it back and forth with him, chatting idly as you smoke, and as you do, you are starting to feel aroused: Your nipples harden, your pussy is getting soaking wet and you feel so wound up that you have to actively keep your hands in check to prevent yourself from masturbating out in the open.'
-			'One thing you know for sure, even in your current state: Marijuana isn''t supposed to have this effect. You look at your smoking buddy. "What else was in this joint?"'
-			'"XTC", he responds with hesitation, a lazy smile on his face. "It feels great, right?" He grabs you by the hand and pulls you up along with him. "Come on, let''s go have some fun before the train arrives. I know you''re just as horny as I am."'
-			'If you were simply horny, you might not have accompanied him, but the XTC had fully taken effect by now, your mind was in a rush and you felt like you could trust the guy who just drugged you, so you went with him, looking forward to some ''fun''.'		
-
-			act 'Refuse':
-				*clr
-				cla
 				'<center><h4>Pavlovsk Station</h4></center>'
 				'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
-				'You still have enough presence of mind to know this would be a bad idea, so you shake your head. "No, thanks."'
+				'You have no idea what could be in it and have no intention of being caught out in the open with marijuana either, so you shake your head. "No, thanks."'
 				'He shrugs and steps away. "Alright, just trying to be friendly. It''s your loss."'
 				*nl
-				'He wanders around for a bit. Eventually another young woman comes down to the platform. You watch him go over, and you are sure he''s making her the same offer, but unlike you, she nods and they smoke the joint together. You briefly consider going to the bathrooms to masturbate but you don''t want to miss the train again.'
+				'He wanders around for a bit. Eventually another young woman comes down to the platform. You watch him go over, and you are sure he''s making her the same offer, but unlike you, she nods and they smoke the joint together.'
 				*nl
 				'You can see them talk a little and even from where you''re sitting you can tell that the woman is giving him wanton looks. Before long, the two of them sneak off across the tracks and disappear; just as the train arrives, they come rushing back, clothes out of place and hair disheveled.'
-				'It isn''t hard to guess what they were doing to kill time. A part of you wishes you had taken him up on the offer.'
+				'It isn''t hard to guess what they were doing to kill time.'
+
 				act 'Board the train to the city':
 					*clr & cla
 					minut += 40
@@ -634,8 +593,50 @@ if $ARGS[0] = 'weed':
 						gt 'pavtrainhall', 'platform'
 					end
 				end
-			end		
-
+			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
+		act 'Smoke with him':
+			*clr & cla
+			pcs_horny = 100
+			gs 'stat'
+			'<center><h4>Pavlovsk Station</h4></center>'
+			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/weedsmoke.jpg" ></center>'
+			'You smile and nod, taking the joint from him - you only live once and it''s as good a pastime as any. He lights it as you take a long slow drag off it and hold it in, feeling it in your lungs... until you start coughing, causing him to chuckle. You feel the relaxing effect almost at once, your head feeling both lighter and heavier, your mind slowing down... but you notice a slightly odd taste to the smoke that you can''t place - maybe that''s just what this variety tastes like. You pace it back and forth with him, chatting idly as you smoke, and as you do, you are starting to feel aroused: Your nipples harden, your pussy is getting soaking wet and you feel so wound up that you have to actively keep your hands in check to prevent yourself from masturbating out in the open.'
+			'One thing you know for sure, even in your current state: Marijuana isn''t supposed to have this effect. You look at your smoking buddy. "What else was in this joint?"'
+			'"XTC", he responds with hesitation, a lazy smile on his face. "It feels great, right?" He grabs you by the hand and pulls you up along with him. "Come on, let''s go have some fun before the train arrives. I know you''re just as horny as I am."'
+			'If you were simply horny, you might not have accompanied him, but the XTC had fully taken effect by now, your mind was in a rush and you felt like you could trust the guy who just drugged you, so you went with him, looking forward to some ''fun''.'		
+			gs 'willpower', 'sex', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'<center><h4>Pavlovsk Station</h4></center>'
+					'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
+					'You still have enough presence of mind to know this would be a bad idea, so you shake your head. "No, thanks."'
+					'He shrugs and steps away. "Alright, just trying to be friendly. It''s your loss."'
+					*nl
+					'He wanders around for a bit. Eventually another young woman comes down to the platform. You watch him go over, and you are sure he''s making her the same offer, but unlike you, she nods and they smoke the joint together. You briefly consider going to the bathrooms to masturbate but you don''t want to miss the train again.'
+					*nl
+					'You can see them talk a little and even from where you''re sitting you can tell that the woman is giving him wanton looks. Before long, the two of them sneak off across the tracks and disappear; just as the train arrives, they come rushing back, clothes out of place and hair disheveled.'
+					'It isn''t hard to guess what they were doing to kill time. A part of you wishes you had taken him up on the offer.'
+					act 'Board the train to the city':
+						*clr & cla
+						minut += 40
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
+						'After 40 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
+						act 'Get off the train':
+							if rand(1, 100) <= 5: gt 'train_incidental', 'end'
+							gt 'pavtrainhall', 'platform'
+						end
+					end
+				end		
+			else
+				act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
 			act 'Go with him':
 				*clr & cla
 				'<center><h4>Pavlovsk Station</h4></center>'
@@ -715,16 +716,23 @@ if $ARGS[0] = 'private':
 		'You stop and look inside, finding a clean-shaved man sitting there with a select few wrinkles that accentuate his angular features; you estimate that he''s in his late thirties or early forties. The expensive suit he''s wearing and the hints of cologne tickling your nose speak volumes of his wealth and his self-confident, even smug expression tells the rest of the story. He motions for you to sit with him. "It''s alright, there''s plenty of room in here. Why don''t you come in and close the door?"'
 		*nl
 		'You hesitate - he is undressing you with his eyes and not even trying to hide it, so you doubt that all he wants is a conversational partner and, sure enough, when he notices your pause, he pulls 500<b>₽</b> out of his wallet and puts it on the seat next to him. "If you come in and close the door, we can have a very enjoyable trip together... and you can get off with a little pocket money."'
-		act 'Refuse him':
-			*clr & cla
-			minut += 35
-			'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
-			'You shake your head indignantly. "Fuck you, I''m no whore! Who do you think you are?!" You don''t give him time to respond but simply walk away and take a seat in the general seating area.' 
-			*nl
-			'You spend some time talking to some of your fellow passengers and share the story with a couple of them. They seem shocked that a man would make such an offer to a nice young lady like you right on this train and speculate that only a crook would be insolent enough to try something like that.'
+		gs 'willpower', 'prostitution', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				minut += 35
+				'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
+				'You shake your head indignantly. "Fuck you, I''m no whore! Who do you think you are?!" You don''t give him time to respond but simply walk away and take a seat in the general seating area.' 
+				*nl
+				'You spend some time talking to some of your fellow passengers and share the story with a couple of them. They seem shocked that a man would make such an offer to a nice young lady like you right on this train and speculate that only a crook would be insolent enough to try something like that.'
 !!which of these acts show up depending on where Sveta was going when the act triggered obviously.
-			act 'Continue journey': gt $loc, $metka
-		end
+				act 'Continue journey': gt $loc, $metka
+			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 'Accept his offer':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/ridebj.jpg" ></center>'
@@ -796,13 +804,20 @@ if $ARGS[0] = 'oldman':
 	'He gets very emotional while telling you the story, even has to wipe away tears a few times, and thanks you for listening to him once he finishes it. "I don''t even know why I started telling you about her", he apologizes, "I guess it''s because you remind me my wife when she was young. You are just as beautiful as she was. If only you could-"'
 	*nl
 	'He seems to want to say more but as the train pulls into the station you''re both headed for, he shakes his head as if saying no to himself. "Please, what is it?", you coax. He says he shouldn''t ask but wonders if you would be so kind to go with him to a place he and his wife liked to go. He would love the company if you were not too busy.'
-	act 'Refuse his request':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
-		'You feel sorry for him but you really don''t have time for this, especially since you think this won''t be just a quick walk - after all, accepting a handful of nuts from him turned into story time! You inform him, with audible regret, that you just don''t have the time to accompany him; he nods sadly but understandingly and, once you''ve disembarked the train, you both go your separate ways.'
+	gs 'willpower', 'misc', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse his request (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
+			'You feel sorry for him but you really don''t have time for this, especially since you think this won''t be just a quick walk - after all, accepting a handful of nuts from him turned into story time! You inform him, with audible regret, that you just don''t have the time to accompany him; he nods sadly but understandingly and, once you''ve disembarked the train, you both go your separate ways.'
 !!which of these acts show up depending on where Sveta was going when the act triggered obviously.
-		act 'Continue': gt $loc, $metka
-	end
+			act 'Continue': gt $loc, $metka
+		end
+	else
+		act 'Refuse his request (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 	act 'Accept his request':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/old.jpg" ></center>'
@@ -811,12 +826,18 @@ if $ARGS[0] = 'oldman':
 		'Honestly, the place is one of the most rundown and shabby you''ve seen in a while but maybe it looked a lot different when he was young, so you hold your tongue so as not to spoil his sentimental mood and walk with him. As you do, he wraps his arm around your waist and points out several other buildings and things, talking about what they were like years ago and the many picnics and such he and his wife had here. He leads you up a set of stairs to a concert platform... and sighs when he finds the door at the top barred. "Last time me and my wife were here, we were able to sneak inside and...", but you don''t listen to how this story ends because, right at that moment, you notice the raging hard-on in his pants.'
 		*nl
 		'He glances down when he sees what you''ve caught and quickly apologizes. He admits that he and his wife used to sneak down here and have sex. He says that you look so much like her and it has been years since he had sex... so maybe you could make an old, sad man feel young and happy again, even if only for a few short minutes?'
-
-		act '"No, that''s too much to ask"':
-			*clr & cla
-			'You tell him that you''re not going to have sex with him. It is more than a little creepy to have sex where he and his wife used to do it, anyways. Feeling repelled by him and his request, you quickly pull free from him and make your way back to the platform, leaving the old guy to himself and his strange ideas.'
-			act 'Return to the station': gt $loc, $metka
-		end
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act '"No, that''s too much to ask" (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'You tell him that you''re not going to have sex with him. It is more than a little creepy to have sex where he and his wife used to do it, anyways. Feeling repelled by him and his request, you quickly pull free from him and make your way back to the platform, leaving the old guy to himself and his strange ideas.'
+				act 'Return to the station': gt $loc, $metka
+			end
+		else
+			act '"No, that''s too much to ask" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 		act 'Fulfill his wish':
 			*clr & cla
 			gs 'npcgeneratec', 0, 'Old guy', rand(52,67)
@@ -871,12 +892,19 @@ if $ARGS[0] = 'fit':
 	'He asks you your name, where you''re going and a few other questions, and before you know it, you''re chatting and laughing about a movie both of you happen to have watched recently. He is pretty charming and it even a blind deaf woman would notice his flirting.'
 	*nl
 	'As you talk, you realize you are both getting off at the next stop and he asks if you would like to go for a walk with him along the tracks after you disembark the train. As innocent as he tries to make it sound, you have no doubt what he would really like to do with you on that "walk"; but he <i>is</i> attractive and his fitness and charm are sexy enough to make his offer tempting.'
-	act 'Refuse his offer':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
-		'You thank him but politely refuse his offer, claiming that, sadly, you don''t have time to go on a walk today and are already running late, really. He doesn''t seem too disappointed, though. "I''m sure we will meet again on the train sometime", he augurs with a smile, "and then you will have time for that walk." You don''t know if his prophecy is going to come true or not or if he truly believes what he said but, regardless, he remains a pleasant dialog partner for the rest of the ride.'
+	gs 'willpower', 'sex', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse his offer (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
+			'You thank him but politely refuse his offer, claiming that, sadly, you don''t have time to go on a walk today and are already running late, really. He doesn''t seem too disappointed, though. "I''m sure we will meet again on the train sometime", he augurs with a smile, "and then you will have time for that walk." You don''t know if his prophecy is going to come true or not or if he truly believes what he said but, regardless, he remains a pleasant dialog partner for the rest of the ride.'
 !!which of these acts show up depending on where Sveta was going when the act triggered obviously.
-		act 'Leave the train': gt $loc, $metka
+			act 'Leave the train': gt $loc, $metka
+		end
+	else
+		act 'Refuse his offer (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	act 'Accept his offer':
 		*clr & cla
@@ -945,15 +973,21 @@ if $ARGS[0] = 'young':
 	'"So where are you headed?", he asks.'
 	'"I get off at the next stop", you respond without thinking. A suggestive grin curls his lips; it takes you a moment to realize how your words could be taken as a sexual innuendo and blush slightly - something about this guy makes you blush a lot more than usual.'
 	'"Well, I could help you with that, if you like", he offers, his eyes following your curves, "it''s always better to get off together."'
-	act 'Refuse':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
-		'He may be good-looking, but it''s time he learned that doesn''t have to mean anything. Shaking your head no, you tell him that "that''s not how I meant it." As you do, the train slows and comes to a stop.'
-		'"Oh, I get it!", he feigns realization at the ''misunderstanding'', "I didn''t mean that, either. I just, you know, thought we could hang out and have fun." His effort to save the situation is valiant, but you shoot him down again with a "no, thank you" and disembark the train without looking at him again.'
+	gs 'willpower', 'sex', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
+			'He may be good-looking, but it''s time he learned that doesn''t have to mean anything. Shaking your head no, you tell him that "that''s not how I meant it." As you do, the train slows and comes to a stop.'
+			'"Oh, I get it!", he feigns realization at the ''misunderstanding'', "I didn''t mean that, either. I just, you know, thought we could hang out and have fun." His effort to save the situation is valiant, but you shoot him down again with a "no, thank you" and disembark the train without looking at him again.'
 !!which of these acts show up depending on where Sveta was going when the act triggered obviously.
-		act 'Return to the station': gt $loc, $metka
-	end
-
+			act 'Return to the station': gt $loc, $metka
+		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 'Accept':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/young.jpg" ></center>'
@@ -1032,13 +1066,20 @@ if $ARGS[0] = 'Gopnik':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/ride3.jpg" ></center>'
 	'You are sitting in an empty seat by the window, looking outside, lost in thought, as others board the train. A gopnik boy sits down next to you, but you try to ignore him and keep staring outside. Unfazed by that, he gives you once-over, a lewd grin you only see from the corner of your eyes, and leans in close, putting his arm around you. You turn your head to tell him off but your mouth is immediately covered by his! And, not content with just kissing you, the gopnik''s hand starts roaming across your breasts.'
-	act 'Stop him':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
-		'After the immediate shock has passed, you push him away, but that doesn''t deter him in the slightest: He immediately tries to kiss and grope you again. You push him off once more, then get up and move to another seat, next to a woman who nods at you sympathetically and shoots the gopnik a nasty look. With nowhere to sit from where he could harass you, the boy looks at you for a moment, then shrugs and looks out the window. The rest of the ride is fairly uneventful; you spend most of it chatting with your seatmate / savior about men who molest women on trains.'
+	gs 'willpower', 'exhib', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Stop him (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/shared/train/ride2.jpg" ></center>'
+			'After the immediate shock has passed, you push him away, but that doesn''t deter him in the slightest: He immediately tries to kiss and grope you again. You push him off once more, then get up and move to another seat, next to a woman who nods at you sympathetically and shoots the gopnik a nasty look. With nowhere to sit from where he could harass you, the boy looks at you for a moment, then shrugs and looks out the window. The rest of the ride is fairly uneventful; you spend most of it chatting with your seatmate / savior about men who molest women on trains.'
 !!which of these acts show up depending on where Sveta was going when the act triggered obviously.
-		act 'Continue journey': gt $loc, $metka
-	end
+			act 'Continue journey': gt $loc, $metka
+		end
+	else
+		act 'Stop him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 	act 'Go with it':
 		*clr & cla
 		minut -= 30
@@ -1049,33 +1090,46 @@ if $ARGS[0] = 'Gopnik':
 		'Once the train stops at your destination, you get off the train with him but barely make it off onto the platform before he pulls you into another kiss. He is actually a pretty good kisser, and while his pawing hands might drive most innocent girls away, he seems to mostly know where he has to grope, too. Breaking the kiss and finding you breathing as heavily as him, he suggests: "Let''s go for a walk; you know, somewhere a little more private."'
 		gs 'arousal', 'foreplay', 5, 'unknown', 'exhibitionism'
 		gs 'stat'
-		act 'Decline':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnik.jpg" ></center>'
-			'You shake your head no - you don''t wanna take it this far with him. "Sorry, but I don''t have time. It was fun, though. The trip was a lot more exciting than I expected." He looks a little disappointed, so you comfortingly pat his cheek. "Maybe I will see you again sometime and we can pick up where we left off." You lean in and give him a long, slow kiss goodbye, then bounce away and head off the platform. You hear him mutter about not getting more action, but you don''t really care - all you care about right now is that the train ride just flew by.'
-			act 'Return to the station and catch the next train':
+		gs 'willpower', 'sex', 'resist', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Decline (<<will_cost>> Willpower)':
 				*clr & cla
-				minut += 30	
+				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/shared/train/electri.jpg"></center>'
-				'The journey is uneventful and you aren''t paying much attention to it, it doesn''t seem like long before you arrive at your destination.'
-				act 'Get off the train': gt $loc, $metka
+				'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnik.jpg" ></center>'
+				'You shake your head no - you don''t wanna take it this far with him. "Sorry, but I don''t have time. It was fun, though. The trip was a lot more exciting than I expected." He looks a little disappointed, so you comfortingly pat his cheek. "Maybe I will see you again sometime and we can pick up where we left off." You lean in and give him a long, slow kiss goodbye, then bounce away and head off the platform. You hear him mutter about not getting more action, but you don''t really care - all you care about right now is that the train ride just flew by.'
+				act 'Return to the station and catch the next train':
+					*clr & cla
+					minut += 30	
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/shared/train/electri.jpg"></center>'
+					'The journey is uneventful and you aren''t paying much attention to it, it doesn''t seem like long before you arrive at your destination.'
+					act 'Get off the train': gt $loc, $metka
+				end
 			end
-		end
+		else
+			act 'Decline (<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':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikwalk.jpg" ></center>'
 			'He takes you to the skyway over the tracks, holding your hand and pointing out different buildings and things. You already know almost everything he is talking about, but you let him talk for one very simple reason: He is surprisingly charming and sweet now, compared to the pawing weirdo you met on the train. He throws a lot of compliments your way, telling you how "the sun pales in comparison to your beauty" and the like. You consider telling him he really doesn''t have to try this hard, but some exaggeration funny exaggerations aside, you genuinely enjoy flirting with him and let him go on.'
 			*nl
 			'Once the train has left the station and all who disembarked with you are gone, he carefully inspects your surroundings to see if anybody else is around. When he doesn''t see anyone, he stops and turns towards you. Back to his train persona, your gopnik friend decides to take this to the next level or three, unbuttons his pants and pulls them down to his knees. His cock springs free, already hard and proudly fluttering in the wind.'
-			act '"Um... No"':
-				*clr
-				cla
-				'Even as he''s pulling down his pants, you are already shaking your head and laughing. "Do you think I''m a slut or something? I''m not gonna do something with you after a couple of compliments, especially not out in the open like this!" You turn and walk off, calling over your shoulder: "I thought you were a nice guy, but I guess I was wrong."' 
-				*nl
-				'The gopnik seems anything but pleased by your response. He tries to pull his pants back up and yells: "You fucking tease! Get back here!" You don''t; on the contrary, you exploit his current distraction with his pants to run back down the stairs to the platform and into the station before he can follow.'
-				act 'Return to the station': gt $loc, $metka
-			end
+			gs 'willpower', 'sex', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act '"Um... No" (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					'Even as he''s pulling down his pants, you are already shaking your head and laughing. "Do you think I''m a slut or something? I''m not gonna do something with you after a couple of compliments, especially not out in the open like this!" You turn and walk off, calling over your shoulder: "I thought you were a nice guy, but I guess I was wrong."' 
+					*nl
+					'The gopnik seems anything but pleased by your response. He tries to pull his pants back up and yells: "You fucking tease! Get back here!" You don''t; on the contrary, you exploit his current distraction with his pants to run back down the stairs to the platform and into the station before he can follow.'
+					act 'Return to the station': gt $loc, $metka
+				end
+			else
+				act '"Um... No" (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end	
 			act 'Blow him':
 				*clr & cla
 				gs 'boy'
@@ -1086,15 +1140,6 @@ if $ARGS[0] = 'Gopnik':
 				'Well, that, and the hard cock you''re sucking with passion.'
 				gs 'arousal', 'bj', 10, 'exhibitionism', 'unknown'
 				gs 'stat'
-				
-				act '"Um... No"':
-					*clr
-					cla
-					'Even as he''s pulling down his pants, you are already shaking your head and laughing. "Do you think I''m a slut or something? I''m not gonna do something with you after a couple of compliments, especially not out in the open like this!" You turn and walk off, calling over your shoulder: "I thought you were a nice guy, but I guess I was wrong."' 
-					*nl
-					'The gopnik seems anything but pleased by your response. He tries to pull his pants back up and yells: "You fucking tease! Get back here!" You don''t; on the contrary, you exploit his current distraction with his pants to run back down the stairs to the platform and into the station before he can follow.'
-					act 'Return to the station': gt $loc, $metka
-				end
 				act 'Let him fuck you':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikvag.jpg" ></center>'
@@ -1113,7 +1158,6 @@ if $ARGS[0] = 'Gopnik':
 						*nl
 						'Without waiting for a response from you, the boy pulls his cock out once more and slides his <<dick>>cm <<$dick_girth>> cock up your ass. You gasp in pain, but it turns into a moan of pleasure along the way. You don''t have to consciously relax your asshole to enjoy this at this point; you are so turned on at the moment that you don''t really care where he sticks his cock as long as he just keeps fucking you.'
 						gs 'arousal', 'vaginal', 10, 'exhibitionism', 'unknown', 'rough'
-!!if Sveta has an orgasm then add below.
 						$orgasm_txt = 'Your ass is getting pounded almost as hard as your pussy; he is just rough enough to make it hurt a little, but in this strange state you''re in, it seems to hurt in a <i>good</i> way, adding more fuel to the mounting climax inside of you. And then, just like that, the pressure is released explosively, shaking you like a leaf in the wind as you have an anal orgasm, maybe five meters away from a skywalk. You cannot contain your moans at this point, and it doesn''t help that your lover redoubles his efforts and fucks your tight little asshole even harder when he realizes that you''re cumming.'
 						$orgasm_or = 'yes'
 						gs 'arousal', 'anal', 10, 'exhibitionism', 'unkown', 'rough'
@@ -1128,7 +1172,6 @@ if $ARGS[0] = 'Gopnik':
 							spafinloc = 4
 							gs 'cum_manage'
 							'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/gopnikcum.jpg" ></center>'
-!! <<boy>> is random boyfriend name. 
 							'He suddenly groans; a first jet of sperm shoots into your bowels just as he pulls out, and you feel his hot sperm rain down all over your ass cheeks as he jerks himself off. When the stream dies down, he wipes off the last few drops at his tip on your butt before pulling his pants up; he then helpfully offers you a tissue.'
 							*nl
 							'As you clean yourself up, he breaks into a chuckle as he realizes something: "By the way, I''m <<$boydesc>>."'
@@ -1139,7 +1182,6 @@ if $ARGS[0] = 'Gopnik':
 
 							act 'Give him your number':
 								*clr & cla
-!!25% chance he really does call and become a boyfriend, unless you already have 3 lovers.
 								if rand(0,3) = 0:
 									gs 'boyfrend', 'start'
 									stopboy = 0

+ 19 - 8
locations/train_incidental.qsrc

@@ -165,7 +165,7 @@ end
 
 if $ARGS[0] = '26':
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/sex/dblgmas.jpg" ></center>'
-	'There are a few people in the car, a couple young girls sit across you and a couple of business men at the far end of the train. You hear the girls giggling as they whisper back and forth. Blushing slightly they look around, noticing only you nearby, the start goading each other. You are about to ask what they are up to, when both of them pull up their skirts, spreading their legs and begin to masturbate. The don''t pay any attention to you at all as they masturbate, some time later one of them cries out in pleasure, quickly followed by her flipping off her friend. Apparently they was racing to see who could get off first.'
+	'There are a few people in the car, a couple young girls sit across you and a couple of business men at the far end of the train. You hear the girls giggling as they whisper back and forth. Blushing slightly they look around, noticing only you nearby, the start goading each other. You are about to ask what they are up to, when both of them pull up their skirts, spreading their legs and begin to masturbate. The don''t pay any attention to you at all as they masturbate, some time later one of them cries out in pleasure, quickly followed by her flipping off her friend. Apparently they were racing to see who could get off first.'
 	act 'Complete your journey': gt $loc, $metka
 end
 
@@ -178,17 +178,19 @@ end
 if $ARGS[0] = '28':
 	*clr & cla
 	temp_var = 0
-	'The car is really populated today. The only empty seat you can find is next to a sleeping man with his baby.'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/breastfeeding/father_with_baby_train.jpg" ></center>'
+	'The car is really populated today. The only empty seat you can find is next to a sleeping man with his baby.'
 	'You sit down next to him. After a bit the baby gets fussy. The man wakes up and responds by hastily searching around in his bag. He mumbles about a milk bottle but doesn''t seem to find what he is searching for.'
 	if lactation['active'] > 0 and pcs_inhib >= 30:
 		act 'Offer to help out':
 			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/shared/train/breastfeeding/father_with_baby_train.jpg" ></center>'
 			'You turn your head to him and whisper: -Uhm, do you need help?'
 			'He looks up at you: Well, if you don''t happen to have a bottle of milk with you, you can''t help me much...'
 			'You hem a bit: ...'
 			act 'Offer to breast feed the baby':
 				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/shared/train/breastfeeding/father_with_baby_train.jpg" ></center>'
 				if tits <= 4:
 					'You put your right hand on your breasts: I could breastfeed him.'
 				elseif tits > 4 and tits <= 7:
@@ -217,18 +219,19 @@ if $ARGS[0] = '28':
 					if pcs_inhib >= 40:
 						act 'Proof it to him':
 							*clr & cla
+							'<center><video autoplay loop src="images/locations/shared/train/breastfeeding/boob_out_leak.mp4" ></video></center>'
 							if vidage <= 16:
 								'You grab into your top to pull out your breast. The man looks really nervous at you as you do this.'
 							else
 								'You grab into your top to pull out your breast.'
 							end
-							'You give your breasts some squeezes until milk drops start to develop on your nipple. The man watches at you suprised and nods positively at you.'
-							'<center><video autoplay loop src="images/locations/shared/train/breastfeeding/boob_out_leak.mp4" ></video></center>'							
+							'You give your breasts some squeezes until milk drops start to develop on your nipple. The man watches at you suprised and nods positively at you.'							
 							gs 'train_incidental', 'breastfeedthebaby'
 						end
 					end
 					act 'Convince him that you can do it':
 						*clr & cla
+						'<center><video autoplay loop src="images/locations/shared/train/breastfeeding/boob_out_leak.mp4" ></video></center>'
 						if vidage <= 16:				
 							'You smile and nod: I can assure you, even if I look young, I have breast milk.'
 						else							
@@ -252,6 +255,7 @@ end
 if $ARGS[0] = 'breastfeedthebaby':
 	act 'Breastfeed the baby':
 		*clr & cla
+		'<center><video autoplay loop src="images/locations/shared/train/breastfeeding/train_breastfeeding.mp4" ></video></center>'
 		'The man hands you his baby. You take it into your arms and pull your top up, revealing your breasts.'
 		if vidage <= 16:
 			if tits <=4:
@@ -319,7 +323,7 @@ if $ARGS[0] = 'breastfeedthebaby':
 				'You unlatch the baby and hand it to the father, then you cover yourself up. The man thanks you for the help.'
 				act 'Finish':gt $loc, $metka
 			elseif temp_var < 12:
-				'You think about it and nod your head while answering: Uhm ... I think I got pretty much milk.'
+				'You think about it and nod your head while answering: "Uhm ... I think I produce a fair amount."'
 				if lactation['breastmm'] >= 500000:
 					'Adding to that: I could fill up a beer glass, when my breasts feel engorged, I think, haha.'
 					'You smile cutely and giggle a bit. You notice how the mans eyes widen from your answer and how he blush.'
@@ -373,9 +377,13 @@ if $ARGS[0] = 'breastfeedthebaby':
 					'Then you unlatch the baby and hand it to the father, then you cover yourself up. The man thanks you for the help.'
 					act 'Leave':gt $loc, $metka
 				end
-				if pcs_inhib >= 50:
-					act 'Have him try your breast milk':
+				gs 'willpower', 'misc', 'force', 'medium'
+				if will_cost <= pcs_willpwr:
+					act 'Have him try your breast milk (<<will_cost>> Willpower)':
 						*clr & cla
+						gs 'willpower', 'pay', 'force'
+						gs 'stat'
+						'<center><video autoplay loop src="images/locations/shared/train/breastfeeding/adult_breastfeeding.mp4" ></video></center>'
 						'You smile at him: Would you like to try?'
 						'The man asks: Try what?'
 						'You grab your right breast with your right hand and pull it out of your top, slightly weighting it in your hand.'
@@ -410,12 +418,15 @@ if $ARGS[0] = 'breastfeedthebaby':
 						end
 						act 'Continue':
 							*clr & cla
+							'<center><video autoplay loop src="images/locations/shared/train/breastfeeding/train_breastfeeding.mp4" ></video></center>'
 							'You unlatch the baby and hand it to the father, then you cover yourself up. The man thanks you for the help and for the delicious snack.'
 							milkedvolume = 0
 							act 'Leave':gt $loc, $metka
 						end
 					end
-				end
+				else
+					act 'Have him try your breast milk (<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
 		pcs_firstbabybreastfeeding = 1

Certains fichiers n'ont pas été affichés car il y a eu trop de fichiers modifiés dans ce diff