Browse Source

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

oldentree 5 years ago
parent
commit
5e50f2fe46
77 changed files with 4999 additions and 5376 deletions
  1. 0 3
      glife.qproj
  2. 0 28
      locations/Gadsarai.qsrc
  3. 63 43
      locations/Gnpc.qsrc
  4. 509 458
      locations/Gnpc2.qsrc
  5. 17 12
      locations/Gnpc_cinema.qsrc
  6. 53 44
      locations/LakeBoyDy.qsrc
  7. 30 10
      locations/LakeBoyZ.qsrc
  8. 23 20
      locations/Miroslava.qsrc
  9. 236 225
      locations/NikoDates.qsrc
  10. 64 90
      locations/NikoDreams.qsrc
  11. 87 111
      locations/NikoEv.qsrc
  12. 111 208
      locations/NikoEv2.qsrc
  13. 88 141
      locations/NikoPayback.qsrc
  14. 122 608
      locations/NikoSlut.qsrc
  15. 3 3
      locations/Prostitute.qsrc
  16. 0 512
      locations/SoniaHome.qsrc
  17. 127 90
      locations/abduction.qsrc
  18. 172 58
      locations/abductionCustomer.qsrc
  19. 94 64
      locations/andrey.qsrc
  20. 5 5
      locations/anushkaev1.qsrc
  21. 26 4
      locations/arturHome.qsrc
  22. 60 9
      locations/arturQW.qsrc
  23. 73 24
      locations/arturRinok.qsrc
  24. 14 7
      locations/arturSex.qsrc
  25. 31 7
      locations/balkon2.qsrc
  26. 75 60
      locations/bass.qsrc
  27. 3 12
      locations/brother.qsrc
  28. 2 2
      locations/cityTrain.qsrc
  29. 281 78
      locations/clener.qsrc
  30. 1 1
      locations/dimaRevenge.qsrc
  31. 0 187
      locations/dinBoroda.qsrc
  32. 1 1
      locations/dinParty.qsrc
  33. 56 67
      locations/ender.qsrc
  34. 48 55
      locations/fight.qsrc
  35. 0 466
      locations/frot.qsrc
  36. 121 96
      locations/gLakeNude.qsrc
  37. 14 14
      locations/gLakeNudeEvent.qsrc
  38. 34 18
      locations/gLakeNudeForest.qsrc
  39. 29 26
      locations/gadprostitutes.qsrc
  40. 5 7
      locations/gadriver.qsrc
  41. 12 1
      locations/gadroad.qsrc
  42. 183 137
      locations/gadukino.qsrc
  43. 194 18
      locations/gadukino_event.qsrc
  44. 392 317
      locations/garfather.qsrc
  45. 5 5
      locations/gargazel.qsrc
  46. 68 55
      locations/glake.qsrc
  47. 1 1
      locations/gschool_grounds.qsrc
  48. 2 19
      locations/gschool_lunch.qsrc
  49. 1 1
      locations/kisameQW.qsrc
  50. 44 12
      locations/kotovEv.qsrc
  51. 305 270
      locations/kotovSex.qsrc
  52. 4 4
      locations/kotovdom.qsrc
  53. 51 10
      locations/kotovtalker.qsrc
  54. 3 3
      locations/lab.qsrc
  55. 36 36
      locations/leonid.qsrc
  56. 163 117
      locations/mitka.qsrc
  57. 164 81
      locations/mitkabuh.qsrc
  58. 18 10
      locations/mitkabuh_group.qsrc
  59. 8 49
      locations/nill.qsrc
  60. 4 4
      locations/park.qsrc
  61. 1 1
      locations/parkivent.qsrc
  62. 11 1
      locations/party_boy.qsrc
  63. 46 27
      locations/party_boys.qsrc
  64. 165 89
      locations/party_girls.qsrc
  65. 82 16
      locations/pod_ezd.qsrc
  66. 66 6
      locations/pod_whore.qsrc
  67. 74 25
      locations/podezdM.qsrc
  68. 4 24
      locations/podrsex.qsrc
  69. 1 1
      locations/podval_rape.qsrc
  70. 2 1
      locations/preCUST.qsrc
  71. 6 2
      locations/preTG.qsrc
  72. 1 1
      locations/sexm.qsrc
  73. 2 2
      locations/stallion.qsrc
  74. 8 8
      locations/street_event.qsrc
  75. 5 6
      locations/succubus.qsrc
  76. 171 135
      locations/train.qsrc
  77. 18 7
      locations/train_incidental.qsrc

+ 0 - 3
glife.qproj

@@ -26,7 +26,6 @@
 		<Location name="cikl"/>
 		<Location name="daystart"/>
 		<Location name="dina"/>
-		<Location name="dinBoroda"/>
 		<Location name="MenuLoc"/>
 		<Location name="MenuMainLoc"/>
 		<Location name="starenie"/>
@@ -157,7 +156,6 @@
 	</Folder>
 	<Folder name="Quests">
 		<Location name="event"/>
-		<Location name="frot"/>
 		<Location name="lesbidomhouse"/>
 		<Location name="lesbimistress"/>
 		<Location name="lesbisubhouse"/>
@@ -496,7 +494,6 @@
 		<Location name="NikoDreams"/>
 		<Location name="NikoPayback"/>
 		<Location name="NikoSlut"/>
-		<Location name="SoniaHome"/>
 	</Folder>
 	<Folder name="Anushka">
 		<Location name="anushka"/>

+ 0 - 28
locations/Gadsarai.qsrc

@@ -25,8 +25,6 @@ if $ARGS[0] = '':
 	end
 	'An old junk filled barn that could hold some useful items.'
 
-	if mira_dog > 0: 'A naked and chained <a href="exec: gt ''Gadsarai'',''mira_dog'' ">Mira</a> sits near the dog house.</a>'
-
 	if month > 4 and month < 10:
 		if hour > 9 and hour < 20:
 			'On your right is a cattle barn.'
@@ -324,31 +322,5 @@ if $ARGS[0] = 'horse':
 	act 'Go':minut += 5 & gt'Gadsarai'
 end
 
-if $ARGS[0] = 'mira_dog':
-	*clr & cla
-	minut += 5
-	gs 'stat'
-
-	'<center><H4>The barn</H4></center>'
-	'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel2.jpg"></center>'
-	'You see Mira in chains, naked, in the old dog house depicting a dog.'
-
-	act 'Release':
-		cla
-		*clr
-		minut += 5
-		mira_dog = 0
-		gs 'stat'
-		npc_QW['A60'] = 32 & !back to mira questline by illume
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel3.jpg"></center>'
-		'Taking pity, you decide to let go the Mira ahead of time.'
-		'"Okay Mira, I''m feeling mercyfull today. You can consider yourself forgiven." you say, removing Mira''s collar.'
-		'The girl looks nervously at you for a few moments, then quickly gets dressed and runs home.'
-
-		act 'Continue':gt'Gadsarai'
-	end
-	act 'Go':gt'Gadsarai'
-end
-
 --- Gadsarai ---------------------------------
 

+ 63 - 43
locations/Gnpc.qsrc

@@ -131,7 +131,7 @@ if boytimes[numnpc] > 0 and otnBoyFrend[numnpc] > 40:
 end
 'You approach <<$nameBoyfrend[numnpc]>> and greet him<<$bfGreeting>>.'
 
-act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
+act 'Apologize and leave': otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
 
 act 'Take a walk through the park':
 	cla
@@ -178,12 +178,12 @@ act 'Take a walk through the park':
 	if gboyrand = 0:
 		'<<$nameBoyfrend[numnpc]>> offers to go to the movies.'
 
-		act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
+		act 'Apologize and leave': otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
 		act 'Go to the cinema':gt 'Gnpc_cinema'
 	elseif gboyrand = 1:
 		'<<$nameBoyfrend[numnpc]>> suggests to drink some beers in the park.'
 
-		act 'Apologize and leave':otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
+		act 'Apologize and leave': otnBoyFrend[numnpc] -= 5 & gt $loc, $metka
 
 		act 'Go for a beer':
 			cla
@@ -228,7 +228,6 @@ if preg = 1 and pregchem <= 1920 and npc_pregtalk[numnpc] = 0 and gnpcSex[numnpc
 
 			act 'Dump him and take the money':
 				cla
-				pcs_dom += 2
 				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				money += 5000
@@ -240,7 +239,6 @@ if preg = 1 and pregchem <= 1920 and npc_pregtalk[numnpc] = 0 and gnpcSex[numnpc
 
 			act 'Dump him and throw the money in his face':
 				cla
-				pcs_dom += 5
 				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
@@ -254,7 +252,6 @@ if preg = 1 and pregchem <= 1920 and npc_pregtalk[numnpc] = 0 and gnpcSex[numnpc
 
 			act 'Dump him':
 				cla
-				pcs_dom += 5
 				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
@@ -281,20 +278,24 @@ if GboyBalabol[numnpc] = 1:
 			'<<$nameBoyfrend[numnpc]>> grins, "Relax, <<$pcs_nickname>>. It''s a fact that you''re a <<$gnikname>>. So what?"'
 		end
 
-		act 'Break up with him':
-			cla
-			pcs_dom += 5
-			GboyBalabol[numnpc] = 2
-			otnBoyFrend[numnpc] = 0
-			gs 'stat'
-			'You furiously scream at him that you never want to see him again and storm off.'
+		gs 'willpower', 'misc', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Break up with him (<<will_cost>> Willpower)':
+				cla
+				gs 'willpower', 'pay', 'self'
+				GboyBalabol[numnpc] = 2
+				otnBoyFrend[numnpc] = 0
+				gs 'stat'
+				'You furiously scream at him that you never want to see him again and storm off.'
 
-			act 'Leave':gt $loc, $metka
+				act 'Leave': gt $loc, $metka
+			end
+		else
+			act 'Break up with 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 'Forgive him':
 			cla
-			sub += 5
 			GboyBalabol[numnpc] = 2
 			gs 'stat'
 			'You think about what he said. Because of the rumours, a lot of people have already a bad opinion about you and you don''t want to lose your <<$bfTitle[numnpc]>>, too. So you reluctantly decide to forgive him.'
@@ -304,50 +305,69 @@ if GboyBalabol[numnpc] = 1:
 	end
 end
 
-if sub < 20 and ((boytimes[numnpc] <= 4 and otnBoyFrend[numnpc] < 100) or (boytimes[numnpc] > 4 and otnBoyFrend[numnpc] < 120)):
+if (boytimes[numnpc] <= 4 and otnBoyFrend[numnpc] < 100) or (boytimes[numnpc] > 4 and otnBoyFrend[numnpc] < 120):
 	act 'End the relationship':
 		cla
 		*nl
 		'You think about how you could approach your <<$bfTitle[numnpc]>> with this delicate matter...'
 		*nl
 
-		if otnBoyFrend[numnpc] < 40 or pcs_dom > 10:
-			act 'Break up with him':
+		if otnBoyFrend[numnpc] < 40:
+			gs 'willpower', 'misc', 'self', 'easy'
+		else
+			gs 'willpower', 'misc', 'self'
+		end
+		if will_cost <= pcs_willpwr:
+			act 'Break up with him (<<will_cost>> Willpower)':
 				cla
-				pcs_dom += 5
+				if otnBoyFrend[numnpc] < 40:
+					gs 'willpower', 'misc', 'self', 'easy'
+				else
+					gs 'willpower', 'misc', 'self'
+				end
+				gs 'willpower', 'pay', 'self'
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
 				'You tell <<$nameBoyfrend[numnpc]>> that it would be better if you don''t see each other again and that he should''t call you anymore. He just stares at you, so you decide to quickly leave before he overcomes his state of shock.'
 
-				act 'Leave':gt $loc, $metka
+				act 'Leave': gt $loc, $metka
 			end
+		else
+			act 'Break up with him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
 		if otnBoyFrend[numnpc] >= 40 and gnpcSex[numnpc] > 0:
-			act 'Just be friends':
-				cla
-				temprand = rand(0, 4)
-				sub -= 5
-				'You nervously approach <<$nameBoyfrend[numnpc]>>, "Listen, <<$nameBoyfrend[numnpc]>>, I really like you, but I''m not ready for an intimate relationship right now. I think we should forget what happened between us and just be friends, okay?"'
-
-				if boytimes[numnpc] > 4 and otnBoyFrend[numnpc] >= 80 and temprand = 0:
-					otnBoyFrend[numnpc] -= 40
-					gnpcSex[numnpc] = 0
-					gs 'stat'
-
-					'<<$nameBoyfrend[numnpc]>> looks totally dejected as you tell him the bad news. You really feel pity for him. When you finish your speech there''s a moment of painful silence.'
-					'Then <<$nameBoyfrend[numnpc]>> takes a deep breath, looks you in the eyes and says, "That''s really hard on me, <<$pcs_firstname>>. But I respect your feelings. I like you, too... very much in fact! That''s why I''m willing to be your friend, even if it means that we can''t be a couple."'
-					'Wow, you didn''t expect that! Still, you feel touched by his devotion and give him a bear hug, smiling from ear to ear. "Thank you, <<$nameBoyfrend[numnpc]>>! I''m so glad that you can understand me. I think we both need some time now to digest all that. Call me when you''re feeling better."'
-				else
-					otnBoyFrend[numnpc] = 0
-					gs 'stat'
-
-					'<<$nameBoyfrend[numnpc]>> narrows his eyes, "Just friends, huh? That''s a pretty lame excuse, <<$pcs_firstname>>, you know that? If you want to break up with me then why don''t you say so!"'
-					'You try to explain to him, "No, that''s not what I mean, <<$nameBoyfrend[numnpc]>>! I really like you..."'
-					'"You know what? You can stuff your friendship! I''m outta here!", with these words he storms off.'
+			gs 'willpower', 'misc', 'self', 'easy'
+			if will_cost <= pcs_willpwr:
+				act 'Just be friends (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'misc', 'self', 'easy'
+					gs 'willpower', 'pay', 'self'
+					temprand = rand(0, 4)
+					'You nervously approach <<$nameBoyfrend[numnpc]>>, "Listen, <<$nameBoyfrend[numnpc]>>, I really like you, but I''m not ready for an intimate relationship right now. I think we should forget what happened between us and just be friends, okay?"'
+
+					if boytimes[numnpc] > 4 and otnBoyFrend[numnpc] >= 80 and temprand = 0:
+						otnBoyFrend[numnpc] -= 40
+						gnpcSex[numnpc] = 0
+						gs 'stat'
+
+						'<<$nameBoyfrend[numnpc]>> looks totally dejected as you tell him the bad news. You really feel pity for him. When you finish your speech there''s a moment of painful silence.'
+						'Then <<$nameBoyfrend[numnpc]>> takes a deep breath, looks you in the eyes and says, "That''s really hard on me, <<$pcs_firstname>>. But I respect your feelings. I like you, too... very much in fact! That''s why I''m willing to be your friend, even if it means that we can''t be a couple."'
+						'Wow, you didn''t expect that! Still, you feel touched by his devotion and give him a bear hug, smiling from ear to ear. "Thank you, <<$nameBoyfrend[numnpc]>>! I''m so glad that you can understand me. I think we both need some time now to digest all that. Call me when you''re feeling better."'
+					else
+						otnBoyFrend[numnpc] = 0
+						pcs_mood -= 10
+						gs 'stat'
+
+						'<<$nameBoyfrend[numnpc]>> narrows his eyes, "Just friends, huh? That''s a pretty lame excuse, <<$pcs_firstname>>, you know that? If you want to break up with me then why don''t you say so!"'
+						'You try to explain to him, "No, that''s not what I mean, <<$nameBoyfrend[numnpc]>>! I really like you..."'
+						'"You know what? You can stuff your friendship! I''m outta here!", with these words he storms off.'
+					end
+
+					act 'Leave':gt $loc, $metka
 				end
-
-				act 'Leave':gt $loc, $metka
+			else
+				act 'Just be friends (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 

File diff suppressed because it is too large
+ 509 - 458
locations/Gnpc2.qsrc


+ 17 - 12
locations/Gnpc_cinema.qsrc

@@ -20,19 +20,24 @@ act 'Watch the movie':
 	if otnBoyFrend[numnpc] < 80:
 		'You watched the movie a couple of hours sitting in a chair next to the guy.'
 
-		act 'Go to the exit':gt 'Gnpc2'
+		act 'Go to the exit': gt 'Gnpc2'
 	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] = 0:
 		'You have been watching a movie and suddenly felt a hand on my knee Man.'
 
-		act 'Remove his hands':
-			cls
-			pcs_dom += 1
-			otnBoyFrend[numnpc] -= 20
-			gs 'stat'
-			'You have removed palm guy with his knees and continued to watch the movie. Movie finally ended. In the hall lights went on and the screen went titles.'
-
-			act 'Go to the exit':gt 'Gnpc2'
-		end
+		gs 'willpower', 'misc', 'self', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Remove his hands (<<will_cost>> Willpower)':
+				cls
+				gs 'willpower', 'pay', 'self'
+				otnBoyFrend[numnpc] -= 20
+				gs 'stat'
+				'You have removed palm guy with his knees and continued to watch the movie. Movie finally ended. In the hall lights went on and the screen went titles.'
+
+				act 'Go to the exit': gt 'Gnpc2'
+			end
+		else
+			act 'Remove his hands (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end	
 
 		act 'Ignore':
 			cls
@@ -40,12 +45,12 @@ act 'Watch the movie':
 			gs 'stat'
 			'You pretended that nothing happens and the guy started more actively stroking your leg. Movie finally ended. In the hall lights went on and the screen went titles.'
 
-			act 'Go to the exit':gt 'Gnpc2'
+			act 'Go to the exit': gt 'Gnpc2'
 		end
 	elseif otnBoyFrend[numnpc] >= 80 and gnpcSex[numnpc] > 0:
 		'You have been watching the movies, and <<$nameBoyfrend[numnpc]>> put his hand on your foot and began to stroke your knee. Movie finally ended. In the hall lights went on and the screen went titles.'
 
-		act 'Go to the exit':gt 'Gnpc2'
+		act 'Go to the exit': gt 'Gnpc2'
 	end
 end
 

+ 53 - 44
locations/LakeBoyDy.qsrc

@@ -21,77 +21,86 @@ if $ARGS[0] = 'ride':
 end
 
 if $ARGS[0] = 'go':
-	act'Try to get away':
+	act 'Try to get away':
 		cls
 		minut+=5
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 		'You don''t like where this is going at all. You attempt to get up and walk away, but the bald man immediately grabs your wrist, pulling you back down.'
 		'"Relax girl, you don''t have to go. Are you nervous or something?"'
-		if pcs_dom>0:
-			act'Apologize and leave':
+		gs 'willpower', 'misc', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Apologize and leave (<<will_cost>> Willpower)':
 				cls
-				minut+=5
-				pcs_dom-=1
+				gs 'willpower', 'pay', 'self'
+				minut += 5
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 				'You assure him that you really need to get going, trying to hide the fact that you are indeed scared of him.'
 				'The guy lets go of your wrist and gives you an amicable smile: "Alright, girl. It''s a small world... I''m sure I will see you around". You rub your wrist as you leave, he was really quite rough about it.'
-				act 'Get away from him':gt'glake'
+				act 'Get away from him': gt 'glake'
 			end
+		else
+			act 'Apologize and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 
-		act'You''re not nervous...':
+		act 'You''re not nervous...':
 			cls
-			minut+=5
+			minut += 5
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 			'You quietly say: "No... I''m not nervous", even though you''re afraid to look him in the eye. Well, that wasn''t very convincing.'
 			'The guy chuckles, and pulls you against his hairy chest. His sweaty hands are mauling your ass now.'
 			'As he feels you up, he tries to coax you into joining him, as if he owns you already: "I know you''re not, baby. You should come with me, I''ll show you a good time. You won''t regret it."'
 			
-			act 'Resist':gt 'LakeBoyDy', 'slap'
-			 
-			if pcs_dom>0:
-				act'Apologize and leave':
-					cls
-					minut+=5
-					pcs_dom-=1
-					gs'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
-					'You assure him that you really need to get going, trying to hide the fact that you are in fact quite scared of him.'
-					'The guy lets go of your ass and gives you an amicable smile: "Alright, girl. It''s a small world... I''m sure I will see you around". You rub your wrist as you leave, he was really quite rough about it.'
-					act 'Get away from him':gt'glake'
-				end
+			act 'Resist': gs 'LakeBoyDy', 'slap'
+			
+			act 'Apologize and leave':
+				cls
+				minut += 5
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
+				'You assure him that you really need to get going, trying to hide the fact that you are in fact quite scared of him.'
+				'The guy lets go of your ass and gives you an amicable smile: "Alright, girl. It''s a small world... I''m sure I will see you around". You rub your wrist as you leave, he was really quite rough about it.'
+				act 'Get away from him': gt 'glake'
 			end
 		end
 	end
 end
 
 if $ARGS[0] = 'slap':
-	if pcs_dom > 0: 
-		act 'Tell him to fuck off':
+	gs 'willpower', 'misc', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Tell him to fuck off (<<will_cost>> Willpower)':
 			cls
-			minut+=5
-			pcs_dom+=2
+			gs 'willpower', 'misc', 'resist', 'easy'
+			gs 'willpower', 'pay', 'resist'
+			minut += 5
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 			'You yell at him and tell him to get away from you. Your shouting quickly catches the attention of other people nearby and the bald man leaves quickly, not having expected your resistance.'
 			act 'Get away from him':gt'glake'		
 		end
+	else
+		act 'Tell him to fuck off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	if (pcs_jab + pcs_punch + pcs_kick + pcs_def) > 150:
-		!! simple skill check as long as fight system is so clumsy
-		act 'Kick him in the balls':
+	! Changing these fighting skills to a simple strength check
+	!if (pcs_jab + pcs_punch + pcs_kick + pcs_def) > 150:
+	gs 'willpower', 'skill', 'resist', 'stren_lvl'
+	if will_cost <= pcs_willpwr:
+		act 'Kick him in the balls (<<will_cost>> Willpower)':
 			cls
-			minut+=5
-			pcs_dom+=2
+			gs 'willpower', 'skill', 'resist', 'stren_lvl'
+			gs 'willpower', 'pay', 'resist'
+			minut += 5
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 			'You''re angry at this guy and his harassment, so you decide to knee him in the balls. He did not expect such a reaction and you score a perfect hit. The bald man bends over and drops on the ground, whincing from pain.'
 			'You pack up your things and go.'
 			act 'Leave him lying in the sand':gt'glake'			
 		end
+	else
+		act 'Kick him in the balls (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	act 'Tell him to let go':
 		cls
@@ -103,7 +112,7 @@ if $ARGS[0] = 'slap':
 
 		act'Complain about the pain':
 			cls
-			minut+=5
+			minut += 1
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 			'His hand has your wrist gripped like it''s in a vice, and you involuntarily shriek in pain: "Ow! Please let me go, you''re hurting me!"'
@@ -112,7 +121,7 @@ if $ARGS[0] = 'slap':
 
 			act 'Try to placate him':
 				cls
-				minut+=5
+				minut+=1
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 				'The way his friend is twisting your arm behind your back hurts a lot, combined with the tight grip he still has on your wrist. Your screaming is making the other visitors on the beach uncomfortable, and none of them want to mess with the scary guys who are holding you down. Instead, you notice everyone quickly gathering their belongings and disappearing from the beach, some of them giving you an apologetic look as they run off. Within seconds, it''s just you, him and his scary friend remaining.'
@@ -121,14 +130,14 @@ if $ARGS[0] = 'slap':
 
 				act'Offer him money':
 					cls
-					minut+=5
+					minut += 1
 					npc_QW['A113'] = 1
 					daybelisex = daystart
-					if money<10000:
-						belgangPay=50000
+					if money < 10000:
+						belgangPay = 50000
 					end
-					if money>=10000:
-						belgangPay=money*5
+					if money >= 10000:
+						belgangPay = money * 5
 					end
 					gs'stat'
 					if week = 7:
@@ -145,9 +154,9 @@ if $ARGS[0] = 'slap':
 					'He slaps you in the face, while his friend still has your arm twisted behind your back. "Did you hear me, girl? I said <<belgangPay>> fucking <b>₽</b>."'
 					act'Agree to pay him':
 						cls
-						minut+=5
+						minut += 2
 						gs'stat'
-						belgangday=daystart
+						belgangday = daystart
 						belgangPayWeekAmount = 5000
 						belgangPayWeek = 0
 						belgangPayextension = 0
@@ -161,7 +170,7 @@ if $ARGS[0] = 'slap':
 						end						
 						act 'Accept':
 							cls
-							minut+=5
+							minut += 1
 							belgangProstitute = 0
 							gs'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
@@ -182,7 +191,7 @@ if $ARGS[0] = 'slap':
 						end
 						act 'Beg him to reduce the weekly rate':
 							cls
-							minut+=5
+							minut += 1
 							gs'stat'
 							belgangPayWeekAmount = 4000
 							belgangPayWeek = 0
@@ -198,7 +207,7 @@ if $ARGS[0] = 'slap':
 				 
 					act 'You can''t afford that':
 						cls
-						minut+=5
+						minut += 2
 						belgangPayWeekAmount = 3000
 						belgangPayWeek = 0
 						belgangPayextension = 0
@@ -219,12 +228,12 @@ end
 
 if $ARGS[0] = 'sucksasha':
 	cls
-	if sashaBeliSex=0:sashaBeliSex=1&guy+=1
+	if sashaBeliSex = 0: sashaBeliSex = 1 & guy += 1
 	spafinloc = 12
 	gs 'cum_manage'
 	belgangday = daystart
 	belgangProstitute = 1
-	swallow +=1
+	swallow += 1
 	gs 'stat'
 	
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/beachblow.jpg"></center>'

+ 30 - 10
locations/LakeBoyZ.qsrc

@@ -7,40 +7,50 @@ $gL_boy_z = {
 		randvnesh = rand(40,120)
 		if rand(0,10) = 0 and pcs_apprnc >= randvnesh:
 			'<<$boydesc>> smiles as he says, "You''re a pretty cool girl. Maybe we can hang out again?"'
-			act 'Smile and leave':gt'glake'
+			act 'Smile and leave': gt 'glake'
 			act 'Give him your phone number':
 				cls
 				pcs_mood += 10
 				gs 'boy', 'details'
 				if rand(0,2) = 0: gs 'boyfrend','start'
-				minut += 15
+				minut += 5
 				bmFrend[Tboynum] = 1
 				gs 'stat'
 				'You give <<$boydesc>> your phone number and he adds it to his contact list.'
 				'He then excuses himself and leaves, promising to call you.'
-				act 'Return':gt'glake'
+				act 'Return': gt 'glake'
 			end
 		else
 			'<<$boydesc>> sits closer to you and offers you a cold beer.'
 			act 'Smile and leave':gt'glake'
 			act 'Drink beer':
 				cls
-				minut+=15
+				minut += 15
 				gs 'drugs', 'alcohol', 'beer', 1
-				gs'stat'
+				gs 'stat'
 				'You drink beer with the guy, and the two of you chat for a while.'
 				'Suddenly, he puts his hand on your thigh.'
 				'"Another beer, <<$pcs_nickname>>?"'
-				act 'Thank him for the beer and leave':gt'glake'
+				gs 'willpower', 'drink', 'resist', 'easy'
+				if will_cost <= pcs_willpwr:
+					act 'Thank him for the beer and leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'glake'
+				else
+					act 'Thank him for the beer and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Drink some more beer':
 					cls
 					gs 'drugs', 'alcohol', 'beer', 1
-					gs 'arousal', 'foreplay', 15
+					gs 'arousal', 'foreplay', 5
 					gs 'stat'
 					'You drink more beer with <<$boydesc>>. He begins stroking your leg and puts his hand on your chest as he leans into you.'
 					if rand(1,100) <= 20:
 						'Leaned in he whispers to you, "I need to taste those lips."'
-						act 'Push him away and leave':gt'glake'
+						gs 'willpower', 'misc', 'resist', 'easy'
+						if will_cost <= pcs_willpwr:
+							act 'Push him away and leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'glake'
+						else
+							act 'Push him away and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
 						act 'Kiss him':
 							cls
 							gs 'arousal', 'kiss', 5
@@ -48,7 +58,12 @@ $gL_boy_z = {
 							gs 'stat'
 							'You passionately kiss <<$boydesc>>, as he continues to caress your body, paying particular interest to your breasts.'
 							'<<$boydesc>> invites you to his house.'
-							act 'Call it a day and leave':gt'glake'
+							gs 'willpower', 'sex', 'resist', 'easy'
+							if will_cost <= pcs_willpwr:
+								act 'Call it a day and leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'glake'
+							else
+								act 'Call it a day and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+							end
 							act 'Follow him to his house':
 								if $clothingworntype = 'nude':
 									gs 'clothing', 'wear_last_worn'
@@ -75,7 +90,12 @@ $gL_boy_z = {
 							gs'stat'
 							'You quickly get changed into your regular clothes and go for a walk with <<$boydesc>>.'
 							'<<$boydesc>> invites you over to his house.'
-							act 'Call it a day and leave':gt'pavResidential'
+							gs 'willpower', 'sex', 'resist', 'easy'
+							if will_cost <= pcs_willpwr:
+								act 'Call it a day and leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'glake'
+							else
+								act 'Call it a day and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+							end
 							act 'Follow him to his house':gt'LBZhouse'
 						end
 					end

+ 23 - 20
locations/Miroslava.qsrc

@@ -1031,12 +1031,14 @@ if $ARGS[0] = 'miratalk':
 			pcs_horny += 10
 			'<center><img <<$set_imgh>> src="images/characters/village/mira/mira3.jpg"></center>'
 			'You coldly tell Mira that you saw her when she fucked Mitka in your meadow. You remind her that she swore not to tell anyone about your secret place. Mira turns red and flutters her eyes at you trying to look innocent as she mumbles that she''s sorry about breaking her promise. Mira asks if there is any way to make amends. You smile and remind her that she promised you three wishes if she ever revealed the meadow to anyone. Mira meekly nods her head confirming that she does indeed remember making that promise and is ready to fullfil them.'
-
-			act 'She deserves some punishment':
-				cla
-				if pcs_dom >= 25:
+			
+			gs 'willpower', 'exhib', 'force'
+			if will_cost <= pcs_willpwr:
+				act 'She deserves some punishment (<<will_cost>> Willpower)':
 					*clr & cla
 					minut += 5
+					gs 'willpower', 'exhib', 'force'
+					gs 'willpower', 'pay', 'force'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/mira3.jpg"></center>'
 					act 'Tell her to show you her pussy':
@@ -1054,7 +1056,7 @@ if $ARGS[0] = 'miratalk':
 							pcs_horny += 15
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish1.jpg"></center>'
-							'Mentally exulting over your victory, you allow Mira to drag you behind the shed. She stops and turns to you, her face filled with a mix of anger and shame. Mira searches your face for a few secons, hoping that you will relent until she sees that you meant what you said. She stomps her feet a few times on the ground in frustration, and then, with a heavy sigh, she starts to remove her panties.'
+							'Mentally exulting over your victory, you allow Mira to drag you behind the shed. She stops and turns to you, her face filled with a mix of anger and shame. Mira searches your face for a few seconds, hoping that you will relent until she sees that you meant what you said. She stomps her feet a few times on the ground in frustration, and then, with a heavy sigh, she starts to remove her panties.'
 							act 'Watch':
 								*clr & cla
 								minut += 5
@@ -1070,22 +1072,23 @@ if $ARGS[0] = 'miratalk':
 							end
 						end
 					end
-				else
-					act 'Tell her that you want to watch as Mitka fucks her in the ass':
-						*clr & cla
-						minut += 5
-						pcs_horny += 10
-						npc_QW['A60'] = 5
-						npc_rel['A60'] -= 1
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/mira3.jpg"></center>'
-						'You say you want to see Mitka fuck her ass because she told him your secret. Mira jumps to her feet from the suggestion and just looks at you, but you don`t give her time to recover and continue to emphasize further, Recalling that a deal is a deal, and if your word doesn''t matter, then out friendship will end. Miroslav blushes and hesitantly shifts from foot to foot. You decide to go for broke, turn around and start to leave...'
-						' - Wait, so it`s screaming you in the back of Mira, but you pretend to not notice and go on.'
-						' - Well, <<$pcs_nickname>>, - after a couple of seconds until you hear a hysterical scream from Mira, I`ll think of something!'
-
-						act 'Leave':gt 'Miroslava','Leave'
-					end
 				end
+			else
+				act 'She deserves some punishment (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			act 'Tell her that you want to watch as Mitka fucks her in the ass':
+				*clr & cla
+				minut += 5
+				pcs_horny += 10
+				npc_QW['A60'] = 5
+				npc_rel['A60'] -= 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/mira3.jpg"></center>'
+				'You say you want to see Mitka fuck her ass because she told him your secret. Mira jumps to her feet from the suggestion and just looks at you, but you don`t give her time to recover and continue to emphasize further, Recalling that a deal is a deal, and if your word doesn''t matter, then out friendship will end. Miroslav blushes and hesitantly shifts from foot to foot. You decide to go for broke, turn around and start to leave...'
+				' - Wait, so it`s screaming you in the back of Mira, but you pretend to not notice and go on.'
+				' - Well, <<$pcs_nickname>>, - after a couple of seconds until you hear a hysterical scream from Mira, I`ll think of something!'
+
+				act 'Leave':gt 'Miroslava','Leave'
 			end
 		end
 	elseif npc_QW['A60'] = 4 and Mira4day ! daystart:

File diff suppressed because it is too large
+ 236 - 225
locations/NikoDates.qsrc


+ 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 ---------------------------------
 

+ 87 - 111
locations/NikoEv.qsrc

@@ -4,7 +4,7 @@
 menu_off = 1
 
 if $ARGS[0] = 'Intro':
-	cls
+	*clr & cla
 	NikoIntro = 1
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -12,7 +12,7 @@ if $ARGS[0] = 'Intro':
 	'As you are walking out of school, you bump into one of your schoolmates Niko Volkov, who immediately gives you a warm smile. "Hello there, My name is Niko Volkov, may I ask you your name?"'
 
 	act 'I am <<$pcs_firstname>>':	
-		cls
+		*clr & cla
 		if npc_rel['A189'] < 50:npc_rel['A189'] = 50
 		NikoLuv += 2
 		minut += 5
@@ -25,7 +25,7 @@ if $ARGS[0] = 'Intro':
 	end
 	
 	act 'Beat it!':
-		cls
+		*clr & cla
 		if npc_rel['A189'] > 25:npc_rel['A189'] = 25
 		NikoLuv -= 2
 		minut += 5
@@ -39,7 +39,7 @@ if $ARGS[0] = 'Intro':
 end
 
 if $ARGS[0] = 'Lunch Intro':
-	cls
+	*clr & cla
 	if NikoIntro = 0:NikoIntro = 1
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -47,7 +47,7 @@ if $ARGS[0] = 'Lunch Intro':
 	'You approach Niko, he turns to you with a warm smile on his face. "Hello there, My name is Nikolai Volkov, may I ask you your name?'
 
 	act 'I am <<$pcs_firstname>>':
-		cls
+		*clr & cla
 		if npc_rel['A189'] < 50:npc_rel['A189'] = 50
 		NikoLuv += 2
 		minut += 5
@@ -57,7 +57,7 @@ if $ARGS[0] = 'Lunch Intro':
 		'You return the smile as you reply. "Hello yourself, my name is <<$pcs_firstname>>. Nice to meet you." Niko responds, "Ahh <<$pcs_firstname>> what a beautiful name, very suitable for you. I need to get going, but I am always here at lunchtime, and would be very grateful if you would grace me with your presence." He then gently grabs onto your fingers then raises it to his face before giving your hand a gently kiss. "Now may I get to know you better?"'
 
 		act 'Chat with Niko':
-			cls
+			*clr & cla
 			npc_rel['A189'] += rand(5,10)
 			minut += 10
 			gs'stat'
@@ -70,7 +70,7 @@ if $ARGS[0] = 'Lunch Intro':
 	end
 	
 	act 'Beat it!':
-		cls
+		*clr & cla
 		if npc_rel['A189'] > 25:npc_rel['A189'] = 25
 		NikoLuv -= 2
 		minut += 5
@@ -84,7 +84,7 @@ if $ARGS[0] = 'Lunch Intro':
 end
 
 if $ARGS[0] = 'Lunch Chat':
-	cls
+	*clr & cla
 	numnpc = 189
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -116,7 +116,7 @@ if $ARGS[0] = 'Lunch Chat':
 	
 	if NikoLuv > -4 and NikoPayback = 0:
 		act 'Chat':	
-			cls
+			*clr & cla
 			NikoLuv += 1
 			npc_rel['A189'] += rand(5,10)
 			minut += 10
@@ -131,7 +131,7 @@ if $ARGS[0] = 'Lunch Chat':
 	
 	if NikoLuv > -4 and NikoVolkovQW = 0 and NikoPayback = 0:
 		act 'Insult':	
-			cls	
+			*clr & cla	
 			npc_rel['A189'] -= 5
 			NikoLuv -= 1
 			minut += 5
@@ -145,7 +145,7 @@ if $ARGS[0] = 'Lunch Chat':
 	
 	if NikoPayback = 2 and NikoPayed ! daystart:
 		act 'Money (200 <b>₽</b>)':	
-			cls
+			*clr & cla
 			money -= 200
 			NikoPayed = daystart
 			minut += 5
@@ -158,7 +158,7 @@ if $ARGS[0] = 'Lunch Chat':
 		end
 		
 		act 'Sex':	
-			cls
+			*clr & cla
 			NikoPayed = daystart
 			minut += 5
 			gs'stat'
@@ -171,7 +171,7 @@ if $ARGS[0] = 'Lunch Chat':
 		
 	elseif NikoPayback = 2 and NikoPayed = daystart and NikoPayback_Sex ! daystart:	
 		act 'Offer Niko sex':	
-			cls
+			*clr & cla
 			NikoPayback_Sex = daystart
 			minut += 5
 			gs'stat'
@@ -185,7 +185,7 @@ if $ARGS[0] = 'Lunch Chat':
 	
 	if NikoPayback = 2 and NikoPayed = daystart:
 		act 'Chat':	
-			cls
+			*clr & cla
 			minut += 10
 			gs'stat'
 			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -198,19 +198,13 @@ if $ARGS[0] = 'Lunch Chat':
 	
 	if NikoVolkovQW = 5 and NikoEv = 9:
 		act '<font color=#FF00FF><b>Special Activity</b></font>':	
-			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/avatars/<<week>>.jpg"></center>'
-			'You sit down next to Niko, "Hello Niko, I remember you telling me something about a special activity that you have planned." Niko grins, as he replies, "I have something special for us today. Are you ready to find out what it is?" You suddenly feel a cold chill down your spine, as he says that. <font color=#FF00FF>Why do I feel so nervous? I can''t shake the feeling that something big is going to happen.</font>'
+			'You sit down next to Niko, "Hello Niko, I remember you telling me something about a special activity that you have planned." Niko grins, as he replies, "I have something special for us today. Are you ready to find out what it is?" You suddenly feel a cold chill down your spine, as he says that.'
 			
-			act '<font color=#FF00FF>Go with Niko</font>':
-				if soniaPS = 0:
-					gt 'NikoDates', 'Sonia Block'
-				else
-					gt 'NikoDates', 'Locker Room'
-				end	
-			end	
+			act '<font color=#FF00FF>Go with Niko</font>': gt 'NikoDates', 'Locker Room'
 
 			act 'Maybe later':gt 'NikoEv', 'Lunch Chat'
 		end
@@ -218,7 +212,7 @@ if $ARGS[0] = 'Lunch Chat':
 	
 	if NikoLuv <= -2 and NikoPayback = 0:
 		act 'Walk away':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/school/hallway/wos4.jpg"></center>'
 			VK = rand(1,3)
@@ -237,7 +231,7 @@ if $ARGS[0] = 'Lunch Chat':
 		act 'Walk away':gt 'gschool_lessons', 'short_break'
 	elseif NikoPayback = 0:
 		act 'Leave':
-			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/avatars/<<week>>.jpg"></center>'
@@ -251,7 +245,7 @@ if $ARGS[0] = 'Lunch Chat':
 end
 
 if $ARGS[0] = 'Date Intro':
-	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/charmer2.jpg"></center>'
@@ -260,7 +254,7 @@ if $ARGS[0] = 'Date Intro':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/jewelry/necklace1.jpg"></center>'
 
 	act 'Accept the gift':	
-		cls
+		*clr & cla
 		if npc_rel['A189'] < 80:npc_rel['A189'] = 80
 		NikoDateIntro = 1
 		NikoNecklace1 = 1
@@ -275,17 +269,22 @@ if $ARGS[0] = 'Date Intro':
 
 		act 'Go to class':gt 'gschool_lessons', 'short_break'
 	end	
-	
-	act 'Decline the gift':	
-		cls
-		NikoLuv = 1
-		minut += 5
-		gs'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/nodate.jpg"></center>'
-		'"I''m sorry Niko, but I''m not really looking for any kind of relationship right now." Niko gives you a warm smile, as he responds "Don''t worry about it milady, I will just wait for the time where you feel yourself ready, for such a venture." You giggle as you respond, "You''re so weird but thanks for understanding. I''ll see you later." You turn around and walk away.'
+	gs 'willpower', 'misc', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Decline the gift (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			NikoLuv = 1
+			minut += 5
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/nodate.jpg"></center>'
+			'"I''m sorry Niko, but I''m not really looking for any kind of relationship right now." Niko gives you a warm smile, as he responds "Don''t worry about it milady, I will just wait for the time where you feel yourself ready, for such a venture." You giggle as you respond, "You''re so weird but thanks for understanding. I''ll see you later." You turn around and walk away.'
 
-		act 'Go to class':gt 'gschool_lessons', 'short_break'
-	end
+			act 'Go to class':gt 'gschool_lessons', 'short_break'
+		end
+	else
+		act 'Decline the gift (<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] = 'Niko Dates':
@@ -309,27 +308,25 @@ if $ARGS[0] = 'Niko Dates':
 end	
 
 if $ARGS[0] =  'Date 1':
-	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/niko1.jpg"></center>'
 	'You walk up to Niko, and his eyes light up as he sees you. "Greetings <<$pcs_firstname>>, I hope that you are ready to have a good time."'
 
 	act 'I''m ready':	
-		cls
+		*clr & cla
 		NikoEv = 2
 		minut += 5
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/walk1.jpg"></center>'
 		'"I sure am." Niko gives you a warm smile as he responds, "I figured that we could go to an amusement park, out of town. I will pay our way of course, so come on, let''s get going." Niko takes your hand, and walks you to the train station where you both board the train and get seated.'	
-		*nl
-		'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg"></center>'
 		
 		act 'Go with Niko':gt 'NikoDates', 'Date 1_1'
 	end
 	
 	act 'Not yet':	
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -341,28 +338,26 @@ if $ARGS[0] =  'Date 1':
 end
 
 if $ARGS[0] =  'Date 2':
-	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/niko2.jpg"></center>'
 	'You walk up to Niko, and he lowers his cigarette before saying, "Hello <<$pcs_firstname>> I wanted to tell you that I am sorry, for how I acted yesterday. I just wanted to you leave your shell a bit. You always seem so tense." You reply, "Tense? I guess I could try to lighten up a bit. Maybe." Niko smiles as he responds, "Good enough. So are you ready for a surprise I have you? We could be out all afternoon."'
 
 	act 'I''m ready':	
-		cls
+		*clr & cla
 		NikoEv = 3
 		minut += 5
 		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/avatars/<<week>>.jpg"></center>'
-		'"I sure am." Niko''s smile widens as he replies, "Great let''s get going." Niko wraps his arm around your waist as he leads you toward the lake.'
-		*nl
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/walk2.jpg"></center>'
+		'"I sure am." Niko''s smile widens as he replies, "Great let''s get going." Niko wraps his arm around your waist as he leads you toward the lake.'
 		
 		act 'Follow Niko''s lead':gt 'NikoDates', 'Date 2'
 	end
 	
 	act 'Not yet':	
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -374,28 +369,26 @@ if $ARGS[0] =  'Date 2':
 end
 
 if $ARGS[0] =  'Date 3':
-	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/niko3.jpg"></center>'
 	'You walk up to Niko and his eyes light up as he sees you. "Greetings <<$pcs_firstname>>, I have a surprise activity for today, We could be out all afternoon. Are you up for it?"'
 
 	act 'I''m ready':	
-		cls
+		*clr & cla
 		NikoEv = 4
 		minut += 5
 		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/avatars/<<week>>.jpg"></center>'
-		'"I sure am." Niko''s smile widens as he replies, "Great let''s get going." Niko wraps his arm around your waist, as he leads you toward the lake.'	
-		*nl
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/walk3.jpg"></center>'
+		'"I sure am." Niko''s smile widens as he replies, "Great let''s get going." Niko wraps his arm around your waist, as he leads you toward the lake.'	
 		
 		act 'Follow Niko''s lead':gt 'NikoDates', 'Date 2'
 	end
 	
 	act 'Not yet':	
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -407,28 +400,26 @@ if $ARGS[0] =  'Date 3':
 end
 
 if $ARGS[0] =  'Date 4':
-	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 walk up to Niko, and his eyes light up as he sees you. "Ahhh <<$pcs_firstname>>, I''m so glad to see you. Are you up for a nice relaxing day at the beach?"'
 
 	act 'I''m ready':	
-		cls
+		*clr & cla
 		NikoEv = 5
 		minut += 5
 		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/avatars/<<week>>.jpg"></center>'
-		'"I can never turn down a day at the beach." Niko chuckles as he responds, "Great I have everything we should need here." Niko then opens his bag which houses a beach towel, cigarettes and sunscreen. You happily grab onto his hand then say, "What are we waiting for? Let''s go!" You then lead Niko toward the lake.'	
-		*nl
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/walk4.jpg"></center>'
-		
+		'"I can never turn down a day at the beach." Niko chuckles as he responds, "Great I have everything we should need here." Niko then opens his bag which houses a beach towel, cigarettes and sunscreen. You happily grab onto his hand then say, "What are we waiting for? Let''s go!" You then lead Niko toward the lake.'	
+
 		act 'Enter train station':gt 'NikoDates', 'Date 3'
 	end
 	
 	act 'Not yet':	
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -440,14 +431,14 @@ if $ARGS[0] =  'Date 4':
 end
 
 if $ARGS[0] =  'New Life':
-	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/niko1.jpg"></center>'
 	'As you approach Niko, he nods then motions you over, "Are you ready to head out?"'
 	
 	act 'Yes':
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -465,7 +456,7 @@ end
 !!!!!!!!!!!
 
 if $ARGS[0] = 'Disco Intro':
-	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/nikomisc/brother/upset.jpg"></center>'
@@ -475,7 +466,7 @@ if $ARGS[0] = 'Disco Intro':
 end
 
 if $ARGS[0] = 'Disco Chat':
-	cls
+	*clr & cla
 	if NikoIntro = 0:NikoIntro = 1
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -509,7 +500,7 @@ if $ARGS[0] = 'Disco Chat':
 		
 	if NikoLuv > -4 and  NikoPayback = 0:
 		act 'Drink':	
-			cls
+			*clr & cla
 			NikoAlko = 2
 			gs 'drugs', 'alcohol', 'vodka'
 			NikoLuv += 1
@@ -517,9 +508,7 @@ if $ARGS[0] = 'Disco Chat':
 			minut += 10
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_2_2.mp4"></video></center>'
-			'"I would love to." Niko opens up a bottle of alcohol then hands you the bottle, as he gives you a wink. You both spend the next few minutes drinking, and sharing stories.'
-			*nl
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_2_1.mp4"></video></center>'			
+			'"I would love to." Niko opens up a bottle of alcohol then hands you the bottle, as he gives you a wink. You both spend the next few minutes drinking, and sharing stories.'			
 			
 			act 'Get up':gt 'gdkin'
 		end	
@@ -527,7 +516,7 @@ if $ARGS[0] = 'Disco Chat':
 	
 	if NikoLuv > -4 and  NikoPayback = 0:
 		act 'Dance':	
-			cls
+			*clr & cla
 			danc_exp += rand(1,3)
 			NikoLuv += 1
 			npc_rel['A189'] += rand(5,10)
@@ -542,7 +531,7 @@ if $ARGS[0] = 'Disco Chat':
 	
 	if NikoLuv > -4 and NikoVolkovQW = 0 and  NikoPayback = 0:
 		act 'Insult':	
-			cls	
+			*clr & cla	
 			npc_rel['A189'] -= 5
 			NikoLuv -= 1
 			minut += 5
@@ -556,7 +545,7 @@ if $ARGS[0] = 'Disco Chat':
 	
 	if NikoPayback = 2 and NikoPayed ! daystart:
 		act 'Money (200 <b>₽</b>)':	
-			cls
+			*clr & cla
 			money -= 200
 			NikoPayed = daystart
 			minut += 5
@@ -569,7 +558,7 @@ if $ARGS[0] = 'Disco Chat':
 		end
 		
 		act 'Sex':	
-			cls
+			*clr & cla
 			NikoPayed = daystart
 			NikoPayback_Sex = daystart
 			NikoDiscoPay = 1
@@ -584,7 +573,7 @@ if $ARGS[0] = 'Disco Chat':
 		
 	elseif NikoPayback = 2 and NikoPayed = daystart and NikoPayback_Sex ! daystart:	
 		act 'Offer Niko sex':	
-			cls
+			*clr & cla
 			NikoDiscoPay = 1
 			NikoPayback_Sex = daystart
 			minut += 5
@@ -599,7 +588,7 @@ if $ARGS[0] = 'Disco Chat':
 	
 	if NikoPayback = 2 and NikoPayed = daystart:
 		act 'Chat':	
-			cls
+			*clr & cla
 			minut += 5
 			gs'stat'
 			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -612,7 +601,7 @@ if $ARGS[0] = 'Disco Chat':
 	
 	if NikoLuv <= -2 and NikoPayback = 0:
 		act 'Walk away':	
-			cls
+			*clr & cla
 			NikoAlko = 0
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/pc/glare.jpg"></center>'
@@ -632,7 +621,7 @@ if $ARGS[0] = 'Disco Chat':
 		act 'Walk away':gt 'gdkin'
 	elseif NikoPayback = 0:
 		act 'Leave':
-			cls
+			*clr & cla
 			NikoAlko = 0
 			gs'stat'
 			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -652,7 +641,7 @@ end
 !!!!!!!!!!!!!
 
 if $ARGS[0] =  'Lunch Breakup':
-	cls
+	*clr & cla
 	NikoFightDay = daystart
 	NikoPayback = 1
 	NikoBreakup = 2
@@ -666,20 +655,18 @@ if $ARGS[0] =  'Lunch Breakup':
 	'You approach Niko with a stern look on your face. Niko notices you then says. "Ah there you are, You disappeared on me yesterday." You quickly reply, "I DISAPPEARED!? YOU RAN OFF AND LEFT ME TIED UP!" Niko recoils before responding, "Did I? I''m sorry I just had to..." You cut Niko off. "I DON''T WANT TO HEAR IT! I never should have trusted you. How could I have been so stupid?" Niko responds, "Hey let''s not be hasty here." You quickly reply, "NO! I want nothing to do with you. Stay away from me." '
 
 	act 'Walk away':
-		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/nikomisc/avatars/<<week>>.jpg"></center>'		
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/school/restroom/ouch.jpg"></center>'	
 		'Niko then gets noticeably angry, as he responds, "After all the time and money I spent on you? You wiull not leave me. I will get what I deserve!" You reply, "You got that right." You then wind up your leg before ramming it in between his legs, smashing on his balls, causing him to drop to the ground squirming in pain. You spit on Niko before walking away.'
-		'<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/school/restroom/ouch.jpg"></center>'
-	
+
 		act 'Walk away':gt 'gschool_lessons', 'short_break'
 	end	
 end		
 	
 if $ARGS[0] =  'Disco Breakup':
-	cls
+	*clr & cla
 	NikoBreakupDay = daystart
 	NikoPayback = 1
 	NikoBreakup = 2
@@ -693,20 +680,18 @@ if $ARGS[0] =  'Disco Breakup':
 	'You approach Niko with a stern look on your face. Niko notices you then says. "Ah there you are, You disappeared on me yesterday." You quickly reply, "I DISAPPEARED!? YOU RAN OFF AND LEFT ME TIED UP!" Niko recoils before responding, "Did I? I''m sorry I just had to..." You cut Niko off. "I DON''T WANT TO HEAR IT! I never should have trusted you. How could I have been so stupid?" Niko responds, "Hey let''s not be hasty here." You quickly reply, "NO! I want nothing to do with you. Stay away from me." '
 
 	act 'Walk away':
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><b><h4><font color="red"><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'		
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/fight/down.jpg"></center>'		
 		'Niko then gets noticeably angry, as he responds, "After all the time and money that I spent on you? You will not leave me! I will get what I deserve!" You reply, "You got that right." You then wind up your leg before ramming it in between his legs, smashing against his balls, causing him to drop to the ground, squirming in pain. You spit on Niko before walking away.'
-		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/fight/down.jpg"></center>'
-	
+
 		act 'Step away':gt 'gdkin'
 	end	
 end	
 
 if $ARGS[0] =  'Disco Breakup 2':
-	cls
+	*clr & cla
 	minut += 1
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -721,7 +706,7 @@ end
 !!!!!!!!!!!!!!!
 
 if $ARGS[0] =  'Fyodor':
-	cls
+	*clr & cla
 	NikoVsFedor = 1
 	gs'stat'
 	'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -729,64 +714,55 @@ if $ARGS[0] =  'Fyodor':
 	'You walk up to Niko and his eyes light up as he sees you. "Greetings <<$pcs_firstname>>, I hope you are ready to have a good time." You suddenly feel a hand gently but firmly grab onto your arm.'
 
 	act 'Turn around':	
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big5.jpg"></center>'
 		'You turn to see Fedor with a concerned look on his face. "<<$pcs_firstname>> what are doing over here with him? You should be careful hanging around guys like him. He is no good for you." Niko just stares on in silence with an annoyed look on his face. You turn to Fedor and say, "Don''t worry Fedor it''s not what it looks like. Niko was just..." Niko quickly continues your sentence. "<<$pcs_firstname>>''s father is planing on buying one of my brothers old bikes, so she came to me to discuss the details. That''s all." Fedor gives Niko a blank stare. "I''ve seen your brother before and I don''t think that <<$pcs_firstname>> should be dealing with him or you." Niko shrugs as he replies, "Well that''s <<$pcs_firstname>>''s call, not yours." Fedor walks right up to Niko then clenches his fists. "Well no one asked for your input."' 
-		'Niko doesn''t seem worried as he casually leans against the wall. "No need to get violent. I''m sure <<$pcs_firstname>> doesn''t want us fighting in front of her for no reason. That would be really rude of us, wouldn''t it?" Fedor looks back to you with an embarrassed look on his face. "Sorry <<$pcs_nickname>> I hope I''m not making you uncomfortable. Just be careful with this one okay?" You give Fedor a nod and a smile as he turns around then walks away.'		
-		'<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/niko4.jpg"></center>'		
+		'Niko doesn''t seem worried as he casually leans against the wall. "No need to get violent. I''m sure <<$pcs_firstname>> doesn''t want us fighting in front of her for no reason. That would be really rude of us, wouldn''t it?" Fedor looks back to you with an embarrassed look on his face. "Sorry <<$pcs_nickname>> I hope I''m not making you uncomfortable. Just be careful with this one okay?" You give Fedor a nod and a smile as he turns around then walks away.'				
 
 		act 'Turn back toward Niko':gt 'NikoEv', 'Niko Dates'
 	end
 end
 
 if $ARGS[0] =  'Viktor':
-	cls
+	*clr & cla
 	NikoVsVitek = 1
 	minut += 5
 	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/niko'+rand(1,3)+'.jpg"></center>'
 	'You walk up to Niko and give him a smile then you suddenly see Vitek quickly walk up to Niko and say, "What are you doing with <<$pcs_firstname>>? She is mine." Niko chuckles as he raises his hands, "I was just helping <<$pcs_firstname>> with finding the person spreading mean rumors about her." Vitek responds, "What rumors?" Niko replies, "Someone said that <<$pcs_firstname>> here is dating a fat, brain dead, gopnik. I wonder who that rumor was referring to." Vitek begins seething with anger as he ask, "Who the fuck said that shit?" Niko replies, "It took some digging, but I found out that it was him." Niko points to Lesco Tsarev, causing Vitek to turn to Lesco then shout, "You fucking little bitch! I will tear your arm off!" He then charges at Lesco, who begins running for his life. While they were distracted, Niko takes your hand then leads you out of the school grounds.'
-	'<center><b><h4><font color="red"><<"Viktor [Vitek] Kotov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big9>.jpg"></center>'
 	
 	act 'Follow Niko''s lead':gt 'NikoEv', 'Niko Dates'
 end
 
 if $ARGS[0] =  'Dimka':
-	cls
+	*clr & cla
 	NikoVsDimka = 1
 	gs'stat'
 	'<center><b><h4><font color="maroon"><<"Dmitriy [Dimka] Nosov">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
-	'You walk up to Niko and give him a smile then see Dimka approach you then gives Niko a puzzled look. "What are you with <<$pcs_firstname>>. She is my girl." Niko gives Dimka a blank stare as he responds, "Sure she is...Why don''t you just piss off before I get pissed off?" Dimka then says, "Why don''t we ask her who she''s dating?" Niko replies, "Because asking a girl to kiss and tell is rude." Dimka looks shocked as he responds, "You don''t care? But would you care if I told you that <<$pcs_nickname>> here is a cocksucker?" Niko raises an eyebrow. "Well do you have proof of that, or are you just blowing smoke?"'
-	'<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/avatars/<<week>>.jpg"></center>'	
+	'You walk up to Niko and give him a smile then see Dimka approach you then gives Niko a puzzled look. "What are you with <<$pcs_firstname>>. She is my girl." Niko gives Dimka a blank stare as he responds, "Sure she is...Why don''t you just piss off before I get pissed off?" Dimka then says, "Why don''t we ask her who she''s dating?" Niko replies, "Because asking a girl to kiss and tell is rude." Dimka looks shocked as he responds, "You don''t care? But would you care if I told you that <<$pcs_nickname>> here is a cocksucker?" Niko raises an eyebrow. "Well do you have proof of that, or are you just blowing smoke?"'	
 
 	act 'See what Dimka does':	
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'
 		'<center><b><h4><font color="maroon"><<"Dmitriy [Dimka] Nosov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big1.jpg"></center>'
-		'Dimka quickly pulls out his phone then starts up a video then shows it to Niko. You recognize the video of you sucking on Dimka''s dick, causing you to think to yourself: <font color=#FF00FF>Oh shit! How am I going to explain this to Niko. I''m really screwed now.</font> Niko watches the video then turns to you and says, "You have some talents, I see." He pulls out his phone then taps the screens of both phones for a few seconds then returns Dimka''s phone. Dimka grins as he says, "See I told you that she is a whore." Niko replies, "You are still being rude. Thanks for the vid, but you can get lost now." Dimka recoils in shock, "But this video sho... Hey what the hell? Did you delete it?" Niko smirks as he replies, "Well of course I have. I can''t just let you keep embarrassing videos of my girl, now can I?"'
-		'<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/avatars/<<week>>.jpg"></center>'		
+		'Dimka quickly pulls out his phone then starts up a video then shows it to Niko. You recognize the video of you sucking on Dimka''s dick, you don''t know how you are going to explain this to Niko. Niko watches the video then turns to you and says, "You have some talents, I see." He pulls out his phone then taps the screens of both phones for a few seconds then returns Dimka''s phone. Dimka grins as he says, "See I told you that she is a whore." Niko replies, "You are still being rude. Thanks for the vid, but you can get lost now." Dimka recoils in shock, "But this video sho... Hey what the hell? Did you delete it?" Niko smirks as he replies, "Well of course I have. I can''t just let you keep embarrassing videos of my girl, now can I?"'	
 		
 		act 'Continue':	
-			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/niko4.jpg"></center>'			
-			'Niko begins lighting his cigarette before Dimka suddenly shouts, "How dare you!? You fucking sack of shit! That was my video!" Niko gets off the wall then approaches Dimka, causing Dimka to immediately back up. Niko grabs Dimka''s face with one hand then brings it to his before blowing smoke in his face then saying, "I will give you one more chance to leave before I accept Lavrenti''s offer to make your life a living hell." Dimka quickly backs off as he says, "You''re insane!...Whatever...Keep her!" Dimka then quickly walks away.'
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/pissoff.mp4"></video></center>'		
+			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/pissoff.mp4"></video></center>'			
+			'Niko begins lighting his cigarette before Dimka suddenly shouts, "How dare you!? You fucking sack of shit! That was my video!" Niko gets off the wall then approaches Dimka, causing Dimka to immediately back up. Niko grabs Dimka''s face with one hand then brings it to his before blowing smoke in his face then saying, "I will give you one more chance to leave before I accept Lavrenti''s offer to make your life a living hell." Dimka quickly backs off as he says, "You''re insane!...Whatever...Keep her!" Dimka then quickly walks away.'		
 		
 			act 'Thank Niko':
-				cls
+				*clr & cla
 				dimafilm = 0
 				DimaRudeBlock = 1
 				minut += 5

+ 111 - 208
locations/NikoEv2.qsrc

@@ -19,12 +19,11 @@ if $ARGS[0] =  'Park':
 		minut += 10
 		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/avatars/<<week>>.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/park/shady.jpg"></center>'
 		'"I figured out a great way to make money fast, just bear with me." You sigh then say, "Alright what do I need to do exactly?" Niko replies, "Just follow me." Niko leads you through the park then behind the cinema. When you both arrive then you see two men looking at you with a lustful gaze while rubbing on their crotches. Niko stops you for a few seconds then says, "Listen <<$pcs_firstname>>, Those guys over there are going to help us by giving us money, but they kind of, need you to do something first." You look back at Niko with a frown, "Do I have to have sex with them?" Niko wraps his arm around your neck, "You only need to suck them off. That''s all."'
 		*nl
 		'You lower your head, as you reply, "I don''t want to please anyone but you Niko." Niko rubs your cheek, as he replies, "You will be pleasing me by doing this. The money you earn will go toward restoring your reputation. After you''re done then you and I could head back to my place, for some "quality time," Doesn''t that sound good?"'
-		*nl
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/park/shady.jpg"></center>'
+
 
 		act 'Okay':
 			cls
@@ -34,9 +33,7 @@ if $ARGS[0] =  'Park':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/smile3.jpg"></center>'
 			'You give Niko a forced smile as you reply, "Okay, I''ll do it for you." Niko gives you a warm smile as he responds, "That''s my girl, so beautiful, loving, daring, and smart." You both continue walking toward the two men. As you both arrive, one of the men says, "She looks good." He then reaches out to touch you, but his hand is pushed away by Niko. "You need to pay up before you start touching." The guy chuckles, "Of course, of course. Where is my head?" He then nods to the other man, who reaches into his pocket then gives Niko some ruble which Niko counts before nodding to the men then taking a step back, signaling the men to use you.'
 			*nl
-			'The men begin fondling your breasts, as they kiss your neck. <font color=#FF00FF>This feels so wrong, but Niko needs me to do this. He is counting on me. I must not let him down. I won''t let you down Niko.</font> One of the men takes off your shirt then throws it to the ground. Niko immediately picks it up. One of the men begins pushing you to your knees.'
-			*nl
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/park/shady.jpg"></center>'
+			'The men begin fondling your breasts, as they kiss your neck. One of the men takes off your shirt then throws it to the ground. Niko immediately picks it up. One of the men begins pushing you to your knees.'
 
 			act 'Drop to your knees':
 				cls
@@ -46,8 +43,6 @@ if $ARGS[0] =  'Park':
 				'You drop down to your knees in front of them then one of the men shoves his penis into your mouth, as the other pulls out then begins stroking his. You close your eyes, and pretend that you are sucking Niko''s dick. Enjoying the warmth of it on your tongue, the occasional throbs as it leaks pre-cum into your mouth. The other man begins pulling at your hair which tells you that he wants his dick sucked too, You obediently switch dicks, and begin sucking the second man vigorously. After a few seconds, one of the men begins groaning, as he fills your mouth with his cum which you quickly spit out, not knowing if this guy has any STD''s or not.'
 				*nl
 				'The second man soon groans too then begins covering your hair in his cum. Once both men are done, they look down to you then say, "Wow you are really good, girl." Niko approaches you then says, "Great job Princess, I am very proud of you." One of the guys asks, "Can we have her again sometime?" Niko grins as he replies, "Sure you can, just call me when you have the money ready, and I''ll do the rest." The two guys high five, as they walk away.'
-				*nl
-				'<center><img <<$set_imgh>> src="images/pc/body/cum/cumhair/cumhair1.jpg"></center>'
 				gs 'cum_call', 'mouth'
 				gs 'cum_call', 'hair'
 				gs 'arousal', 'bj', 5
@@ -62,7 +57,7 @@ if $ARGS[0] =  'Park':
 					gs 'fame'
 					gs'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/park/walk1.jpg"></center>'
-					'Niko rubs the back of your head. "Let''s get you back to my place, for your reward." You quickly feel your heart warm up. <font color=#FF00FF>My reward? He is going to reward me? What could it be? I really want to know.</font> You then reply, "Okay, Let''s go." Niko rubs your neck as he responds, "So eager, aren''t we? Good." He then chuckles, as he begins walking you toward his house.'
+					'Niko rubs the back of your head. "Let''s get you back to my place, for your reward." You quickly feel your heart warm up. You then reply, "Okay, Let''s go." Niko rubs your neck as he responds, "So eager, aren''t we? Good." He then chuckles, as he begins walking you toward his house.'
 
 					act 'Follow Niko':gt 'NikoEv2', 'Home Date'
 				end
@@ -88,9 +83,7 @@ if $ARGS[0] =  'Reward':
 	gs 'fame'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/volkovhome/rooms/niko/bedroom.jpg"></center>'
-	'As soon as you enter the bedroom, you look around, but don''t see Niko. <font color=#FF00FF>Where did Niko go...</font> Niko grabs you from behind then begins passionately kissing, and licking your neck. You tilt your head back, and give in to Niko''s passionate embrace. Niko begins walking you toward the bed while removing your top. You help Niko undress you, as you both inch closer to the bed. After you are fully undressed then Niko lifts you up then drops you onto the bed. Niko immediately pounces on top of you then begins passionately kissing you, as he rubs his penis against your vagina.'
-	*nl
-	'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/kiss3.mp4"></video></center>'
+	'As soon as you enter the bedroom, you look around, but don''t see Niko. Niko grabs you from behind then begins passionately kissing, and licking your neck. You tilt your head back, and give in to Niko''s passionate embrace. Niko begins walking you toward the bed while removing your top. You help Niko undress you, as you both inch closer to the bed. After you are fully undressed then Niko lifts you up then drops you onto the bed. Niko immediately pounces on top of you then begins passionately kissing you, as he rubs his penis against your vagina.'
 	gs 'arousal', 'kiss', 5
 	gs'stat'
 
@@ -101,8 +94,6 @@ if $ARGS[0] =  'Reward':
 		gs'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vag.mp4"></video></center>'
 		'You spread your legs and Niko immediately rams his penis inside of you, causing a jolt of pleasure. You scream out as Niko begins pumping you firmly for a few seconds before wrapping his hand around your neck lightly, "Who''s your man?" You reply, "You are my man, Nikolai." He grins then asks, "Who do you belong too?" You reply, "Only you, Nikolai." He then replies, "Fuck yeah! Who''s my bitch?" You reply, "I''m your bitch Niko and I will always be your bitch!" Niko starts pumping you even faster, as he gets more excited. You tilt your head back, enjoying Niko''s hard cock; ramming inside you, His strong arms wrapped around you, His dominance as he rams his dick roughly into your vagina.'
-		*nl
-		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vag2.mp4"></video></center>'
 		gs 'arousal', 'vaginal', 5
 		gs'stat'
 
@@ -111,11 +102,9 @@ if $ARGS[0] =  'Reward':
 			minut += 5
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/cum/throat.mp4"></video></center>'
-			'Niko continues quickly thrusting his dick further inside of you until he suddenly pulls out of you then says, "<<$pcs_firstname>> open your mouth!" You obediently open your mouth, as Niko climbs on top of your chest then shoves his dick down your throat before groaning, filling you throat with his warm seed. Niko is having such a powerful orgasm that he doesn''t even notice that you are choking on his dick. <font color=#FF00FF>I''m chocking. Should I pull away? No! Niko is so happy right now. I must let him finish. I just want you to be happy Niko.</font> You endure the chocking, as your eyes tear up.'
+			'Niko continues quickly thrusting his dick further inside of you until he suddenly pulls out of you then says, "<<$pcs_firstname>> open your mouth!" You obediently open your mouth, as Niko climbs on top of your chest then shoves his dick down your throat before groaning, filling you throat with his warm seed. Niko is having such a powerful orgasm that he doesn''t even notice that you are choking on his dick. You endure the chocking, as your eyes tear up.'
 			*nl
 			'You do your best to hold back from gagging, not wanting to interrupt Niko''s orgasm. After Niko is finished, he catches his breath then says, "<<$pcs_nickname>> you are simply divine." You take a few seconds to catch you breath before leaning forward to kiss Niko.'
-			'<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/charmer1.jpg"></center>'
 			gs 'cum_call', 'mouth', $boy
 			gs 'arousal', 'vaginal', 5
 			gs 'arousal', 'end'
@@ -127,8 +116,6 @@ if $ARGS[0] =  'Reward':
 				'<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 lean forward to kiss Niko then the door suddenly slams open, as Yurik storms into the room. He grabs you by your hair then pulls you toward the door. Niko jumps out of the bed then shouts, "Yurik what the fuck? I told you that I would repay you as soon as..." Yurik cuts him off, "Shut it boy! I know better than to trust you. I''m taking my prize now, but don''t worry, I will return her when I''m done." Yurik continues pulling you through the hallway, as Niko follows closely behind while constantly trying to get Yurik to back down. "Come on Yurik...Just calm down man." Yurik replies, "I am calm." You then reach a bedroom with a partially open door. Yurik tosses you inside then pushes Niko back before closing the door in his face.'
-				'<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/sad2.jpg"></center>'
 
 				act 'Continue':
 					cls
@@ -136,8 +123,7 @@ if $ARGS[0] =  'Reward':
 					gs'stat'
 					'<center><b><h4><font color="red"><<"Yurik Volkov">></font></h4></b></center>'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/yurikev/intrude/yurik1.jpg"></center>'
-					'You fall to the ground then look back up at Yurik in fear. You can feel your whole body trembling. <font color=#FF00FF>What is he going to do to me. i''m not strong enough to resist him. He is so strong. What''s going to happen to me now?</font> Yurik wraps his hand around your neck, "Listen bitch, You will do whatever I say, when I say it. Do you understand?" You meekly nod, and he says, "Good, you know your place." Yurik lifts you up then drops you on the bed with your head at the foot of the bed then he quickly romoves his pants causing his 19 centimeter penis to spring out. <font color=#FF00FF>Ohh wow. his dick is so big. There is no way that will fit inside me.</font> Yurik approaches your face, as you lay still, in complete shock.'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/yurikev/sex/deek/deek.jpg"></center>'
+					'You fall to the ground then look back up at Yurik in fear. You can feel your whole body trembling. <font color=#FF00FF>What is he going to do to me. i''m not strong enough to resist him. He is so strong. What''s going to happen to me now?</font> Yurik wraps his hand around your neck, "Listen bitch, You will do whatever I say, when I say it. Do you understand?" You meekly nod, and he says, "Good, you know your place." Yurik lifts you up then drops you on the bed with your head at the foot of the bed then he quickly romoves his pants causing his 19 centimeter penis to spring out. Yurik approaches your face, as you lay still, in complete shock.'
 
 					act 'See what Yurik does':
 						cls
@@ -146,7 +132,6 @@ if $ARGS[0] =  'Reward':
 						'Yurik rams his dick into your mouth, forcing it down your throat. The force of his massive penis entering your throat is too much for you to take. You gag helplessly then begin pleading with Yurik. "Please sir, your dick is too big. It won''t fit." Yurik grunts before responding, "It will fit just, keep your mouth open, and shut up." Yurik re-aligns his penis with your mouth then shoves it back in. You do your best to relax your throat, knowing that you have no choice, but to let Yurik have his way with you.'
 						*nl
 						'You can feel Yurik''s hand rubbing on your sensitive parts. You close your eyes, trying to think of anything but the pain you feel, as Yurik roughly fucks your throat. You then open your eyes, and try looking around the room, but your vision is all blurry from the tears streaming from your eyes, so you close them again, waiting for this torment to be over.'
-						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/sex/throat/bed2.mp4"></video></center>'
 						gs 'arousal', 'bj', 5
 						gs'stat'
 
@@ -167,9 +152,7 @@ if $ARGS[0] =  'Reward':
 								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/charmer2.jpg"></center>'
-								'You begin coughing erratically, as Niko holds you in his arms, "<<$pcs_firstname>> please tell me that you are ok." Niko begins rubbing on your back gently. You continue coughing for almost a full minute, as Niko wipes away your tears. "I''m so sorry <<$pcs_firstname>>. My brother is such a brutish oaf. I will find a way to protect you from him, I promise." You finally finish coughing then return Niko''s hug, and begin crying in his arms, <font color=#FF00FF>He was so rough with me. I couldn''t stop him. He might do that again to me. Please no. Never again. Please.</font> Niko leads you toward the bathroom where he carefully, splashes some water on your face. He then washes your face before leading you back to his room.'
-								*nl
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/volkovhome/rooms/bathroom.jpg"></center>'
+								'You begin coughing erratically, as Niko holds you in his arms, "<<$pcs_firstname>> please tell me that you are ok." Niko begins rubbing on your back gently. You continue coughing for almost a full minute, as Niko wipes away your tears. "I''m so sorry <<$pcs_firstname>>. My brother is such a brutish oaf. I will find a way to protect you from him, I promise." You finally finish coughing then return Niko''s hug, and begin crying in his arms, Niko leads you toward the bathroom where he carefully, splashes some water on your face. He then washes your face before leading you back to his room.'
 
 								act 'Enter Niko''s room':
 									cls
@@ -178,8 +161,6 @@ if $ARGS[0] =  'Reward':
 									'<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/charmer3.jpg"></center>'
 									'As you enter the room, Niko lays you down then climbs in next to you. Niko begins running his fingers through your hair while staring into your eyes. You feel incredibly lightheaded, as your nerves have really drained you of any focused thought. You begin closing your eyes then feel your energy slowly fade away...'
-									*nl
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/home/bedroom/laying.jpg"></center>'
 
 									act 'Sleep':gt 'NikoDreams', 'Friends'
 								end
@@ -201,11 +182,9 @@ if $ARGS[0] =  'Niko Wake':
 	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/charmer2.jpg"></center>'
-	'You open your eyes, and see Niko with a concerned look on his face, he has his hand on your shoulder, shaking you. "<<$pcs_firstname>> are you alright? You looked like you were having an intense dream." You quickly look around the room then take several deep breaths, <font color=#FF00FF>It was a dream. It was only a dream. Oh my. I can''t keep doing this. Why does this keep happening to me? Why me?</font> Niko gives you a kiss on the forehead. "I''m so worried about you. Are you alright?" You nod slowly before saying, "I''m...I''m fine. I just had a nightmare, that''s all."'
+	'You open your eyes, and see Niko with a concerned look on his face, he has his hand on your shoulder, shaking you. "<<$pcs_firstname>> are you alright? You looked like you were having an intense dream." You quickly look around the room then take several deep breaths, Niko gives you a kiss on the forehead. "I''m so worried about you. Are you alright?" You nod slowly before saying, "I''m...I''m fine. I just had a nightmare, that''s all."'
 	*nl
 	'Niko continues kissing your forehead before responding, "I will do everything in my power to protect you. Just stay strong. Okay <<$pcs_firstname>>?" You nod your head again before saying, "Thank you Niko. I always feel safe in your arms." Niko smiles as he wraps his arms around you.'
-	'<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/charmer1.jpg"></center>'
 
 	act 'Relax':
 		cls
@@ -213,8 +192,6 @@ if $ARGS[0] =  'Niko Wake':
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/home/bedroom/relaxing1.jpg"></center>'
 		'After relaxing for a few minutes, You get up then stretch your body before saying, "I should head home. It is getting late." Niko places his hand on your shoulder. "Will you be alright on your own?" You reply, "Of course. I''ll see you tomorrow." You lean forward and kiss Niko on the cheek before getting up, getting dressed then leaving Niko''s house.'
-		'<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/sad2.jpg"></center>'
 
 		act 'Walk onto the street':gs 'clothing', 'wear_last_worn' & gt 'pavResidential'
 	end
@@ -242,31 +219,26 @@ if $ARGS[0] =  'Lunch Chat':
 			gs 'boyStat', 'A155'
 			minut += 5
 			gs'stat'
-			'<center><b><h4><font color="maroon"><<"Lavrenti Romanov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big155.jpg"></center>'
-			'As soon, as you enter the locker room, you see Lavrenti Romanov waiting, for you. Niko says, "Here she is." Lavrenti responds, "I heard some things about you <<$pcs_nickname>>. Are they true?" You lower your head then ask, "What have you heard?" Lavrenti replies, "I heard that you are Niko''s whore, and that you do anything Niko tells you too. At least that is what Niko said." You look to Niko, who has a wide smile on his face. Niko nods to you, "No need to be shy <<$pcs_nickname>>, tell him." You lower your head again then say, "Yes it''s true." Niko responds, "What''s true?" with a confident smile on his face.'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/charmer2.jpg"></center>'
+			'As soon, as you enter the locker room, you see some gopnik waiting, for you. Niko says, "Here she is." He responds, "I heard some things about you <<$pcs_nickname>>. Are they true?" You lower your head then ask, "What have you heard?" He replies, "I heard that you are Niko''s whore, and that you do anything Niko tells you too. At least that is what Niko said." You look to Niko, who has a wide smile on his face. Niko nods to you, "No need to be shy <<$pcs_nickname>>, tell him." You lower your head again then say, "Yes it''s true." Niko responds, "What''s true?" with a confident smile on his face.'
 			*nl
-			'You reply, "I am Niko''s whore." Lavrenti smiles, as he responds, "Good, well should we get started?" In your heart, you know what he wants, but you ask Niko anyway, "What do I need to do?" Niko replies, "Just suck his dick. It should be easy, for you." You know that you''ve come too far to go back now, so you approach Lavrenti then drop to your knees in front of him, as he unbuttons his pants."'
+			'You reply, "I am Niko''s whore." He smiles, as he responds, "Good, well should we get started?" In your heart, you know what he wants, but you ask Niko anyway, "What do I need to do?" Niko replies, "Just suck his dick. It should be easy, for you." You know that you''ve come too far to go back now, so you approach him then drop to your knees in front of him, as he unbuttons his pants."'
 
-			act 'Suck Lavrenti''s dick':
+			act 'Suck his dick':
 				cls
 				gs'stat'
 				'<center><video autoplay loop src="images/shared/sex/blowjob/blowjob1.mp4"></video></center>'
-				'You wrap your lips around Lavrenti''s dick then begin licking, and sucking it firmly, doing your best to pretend that you are sucking Niko''s dick. You begin focusing on the softness, and warmth of his Lavrenti''s dick in your mouth. You use your tongue to feel out the shape of his penis, brushing against your tongue, enjoying the occasional moan he lets out. <font color=#FF00FF>I must continue pleasing him. He need me to please him. He needs me.</font> You can feel yourself blushing as you continue sucking his dick more rapidly. You can tell by Lavrenti''s squirming that he is close to cumming.'
-				*nl
-				'<center><video autoplay loop src="images/shared/sex/blowjob/blowjob3.mp4"></video></center>'
+				'You wrap your lips around his dick then begin licking, and sucking it firmly, doing your best to pretend that you are sucking Niko''s dick. You begin focusing on the softness, and warmth of his his dick in your mouth. You use your tongue to feel out the shape of his penis, brushing against your tongue, enjoying the occasional moan he lets out.  You can feel yourself blushing as you continue sucking his dick more rapidly. You can tell by he''s squirming that he is close to cumming.'
 				gs 'arousal', 'bj', 5
 				gs'stat'
 
-				act 'Make Lavrenti cum':
+				act 'Make him cum':
 					cls
 					gs'stat'
 					'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1.11.mp4"></video></center>'
-					'<font color=#FF00FF>Now is my chance. The moment he and I have been waiting for. The time that he cums, for me. Cum for me, Lavrenti. Cum for me.</font> You quicken your pace then feel his penis throbbing in your mouth as he begins filling your mouth with his seed. You let Lavrenti''s cum fills your mouth, as you push it around with your tongue, enjoying the warmth, and texture of his cum, as it slides down your chin. Lavrenti catches his breath before looking down to you, "Wow <<$pcs_firstname>>, Niko wasn''t lying when he said that you were the best at that. I have to have you again sometime."'
+					'You quicken your pace then feel his penis throbbing in your mouth as he begins filling your mouth with his seed. You let his cum fill your mouth, as you push it around with your tongue, enjoying the warmth, and texture of his cum, as it slides down your chin. He catches his breath before looking down to you, "Wow <<$pcs_firstname>>, Niko wasn''t lying when he said that you were the best at that. I have to have you again sometime."'
 					*nl
-					'Niko responds, "If you have the cash then I have the girl for you. Speaking of cash..." Niko extends his hand. Lavrenti nods then says, "<<$pcs_nickname>> was worth every ruble." He then hands Niko some money then buttons his pant, and rubs your cheek before leaving the locker room.'
-					'<center><b><h4><font color="maroon"><<"Lavrenti Romanov">></font></h4></b></center>'
-					'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big155.jpg"></center>'
+					'Niko responds, "If you have the cash then I have the girl for you. Speaking of cash..." Niko extends his hand. He nods then says, "<<$pcs_nickname>> was worth every ruble." He then hands Niko some money then buttons his pant, and rubs your cheek before leaving the locker room.'
 					gs 'cum_call', 'mouth', $boy
 					gs 'arousal', 'bj', 5
 					gs 'arousal', 'end'
@@ -279,20 +251,16 @@ if $ARGS[0] =  'Lunch Chat':
 						gs 'boyStat', 'A189'
 						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/charmer1.jpg"></center>'
-						'You look up to Niko, who counts the money before saying, "You were outstanding <<$pcs_firstname>>. We will have the money we need in no time." Niko then kisses you on your forehead before saying, "Do you think that you can give me a quickie before we head back?" You eagerly nod, as you say, "Of course Niko, I''m always happy to please you." You quickly begin unbuttoning his pants then wrap your lips around his dick, licking, and sucking, as best you can, only wishing to please Niko.'
-						*nl
 						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj4.mp4"></video></center>'
+						'You look up to Niko, who counts the money before saying, "You were outstanding <<$pcs_firstname>>. We will have the money we need in no time." Niko then kisses you on your forehead before saying, "Do you think that you can give me a quickie before we head back?" You eagerly nod, as you say, "Of course Niko, I''m always happy to please you." You quickly begin unbuttoning his pants then wrap your lips around his dick, licking, and sucking, as best you can, only wishing to please Niko.'
 						gs 'arousal', 'bj', 5
 						gs'stat'
 
 						act 'Suck Niko''s dick':
 							cls
 							gs'stat'
-							'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj5.mp4"></video></center>'
-							'You can feel your heart all aflutter, as you continue sucking Niko''s dick. <font color=#FF00FF>Nikolai you are the only one I want to please. The only one love. Please realize that everything I do, I do for you. Please let me be the only one to please you. I will never fail you.</font> You can feel tears running down your cheeks, as you lose yourself in the moment. Niko suddenly begins groaning, as he fills your mouth with his warm seed which you try your best to swallow every drop of, wanting any part of Niko to stay inside you.'
-							*nl
 							'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow8.mp4"></video></center>'
+							'You can feel your heart all aflutter, as you continue sucking Niko''s dick. Niko suddenly begins groaning, as he fills your mouth with his warm seed which you try your best to swallow every drop of, wanting any part of Niko to stay inside you.'
 							gs 'cum_call', 'mouth', $boy
 							gs 'arousal', 'bj', 5
 							gs 'arousal', 'end'
@@ -315,49 +283,22 @@ if $ARGS[0] =  'Lunch Chat':
 			end
 		end
 	end
-
-	act 'I can''t right now':
-		cls
-		minut += 5
-		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/sad1.jpg"></center>'
-		'"I''m sorry to hear that. I will try to continue finding ways, for us to earn money. I might have something, for you tomorrow." You nod then say, "Thank you for all your help. I will talk to you tomorrow." You then give Niko a kiss on the cheek then walk away.'
-
-		act 'Go to the cafeteria':gt 'gschool_lunch', 'lunch'
-	end
-end
-
-if $ARGS[0] =  'Sonia Talk':
-	cls
-	gs'stat'
-	'<center><b><h4><font color=#ff00cc><<"<<$pcs_firstname>> [<<$pcs_nickname>>] <<$pcs_lastname>>">></font></h4></b></center>'
-	*pl '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-	'As you are leaving the cafeteria, you suddenly hear someone say, "I saw what you did in the locker room."'
-
-	act 'Turn around':
-		cls
-		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/soniasmile.jpg"></center>'
-		'You turn around to see Sonia Ivanko with a very pleased smile on her face. Sonia says, "I saw how much you were enjoying yourself back there." You lower your head, feeling ashamed. Sonia giggles as she says, "No need to be embarrassed. You are just getting closer to accepting your role. It took me 2 weeks to accept what I am." You tilt your head sideways, as you ask, "My role?" Sonia answers, "You are Niko''s whore of course, and don''t worry, that isn''t a bad thing, despite what some people may have you believe. When you accept your role then you will finally find peace of mind, and begin enjoying your new life." You take a few seconds to ponder what Sonia said.'
-
-		act 'Ponder':
-			cls
-			NikoEv = 15
+	gs 'willpower', 'prostitution', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'I can''t right now (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
 			minut += 5
 			gs'stat'
-			'<center><b><h4><font color=#ff00cc><<"<<$pcs_firstname>> [<<$pcs_nickname>>] <<$pcs_lastname>>">></font></h4></b></center>'
-			*pl '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-			'<font color=#FF00FF>So I am Niko''s whore, but what does that mean for me? Maybe it is my job to keep Niko happy. I want that. I can use my body to please him, and get satisfaction in the process. I don''t need to care what others think of me. I only need to care about what Niko thinks. I understand now. Ohh Niko, I am your whore, and I always will be...I feel so liberated. I don''t need to care about what anyone other than Niko thinks of me. I only need to follow his lead.</font>'
-			*nl
-			'Sonia''s smile grows even wider, "Judging by that peaceful smile, I assume that you have accepted your role. I am so proud of you. Please your man, and he will please you." Sonia gives you a kiss on the cheek then walks away, leaving you to think further.'
-			'<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/soniasmile.jpg"></center>'
+			'<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/sad1.jpg"></center>'
+			'"I''m sorry to hear that. I will try to continue finding ways, for us to earn money. I might have something, for you tomorrow." You nod then say, "Thank you for all your help. I will talk to you tomorrow." You then give Niko a kiss on the cheek then walk away.'
 
-			act 'Continue toward the hallway':gt 'gschool_lunch', 'break'
+			act 'Go to the cafeteria':gt 'gschool_lunch', 'lunch'
 		end
-	end
+	else
+		act 'I can''t right now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 end
 
 if $ARGS[0] =  'Lunch Chat 2':
@@ -374,40 +315,35 @@ if $ARGS[0] =  'Lunch Chat 2':
 		cls
 		gs'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/kiss1.mp4"></video></center>'
-		'Niko leans forward, and gives you a soft kiss before saying, "You''re always making me so proud of you." You give Niko a warm smile, causing him to give you another more passionate kiss. <font color=#FF00FF>His lips are so soft, and his kiss, so passionate. He really does love me. Oh Niko, keep kissing me. Please.</font> You surrender yourself to Niko''s firm passionate kiss, for what feels like a full minute. Niko then slowly pulls away then gently grabs your hand then leads you toward the locker room.'
-		*nl
-		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/kiss3.mp4"></video></center>'
+		'Niko leans forward, and gives you a soft kiss before saying, "You''re always making me so proud of you." You give Niko a warm smile, causing him to give you another more passionate kiss. You surrender yourself to Niko''s firm passionate kiss, for what feels like a full minute. Niko then slowly pulls away then gently grabs your hand then leads you toward the locker room.'
 
 		act 'Enter locker room':
 			cls
 			gs 'boyStat', 'A155'
 			minut += 5
 			gs'stat'
-			'<center><b><h4><font color="maroon"><<"Lavrenti Romanov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big155.jpg"></center>'
-			'As you enter the locker room you see Lavrenti waiting for you. You immediately know what he wants, and you turn to Niko then ask, "Do you want me to suck his dick again?" But you say it with a smile. Niko looks at you with a surprised, but pleased look on his face, "You really seem to be getting into this, good, but no he want to fuck you this time. Don''t worry, he will pay a lot more this time. so take off your clothes." You obediently nod then remove your clothes. Lavrenti watches you undress while removing his pants then stroking his penis.'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/charmer2.jpg"></center>'
+			'As you enter the locker room you see the gopnik again waiting for you. You immediately know what he wants, and you turn to Niko then ask, "Do you want me to suck his dick again?" But you say it with a smile. Niko looks at you with a surprised, but pleased look on his face, "You really seem to be getting into this, good, but no he want to fuck you this time. Don''t worry, he will pay a lot more this time. so take off your clothes." You obediently nod then remove your clothes. He watches you undress while removing his pants then stroking his penis.'
 			*nl
-			'After fully undressing, you walk up to Lavrenti then ask him, "How do you want me?" He points to the wall then says, "Face against the wall." You do as he says then feel his penis rubbing against your vagina, and you quickly brace yourself against the wall, as his penis rams inside of your vagina.'
+			'After fully undressing, you walk up to him then ask him, "How do you want me?" He points to the wall then says, "Face against the wall." You do as he says then feel his penis rubbing against your vagina, and you quickly brace yourself against the wall, as his penis rams inside of your vagina.'
 
-			act 'Let Lavrenti fuck you':
+			act 'Let him fuck you':
 				cls
 				gs 'clothing', 'strip'
 				gs'stat'
 				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/3doggy.mp4"></video></center>'
-				'You feel a jolt of pleasure, causing you to moan loudly, as Lavrenti continues fucking you. Lavrenti occasionally reach around, and squeezes your breast firmly, before giving your nipples an occasional pinch. After a few minutes of fucking, Lavrenti begin moaning loudly as his breath stops. <font color=#FF00FF>Oh shit! Is he about to cum inside me? What do I do? I''ll get pregnant.</font>'
+				'You feel a jolt of pleasure, causing you to moan loudly, as he continues fucking you. he occasionally reach around, and squeezes your breast firmly, before giving your nipples an occasional pinch. After a few minutes of fucking, he begin moaning loudly as his breath stops.'
 				gs 'arousal', 'vaginal', 5
 				gs'stat'
 
-				act 'Please don''t':
+				act 'He''s about to cum':
 					cls
 					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/nikomisc/avatars/4.jpg"></center>'
-					'Niko suddenly lunges forward then pulls Lavrenti off of you, as Lavrenti begins shooting his load all over your ass. Lavrenti spends a few seconds stroking his penis, trying to milk himself before Niko shouts, "What the fuck were you doing? Getting <<$pcs_firstname>> pregnant, wasn''t part of the deal!" Lavrenti quickly catches his breath before replying, "I''m sorry man. I got so lost in the moment. <<$pcs_firstname>> is fucking hot." Niko sneers at him. "I know she''s hot, but you told me earlier that you knew what you were doing, and this shit is unacceptable!"'
+					'Niko suddenly lunges forward then pulls him off of you, as he begins shooting his load all over your ass. He spends a few seconds stroking his penis, trying to milk himself before Niko shouts, "What the fuck were you doing? Getting <<$pcs_firstname>> pregnant, wasn''t part of the deal!" He quickly catches his breath before replying, "I''m sorry man. I got so lost in the moment. <<$pcs_firstname>> is fucking hot." Niko sneers at him. "I know she''s hot, but you told me earlier that you knew what you were doing, and this shit is unacceptable!"'
 					*nl
-					'Lavrenti backs off. "Whoa take it easy, I''ll pay double the amount we agreed on, okay?" Niko calms himself as he replies, "Alright fine, let''s just not do this again, alright?" Niko wraps his arm around Lavrenti''s neck then they both begin laughing it off. Lavrenti gives Niko the money he owes him then puts his pants back on before leaving the restroom.'
-					'<center><b><h4><font color="maroon"><<"Lavrenti Romanov">></font></h4></b></center>'
-					'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big155.jpg"></center>'
+					'He backs off. "Whoa take it easy, I''ll pay double the amount we agreed on, okay?" Niko calms himself as he replies, "Alright fine, let''s just not do this again, alright?" Niko wraps his arm around his neck then they both begin laughing it off. He gives Niko the money he owes him then puts his pants back on before leaving the restroom.'
 					gs 'cum_call', 'butt', $boy
 					gs 'arousal', 'vaginal', 5
 					gs'stat'
@@ -419,13 +355,10 @@ if $ARGS[0] =  'Lunch Chat 2':
 						gs 'boyStat', 'A189'
 						minut -= 10
 						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/avatars/<<week>>.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scene6.jpg"></center>'
 						'After Lavrenti leaves, Niko walks up to you then gives you a passionate kiss before saying, "You did great today. We made some good money today." You reply, "Thank you for protecting me back there Niko. I always feel so safe with you." Niko begins rubbing his hands over your body as he replies, "I will always keep my girl safe. No one will hurt you while I''m around. How about we have a little fun?" You let out a moan as Niko begins rubbing your clitoris. You look Niko in the eyes then say, "I''m always ready to please you."'
 						*nl
 						'Niko quickly pulls down his pants then pushes you against the wall where he rams his penis inside of your vagina, evoking a loud moan from you. Niko begins ramming his penis inside of your pussy, causing a gradual build of please to fill your body.'
-						*nl
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scene6.jpg"></center>'
 						gs 'arousal', 'foreplay', 5
 						gs 'arousal', 'kiss', 5
 						gs 'arousal', 'vaginal', 5
@@ -444,9 +377,7 @@ if $ARGS[0] =  'Lunch Chat 2':
 								NikoEv = 16
 								gs'stat'
 								'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/anal.mp4"></video></center>'
-								'Feeling so turned on, and blinded by the pleasure you scream out, "Cum inside me Niko! Please cum inside me!" Niko thrust one more time before shaking his head, and saying, "No!" Niko then pulls out of you and begins cumming on your ass, adding to Lavrenti''s cum on your ass. Niko catches his breath before saying, "You were amazing <<$pcs_firstname>>. So fucking hot." You give Niko a soft kiss before replying, "I''m always happy to please you Niko." Niko gives you a very pleased smile, as he responds, "I really made the right choice in choosing you. That''s for sure. I have some plans for making big money, and I would like you to meet me <font color=#FF00FF>after school</font> where we can discuss it further. Alright I should really head back now." Niko begins buttoning up his pants before leaving the room.'
-								*nl
-								'<center><video autoplay loop src="images/shared/sex/cum/cum5.mp4"></video></center>'
+								'Feeling so turned on, and blinded by the pleasure you scream out, "Cum inside me Niko! Please cum inside me!" Niko thrust one more time before shaking his head, and saying, "No!" Niko then pulls out of you and begins cumming on your ass, adding to Lavrenti''s cum on your ass. Niko catches his breath before saying, "You were amazing <<$pcs_firstname>>. So fucking hot." You give Niko a soft kiss before replying, "I''m always happy to please you Niko." Niko gives you a very pleased smile, as he responds, "I really made the right choice in choosing you. That''s for sure. I have some plans for making big money, and I would like you to meet me after school where we can discuss it further. Alright I should really head back now." Niko begins buttoning up his pants before leaving the room.'
 								gs 'cum_call', 'butt', $boy
 								gs 'arousal', 'vaginal', 5
 								gs 'arousal', 'end'
@@ -460,33 +391,22 @@ if $ARGS[0] =  'Lunch Chat 2':
 			end
 		end
 	end
+	gs 'willpower', 'prostitution', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'I can''t right now (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			minut += 5
+			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/sad1.jpg"></center>'
+			'"I''m sorry to hear that. I will try to continue finding ways, for us to earn money. I might have something, for you tomorrow." You nod then say, "Thank you for all your help. I will talk to you tomorrow." You then give Niko a kiss on the cheek then walk away.'
 
-	act 'I can''t right now':
-		cls
-		minut += 5
-		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/sad1.jpg"></center>'
-		'"I''m sorry to hear that. I will try to continue finding ways, for us to earn money. I might have something, for you tomorrow." You nod then say, "Thank you for all your help. I will talk to you tomorrow." You then give Niko a kiss on the cheek then walk away.'
-
-		act 'Enter the cafeteria':gt 'gschool_lunch', 'lunch'
-	end
-end
-
-if $ARGS[0] =  'Julia Talk':
-	cls
-	NikoEv = 17
-	minut += 5
-	gs'stat'
-	'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/love/sad1.jpg"></center>'
-	'As you are leaving the cafeteria, you bump into Julia Milov, she quickly says, "Oh <<$pcs_firstname>>. How are you doing? I''ve been really worried about you. I asked my mother about how to stop repeated nightmares, and she gave me 2 dissolvable tablets to give you. They are designed to help ease..." You place your hand on Julia''s shoulder then say, "You don''t need to worry about me. I don''t get the nightmares anymore. I found the source of my nightmares, and faced it head on." Julia''s eyes light up,'
-	*nl
-	'"Really? That''s great! I was really worried that it would only get worst. Please let me know, if they come back." You rub her arm gently, as you reply, "I will. Thank you Julia. You are very sweet." Julia blushes, as she says, "I''m...just happy to help." She then waves, as she walk away while looking back at you.'
-	'<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 'Continue toward the hallway':gt 'gschool_lunch', 'break'
+			act 'Go to the cafeteria':gt 'gschool_lunch', 'lunch'
+		end
+	else
+		act 'I can''t right now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 end
 
 if $ARGS[0] =  'Events':
@@ -522,8 +442,6 @@ if $ARGS[0] =  'Diner 1':
 		'Niko approaches one of the bikers sitting in the corner, and says to the biker, "Riding a bike all day must be tough work, I bet you could use some relief, right about now." The biker stares at Niko with a very angry look on his face. "You''re cruising for a bruising kid." Niko looks puzzled. "So you aren''t interested?"'
 		*nl
 		'the biker responds, "Of course I''m not interested because I''m not a fucking faggot!" Niko pauses for a second then bursts into laughter. "Oh  no. i didn''t mean....I meant my girl here, will take care of you...for a price of course." The biker chuckles for a few seconds before responding. "I see now. I thought you were hitting on me, kid. You''re lucky you weren''t, but let me take a look at her."'
-		*nl
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/npc/1.jpg"></center>'
 
 		act 'Let the biker examine you':
 			cls
@@ -539,11 +457,9 @@ if $ARGS[0] =  'Diner 1':
 				minut += 5
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/1/bj1.jpg"></center>'
-				'You walk in front of him before dropping to your knees then wrapping your lips around his dick. You begin licking, and sucking his dick, doing your best to please him. The man begins moaning loudly. <font color=#FF00FF>This man is enjoying this so much. It must have been a long time, if ever, that this man has received a woman''s touch. I may even be his first. I must do my best to make this his best day ever. He will remember me forever.</font> You increase the pace while seeing him fidgeting. After a few more seconds, the man says, "Oh fuck girrrrrl!" The man then begins squirming, as he sprays his load into your mouth, you look up at the biker, and see an adoring look on his face, as he looks down at you.'
+				'You walk in front of him before dropping to your knees then wrapping your lips around his dick. You begin licking, and sucking his dick, doing your best to please him. The man begins moaning loudly. <font color=#FF00FF>This man is enjoying this so much. It must have been a long time, if ever, that this man has received a woman''s touch. I may even be his first. I must do my best to make this his best day ever. He will remember me forever.</font> You increase the pace while seeing him fidgeting. After a few more seconds, the man says, "Oh fuck girrrrrl!" The man then begins squirming, as he sprays his load into your mouth and on your face, you look up at the biker, and see an adoring look on his face, as he looks down at you.'
 				*nl
-				'You give him a friendly smile, as the cum leaks from your mouth. The biker says, "You are an amazing girl. You were definitely worth every ruble." You give the tip of the mans penis a kiss before he buttons his pants then gives you a wink before leaving the restroom. You wait for him to leave before spitting out the cum into the sink then shortly follow him out of the restroom.'
-				*nl
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/1/bjcum1.jpg"></center>'
+				'You give him a friendly smile, as the cum leaks from your mouth. The biker says, "You are an amazing girl. You were definitely worth every ruble." You give the tip of the mans penis a kiss before he buttons his pants then gives you a wink before leaving the restroom.'
 				gs 'cum_call', 'face'
 				gs 'arousal', 'bj', 5
 				gs 'arousal', 'end'
@@ -554,9 +470,7 @@ if $ARGS[0] =  'Diner 1':
 					minut += 5
 					gs'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/npc/1.jpg"></center>'
-					'You see the biker shake hands with Niko then give him the money. Niko counts the money then gives the biker an approving nod before the biker takes his seat again. Niko turns to you, and says, "Good job <<$pcs_nickname>>. We are making some good progre..." A nearby trucker begins examining your face before shouting out, "Is that what I think it is? Hey guys look at this girl. She is walking around with cum plastering her face!" You freeze in place. <font color=#FF00FF>Oh shit! I forgot to wash up. How did I forget that? I''m walking around with cum leaking off my chin. How could I forget?</font> the truckers, and bikers in the room surround you then begin talking to each other.'
-					*nl
-					'<center><img <<$set_imgh>> src="images/pc/body/cum/cumface/blonde/15.jpg"></center>'
+					'You see the biker shake hands with Niko then give him the money. Niko counts the money then gives the biker an approving nod before the biker takes his seat again. Niko turns to you, and says, "Good job <<$pcs_nickname>>. We are making some good progre..." A nearby trucker begins examining your face before shouting out, "Is that what I think it is? Hey guys look at this girl. She is walking around with cum plastering her face!" You freeze in place. The truckers, and bikers in the room surround you then begin talking to each other.'
 
 					act 'Listen to them':
 						cls
@@ -568,7 +482,7 @@ if $ARGS[0] =  'Diner 1':
 						'Trucker1: A slut huh? I wouldn''t mind trying out her services.'
 						'Biker3: I wonder how much she''s chargin''?'
 						*nl
-						'Niko chuckles, as he replies, "She is my girl, and it will be 2000 <b>₽</b>, per customer." All of the truckers, and bikers begin lining up in front of Niko giving him money, before approaching you. <font color=#FF00FF>Am I about to have sex with all these men? How can I satisfy that many men? I don''t know if I can even handle that.</font> The men begin undressing you, as they roughly finger your holes. You close your eyes, as one of the men pushes you down on your knees, as another shoves his dick into your mouth.'
+						'Niko chuckles, as he replies, "She is my girl, and it will be 2000 <b>₽</b>, per customer." All of the truckers, and bikers begin lining up in front of Niko giving him money, before approaching you. The men begin undressing you, as they roughly finger your holes. You close your eyes, as one of the men pushes you down on your knees, as another shoves his dick into your mouth.'
 
 						act 'Suck their dicks':
 							cls
@@ -581,8 +495,6 @@ if $ARGS[0] =  'Diner 1':
 							'Trucker1: This girl is smokin'' hot. I hope she comes around here more often.'
 							'Waiter: Oh she can cum around here as much, as she wants.'
 							'The guys begin laughing as the man who''s dick you are sucking groans, giving you barely enough time to pull his penis out of your mouth where it covers your face with his warm cum. You feel the man''s cum dripping down your face, as another biker approaches you then takes a close look at you before saying, "I''m not sticking my dick in her cum covered mouth." He then lifts you up, and places you down on a nearby stool.'
-							*nl
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/gang/2.jpg"></center>'
 							gs 'cum_call', 'face'
 							gs 'arousal', 'bj', 5
 							gs 'arousal', 'bj', 5
@@ -602,12 +514,8 @@ if $ARGS[0] =  'Diner 1':
 								*nl
 								if sexcontra >= 3 or protect >= 2:
 									'You close your eyes, and only focus on the pleasure building up inside you. The man fucking you, suddenly groans, and you can feel his warm seed filling the condom inside you. The man continues thrusting, trying to milk himself dry inside of you. Another trucker approaches you then says "Looks like that hole is all used up. I guess I will have to take this one." The man rubs his dick against your anus.'
-									*nl
-									'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
 								else
 									'You close your eyes, and only focus on the pleasure building up inside you. The man fucking you, suddenly groans, and you can feel his warm seed filling your pussy. The man continues thrusting inside you, trying to milk himself dry inside of you. Another trucker approaches you then says "Looks like that hole is all used up. I guess I will have to take this one." The man rubs his dick against your anus.'
-									*nl
-									'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/cum/cum5.mp4"></video></center>'
 								end
 								gs 'cum_call'
 								gs 'arousal', 'vaginal', 5
@@ -619,9 +527,7 @@ if $ARGS[0] =  'Diner 1':
 									minut -= 5
 									gs'stat'
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/gang/4.jpg"></center>'
-									'The man suddenly shoves his dick into your ass, causing a surge of pain to fill your ass. You scream out in pain, as Niko shouts, "Hey take it easy! She is not a fucking blow up doll!" The man nods then gives your ass a few seconds to adjust to his dick before casually fucking it. <font color=#FF00FF>That man was so rough, but Niko...My Niko protected me like he said he would.</font> As the man continues fucking your ass, another man grabs your head then turns it to face a third man''s dick which you immediately wrap your lips around before licking, and sucking it eagerly. The pain in your ass fades, as pleasure takes its place. You close your eyes, and submit to the pleasure when another man approaches you.'
-									*nl
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/gang/5.jpg"></center>'
+									'The man suddenly shoves his dick into your ass, causing a surge of pain to fill your ass. You scream out in pain, as Niko shouts, "Hey take it easy! She is not a fucking blow up doll!" The man nods then gives your ass a few seconds to adjust to his dick before casually fucking it. As the man continues fucking your ass, another man grabs your head then turns it to face a third man''s dick which you immediately wrap your lips around before licking, and sucking it eagerly. The pain in your ass fades, as pleasure takes its place. You close your eyes, and submit to the pleasure when another man approaches you.'
 									gs 'arousal', 'bj', 5
 									gs 'arousal', 'anal', 5
 									gs'stat'
@@ -636,8 +542,6 @@ if $ARGS[0] =  'Diner 1':
 										else
 											'The man shoves his dick into your vagina at the same time that the man fucking your ass cums, filling your ass with his warm seed. Shortly after the man leaves, another takes his place, fucking your ass, so now you have both of your holes being fucked simultaneously. You moan loudly, fully submitting to the pleasure of the men''s big hard dicks, fucking both of your holes. As you are moaning another man shoves his dick in your mouth, almost gagging you.'
 										end
-										*nl
-										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/diner/gang/7.jpg"></center>'
 										gs 'cum_call', 'anus'
 										gs 'arousal', 'bj', 5
 										gs 'arousal', 'anal', 5
@@ -663,8 +567,6 @@ if $ARGS[0] =  'Diner 1':
 												*nl
 												'You look around to see who is next when you notice that everyone is sitting down, chatting with each other, as if nothing had happened. Niko helps you onto your feet then says, "You did amazing today! I am so proud of you. Get washed up then I will take you home, but don''t worry. I will give you a nice reward tomorrow." You meekly nod, as Niko walks you to the bathroom.'
 											end
-											*nl
-											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/gang/cum/cum2.jpg"></center>'
 											gs 'cum_call', 'face'
 											gs 'arousal', 'bj', 5
 											gs 'cum_call', 'anus'
@@ -685,17 +587,22 @@ if $ARGS[0] =  'Diner 1':
 			end
 		end
 	end
+	gs 'willpower', 'prostitution', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'I can''t right now (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			minut += 5
+			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/sad1.jpg"></center>'
+			'"That sounds great, but I really need to be somewhere very soon." Niko shrugs, as he replies "Oh well. I guess it could wait, for another day. Visit me here when you are ready." You wave at Niko, and he returns the wave, as you walk away.'
 
-	act 'I can''t go right now':
-		cls
-		minut += 5
-		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/avatars/<<week>>.jpg"></center>'
-		'"That sounds great, but I really need to be somewhere very soon." Niko shrugs, as he replies "Oh well. I guess it could wait, for another day. Visit me here when you are ready." You wave at Niko, and he returns the wave, as you walk away.'
-
-		act 'Walk away':gt 'gschool_grounds', 'main'
-	end
+			act 'Walk away':gt 'gschool_grounds', 'main'
+		end
+	else
+		act 'I can''t right now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 end
 
 if $ARGS[0] =  'Diner Washup':
@@ -727,8 +634,6 @@ if $ARGS[0] =  'Diner Exit':
 	'You walk out of the diner to find Niko waiting for you. "You did great today <<$pcs_nickname>>. I am so proud of you. Here is your share of the profits." Niko hands you 2400 <b>₽</b> You look up to Niko then say, "I thought that you would give me half. There were at least six men in there." Niko places his hand on your shoulder with a sympathetic look on his face. "I wanted to split it half way, but it would take us too long to pay up on that dept. You don''t want your reputation to remain this way, do you?" You lower your head, as you reply. "I don''t..I''m sorry. I was just being greedy."'
 	*nl
 	'Niko wraps his arm around your neck then replies, "No need to apologize. I will always look after you. I love you <<$pcs_firstname>>." You look up to him with a wide smile then kiss him passionately for a minute. Niko then takes you home while chatting with you the whole way there.'
-	*nl
-	'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/kiss2.mp4"></video></center>'
 
 	act 'Enter apartment':gt 'korrPar'
 end
@@ -747,7 +652,7 @@ if $ARGS[0] =  'Reward 2':
 		minut += 10
 		gs'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/kiss3.mp4"></video></center>'
-		'As soon, as you enter Niko''s house he pulls you toward him then gives you another passionate kiss, as he begins undressing you. <font color=#FF00FF>Oh his kisses are so passionate. He wants me so bad. I want him too. Please take me Nikolai. Take me!</font> Niko finishes undressing you then begins removing his clothes, as you help him undress. Niko pulls you to the bedroom then pushes you onto the bed.'
+		'As soon, as you enter Niko''s house he pulls you toward him then gives you another passionate kiss, as he begins undressing you. Niko finishes undressing you then begins removing his clothes, as you help him undress. Niko pulls you to the bedroom then pushes you onto the bed.'
 
 		act 'Lay back':
 			cls
@@ -762,11 +667,9 @@ if $ARGS[0] =  'Reward 2':
 			act 'Suck Niko''s dick':
 				cls
 				gs'stat'
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/lick1.mp4"></video></center>'
-				'You raise to your knees, and crawl up to Niko then lightly grip the shaft of his penis then lick up the shaft to the top where you gently kiss the tip of Niko''s penis while staring into his eyes to let him know how much he mean to you. Niko places his hand on your face, "You are so beautiful <<$pcs_firstname>>, the perfect girl." You can feel your heart beating faster, as Niko''s loving words warm your rapidly beating heart.'
-				'You begin sucking on Niko''s dick. <font color=#FF00FF>Oh Niko you are so perfect. I only want to please you. To see you happy. To give you the bliss that you give me. I love you Nikolai.</font> Niko tilts his head back, as he lets out a light moan before looking down to you then saying, "<<$pcs_nickname>> come here." He beckons you to come closer.'
-				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/bj.mp4"></video></center>'
+				'You raise to your knees, and crawl up to Niko then lightly grip the shaft of his penis then lick up the shaft to the top where you gently kiss the tip of Niko''s penis while staring into his eyes to let him know how much he mean to you. Niko places his hand on your face, "You are so beautiful <<$pcs_firstname>>, the perfect girl." You can feel your heart beating faster, as Niko''s loving words warm your rapidly beating heart.'
+				'You begin sucking on Niko''s dick. Niko tilts his head back, as he lets out a light moan before looking down to you then saying, "<<$pcs_nickname>> come here." He beckons you to come closer.'
 				gs 'arousal', 'bj', 5
 				gs'stat'
 
@@ -777,8 +680,6 @@ if $ARGS[0] =  'Reward 2':
 					'You crawl up to Niko''s face then give him a passionate kiss, as you grab onto his penis, and guide it inside of your vagina. You begin thrusting yourself on top of Niko''s dick, pushing it deeper inside you. Niko suddenly grabs onto your back then kisses you more firmly while pushing himself deeper inside you. After a few seconds, Niko ends the kiss to catch his breath, and you take this time to look him in the eyes, as you say, "I love you Nikolai. I love you with all my heart, and every fiber of my being."'
 					*nl
 					'Niko has a guilty look on his face, as he says, "I love you too <<$pcs_firstname>>. You a very precious to me." You continue staring into Niko''s eyes, as he continues thrusting his penis inside of you. Niko''s grunts, as he says, "I have to pull out now."'
-					*nl
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/cowgirlkiss.mp4"></video></center>'
 					gs 'arousal', 'vaginal', 5
 					gs'stat'
 
@@ -822,8 +723,6 @@ if $ARGS[0] =  'Yurik BJ':
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/sex/abuse/slap1.mp4"></video></center>'
 			'Yurik suddenly give you a firm, but not very powerful slap, as he says, "Hey don''t go fucking around down there. I told you to suck, not play with my dick, so get back to sucking." You meekly nod then continue sucking his dick. After a few seconds, Yurik looks down to you, and says, "You don''t need to worry girl. You''re doing good." You suddenly feel a lot more confident, knowing that he actually does enjoy what you are doing for him. After a few seconds, you can hear Yurik breathing loudly then he begins rubbing on your head.'
-			*nl
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/sex/bj/bj1.mp4"></video></center>'
 			gs 'arousal', 'bj', 5
 			gs'stat'
 
@@ -831,7 +730,7 @@ if $ARGS[0] =  'Yurik BJ':
 				cls
 				minut += 5
 				gs'stat'
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bedroom/sex/bj2.mp4"></video></center>'
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/sex/bj/bj1.mp4"></video></center>'
 				'You quicken your pace then suddenly Yurik groans, as he begins pumping your mouth full of his warm cum which you do your best to swallow every drop of. After Yurik is spent, he says to you, "I''m done girl. You can go back to Niko now." You get up then start walking away when you hear Yurik say, "And good job girl." You walk back up the stairs with a smile on your face.'
 				gs 'cum_call', 'mouth', $boy
 				gs 'arousal', 'bj', 5
@@ -869,8 +768,6 @@ if $ARGS[0] =  'Diner 2':
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/park/walk1.jpg"></center>'
 		'Niko says, "Excellent, today we a going back to the diner to make a lot of money. We are making great progress, and I would like us to keep it up." You give Niko a nervous smile then he places his hands on your cheeks. "Don''t worry <<$pcs_nickname>>, I will make sure that the customer only go one, or two at a time. No more group activities, unless you are cool with it." You give Niko a grateful nod, as he takes your hand then leads you toward the diner while you both chat about various topic on the way.'
-		*nl
-		'<center><img <<$set_imgh>> src="images/locations/highway/borisdiner/exterior1.jpg"></center>'
 
 		act 'Enter diner':
 			cls
@@ -913,17 +810,22 @@ if $ARGS[0] =  'Diner 2':
 			end
 		end
 	end
+	gs 'willpower', 'prostitution', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'I can''t right now (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			minut += 5
+			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/sad1.jpg"></center>'
+			'"That sounds great, but I really need to be somewhere very soon." Niko shrugs, as he replies "Oh well. I guess it could wait, for another day. Visit me here when you are ready." You wave at Niko, and he returns the wave, as you walk away.'
 
-	act 'I can''t go right now':
-		cls
-		minut += 5
-		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/avatars/<<week>>.jpg"></center>'
-		'"That sounds great, but I really need to be somewhere very soon." Niko shrugs, as he replies "Oh well. I guess it could wait for another day. Visit me here when you are ready." You wave at Niko, and he returns the wave, as you walk away.'
-
-		act 'Walk away':gt 'gschool_grounds', 'main'
-	end
+			act 'Walk away':gt 'gschool_grounds', 'main'
+		end
+	else
+		act 'I can''t right now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 end
 
 if $ARGS[0] =  'Diner Exit 2':
@@ -945,8 +847,6 @@ if $ARGS[0] =  'Diner Exit 2':
 		'<center><b><h4><font color=#E600FB><<"Lera Tsarev & Lena Kotov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/bully/park/1.jpg"></center>'
 		'You look back and recognize the ones following you, as Lena Kotov, and Lera Tsarev. They simply stare at you while occasionally whispering to each other. They don''t seem to care that you notice them, and occasionally give you lude gestures while continuing to follow you home. You try to ignore them, as you continue your conversation with Niko. Once you arrive at your apartment, Niko grabs onto your shoulder then flips you around before giving you a very passionate kiss. Afterward Niko whispers in your ear, "I love you <<$pcs_firstname>>. Never forget it." You can feel your face growing flushed, as you reply, "I love you too Nikolai. I love you with all my heart." You then give him another passionate kiss before backing into your apartment.'
-		*nl
-		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev2/endkiss.mp4"></video></center>'
 
 		act 'Enter apartment':gt 'korrPar'
 	end
@@ -968,8 +868,6 @@ if $ARGS[0] =  'Diner Slut':
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/park/walk1.jpg"></center>'
 		'Niko says, "You''re always making me so proud. Let''s get going." Niko then takes your hand, and leads you toward the diner while you both chat about various topic on the way.'
-		*nl
-		'<center><img <<$set_imgh>> src="images/locations/highway/borisdiner/exterior1.jpg"></center>'
 
 		act 'Walk to Diner':
 			cls
@@ -985,17 +883,22 @@ if $ARGS[0] =  'Diner Slut':
 			act 'Wait for customers':gt 'NikoSlut', 'Customers'
 		end
 	end
+	gs 'willpower', 'prostitution', 'resist', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'I can''t right now (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'resist'
+			minut += 5
+			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/sad1.jpg"></center>'
+			'"That sounds great, but I really need to be somewhere very soon." Niko shrugs, as he replies "Oh well. I guess it could wait, for another day. Visit me here when you are ready." You wave at Niko, and he returns the wave, as you walk away.'
 
-	act 'I can''t go right now':
-		cls
-		minut += 5
-		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/avatars/<<week>>.jpg"></center>'
-		'"That sounds great, but I really need to be somewhere very soon." Niko shrugs, as he replies "Well you got to do, what you got to do. Feel free to visit me here when you feel ready to make some cash." You wave at Niko, and he returns the wave, as you walk away.'
-
-		act 'Walk away':gt 'gschool_grounds', 'main'
-	end
+			act 'Walk away':gt 'gschool_grounds', 'main'
+		end
+	else
+		act 'I can''t right now (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end	
 end
 
 --- NikoEv2 ---------------------------------

+ 88 - 141
locations/NikoPayback.qsrc

@@ -1,9 +1,9 @@
 # NikoPayback
 
 menu_off = 1
-
+!!needs to be expanded with options added to allow for willpower and a few more people to help Sveta added. 
 if $ARGS[0] = 'Payback':
-	cls
+	*clr & cla
 	NikoPayback_Day = daystart
 	NikoPayback = 2
 	minut += 5
@@ -12,7 +12,7 @@ if $ARGS[0] = 'Payback':
 	'As you are walking toward the hallway, you feel hands covering your mouth then you feel your ribs being struck, causing you to recoil in pain, as you are dragged into the nearby bathroom.'
 
 	act 'Continue':	
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/movies/restroom/men/scene.jpg"></center>'
 		if NikoVolkovQW = -1:
@@ -20,12 +20,9 @@ if $ARGS[0] = 'Payback':
 		else
 			'As soon as you reach the bathroom, you feel your shirt being pulled up, as someone whispers in your ear, "You have been running your fucking mouth, for far too long, and now I have a few other uses for it. You will now be my bitch, whether you like it or not." You recognize Niko''s voice, as he continues stripping you.'
 		end		
-		*nl
-		'<center><b><h4><font color="red"><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
 
 		act 'Plead':	
-			cls
+			*clr & cla
 			minut += 5
 			gs'stat'
 			'<center><b><h4><font color="red"><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -37,7 +34,7 @@ if $ARGS[0] = 'Payback':
 			end	
 
 			act 'I understand':	
-				cls
+				*clr & cla
 				minut += 5
 				gs'stat'
 				'<center><b><h4><font color="red"><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -46,7 +43,7 @@ if $ARGS[0] = 'Payback':
 				
 				if money >= 200:
 					act 'Money (200 <b>₽</b>)':	
-						cls
+						*clr & cla
 						money -= 200
 						minut += 5
 						gs'stat'
@@ -59,20 +56,18 @@ if $ARGS[0] = 'Payback':
 				end
 				
 				act 'Sex (Blowjob)':	
-					cls
+					*clr & cla
 					minut += 5
 					gs'stat'
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/bj1.mp4"></video></center>'
 					'You lower your head, as you slowly drop to your knees in front of Niko, he gives you a confident grin, as he begins unbuttoning his pants. You soon feel Niko''s penis rubbing against your lips, so you take a deep breath then wrap your lips around it, sucking it intently trying to make Niko cum, as quicly, as possible. Niko leans back while griping your head with one hand.'
 
 					act 'Make Niko cum':	
-						cls
+						*clr & cla
 						gs'stat'
-						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/bj2.mp4"></video></center>'
-						'You increase your pace as you look up at Niko, noticing how much he is enjoying your performance. You stare him in the eyes, as you hear him begin groaning. You suddenly feel Niko''s warm seed filling your mouth, one squirt at a time. You look up to Niko with his cum slowly leaking out of your mouth, Niko then looks down to you, and says, "What are you waiting for? Swallow my cum bitch!" You give Niko a meek nod then begin swallowing his cum, and after you finish, Niko pulls your head to the ground and says, "You missed a few drops, Lick it off the floor!" not wanting to anger Niko further, you obediently begin licking the last drops of cum off the floor. "Now that''s better, I''ll see you tomorrow. Remember what I said, and don''t ever try to avoid me."'	
-						*nl
 						'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/facial1.mp4"></video></center>'
-						
+						'You increase your pace as you look up at Niko, noticing how much he is enjoying your performance. You stare him in the eyes, as you hear him begin groaning. You suddenly feel Niko''s warm seed filling your mouth, one squirt at a time. You look up to Niko with his cum slowly leaking out of your mouth, Niko then looks down to you, and says, "What are you waiting for? Swallow my cum bitch!" You give Niko a meek nod then begin swallowing his cum, and after you finish, Niko pulls your head to the ground and says, "You missed a few drops, Lick it off the floor!" not wanting to anger Niko further, you obediently begin licking the last drops of cum off the floor. "Now that''s better, I''ll see you tomorrow. Remember what I said, and don''t ever try to avoid me."'	
+
 						act 'Stand up':gt 'FedorMisc', 'Restroom'
 					end	
 				end				
@@ -82,7 +77,7 @@ if $ARGS[0] = 'Payback':
 end
 
 if $ARGS[0] =  'Payback 2':
-	cls
+	*clr & cla
 	NikoPayback_Day = daystart
 	minut += 5
 	gs'stat'
@@ -91,7 +86,7 @@ if $ARGS[0] =  'Payback 2':
 	'You walk out of the cafeteria, and see Niko standing in the hallway on his phone.'
 	
 	act 'Approach Niko':	
-		cls
+		*clr & cla
 		npc_rel['A189'] += rand(1,5)
 		gs'stat'
 		'<center><b><h4><font color="red"><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
@@ -100,7 +95,7 @@ if $ARGS[0] =  'Payback 2':
 
 		if money >= 200:
 			act 'Money (200 <b>₽</b>)':	
-				cls
+				*clr & cla
 				NikoPayed = daystart
 				money -= 200
 				minut += 5
@@ -114,7 +109,7 @@ if $ARGS[0] =  'Payback 2':
 		end	
 		
 		act 'Sex':	
-			cls
+			*clr & cla
 			NikoPayed = daystart
 			minut += 5
 			gs'stat'
@@ -129,7 +124,7 @@ if $ARGS[0] =  'Payback 2':
 	act 'Try to avoid Niko':
 		VK = rand(1,3)
 		if VK = 1:
-			cls
+			*clr & cla
 			minut += 5
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool_hall01.jpg"></center>'
@@ -137,7 +132,7 @@ if $ARGS[0] =  'Payback 2':
 
 			act 'Continue':gt 'gschool_lunch', 'break'
 		else
-			cls
+			*clr & cla
 			npc_rel['A189'] -= 5
 			minut += 5
 			gs'stat'
@@ -150,7 +145,7 @@ if $ARGS[0] =  'Payback 2':
 end
 
 if $ARGS[0] =  'Payback 3':
-	cls
+	*clr & cla
 	NikoPayback_Sex = daystart
 	gs 'boyStat', 'A189'
 	minut += 5
@@ -160,7 +155,7 @@ if $ARGS[0] =  'Payback 3':
 	'After you enter the restroom, Niko smacks your ass then says, "Since you came here without any fuzz, I will let you choose how I fuck you today, so what will it be?"'
 			
 	act 'Blowjob':	
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/bj1.mp4"></video></center>'
 		'You drop down to your knees then begin unbuttoning Niko''s pants. Niko looks down at you with a confident grin, as you finish pulling down his pants. Niko rubs his dick against your lips, signaling you to suck on it. You wrap your lips around Niko''s dick then begin licking and sucking it firmly, not wanting to anger him. Niko then looks down at you and says, "Good girl. Keep it up." You continue sucking Niko''s dick at a moderate pace, not wanting to overdo it.'
@@ -168,7 +163,7 @@ if $ARGS[0] =  'Payback 3':
 		gs 'stat'	
 									
 		act 'Continue sucking':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/bj2.mp4"></video></center>'
 			'After a few more seconds, Niko begins moaning, as he runs his fingers through your hair before grabbing your head with both hands, and pushes his penis down your throat, as he begin spraying his warm seed down your throat. You try your best not to gag, as Niko continues to pump his warm cum down your throat while you swallow every drop of it. After Niko finishes, he looks down to you then says, "You are really good at that. I will see you again soon. Niko buttons his pants then walks out of the restroom."'
@@ -189,22 +184,19 @@ if $ARGS[0] =  'Payback 3':
 	
 	if pcs_vag = 0:
 		act 'Vaginal [<font color=#FF00FF>Lose Virginity</font>]':
-			cls
+			*clr & cla
 			gs'stat'
-			'You downcast your eyes as you tell Niko. "I''m a virgin but I don''t want to be one anymore." Niko recoils in shock before responding, "Wow you are? I guess I can help you with that. Thanks for offering." Niko then gently guides you toward the sink then undresses you from the waist down before unbuttoning his pants, and pressing his dick against you vagina. Niko whispers in your ear, "I will take this slow for you ok?" You gratefully nod as Niko slowly pushes his penis inside of your vagina, causing your hymen to stretch for his dick, and after a few seconds, you feel your hymen give. You can feel a slight pain in your vagina, as your hymen breaks, and is soon increase slightly when Niko thrusts his hips, pushing his penis deeper inside you, and fucking you at a moderate rate.'
-			*nl
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/virgin.mp4"></video></center>'
+			'You downcast your eyes as you tell Niko. "I''m a virgin but I don''t want to be one anymore." Niko recoils in shock before responding, "Wow you are? I guess I can help you with that. Thanks for offering." Niko then gently guides you toward the sink then undresses you from the waist down before unbuttoning his pants, and pressing his dick against you vagina. Niko whispers in your ear, "I will take this slow for you ok?" You gratefully nod as Niko slowly pushes his penis inside of your vagina, causing your hymen to stretch for his dick, and after a few seconds, you feel your hymen give. You can feel a slight pain in your vagina, as your hymen breaks, and is soon increase slightly when Niko thrusts his hips, pushing his penis deeper inside you, and fucking you at a moderate rate.'
 			gs 'arousal', 'vaginal', 5, 'sub'
 			gs 'arousal', 'end'
 			gs 'stat'	
 			
 			act 'Continue':
-				cls
+				*clr & cla
 				gs'stat'
 				'<center><video autoplay loop src="images/locations/pavlovsk/school/bathroom/voyvag.mp4"></video></center>'
-				'After a minute, all the pain fades and is replaced by pleasure. You try you best to give in to the pleasure. <font color=#FF00FF>Ohh this feel so good. I never thought that I would lose my virginity like this but I feel great. Niko may be an asshole but his dick feels so good inside me.</font> Niko begins fucking you harder before quickly pulling out of you then groaning, as he begin milking his penis over your ass. Squirt by squirt, Niko''s cum covers your asscheeks. Niko takes a few seconds to catch his breath before saying, "You were great <<$pcs_firstname>>, I can''t wait to fuck you again." Niko then buttons his pants before leaving the restroom.'
-				*nl
-				'<center><video autoplay loop src="images/shared/sex/cum/cum5.mp4"></video></center>'			
+				'After a minute, all the pain fades and is replaced by pleasure. You try you best to give in to the pleasure. Niko begins fucking you harder before quickly pulling out of you then groaning, as he begin milking his penis over your ass. Squirt by squirt, Niko''s cum covers your asscheeks. Niko takes a few seconds to catch his breath before saying, "You were great <<$pcs_firstname>>, I can''t wait to fuck you again." Niko then buttons his pants before leaving the restroom.'			
 				gs 'cum_call', 'butt', $boy
 				gs 'arousal', 'vaginal', 5, 'sub'
 				gs 'arousal', 'end'
@@ -219,21 +211,18 @@ if $ARGS[0] =  'Payback 3':
 		end
 	else
 		act 'Vaginal':	
-			cls
+			*clr & cla
 			gs'stat'
-			'You grab onto Niko''s hand then place it between your legs, as you say, "I want you to fuck my pussy." Niko''s eyes light up as he replies, "Good girl. That was just what I wanted to hear." Niko then begin undressing you before spinning you around then pulling you toward him. You can feel Niko penis pressed against your vagina then suddenly feel it enter you, causing a jolt of pleasure to fill your vagina. Niko lightly grips your neck as he pushes you down on his rock hard cock, filling your vagina almost completely with his dick. You close your eyes, and give in to the pleasure filling you, as Niko continues to fuck your pussy.'
-			*nl
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/vaginal1.mp4"></video></center>'
+			'You grab onto Niko''s hand then place it between your legs, as you say, "I want you to fuck my pussy." Niko''s eyes light up as he replies, "Good girl. That was just what I wanted to hear." Niko then begin undressing you before spinning you around then pulling you toward him. You can feel Niko penis pressed against your vagina then suddenly feel it enter you, causing a jolt of pleasure to fill your vagina. Niko lightly grips your neck as he pushes you down on his rock hard cock, filling your vagina almost completely with his dick. You close your eyes, and give in to the pleasure filling you, as Niko continues to fuck your pussy.'
 			gs 'arousal', 'vaginal', 5, 'sub'
 			gs 'stat'
 				
 			act 'Continue':	
-				cls
+				*clr & cla
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/vaginal2.mp4"></video></center>'
-				'Niko suddenly grabs onto your stomach and leg, lifting you up in the air, as he continues pushing you onto his hard penis. <font color=#FF00FF>Wow Niko is so strong, and his dick feels so amazing inside me. He may be an asshole, but he really knows how to fuck a girl.</font> You start moaning out loud, as Niko whispers in your ear. "You are really liking it, aren''t you <<$pcs_firstname>>." You turn to Niko then nod, and that seems to excite Niko, resulting in him greatly increasing his pace. Niko continues fucking you until he suddenly pulls out of you then begin rubbing his penis in between your thighs, milking his dick on the ground in front of you. After Niko catches his breath, he turns to you and says, "You are a great fuck <<$pcs_nickname>>. I''ll see you again soon." Niko buttons his pants before walking out of the restroom.'
-				*nl
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/thighs.mp4"></video></center>'			
+				'Niko suddenly grabs onto your stomach and leg, lifting you up in the air, as he continues pushing you onto his hard penis. You start moaning out loud, as Niko whispers in your ear. "You are really liking it, aren''t you <<$pcs_firstname>>." You turn to Niko then nod, and that seems to excite Niko, resulting in him greatly increasing his pace. Niko continues fucking you until he suddenly pulls out of you then begin rubbing his penis in between your thighs, milking his dick on the ground in front of you. After Niko catches his breath, he turns to you and says, "You are a great fuck <<$pcs_nickname>>. I''ll see you again soon." Niko buttons his pants before walking out of the restroom.'		
 				gs 'cum_call', 'legs', $boy
 				gs 'arousal', 'vaginal', 5, 'sub'
 				gs 'arousal', 'end'
@@ -249,21 +238,18 @@ if $ARGS[0] =  'Payback 3':
 	end	
 	
 	act 'Ride him':
-		cls
+		*clr & cla
 		gs'stat'
-		'You approach Niko then place your hand on his crotch, as you say, "I want to ride your cock, so why don''t you make yourself comfortable?" Niko''s eyes light up as he replies, "You really are a naughty little minx, aren''t you?" Niko then unbuttons his pants then sits on top of a nearby toilet. You quickly undress, before approaching Niko''s hard penis before aliening it with your vagina then pushing Niko''s dick inside you. Niko begins lightly moaning as you begin riding his hard cock. You begin moaning with NIko, feeling only his hard penis, pushing its way deeper inside you.'
-		*nl
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/ride.mp4"></video></center>'
+		'You approach Niko then place your hand on his crotch, as you say, "I want to ride your cock, so why don''t you make yourself comfortable?" Niko''s eyes light up as he replies, "You really are a naughty little minx, aren''t you?" Niko then unbuttons his pants then sits on top of a nearby toilet. You quickly undress, before approaching Niko''s hard penis before aliening it with your vagina then pushing Niko''s dick inside you. Niko begins lightly moaning as you begin riding his hard cock. You begin moaning with NIko, feeling only his hard penis, pushing its way deeper inside you.'
 		gs 'arousal', 'vaginal', 5, 'sub'
 		gs 'stat'
 				
 		act 'Continue':
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/trainstation/sex/bimbo.boy1,7.mp4"></video></center>'
-			'You begin riding his hard cock while closing your eyes, and focusing on the pleasure building up inside of you. Niko begins spanking your ass while saying to you, "You really seem to be getting the hang of this <<$pcs_nickname>>. Good girl." Niko begins breathing heavier for a few seconds before his breath stops, as Niko pushes you forward then pulls out of you, covering your ass with his seed. You let out a needed moan, as Niko seed covers your lower back. Niko finishes milking himself on your ass when he says, "You are getting better. Well you are all payed up for today. See you next time." Niko then smacks your ass before buttoning his pants then leaving the restroom.'
-			*nl
-			'<center><video autoplay loop src="images/shared/sex/cum/cum3.mp4"></video></center>'		
+			'You begin riding his hard cock while closing your eyes, and focusing on the pleasure building up inside of you. Niko begins spanking your ass while saying to you, "You really seem to be getting the hang of this <<$pcs_nickname>>. Good girl." Niko begins breathing heavier for a few seconds before his breath stops, as Niko pushes you forward then pulls out of you, covering your ass with his seed. You let out a needed moan, as Niko seed covers your lower back. Niko finishes milking himself on your ass when he says, "You are getting better. Well you are all payed up for today. See you next time." Niko then smacks your ass before buttoning his pants then leaving the restroom.'		
 			gs 'cum_call', 'butt', $boy
 			gs 'arousal', 'vaginal', 5, 'sub'
 			gs 'arousal', 'end'
@@ -278,7 +264,7 @@ if $ARGS[0] =  'Payback 3':
 	end		
 	
 	act 'Anal':	
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><video autoplay loop src="images/locations/pavlovsk/school/bathroom/voyanal.mp4"></video></center>'
 		'You lean forward then whisper in Niko''s ear, "I want you to fuck my ass." Niko''s eyes light up, as he replies, "I always knew that you were a wild girl. Let''s do this." He then gives your ass a firm smack, as he begins wetting his hand in the sink then lubing up his dick. You pulls down your pants then bend over, getting yourself ready for Niko. You close your eyes, and focus on Niko''s dick firmly pushing its way inside of your ass, evoking moans from you and Niko both.'
@@ -286,14 +272,12 @@ if $ARGS[0] =  'Payback 3':
 		gs 'stat'
 			
 		act 'Continue':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/anal1.mp4"></video></center>'
-			'Niko begins thrusting his dick deeper in your ass, as you lift your leg up, placing it on the nearby toilet seat, givng Niko better access. <font color=#FF00FF>Niko may be a fucking asshole, but he really does know how to fuck a girl...What are you saying <<$pcs_firstname>>? i can''t let myself enjoy this too much.</font> You continue staring into Niko''s eyes when they suddenly squint. Niko groans as he begins pumping your ass with his warm seed.' 
-			*nl
-			'You can feel his penis throbbing inside of you, filling you with a pleasant warmth. Niko catches his breath before saying, "You did good today. Keep it up." Niko smacks your ass before buttoning his pants then leaving the restroom.'
+			'Niko begins thrusting his dick deeper in your ass, as you lift your leg up, placing it on the nearby toilet seat, givng Niko better access. You continue staring into Niko''s eyes when they suddenly squint. Niko groans as he begins pumping your ass with his warm seed.' 
 			*nl
-			'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal1.mp4"></video></center>'		
+			'You can feel his penis throbbing inside of you, filling you with a pleasant warmth. Niko catches his breath before saying, "You did good today. Keep it up." Niko smacks your ass before buttoning his pants then leaving the restroom.'	
 			gs 'cum_call', 'anus', $boy
 			gs 'arousal', 'anal', 5, 'sub'
 			gs 'arousal', 'end'
@@ -309,7 +293,7 @@ if $ARGS[0] =  'Payback 3':
 end
 
 if $ARGS[0] =  'Payback 4':
-	cls
+	*clr & cla
 	NikoPayback_Sex = daystart
 	VK = rand(1,6)
 	gs 'boyStat', 'A189'
@@ -337,7 +321,7 @@ if $ARGS[0] =  'Payback 4':
 
 	if VK = 1:
 		act 'Blowjob':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/event/gif/bj3.mp4"></video></center>'
 			'You wrap your lips around Niko'' penis then begin sucking it firmly. Niko looks down to you then spits on your face before saying, "You are my fucking bitch! Don''t you ever forget that." You continue sucking his dick while trying to ignore Niko, as he occasionally spits in your face.'		
@@ -345,12 +329,10 @@ if $ARGS[0] =  'Payback 4':
 			gs 'stat'
 			
 			act 'Continue sucking':	
-				cls
+				*clr & cla
 				gs'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/event/gif/bj6.mp4"></video></center>'
-				'Niko grabs the back of your head then begins fucking your throat. You try to relax your throut as NIko continues fucking it. Niko says to you, "Remember <<$pcs_firstname>> this is your place. You are my fucking bitch and nothing more." You are too focused on not gagging to respond. After a few more seconds, Niko groans, filling your throat with his warm seed which you swallow as much of it as you can, knowing that you have no choice. Niko then buttons his pants and walks out of the restroom, without saying another word.'
-				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/yurikev/cum/throat6.mp4"></video></center>'
+				'Niko grabs the back of your head then begins fucking your throat. You try to relax your throut as NIko continues fucking it. Niko says to you, "Remember <<$pcs_firstname>> this is your place. You are my fucking bitch and nothing more." You are too focused on not gagging to respond. After a few more seconds, Niko groans, filling your throat with his warm seed which you swallow as much of it as you can, knowing that you have no choice. Niko then buttons his pants and walks out of the restroom, without saying another word.'
 				gs 'cum_call', 'mouth', $boy
 				gs 'arousal', 'bj', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
@@ -362,20 +344,16 @@ if $ARGS[0] =  'Payback 4':
 		
 	elseif VK = 2:		
 		act 'Open your mouth':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/piss1.mp4"></video></center>'
-			'You open your mouth and close your eyes, waiting for Niko to start. A few seconds later you feel warm liquid spraying in your face, filling your mouth, and getting in your nose. Niko shouts, "SWALLOW IT ALL BITCH!" You try your best not to gag, as you attempt to swallow all of him bitter tasting urine. You can''t keep your self from gagging as Niko continues shooting his urine down your throat. Niko suddenly rubs his penis against your lips before shoving it into your mouth.'
-			*nl
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/piss2.mp4"></video></center>'			
+			'You open your mouth and close your eyes, waiting for Niko to start. A few seconds later you feel warm liquid spraying in your face, filling your mouth, and getting in your nose. Niko shouts, "SWALLOW IT ALL BITCH!" You try your best not to gag, as you attempt to swallow all of him bitter tasting urine. You can''t keep your self from gagging as Niko continues shooting his urine down your throat. Niko suddenly rubs his penis against your lips before shoving it into your mouth.'			
 
 			act 'Suck Niko''s dick':	
-				cls
+				*clr & cla
 				gs'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/event/gif/bj1.mp4"></video></center>'
-				'You know exactly what he want, and begin sucking Niko''s dick, trying your best to get him off as quickly as possible, knowing that the sooner he finishes, the sooner you can wash up and leave. You lick and suck Niko''s dick while trying your best to ignore the rotten taste in your mouth and the mildly burning of Niko''s urine on your face. Niko looks down to you then says, "There you go <<$pcs_firstname>>. Keep behaving like this, and we will get along just fine." He then tilts his head back and begins moaning. Niko suddenly grabs the back of your head, and begin filling your throat with his warm cum, as you try your best to swallow every drop of it. After Niko finishes, he turn to you and says, "You are learning, Good keep it up." Niko then buttons his pants before leaving the restroom.'
-				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/swallow3.mp4"></video></center>'
+				'You know exactly what he want, and begin sucking Niko''s dick, trying your best to get him off as quickly as possible, knowing that the sooner he finishes, the sooner you can wash up and leave. You lick and suck Niko''s dick while trying your best to ignore the rotten taste in your mouth and the mildly burning of Niko''s urine on your face. Niko looks down to you then says, "There you go <<$pcs_firstname>>. Keep behaving like this, and we will get along just fine." He then tilts his head back and begins moaning. Niko suddenly grabs the back of your head, and begin filling your throat with his warm cum, as you try your best to swallow every drop of it. After Niko finishes, he turn to you and says, "You are learning, Good keep it up." Niko then buttons his pants before leaving the restroom.'
 				gs 'cum_call', 'mouth', $boy
 				gs 'arousal', 'bj', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
@@ -387,21 +365,19 @@ if $ARGS[0] =  'Payback 4':
 		
 	elseif VK = 3 and pcs_vag = 0 or VK = 4 and pcs_vag = 0:
 		act 'Do as Niko says':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/school/bathroom/voyvag.mp4"></video></center>'
-			'You slowly approach the sink then spread your legs, as Niko approaches behind you. <font color=#FF00FF>Is this really happening? Am I about to lose my virginity to this bastard? How could I let this happen? Why?</font> You can feel tears streaming down your face, as Niko drops his pants then rubs his penis against your vagina before forcing it inside, causing a powerful jolt of pain to fill your vagina. Niko waste no time, and begin thrusting his penis inside you very roughly, as he whispers in your ear, "Oops there goes your virginity. How does it feel to be a real woman?" You lower your head in silence while trying to focus on anything, but the pain.'		
+			'You slowly approach the sink then spread your legs, as Niko approaches behind you. You can feel tears streaming down your face, as Niko drops his pants then rubs his penis against your vagina before forcing it inside, causing a powerful jolt of pain to fill your vagina. Niko waste no time, and begin thrusting his penis inside you very roughly, as he whispers in your ear, "Oops there goes your virginity. How does it feel to be a real woman?" You lower your head in silence while trying to focus on anything, but the pain.'		
 			gs 'arousal', 'vaginal', 5, 'rough', 'sub'
 			gs 'stat'
 			
 			act 'Continue':	
-				cls
+				*clr & cla
 				if pcs_vag = 0:pcs_vag += 1
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/virgin.mp4"></video></center>'
 				'Niko quickly increases the pace of his thrusts, fucking you harder, as you close your eyes, waiting for it to be over. Niko''s breathing hastens before stopping, as he pulls out of you then begins spraying his warm seed over your ass. You wait for Niko to finish milking his penis on your ass before asking, "May I please go now?" Niko catches his breath before replying, "Yeah sure. You''re all payed up for today." You quickly grab a few paper towels then clean the blood off of your legs before grabbing your clothes, and getting dressed. After you are fully dressed, you quickly run out of the boys restroom.'
-				*nl
-				'<center><video autoplay loop src="images/shared/sex/cum/cum5.mp4"></video></center>'
 				gs 'cum_call', 'butt', $boy
 				gs 'arousal', 'vaginal', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
@@ -413,7 +389,7 @@ if $ARGS[0] =  'Payback 4':
 		
 	elseif VK = 3:
 		act 'Vaginal':
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/vaginal1.mp4"></video></center>'
 			'You slowly approach the sink then spread your legs, as Niko approaches behind you. You can feel Niko''s penis pressing against your vagina before he shoves it inside, evoking a moan from you, feeling his dick rapidly entering you. Niko whispers in your ear, "You like it when I shove my dick inside you, don''t you <<$pcs_nickname>>?"'
@@ -421,12 +397,10 @@ if $ARGS[0] =  'Payback 4':
 			gs 'stat'
 			
 			act 'Continue':	
-				cls
+				*clr & cla
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/vaginal2.mp4"></video></center>'
 				'You turn to Niko, as he points toward the mirror and says, "Look in that mirror. Do you know what you see? A filthy whore, getting what she deserves. Get used to that sight." You do as he says, as you feel, and see tears running down your cheeks. Watching you in tears must have pushed Niko to the edge, as he pulls out of you then begins covering your back with his warm seed. After Niko milks his penis on your back, he says, "Remember your place <<$pcs_firstname>>, and never try to avoid me again." He then buttons his pants before leaving the restroom.'
-				*nl
-				'<center><video autoplay loop src="images/shared/sex/cum/cum5.mp4"></video></center>'
 				gs 'cum_call', 'butt', $boy
 				gs 'arousal', 'vaginal', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
@@ -438,7 +412,7 @@ if $ARGS[0] =  'Payback 4':
 		
 	elseif VK = 4:		
 		act 'Vaginal':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/vaginal1.mp4"></video></center>'
 			'You can feel Niko penis pushing its way inside of your vagina, causing a jolt of pleasure to fill you. Niko continues fucking you as he leans forward, and whispers in your ear. "Who do you belong to bitch?" Knowing better than to anger Niko, you reluctantly reply, "I belong to you Niko." Niko chuckles as he responds, "Yes you do, and never forget it." Niko wraps one of his arms around your stomach, and the other on your leg then lifts you up.'
@@ -446,12 +420,10 @@ if $ARGS[0] =  'Payback 4':
 			gs 'stat'
 			
 			act 'Continue':	
-				cls
+				*clr & cla
 				gs'stat'
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/vaginal2.mp4"></video></center>'
-				'Niko continues fucking you as he keeps you off the ground. You can''t help but feel somewhat impressed at his strength, as he holds you up. You can hear Niko whispering in your ear. "How are you liking your fucking?" You look back at him then nod which seems to turn him on ,as he begins breathing faster. Niko''s breath suddenly stops as he pulls his dick out of you then begins rubbing his dick between your legs, milking his penis on the floor in front of you. After Niko finishes, you turn to him then ask, "Are you satisfied Niko? May I leave now?" Niko gives your ass a firm smack as he replies, "You can go now, but never forget that you belong to me." You quickly pick up your clothes then get dressed before leaving the boys restroom.'
-				*nl
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/cum/thighs.mp4"></video></center>'
+				'Niko continues fucking you as he keeps you off the ground. You can''t help but feel somewhat impressed at his strength, as he holds you up. You can hear Niko whispering in your ear. "How are you liking your fucking?" You look back at him then nod which seems to turn him on ,as he begins breathing faster. Niko''s breath suddenly stops as he pulls his dick out of you then begins rubbing his dick between your legs, milking his penis on the floor in front of you. After Niko finishes, you turn to him then ask, "Are you satisfied Niko? May I leave now?" Niko gives your ass a firm smack as he replies, "You can go now, but never forget that you belong to me." You quickly pick up your clothes then get dressed before leaving the boys restroom.'
 				gs 'arousal', 'vaginal', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -462,7 +434,7 @@ if $ARGS[0] =  'Payback 4':
 		
 	elseif VK = 5:		
 		act 'Anal':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/locations/pavlovsk/school/bathroom/voyanal.mp4"></video></center>'
 			'You feel Niko''s penis pressing against your anus then feel him suddenly force it inside you, evoking a groan of pain to escape you. Niko wastes no time, as he begins fucking your ass roughly. You let out a few groans of pain, as Niko continues fucking your ass before leaning forward then whispering in your ear. "How does it feel to know that you belong to me?" You look back at him in silence, not knowing what he wants you to say. Niko grins as he smacks your ass firmly.'
@@ -470,12 +442,10 @@ if $ARGS[0] =  'Payback 4':
 			gs 'stat'
 			
 			act 'Continue':	
-				cls
+				*clr & cla
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/anal1.mp4"></video></center>'
 				'Knowing that the faster Niko cums, the quicker this torment will be over, turn to face Niko then stare into his eyes. Niko begins struggling to hold back from cumming then begins groaning, filling up your ass with his warm seed. You focus on the throbbing of his hard penis in your ass, filling you with his warm cum. After Niko finishes, he pulls out of you, causing a stream of cum to leak out of your ass, and onto the floor. Niko then says, "You did good <<$pcs_nickname>>. I''ll see you tomorrow." You then gather your clothes, and get dressed before leaving the boys restroom.'
-				*nl
-				'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal1.mp4"></video></center>'
 				gs 'cum_call', 'anus', $boy
 				gs 'arousal', 'anal', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
@@ -487,22 +457,20 @@ if $ARGS[0] =  'Payback 4':
 		
 	elseif VK = 6:		
 		act 'Anal':	
-			cls
+			*clr & cla
 			gs'stat'
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/anal2.mp4"></video></center>'
-			'You look back at Niko, as he pushes his penis inside you, causing a sharp pain to fill your ass, evoking a groan from you, as you hold onto the bottom of the urinal. You can only feel the pain building up in your ass, as Niko continues roughly fucking you. Niko leans forward and grabs onto your hair, as he says, "You really shouldn''t have tried to avoid me bitch. This could have been quick and painless, but you had to piss me off." <font color=#FF00FF>He''s right. I shouldn''t have tried to avoid him. Why am I so stupid?</font>'
+			'You look back at Niko, as he pushes his penis inside you, causing a sharp pain to fill your ass, evoking a groan from you, as you hold onto the bottom of the urinal. You can only feel the pain building up in your ass, as Niko continues roughly fucking you. Niko leans forward and grabs onto your hair, as he says, "You really shouldn''t have tried to avoid me bitch. This could have been quick and painless, but you had to piss me off."'
 			gs 'arousal', 'anal', 5, 'rough', 'sub'
 			gs 'stat'
 			
 			act 'Continue':	
-				cls
+				*clr & cla
 				gs'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikomisc/payback/rough/anal3.mp4"></video></center>'
-				'Niko suddenly lifts you up by your hair then pulls you toward one of the stalls before shoving your head into the toilet. You hold your breath as the water covers your face, hoping that Niko lets you out to breath soon. <font color=#FF00FF>I need to breath. Please Niko, let me go.</font> Niko pulls you out of the toilet for a few seconds to catch your breath before shoving you back in. All you can think about is not drowning, even as your anus is growing sore from Niko hard penis ramming inside. After a few more seconds, Niko suddenly pulls you out of the toilet, as he begins groaning, filling your ass with his warm seed.' 
+				'Niko suddenly lifts you up by your hair then pulls you toward one of the stalls before shoving your head into the toilet. You hold your breath as the water covers your face, hoping that Niko lets you out to breath soon. Niko pulls you out of the toilet for a few seconds to catch your breath before shoving you back in. All you can think about is not drowning, even as your anus is growing sore from Niko hard penis ramming inside. After a few more seconds, Niko suddenly pulls you out of the toilet, as he begins groaning, filling your ass with his warm seed.' 
 				*nl
 				'Niko continues thrusting his penis inside you, milking it completely. After Niko finishes, he says, "Now hopefully you''ve learned your lesson, and won''t try to avoid me again." You turn to him then meekly nod, as he buttons his pants then leaves the restroom while you remain to catch your breath.'
-				*nl
-				'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumanal1.mp4"></video></center>'
 				gs 'cum_call', 'anus', $boy
 				gs 'arousal', 'anal', 5, 'rough', 'sub'
 				gs 'arousal', 'end'
@@ -515,7 +483,7 @@ if $ARGS[0] =  'Payback 4':
 end	
 
 if $ARGS[0] = 'Fedor Help':
-	cls
+	*clr & cla
 	if fedorKozlovQW < -10:
 		FyodorVsNiko = 1
 	else
@@ -527,7 +495,7 @@ if $ARGS[0] = 'Fedor Help':
 	'You move toward Fedor then wrap your arms around him as you say, "Fyodor I...I need your help." Fedor gently rubs your back, as he responds, "Please <<$pcs_firstname>>, tell me what''s wrong." You can feel tears streaming down your face, as you reply, "Nikolai Volkov has been bullying me at lunch everyday. Please make him stop." Fedor clenches his fist, "That little gopnik shit! I will make him pay. Don''t worry <<$pcs_nickname>> the next time he tries I will bash his face in!"'
 	
 	act 'Thank Fedor':
-		cls
+		*clr & cla
 		minut += 5
 		gs'stat'	
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedormisc/console2.jpg"></center>'		
@@ -538,7 +506,7 @@ if $ARGS[0] = 'Fedor Help':
 end
 
 if $ARGS[0] = 'Fedor Help 2':
-	cls
+	*clr & cla
 	FedorVsNiko = 2
 	NikoPayback = 3
 	NikoFightDay = daystart
@@ -548,7 +516,7 @@ if $ARGS[0] = 'Fedor Help 2':
 	'You approach Niko, and a confident grin covers his face, as he says, "You showed up? Good. How will you be paying today?" You reply, "I...I want you to leave me alone." Niko chuckles as he replies, "Well that''s not up to you now is it? For wasting my time, you will be paying me in both, money and pleasure. Now let''s get moving." Niko grabs your hand then begins pulling you into the restroom...'
 	
 	act 'Continue':	
-		cls
+		*clr & cla
 		minut += 1
 		gs'stat'
 		'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
@@ -556,27 +524,27 @@ if $ARGS[0] = 'Fedor Help 2':
 		'After turning the corner, Niko suddenly recoils back, as Fedor''s fist makes contact, causing Niko to drop to the ground, holding his face. Fedor shouts, "HOW DARE YOU TOUCH <<$pcs_firstname>>! I WILL SHOW YOU WHAT HAPPENS WITH SHITHEADS LIKE YOU." Fedor begins punching Niko as he tries to block the blows. Suddenly Fedor gets tackled.'		
 
 		act 'Turn to Fedor':	
-			cls
+			*clr & cla
 			minut += 1
 			gs'stat'
-			'<center><b><h4><font color="red"><<"Lavrenti Romanov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big155.jpg"></center>'
-			'You turn to see Lavrenti Romanov trying to hold Fedor down while Niko holds his face in pain, still unable to recover. Lavrenti punches Fedor before Fedor returns the blow, knocking Lavrenti off of him before Niko finally recovers then kicks Fedor in the face, knocking him to the ground then Lavrenti grabs onto Fedor''s arms then holds him down while Niko begins kicking him in the ribs. You grab Niko by his shirt then pull him away before he slaps you across the face. Niko winds up to kick Fedor again when someone''s fist rams into his face.'
+			'<center><b><h4><font color="red"><<"Roman Yakovlev">></font></h4></b></center>'
+			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big157.jpg"></center>'
+			'You turn to see Roman Yakovlev trying to hold Fedor down while Niko holds his face in pain, still unable to recover. Roman punches Fedor before Fedor returns the blow, knocking Roman off of him before Niko finally recovers then kicks Fedor in the face, knocking him to the ground then Roman grabs onto Fedor''s arms then holds him down while Niko begins kicking him in the ribs. You grab Niko by his shirt then pull him away before he slaps you across the face. Niko winds up to kick Fedor again when someone''s fist rams into his face.'
 
 			act 'See who it was':	
-				cls
+				*clr & cla
 				minut += 1
 				gs'stat'
 				'<center><b><h4><font color="green"><<"Ivan Prokhorov">></font></h4></b></center>'
 				'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big3.jpg"></center>'
-				'You turn to see Ivan Prokhorov standing over Niko. Ivan immediately rushes toward Lavrenti, grabbing him by his arms then lifting him up before slamming him onto the ground. "Teaming up on my friend, and his girl? Not on my watch." Ivan then helps Fedor up before lifting up his foot then driving it into Lavrenti''s face. Fedor takes a second to recover before immediately climbing on Niko then repeatedly punching him. After a few punches, Ivan pulls Fedor off then says, "Come on man, it''s done."'
+				'You turn to see Ivan Prokhorov standing over Niko. Ivan immediately rushes toward Roman, grabbing him by his arms then lifting him up before slamming him onto the ground. "Teaming up on my friend, and his girl? Not on my watch." Ivan then helps Fedor up before lifting up his foot then driving it into Roman''s face. Fedor takes a second to recover before immediately climbing on Niko then repeatedly punching him. After a few punches, Ivan pulls Fedor off then says, "Come on man, it''s done."'
 				
 				act 'Place your hand on Fedor''s shoulder':
-					cls
+					*clr & cla
 					minut += 1
 					gs'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedormisc/console1.jpg"></center>'
-					'Fedor takes a few seconds to catch his breath before asking you, "Are you alright <<$pcs_firstname>>? You took quite a hit there." You quickly hug Fedor, as you reply, "I''m great, thanks to you two." Ivan replies, "It was nothing special. I just won''t let punks like them, hurt my friends." Fedor wraps his arms around you then says, "This is the last time that punk will ever hurt you. You are safe." You return the hug then hear the class bell, signaling the beginning of class. Fedor takes your hand then leads you toward you next class. While Ivan stays behind to "Chat" with Niko and Lavrenti.'
+					'Fedor takes a few seconds to catch his breath before asking you, "Are you alright <<$pcs_firstname>>? You took quite a hit there." You quickly hug Fedor, as you reply, "I''m great, thanks to you two." Ivan replies, "It was nothing special. I just won''t let punks like them, hurt my friends." Fedor wraps his arms around you then says, "This is the last time that punk will ever hurt you. You are safe." You return the hug then hear the class bell, signaling the beginning of class. Fedor takes your hand then leads you toward you next class. While Ivan stays behind to "Chat" with Niko and Roman.'
 
 					act 'Return to the hallway':gt 'gschool_lessons', 'short_break'
 				end
@@ -586,7 +554,7 @@ if $ARGS[0] = 'Fedor Help 2':
 end
 
 if $ARGS[0] = 'Fyodor Help':
-	cls
+	*clr & cla
 	FyodorVsNiko = 2
 	NikoPayback = 3
 	NikoFightDay = daystart
@@ -596,23 +564,19 @@ if $ARGS[0] = 'Fyodor Help':
 	'You approach Niko, and a confident grin covers his face, as he says, "You showed up? Good. How will you be paying today?" You reply, "I...I want you to leave me alone." Niko chuckles as he replies, "Well that''s not up to you now is it? For wasting my time, you will be paying me in both, money and pleasure. Now let''s get moving." Niko grabs your hand then begins pulling you into the restroom...'
 	
 	act 'Continue':	
-		cls
+		*clr & cla
 		minut += 2
 		gs'stat'
-		'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big5.jpg"></center>'
-		'As you reach the restroom, Niko tosses you to the ground then approaches you when suddenly, Fedor quickly walks into the room, and punches Niko in his face, knocking him to the ground before climbing on him, and punching him repeatedly. After a few punches Niko says, "Whoa chill out man, <<$pcs_firstname>> and I were just playing a game. Do you see? She is laughing right now." Fedor turns to you just as Niko winds up his fist, ramming it into Fedor''s face before quickly pushing Fedor off of him then running to the door. <font color=#FF00FF>Niko''s running away?...No! I''m finished with this shit!</font> You quickly grab Niko''s shirt turning him to you before scratching him in his face then pushing him onto the ground, giving Fedor enough time to recover then climb on top of Niko again, punching him in the face.'	
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/fight/down.jpg"></center>'
+		'As you reach the restroom, Niko tosses you to the ground then approaches you when suddenly, Fedor quickly walks into the room, and punches Niko in his face, knocking him to the ground before climbing on him, and punching him repeatedly. After a few punches Niko says, "Whoa chill out man, <<$pcs_firstname>> and I were just playing a game. Do you see? She is laughing right now." Fedor turns to you just as Niko winds up his fist, ramming it into Fedor''s face before quickly pushing Fedor off of him then running to the door. You quickly grab Niko''s shirt turning him to you before scratching him in his face then pushing him onto the ground, giving Fedor enough time to recover then climb on top of Niko again, punching him in the face.'	
 
 		act 'Enjoy the show':	
-			cls
+			*clr & cla
 			minut += 2
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedormisc/console2.jpg"></center>'
 			'You watch in satisfaction at Niko getting what he deserves, for a few seconds before Fedor finally calms down then climbs off of Niko then walks up to you, and wraps his arms around you before asking, "Are you alright? He didn''t hurt you did he?" You reply, "No but I did enjoy you hurting him." Fedor chuckles, "Anyone who messes with you, wil share the same treatment.." You lean forward then give Fedor a passionate kiss which lasts for almost a full minute. After the kiss, Fedor says, "You should get back to recess before you miss it. I will have a chat with NIko. Go on, enjoy your recess." You give Fedor a kiss on the cheek before walking out of the restroom.'
-			*nl
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/kiss2.mp4"></video></center>'
 			
 			act 'Return to the hallway':gt 'gschool_lunch', 'break'
 		end	
@@ -620,7 +584,7 @@ if $ARGS[0] = 'Fyodor Help':
 end
 
 if $ARGS[0] = 'Ivan Help':
-	cls
+	*clr & cla
 	IvanVsNiko = 1
 	minut += 5
 	gs'stat'
@@ -631,44 +595,38 @@ if $ARGS[0] = 'Ivan Help':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/hug1.jpg"></center>'	
 	
 	act 'Tell Ivan':	
-		cls
+		*clr & cla
 		gs'stat'
 		'<center><b><h4><font color="green"><<"Ivan Prokhorov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/angry1.jpg"></center>'
-		'You try to collect your thoughts before saying, "Ever since I broke up with Niko, he has been raping me at lunchtime and I..." Ivan agrily slams one of the lockers, as he says, "That slimy little shit! This will not continue <<$pcs_firstname>>, I will put an end to it. You don''t need to worry. I will end this." You wrap your arms around Ivan then say, "Thank you so much. I didn''t know what to do." Ivan replies, "That kind of shit is unacceptable. You will be safe again, I promise you that." You give Ivan a soft kiss on the cheek then walk away while he angrily begins cracking his knuckles.'		
-		*nl
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/hug1.jpg"></center>'	
+		'You try to collect your thoughts before saying, "Ever since I broke up with Niko, he has been raping me at lunchtime and I..." Ivan agrily slams one of the lockers, as he says, "That slimy little shit! This will not continue <<$pcs_firstname>>, I will put an end to it. You don''t need to worry. I will end this." You wrap your arms around Ivan then say, "Thank you so much. I didn''t know what to do." Ivan replies, "That kind of shit is unacceptable. You will be safe again, I promise you that." You give Ivan a soft kiss on the cheek then walk away while he angrily begins cracking his knuckles.'			
 	
 		act 'Return to the hallway':gt 'gschool_lessons', 'short_break'
 	end
 end
 
 if $ARGS[0] = 'Ivan Help 2':
-	cls
+	*clr & cla
 	IvanVsNiko = 2
 	NikoPayback = 3
 	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/smile2.jpg"></center>'	
 	'You approach Niko, and a confident grin covers his face, as he says, "You showed up? Goo..." Niko quickly pauses when he notices Ivan approaching. Ivan drives his fist into Niko''s stomach then says, "I hear that you have been giving <<$pcs_firstname>> a hard time. Allow me to return the favor." Ivan then begins chocking Niko, as Niko tries to squirm out of Ivan steel grasp. After a few seconds, Ivan releases Niko, causing Niko to drop to the ground. Ivan stands over Niko and says, "That was a warning. Give <<$pcs_firstname>> a hard time again, and I won''t hold back."'
-	'<center><b><h4><font color="green"><<"Ivan Prokhorov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big3.jpg"></center>'
 	
 	act 'Continue':
-		cls
+		*clr & cla
 		minut += 2
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/ivan/hug1.jpg"></center>'
 		'Niko quickly nods, obviously frightened of Ivan. Ivan then gives you a hug as he says, "You''ll be fine now. If he bothers you again then let me know, and I will set him straight." You gratefully nod, as Ivan turns around then walks away. You turn around to leave when you notice Vitek walking up to Niko then lightly places his foot on his back, as he says, "I always told you that your big mouth would get you into trouble." Vitek then steps off of Niko then laughs, as he walks away.'		
-		'<center><b><h4><font color="red"><<"Viktor [Vitek] Kotov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big9.jpg"></center>'
 
 		act 'Go to class':gt 'gschool_lunch', 'break'
 	end
 end	
 
 if $ARGS[0] = 'Vitek Help':
-	cls
+	*clr & cla
 	VitekVsNiko = 1
 	NikoPayback = 3
 	NikoFightDay = daystart
@@ -679,52 +637,41 @@ if $ARGS[0] = 'Vitek Help':
 	'You say to Vitek, "Um Viktor I need..." Dan unintentionally cuts you off, "Oh yeah, have you guys seen that big breasted bitch handing out freebies by..." Vitek says, "Hold that thought. <<$pcs_nickname>> we''re having guy talk right now, you and I can chat later." You try add, "But I really need..." Vasily suddenly intentionally falls to the ground then says, "You need to cheer up, you look so glum. Here, I will tell you a joke rated everyone..." Dan adds, "You mean rated immature, right?" The guys begin laughing, as you get more agitated at them ignoring you.'
 	
 	act 'Scream out':	
-		cls
+		*clr & cla
 		gs'stat'
-		'<center><b><h4><font color="red"><<"Viktor [Vitek] Kotov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big9.jpg"></center>'
-		'You suddenly scream, "NIKO RAPED ME!!!" The guys freeze in place before Vitek says, "He did what?" Niko suddenly stands up then begins sprinting toward the door when Vasily shoulder tackles him into the wall, knocking slamming him against it. Lavrenti tries to help Niko when Dan stands in front of him, blocking him from interfering. Vitek suddenly lunges forward then drives his foot into Niko''s face, slamming his head against the wall before shouting, "YOU FUCKING WORTHLESS SACK OF SHIT!!! HOW DARE YOU TOUCH MY GIRL!!!"'	
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev2/bruised1.jpg"></center>'
+		'You suddenly scream, "NIKO RAPED ME!!!" The guys freeze in place before Vitek says, "He did what?" Niko suddenly stands up then begins sprinting toward the door when Vasily shoulder tackles him into the wall, knocking slamming him against it. Roman tries to help Niko when Dan stands in front of him, blocking him from interfering. Vitek suddenly lunges forward then drives his foot into Niko''s face, slamming his head against the wall before shouting, "YOU FUCKING WORTHLESS SACK OF SHIT!!! HOW DARE YOU TOUCH MY GIRL!!!"'	
 		
 		act 'Continue watching':
-			cls
+			*clr & cla
 			minut += 5
 			gs'stat'
-			'<center><b><h4><font color="maroon"><<"Vasily [Shulga] Shulgin">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big11.jpg"></center>'
-			'Vitek continuously kicks Niko in the ribs, as Vasily joins him while saying, "We''ll show you what happens to those who fuck with <<$pcs_firstname>>." After a few minutes, Vitek takes a few seconds to catch his breath before approaching you, wrapping his arms around you, and saying, "I''m sorry that I didn''t listen to you, but don''t worry, I will make this sack of shit pay for touching you. You shouldn''t stick around for this. Go on, and I''ll see you later." You lean forward, and give Vitek a passionate kiss before saying, "Thank you Viktor. I always feel so safe with you." Vitek gives you ass a light smack before responding, "You know it <<$pcs_nickname>>. Now get going, I have some business to finish here." You happily nod before leaving the restroom.'	
-			*nl
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/niko/nikoev/kiss3.mp4"></video></center>'
-
+			'Vitek continuously kicks Niko in the ribs, as Vasily joins him while saying, "We''ll show you what happens to those who fuck with <<$pcs_firstname>>." After a few minutes, Vitek takes a few seconds to catch his breath before approaching you, wrapping his arms around you, and saying, "I''m sorry that I didn''t listen to you, but don''t worry, I will make this sack of shit pay for touching you. You shouldn''t stick around for this. Go on, and I''ll see you later." You lean forward, and give Vitek a passionate kiss before saying, "Thank you Viktor. I always feel so safe with you." Vitek gives you ass a light smack before responding, "You know it <<$pcs_nickname>>. Now get going, I have some business to finish here." You happily nod before leaving the restroom.'	
+			
 			act 'Continue toward the hallway':gt 'gschool_lessons', 'short_break'
 		end	
 	end
 end
 
 if $ARGS[0] = 'Vitek Help 2':
-	cls
+	*clr & cla
 	VitekVsNiko = 1
 	NikoPayback = 3
 	NikoFightDay = daystart
 	minut += 5
 	gs'stat'
-	'<center><b><h4><font color="red"><<"Viktor [Vitek] Kotov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big9.jpg"></center>'
-	'You approach Vitek and he says, "Hey <<$pcs_nickname>>, want a drink?" You reply, "I need to ask for your help, Niko has been raping me at lunch and..." Vitek''s eyes widen as he says, "He did what?" You remain quite, as you feel tears dripping down your cheek. Vitek tosses his bottle to the ground, causing a loud shatter which draws everyone in the discos attention. Vitek angrily walks over the broken glass, as he approaches Niko. Niko suddenly asks, "Whoa what''s going on?" Vitek replies, "You have been fucking with my girl?"'
-	*nl
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/sad2.jpg"></center>'
+	'You approach Vitek and he says, "Hey <<$pcs_nickname>>, want a drink?" You reply, "I need to ask for your help, Niko has been raping me at lunch and..." Vitek''s eyes widen as he says, "He did what?" You remain quite, as you feel tears dripping down your cheek. Vitek tosses his bottle to the ground, causing a loud shatter which draws everyone in the discos attention. Vitek angrily walks over the broken glass, as he approaches Niko. Niko suddenly asks, "Whoa what''s going on?" Vitek replies, "You have been fucking with my girl?"'
 	
 	act 'Continue':	
-		cls
+		*clr & cla
 		gs'stat'
-		'<center><b><h4><font color="maroon"><<"Vasily [Shulga] Shulgin">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big11.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/fight/down.jpg"></center>'
 		'Niko immediately tries to run away when Vasily drives his fist into Niko''s face before saying, "You don''t fuck with <<$pcs_nickname>> without dealing with us." You can feel your heart warming up, as you realize how safe you are with Vitek, and Vasily around. Niko continuously tries to crawl away, but is grabbed by Vitek, who lifts him up then slams him onto the ground before climbing on top of him then repeatedly punching him in the face. Vasily approaches you then says, "You are safe now <<$pcs_firstname>>. We will make sure that Niko never touches you again."' 
 		*nl
 		'You give Vasily a hug as you respond, "Thank you all so much for your help. You''re the best." Vasily gives you a pat on the back before saying, "You don''t need to thank us. It''s a mans job to keep girls safe. Here have a drink on me." Vasily hands you a bottle of beer then turns back around to join Vitek, and Dan in beating Niko.'		
-		*nl
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/fight/down.jpg"></center>'
 	
 		act 'Walk away':gt 'gdkin'
 		act 'Have a drink then walk away': gs 'drugs', 'alcohol', 'beer' & gt 'gdkin'

File diff suppressed because it is too large
+ 122 - 608
locations/NikoSlut.qsrc


+ 3 - 3
locations/Prostitute.qsrc

@@ -57,7 +57,6 @@ if $ARGS[0] = 'start':
 				BonusDefV = 0
 				!!Programme of Action
 				program = 0
-				prostitutFight = 1
 
 				if spellavtoklon = 1:klon = 3
 				if spellbefshild = 1:defence = 500}
@@ -79,6 +78,7 @@ if $ARGS[0] = 'start':
 				opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 				opp_willpwr[0] = 50
 				opp_shoot[0] = 10
+				fightEnding = 4
 
 				gt 'fight', 'start'
 			end
@@ -167,7 +167,6 @@ if $ARGS[0] = 'start':
 								BonusDefV = 0
 								!!Programme of Action
 								program = 0
-								prostitutFight = 2
 
 								if spellavtoklon = 1:klon = 3
 								if spellbefshild = 1:defence = 500}
@@ -189,6 +188,7 @@ if $ARGS[0] = 'start':
 								opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 								opp_willpwr[0] = 100
 								opp_shoot[0] = 10
+								fightEnding = 5
 
 								gt 'fight', 'start'
 							end
@@ -240,7 +240,6 @@ if $ARGS[0] = 'start':
 								BonusDefV = 0
 								!!Programme of Action
 								program = 0
-								prostitutFight = 3
 
 								if spellavtoklon = 1:klon = 3
 								if spellbefshild = 1:defence = 500}
@@ -263,6 +262,7 @@ if $ARGS[0] = 'start':
 								opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 								opp_willpwr[0] = 50
 								opp_shoot[0] = 10
+								fightEnding = 6
 
 								gt 'fight', 'start'
 							end

+ 0 - 512
locations/SoniaHome.qsrc

@@ -1,512 +0,0 @@
-# SoniaHome
-!! This house was created for the Niko Volkov romance, but I made sure to make it compatible for, use on its own, but it is VERY IMPORTANT that all new acts, or code added to this location has a "if NikoAftermath = 0" requirement added to them, or else it will break my quest. Please don''t break my quest. Please.  :(	<3 Violet Kitten   Feel free to PM me, if you have any further questions. ^_^
-
-if $ARGS[0] = 'Aftermath':
-	cls
-	if npc_rel['A25'] < 90:npc_rel['A25'] = 90
-	if npc_rel['A12'] < 90:npc_rel['A12'] = 90
-	if npc_rel['A14'] < 90:npc_rel['A14'] = 90
-	pcs_hairbsh = 0
-	pcs_makeup = 1
-	pcs_sleep += 45
-	cumspclnt = 1
-	gs 'cum_cleanup'
-	gs 'sweat', 'add', 5
-	minut += 270
-	NikoAftermath = 1
-	$location_type = 'private'
-	$locclass = 'bedr'
-	menu_off = 1
-	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 but...Where am I?" Sonia replies, "After what happened at school, we couldn''t just leave you alone, to be abused by the boys, so we brought you back to my house." You scratch your head. "We?" 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, "I''m so glad that you are ok. I was worried when you didn''t wake up after we kept splashed your face with water." Julia adds, "I also cleaned your hair for you."'
-	*nl
-	'You look around the room then back at Sonia. "Thank you all, for helping me. I can''t believe what happened in school was not a dream. I want it to be a dream, so bad." You can feel tears forming under your eyes. Katja hugs you, as she says, "I don''t know what caused it, but we will find a way to make things better. You didn''t deserve what they did to you." Sonia whispers to herself, "Do any of us?" Julia downcasts her eyes, not knowing how to console Sonia while Katja sighs, "What is going at school these days, first Sonia then <<$pcs_firstname>>. These boys are vicious." You reply, "Yes they are." Julia places her hand on your leg, "<<$pcs_firstname>> what happened exactly?"'
-	'<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 'Tell them your story':
-		cls
-		minut += 5
-		gs'stat'
-		'<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>'
-		'You take a deep breath, "It all stared when I met a boy named Nikolai. He..." Katja cuts you off, "Wait, do you mean that gopnik punk, Niko? You can''t trust that loser." Julia nods, "She''s right. That boy is bad news. He is always lying to everyone. Even the other boys know, not to trust him." You look up, surprised by their opinions of Niko. "But he treats me with such love and compassion. He always calls me his princess." Katja places her arms around you neck. "Listen <<$pcs_nickname>>, you can go out with whoever you want. I am just concerned that he will use you." You lay back, as you consider your options, Julia asks, "So how did you end up...naked at school?"'
-		*nl
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/bedroom/julia.jpg"></center>'
-
-		act 'Continue your story':
-			cls
-			minut += 5
-			gs'stat'
-			'<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/katja2.jpg"></center>'
-			'"Niko is always teaching me how to be more confident, and daring. He tells me to do things that are very scary at first, but end up being very exciting. I don''t know why it excites me so much, but I feel so alive when I am with Niko. He always makes me feel safe, and he tells me..." Katja cuts you off. "Makes you feel safe? Like how he kept you safe today?" You lower your head, and remain silent, for a few seconds before Katja says, "I''m sorry <<$pcs_firstname>>, I just get so angry when I see good people getting used by assholes like him. Continue your story, please."'
-			*nl
-			'You take a second before continuing your story. "He helps me find my confidence, and break out of my safety bubble. I''m alway trying something new, and facing my fears. I...I just don''t know what to do without him. Niko always guides me in bettering myself, and feeling so alive." Sonia places her hand on your shoulder, "If Niko is the one in your heart then stay with him..." Katja immediately cuts Sonia off, "Stay with that freak who striped her down, and let those gopnik punks, rape her?" Julia calms her. "We might not like him, but it is <<$pcs_firstname>>''s decision, and we can''t control her. We can only give her our advice, and hope that she makes the right decision, on her own."'
-			'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/bedroom/julia.jpg"></center>'
-
-			act 'Continue':
-				cls
-				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/soniasmile.jpg"></center>'
-				'You lightly grip your hair, as you respond, "I just...need to think about this, for a while." Sonia stands up, and says, "Well I''ll make us something to eat, I hope you all have a sweet tooth." Sonia then walks to the door then motions the other girls to follow her. Katja gets up then tells you, "I''m sorry that I have been a bit stern, I just don''t want to see what happened today repeat itself. When you finish resting then come see me ok? We can have a nice chat together, and don''t worry, I won''t lecture you again." Julia adds, "Come see me too, I would like to speak with you. Now get some rest." The girls leave the room, and you lay down then close your eyes...'
-				'<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 'Rest':gt 'NikoDreams', 'Woods'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'Aftermath 2':
-	cls
-	music_loop = 0
-	close all
-	pcs_sleep += 10
-	gs 'sweat', 'add', 10
-	minut += 60
-	gs'stat'
-	'<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>'
-	'You quickly jump up, and see Katja with a concerned look on her face. "It''s ok <<$pcs_firstname>>. You were just having a bad dream." You look around the room, trying to get your bearings then turn to Katja, "Thank you Katja, I hope this doesn''t become a habit." Katja rubs your forehead, as she responds,"Everything will be alright. Don''t worry." You giggle when you notice the goofy doll that Sonia had was tucked in right next to you. Katja responds, "Now that''s what I like to see, a fresh smile."'
-	*nl
-	'You both giggle before Katja tells you, "Sonia should be done soon making whatever she''s cooking in there. Every time I ask, the only reply she gives me is: "All in good time." So I guess that it''s a mystery. You should wash up in the shower before we eat because Sonia told me that she wants us out before her mother gets home. You should also speak with Julia. She seems very worried about you." You give Katja a nod, as you climb out of bed.'
-
-	act 'Get up':gt 'SoniaHome', 'Hallway'
-end
-
-if $ARGS[0] = 'Hallway':
-	cls
-	if NikoAftermath = 0:minut += 5
-	$location_type = 'private'
-	killvar '$locclass'
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/hallway.jpg"></center>'
-	'This is the central hallway that connect the house. There is a lot of artwork on the walls, and the house smells lovely.'
-	if VKSoniaChat = 1 and SoniaCupcake = 2 and NikoAftermath = 1:
-		'<a href="exec:gt ''SoniaHome'', ''Sonia Chat''">Sonia</a> is standing next to the front door, as she adjusts her bra.'
-		'<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/sonia.jpg"></center>'
-	elseif VKSoniaChat = 2 and SoniaCupcake = 2 and VKJuliaChat < 4 and NikoAftermath = 1:
-		'<a href="exec:gt ''SoniaHome'', ''Sonia Chat 2''">Sonia</a> is standing next to the front door, as she browses the web, on her phone.'
-		'<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/sonia.jpg"></center>'
-	elseif VKJuliaChat = 4 and NikoAftermath = 1:
-		'Sonia is standing next to the front door, as she browses the web, on her phone.'
-		'<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/sonia.jpg"></center>'
-	end
-
-	act 'Bedroom':gt 'SoniaHome', 'Bedroom'
-
-	act 'Kitchen':
-		$locclass = 'kitr'
-		if SoniaCupcake = 0 and NikoAftermath = 1:
-			gt 'SoniaHome', 'Sonia Cooking'
-		elseif SoniaCupcake = 1 and NikoAftermath = 1:
-			gt 'SoniaHome', 'Cupcake Time'
-		else
-			gt 'SoniaHome', 'Kitchen'
-		end
-	end
-
-	act 'Livingroom':gt 'SoniaHome', 'Livingroom'
-end
-
-if $ARGS[0] = 'Bedroom':
-	cls
-	$metka = 'Bedroom'
-	$loc = 'SoniaHome'
-	$metkaM = 'Bedroom'
-	$locM = 'SoniaHome'
-	$location_type = 'private'
-	$locclass = 'bedr'
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/bedroom/bedroom.jpg"></center>'
-	'Sonia has such a cute bedroom, so clean and well organized. Sonia has an expensive standing <a href="exec:gt ''mirror'', ''start''">mirrors</a>, and she even has a packed <a href="exec:gt ''SoniaHome'', ''Shoe Closet''">shoe closet</a>.'
-	if VKKatjaChat = 0 and NikoAftermath = 1:
-		'<a href="exec:gt ''SoniaHome'', ''Katja Chat''">Katja</a> is standing in front of a mirror, checking herself out from different angles.'
-	elseif SoniaCupcake < 2 and VKKatjaChat = 1 and NikoAftermath = 1:
-		'<a href="exec:gt ''SoniaHome'', ''Katja Chat''">Katja</a> is standing in front of a mirror, tweezing her eyes brows while humming a soothing tune.'
-	elseif SoniaCupcake = 2 and VKKatjaChat = 1 and NikoAftermath = 1:
-		'<a href="exec:gt ''SoniaHome'', ''Katja Chat 2''">Katja</a> is laying on the bed while humming a sweet melody.'
-	end
-
-	act 'Sonia Bathroom':
-		if VKKatjaChat = 0 and NikoAftermath = 1:
-			gt 'SoniaHome', 'Katja Chat'
-		elseif VKSoniaChat = 0 or VKJuliaChat = 0 and NikoAftermath = 1:
-			gt 'SoniaHome', 'Katja Reminder'
-		else
-			gt 'SoniaHome', 'Sonia Bathroom'
-		end
-	end
-
-	act 'Leave room':gt 'SoniaHome', 'Hallway'
-end
-
-if $ARGS[0] = 'Sonia Cooking':
-	cls
-	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/kitchen/soniacupcake1.jpg"></center>'
-	if VKSoniaChat = 1:
-		'As soon, as you enter the kitchen Sonia shoos you away. "No peeking. It will be ready when it''s ready. Be patient."'
-	else
-		'You walk into the kitchen, and smell something lovely, Sonia notices you enter then stands in front of a tray while saying, "Hey no peeking!" She giggles before saying, "I''m glad that you rested well, I am making us a special treat, and it won''t be ready for another 20 minutes, so why don''t you jump in the shower, and get washed up? I should be done by then." You give Sonia a warm smile as you walk out of the kitchen.'
-	end
-
-	act 'Leave':VKSoniaChat = 1 & gt 'SoniaHome', 'Hallway'
-end
-
-if $ARGS[0] = 'Cupcake Time':
-	cls
-	minut += 15
-	pcs_health += 10
-	pcs_willpwr += 25
-	pcs_mood += 25
-	pcs_energy += 40
-	pcs_hydra += 40
-	fat += 2
-	cumspclnt = 2
-	$locclass = 'kitr'
-	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/kitchen/soniacupcake2.jpg"></center>'
-	'You walk into the kitchen, as Katja, and Juila enter. You all take a seat at the table just as Sonia approaches with a tray of cupcakes. Katja says, "So.. cupcakes were your secret treat." Sonia responds, "Sometimes the most simple treat, can be the greatest surprise." Julia takes a bite of a cupcake then responds, "Thank you Sonia. These cupcakes are so tasty." Sonia nods with a warm smile on her face. "I''m glad that you like them. now eat up everyone." You all spend the next 15 minutes, eating cupcakes while chatting about various topics.'
-
-	act 'Finish eating':
-		cls
-		SoniaCupcake = 2
-		gs'stat'
-		'<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/katja2.jpg"></center>'
-		'After you all finish your cupcakes, Katja stands up and says, "I had a great time but it''s getting late. I better get going. I''m going to use the restroom before I go." Katja walks out of the room as she waves at everyone. Julia gets up next and says, "We should get going too <<$pcs_firstname>>. Sonia''s mother should be coming home soon, and we''d only disturb her." Sonia nods, as she responds, "I''ll be waiting by the front door when you are ready to go, and before you go, can you do me a favor and make sure that Katja doesn''t use all my hair care products. I told her she can use some, but that girl keeps "Sampling" each one." Julia adds, "When you have a moment please see me in the living room. I have something I would like to ask you." You nod at Julia, as she, and Sonia walk out of the kitchen.'
-		'<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/soniasmile.jpg"></center>'
-
-		act 'Stand up':gt 'SoniaHome', 'Kitchen'
-	end
-end
-
-if $ARGS[0] = 'Kitchen':
-	cls
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/kitchen/kitchen.jpg"></center>'
-	if NikoAftermath = 1:
-		'Sonia''s kitchen is nice, and clean with plenty of potted plants, and other decorations. There seems to be a lot of cooking ingredients scattered around. Sonia must have been making these cupcakes in a hurry.'
-	else
-		'Sonia''s kitchen is nice, and clean with plenty of potted plants, and other decorations.'
-	end
-
-	act 'Hallway':gt 'SoniaHome', 'Hallway'
-end
-
-if $ARGS[0] = 'Livingroom':
-	cls
-	$locclass = 'livingr'
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/livingroom/livingroom.jpg"></center>'
-	'Sonia''s living room look quite elegant, and refined. It almost looks like it had an interior decorator design it.'
-	if SoniaCupcake < 2 and NikoAftermath = 1:
-		'You can see <a href="exec:gt ''SoniaHome'', ''Julia Chat''">Julia</a>, leaning against the fireplace. She appears lost in thought.'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia1.jpg"></center>'
-	elseif SoniaCupcake = 2 and VKJuliaChat < 3 and NikoAftermath = 1:
-		'You can see <a href="exec:gt ''SoniaHome'', ''Julia Chat 2''">Julia</a>, leaning against the fireplace, as she runs her fingers through her hair.'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia2.jpg"></center>'
-	elseif VKJuliaChat = 4 and NikoAftermath = 1:
-		'You can see <a href="exec:gt ''SoniaHome'', ''Julia Chat 3''">Julia</a>, leaning against the fireplace. She look to you with a warm smile.'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia3.jpg"></center>'
-	end
-
-	act 'Hallway':gt 'SoniaHome', 'Hallway'
-end
-
-if $ARGS[0] = 'Sonia Bathroom':
-	cls
-	$metka = 'Sonia Bathroom'
-	$loc = 'SoniaHome'
-	$metkaM = 'Sonia Bathroom'
-	$locM = 'SoniaHome'
-	$location_type = 'bathroom'
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/bathroom/bathroom.jpg"></center>'
-	'This bathroom is very clean, and well organized with a sink, a <a href="exec:gt ''mirror'', ''start''">mirror</a>, and a shower.'
-
-	if SoniaCupcake = 0 and NikoAftermath = 1:
-		act 'Take a shower':SoniaCupcake = 1 & gt 'SoniaHome', 'Sonia Shower'
-	elseif NikoAftermath = 0:
-		act 'Take a shower':gt 'SoniaHome', 'Sonia Shower'
-	end
-
-	act 'Bedroom':gt 'SoniaHome', 'Bedroom'
-end
-
-if $ARGS[0] = 'Sonia Shower':
-	cls
-	pcs_hairbsh = 0
-	pcs_makeup = 1
-	minut += 20
-	cumspclnt = 1
-	gs 'cum_cleanup'
-	if sweat > 14: sweat = 10 + rand(0,4)
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/bathroom/shower/wash.jpg"></center>'
-	'You climb into the shower, and begin lathering your body, cleaning yourself, as thoroughly, as possible before turning off the water. You grab a spare towel, and begin drying yourself off before getting dressed then leaving the bathroom.'
-	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
-
-	act 'Bedroom':gt 'SoniaHome', 'Bedroom'
-end
-
-if $ARGS[0] = 'Shoe Closet':
-	cls
-	if SoniaShoesDay ! daystart:pcs_mood += 20 & SoniaShoesDay = daystart
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/bedroom/shoes.jpg"></center>'
-	'Sonia has so many shoes. She must be very wealthy, and everything is so well organized. I wonder which is her favorite pair of heels.'
-
-	act 'Walk away':gt 'SoniaHome', 'Bedroom'
-end
-
-if $ARGS[0] = 'Sonia Chat':
-	cls
-	VKSoniaChat = 2
-	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/sonia.jpg"></center>'
-	'As you are approaching Sonia, she looks up from her phone then flashes you a warm smile, as she says, "I hope that you are holding up alright. I remember the time at the disco. I was so terrified when I got home, and the next day at school was...terrible. All of my friends turned on me. No one lent me a hand, or even cared about what happened to me. Imagine losing all of your friends overnight. I made sure that same didn''t happen to you. At least you will still have some of your friends to support you." You lightly grab onto Sonia''s arm, as you feel tears dripping down your cheeks. "Thank you Sonia. I''m...I''m so sorry for not helping you at the disco. I was so scared of the boys, and...I was a coward." Sonia brushes your tears away.'
-	*nl
-	'"Don''t worry, there was nothing you could do anyway. I have come to terms with my situation, and even have fun sometimes. Everyone likes to be in control of their body, and make all choices themself, but sometimes letting someone else make choices for you, can lead to a much simpler, and exciting life. I never know what tomorrow will bring. That is why I believe that if you want to truly live your life then you need to throw caution to the wind, and accept any opportunities that come your way." You nod, as you reply, "I think I understand, By letting someone else choose my path then I can make things easier for me, and I will have the freedom to sleep with anyone I want, without worry of my reputation being ruined."'
-	*nl
-	'Sonia nods, "Exactly, living a life of freedom, and mystery with no fear of ever being bored." You think to yourself, <font color=#FF00FF>With Niko, I can live this life. A life of freedom and excitement. By destroying my reputation Niko may have freed me from my shackles. I have really enjoyed being fucked by all those boys. I just didn''t know it at the time. This could be my new life.</font> You smile, as you say, "Thank you again Sonia, I have much to think about." Sonia replies, "I''m sure you do."'
-	'<center><b><h4><font color=#ff00cc><<"<<$pcs_firstname>> [<<$pcs_nickname>>] <<$pcs_lastname>>">></font></h4></b></center>'
-	*pl '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-
-	act 'Walk away':gt 'SoniaHome', 'Hallway'
-end
-
-if $ARGS[0] = 'Sonia Chat 2':
-	cls
-	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/sonia.jpg"></center>'
-	if VKKatjaChat < 2 or VKJuliaChat < 2:
-		'You walk up to Sonia, and she flashes you a warm smile. "So are you ready to go or would you like to talk to the other girls before leaving?"'
-		act 'Stay to chat with Julia, and Katja':gt 'SoniaHome', 'Hallway'
-		act 'Leave house':gt 'SoniaHome', 'Sonia Goodbye'
-	else
-		'You walk up to Sonia, and she flashes you a warm smile. "So are you ready to go?"'
-		act 'Not yet':gt 'SoniaHome', 'Hallway'
-		act 'I''m ready':gt 'SoniaHome', 'Sonia Goodbye'
-	end
-end
-
-if $ARGS[0] = 'Sonia Goodbye':
-	cls
-	if grupTipe[61] = 4:grupTipe[61] = 600
-	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/soniasmile.jpg"></center>'
-	'You walk out of the door, as Sonia says, "Don''t forget what I said earlier. Whatever makes you happier, is the path you should follow. what''s the point of living a boring life?" You nod at Sonia, "Thank you for everything Sonia. I owe you all so much." Sonia replies, "It was no trouble at all. Goodbye <<$pcs_firstname>>." Sonia then closes the door.'
-
-	act 'Walk toward town':NikoAftermath = 0 & gt 'pavResidential'
-end
-
-if $ARGS[0] = 'Katja Chat':
-	cls
-	gs'stat'
-	'<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/katja2.jpg"></center>'
-	if VKKatjaChat = 0:
-		pcs_makeup = 3
-		'As you approach Katja, she waves you over. You stand next to her before she walks around you while keeping her eyes on the mirror. "Let''s gussy you up." Katja reaches into her hand bag then takes out her compact makeup case. She pulls out her brush then begins applying some makeup on you, for a few seconds before saying, "Look at that pretty girl in the mirror. Isn''t she lovely?" You reply, "I agree, she is so pretty, but what about me?" Katja smirks, as she places her fingertip on your nose. "I was referring to you, silly." You both giggle before Katja asks, "So, how are you holding up?" You reply, "I have a lot to think about." Katja responds, "Make sure that you take your time, and think carefully about your future because one wrong decision, can go a long way." You sarcastically reply, "Tell me about it." Katja lightly squeezes your shoulders,'
-		*nl
-		'"No one can change who you are beside you. Remember that. Anyway you should take a shower before Sonia finishes making her "Secret Treat." That she won''t tell me about. You would think that she is preparing human flesh...You don''t think...?" You poke Katja in her arm as you reply, "Oh stop." She giggles, as she pulls out her tweezers then begins plucking her eyebrows while telling you, "Oh, by the way, Julia wanted to speak to you, she seems very worried about you. She is such a sweet girl. It''s a shame that she isn''t more talkative in school." You reply, "I agree. I will go speak with her." You then give Katja a nod before stepping away.'
-		'<center><b><h4><font color=#ff00cc><<"<<$pcs_firstname>> [<<$pcs_nickname>>] <<$pcs_lastname>>">></font></h4></b></center>'
-		*pl '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-		act 'Walk away':VKKatjaChat = 1 & gt 'SoniaHome', 'Bedroom'
-	else
-		'You approach Katja and she continues tweezing her eyebrow as she tells you, "You should talk to Julia then shower before Sonia''s mother gets home. You also check up on Sonia. I''m sure that she will be glad to see you walking around." You nod as you walk toward the hallway.'
-		act 'Walk away':gt 'SoniaHome', 'Hallway'
-	end
-end
-
-if $ARGS[0] = 'Katja Chat 2':
-	cls
-	VKKatjaChat = 2
-	gs'stat'
-	'<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>'
-	'You sit down next to Katja, and she turns to you. "I know that I said that I wouldn''t lecture you, but that boy Niko is not what he seems. He doesn''t care about you, he is just trying to use you. I only tell you this because I care about you. Don''t let this punk corrupt you." You look at your feet whie you consider what she said. Katja begins rubbing on your shoulders, "You can do better then him <<$pcs_firstname>>. Don''t let him trick you into believing otherwise. I just needed to tell you that before I left. Please stay safe <<$pcs_firstname>>. You are too good a girl to be used like that." Katja gets up then waves goodbye, as she walks out of the bedroom.'
-
-	act 'Walk away':gt 'SoniaHome', 'Bedroom'
-end
-
-if $ARGS[0] = 'Katja Reminder':
-	cls
-	gs'stat'
-	'<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>'
-	'As you approach the bathroom door, Katja turns to you then says, "Have you spoken to Julia and Sonia? They were both worried about you, and would love to see you up and about." You reply, "I haven''t yet but I will visit them right now. i wouldn''t want to leave them to worry about me." You turn around, and walk away.'
-
-	act 'Walk away':gt 'SoniaHome', 'Bedroom'
-end
-
-if $ARGS[0] = 'Julia Chat':
-	cls
-	gs'stat'
-	'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-	if VKJuliaChat = 0:
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia3.jpg"></center>'
-		'As soon as you approach, Julia turns to you before flashing you a smile. "<<$pcs_firstname>> you''re up. How are you feeling?" You return the smile, as you reply, "I''m feeling much better. i hope I didn''t worry you." Julia giggles before replying, "I''m just glad that you''re ok. I have never seen anyone go through as much as you did today, but I''m sure everything will work out in the end." You reply, "I can only hope." Julia responds, "Try not to let things get to you." You reply, "Don''t worry I won''t." Julia says, "Good, I will always be around, if you want to talk."'
-		*nl
-		'You respond, "Thank you, for everything you all have done for me. I shutter to think of what would have happened to me, if you weren''t around." Julia replies with a warm smile before saying, "You are very welcome. Now you should take a relaxing shower before Sonia finishes with her treats."'
-		act 'Walk away':VKJuliaChat = 1 & gt 'SoniaHome', 'Livingroom'
-	else
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia2.jpg"></center>'
-		'When you approach Julia, she says, "Is there something else you need?" You reply, "I just wanted to know where the bathroom is." Julia points toward the bedroom. "Sonia''s bathroom is in her bedroom...I wish I had a bathroom in my bedroom." You reply, "As do I." You both giggle before you walk back into the hallway.'
-		act 'Walk away':gt 'SoniaHome', 'Hallway'
-	end
-end
-
-if $ARGS[0] = 'Julia Chat 2':
-	cls
-	gs'stat'
-	'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia2.jpg"></center>'
-	'As you approach Julia, she asks, "How did you like the cupcakes? I found them very tasty." You reply, "They were super yummy, Sonia could win a cooking contest, if we had those, that is." Julia giggles before asking, "We are going to be leaving in a bit, and I wanted to ask you...Would you like to walk home with me?"'
-
-	act 'I would love too':
-		cls
-		VKJuliaChat = 4
-		gs'stat'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia3.jpg"></center>'
-		'Julia''s eyes light up, as she responds, "Great are you ready to head out now or would you like to speak to Sonia, or Katja first?"'
-
-		act 'Stay to chat with Sonia, and Katja':gt 'SoniaHome', 'Livingroom'
-
-		act 'Leave house with Julia':gt 'SoniaHome', 'Julia Walk'
-	end
-
-	act 'I can''t right now':
-		cls
-		VKJuliaChat = 3
-		gs'stat'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia2.jpg"></center>'
-		'"I would love too, but I have other places I need to be today, maybe next time." Julia lowers her head, "Ok I guess...Just stay safe <<$pcs_firstname>>. I...I''m concerned for you." You reply, "That is really sweet Julia, but I''m fine." Julia responds, "I''m glad to hear that. Goodbye <<$pcs_firstname>>." Julia then walks out of the house while giving both, you, and Sonia a friendly smile.'
-
-		act 'Wave goodbye':gt 'SoniaHome', 'Livingroom'
-	end
-end
-
-if $ARGS[0] = 'Julia Chat 3':
-	cls
-	gs'stat'
-	'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/livingroom/julia2.jpg"></center>'
-	'As you walk up to Julia, she asks, "Would you like to leave now?"'
-
-	act 'Leave house with Julia':gt 'SoniaHome', 'Julia Walk'
-
-	act 'Not yet':gt 'SoniaHome', 'Livingroom'
-end
-
-if $ARGS[0] = 'Julia Walk':
-	cls
-	minut += 5
-	NikoAftermath = 0
-	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/soniasmile.jpg"></center>'
-	'You, and Julia begin walking toward the front door. Sonia asks, "Are you two ready to head out?" You both nod simultaneously as Sonia holds the door open for you. As you are walking past Sonia, she leans forward then whispers in your ear, "Don''t forget what I said earlier. Whatever makes you happier, is the path you should follow. What''s the point of living a boring life?" She then gives you a wink, as you and Julia head into town.'
-
-	act 'Continue walking':
-		cls
-		gs'stat'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/love/park/julia1.jpg"></center>'
-		'You and Julia continue walking in silence until you begin walking past the park when Julia asks, "Would you like to stop by the park?"'
-
-		act 'Sure':gt 'SoniaHome', 'Julia Park'
-
-		act 'It''s getting too late':
-			cls
-			minut += 10
-			gs'stat'
-			'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/love/sad1.jpg"></center>'
-			'Julia lowers her head, "Oh, ok then, sorry for asking." You both walk home in silence. When you reach your door Julia says, "Stay safe <<$pcs_firstname>>, and remember to do whatever you feel is right. Goodbye." You wave goodbye to Julia, as she walks away.'
-
-			act 'Enter your apartment':gt 'korrPar'
-		end
-	end
-end
-
-if $ARGS[0] = 'Julia Park':
-	cls
-	minut += 5
-	gs'stat'
-	'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
-	'You, and Julia walk through the park while having small talk until you sit down on a bench, and Julia sits down next to you. Julia smiles, as she asks, "What do you plan to do with Niko?" You reply, "I don''t know yet. I need to sleep on it." Julia nods slowly, "I guess that''s fair, I''m just worried about you. No one can go through what you did, and be unphased." You nod, as you reply, "Nothing will be the same, I know that, but I can still choose where I go from here." Julia places her hand on your knee. "You don''t need to be alone in this. If you ever need anything then you can always talk to me." You give Julia a warm smile as you reply, "That''s so sweet of you, but why do you care so much about what happens to me? I''m no one special."'
-	*nl
-	if SexTalkJulia = 4 or JuliaMilovQW >= 10:
-		'"I..um..care for you, I..." Julia remains silent for a few seconds, as she rubs her arm while staring at the ground, in front of her.'
-		act 'Kiss her':VKJuliaKiss = 1 & gt 'SoniaHome', 'Julia Kiss'
-		act 'Change subject':gt 'SoniaHome', 'Julia Park 2'
-	else
-		'"I just couldn''t leave you like that. You looked so scared, and helpless. I needed to help in any way I can." You place your hand on her knee, "Thank you Julia. You saved me." Julia''s face grows red, as she replies, "I didn''t do it alone, but you''re welcome." Julia gives you a meek smile.'
-		act 'Continue talking':gt 'SoniaHome', 'Julia Park 2'
-	end
-end
-
-if $ARGS[0] = 'Julia Park 2':
-	cls
-	minut += 15
-	gs'stat'
-	'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big12.jpg"></center>'
-	'You, and Julia continue chatting for a few minutes before Julia looks at her phone then says, "Wow, I can''t believe it gotten so late. We should really get home." You both walk home.  When you reach your door Julia says, "Stay safe <<$pcs_firstname>>, and remember to follow your heart. Have a good night." You then wave goodbye to Julia, as she walks away.'
-
-	act 'Enter your apartment':gt 'korrPar'
-end
-
-if $ARGS[0] = 'Julia Kiss':
-	cls
-	gs'stat'
-	'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/julia/love/kiss1.mp4"></video></center>'
-	'You place your hand on Julia''s cheek then gently pull her face to yours. You both share a passionate kiss for what feels like two minutes. After you finish, you both stare into each others eyes, as you whisper to her, "Thank you for saving me Julia. i will never forget what you have done for me." Julia''s face is very red, as she replies, "I would do anything for you. You only need to ask." You reply, "You''re so sweet Julia, and I am so lucky to have you." Julia gives you a trembling smile before she quickly darts forward, giving you another passionate kiss.'
-	*nl
-	'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/julia/love/park/kiss1.mp4"></video></center>'
-	gs 'arousal', 'kiss', 5
-	gs'stat'
-
-	act 'Finish kissing':
-		cls
-		gs'stat'
-		'<center><b><h4><font color=#00eaff><<"Julia Milov">></font></h4></b></center>'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/love/park/julia1.jpg"></center>'
-		'After a long passionate kiss, Julia begins giggling playfully then checks her phone before saying, "It''s getting late, maybe we should start heading home." You reply, "Sure, let''s walk home." As you are walking home, Julia wraps her fingers around yours then gives you an innocent smile. When you arrive at your apartment, Julia says, "Please stay safe <<$pcs_firstname>>, I care for you so much... Just remember to follow your heart, and I''m sure that everything will work out for you. Have a good night." Julia then gives you a soft kiss before walking away while looking back at you with an innocent smile.'
-		*nl
-		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/julia/love/kiss1.mp4"></video></center>'
-		gs 'arousal', 'kiss', 10
-		gs 'arousal', 'end'
-		gs'stat'
-
-		act 'Enter your apartment':gt 'korrPar'
-	end
-end
-
---- SoniaHome ---------------------------------
-

+ 127 - 90
locations/abduction.qsrc

@@ -42,7 +42,7 @@ if $ARGS[0] = 'abdRoomFirstChaining':
 	'"Shut up, slut. Usually we torture you for fun as long as we want. When you become broken enough, we sell you to the highest bidder."'
 	'"You cannot do this to me! It''s illegal!'
 	'"Ha, who do you think are our best customers? Politicians, police officers, businessmen... We have our cover. So you should shut up and get used to it!"'
-	'The man leaves without saying another word, even as you are cry and yell at him...'
+	'The man leaves without saying another word, even as you cry and yell at him...'
 	gs 'underwear', 'remove'
 	painkiller_bak = painkiller
 	prezik_bak = prezik
@@ -106,7 +106,7 @@ if $ARGS[0] = 'abdSomeoneComing':
 	minut += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/downstairs2.jpg"></center>'
-	'Steps can be heard - someone is coming down the stairs.'
+	'You hear the sound of footsteps getting louder - someone is coming down the stairs.'
 
 	if pcs_leghair > 3 or pcs_pubes > 3:
 		minut += 20
@@ -128,30 +128,31 @@ if $ARGS[0] = 'abdSomeoneComing':
 		if broken = 0:
 			'You start to tremble in fear of what is going to happen to you next.'
 			act 'Cower in panic on your bed':gt 'abduction', 'abdRape'
+			
+			if rapeCount >= 5: act 'Plead that you cannot bear anymore rough treatment':gt 'abduction', 'abdBreak1'
+		else
+		
 		end
 
-		if rapeCount >= 5 and broken = 0:
-			act 'Plead that you cannot bear anymore rough treatment':gt 'abduction', 'abdBreak1'
-		end
-
-		saleChance = (broken + tortureCount + rapeCount + abdCustomerCount) - 20
-		if broken >= 1:
-			saleChanceRand = rand(1, 100)
-			customerChance = rand(1, 100)
-			painkillerChance = rand(1, 100)
-			buyoutChance = rand(1, 100)
+		buyoutChance = (broken + tortureCount + rapeCount + abdCustomerCount) - 20
+		saleChance = (broken + tortureCount + rapeCount + abdCustomerCount) - 10
+		if broken > 0:
+			saleChanceRand = rand(1,100)
+			customerChance = rand(1,100)
+			painkillerChance = rand(1,100)
+			buyoutChanceRand = rand(1,100)
 			if broken < 10:
 				act 'Welcome back, Master.':gt 'abduction', 'abdBrokenAsk'
 			elseif (broken >= 10 and abdTools = 0):
 				act 'Welcome back, Master.':gt 'abduction', 'abdBrokenGiveTools'
 			else
 				if customerChance <= 50:
-					act 'Welcome back, master':gt 'abductionCustomer', 'abdCustomerGate'
+					act 'Welcome back, Master':gt 'abductionCustomer', 'abdCustomerGate'
 					abdCustomerCount += 1
-				elseif abdCustomerCount > 5 and buyoutChance <= (2 * abdCustomerCount):
+				elseif abdCustomerCount > 5 and buyoutChanceRand <= (2 * buyoutChance):
 					act 'Welcome back, Master':gt 'abductionCustomer', 'abdCustomerGateBuyout'
 				else
-					if abdCustomerCount > 5 and saleChanceRand <= (2 * abdCustomerCount):
+					if abdCustomerCount > 5 and saleChanceRand <= (2 * saleChance):
 						'Master: "I have some good news for you slave."'
 						act 'Yes Master?':gt 'abduction', 'abdBeSold'
 					else
@@ -172,10 +173,21 @@ if $ARGS[0] = 'abdExamStart':
 	menu_off = 1
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/examroom.jpg"></center>'
-	'You are unblinded in a very bright room, at first not able to see anything.'
+	'The blindfold is removed and you find yourself in a small white room. It is very bright and at first you can barely see.'
 	'As your eyes adjust, you can see that it is some kind of examination room, distantly reminding you of a gynecologists office.'
 	'The man orders you to sit in the chair.'
-	act 'Resist':gt 'abduction', 'abdExamResist'
+	
+	gs 'willpower', 'misc', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Resist (<<will_cost>> Willpower)':
+			gs 'willpower', 'misc', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'abduction', 'abdExamResist'
+		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 'Obey':gt 'abduction', 'abdExamObey'
 end
 
@@ -185,10 +197,10 @@ if $ARGS[0] = 'abdExamResist':
 	'<center><video autoplay loop src="images/locations/shared/abduction/examslap.mp4"></video></center>'
 	'Being scared of what they''ll do to you, you start yelling and shaking to get loose of the leash.'
 	'Your captor is very strong and your leash and cuffs make your attempt futile.'
-	'He catches you, knocks you down to the ground and slaps your face hard.'
+	'He grabs you, knocks you down to the ground and slaps your face hard.'
 	'"You''re only making it harder, bitch."'
-	'With these words he grabs you like you weigh nothing and throws you on the chair and restrains you.'
-	'He then sits down in a chair opposite to you, located in the far corner of the room.'
+	'With these words he picks you up like you weigh nothing, pushes you in the chair and restrains you.'
+	'He then sits down in a chair over in the far corner of the room.'
 	act 'Continue':gt 'abduction', 'abdExam1'
 end
 
@@ -198,7 +210,7 @@ if $ARGS[0] = 'abdExamObey':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/examsit.jpg"></center>'
 	'Willingly, like a slave you obviously just became, you climb up the chair and lie there, wondering what perverse things are going to happen to you.'
 	'The man ties you up anyway, probably to make sure you don''t try to escape after they start. It makes you even more nervous.'
-	'He then sits down in a chair opposite to you, located in the far corner of the room.'
+	'He then sits down in a chair over in the far corner of the room.'
 	act 'Continue':gt 'abduction', 'abdExam1'
 end
 
@@ -217,7 +229,9 @@ if $ARGS[0] = 'abdExam1':
 		'"Heh, I see."'
 		'He continues in the usual report of his findings.'
 	end
-	"Regarding her usage levels, her throat is <<$throattipe>>. <<$pcs_ass>>."
+	'He continues to examine every inch of you. "Regarding her usage levels:"'
+	'He shines a light in your mouth, and says, "Her throat is <<$throattipe>>."'
+	'Next he feels a finger around your ass, "And her ass is <<$anustipe>>."'
 	'He pulls his finger out of your ass and finally reaches for your pussy.'
 	if pcs_vag = 0:
 		'"Oh, and you''ll like this; Her pussy is a virgin one."'
@@ -225,7 +239,7 @@ if $ARGS[0] = 'abdExam1':
 	else
 		'"And her pussy is <<$vaginatipe>>.'
 	end
-	'The doctor leaves your body alone and prepares several needles filled with unknown fluids.'
+	'The doctor finally takes his hands off of you and prepares several needles filled with unknown fluids.'
 
 	act 'Continue':gt 'abduction', 'abdExam2'
 end
@@ -234,10 +248,9 @@ if $ARGS[0] = 'abdExam2':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/exam2.jpg"></center>'
-	'The doctor leaves your body alone and prepares several needles filled with unknown fluids.'
 	'"Now there, our little slave, we will make sure you are healthy and ready to be trained."'
-	'He injects all the solutions into you.'
-	'The examination is at an end. The doctor leaves, you are untied, blindfolded again and led back down into the basement.'
+	'He quickly injects all the solutions into one of your arms, "The examination is now over."'
+	'The doctor leaves, and the man puts your shackles and blindfold back on and leads you back down into the basement.'
 	gs 'medical_din','healSTDs'
 
 	examed = 1
@@ -277,24 +290,33 @@ if $ARGS[0] = 'abdBreak1':
 	'"You don''t understand bitch. You will leave this place, in the end. As a broken sex slave or as a dead body."'
 	'"But..."'
 	'"You will be sold to someone as a slave. Or if you won''t accept that role, you will be utilized for the more perverted needs of our customers. Those girls usually don''t survive for long.'
-	'(you nervously gulp)'
-	'"Now show me what sex slave you are."'
+	'You feel a slight sense of dread as your mind races to think of what horrors might await you.'
+	'"Now show me what a good sex slave you are."'
 
 	tortureType = rand(1,3)
-	act 'Spit in his face':gt 'abduction', 'abdTorture'
+	gs 'willpower', 'misc', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Spit in his face (<<will_cost>> Willpower</font>)':
+			gs 'willpower', 'misc', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'abduction', 'abdTorture'
+		end
+	else
+		act 'Spit in his face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 
 	if rapeCount <= 10:
-		act 'Say nothing and crawl back to your bed':gt 'abduction', 'abdRape'
+		act 'Say nothing and crawl back to your bed': gt 'abduction', 'abdRape'
 	end
 
 	if tortureCount >= 5 or rapeCount >= 10:
-		if broken = 1 and pcs_vag > 0:
-			act 'Please fuck my pussy, Master':gt 'abduction', 'abdBreak2FuckA1'
+		if broken > 0:
 			act 'Please fuck my mouth, Master':gt 'abduction', 'abdBreak2FuckB1'
-		elseif pcs_vag > 0:
-			act 'You... you are my master. Please use me...':gt 'abduction', 'abdBreak2FuckA1'
+			if pcs_vag > 0: act 'Please fuck my pussy, Master':gt 'abduction', 'abdBreak2FuckA1'
 		else
-			act 'You... you are my master. Please use me...':gt 'abduction', 'abdBreak2FuckB1'
+			act 'You... you are my master. Please accept my mouth for your use...':gt 'abduction', 'abdBreak2FuckB1'
+			if pcs_vag > 0: act 'You... you are my master. Please accept my pussy for your use...':gt 'abduction', 'abdBreak2FuckA1'
 		end
 	end
 end
@@ -303,11 +325,21 @@ if $ARGS[0] = 'abdBrokenGivePainkiller':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/pill1.jpg"></center>'
-	'Master: "You have been a good slave so far. Good slaves are rewarded."'
+	'Your master approaches you, "You have been a good slave so far. Good slaves are rewarded."'
 	'He hands you a single painkiller pill.'
 
 	act 'Take and swallow it':gt 'abduction', 'abdBrokenGivePainkillerYes'
-	act 'Refuse and keep your mouth shut':gt 'abduction', 'abdBrokenGivePainkillerNo'
+	gs 'willpower', 'misc', 'resist', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse and keep your mouth shut (<<will_cost>> Willpower)':
+			gs 'willpower', 'misc', 'resist', 'easy'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			gt 'abduction', 'abdBrokenGivePainkillerNo'
+		end
+	else
+		act 'Refuse and keep your mouth shut (<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] = 'abdBrokenGivePainkillerYes':
@@ -315,7 +347,6 @@ if $ARGS[0] = 'abdBrokenGivePainkillerYes':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/pill2.jpg"></center>'
 	'You happily take the pill and swallow it immediately.'
-	sub += 2
 	gs 'stat'
 	painkillerGive = rand(1,100)
 	if painkillerGive > 20 and broken >= 10:
@@ -329,8 +360,8 @@ if $ARGS[0] = 'abdBrokenGivePainkillerNo':
 	*clr & cla
 	menu_off = 1
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/pill1.mp4"></video></center>'
-	'Master: "Refusing a gift? It seems like this slaveslut needs to be reminded of her place."'
-	'He ties you down ontop of a table, securing your head.'
+	'You see anger flash across your master''s face. "Refusing a gift? It seems like this slave slut needs to be reminded of her place."'
+	'He ties you down on top of a table, securing your head.'
 	'Some devious device is attached to your nose, pulling your head backwards. It forces you to open your mouth slightly.'
 	'Your master takes a clamp and a pulls your tongue out, tightly and painfully sqeezing it.'
 	'He then secures the pill on top of a dildo and pushes the tip down your throat.'
@@ -342,38 +373,30 @@ if $ARGS[0] = 'abdBrokenGivePainkillerNo':
 	pain['tongue'] += 5
 	pain['throat'] += 5
 	pain['nose'] += 5
-	sub -= 2
 	gs 'stat'
 	act 'Continue':gt 'abduction', 'abdTorture'
 end
 
 if $ARGS[0] = 'abdBrokenAsk':
 	menu_off = 1
-	'Master: "Good. What do you want me to do to you, slaveslut?"'
-	sub += 5
 	gs 'stat'
-	if pcs_vag > 0:
-		act 'Please fuck my pussy, Master':gt 'abduction', 'abdBreak2FuckA1'
-	end
+	
+	'Your master responds, "Very good. What do you want me to do to you, slave slut?"'
+	
 	act 'Please fuck my mouth, Master':gt 'abduction', 'abdBreak2FuckB1'
-	if broken >= 3 and sub >= 70:
-		sub += 3
-		gs 'stat'
-		act 'Please rape me, Master':gt 'abduction', 'abdRape'
-	end
-	if broken >= 5 and sub >= 90:
-		sub += 5
-		gs 'stat'
-		act 'Please punish me, Master':gt 'abduction', 'abdTorture'
-	end
+	
+	if pcs_vag > 0: act 'Please fuck my pussy, Master':gt 'abduction', 'abdBreak2FuckA1'
+	
+	if broken >= 5: act 'Please rape me, Master':gt 'abduction', 'abdRape'
+
+	if broken >= 10: act 'Please punish me, Master':gt 'abduction', 'abdTorture'
 end
 
 if $ARGS[0] = 'abdBreak2FuckA1':
 	*clr & cla
 	menu_off = 1
-	sub += 5
 	broken += 1
-	gs 'cum_call', '', 'master', 0,'', spot, svol
+	gs 'cum_call', '', 'Master', 0,'', spot, svol
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokena1.jpg"></center>'
 	'Your tormentor unchains you and throws you on your dirty bed.'
 	'Spreading your legs wide apart, you spit on your hand and smear it on your pussy, saying: "Come, take me, Master."'
@@ -388,12 +411,12 @@ end
 if $ARGS[0] = 'abdBreak2FuckA2':
 	*clr & cla
 	menu_off = 1
-	gs 'cum_call', 'mouth', 'master', 0,'', spot, svol
+	gs 'cum_call', 'mouth', 'Master', 0,'', spot, svol
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokena2.jpg"></center>'
 	'Fucking you wildly for some time, your master stops before he orgasms.'
 	'He unties your hands and legs and instead ties your hands behind your back.'
 	'Knowing what he expects you to do, you open your mouth wide and await his cock.'
-	'After some mouthfucking and gagging, he comes in your mouth.'
+	'After some mouthfucking and gagging, he cums in your mouth.'
 	if broken = 1:
 		*nl
 		'"Very good, slave. You are on a path to redeem yourself." With these words he releases your arms, secures you back in your usual location and then leaves.'
@@ -409,10 +432,9 @@ if $ARGS[0] = 'abdBreak2FuckB1':
 	*clr & cla
 	menu_off = 1
 	broken += 1
-	sub += 5
 	gs 'cum_call', 'mouth', 'Master'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokenb1.jpg"></center>'
-	'Your tormentor unchains you and leads you to a device.'
+	'Your master unchains you and leads you to a device.'
 	'You can see that it''s meant to restrain a person in a lying position, with their head at the same height as someone''s crotch.'
 	'You want to please your master, so you lie down on it straight away and dutifully await the attaching of the restraints.'
 	'After your master ties you, he walks up to your head. Your already open mouth is then roughly fucked by his member.'
@@ -427,12 +449,16 @@ if $ARGS[0] = 'abdBreak2FuckB2':
 	*clr & cla
 	menu_off = 1
 	pain['asshole'] += 1
-	broken += 1
-	gs 'cum_call', 'anus', 'Master'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokenb2.jpg"></center>'
 	'Surprisingly his dick is not wearing out. He moves behind you and starts to penetrate your ass.'
 	'Trying to relax your anus as much as you can, he enters you quite easily. Just a small reminder of pain goes through your muscles.'
 	'Fucking you furiously for some time, your master cums deep inside you.'
+	if broken = 1:
+		*nl
+		'"Very good, slave. You are on a path to redeem yourself." With these words he releases your arms, secures you back in your usual location and then leaves.'
+	end
+	broken += 1
+	gs 'cum_call', 'anus', 'Master'
 	gs 'arousal', 'anal', 20, 'sub', 'bound'
 	gs 'stat'
 
@@ -459,7 +485,7 @@ if $ARGS[0] = 'abdEscape':
 	minut += 5
 	gs 'stat'
 	act 'Try to break the lock':gt 'abduction', 'abdEscapeWindow1'
-	act 'Go back to your bed and fix your leash back to the wall':gt 'abduction', 'abdRoom'
+	act 'Go back to your bed and reattach your leash to the wall':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdEscapeWindow1':
@@ -471,13 +497,13 @@ if $ARGS[0] = 'abdEscapeWindow1':
 	gs 'stat'
 	breakChance = rand(1, 100)
 	if breakChance <= 50:
-		'You hear someone slam a door. Maybe your captors are coming!'
+		'You hear someone slam a door nearby. Maybe your master is returning!'
 		'But you are so close to unscrewing the window! You decide to...'
-		act 'Run back to your bed and leash your chain back':gt 'abduction', 'abdSomeoneComing'
+		act 'Run back to your bed and reattach your leash to the wall':gt 'abduction', 'abdSomeoneComing'
 		act 'Try to unscrew it desperately':gt 'abduction', 'abdEscapeWindow2'
 	else
 		'No luck, the window is screwed in very tight.'
-		act 'Go back':gt 'abduction', 'abdEscape'
+		act 'Go back':gt 'abduction', 'abdFood'
 	end
 end
 
@@ -488,7 +514,7 @@ if $ARGS[0] = 'abdEscapeWindow2':
 	'You continue in your attempts to break the window.'
 	minut += 5
 	gs 'stat'
-	breakChance = rand(1, 100)
+	breakChance = rand(1,100)
 	if breakChance <= 90:
 		'You desperately try to unscrew it, but you run out of time and luck.'
 		'Your master comes into the basement and catches you running around unleashed. This won''t end well for you...'
@@ -555,8 +581,8 @@ if $ARGS[0] = 'abdFood':
 	'There are some water bottles and dried food beneath your bed.'
 	'A half broken, dirty mirror provides some means to inspect your appearance.'
 	'In the corner there is something remotely similar to a shower, with cold water only, though.'
-	'There''s enough space to do some basic <a href="exec:gt ''abduction'', ''abdpushup''">exercise</a>.'
-	chainChance = rand(1, 100)
+	'There''s enough space to do some basic <a href="exec:gt ''abduction'', ''abdexercise''">exercise</a>.'
+	chainChance = rand(1,100)
 	if chainChance <= 20 and (rapeCount > 5 or tortureCount > 5):
 		'Suddenly you spot a loose chainlink on your leash. You try to manipulate it and you manage to free yourself from the wall.'
 		'<a href="exec:gt ''abduction'', ''abdEscape''">Go to the window</a>'
@@ -653,42 +679,54 @@ if $ARGS[0] = 'abdFood':
 	act 'Get back to your bed':gt 'abduction', 'abdRoom'
 end
 
-if $ARGS[0] = 'abdpushup':
-	$loc = 'abduction'
-	$metka = 'abdFood'
+if $ARGS[0] = 'abdexercise':
 	*clr & cla
 	menu_off = 1
-	'<center><video autoplay loop src="images/pc/activities/push_naked.mp4"></video></center>'
 	gs 'exercise', 'tier2', 30, 'stren_exp'
+	
+	'<center><video autoplay loop src="images/pc/activities/push_naked.mp4"></video></center>'
+	*nl
 	'You do push-ups for <<$timestring>> minutes, improving your strength.'
 
 	randpushfact = rand(-5,5)
-	if pcs_energy < 40: randpushfact -= RAND(1,10)
+	if pcs_energy < 40: randpushfact -= rand(1,10)
 
 	pushnum = (pcs_stren * pcs_sleep * pcs_health)  / ( 1 * 67 *  healthmax) + randpushfact
 
 	if pushnum < 1: pushnum = rand(1,5)
-	KILLVAR 'randpushfact'
+	killvar 'randpushfact'
 	'<br>You managed to do <<pushnum>> push-ups. Your previous record is <<pushrecord>>.'
 
 	if pushrecord < pushnum:pushrecord = pushnum & 'This is a new record!'
 	gs 'stat'
-	act 'Finish': gt $loc, $metka
+	
+	act 'Continue':
+		*clr & cla
+		menu_off = 1
+		gs 'exercise', 'tier2', 30, 'vital_exp'
+		
+		'<center><video autoplay loop src="images/pc/activities/abdominal_naked.mp4"></video></center>'
+		*nl
+		'You do a series of abdominal exercises for <<$timestring>> minutes, improving your endurance.'
+		
+		gs 'stat'
+	
+		act 'Finish': gt 'abduction', 'abdFood'
+	end
 end
 
 if $ARGS[0] = 'abdRape':
 	*clr & cla
 	menu_off = 1
 	rapeCount += 1
-	rapeType = rand(1, 5)
-	sub += 3
+	rapeType = rand(1,5)
 	if broken < 10:pcs_mood = 5
 
 	if rapeType = 1:
 		pain['mouth'] += 3
-		gs 'cum_call', 'mouth', 'torturer'
-		i = rand(1, 4)
-		gifornot = rand (1, 100)
+		gs 'cum_call', 'mouth', 'Master'
+		i = rand(1,4)
+		gifornot = rand(1,100)
 		if gifornot > 50:
 			'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/mouthgagblow<<i>>.jpg"></center>'
 		else
@@ -702,8 +740,8 @@ if $ARGS[0] = 'abdRape':
 		act 'Continue':gt 'abduction', 'abdRoom'
 	elseif rapeType = 2 and pcs_vag > 0:
 		pain['vaginal'] += 10
-		gs 'cum_call', '', 'torturer', 0
-		i = rand(1, 5)
+		gs 'cum_call', '', 'Master', 0
+		i = rand(1,5)
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/fucktiedpussy<<i>>.jpg"></center>'
 		'Your hands are tied and you''re bent over the bed.'
 		'The guy starts to penetrate your pussy without warning. Sharp pain goes through your belly as your pussy is not wet enough to receive a dick.'
@@ -713,8 +751,8 @@ if $ARGS[0] = 'abdRape':
 		act 'Continue':gt 'abduction', 'abdRoom'
 	elseif rapeType = 3:
 		pain['asshole'] += 10
-		gs 'cum_call', 'anus', 'torturer'
-		gifornot = rand (1, 100)
+		gs 'cum_call', 'anus', 'Master'
+		gifornot = rand (1,100)
 		if gifornot > 50:
 			'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/fucktiedanal'+rand(1,4)+'.jpg"></center>'
 		else
@@ -758,7 +796,7 @@ if $ARGS[0] = 'abdRape':
 	else
 		pcs_throat += 1
 		pain['mouth'] += 5
-		gs 'cum_call', 'mouth', 'Torturer'
+		gs 'cum_call', 'mouth', 'Master'
 
 		i = rand(1, 4)
 		gifornot = rand (1, 100)
@@ -777,7 +815,6 @@ if $ARGS[0] = 'abdRape':
 end
 
 if $ARGS[0] = 'abdTorture':
-	sub += 5
 	tortureType = rand(1,4)
 	tortureCount += 1
 	gs 'stat'
@@ -1005,7 +1042,7 @@ if $ARGS[0] = 'abdTortureD5':
 	pain['vaginal'] += 5
 	pcs_vag += 1
 	pcs_ass += 1
-	gs 'cum_call', 'mouth', 'Torturer'
+	gs 'cum_call', 'mouth', 'Master'
 	gs 'stat'
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/tortured5.mp4"></video></center>'
 	'Even though your head is spinning and everything is aching inside you, you are able to make him cum in few minutes.'

+ 172 - 58
locations/abductionCustomer.qsrc

@@ -2,7 +2,7 @@
 
 if $ARGS[0] = 'abdCustomerGate':
 	menu_off = 1
-	'Master: "Hello, slave slut."'
+	'Your master approaches you, "Hello, slave slut."'
 	'"I have a customer here, who came to rent you for a while. Do whatever he asks of you."'
 	buyout = 0
 	act 'Yes, Master.':gt 'abductionCustomer', 'abdCustomerGo'
@@ -10,7 +10,7 @@ end
 
 if $ARGS[0] = 'abdCustomerGateBuyout':
 	menu_off = 1
-	'Master: "Hello, slave slut."'
+	'Your master approaches you, "Hello, slave slut."'
 	'"I have a customer here, who came to rent you for a while. Do whatever he asks of you."'
 	buyout = 1
 	act 'Yes, Master.':gt 'abductionCustomer', 'abdCustomerGo'
@@ -20,7 +20,7 @@ if $ARGS[0] = 'abdCustomerGo':
 	menu_off = 1
 	minut += 5
 	gs 'stat'
-	i = rand(1, 3)
+	i = rand(1,3)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/ledonfour<<i>>.mp4"></video></center>'
 	'Your master removes your regular chains and puts you on a leash.'
 	'You are being led up the stairs into the house above your cellar.'
@@ -57,21 +57,21 @@ if $ARGS[0] = 'abdCustomer':
 	if RaceRand = 0:
 		$raceType = 'white'
 		dickChance = 30
-		charTypeRand += rand(-3, 2)
-		bodyTypeRand += rand(-2, 8)
-		heightTypeRand += rand(-1, 6)
+		charTypeRand += rand(-3,2)
+		bodyTypeRand += rand(-2,8)
+		heightTypeRand += rand(-1,6)
 	elseif RaceRand = 1:
 		$raceType = 'black'
 		dickChance = 40
-		charTypeRand += rand(0, 2)
-		bodyTypeRand += rand(0, 6)
-		heightTypeRand += rand(0, 6)
+		charTypeRand += rand(0,2)
+		bodyTypeRand += rand(0,6)
+		heightTypeRand += rand(0,6)
 	elseif RaceRand = 2:
 		$raceType = 'asian'
 		dickChance = 20
-		charTypeRand += rand(-2, 2)
-		bodyTypeRand += rand(-6, 2)
-		heightTypeRand += rand(-4, 1)
+		charTypeRand += rand(-2,2)
+		bodyTypeRand += rand(-6,2)
+		heightTypeRand += rand(-4,1)
 	end
 
 	if pcs_vag = 0:
@@ -79,7 +79,7 @@ if $ARGS[0] = 'abdCustomer':
 	elseif buyout = 1:
 		dick = 24
 	else
-		dickRand = rand(1, 100)
+		dickRand = rand(1,100)
 		if dickRand <= dickChance:
 			dick = rand(15, 40)
 		elseif dickRand <= (dickChance * 2):
@@ -96,25 +96,25 @@ if $ARGS[0] = 'abdCustomer':
 	! customer dick size
 	if dick >= 30:
 		$dick_girth = 'monstrous'
-		cumVol = rand(4, 5)
+		cumVol = rand(4,5)
 	elseif dick >= 25:
 		$dick_girth = 'huge'
 		cumVol += 1
-		cumVol = rand(3, 5)
+		cumVol = rand(3,5)
 	elseif dick >= 20:
 		$dick_girth = 'very big'
-		cumVol = rand(2, 5)
+		cumVol = rand(2,5)
 	elseif dick >= 15:
 		$dick_girth = 'big'
-		cumVol = rand(2, 4)
+		cumVol = rand(2,4)
 	elseif dick >= 10:
 		$dick_girth = 'regular'
 		cumVol -= 1
-		cumVol = rand(1, 4)
+		cumVol = rand(1,4)
 	else
 		$dick_girth = 'tiny'
 		cumVol -= 2
-		cumVol = rand(1, 3)
+		cumVol = rand(1,3)
 	end
 
 	! customer cum volume
@@ -180,7 +180,7 @@ if $ARGS[0] = 'abdCustomer':
 		'Right away you can see that he is just another bastard coming here to use your <<age>> years young body.'
 		'Your master leaves you in the center of the room, still kneeling with the leash attached to your collar.'
 		'As the door closes behind him, the customer slowly turns and you can finally see his face.'
-		act 'Look to his face':gt 'abductionCustomer', 'abdCustomer-buyout1'
+		act 'Look at his face':gt 'abductionCustomer', 'abdCustomer-buyout1'
 	else
 		'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
 		'The customer is a <<$heightType>> <<$bodyType>> <<$raceType>>.'
@@ -223,8 +223,18 @@ if $ARGS[0] = 'abdCustomer-buyout1':
 	'Then suddenly the look on <<$bName>>''s face changes from surprised to something else.'
 	'He comes up to you and gently caresses your face: "Plaything, you say? And do you like it?"'
 	'Surprised by such a question you wait with your answer:'
-	if sub > 95:
-		act 'Admit you like to be dominated, but this is too much':gt 'abductionCustomer', 'abdCustomer-buyout2'
+	
+	gs 'willpower', 'misc', 'self', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Admit you like to be dominated, but this is too much (<<will_cost>> Willpower)':
+			gs 'willpower', 'misc', 'self', 'hard'
+			gs 'willpower', 'pay', 'self'
+			gs 'stat'
+
+			gt 'abductionCustomer', 'abdCustomer-buyout2'
+		end
+	else
+		act 'Admit you like to be dominated, but this is too much (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	act 'Say you hate it':gt 'abductionCustomer', 'abdCustomer-buyout3'
 end
@@ -250,7 +260,18 @@ if $ARGS[0] = 'abdCustomer-buyout3':
 	'Stepping above you as you helplessly lay on the floor, he opens his zipper and pulls his dick out of his pants.'
 	'You can clearly see his <<dick>> cm long <<$dick_girth>> dick swing above you in the air.'
 	act 'Suck on it':gt 'abductionCustomer', 'abdCustomer-suckTip'
-	act 'Do nothing':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Do Nothing (<<will_cost>> Willpower)':
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
+		end
+	else
+		act 'Do Nothing (<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] = 'abdCustomer-buyout4':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefuckanalroughleonid2.jpg"></center>'
@@ -291,7 +312,7 @@ if $ARGS[0] = 'abdCustomer-virgin2':
 	pcs_mood = 5
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin2.mp4"></video></center>'
 	'He starts to undress, finishing off with his pants. As he pulls them down, you can finally can see his naked member fall out.'
-	'"With renewed terror you start to cry, because the sight of his <<dick>> cm thick <<$dick_girth>> fallus is just terrifying."'
+	'"With renewed terror you start to cry, because the sight of his <<dick>> cm thick <<$dick_girth>> phallus is just terrifying."'
 	gs 'stat'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin3'
 end
@@ -379,7 +400,7 @@ if $ARGS[0] = 'abdCustomer-virgin10':
 	minut += 15
 	pcs_mood = 5
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin10.mp4"></video></center>'
-	'A sound of the master coming from upstairs wakes you up.'
+	'The sound of your master coming downstairs wakes you up.'
 	'You must have fallen asleep from the exhaustion.'
 	*nl
 	'Kneel and stick your ass high in the air, slut.'
@@ -416,17 +437,39 @@ if $ARGS[0] = 'abdCustomer-unzip':
 	if pcs_throat < dick:
 		'It''s obvious that his <<$dick_girth>> dick is above your skill and you know you wouldn''t be able to swallow it whole.'	
 		act 'Suck the tip':gt 'abductionCustomer', 'abdCustomer-suckTip'
-		act 'Force yourself on his cock':gt 'abductionCustomer', 'abdCustomer-suckForceself'
+		gs 'willpower', 'bj', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Force yourself on his cock (<<will_cost>> Willpower)':
+				gs 'willpower', 'bj', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				
+				gt 'abductionCustomer', 'abdCustomer-suckForceself'
+			end
+		else
+			act 'Force yourself on his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	else
 		'Even though his dick is <<$dick_girth>>, you know you''d be able to take it all the way to the balls.'
 		act 'Suck the tip':gt 'abductionCustomer', 'abdCustomer-suckTip'
-		act 'Deepthroat':gt 'abductionCustomer', 'abdCustomer-suckDeep'
+		gs 'willpower', 'bj', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Deepthroat his cock (<<will_cost>> Willpower)':
+				gs 'willpower', 'bj', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				
+				gt 'abductionCustomer', 'abdCustomer-suckDeep'
+			end
+		else
+			act 'Deepthroat his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
 end
 
 if $ARGS[0] = 'abdCustomer-show':
 	minut += 10
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoretease<<i>>.mp4"></video></center>'
 	'You decide to tease the customer by showing him your sexy assets by jiggling your girly parts.'
 	'After some time behaving like a slut, it is obvious that he wants something more.'
@@ -434,8 +477,9 @@ if $ARGS[0] = 'abdCustomer-show':
 end
 
 if $ARGS[0] = 'abdCustomer-suckTip':
+	gs 'arousal', 'bj', 15, 'sub'
 	gs 'stat'
-	i = rand(1, 5)	
+	i = rand(1,5)	
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip<<i>>.mp4"></video></center>'
 	'You try as best as you can to suck the head of his <<dick>> cm sized <<$dick_girth>> dick.'
 	if pcs_throat < dick:
@@ -465,22 +509,43 @@ if $ARGS[0] = 'abdCustomer-suckTip':
 			act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
 		end
 		if pcs_throat < dick:
-			act 'Force yourself on his cock':gt 'abductionCustomer', 'abdCustomer-suckForceself'
+			gs 'willpower', 'bj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Force yourself on his cock (<<will_cost>> Willpower)':
+					gs 'willpower', 'bj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					
+					gt 'abductionCustomer', 'abdCustomer-suckForceself'
+				end
+			else
+				act 'Force yourself on his cock (<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 'Deepthroat':gt 'abductionCustomer', 'abdCustomer-suckDeep'
+			gs 'willpower', 'bj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Deepthroat his cock (<<will_cost>> Willpower)':
+					gs 'willpower', 'bj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					
+					gt 'abductionCustomer', 'abdCustomer-suckDeep'
+				end
+			else
+				act 'Deepthroat his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 		end
 	elseif $charType = 'kind':
 		'The customer seems pleased by your sucking skills, so you continue to tease the tip of his <<$dick_girth>> cock, looking at him with as much sensual abandon that you can muster under the present conditions.'
 		act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
 	end
-	gs 'arousal', 'bj', 15, 'sub'
 end
 
 if $ARGS[0] = 'abdCustomer-suckForceself':
 	pcs_throat += 1
 	pain['throat'] += throatDMG
 	gs 'stat'
-	i = rand(1, 3)
+	i = rand(1,3)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobselfforced<<i>>.mp4"></video></center>'
 	'Knowing you will probably hurt yourself, you force yourself on his <<dick>> cm long cock all the way down to the balls anyway.'
 	'You start gagging and saliva is everywhere, but the customer seems more content now.'
@@ -491,9 +556,10 @@ end
 if $ARGS[0] = 'abdCustomer-suckForced':
 	pain['throat'] += throatDMG * 2
 	pcs_throat += 2
+	gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat', 'humiliation'
 	gs 'stat'
 	endPunishment = 1
-	i = rand(1, 6)
+	i = rand(1,6)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobforced<<i>>.mp4"></video></center>'
 	if buyout = 1:
 		'<<$bName>> starts growling and suddenly pulls his cock out of your mouth.'
@@ -503,7 +569,7 @@ if $ARGS[0] = 'abdCustomer-suckForced':
 	'"What kind of slave are you when you can''t swallow my <<$dick_girth>> dick?"'
 	'He ties you up and forces his cock down your throat, showing you little to no concern.'
 	'You start to gag as he keeps pushing his member deep inside you, sometimes leaving you on the brink of passing out.'
-	vagOrAss = rand (0, 1)
+	vagOrAss = rand (0,1)
 	if buyout = 1:
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
 	else
@@ -513,16 +579,15 @@ if $ARGS[0] = 'abdCustomer-suckForced':
 			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
 		end
 	end
-	gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat', 'humiliation'
 end
 
 if $ARGS[0] = 'abdCustomer-suckDeep':
 	pcs_throat += 1
+	gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
 	gs 'stat'
-	i = rand(1, 6)
+	i = rand(1,6)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjob<<i>>.mp4"></video></center>'
 	'You swallow his <<$dick_girth>> cock all the way down to the balls.'
-	gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuck'
 end
 
@@ -536,7 +601,7 @@ if $ARGS[0] = 'abdCustomer-fuck':
 	if charType = 'sadistic':
 		'"What should I do to you next, bitch?"'
 	else
-		'So how do you want it next, luv?'
+		'So how do you want it next, love?'
 	end
 	'You are not entirely sure if he means that as a question or if he''s just saying that to himself.'
 
@@ -546,7 +611,7 @@ if $ARGS[0] = 'abdCustomer-fuck':
 		'"You thought I''m really interested in your slutty opinion?" He says laughing.'
 		'"A whore, and on top of that a slave whore, has no right to have an opinion."'
 		'You are unable to do anything except whimper like a small child. He ties you up and you know that it''s going to get even worse now.'
-		vagOrAss = rand (0, 1)
+		vagOrAss = rand (0,1)
 		if vagOrAss = 0:
 			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
 		else
@@ -555,7 +620,18 @@ if $ARGS[0] = 'abdCustomer-fuck':
 	else
 		'You decide to:'
 		act 'Be quiet':gt 'abductionCustomer', 'abdCustomer-decide'
-		act 'Beg him to be kind':gt 'abductionCustomer', 'abdCustomer-beg'
+		gs 'willpower', 'sex', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Beg him to be kind (<<will_cost>> Willpower)':
+				gs 'willpower', 'sex', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				
+				gt 'abductionCustomer', 'abdCustomer-beg'
+			end
+		else
+			act 'Beg him to be kind (<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
 
@@ -588,10 +664,8 @@ if $ARGS[0] = 'abdCustomer-beg':
 	minut += 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorebeg1.jpg"></center>'
-	'Please be kind to me Sir, I''m so afraid and sore... please!'
-	if dick >= 15:
-		'"I''m very afraid of your <<$dick_girth>> penis Sir!"'
-	end
+	'Please be kind to me sir, I''m so afraid and sore... please!'
+	if dick >= 15:'"I''m very afraid of your <<$dick_girth>> penis sir!"'
 	*nl
 	bekindChance = rand(1, 100)
 	endPunishment = 0
@@ -627,7 +701,7 @@ end
 if $ARGS[0] = 'abdCustomer-fuckAnal':
 	pcs_ass += 1
 	gs 'stat'
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal<<i>>.mp4"></video></center>'
 	'The customer puts some lubricant on his <<$dick_girth>> cock and penetrates your ass.'
 	'He doesn''t care much about your feelings but he''s also not exactly hurting you on purpose.'
@@ -636,10 +710,12 @@ if $ARGS[0] = 'abdCustomer-fuckAnal':
 		pain['asshole'] += assDMG
 		pain['tummy'] += assDMG
 		gs 'arousal', 'anal', 30, 'sub', 'rough'
+		gs 'stat'
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
 	else
 		'You have no problems accommodating his <<$dick_girth>> member.'
 		gs 'arousal', 'anal', 30, 'sub'
+		gs 'stat'
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-cumGate'
 	end
 
@@ -647,8 +723,9 @@ end
 
 if $ARGS[0] = 'abdCustomer-fuckAnalRough':
 	pcs_ass += 2
+	gs 'arousal', 'anal', 30, 'sub', 'rough', 'bound'
 	gs 'stat'
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanalrough<<i>>.mp4"></video></center>'
 	if buyout = 1:
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefuckanalroughleonid1.jpg"></center>'
@@ -682,8 +759,7 @@ if $ARGS[0] = 'abdCustomer-fuckAnalRough':
 		pain['tummy'] += assDMG
 		gs 'stat'
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
-	end
-	gs 'arousal', 'anal', 30, 'sub', 'rough', 'bound'
+	end	
 end
 
 if $ARGS[0] = 'abdCustomer-fuckAnalDeep':
@@ -723,7 +799,7 @@ end
 if $ARGS[0] = 'abdCustomer-fuckNormal':
 	pcs_vag += 1
 	gs 'stat'
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefucknormal<<i>>.mp4"></video></center>'
 	'The customer penetrates your pussy and fucks you.'
 	if vagDMG <= 0:
@@ -752,7 +828,7 @@ end
 if $ARGS[0] = 'abdCustomer-fuckRough':
 	pcs_vag += 2
 	gs 'stat'
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckrough<<i>>.mp4"></video></center>'
 	'The man takes you by your leash and positions your body as if it''s just meat to be used.'
 	'What comes next is an excruciatingly rough fuck that clearly shows he has no regard for all the pain you have to endure, whatsoever.'	
@@ -820,17 +896,55 @@ if $ARGS[0] = 'abdCustomer-cumGate':
 		'"Now <<$pcs_firstname>> you will be filled with my seed for the first time, so be sure to cherish the memory of this moment!"'
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'		
 	else
-		'"So where do you want me to put the deposit, luv?"'
+		'"So where do you want me to put the deposit, love?"'
+		
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
-		act 'Ask him to cum inside your pussy':gt 'abductionCustomer', 'abdCustomer-cumPussy'
-		act 'Ask him to cum inside your ass':gt 'abductionCustomer', 'abdCustomer-cumAss'
-		act 'Ask him to cum into your mouth':gt 'abductionCustomer', 'abdCustomer-cumMouth'
+		
 		act 'Ask him to cum on your face':gt 'abductionCustomer', 'abdCustomer-cumFace'
+		
+		gs 'willpower', 'cum_inside', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Ask him to cum inside your pussy (<<will_cost>> Willpower)':
+				gs 'willpower', 'cum_inside', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				
+				gt 'abductionCustomer', 'abdCustomer-cumPussy'
+			end
+		else
+			act 'Ask him to cum inside your pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		
+		gs 'willpower', 'cum_inside_anal', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Ask him to cum inside your ass (<<will_cost>> Willpower)':
+				gs 'willpower', 'cum_inside_anal', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				
+				gt 'abductionCustomer', 'abdCustomer-cumAss'
+			end
+		else
+			act 'Ask him to cum inside your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		
+		gs 'willpower', 'swallow', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Ask him to cum into your mouth (<<will_cost>> Willpower)':
+				gs 'willpower', 'swallow', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				
+				gt 'abductionCustomer', 'abdCustomer-cumMouth'
+			end
+		else
+			act 'Ask him to cum into your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
 end
 
 if $ARGS[0] = 'abdCustomer-cum':
-	cumRand = rand(1, 100)
+	cumRand = rand(1,100)
 	if cumRand > 75 and cumRand <= 100:
 		'He decides to cum inside your vagina.'
 		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumPussy'
@@ -847,7 +961,7 @@ if $ARGS[0] = 'abdCustomer-cum':
 end
 
 if $ARGS[0] = 'abdCustomer-cumPussy':
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy<<i>>.mp4"></video></center>'
 	if vagDMG > 0:
 		'As he delivers his <<$cumType>> amount of cum inside your vagina, you can feel the tip of his <<$dick_girth>> cock at your cervix and even a bit inside it.'
@@ -887,7 +1001,7 @@ if $ARGS[0] = 'abdCustomer-cumPussy':
 end
 
 if $ARGS[0] = 'abdCustomer-cumAss':
-	i = rand(1, 5)
+	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumass<<i>>.mp4"></video></center>'
 	if assDMG > 0:
 		'As he cums inside your anus, you can feel the banging of his <<$dick_girth>> cock against your intestinal wall.'

+ 94 - 64
locations/andrey.qsrc

@@ -212,12 +212,21 @@ if $ARGS[0] = 'punish':
 			'Mr. Sobulyagin scoffs at you, obviously not swayed so easily by tears. He looks at you in silence, his dark eyes roaming over your body slowly as he licks his lips. "Listen, I''m not a bad guy," he says as he stands from his chair and walks to the door. "I''m willing to give you another chance, but you need to <i>show me</i> how important this job really is to you..." He cups his balls through his slacks and gives them a light squeeze.'
 			*nl
 			'"Or you can leave and lose your job. It''s up to you, but those are your only options." He opens the door for you, allowing you to leave and lose your job if you don''t accept his offer.'
-			act 'Leave':
-				work = 0
-				young_shop_work = 2
-				young_shop_miss = 0
-				minut += 2
-				gt 'young_shop', 'start'
+			gs 'willpower', 'bj', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					work = 0
+					young_shop_work = 2
+					young_shop_miss = 0
+					minut += 2
+					gs 'willpower', 'bj', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					
+					gt 'young_shop', 'start'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 			act 'Accept his offer': gt 'andrey', 'fired1'
 		end
@@ -228,33 +237,41 @@ if $ARGS[0] = 'punish':
 		'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
 		*nl
 		'"Well look who decided to drag their ass into work today!" Mr. Sobulyagin''s expression twists into a scowl as he greets you at the store entrance. "I realize coming to work is difficult for you, but do you think you can spare me a moment and come into my office?" he says dryly. You sigh and follow him as he takes you into his office and closes the door. He nods and seems to be talking to himself as much as he is talking to you. He leans against his desk and cupping his crotch as he is smiling at you. "Well you know the deal if you want to keep your job."'
-		act 'Agree': gt 'andrey', 'fired1'
-		act 'Refuse and get fired':
-			cla
-			*clr
-			young_shop_work = 2
-			young_shop_miss = 0
-			char_honest += 5
-			work = 0
-			bonus_mood -= 50
-			minut +=15
-			'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
-			*nl
-			'"You''re right, and I''ve decided that I''m not doing you anymore favors to keep my job." Mr. Sobulyagin scowls at you but puts his dick away and pulls out a document from his desk drawer and begins to fill in the blanks. A few minutes later he hands you some papers and you sign them in silence.'
-			msg 'You are no longer employed at this store.'
-			if young_shop_salary > 0 or young_shop_bonus > 0:
-				money += young_shop_salary * 205 + young_shop_bonus * 205
-				'For working <b><<young_shop_salary>></b> days you get paid <b><<young_shop_salary * 205>></b>, with a bonus of <b><<young_shop_bonus * 205>></b> <b>₽</b>. Total income is <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b>'
-				'Mr. Sobulyagin. counts <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b> and hands it over to you.'
-				! reset money,young_shop_salary,young_shop_bonus to zero for a new week
-				young_shop_salary = 0
-				young_shop_bonus = 0
-			end
-			act 'Leave':
-				minut += 2
-				gt 'young_shop', 'start'
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse and get fired (<<will_cost>> Willpower)':
+				cla
+				*clr
+				young_shop_work = 2
+				young_shop_miss = 0
+				char_honest += 5
+				work = 0
+				bonus_mood -= 50
+				minut +=15
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
+				*nl
+				'"You''re right, and I''ve decided that I''m not doing you anymore favors to keep my job." Mr. Sobulyagin scowls at you but puts his dick away and pulls out a document from his desk drawer and begins to fill in the blanks. A few minutes later he hands you some papers and you sign them in silence.'
+				msg 'You are no longer employed at this store.'
+				if young_shop_salary > 0 or young_shop_bonus > 0:
+					money += young_shop_salary * 205 + young_shop_bonus * 205
+					'For working <b><<young_shop_salary>></b> days you get paid <b><<young_shop_salary * 205>></b>, with a bonus of <b><<young_shop_bonus * 205>></b> <b>₽</b>. Total income is <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b>'
+					'Mr. Sobulyagin. counts <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b> and hands it over to you.'
+					! reset money,young_shop_salary,young_shop_bonus to zero for a new week
+					young_shop_salary = 0
+					young_shop_bonus = 0
+				end
+				act 'Leave':
+					minut += 2
+					gt 'young_shop', 'start'
+				end
 			end
+		else
+			act 'Refuse and get fired (<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': gt 'andrey', 'fired1'
 !!this happens if Sveta misses 3 days of work but kept her job by sucking his dick 5 times, so this would trigger on the 6th time and each time after.
 	else
 		cla
@@ -264,33 +281,41 @@ if $ARGS[0] = 'punish':
 		'"Well look who decided to drag their ass into work today!" Mr. Sobulyagin''s expression twists into a scowl as he greets you at the store entrance. "I realize coming to work is difficult for you, but do you think you can spare me a moment and come into my office?" he says dryly. You sigh and follow him, he takes you into his office and closes the door. "You are missing too much work, the other employees are noticing. I am going to need something more from you to prove your deserve to keep your job."'
 		*nl
 		'He leans against his desk and cupping his crotch as he is smiling at you. "You can start of by sucking my cock then you can bend over and let me fuck you in the ass. That''s the only way you can prove to me that you still deserve to keep your job, got it? If not then you''re just another lazy brat, and I don''t need someone like that working for me."'
-		act 'Agree': gt 'andrey', 'fired2'
-		act 'Refuse and get fired':
-			cla
-			*clr
-			young_shop_work = 2
-			young_shop_miss = 0
-			char_honest += 5
-			work = 0
-			bonus_mood -= 50
-			minut +=15
-			'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
-			*nl
-			'"You''re right, I''ve skipped out on work too many times and I''m not doing that anymore to keep my job." Mr. Sobulyagin scowls at you but puts his dick away and pulls out a document from his desk drawer and begins to fill in the blanks. A few minutes later he hands you some papers and you sign them without a word.'
-			msg 'You are no longer employed at this store.'
-			if young_shop_salary > 0 or young_shop_bonus > 0:
-				money += young_shop_salary * 205 + young_shop_bonus * 205
-				'For working <b><<young_shop_salary>></b> days you get paid <b><<young_shop_salary * 205>></b>, with a bonus of <b><<young_shop_bonus * 205>></b> <b>₽</b>. Total income is <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b>'
-				'Mr. Sobulyagin. counts out <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b> and hands it over to you.'
-				! reset money,young_shop_salary,young_shop_bonus to zero for a new week
-				young_shop_salary = 0
-				young_shop_bonus = 0
-			end
-			act 'Leave':
-				minut += 2
-				gt 'young_shop', 'start'
+		gs 'willpower', 'anal', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower)':
+				cla
+				*clr
+				young_shop_work = 2
+				young_shop_miss = 0
+				char_honest += 5
+				work = 0
+				bonus_mood -= 50
+				minut +=15
+				gs 'willpower', 'anal', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
+				*nl
+				'"You''re right, I''ve skipped out on work too many times and I''m not doing that anymore to keep my job." Mr. Sobulyagin scowls at you but puts his dick away and pulls out a document from his desk drawer and begins to fill in the blanks. A few minutes later he hands you some papers and you sign them without a word.'
+				msg 'You are no longer employed at this store.'
+				if young_shop_salary > 0 or young_shop_bonus > 0:
+					money += young_shop_salary * 205 + young_shop_bonus * 205
+					'For working <b><<young_shop_salary>></b> days you get paid <b><<young_shop_salary * 205>></b>, with a bonus of <b><<young_shop_bonus * 205>></b> <b>₽</b>. Total income is <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b>'
+					'Mr. Sobulyagin. counts out <b><<young_shop_salary * 205 + young_shop_bonus * 205>></b> <b>₽</b> and hands it over to you.'
+					! reset money,young_shop_salary,young_shop_bonus to zero for a new week
+					young_shop_salary = 0
+					young_shop_bonus = 0
+				end
+				act 'Leave':
+					minut += 2
+					gt 'young_shop', 'start'
+				end
 			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
+		act 'Agree': gt 'andrey', 'fired2'
 	end
 
 	if cheatWork = 1:
@@ -325,14 +350,19 @@ if $ARGS[0] = 'beg':
 		'"And why in the hell would I do that?" Mr. Sobulyagin scoffs.'
 		'"Oh please! I''ll do anything you want, I really need this job!" You say, trying your absolute best to convince him.'
 		'"Anything? Ha! Fine, I know what you could do!" The manager says as his eyes begin to wander all over your body. "You can start off by sucking my cock and then bend over and let me stick my cock into your ass. That''s the only way you can prove to me you''re a hard worker, got it? If not then you''re just another lazy brat, and I don''t need someone like that working for me."'
-		act 'Tell him you would never do this':
-			cla
-			*clr
-			'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
-			*nl
-			'Your face immediately turns beet-red as you try to comprehend what you''ve just heard. "You want me to give you a blowjob...and then have anal sex?" You don''t understand what the hell he''s thinking. "There''s no way I''ll do that!"'
-			'"Fine, then there''s the door!" Mr. Sobulyagin snaps, clearly upset with your answer.'
-			act 'Leave':gt 'young_shop', 'start'
+		gs 'willpower', 'anal', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Refuse (<<will_cost>> Willpower</font>)':
+				cla
+				*clr
+				'<center><img <<$set_imgh>> src="images\locations\city\citycenter\mall\cats\fired.jpg"></center>'
+				*nl
+				'Your face immediately turns beet-red as you try to comprehend what you''ve just heard. "You want me to give you a blowjob...and then have anal sex?" You don''t understand what the hell he''s thinking. "There''s no way I''ll do that!"'
+				'"Fine, then there''s the door!" Mr. Sobulyagin snaps, clearly upset with your answer.'
+				act 'Leave':gt 'young_shop', 'start'
+			end
+		else
+			act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 		act 'Agree': gt 'andrey', 'rehired'
 	end

+ 5 - 5
locations/anushkaev1.qsrc

@@ -320,7 +320,7 @@ if $ARGS[0] = 'watch_nushrad':
 			act 'Keep watching':
 				*clr & cla
 				'<center><img src="images/characters/pavlovsk/school/girl/anushka/sex/spy/spyrad4.jpg"></center>'
-				'Just as she is starting to moan in pleasure even louder than him, he pulls out of her and flips her over, grabbing her ass and giving her ass a hard squeeze, followed by another hard slap that leaves a red outline of his hand on her bare ass, causing her to yelp again. "Fuck you have such a nice ass Nush." He tells her, she apparently knows what that means, as she quickly grabs the bottle of lube out of her night stand. But before she can use it, he grabs it from her. "Give me that, you always use to much." He growls, then he squirts just a little onto the head of his dick, rubbing it down the shaft of his dick. Once done with that he briefly rubs his fingers between her butt cheeks. It doesn''t look like he used much lube to you, nor hardly applied any to her.'
+				'Just as she is starting to moan in pleasure even louder than him, he pulls out of her and flips her over, grabbing her ass and giving her ass a hard squeeze, followed by another hard slap that leaves a red outline of his hand on her bare ass, causing her to yelp again. "Fuck you have such a nice ass Nush." He tells her, she apparently knows what that means, as she quickly grabs the bottle of lube out of her night stand. But before she can use it, he grabs it from her. "Give me that, you always use too much." He growls, then he squirts just a little onto the head of his dick, rubbing it down the shaft of his dick. Once done with that he briefly rubs his fingers between her butt cheeks. It doesn''t look like he used much lube to you, nor hardly applied any to her.'
 				*nl
 				'He pushes her down until she is laying on her stomach, as he tosses the bottle aside and then leans forward, pushing his dick between her butt cheeks as struggles a bit. "Rad you didn''t use enough lube." She says as she winces as he keeps struggling to push his dick between her butt cheeks. "Shut up Nush, this feels better, you feel really tight." He says just as shoves his hips forward hard, which causes her to jump a little and cry out in pain. "Ow fuck Rad, that hurt, you need to use more lube." She says in a obviously pain stressed voice. He pushes her head against the mattress. You can see her wincing in pain and white knuckling her grip on the bed sheets. "See I knew you didn''t need much lube, fuck your ass is tight." He says as he struggles to force himself balls deep into her ass, moaning in pleasure as he does.'
 				gs 'arousal', 'voyeur', 5
@@ -344,7 +344,7 @@ if $ARGS[0] = 'watch_nushrad':
 						act 'Keep watching':
 							*clr & cla
 							'<center><img src="images/characters/pavlovsk/school/girl/anushka/sex/spy/spyrad7.jpg"></center>'
-							'She starts pulling away, even the hand on her hip doesn''t completely stop her from pulling away. He leans forward as she does, putting more weight on her, slowly her hips move down more than away until she is laying flat on her stomach again. He clamps his hands on hips, pinning her in place between him and the mattress, to keep her from pulling away more. Her bed sheets are tightly balled up in her clenched fists as she white knuckle grips the sheets. "Please Rad just slow down a little, please!" She pleads with him. He ignores her pleas and continues to hammer her ass with full hard strokes. He starts moaning louder, "Fuck yes, god damn your ass is so fucking tight, I''m about to bust a nut." If you had to guess she is more than ready for him to finish.'
+							'She starts pulling away, even the hand on her hip doesn''t completely stop her from pulling away. He leans forward as she does, putting more weight on her, slowly her hips move down more than away until she is laying flat on her stomach again. He clamps his hands on her hips, pinning her in place between him and the mattress, to keep her from pulling away more. Her bed sheets are tightly balled up in her clenched fists as she white knuckle grips the sheets. "Please Rad just slow down a little, please!" She pleads with him. He ignores her pleas and continues to hammer her ass with full hard strokes. He starts moaning louder, "Fuck yes, god damn your ass is so fucking tight, I''m about to bust a nut." If you had to guess she is more than ready for him to finish.'
 							gs 'arousal', 'voyeur', 5
 							gs 'stat'
 							act 'Leave apartment': gt 'pavComplex','start'
@@ -353,7 +353,7 @@ if $ARGS[0] = 'watch_nushrad':
 								'<center><img src="images/characters/pavlovsk/school/girl/anushka/sex/spy/spyrad8.jpg"></center>'
 								'He suddenly pulls his dick out of her ass and starts cumming all over her ass cheeks, moaning loudly as he does. While she lets out a relieved sigh, as a relieved look washes over her face, obviously glad he is finally finished. When he finishes cumming on her ass, he lets go of her and steps away. "Fuck Nush you are the best fucking slut, I have ever fucked. I''ll never get tired of fucking your tight little ass."'
 								*nl
-								'Despite how he treated her, she looks back to him with a smile and seems to be basking in the praise he is now giving her. He barely even looks back at her as he starts getting dressed, as she start to wipe the cum from her ass and get dressed as well. "Well I got to go, got things to do." He pauses a moment when he notices how gingerly she is moving. "You good Nush?" She gives him are you kidding me look, followed by a fairly dirty look. "No my fucking asshole feels like it''s on fire now!" He laughs loudly at that, apparently finding it pretty funny. "What can I say? Sucks to be a hoe! Aching holes is your lot in laugh." Then with out another glance or word he strides for the door, she flips him off behind his back and mutters. "Asshole."'
+								'Despite how he treated her, she looks back to him with a smile and seems to be basking in the praise he is now giving her. He barely even looks back at her as he starts getting dressed, as she start to wipe the cum from her ass and get dressed as well. "Well I got to go, got things to do." He pauses a moment when he notices how gingerly she is moving. "You good Nush?" She gives him are you kidding me look, followed by a fairly dirty look. "No my fucking asshole feels like it''s on fire now!" He laughs loudly at that, apparently finding it pretty funny. "What can I say? Sucks to be a hoe! Aching holes is your lot in life." Then with out another glance or word he strides for the door, she flips him off behind his back and mutters. "Asshole."'
 								gs 'arousal', 'voyeur', 5
 								gs 'stat'
 								gs 'arousal', 'end'
@@ -375,7 +375,7 @@ if $ARGS[0] = 'watch_nushrad':
 											'"Well you could not be so rough with her." You tell him.'
 											'He snorts and shakes his head. "Please she is like all you bitches, she loves every moment of it. I could come back her later tonight, she would just roll over and spread those ass cheeks for me, and let me fuck her ass again. No matter how much she whines and cries about it she is always ready for another good ass fucking."'
 											*nl
-											'You are not really sure what to say, if what he saying is true it is kinda hard to dispute it. If she didn''t on some level like it, why would she keep letting him do it? You don''t get to find out, while you was thinking about it. He walks briskly past you and heads for the apartment door to leave. You open Anushka''s door and walk in and decided not to say anything about what you just seen.'
+											'You are not really sure what to say, if what he saying is true it is kinda hard to dispute it. If she didn''t on some level like it, why would she keep letting him do it? You don''t get to find out, while you were thinking about it. He walks briskly past you and heads for the apartment door to leave. You open Anushka''s door and walk in and decided not to say anything about what you just seen.'
 											act 'Go in her room': gt 'anushapt','anushroom'
 										end
 									else
@@ -392,7 +392,7 @@ if $ARGS[0] = 'watch_nushrad':
 											'"Well you don''t have to be so rough with her." You tell him.'
 											'He snorts and shakes his head. "Please she is like all you bitches, she loves every moment of it. I could come back her later tonight, she would just roll over and spread those ass cheeks for me, and let me fuck her ass again. No matter how much she whines and cries she is always ready for another good ass fucking." Then pauses a moment. "Well you will understand if you ever find a guy willing to fuck you at least." He says as if the meer thought of it disgusts him.'
 											*nl
-											'You are not really sure what to say, if what he saying is true it is kinda hard to dispute it. If she didn''t on some level like it, why would she keep letting him do it? You don''t get to find out, while you was thinking about it. He walks briskly past you and heads for the apartment door to leave. You open Anushka''s door and walk in and decided not to say anything about what you just seen.'
+											'You are not really sure what to say, if what he saying is true it is kinda hard to dispute it. If she didn''t on some level like it, why would she keep letting him do it? You don''t get to find out, while you were thinking about it. He walks briskly past you and heads for the apartment door to leave. You open Anushka''s door and walk in and decided not to say anything about what you just seen.'
 											act 'Go in her room': gt 'anushapt','anushroom'
 										end
 									end

+ 26 - 4
locations/arturHome.qsrc

@@ -17,13 +17,11 @@ act 'Go to his home':
 	$boydesc = $npc_usedname['A73']
 	silavag = npc_sexskill['A73']
 	dick = npc_dick['A73']
-	arturTimes += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
 	'Arthur has generously set the table with food and you eat meat wrapped in grape leaves and roasted on skewers. You drink strong Chacha with your food and quickly find yourself getting tipsy. Once you''re nearly done with your meal Arthur turns on some music before approaching, a look of lust on his face. "Come to me girl." He says authoritatively'
 
-	act 'Further':gt 'arturSex'
-
+	act 'Go with him':arturTimes += 1 & gt 'arturSex'
 	if condomtalkartur = 0 and arturSex > 0:
 		act 'Ask him to wear a condom':
 			*clr & cla
@@ -33,8 +31,32 @@ act 'Go to his home':
 			'You ask Arthur to wear a condom. He scoffs loudly at the suggestion and shakes his head."What? Sex with a condom is like breathing through a mask. No!"'
 			! Choosing to give Artur a little accent to emphasize that he is not from the same ethnic group as the rest of town. AB
 
-			act 'Further':gt 'arturSex'
+			act 'Go with him':arturTimes += 1 & gt 'arturSex'
+			gs 'willpower', 'sex', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'sex', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					
+					gt 'pavCommercial'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		end
+	end
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Leave (<<will_cost>> Willpower)':
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			gt 'pavCommercial'
 		end
+	else
+		act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 

+ 60 - 9
locations/arturQW.qsrc

@@ -21,9 +21,19 @@ if $ARGS[0] = 'arturQW_1':
 			'"Well, if you''re really going to pay that well, then I can hardly refuse." You say smiling at the handsome Armenian.'
 			'My beauty, I will not only pay you that well, but I will treat you like the treasure you are." He assures you.'
 			'Excitedly Arthur comes over and gives your ass a hard squeeze, his fingers sinking into your plump flesh. You moan lightly, feeling him taking a sense of ownership over your body as he grips your butt cheek. "Now that the business is settled, let''s go eat barbecue, drink Chacha brandy!" He declares happily.'
-
+			
+			gs 'willpower', 'sex', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'sex', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'pavtrain_market', 'start'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 			act 'Go with Arthur':gt 'arturHome'
-			act 'Leave':gt 'pavtrain_market', 'start'
 		end
 		act 'Refuse':
 			*clr & cla
@@ -33,18 +43,38 @@ if $ARGS[0] = 'arturQW_1':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_2.jpg"></center>'
 			'You smile sadly at him. "Thank you for the tempting offer, but I have so much to do. School work, dancing, volleyball, and I simply don''t have any free time as it is.'
 			'"As you like beautiful." He responds somewhat sadly before adding. "Ah forget it, now let''s go eat barbecue, drink Chacha brandy." He says as he grabs you by your ass and gives it a squeeze, his fingers sinking into your soft flesh. You moan lightly, feeling him taking a sense of ownership over your body as he grips your butt cheek.'
-
+			
+			gs 'willpower', 'sex', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'sex', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'pavtrain_market', 'start'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 			act 'Go with Arthur':gt 'arturHome'
-			act 'Leave':gt 'pavtrain_market', 'start'
 		end
 	else
 		*clr & cla
 		gs 'stat'
 
 		'Arthur smiles kindly and hands you a tangerine. "Come to eat barbecue, drink Chacha brandy!"'
-
+		
+		gs 'willpower', 'sex', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				gs 'willpower', 'sex', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'pavtrain_market', 'start'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Go with Arthur':gt 'arturHome'
-		act 'Leave':gt 'pavtrain_market', 'start'
 	end
 end
 
@@ -71,7 +101,18 @@ if $ARGS[0] = 'arturQW_2':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_5.jpg"></center>'
 		'You smile at him, a mix of joy and lust. "Well, Arthur, that changes everything, I would love to keep the books for you."'
 		'"Yes! I knew you would." The Armenian exclaims happily. "Come my beauty, let''s go eat barbecue and drink Chaha brandy." He says as he roughly grabs your ass, palming your soft cheeks with his thick, muscular hands.'
-
+		
+		gs 'willpower', 'sex', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				gs 'willpower', 'sex', 'resist', 'hard'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'pavtrain_market', 'start'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Go with Arthur':gt 'arturHome'
 	end
 	act 'Refuse':
@@ -82,9 +123,19 @@ if $ARGS[0] = 'arturQW_2':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_2.jpg"></center>'
 		'"Thank you for the tempting offer, but I have so much to do. School work, dancing, volleyball, and I don''t have any free time as it is. It''s just too much." You say, sad to have to turn down such a generous opportunity.'
 		'"As you like beautiful." He said somewhat sadly before adding. "Ah forget it, now let''s go eat barbecue, drink Chacha brandy." He says as he grabs you by your ass and gives it a squeeze.'
-
+		
+		gs 'willpower', 'sex', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				gs 'willpower', 'sex', 'resist', 'hard'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gt 'pavtrain_market', 'start'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 		act 'Go with Arthur':gt 'arturHome'
-		act 'Leave':gt 'pavtrain_market', 'start'
 	end
 end
 

+ 73 - 24
locations/arturRinok.qsrc

@@ -13,31 +13,59 @@ if $ARGS[0] = 'start':
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
 			'You take the delicious looking fruit and return his smile with one of your own. The man grins and says in a thick accent "You are so beautiful girl! Come to my place and eat barbecue, I have Chacha brandy for us to enjoy together, it will be wonderful time."'
-
-			act 'Refuse':
-				*clr & cla
-				minut += 2
-
-				if bag = 0:$arturgift = 'handbag'
-				if bag > 0:$arturgift = 'cosmetics'
-
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
-				'Sensing the man has "other" intentions, you start to refuse and back away from the Armenian. He puts his hand out to stop your retreat and says "Hey, I mean no offense. Perhaps my Russian is no good. Nothing bad will happen I swear! I''ll even give you <<$arturgift>> if you come and spend some time with me."'
-
-				act 'Leave':gt 'pavtrain_market', 'start'
-
-				act 'Show interest':
+			
+			gs 'willpower', 'drink', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
 					*clr & cla
 					minut += 2
+
+					if bag = 0:$arturgift = 'handbag'
+					if bag > 0:$arturgift = 'cosmetics'
+					gs 'willpower', 'drink', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
+					
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
-					'You can''t help but show interested in the gift the unfamiliar Armenian is offering. Suddenly another Armenian comes up to you and leans in with an equally friendly smile. "Do not fear girl, Uncle Arturik does not bite. He is good man." The second stranger insists.'
-
-					act 'Leave':gt 'pavtrain_market', 'start'
-					act 'Go with Arthur':gt 'arturHome'
+					'Sensing the man has "other" intentions, you start to refuse and back away from the Armenian. He puts his hand out to stop your retreat and says "Hey, I mean no offense. Perhaps my Russian is no good. Nothing bad will happen I swear! I''ll even give you <<$arturgift>> if you come and spend some time with me."'
+					
+					gs 'willpower', 'drink', 'resist'
+					if will_cost <= pcs_willpwr:
+						act 'Leave (<<will_cost>> Willpower)':
+							gs 'willpower', 'drink', 'resist'
+							gs 'willpower', 'pay', 'resist'
+							gs 'stat'
+							gt 'pavtrain_market', 'start'
+						end
+					else
+						act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+					act 'Show interest':
+						*clr & cla
+						minut += 2
+						gs 'stat'
+						
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
+						'You can''t help but show interested in the gift the unfamiliar Armenian is offering. Suddenly another Armenian comes up to you and leans in with an equally friendly smile. "Do not fear girl, Uncle Arturik does not bite. He is good man." The second stranger insists.'
+						
+						gs 'willpower', 'drink', 'resist', 'hard'
+						if will_cost <= pcs_willpwr:
+							act 'Leave (<<will_cost>> Willpower)':
+								gs 'willpower', 'drink', 'resist', 'hard'
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gt 'pavtrain_market', 'start'
+							end
+						else
+							act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Go with Arthur':gt 'arturHome'
+					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 Arthur':gt 'arturHome'
 		end
 	else
 		if arturday ! daystart:
@@ -49,12 +77,23 @@ if $ARGS[0] = 'start':
 
 			if arturblowday ! daystart:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
-				'Arthur smiles kindly and hand you a particularly juicy looking tangerine. "Sorry, girl, but I have work to do. Unless we make it quick."'
-
+				'Arthur smiles kindly and hands you a particularly juicy looking tangerine. "Sorry, girl, but I have work to do. Unless we make it quick."'
+				
+				gs 'willpower', 'bj', 'resist', 'hard'
+				if will_cost <= pcs_willpwr:
+					act 'Leave (<<will_cost>> Willpower)':
+						gs 'willpower', 'bj', 'resist', 'hard'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						gt 'pavtrain_market', 'start'
+					end
+				else
+					act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 				act 'Go with Arthur':gt 'arturkiosk'
 			elseif arturblowday = daystart:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/artur.jpg"></center>'
-				'Arthur smile amiably you. "There is much work to do, I''m sorry."'
+				'Arthur smiles kindly at you. "There is much work to do, I''m sorry."'
 
 				act 'Leave':gt 'pavtrain_market', 'start'
 			end
@@ -132,9 +171,19 @@ if $ARGS[0] = 'work_2':
 			'"Yes, but you''ve still got a lot I haven''t finished yet. There is far more to do." You say, concerned.'
 			'"Oh well, we will have time to figure it all out. Some other night, perhaps." He says nonchalantly.'
 			'"Now let''s go eat barbecue and drink Chacha brandy. Then I can grab you by that fine ass of yours." Arthur suggests as he walks over and begins roughly palming your ass.'
-
+			
+			gs 'willpower', 'sex', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'sex', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'pavtrain_market', 'start'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 			act 'Go with Arthur':gt 'arturHome'
-			act 'Leave':gt 'pavtrain_market', 'start'
 		end
 	end
 end

+ 14 - 7
locations/arturSex.qsrc

@@ -31,13 +31,20 @@ act 'Kneel down':
 			act 'Continue': gt 'arturdin', 'facefuck'
 		end
 	end
-
-	act 'Masturbate him':
-		*clr & cla
-		'You began to slowly stroke his large member, but as you look up at Arthur, you see him roll his eyes with impatience before reaching for you.'
-		gs 'arousal', 'hj', 5
-		gs 'stat'
-		act 'Continue': gt 'arturdin', 'facefuck'
+	
+	gs 'willpower', 'bj', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Masturbate him (<<will_cost>> Willpower)':
+			*clr & cla
+			'You began to slowly stroke his large member, but as you look up at Arthur, you see him roll his eyes with impatience before reaching for you.'
+			gs 'willpower', 'bj', 'resist'
+			gs 'willpower', 'pay', 'resist'
+			gs 'arousal', 'hj', 5
+			gs 'stat'
+			act 'Continue': gt 'arturdin', 'facefuck'
+		end
+	else
+		act 'Masturbate him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 

+ 31 - 7
locations/balkon2.qsrc

@@ -37,7 +37,7 @@ end
 if $ARGS[0] = 'palec1':
 	cla
 	*clr
-	pcs_horny += rand(10, 30)
+	pcs_horny += rand(10,30)
 	minut += 1
 	sosedBalDay = daystart
 	gs 'stat'
@@ -93,9 +93,35 @@ if $ARGS[0] = 'sosed':
 	'<center><b><font color="maroon">Balcony</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sosed.jpg"></center>'
 	'<center>You notice your neighbor to the left standing on his balcony. As he notices that you''re naked he begins staring at you…</center>'
-
-	act 'Show off your body':gt 'balkon2', 'demo1'
-	act 'Flip him off':gt 'balkon2', 'palec1'
+	
+	if exhibitionist_lvl > 0:
+		act 'Show off your body':gt 'balkon2', 'demo1'
+		gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Flip him off (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'balkon2', 'palec1'
+			end
+		else
+			act 'Flip him off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Show off your body (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'balkon2', 'demo1'
+			end
+		else	
+			act 'Show off your body (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Flip him off ':gt 'balkon2', 'palec1'
+	end
+	
 end
 
 !!!Probably CV edition
@@ -208,10 +234,8 @@ if $ARGS[0] = 'finger':
 					'As you open your eyes, you lock eyes with one of your neighbors peering out the window in the house across...'
 					'You can''t help but smile as there''s someone enjoying the show...'
 					
-					act 'Give him a show':gt 'balkon2', 'finger_solo'
-					
+					act 'Give him a show':gt 'balkon2', 'finger_solo'					
 				else
-					
 					$orgasm_or = 'yes'
 					$orgasm_txt = 'Overtaken by the thrill of the risk of being caught in such a compromising act and the diligent work of your skilled fingers brings you to an intense orgasm. Before you know it you grip the railing for support as your juices squirt hard out of you.'
 					'The orgasm is so intense that you''re seeing stars and it almost feels like you''re going to pass out. Somehow you manage to keep your composure as you quickly head back inside as you feel too exposed.'

+ 75 - 60
locations/bass.qsrc

@@ -59,70 +59,86 @@ if $ARGS[0] = 'a':
 				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 				act 'Next':gt 'kisameQW', 'start'
 			end
-
-			act 'Tell Kisame to fuck off':
-				cla
-				'"I don''t care who you are, fuck off!"'
-				'"That''s not nice!" he replies.'
-				'Before you''re able to blink, he grabs you by the waist and throws you into the middle of the pool.'
-				'As you surface, you notice Kisame rapidly approaching you...'
-				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
-				act 'Next':gt 'kisameQW', 'start'
+			
+			gs 'willpower', 'misc', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Tell Kisame to fuck off (<<will_cost>> Willpower</font>)':
+					cla
+					'"I don''t care who you are, fuck off!"'
+					'"That''s not nice!" he replies.'
+					'Before you''re able to blink, he grabs you by the waist and throws you into the middle of the pool.'
+					'As you surface, you notice Kisame rapidly approaching you...'
+					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
+					gs 'willpower', 'misc', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					act 'Next':gt 'kisameQW', 'start'
+				end
+			else
+				act 'Tell Kisame to fuck off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 	elseif kisameQW = 1 and KisameDead < 1:
 		'<center><img <<$set_imgh>> src="images/characters/city/kisame/kisamev.jpg"></center>'
 		'Noticing you observing him, Kisame smiles and tells you, "Hi baby. Want me to fill your hot mouth with my shark-seed?"'
-
-		act 'Attack Kisame':
-			cla
-			pcs_horny += 10
-			gs 'boyStat', 'A40'
-			!!stats {
-			strenV = 300
-			speedV = 100
-			agilV = 100
-			reactV = 100
-			vitalV = 200
-			intelV = 100
-			willV = 50
-			!!skills
-			magikV = 10
-			boxingV = 100
-			shootV = 100
-			!!parameters
-			healthV = vitalV * 10 + strenV * 5
-			manaV = intelV * magikV + magikV * 100 + vitalV * 10
-			willpowerV = willV * 10
-			BonusAtakV = 0
-			BonusDefV = 0
-			!!Programme of Action
-			program = 5
-			KisaFight = 1
-			klonV = 5
-			defenceV = 800
-
-			if spellavtoklon = 1:klon = 3}
-
-			gs 'fight','initFight'
-
-			$opp_name[0] = 'Kisame'
-			$opp_image[0] = 'images/characters/city/kisame/kisamev.jpg'
-			opp_def[0] = 100
-			opp_run[0] = 100
-			opp_wrstlng[0] = 75
-			opp_kick[0] = 0
-			opp_punch[0] = 100
-			opp_jab[0] = 100
-			opp_stren[0] = 200
-			opp_agil[0] = 100
-			opp_vital[0] = 200
-			opp_react[0] = 100
-			opp_health[0] = (opp_vital * 10 + opp_stren * 5)
-			opp_willpwr[0] = 100
-			opp_shoot[0] = 100
-
-			gt 'fight', 'start'
+		
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Attack Kisame (<<will_cost>> Willpower</font>)':
+				cla
+				pcs_horny += 10
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				gs 'boyStat', 'A40'
+				!!stats {
+				strenV = 300
+				speedV = 100
+				agilV = 100
+				reactV = 100
+				vitalV = 200
+				intelV = 100
+				willV = 50
+				!!skills
+				magikV = 10
+				boxingV = 100
+				shootV = 100
+				!!parameters
+				healthV = vitalV * 10 + strenV * 5
+				manaV = intelV * magikV + magikV * 100 + vitalV * 10
+				willpowerV = willV * 10
+				BonusAtakV = 0
+				BonusDefV = 0
+				!!Programme of Action
+				program = 5
+				klonV = 5
+				defenceV = 800
+
+				if spellavtoklon = 1:klon = 3}
+
+				gs 'fight','initFight'
+
+				$opp_name[0] = 'Kisame'
+				$opp_image[0] = 'images/characters/city/kisame/kisamev.jpg'
+				opp_def[0] = 100
+				opp_run[0] = 100
+				opp_wrstlng[0] = 75
+				opp_kick[0] = 0
+				opp_punch[0] = 100
+				opp_jab[0] = 100
+				opp_stren[0] = 200
+				opp_agil[0] = 100
+				opp_vital[0] = 200
+				opp_react[0] = 100
+				opp_health[0] = (opp_vital * 10 + opp_stren * 5)
+				opp_willpwr[0] = 100
+				opp_shoot[0] = 100
+				fightEnding = 7
+
+				gt 'fight', 'start'
+			end
+		else
+			act 'Attack Kisame (<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 him a blowjob under water':
@@ -133,7 +149,6 @@ if $ARGS[0] = 'a':
 			gs 'cum_cleanup'
 			if pcs_sweat > 15 : pcs_sweat = 10 + rand(0,4)
 			pcs_mood += 5
-			pcs_willpwr += 5
 
 			if pcs_stren < 40:stren_exp += 1 + (steroid_dose - rand(0,steroid_dose)) & gs 'obj_din', 'steroids'
 			if KisameSex = 0:KisameSex = 1 & Set guy += 1

+ 3 - 12
locations/brother.qsrc

@@ -1252,10 +1252,7 @@ if $ARGS[0] = 'brother_voyeur_ev6':
 
 		gs 'willpower', 'exhib', 'resist', 'easy'
 		if will_cost <= pcs_willpwr:
-			act 'Refuse and get dressed (<<will_cost>> Willpower)':
-				gs 'willpower', 'pay', 'resist'
-				gt $loc, $metka
-				end
+			act 'Refuse and get dressed (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $metka
 		else
 			act 'Refuse and get dressed (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
@@ -1267,10 +1264,7 @@ if $ARGS[0] = 'brother_voyeur_ev6':
 
 		gs 'willpower', 'exhib', 'resist', 'easy'
 		if will_cost <= pcs_willpwr:
-			act 'Refuse and get dressed (<<will_cost>> Willpower)':
-				gs 'willpower', 'pay', 'resist'
-				gt $loc, $metka
-				end
+			act 'Refuse and get dressed (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $metka
 		else
 			act 'Refuse and get dressed (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
@@ -1351,10 +1345,7 @@ if $ARGS[0] = 'brother_voyeur_ev7':
 
 			gs 'willpower', 'exhib', 'resist', 'easy'
 			if will_cost <= pcs_willpwr:
-				act 'Refuse and get dressed (<<will_cost>> Willpower)':
-					gs 'willpower', 'pay', 'resist'
-					gt $loc, $metka
-					end
+				act 'Refuse and get dressed (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $metka
 			else
 				act 'Refuse and get dressed (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end

+ 2 - 2
locations/cityTrain.qsrc

@@ -198,7 +198,7 @@ if $ARGS[0] = 'village':
 	menu_off = 1
 	minut += 25
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
 	'After 25 minutes, the train stops at the small station near the village of Gadukino.'
@@ -216,7 +216,7 @@ if $ARGS[0] = 'oldtown':
 	if rand(1, 100) < 15: gt 'train', 'private'
 	if rand(1, 100) < 30: gt 'train', 'Gopnik'
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
 	'After 35 minutes, the train stops at old platform by the old town of Pushkin. Famous for its extensive park and old historic buildings, the locals are known to be eccentric but that adds to the charm.'

+ 281 - 78
locations/clener.qsrc

@@ -28,11 +28,11 @@ if $ARGS[0] = 'start':
 		act 'Talk to Yuri':
 			cla
 			menu_off = 1
-			minut += 15
+			minut += 5
 			gs 'stat'
 			'Still smiling he says, "<<$pcs_nickname>>, want to grab a cup of coffee?"'
 
-			act 'Decline':jouryQwNo = 1 & gt 'clener', 'start'
+			act 'Decline': jouryQwNo = 1 & gt 'clener', 'start'
 
 			act 'Accept':
 				*clr & cla
@@ -41,9 +41,9 @@ if $ARGS[0] = 'start':
 				'You nod and the two of you head off to the café, where Yuri orders coffee. You sit down at the table and begin to sip on your coffee. Yuri is painfully quiet, he has no sense of humor and is very stiff.'
 				'It''s pretty clear that he likes you, but he does not know how to put a move on you. As you finish the coffee Yuri finally suggests if you want to follow him to his home.'
 
-				act 'No':jouryQwNo = 1 & gt 'clener', 'start'
+				act 'No': jouryQwNo = 1 & gt 'clener', 'start'
 
-				act 'Go with Yuri':gt 'youry', 'quest'
+				act 'Go with Yuri': gt 'youry', 'quest'
 			end
 		end
 	end
@@ -71,50 +71,51 @@ if $ARGS[0] = 'start':
 
 					act 'Have a drink':
 						cla
-						if pcs_hydra >= 100:
-							pcs_hydra -= 5
-						else
-							pcs_hydra -= 10
-						end
+						gs 'drugs', 'alcohol', 'vodka'
+						pcs_energy += 10
+						fat += 2
+						gs 'stat'
 						'You drink the shitty vodka and it burns your throat. Your throat is on fire and you quickly grab some cheese to help soothe it. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
 						'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the buttocks.'
 
 						act 'Smile':
 							cla
-							minut += 15
+							minut += 10
 							pcs_horny += 10
-							if pcs_hydra >= 100:
-								pcs_hydra -= 5
-							else
-								pcs_hydra -= 10
-							end
+							gs 'drugs', 'alcohol', 'vodka'
 							gs 'stat'
 							'You smile and Sasha pours more vodka, not stopping his caressing of your buttocks.'
 
-							if pcs_horny < 50:dynamic $borodachNo2
+							if pcs_horny < 50: gs 'clener', 'borodachNo2'
 
-							dynamic $borodachDrink
+							gs 'clener', 'borodachDrink'
 						end
 
-						act 'Put your hand on his pants':
-							*clr & cla
-							borodachTimes += 1
-							gs 'stat'
-
-							picrand = rand(0, 2)
-
-							if picrand = 0:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj.jpg"></center>'
-							if picrand = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj1.jpg"></center>'
-							if picrand = 2:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj2.jpg"></center>'
-
-							'You put your hand on his crotch and feel his erection harden. Your thin fingers slide over his hardon and find the zipper. You unzip him and get his cock out of his pants. Sasha relaxes on the couch waiting for you to continue what you started.'
-							
-							gs 'arousal', 'foreplay', 15
-							gs 'stat'
-							
-							
-							dynamic $ohrhj
-							dynamic $ohrbj
+						gs 'willpower', 'hj', 'self'
+						if will_cost <= pcs_willpwr:
+							act 'Put your hand on his pants (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'pay', 'self'
+								borodachTimes += 1
+								gs 'stat'
+
+								picrand = rand(0, 2)
+
+								if picrand = 0:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj.jpg"></center>'
+								if picrand = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj1.jpg"></center>'
+								if picrand = 2:'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hj2.jpg"></center>'
+
+								'You put your hand on his crotch and feel his erection harden. Your thin fingers slide over his hardon and find the zipper. You unzip him and get his cock out of his pants. Sasha relaxes on the couch waiting for you to continue what you started.'
+								
+								gs 'arousal', 'foreplay', 5
+								gs 'stat'
+								
+								
+								gs 'clener', 'ohrhj'
+								gs 'clener', 'ohrbj'
+							end
+						else
+							act 'Put your hand on his pants (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
 				end
@@ -146,9 +147,14 @@ if $ARGS[0] = 'start':
 				'You nod, "Yes, the pay is pretty bad but I need the job..."'
 				'"By the way, I''m Sasha, and you''re?"'
 				'"<<$pcs_nickname>>." you politely answer.'
-				'"Nice name... I was just thinking about heading on a break, would you like to join me?"'
+				'"Nice name... I was just thinking about heading on a break, would you like to join me for a drink?"'
 
-				act 'Sorry, I have to go':gt 'clener', 'start'
+				gs 'willpower', 'drink', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Sorry, I have to go (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'clener', 'start'
+				else
+					act 'Sorry, I have to go (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 
 				act 'Why not':
 					cla
@@ -158,40 +164,40 @@ if $ARGS[0] = 'start':
 
 					act 'Have a drink':
 						cla
-						if pcs_hydra >= 100:
-							pcs_hydra -= 5
-						else
-							pcs_hydra -= 10
-						end
+						gs 'drugs', 'alcohol', 'vodka'
+						pcs_energy += 10
+						fat += 2
+						gs 'stat'
 						'You drink the shitty vodka and it burns your throat. Your throat is on fire and you quickly grab some cheese to help soothe it. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
 						'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the buttocks.'
 
-						act 'React':
-							cla
-							minut += 15
-							pcs_horny += 10
-							gs 'stat'
-							'"Hey! What are you doing?" you ask.'
-							'"Relax, it was merely an accident." Sasha starts muttering as he pours another shot, "Let''s have a drink."'
+						gs 'willpower', 'misc', 'self'
+						if will_cost <= pcs_willpwr:
+							act 'React (<<will_cost>> Willpower)':
+								cla
+								gs 'willpower', 'pay', 'self'
+								minut += 10
+								pcs_horny += 10
+								gs 'stat'
+								'"Hey! What are you doing?" you ask.'
+								'"Relax, it was merely an accident." Sasha starts muttering as he pours another shot, "Let''s have a drink."'
 
-							if pcs_horny < 50:dynamic $borodachNo
+								if pcs_horny < 50: gs 'clener', 'borodachNo'
 
-							dynamic $borodachDrink
+								gs 'clener', 'borodachDrink'
+							end
+						else
+							act 'React (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 
 						act 'Pretend not to notice':
 							cla
-							if pcs_hydra >= 100:
-								pcs_hydra -= 5
-							else
-								pcs_hydra -= 10
-							end
-							minut += 15
-							pcs_horny += 15 + SUB
+							minut += 10
+							pcs_horny += 15
 							gs 'stat'
 							'You continue on as usual, trying not to pay attention to it, since it was only a casual touch. Sasha pours more vodka and says, "The second shot always tastes better." as he takes another quaff.'
-							if pcs_horny < 50:dynamic $borodachNo
-							dynamic $borodachDrink
+							if pcs_horny < 50: gs 'clener', 'borodachNo'
+							gs 'clener', 'borodachDrink'
 						end
 					end
 				end
@@ -230,7 +236,7 @@ if $ARGS[0] = 'start':
 				clener = 2
 				'You agree to work as a cleaner.'
 
-				act 'Leave':gt 'clener', 'start'
+				act 'Leave': gt 'clener', 'start'
 			end
 		end
 	end
@@ -248,7 +254,7 @@ if $ARGS[0] = 'start':
 			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
 
 			if clener < 5:
-				if hour >= 9 and hour <= 16:'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor.'
+				if hour >= 9 and hour <= 16: 'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor.'
 			elseif clener >= 5 and clener < 10:
 				if hour >= 9 and hour <= 16:
 					jouryQw += 1
@@ -268,10 +274,10 @@ if $ARGS[0] = 'start':
 					act 'No':
 						cla
 						jouryQwNo = 1
-						'You look angerly at him, "No, I don''t mix business with pleasure..." Yuri looks dejected as he moves away from you.'
+						'You look angrily at him, "No, I don''t mix business with pleasure..." Yuri looks dejected as he moves away from you.'
 						'As you''ve finished, you head over to Boris Ivanovich''s office. He gives you 65 <b>₽</b> for the work.'
 
-						act 'Leave':gt 'clener', 'start'
+						act 'Leave': gt 'clener', 'start'
 					end
 
 					act 'Yes':
@@ -282,19 +288,19 @@ if $ARGS[0] = 'start':
 						'As you''ve finished, you head over to Boris Ivanovich''s office. He gives you 65 <b>₽</b> for the work.'
 						'As you leave, you notice Yuri awiting you. He''s pretty nervous and it seems as if he doesn''t know what to do. Not knowing what to say, he blurts out, "How about we head over to my place, watch some movies, drink champagne and talk."'
 
-						act 'No':jouryQwNo = 1 & gt 'clener', 'start'
+						act 'No': jouryQwNo = 1 & gt 'clener', 'start'
 
-						act 'Go with Yuri':gt 'youry', 'quest'
+						act 'Go with Yuri': gt 'youry', 'quest'
 					end
 
 					exit
 				end
 
-				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex = 0:'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. Yuri looks at you studying every inch of your figure.'
-				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0:'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. Yuri pretends not to notice you in the office.'
+				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex = 0: 'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. Yuri looks at you studying every inch of your figure.'
+				if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0: 'You fill a bucket of water and head over to the office with a mop. The office staff keeps out of the way while you clean the floor. Yuri pretends not to notice you in the office.'
 			end
 
-			if hour < 9 or hour > 16:'The office is empty of people, you quietly wash the floor and wipe the floor in the office.'
+			if hour < 9 or hour > 16: 'The office is empty of people, you quietly wash the floor and wipe the floor in the office.'
 
 			'As you''ve finished, you head over to Boris Ivanovich''s office. He gives you 65 <b>₽</b> for the work.'
 
@@ -322,19 +328,23 @@ if $ARGS[0] = 'start':
 					'You let go off your cleaning stuff and look straight into Yuri''s eyes, asking him, "Are you ashamed of me?"'
 					'Yuri stammers, "I-I''m not embarrassed by you being a cleaner, but you must understand, I''m a manager, and you''re the cleaning lady. We must not be seen together. But I want you to keep seeing you. You know where I live, come by my place after 16:00."'
 
-					act 'Fuck you':
-						cla
-						pcs_dom += 1
-						jouryResult = 1
-						'You''re offended by his behaviour and without any hesitation you tell Yuri to go to hell. He quickly turns and walks away.'
-						'You continue on by mopping the floor and polish the toilets and urinals. You are given 65 <b>₽</b> for your work.'
+					gs 'willpower', 'misc', 'self'
+					if will_cost <= pcs_willpwr:
+						act 'Fuck you (<<will_cost>> Willpower)':
+							cla
+							gs 'willpower', 'pay', 'self'
+							jouryResult = 1
+							'You''re offended by his behaviour and without any hesitation you tell Yuri to go to hell. He quickly turns and walks away.'
+							'You continue on by mopping the floor and polish the toilets and urinals. You are given 65 <b>₽</b> for your work.'
 
-						act 'Leave':gt 'clener', 'start'
+							act 'Leave':gt 'clener', 'start'
+						end
+					else
+						act 'Fuck you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
 
 					act 'Okay.':
 						cla
-						sub += 1
 						jouryResult = 10
 						'Yuri only sees you as a simple fuck whore. But you''re willing to put up with it and agree to visit him afterwards. Yuri nods in satisfaction and leaves the toilet.'
 						'You continue on by mopping the floor and polish the toilets and urinals. You are given 65 <b>₽</b> for your work.'
@@ -388,5 +398,198 @@ if $ARGS[0] = 'start':
 	end
 end
 
+if $ARGS[0] = 'borodachNo':
+	menu_off = 1
+	act 'I''ve had enough':
+		cla
+		minut += 5
+		gs 'stat'
+		'You refuse to drink and start to leave. The guard tries to persuade you to stay with him and continue.'
+
+		gs 'willpower', 'drink', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'clener', 'start'
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		gs 'clener', 'borodachDrink'
+	end
+end
+
+if $ARGS[0] = 'borodachNo2':
+	menu_off = 1
+	act 'I have to go now':
+		cla
+		minut += 5
+		gs 'stat'
+		'You gather your things and start to leave, Sasha tries to persuade you to stay with him and continue.'
+
+		gs 'willpower', 'sex', 'resist', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'clener', 'start'
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		gs 'clener', 'borodachSex'
+	end
+end
+
+if $ARGS[0] = 'borodachDrink':
+	menu_off = 1
+	act 'Another drink':
+		cla
+		minut += 15
+		pcs_horny += 20
+		gs 'stat'
+		'You drink and eat some more cheese, you realize that you are happily drunk. The guard''s hand does not stop caressing your ass.'
+		gs 'clener', 'borodachNo2'
+		gs 'clener', 'borodachSex'
+	end
+end
+
+if $ARGS[0] = 'borodachSex':
+	menu_off = 1
+	act 'Relax':
+		cla
+
+		if borodachSex = 0:borodachSex = 1 & guy += 1
+		'You calm down and begin to enjoy the hands caressing you. Sasha has openly embraced and started kissing you.'
+		'His hands slide under your clothes, unbuttoning and removing them. Soon he has exposed your chest and begins to suck your nipples.'
+
+		gs 'arousal', 'foreplay', 5 
+		gs 'stat'
+		
+		act 'Lie down on the sofa':
+			*clr & cla
+			gs 'stat'
+			borodachSexDay = daystart
+			pose = 0
+			gs 'boyStat', 'A39'
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
+			'<<$boydesc>> lays you on the sofa, spreads your legs and pulls out his <<dick>> cm dick, his fingers begin to caress your pussy, preparing it for entry.'
+			
+			gs 'arousal', 'vaginal_finger', 5
+			gs 'arousal', 'vaginal', 15
+			gs 'stat'
+			
+			gs 'orgazm', 'start'
+
+			act 'Leave':gt 'street'
+		end
+	end
+end
+
+if $ARGS[0] = 'ohrhj':
+	menu_off = 1
+	act 'Masturbate him':
+		cla
+		'You start stroking his cock with your delicate hands. Quickly Sasha groans, "I can''t hold on much longer."'
+		
+		gs 'arousal', 'hj', 5, 'dom'
+		gs 'stat'
+		
+		gs 'clener', 'ohrbj'
+		gs 'clener', 'ohrhjcum'
+		gs 'clener', 'ohrsex'
+	end
+end
+
+if $ARGS[0] = 'ohrhjcum':
+	menu_off = 1
+	act 'Masturbate him more':
+		*clr & cla
+		borodachSexDay = daystart
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hjcum.jpg"></center>'
+		'Sasha groans and his cock enthusiastically paints your hand white.'
+
+		gs 'arousal', 'hj', 5, 'dom'
+		gs 'stat'
+		
+		act 'Leave':gt 'street'
+	end
+end
+
+if $ARGS[0] = 'ohrbj':
+	menu_off = 1
+	act 'Suck him':
+		*clr & cla
+		picrand = rand(1, 4)
+		'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/bj<<picrand>>.jpg"></center>'
+
+		'You wrap your <<$liptalk>> around his strong and warm 15 cm cock and quickly begin by sucking the head, caressing it with your tongue and lips. Sasha groans, "I''m going to come."'
+		
+		gs 'arousal', 'bj', 5, 'sub'
+		gs 'stat'
+		
+		gs 'clener', 'ohrbjcum'
+		gs 'clener', 'ohrsex'
+	end
+end
+
+if $ARGS[0] = 'ohrbjcum':
+	menu_off = 1
+	act 'Suck harder':
+		*clr & cla
+		spafinloc = 12
+		gs 'cum_manage'
+		gs 'stat'
+		picrand = rand(1, 4)
+		'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/bjcum<<picrand>>.jpg"></center>'
+		'You redouble your efforts, sucking his hard cock with your <<$liptalk>>. Hot sperm hits your mouth, again and again. You continue to suck, ignoring your mouth full of viscous sperm. Until he finally nothing left.'
+		
+		gs 'arousal', 'bj', 5, 'sub'
+		gs 'stat'
+
+		act 'Swallow sperm':
+			*clr & cla
+			borodachSexDay = daystart
+			gs 'stat'
+			picrand = rand(1, 3)
+			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/swallow<<picrand>>.jpg"></center>'
+			'You open your sperm filled mouth and show off your hard work, then swallow it.'
+
+			gs 'arousal', 'bj', 1, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+		
+			act 'Leave':gt 'street'
+		end
+
+		act 'Spit it out':
+			*clr & cla
+			borodachSexDay = daystart
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/spit.jpg"></center>'
+			'You open your sperm filled mouth and show off your hard work, then quickly find the sink and spit it out.'
+
+			gs 'arousal', 'bj', 1, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			
+			act 'Leave':gt 'street'
+		end
+	end
+end
+
+if $ARGS[0] = 'ohrsex':
+	menu_off = 1
+	act 'Sex':
+		*clr & cla
+		gs 'stat'
+		borodachSexDay = daystart
+		pose = 0
+		gs 'boyStat', 'A39'
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
+		'<<$boydesc>> lays you on the sofa, spreads your legs and pulls out his <<dick>> centimeter dick. His fingers begin to caress your pussy, preparing it for entry.'
+
+		gs 'arousal', 'vaginal_finger', 5
+		gs 'arousal', 'vaginal', 15, 'sub'
+		gs 'arousal', 'end'
+		gs 'stat'
+			
+		act 'Leave':gt 'street'
+	end
+end
 --- clener ---------------------------------
 

+ 1 - 1
locations/dimaRevenge.qsrc

@@ -301,7 +301,6 @@ if ARGS[0] = 3:
 									BonusDefV = 0
 									!!Programme of Action
 									program = 0
-									DimaFight = 1
 									if spellavtoklon = 1:klon = 3
 									if spellbefshild = 1:defence = 500}
 									gs 'fight','initFight'
@@ -321,6 +320,7 @@ if ARGS[0] = 3:
 									opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 									opp_willpwr[0] = 100
 									opp_shoot[0] = 100
+									fightEnding = 10
 
 									gt 'fight', 'start'
 								end

+ 0 - 187
locations/dinBoroda.qsrc

@@ -1,187 +0,0 @@
-# dinBoroda
-$borodachNo = {
-	menu_off = 1
-	act 'I''ve had enough':
-		cla
-		minut += 15
-		gs 'stat'
-		'You refuse to drink and start to leave. The guard tries to persuade you to stay with him and continue.'
-
-		if SUB < 10:act 'Leave':pcs_dom += 1 & gt 'clener', 'start'
-		dynamic $borodachDrink
-	end
-}
-
-$borodachNo2 = {
-	menu_off = 1
-	act 'I have to go now':
-		cla
-		minut += 15
-		gs 'stat'
-		'You gather your things and start to leave, Sasha tries to persuade you to stay with him and continue.'
-
-		if pcs_dom > 0 and pcs_horny < 50:act 'Leave':pcs_dom += 1 & gt 'clener', 'start'
-		dynamic $borodachSex
-	end
-}
-$borodachDrink = {
-	menu_off = 1
-	act 'Another drink':
-		cla
-		minut += 15
-		pcs_horny += 20
-		gs 'stat'
-		'You drink and eat some more cheese, you realize that you are happily drunk. The guard''s hand does not stop caressing your ass.'
-		dynamic $borodachNo2
-		dynamic $borodachSex
-	end
-}
-
-$borodachSex = {
-	menu_off = 1
-	act 'Relax':
-		cla
-
-		if borodachSex = 0:borodachSex = 1 & guy += 1
-		'You calm down and begin to enjoy the hands caressing you. Sasha has openly embraced and started kissing you.'
-		'His hands slide under your clothes, unbuttoning and removing them. Soon he has exposed your chest and begins to suck your nipples.'
-
-		gs 'arousal', 'foreplay', 5 
-		gs 'stat'
-		
-		act 'Lie down on the sofa':
-			*clr & cla
-			gs 'stat'
-			borodachSexDay = daystart
-			pose = 0
-			gs 'boyStat', 'A39'
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
-			'<<$boydesc>> lays you on the sofa, spreads your legs and pulls out his <<dick>> cm dick, his fingers begin to caress your pussy, preparing it for entry.'
-			
-			gs 'arousal', 'vaginal_finger', 5
-			gs 'arousal', 'vaginal', 25
-			gs 'stat'
-			
-			gs 'orgazm', 'start'
-
-			act 'Leave':gt 'street'
-		end
-	end
-}
-
-$ohrhj = {
-	menu_off = 1
-	act 'Masturbate him':
-		cla
-		'You start stroking his cock with your delicate hands. Quickly Sasha groans, "I can''t hold on much longer."'
-		
-		gs 'arousal', 'hj', 15, 'dom'
-		gs 'stat'
-		
-		dynamic $ohrbj
-		dynamic $ohrhjcum
-		dynamic $ohrsex
-	end
-}
-
-$ohrhjcum = {
-	menu_off = 1
-	act 'Masturbate him more':
-		*clr & cla
-		borodachSexDay = daystart
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/hjcum.jpg"></center>'
-		'Sasha groans and his cock enthusiastically paints your hand white.'
-
-		gs 'arousal', 'hj', 15, 'dom'
-		gs 'stat'
-		
-		act 'Leave':gt 'street'
-	end
-}
-
-$ohrbj = {
-	menu_off = 1
-	act 'Suck him':
-		*clr & cla
-		picrand = rand(1, 4)
-		'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/bj<<picrand>>.jpg"></center>'
-
-		'You wrap your <<$liptalk>> around his strong and warm 15 cm cock and quickly begin by sucking the head, caressing it with your tongue and lips. Sasha groans, "I''m going to come."'
-		
-		gs 'arousal', 'bj', 15, 'sub'
-		gs 'stat'
-		
-		dynamic $ohrbjcum
-		dynamic $ohrsex
-	end
-}
-
-$ohrbjcum = {
-	menu_off = 1
-	act 'Suck harder':
-		*clr & cla
-		spafinloc = 12
-		gs 'cum_manage'
-		gs 'stat'
-		picrand = rand(1, 4)
-		'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/bjcum<<picrand>>.jpg"></center>'
-		'You redouble your efforts, sucking his hard cock with your <<$liptalk>>. Hot sperm hits your mouth, again and again. You continue to suck, ignoring your mouth full of viscous sperm. Until he finally nothing left.'
-		
-		gs 'arousal', 'bj', 15, 'sub'
-		gs 'stat'
-
-		act 'Swallow sperm':
-			*clr & cla
-			borodachSexDay = daystart
-			gs 'stat'
-			picrand = rand(1, 3)
-			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/swallow<<picrand>>.jpg"></center>'
-			'You open your sperm filled mouth and show off your hard work, then swallow it.'
-
-			gs 'arousal', 'bj', 15, 'sub'
-			gs 'arousal', 'end'
-			gs 'stat'
-		
-			act 'Leave':gt 'street'
-		end
-
-		act 'Spit it out':
-			*clr & cla
-			borodachSexDay = daystart
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/residential/office/sex/guard/spit.jpg"></center>'
-			'You open your sperm filled mouth and show off your hard work, then quickly find the sink and spit it out.'
-
-			gs 'arousal', 'bj', 15, 'sub'
-			gs 'arousal', 'end'
-			gs 'stat'
-			
-			act 'Leave':gt 'street'
-		end
-	end
-}
-
-$ohrsex = {
-	menu_off = 1
-	act 'Sex':
-		*clr & cla
-		gs 'stat'
-		borodachSexDay = daystart
-		pose = 0
-		gs 'boyStat', 'A39'
-		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
-		'<<$boydesc>> lays you on the sofa, spreads your legs and pulls out his <<dick>> centimeter dick. His fingers begin to caress your pussy, preparing it for entry.'
-
-		gs 'arousal', 'vaginal', 30, 'sub'
-		gs 'arousal', 'end'
-		gs 'stat'
-			
-		act 'Leave':gt 'street'
-	end
-}
-
-rikudootvet = 1415
-
---- dinBoroda ---------------------------------
-

+ 1 - 1
locations/dinParty.qsrc

@@ -364,7 +364,7 @@ if $ARGS[0] = 'dance':
 	'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_gost_1_' + rand(1,7) + '.mp4"></video></center>'
 	'Moving to the rhythmic sounds, you indulge in an unrestrained dance.'
 	'You jump, sway your body, and rock your booty, losing yourself in the general merriment.'
-	if pcs_danc >= 50:'You move your body perfectly with the rhythm of the music in an erotic way, getting you a lot of attention from others and you love they attention.'
+	if pcs_danc >= 50:'You move your body perfectly with the rhythm of the music in an erotic way. This gets you a lot of attention from the others and you love their attention.'
 	if pcs_danc < 50:'Your ridiculous movements during the dance does not bother anyone, You dance badly, but you do not care.'
 	act 'Have a rest':gt $loc,$metka
 	act 'Dance more':gt 'dinParty', 'dance' 

+ 56 - 67
locations/ender.qsrc

@@ -9,39 +9,38 @@ if $ARGS[0] = 'loss':
 		exit
 	end
 
-	if jugoFight = 1:
+	if fightEnding = 1:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		jugoFight = 0
+		fightEnding = 0
 
 		'You fall down on the floor and feel your consciousness slipping away.'
 
 		act 'Further': gt 'preTG', 'tatianaPRE'
 		exit
-	elseif jugoFight = 2:
+	elseif fightEnding = 2:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		jugoFight = 0
+		fightEnding = 0
 
 		'You fall down on the floor as you''re not longer able to fight Juugo.'
 
 		act 'Further':gt'lab','start'
 		exit
-	elseif tatianaFight = 1:
+	elseif fightEnding = 3:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		tatianaFight = 0
+		fightEnding = 0
 
 		'You fall down on the floor as you''re not longer able to fight Tatiana.'
 
 		act 'Further':gt'lab','start'
 		exit
-	elseif prostitutFight = 1:
+	elseif fightEnding = 4:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		prostitutFight = 0
+		fightEnding = 0
 		money = 0
-		SUB = SUB + 1
 		Loss += 1
 		if rikudo > 10:rikudo = rikudo - 10
 
@@ -50,12 +49,11 @@ if $ARGS[0] = 'loss':
 
 		act 'Further':gt'park','start'
 		exit
-	elseif prostitutFight = 2:
+	elseif fightEnding = 5:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		prostitutFight = 0
+		fightEnding = 0
 		money = 0
-		SUB = SUB + 1
 		Loss += 1
 		bandfight = bandfight - 1
 		if rikudo > 10:rikudo = rikudo - 10
@@ -66,10 +64,10 @@ if $ARGS[0] = 'loss':
 
 		act 'Further':gt'park','start'
 		exit
-	elseif prostitutFight = 3:
+	elseif fightEnding = 6:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		prostitutFight = 0
+		fightEnding = 0
 		money = 0
 		Loss += 1
 		stellfight = stellfight - 1
@@ -86,11 +84,10 @@ if $ARGS[0] = 'loss':
 		
 		act 'Further':gt'park','start'
 		exit
-	elseif KisaFight = 1:
+	elseif fightEnding = 7:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		KisaFight = 0
-		SUB = SUB + 1
+		fightEnding = 0
 		Loss += 1
 		if rikudo > 10:rikudo = rikudo - 10
 		if KisameSex = 0:KisameSex = 1 & guy = guy + 1
@@ -112,12 +109,11 @@ if $ARGS[0] = 'loss':
 
 		act 'Crawl out of the pool':gt'street'
 		exit
-	elseif RapistFight = 1:
+	elseif fightEnding = 8:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
 		if succubusQW >= 4: gt 'succubus', 'RapistFight'
-		RapistFight = 0
-		sub += 1
+		fightEnding = 0
 		Loss += 1
 		if rikudo > 10:rikudo -= 10
 		pcs_vag += 1
@@ -156,20 +152,19 @@ if $ARGS[0] = 'loss':
 
 		act 'Cry': gt $loc, $metka
 		
-	elseif ThiefFight = 1:
+	elseif fightEnding = 9:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		ThiefFight = 0
-		sub += 1
+		fightEnding = 0
 		Loss += 1
 		money = 0
 		'He knocks you down with one final hit. The moment he puts you out of commission he grabs the money and runs away.'
 		act 'Get back on your feet': gt $loc, $metka
 		exit
-	elseif DimaFight = 1:
+	elseif fightEnding = 10:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		DimaFight = 0
+		fightEnding = 0
 		grupvalue[4] -= 2
 		if Loss < 0: Loss = 0
 		'<center><img src="images/characters/pavlovsk/school/boy/dimka/revenge/girlbeatsguy2.jpg"></center>'
@@ -178,21 +173,20 @@ if $ARGS[0] = 'loss':
 		'Lena turns to you and says tauntingly, "You either need to learn how to fight or get used to serving us, little bunny." Before you can say anything, the bell rings for class.'
 
 		act 'Continue': gt 'gschool_lessons', 'short_break'
-	elseif gangrapeFight = 1:
+	elseif fightEnding = 11:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		gangrapeFight = 0
-		sub += 1
+		fightEnding = 0
 		Loss += 1
 		if rikudo > 10:rikudo = rikudo - 10
 
 		'In their drunken state they throw you on the spit-covered porch and began tearing your clothes as you no longer have the strength to resist.'
 
 		act 'Cry':gt'sexm','gangbang'
-	elseif ZverevaFight = 1:
+	elseif fightEnding = 12:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		ZverevaFight = 0
+		fightEnding = 0
 		zverRageQW = 10
 		Loss += 1
 
@@ -202,18 +196,18 @@ if $ARGS[0] = 'loss':
 		'Christina then again spits on you this time on your face. While making fun of you, Christina kicks you a few times more in the ribs before turning around and walking away.'
 
 		act 'Leave':gs 'gschool_grounds', 'main'
-	elseif stallionfight = 1:
+	elseif fightEnding = 13:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		stallionfight = 0
+		fightEnding = 0
 		Loss += 1
 		'You breath deeply, totally exhausted as the naked man advances upon you. You no longer have the strength to fight him off.'
 		
 		act 'Lose':gt 'stallion', 'rape'
-	elseif BitchFight = 1:
+	elseif fightEnding = 14:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
 		killvar 'autocombat_surrender'
-		BitchFight = 0
+		fightEnding = 0
 		Loss += 1
 		gs 'pain', 5, 'tummy', 'kick'
 		gs 'pain', 5, 'cheeks', 'hit'
@@ -240,19 +234,19 @@ if $ARGS[0] = 'win':
 		exit
 	end
 
-	if jugoFight = 2:
+	if fightEnding = 2:
 		pcs_health = pcs_vital*10
 		rikudo = rikudo + 10
-		jugoFight = 0
+		fightEnding = 0
 		if winJugo = 0:winJugo = 1
 
 		'Juugo fell to the floor and can no longer keep on fighting.'
 
 		act 'Further':gt'lab','start'
 		exit
-	elseif tatianaFight = 1:
+	elseif fightEnding = 3:
 		pcs_health = pcs_vital*10
-		tatianaFight = 0
+		fightEnding = 0
 		rikudo = rikudo + 10
 		if wintatiana = 0:wintatiana = 1
 
@@ -260,10 +254,9 @@ if $ARGS[0] = 'win':
 
 		act 'Further':gt'lab','start'
 		exit
-	elseif prostitutFight = 1:
-		prostitutFight = 0
+	elseif fightEnding = 4:
+		fightEnding = 0
 		whoreQW = 1
-		pcs_dom += 1
 		Win += 1
 		rikudo = rikudo + 10
 
@@ -271,9 +264,8 @@ if $ARGS[0] = 'win':
 
 		act 'Further':gt'park','start'
 		exit
-	elseif prostitutFight = 2:
-		prostitutFight = 0
-		pcs_dom += 1
+	elseif fightEnding = 5:
+		fightEnding = 0
 		Win += 1
 		bandfight = bandfight + 1
 		rikudo = rikudo + 10
@@ -283,9 +275,8 @@ if $ARGS[0] = 'win':
 
 		act 'Further':gt'park','start'
 		exit
-	elseif prostitutFight = 3:
-		prostitutFight = 0
-		pcs_dom += 1
+	elseif fightEnding = 6:
+		fightEnding = 0
 		Win += 1
 		stellfight = stellfight + 1
 		rikudo = rikudo + 10
@@ -295,10 +286,9 @@ if $ARGS[0] = 'win':
 
 		act 'Further':gt'park','start'
 		exit
-	elseif KisaFight = 1:
+	elseif fightEnding = 7:
 		KisameDead = 1
-		KisaFight = 2
-		pcs_dom += 1
+		fightEnding = 2
 		Win += 1
 		if rikudo > 10:rikudo = rikudo + 3000
 		money = money + 5000
@@ -307,8 +297,7 @@ if $ARGS[0] = 'win':
 
 		act 'Further':gt'street'
 		exit
-	elseif RapistFight = 1 or ThiefFight = 1:
-		ThiefFight = 0
+	elseif fightEnding = 8 or fightEnding = 9:
 		if succubusQW >= 4 and scpopt < 2:
 			$sclocrt = 'ender'
 			$scargrt = 'win'
@@ -316,20 +305,21 @@ if $ARGS[0] = 'win':
 			scpopt = 1
 			gt 'succubus', 'RapistFight'
 		end
-		RapistFight = 0
+
+		'You fought back the '+iif(fightEnding = 8, 'rapist', 'thief')+' and took his wallet.'
+
+		fightEnding = 0
+		fightEnding = 0
 		scpopt = 0
 		if rikudo > 10:rikudo += 100
-		pcs_dom += 1
 		Win += 1
 		money += rand(500,2000)
 
-		'You fought back the '+iif(RapistFight = 1, 'rapist', 'thief')+' and took his wallet.'
-						
 		act 'Leave': gt $loc, $metka
 		exit
-	elseif DimaFight = 1:
+	elseif fightEnding = 10:
 		money += 10000
-		DimaFight = 0
+		fightEnding = 0
 		grupvalue[4] += 3
 		Win += 1
 		'<center><img src="images/characters/pavlovsk/school/boy/dimka/revenge/girlbeatsguy1.jpg"></center>'
@@ -340,10 +330,9 @@ if $ARGS[0] = 'win':
 		'You check his pockets and find 10000 rubles in his wallet. Fucking rich kid. This should teach him. "The teacher is coming," says Lera, "Let''s get out of here."'
 
 		act 'Continue': gt 'gschool_lessons', 'short_break'
-	elseif gangrapeFight = 1:
-		gangrapeFight = 0
+	elseif fightEnding = 11:
+		fightEnding = 0
 		if rikudo > 10:rikudo += 100
-		pcs_dom += 1
 		Win += 1
 		money += rand(500,2000)
 		gs 'stat'
@@ -359,11 +348,11 @@ if $ARGS[0] = 'win':
 				gt 'street'
 			end
 		end
-	elseif ZverevaFight = 1:
+	elseif fightEnding = 12:
 		zverSlutQW = 1
 		lariskaQwestStart = daystart + 7
 		Win += 1
-		ZverevaFight = 0
+		fightEnding = 0
 
 		$npc_notes['A13'] = 'Lariska, who is very dependent on other people''s opinions. After you managed to win the fight against Christina Lariska looks more cheerful. She''s a good volleyball player, and could go pro if she keeps it up even though she doesn''t believe it herself. But with the help of Mikhail Nikolayevich, the volleyball coach, she might make it.'
 
@@ -373,13 +362,13 @@ if $ARGS[0] = 'win':
 		'Christina fell to the ground, and you grabbed her by the hair. "Well bitch, tell the whole school, have you ever sucked a cock or not?" Christine squealed as she admitted to the whole school that she loved sucking cock.'
 
 		act 'Leave':gs 'gschool_grounds', 'main'
-	elseif stallionfight = 1:
-		stallionfight = 0
+	elseif fightEnding = 13:
+		fightEnding = 0
 		Win += 1
 		'The naked man staggers back, all bloody. You''ve beaten him, and it is pretty clear he is finished. You look down and see something odd...'
 		act 'What is that?':gt 'stallion', 'end'
-	elseif BitchFight = 1:
-		BitchFight = 0
+	elseif fightEnding = 14:
+		fightEnding = 0
 		Win += 1
 		'<<$streetev_title>>'
 		'<center><img <<$set_imgh>> src="images/locations/shared/street/girlgang.jpg"></center>'

+ 48 - 55
locations/fight.qsrc

@@ -171,23 +171,23 @@ if $ARGS[0] = 'start':
 
 	$HTMLText = '<table>
 		<tr>
-			<th align="right">Allies</td>
-			<th align="center" valign="center" rowspan=<<tableSize*2+1>> >vs.</td>
-			<th align="left">Opponents</td>
+			<th align="left">Allies</left></td>
+			<th align="center" valign="center" rowspan=<<tableSize*2+1>> >vs.</center></td>
+			<th align="right">Opponents</right></td>
 		</tr>'
 	i = 0
 	:FightPoster
 	if i < tableSize:
 		$HTMLText += '
 		<tr>
-			<td align="right"><img HEIGHT=400 src="<<$pcs_image[i]>>"></td>
+			<td align="left"><img HEIGHT=400 src="<<$pcs_image[i]>>"></left></td>
 
-			<td align="left"><img HEIGHT=400 src="<<$opp_image[i]>>"></td>
+			<td align="right"><img HEIGHT=400 src="<<$opp_image[i]>>"></right></td>
 		</tr>
 		<tr>
-			<td align="right"><<$pcs_name[i]>></td>
+			<td align="left"><<$pcs_name[i]>></left></td>
 
-			<td align="left"><<$opp_name[i]>></td>
+			<td align="right"><<$opp_name[i]>></right></td>
 		</tr>'
 		i += 1
 		jump 'FightPoster'
@@ -260,6 +260,7 @@ if $ARGS[0] = 'findActiveTimer':
 end
 
 if $ARGS[0] = 'main':
+
 	gs 'fight', 'result_check'
 	gs 'fight', 'findActiveTimer'
 	gt 'fight', $fightTimType, fightTimNum
@@ -325,7 +326,7 @@ end
 if $ARGS[0] = 'result_check':
 !!cheat to auto-win fights check
 	if fight_cheat = 1:
-		!xgt 'ender', 'win'
+		xgt 'ender', 'win'
 		gt $loc, $metka
 		exit
 	end
@@ -335,19 +336,19 @@ if $ARGS[0] = 'result_check':
 	if pcs_health <= 0:
 		'<b><font color = red> You lost!</font></b>'
 
-		!xgt'ender','loss'
+		xgt'ender','loss'
 		gt $loc, $metka
 		exit
 	elseif opp_health[0] <= 0:
 		'<b><font color = green><<$boydesc>> You won!</font></b>'
 
-		!xgt'ender','win'
+		xgt'ender','win'
 		gt $loc, $metka
 		exit
 	elseif pcs_willpwr <= 0:
 		'<b><font color = red> You cannot summon the will to fight!</font></b>'
 
-		!xgt'ender','loss'
+		xgt'ender','loss'
 		gt $loc, $metka
 		exit
 	end
@@ -358,20 +359,20 @@ end
 !! Kick
 $AttackType[0] = 'Kick'
 $AttackSkill[0] = 'kick'
-AttackMin[0] = 3
-AttackMax[0] = 4
+AttackMin[0] = 5
+AttackMax[0] = 8
 AttackTime[0] = 40
 !! Hard Punch
 $AttackType[1] = 'Hard Punch'
 $AttackSkill[1] = 'punch'
-AttackMin[1] = 2
-AttackMax[1] = 3
+AttackMin[1] = 4
+AttackMax[1] = 6
 AttackTime[1] = 30
 !! Jab
 $AttackType[2] = 'Jab'
 $AttackSkill[2] = 'jab'
-AttackMin[2] = 1
-AttackMax[2] = 2
+AttackMin[2] = 2
+AttackMax[2] = 3
 AttackTime[2] = 15
 
 !!{Attack a target
@@ -388,64 +389,56 @@ if $ARGS[0] = 'Attack':
 	fightAtk_AttackerNumber = ARGS[4]
 
 	if $fightAtk_TargetType = 'opp' and fightAtk_AttackerNumber = 0:
-		$fightAtk['AttackerType'] = 'pcs'
+		$fightAtk_AttackerType = 'pcs'
+		$fightAtk['DefenderName'] = $opp_name[fightAtk_TargetNumber]
 		$fightAtk['AttackerName'] = 'You'
 	elseif $fightAtk_TargetType = 'opp':
-		$fightAtk['AttackerType'] = 'pcs'
-		$fightAtk['AttackerName'] = $pcs_name['<<ARGS[3]>>']
-		$fightAtk['DefenderName'] = $opp_name['<<ARGS[2]>>']
-		$fightAtk['TargetPronoun'] = 'They'
+		$fightAtk['AttackerName'] = $pcs_name[fightAtk_AttackerNumber]
+		$fightAtk['DefenderName'] = $opp_name[fightAtk_TargetNumber]
+		$fightAtk_AttackerType = 'pcs'
 	else
-		$fightAtk['AttackerType'] = 'opp'
-		$fightAtk['AttackerName'] = $opp_name['<<ARGS[3]>>']
-		$fightAtk['DefenderName'] = $pcs_name['<<ARGS[2]>>']
-		$fightAtk['TargetPronoun'] = 'You'
+		$fightAtk_AttackerType = 'opp'
+		$fightAtk['AttackerName'] = $opp_name[fightAtk_AttackerNumber]
+		$fightAtk['DefenderName'] = $pcs_name[fightAtk_TargetNumber]
 	end
 
 	fightAtk_Type = arrpos('$AttackType',$fightAtk_Type)
-	fightAtk['AttackerSkillValue'] = dyneval('result = <<$fightAtk_TargetType>>_<<$AttackSkill[fightAtk_Type]>>[<<fightAtk_TargetNumber>>]')
-	fightAtk['TargetReactValue'] = dyneval('result = <<$fightAtk_TargetType>>_react[<<fightAtk_AttackerNumber>>]')
+	fightAtk['AttackerSkillValue'] = dyneval('result = <<$fightAtk_AttackerType>>_<<$AttackSkill[fightAtk_Type]>>[<<fightAtk_AttackerNumber>>]')
+	fightAtk['TargetReactValue'] = dyneval('result = <<$fightAtk_TargetType>>_react[<<fightAtk_TargetNumber>>]')
 	fightAtk['TargetAgilValue'] = dyneval('result = <<$fightAtk_TargetType>>_agil[<<fightAtk_TargetNumber>>]')
 	fightAtk['MinDamage'] = AttackMin[fightAtk_Type]
 	fightAtk['MaxDamage'] = AttackMax[fightAtk_Type]
 
 	if $fightAtk_TargetType = 'opp' and fightAtk_AttackerNumber = 0:
-		'You attempt to <<$fightAtk["Type"]>> <<$fightAtk["DefenderName"]>>!'
+		'You attempt to <<$fightAtk_Type>> <<$fightAtk["DefenderName"]>>!'
 	else
-		'<<$fightAtk["AttackerName"]>> attempts to <<$fightAtk["Type"]>> <<$fightAtk["DefenderName"]>>!'
+		'<<$fightAtk["AttackerName"]>> attempts to <<$fightAtk_Type>> <<$fightAtk["DefenderName"]>>!'
 	end
 	*nl
 	if fightAtk['AttackerSkillValue'] + rand(0,30) > fightAtk['TargetReactValue'] / 4 + 3 * fightAtk['TargetAgilValue'] / 4:
 		!!Calculate Damage
-		dynamic "fightAtk['Damage'] = <<$fightAtk['AttackerType']>>_stren[<<fightAtk_AttackerNumber>>] * rand(<<fightAtk['MinDamage']>>,<<fightAtk['MaxDamage']>>) / 15"
+		dynamic "fightAtk['Damage'] = <<$fightAtk_AttackerType>>_stren[<<fightAtk_AttackerNumber>>] * rand(<<fightAtk['MinDamage']>>,<<fightAtk['MaxDamage']>>) / 15"
 		!!Apply Damage
 		gs 'fight', 'applyDamage', $fightAtk_TargetType, fightAtk_TargetNumber, fightAtk['Damage']
 		if fightAtk['Damage'] > 10:
 			if $fightAtk_TargetType = 'opp' and fightAtk_AttackerNumber = 0:
-				'The hit is hard and you reel in pain.'
+				'The hit is hard and <<$fightAtk["DefenderName"]>> reels in pain.'
 			else
-				'The hit is hard and <<$fightAtk["AttackerName"]>> reels in pain.'
+				'The hit is hard and you reel in pain.'
 			end
 		else
 			'Its a glancing blow, but still hurts.'
 		end
 	else
-		if $fightAtk_TargetType = 'opp' and fightAtk_AttackerNumber = 0:
+		if $fightAtk_TargetType = 'pcs' and fightAtk_AttackerNumber = 0:
 			'You avoid the blow.'
 		else
-			'<<$fightAtk["AttackerName"]>> avoids the blow.'
+			'<<$fightAtk["DefenderName"]>> avoids the blow.'
 		end
 	end
-	dynamic "<<$fightAtk['AttackerType']>>_timer += AttackTime[fightAtk_Type]"
+	dynamic "<<$fightAtk_AttackerType>>_timer += AttackTime[fightAtk_Type]"
 	cla
 	act 'Next': gt 'fight', 'main'
-
-	killvar 'fightAtk'
-	killvar '$fightAtk'
-	killvar '$fightAtk_Type'
-	killvar '$fightAtk_TargetType'
-	killvar 'fightAtk_TargetNumber'
-	killvar 'fightAtk_AttackerNumber'
 end
 
 if $ARGS[0] = 'opponent':
@@ -471,11 +464,11 @@ if $ARGS[0] = 'opponent':
 	end		
 !!	if opp_magik[0] > 0: gs 'fight', 'opp_spellcast'
 	if rand(0,opp_kick[0]) > 40:
-		gs 'fight', 'Attack', 'Kick', 'pcs', TargetNumber, ARGS[2]
+		gs 'fight', 'Attack', 'Kick', 'pcs', ARGS[2], TargetNumber
 	elseif rand(0,opp_punch[0]) > 40:
-		gs 'fight', 'Attack', 'Hard Punch', 'pcs', TargetNumber, ARGS[2]
+		gs 'fight', 'Attack', 'Hard Punch', 'pcs', ARGS[2], TargetNumber
 	else
-		gs 'fight', 'Attack', 'Jab', 'pcs', TargetNumber, ARGS[2]
+		gs 'fight', 'Attack', 'Jab', 'pcs', ARGS[2], TargetNumber
 	end
 end
 
@@ -505,41 +498,41 @@ if $ARGS[0] = 'player':
 	end
 	if opp_health[0] > 0:
 		act 'Kick <<$opp_name[0]>>':
-			gs 'fight', 'Attack', 'Kick', 'opp', 0, ARGS[2]
+			gs 'fight', 'Attack', 'Kick', 'opp', 0, 0
 		end
 
 		act 'Punch <<$opp_name[0]>> hard':
-			gs 'fight', 'Attack', 'Hard Punch', 'opp', 0, ARGS[2]
+			gs 'fight', 'Attack', 'Hard Punch', 'opp', 0, 0
 		end
 
 		act 'Jab <<$opp_name[0]>>':
-			gs 'fight', 'Attack', 'Jab', 'opp', 0, ARGS[2]
+			gs 'fight', 'Attack', 'Jab', 'opp', 0, 0
 		end
 	end
 	if opp_health[1] > 0:
 		act 'Kick <<$opp_name[1]>>':
-			gs 'fight', 'Attack', 'Kick', 'opp', 1, ARGS[2]
+			gs 'fight', 'Attack', 'Kick', 'opp', 0, 1
 		end
 
 		act 'Punch <<$opp_name[1]>> hard':
-			gs 'fight', 'Attack', 'Hard Punch', 'opp', 1, ARGS[2]
+			gs 'fight', 'Attack', 'Hard Punch', 'opp', 0, 1
 		end
 
 		act 'Jab <<$opp_name[1]>>':
-			gs 'fight', 'Attack', 'Jab', 'opp', 1, ARGS[2]
+			gs 'fight', 'Attack', 'Jab', 'opp', 0, 1
 		end
 	end
 	if opp_health[2] > 0:
 		act 'Kick <<$opp_name[2]>>':
-			gs 'fight', 'Attack', 'Kick', 'opp', 2, ARGS[2]
+			gs 'fight', 'Attack', 'Kick', 'opp', 0, 2
 		end
 
 		act 'Punch <<$opp_name[2]>> hard':
-			gs 'fight', 'Attack', 'Hard Punch', 'opp', 2, ARGS[2]
+			gs 'fight', 'Attack', 'Hard Punch', 'opp', 0, 2
 		end
 
 		act 'Jab <<$opp_name[2]>>':
-			gs 'fight', 'Attack', 'Jab', 'opp', 2, ARGS[2]
+			gs 'fight', 'Attack', 'Jab', 'opp', 0, 2
 		end
 	end	
 end

+ 0 - 466
locations/frot.qsrc

@@ -1,466 +0,0 @@
-# frot
-
-menu_off = 1
-
-if $ARGS[0] = 'a':
-	cla
-	*clr
-	svol = rand(30,50)
-	spot = 500*rand(16,24)
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot.jpg"></center>'
-	'You feel something solid against your ass, stirring you realize that rising up between your buttocks a penis comes to rest.'
-
-	act 'Move away':gt 'frot', 'fin'
-
-	act 'Disregard':
-		cla
-		*clr
-		clr
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot1.jpg"></center>'
-		'The guy standing behind you, with no regard for other passengers, grabs your butt with his hand and presses his member harder against your ass.'
-
-		gs 'arousal', 'foreplay', 5, 'sub'
-		gs 'stat'
-		
-		act 'Move away':gt 'frot', 'fin'
-
-		act 'Disregard':
-			cla
-			*clr
-			clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot2.jpg"></center>'
-			'You feel like the man behind you has got his penis out and begun to rub it on your ass, clinging on to you and squeezing your buttocks with his hands.'
-
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-		
-			act 'Move away':gt 'frot', 'fin'
-
-			act 'Disregard':
-				cla
-				*clr
-				pcs_horny += 10
-				frot += 1
-				gs 'cum_call', 'pantyrear', 'stranger on the metro', 0, 0, spot, svol
-				sub += 3
-				dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] -= 1'
-				clr
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotc1.jpg"></center>'
-				'The man jerks back and you feel something warm and viscous flow over you. The guy finished you on your ass, then moved away to another section.'
-
-				act 'Get out of the car':gt 'frot', 'fin2'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'b':
-	cla
-	*clr
-	svol = rand(30,50)
-	spot = 500*rand(16,24)
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot.jpg"></center>'
-	'You feel something solid against your ass, stirring you realize that rising up between your buttocks a penis comes to rest.'
-
-	act 'Move away':gt 'frot', 'fin'
-
-	act 'Disregard':
-		cla
-		*clr
-		clr
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot1.jpg"></center>'
-		'The guy standing behind you, with no regard for other passengers, grabs your butt with his hand and presses his member harder against your ass.'
-
-		gs 'arousal', 'foreplay', 5, 'sub'
-		gs 'stat'
-		
-		act 'Move away':gt 'frot', 'fin'
-
-		act 'Disregard':
-			cla
-			*clr
-			clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frota1.jpg"></center>'
-			'The man lifts your skirt and starts to caress your bare buttocks with his strong hands.'
-			
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-		
-			act 'Move away':gt 'frot', 'fin'
-
-			act 'Disregard':
-				cla
-				*clr
-				pcs_horny += 10
-				sub += 1
-				clr
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frota2.jpg"></center>'
-				'The man lowers your panties and slides his hand between your naked buttocks to caress your wet pussy.'
-				
-				gs 'arousal', 'vaginal_finger', 5, 'sub'
-				gs 'stat'
-		
-				act 'Move away':gt 'frot', 'fin'
-
-				act 'Disregard':
-					*clr & cla
-					gs 'stat'
-					frot += 1
-					gs 'cum_call', 'clothesgroin', 'stranger on the metro', 0, 0, spot, svol
-					dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] -= 1'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotc2.jpg"></center>'
-					'The man pull your panties down to your knees, then letting your skirt fall back into place takes your hand in his. He forces his dick into your hand.'
-					'You cup the hot and hard cock and begin stroking it. After a couple of minutes you feel the man cumming on your skirt.'
-
-					gs 'arousal', 'hj', 5, 'sub'
-					gs 'stat' 
-		
-					act 'Get out of the car':gt 'frot', 'fin2'
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'c':
-	cla
-	*clr
-	svol = rand(30,50)
-	spot = 500*rand(16,24)
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
-	'You feel a man standing behind you start poking his hand down the back of your pants.'
-
-	act 'Move away':gt 'frot', 'fin'
-
-	act 'Disregard':
-		cla
-		*clr
-		gs 'stat'
-!!Image needed		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp1.jpg"></center>'
-		'You enjoy the nice sensation of the stranger caressing your ass under your pants, when suddenly you see he has pulled out a small pair of scissors and is trying to reach your bra strap.'
-
-		gs 'arousal', 'foreplay', 5, 'sub'
-		gs 'stat'
-		
-		act 'Move away':gt 'frot', 'fin'
-
-		act 'Disregard':
-			cla
-			*clr
-			gs 'bras', 'dispose'
-			clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp2.jpg"></center>'
-			'The man cut the straps of your bra and removes it from you. Freed from your bra, he now fondles your breasts.'
-			
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-		
-			act 'Move away':gt 'frot', 'fin'
-
-			act 'Enjoy':
-				cla
-				*clr
-				gs 'arousal', 'foreplay', 5, 'sub'
-				clr
-				gs 'stat'
-!!Image needed				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp3.jpg"></center>'
-				if PCloSkirt = 0:
-					'You are bent forward and the man begins to caress your ass, you feel his hands clutching your pants trying to tear them.'
-				else
-					'You are bent forward and the man begins to caress your ass, you feel his hands start to lift your skirt.'
-				end
-					
-
-				act 'Move away':gt 'frot', 'fin'
-
-				act 'Allow him':
-					cla
-					*clr
-					pcs_horny += 10
-					clr
-					gs 'stat'
-					pcs_horny += 10
-					sub += 2
-					dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] -= 5'
-					clr
-					gs 'stat'
-!!Image needed					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp4.jpg"></center>'
-					if PCloSkirt = 0:
-						'The man rips your pants between your legs, thereby exposing your wet pussy.'
-					elseif $pantyworntype = 'none':
-						'The man raises your skirt and you feel his hard cock brushing against your pussy lips.'
-					else
-						'The man rips aside your panties, thereby exposing your wet pussy.'
-					end
-					
-					if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
-
-					act 'Submit':
-						cla
-						*clr
-
-!!Image needed						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp5.jpg"></center>'
-
-						if stat['vaginal'] = 0:
-							'The idea of letting some stranger take your virginity makes you feel like a dirty slut, but also excites you more than you care to admit.'
-						end
-						'You widen your stance as much as possible in the crowded car and push back against him as he thrusts into your sweaty pussy.'
-						if pcs_horny >= 100:
-							pcs_mood += 15
-							pcs_willpwr += 15
-							$orgasm_or = 'custom'
-							$orgasm_txt = 'The wild excitement of sex with a stranger in a public place is too much and you start to cum almost immediately as he enters you.'
-						else
-							$orgasm_or = 'custom'
-							$orgasm_txt = 'You are overwhelmed by the wild excitement of sex with a stranger in a public place.'
-						end
-
-						guy += 1
-						pcs_vag += 1
-						cumprecheck = 1
-						gs 'cum_call', '', 'stranger on the metro', 0, 0, spot, svol
-						gs 'arousal', 'vaginal', 5, 'sub'
-						gs 'stat'
-						
-						if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
-
-						act 'Further':
-							cla
-							*clr
-							sub += 3
-							pcs_horny += 10
-							frot += 1
-							gs 'cum_call', '', 'stranger on the metro', 0, 0, spot, svol
-							gs 'stat'
-!!Image needed							'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp6.jpg"></center>'
-							'The stranger does not pull out of your pussy, your juices flow and he finishes inside you. You feel like a strong jet of sperm filled your uterus.'
-							gs 'cuminsidereact', 'some guy whose face you haven''t even seen'
-							act 'Get out of the car':gt 'frot', 'fin2'
-						end
-					end
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'd':
-	cla
-	*clr
-	svol = rand(30,50)
-	spot = 500*rand(16,24)
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
-	'You feel a man standing behind you start poking his hand down the back of your pants.'
-
-	act 'Move away':gt 'frot', 'fin'
-
-	act 'Disregard':
-		cla
-		*clr
-		clr
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
-		'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, he takes your hand and makes you hold his penis in your hand.'
-
-		gs 'arousal', 'foreplay', 5, 'sub'
-		gs 'stat'
-		
-		act 'Move away':gt 'frot', 'fin'
-
-		act 'Stroke his cock':
-			cla
-			*clr
-			gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
-			frot += 1
-			clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
-			'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
-
-			gs 'arousal', 'hj', 5, 'sub'
-			gs 'stat'
-		
-			act 'Get out of the car':gt 'frot', 'fin2'
-		end
-	end
-end
-
-if $ARGS[0] = 'e':
-	cla
-	*clr
-	svol = rand(30,50)
-	spot = 500*rand(16,24)
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
-	'You feel a man standing behind you start poking his hand down the back of your pants.'
-
-	act 'Move away':gt 'frot', 'fin'
-
-	act 'Disregard':
-		cla
-		*clr
-		clr
-		gs 'stat'
-!!Image needed		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote.jpg"></center>'
-		'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, you feel his hand reach between your legs and start to masturbate your pussy from behind.'
-
-		gs 'arousal', 'vaginal_finger', 5, 'sub'
-		gs 'stat'
-		
-		if pcs_horny >= 90:
-			pcs_mood += 15
-			pcs_willpwr += 15
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'You can''t take any more and you explode in a powerful orgasm. Your legs give way.'
-
-			act 'Squat':
-				cla
-				*clr
-				pcs_horny += 10
-				clr
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote1.jpg"></center>'
-				'You can no longer stand and squat. The man moves to your side, pulls out his member and taking you head in his hand, turns your face to meet it.'
-
-				if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
-				
-				act 'Suck it':
-					cla
-					*clr
-					guy += 1
-					frot += 1
-					clr
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote2.jpg"></center>'
-					'The man taunts you by bringing his cock to your lips, then moving back. Soon, timing it just right, you catch his purple head between your lips.'
-					'You obediently suck his hard cock. You are sitting on your haunches in the middle of a crowded subway car and sucking a stranger dick.'
-					
-					gs 'arousal', 'bj', 5, 'sub'
-					gs 'stat'
-		
-					if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
-
-					act 'Continue to suck':
-						cla
-						*clr
-						pcs_horny += 10
-						gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
-						facial += 1
-						sub += 3
-						clr
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote3.jpg"></center>'
-						'The man pulls his cock out of your mouth and ends against your lips, hot cum splatters on your lips chin.'
-						
-						if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
-
-						act 'Sit on the floor':
-							cla
-							*clr
-							pcs_horny += 10 + sub
-							gs 'cum_call', 'mouth', 'stranger on the metro', 0, 0, spot, svol
-							swallow += 1
-							sub += 3
-							gs 'stat'
-!!Image needed							'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote4.jpg"></center>'
-							'Male fingers collect the sperm from your face and they push into your mouth, and you dutifully lick them and swallow the sperm.'
-
-							act 'Get out of the car':gt 'frot', 'fin2'
-						end
-					end
-				end
-			end
-
-			exit
-		else
-			'You are very nervous the thought crosses your mind to masturbate his penis.'
-
-			act 'Stroke his cock':
-				cla
-				*clr
-				gs 'cum_call', 'butt', 'stranger from the metro', 0, 0, spot, svol
-				frot += 1
-				clr
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
-				'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
-
-				gs 'arousal', 'hj', 5, 'sub'
-				gs 'stat'
-		
-				act 'Get out of the car':gt 'frot', 'fin2'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'd1':
-	cla
-	*clr
-	svol = rand(30,50)
-	spot = 500*rand(16,24)
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd2.jpg"></center>'
-	'You feel a man standing behind you playing with your skirt.'
-
-	act 'Move away':gt 'frot', 'fin'
-
-	act 'Disregard':
-		cla
-		*clr
-		clr
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
-		'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, he takes your hand and makes you take his penis in your hand.'
-
-		gs 'arousal', 'foreplay', 5, 'sub'
-		gs 'stat'
-		
-		act 'Move away':gt 'frot', 'fin'
-
-		act 'Stroke his cock':
-			cla
-			*clr
-			gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
-			frot += 1
-			clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
-			'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
-
-			gs 'arousal', 'hj', 5, 'sub'
-			gs 'stat'
-		
-			act 'Get out of the car':gt 'frot', 'fin2'
-		end
-	end
-end
-
-if $ARGS[0] = 'fin':
-	cla
-	'You barely manage to escape to another place, away from the horny idiot. After a while you get to your station.'
-	
-	gs 'arousal', 'end'
-	gs 'stat'
-	
-	act 'Get out of the car':gt 'metro', 'start'
-end
-
-if $ARGS[0] = 'fin2':
-	gt 'metro', 'start'
-end
-
---- frot ---------------------------------
-

+ 121 - 96
locations/gLakeNude.qsrc

@@ -8,9 +8,9 @@ $menu_arg = ''
 $locclass = 'beach'
 menu_off = 0
 *clr & cla
-gs'stat'
+gs 'stat'
 !!check to make sure I did the sound call correct
-if sound = 0:PLAY 'sound/lakeshore2.mp3',20
+if sound = 0: PLAY 'sound/lakeshore2.mp3',20
 '<center><H4>Secluded beach</H4></center>'
 if month >= 3 and month <= 5:
 	if hour >= 6 and hour <= 17:
@@ -58,10 +58,10 @@ act'Leave the secluded beach<<$tmp_lakenude_leave>>':
 	if $clothingworntype ! 'nude' or ($clothingworntype = 'nude' and pcs_inhib >= 60):
 		cla
 		minut += 10
-		gt'glake'
+		gt 'glake'
 	else
 		msg '<center>You are not willing to show off your naked body on the main beach, what would people say?</center>'
-		gt'gLakeNude'
+		gt 'gLakeNude'
 	end
 end
 killvar '$tmp_lakenude_leave'
@@ -76,43 +76,49 @@ if month >= 5 and month <= 9:
 	end
 		
 	if $clothingworntype ! 'nude' and (pcs_inhib > 30 or (exhibitionist_lvl > 1 and pcs_horny >= 60)):
-		act'Take off your clothes':
-			menu_off = 1
-			if pcs_inhib > 30:
-				*clr & cla
-				minut+=5
-				inhib_exp += rand(1,3)
-				gs 'clothing', 'strip'
-				gs 'underwear', 'remove'
-				if pcs_horny >= 80 and exhibitionist_lvl > 1:
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants3.jpg"></center>'
-					'You strip off. A couple of passing men do a double-take and pause a moment to look at your sopping wet panties, probably thinking about what is making you so excited. You don''t care about what they might say or think of you.'
-				elseif pcs_inhib >= 60:
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
-					'Not caring if anyone is looking at you, you slowly take off your clothes. You peel off each item like a stripper. Soon, you are completely naked.'
-				elseif pcs_inhib < 60:
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
-					'You quickly check to see if anyone is watching, and when you''re satisfied no one is paying you undue attention, you take off your clothes. You''re naked now.'
+		gs 'willpower', 'exhib', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Take off your clothes (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'self', 'easy'
+				gs 'willpower', 'pay', 'self'
+				menu_off = 1
+				if pcs_inhib > 30:
+					*clr & cla
+					minut += 5
+					inhib_exp += rand(1,3)
+					gs 'clothing', 'strip'
+					gs 'underwear', 'remove'
+					if pcs_horny >= 80 and exhibitionist_lvl > 1:
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants3.jpg"></center>'
+						'You strip off. A couple of passing men do a double-take and pause a moment to look at your sopping wet panties, probably thinking about what is making you so excited. You don''t care about what they might say or think of you.'
+					elseif pcs_inhib >= 60:
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
+						'Not caring if anyone is looking at you, you slowly take off your clothes. You peel off each item like a stripper. Soon, you are completely naked.'
+					elseif pcs_inhib < 60:
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
+						'You quickly check to see if anyone is watching, and when you''re satisfied no one is paying you undue attention, you take off your clothes. You''re naked now.'
+					end
+				else
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/shyness.jpg"></center>'
+					'Even though no one is around, you don''t feel confident enough to actually take your clothes off. What if someone would see you nude?'
 				end
-			else
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/shyness.jpg"></center>'
-				'Even though no one is around, you don''t feel confident enough to actually take your clothes off. What if someone would see you nude?'
+				act 'Continue': gt 'gLakeNude'
 			end
-			act'Continue':gt'gLakeNude'
+		else
+			act 'Take off your clothes (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	elseif $clothingworntype = 'nude':
-		act'Put your clothes back on':
+		act 'Put your clothes back on':
 			*clr & cla
 			menu_off = 1
-			minut+=5
+			minut += 5
 			gs 'clothing', 'wear_last_worn'
 			gs 'underwear', 'wear'
 			nudelake = rand(1,10)
 			if nudelake <= 2:
 				minut += 5
 				pcs_mood -= 5
-				pcs_willpwr -= 5
 				gs 'exhibitionism', 4
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/noclothes.jpg"></center>'
@@ -120,7 +126,7 @@ if month >= 5 and month <= 9:
 				act 'Run home naked': gt 'glake', 'nude_home'
 			else
 				'You return to the place where you left your clothes, and put them back on.'
-				act'Continue': gt 'gLakeNude'
+				act 'Continue': gt 'gLakeNude'
 			end
 		end
 	end
@@ -133,9 +139,8 @@ if temper >= 15 and month >= 5 and month <= 9:
 		*clr & cla
 		menu_off = 1
 		minut += 30
-		pcs_willpwr += 5
 		pcs_mood += 5
-		gs'stat'
+		gs 'stat'
 
 		if $clothingworntype = 'swimwear' and pcs_hips<=90:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk.bikini0,'+rand(0,3)+'.jpg"></center>'
@@ -156,7 +161,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 	end
 	
 	if hour >= 6 and hour <= 20 and ($clothingworntype = 'swimwear' or $clothingworntype = 'nude'):
-		act'Go swimming (30 minutes)':
+		act 'Go swimming (30 minutes)':
 			menu_off = 1
 			*clr & cla
 			cumspclnt = 4
@@ -182,12 +187,12 @@ if temper >= 15 and month >= 5 and month <= 9:
 			'You play around and have fun in the lake, enjoying the feel of the warm water on your naked body. The clean lake water refreshes and invigorates you.'
 			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 
-			act 'Get out of the water':gt'gLakeNude'
+			act 'Get out of the water': gt 'gLakeNude'
 		end
 	end
 	
 	if sunWeather = 1 and hour >= 6 and hour <= 20  and ($clothingworntype = 'swimwear' or $clothingworntype = 'nude'):
-		act'Go sunbathing (30 minutes)':
+		act 'Go sunbathing (30 minutes)':
 			menu_off = 1
 			if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 				*clr & cla
@@ -209,76 +214,90 @@ if temper >= 15 and month >= 5 and month <= 9:
 					pcs_tan = pcs_tan + 3
 					'You smear your body with sunscreen and lie down on your towel for some sunbathing, hoping to work on your tan. You enjoy the warm rays of the sun on your body.'
 				end
-				act 'Continue':gt'gLakeNude'
+				act 'Continue': gt 'gLakeNude'
 			else
 				cla
 				'You have to take off your clothes before you can lay down to sunbath.'
-				act'Continue':gt'gLakeNude'
+				act 'Continue': gt 'gLakeNude'
 			end
 		end
 	end
 	
 	if voyeurism_start = 0:
-		act'Look around the beach':
+		act 'Look around the beach':
 			*clr & cla
 			menu_off = 1
-			minut += 5
 			voyeurism_start_view = rand(1,3)
 			gs 'stat'
 			if voyeurism_start_view <= 2:
+				minut += 5
 				'<center><img <<$set_imgh>> src="images/locations/shared/lake/lake_beach1.jpg"></center>'
 				'You look around, but see nothing interesting. Just a few others in swimwear or relaxing on the beach.'
 			else
 				voyeurism_start = 1
 				voyeurism += 1
+				gs 'arousal', 'voyeur', 5
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event.jpg"></center>'
 				'You look around and notice that a little ways off at the end of the small beach is a pair of lovers laying on the sand. The girl is completely naked and her hand is stroking the guy''s cock through his white pants. The guy turns his head and notices that you look at them. You immediately turn away, blushing terribly and begin to explore your feet as if seeing them for the first time.'
 			end
 			act'Back': gt 'gLakeNude'
 		end
 	elseif voyeurism_start = 1:
-		act'Watch couple on the beach':
-			*clr & cla
-			menu_off = 1
-			if voyeurism = 0:
-				minut += 5
-				voyeurism += 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/lake_legs.jpg"></center>'
-				'From the corner of your eye you see several naked people. You think they look right at you. You blush and you freeze in terror, tears well up in the corner of your eyes. After a few moments you find yourself looking at your own feet.<br><dh>"Wha....What am I doing?! Why do I feel like watching... Am I a voyeur? Yes, I am! I`m a girl who likes to watch nude people!"</dh> you think.<br> You can''t remember a single instance in your life when you were watching someone. So is it worth to start doing it now? YES!'
-				act'Stop Watching!': gt'gLakeNude'
-			else
-				voyeurism_start = 2
-				minut += 50
-				pcs_horny += 75
-				voyeurism += 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event.jpg"></center>'
-				'From the corner of your eye you see several naked people. You think they look right at you. You blush and you freeze in terror, tears well up in the corner of your eyes. After a few moments you find yourself looking at your own feet.<br><dh>"Wha....What am I doing?! Why do I feel like watching... Am I a voyeur? Yes, I am! I`m a girl who likes to watch nude people!"</dh> you think.<br> But then you remember how you recently were watching others on the beach and think: <dh>"That was scary, cool, and hot. I need to keep at least one eye always watching."</dh>'
-				act'Watch the couple': 	gs'gLakeNudeEvent','gLakeNude_sex'
+		gs 'willpower', 'voyeur', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Watch couple on the beachs (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'voyeur', 'self'
+				gs 'willpower', 'pay', 'self'
+				menu_off = 1
+				if voyeurism = 0:
+					gs 'arousal', 'voyeur', 5
+					voyeurism += 1
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/lake_legs.jpg"></center>'
+					'From the corner of your eye you see several naked people. You think they look right at you. You blush and you freeze in terror, tears well up in the corner of your eyes. After a few moments you find yourself looking at your own feet.<br><dh>"Wha....What am I doing?! Why do I feel like watching... Am I a voyeur? Yes, I am! I`m a girl who likes to watch nude people!"</dh> you think.<br> You can''t remember a single instance in your life when you were watching someone. So is it worth to start doing it now? YES!'
+					act'Stop Watching!': gt'gLakeNude'
+				else
+					voyeurism_start = 2
+					gs 'arousal', 'voyeur', 30
+					voyeurism += 1
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event.jpg"></center>'
+					'From the corner of your eye you see several naked people. You think they look right at you. You blush and you freeze in terror, tears well up in the corner of your eyes. After a few moments you find yourself looking at your own feet.<br><dh>"Wha....What am I doing?! Why do I feel like watching... Am I a voyeur? Yes, I am! I`m a girl who likes to watch nude people!"</dh> you think.<br> But then you remember how you recently were watching others on the beach and think: <dh>"That was scary, cool, and hot. I need to keep at least one eye always watching."</dh>'
+					act'Watch the couple': 	gs'gLakeNudeEvent','gLakeNude_sex'
+				end
 			end
+		else
+			act 'Watch couple on the beach (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	elseif voyeurism_start = 2 and (pcs_horny < 90 or pav_slut < 50):
-		act 'Spy on other nudists on the beach':
-			menu_off = 1
-			gs 'stat'
-			if voyeurism_nudist <= 14 or pav_slut > 50:
-				voyeurism_nudist += 1
-				gs'gLakeNudeEvent','gLakeNude_nudist'
-				act'Continue': gt 'gLakeNude'
-			else
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/nudebeachself'+rand(1,3)+'.jpg"></center>'
-				'You want to watch for nudists, but suddenly notice that you start to feel weird.<br><dh>"Probably spying too much."</dh> you think and look straight ahead.'
-				act'Continue': gt'gLakeNude'
+		gs 'willpower', 'voyeur', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Spy on other nudists on the beach (<<will_cost>> Willpower)':
+				gs 'willpower', 'voyeur', 'self', 'easy'
+				gs 'willpower', 'pay', 'self'
+				menu_off = 1
+				gs 'stat'
+				if voyeurism_nudist <= 14 or pav_slut > 50:
+					voyeurism_nudist += 1
+					gs 'gLakeNudeEvent','gLakeNude_nudist'
+					act 'Continue': gt 'gLakeNude'
+				else
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/nudebeachself'+rand(1,3)+'.jpg"></center>'
+					'You want to watch for nudists, but suddenly notice that you start to feel weird.<br><dh>"Probably spying too much."</dh> you think and look straight ahead.'
+					act 'Continue': gt'gLakeNude'
+				end
 			end
 		end
-	end
+		else
+			act 'Spy on other nudists on the beach (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	if voyeurism >= 17 and voyeurism_start = 2:
 		if voyeurism_forest = 0:
-			act'Explore the forest': gt'gLakeNudeForest'
+			act 'Explore the forest': gt 'gLakeNudeForest'
 		else
-			act'Hide in the woods near the beach': gt'gLakeNudeForest'
+			act 'Hide in the woods near the beach': gt 'gLakeNudeForest'
 		end
 	end
 end
@@ -312,7 +331,7 @@ if $ARGS[0] = 'sauna':
 	end
 		
 	if $clothingworntype ! 'nude' and (pcs_inhib > 25 or (exhibitionist_lvl > 1 and pcs_horny >= 60)):
-		act'Take off your clothes':
+		act 'Take off your clothes':
 			*clr & cla
 			menu_off = 1
 			minut +=  5
@@ -323,14 +342,14 @@ if $ARGS[0] = 'sauna':
 			act 'Continue': gt 'gLakeNude', 'sauna'
 		end
 	else
-		act'Put your clothes back on':
+		act 'Put your clothes back on':
 			cla
 			menu_off = 1
 			minut += 5
 			gs 'clothing', 'wear_last_worn'
 			gs 'underwear', 'wear'
 			'You put your clothes back on.'
-			act'Continue': gt 'gLakeNude', 'sauna'
+			act 'Continue': gt 'gLakeNude', 'sauna'
 		end
 	end
 	
@@ -345,7 +364,7 @@ if $ARGS[0] = 'sauna':
 				'It appears to be empty at the moment.'
 			else
 				saunarand = rand(1,5)
-				if saunarand = 1:
+				if saunarand = 4:
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/womennude.jpg"></center>'
 					'You find several other girls inside completely naked using the sauna.'
 				elseif saunarand > 4:
@@ -382,7 +401,7 @@ if $ARGS[0] = 'sauna':
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunaempty.jpg"></center>'
 			'It appears to be empty at the moment.'
-			act 'Leave': gt 'gLakeNude', 'sauna' 
+			act 'Leave': gt 'gLakeNude', 'sauna'
 			act 'Use the sauna':
 				*clr & cla
 				minut += 30
@@ -410,7 +429,7 @@ if $ARGS[0] = 'sauna':
 				'It appears to be empty at the moment.'
 			else
 				saunarand = rand(1,5)
-				if saunarand = 1:
+				if saunarand = 4:
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/coednude.jpg"></center>'
 					'You find several other people in here, men and women. All of them completely naked.'
 				elseif saunarand > 4:
@@ -421,26 +440,32 @@ if $ARGS[0] = 'sauna':
 					'It appears to be empty at the moment.'
 				end
 			end
+			gs 'willpower', 'exhib', 'self', 'easy'
+			if saunarand < 4 or $clothingworntype = 'swimwear': will_cost = 0
+			if will_cost <= pcs_willpwr:
+				act iif(saunarand < 4 or $clothingworntype = 'swimwear', 'Use the sauna', 'Use the sauna (<<will_cost>> Willpower)'):
+					*clr & cla
+					gs 'willpower', 'pay', 'self'
+					minut += 30
+					pcs_mood += 10
+					if $clothingworntype = 'swimwear':
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg"></center>'
+						if pcs_inhib < 40: inhib_exp += rand(0,1)
+					else
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunanude.jpg"></center>'
+						if pcs_inhib < 60: inhib_exp += rand(1,3)
+					end
+					gs 'stat'
+					'You spend 30 minutes relaxing in the sauna.'
 
-			act 'Leave': gt 'gLakeNude', 'sauna'
-			act 'Use the sauna':
-				*clr & cla
-				minut +=30
-				pcs_mood += 10
-				if $clothingworntype = 'swimwear':
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg"></center>'
-					if pcs_inhib < 40: inhib_exp += rand(0,1)
-				else
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunanude.jpg"></center>'
-					if pcs_inhib < 60: inhib_exp += rand(1,3)
-				end
-				gs 'stat'
-				'You spend 30 minutes relaxing in the sauna.'
-
-				act 'Leave': gt 'gLakeNude', 'sauna'
+					act 'Leave': gt 'gLakeNude', 'sauna'
 
-				if month = 12 or month < 3: gs 'gLakeNude', 'ice_plunge'
+					if month = 12 or month < 3: gs 'gLakeNude', 'ice_plunge'
+				end
+			else
+				act 'Use the sauna (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
+			act 'Leave': gt 'gLakeNude', 'sauna'
 		end
 	else
 		*nl

+ 14 - 14
locations/gLakeNudeEvent.qsrc

@@ -6,14 +6,14 @@ if $args[0] = 'gLakeNude_sex':
 	*clr
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_0.jpg"></center>'
 	'You tear your eyes from their beautiful legs and look around. You see that no one else is on the beach except you and the couple that''s getting hot and heavy. By now they are too into each other to pay attention to you. The girl slowly wraps her plump lips around the head of her man''s cock, pushing her ass into the air in a seductive pose.'
-	gs 'arousal', 'voyeur', 5
+	gs 'arousal', 'voyeur', 1
 	gs 'stat'
 	act 'Continue watching':
 		cla
 		*clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_1.jpg"></center>'
 		'The gorgeous blonde wraps a delicate hand around the shaft of the engorged cock. She slowly begins pumping the base of her boyfriend''s dick as she sucks and licks around the head, never breaking eye contact. The stud''s abs tighten visibly as he draws in a breath of pleasure from blonde''s ministrations. You find yourself enthralled; unable to look away as a heat begins to build just below your belly.'
-		gs 'arousal', 'voyeur', 5
+		gs 'arousal', 'voyeur', 2
 		gs 'stat'
 		act 'Further':
 			cla
@@ -21,7 +21,7 @@ if $args[0] = 'gLakeNude_sex':
 			gs 'clothing','strip'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_2.jpg"></center>'
 			'Leaving your clothes lying on the sand, you move a little closer to the sexy couple, pretending that you''re just walking on the beach. You see the girl push her man''s legs further apart, allowing her to dip her head down and take one ball into her mouth, then the other. Once she returns to his throbbing cock, she opens her tight throat and takes it in further than before, almost 3/4 of the way down the impressive member'
-			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'voyeur', 2
 			gs 'stat'
 			act 'Further':
 				cla
@@ -29,7 +29,7 @@ if $args[0] = 'gLakeNude_sex':
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_3.jpg"></center>'
 				'Suddenly a strong wave rushes on shore and drenches them both. The water crashes up over the cock-hungry blonde''s legs and thighs, causing her throw her head up and gasp, the meaty phallus popping out her mouth. The couple make eye contact with each other and giggle lightly. "Let''s go swimming" you hear the hot woman say in a sultry voice.
 				As the pair start to get up a wave of panic rushes over you. You need to do duck away quickly; otherwise they''ll surely take notice of you and how you''re shaking from excitement.' 
-				gs 'arousal', 'voyeur', 5
+				gs 'arousal', 'voyeur', 1
 				gs 'stat'
 				act 'Further':
 					cla
@@ -52,28 +52,28 @@ if $args[0] = 'gLakeNude_sex':
 							*clr
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_6.jpg"></center>'
 							'The hot Adonis of a man gives his girl one hard smack on her plump ass. He then spreads his feet wide apart and bends his knees, lining up his still rock hard member with the blonde girl''s waiting orifice. As he slides his thick pole into her pussy, you catch sight of her eyes as they roll back into her head. She bites down on her lower lip, stifling a moan.'							
-							gs 'arousal', 'voyeur', 5
+							gs 'arousal', 'voyeur', 1
 							gs 'stat'
 							act 'Further':
 								cla
 								*clr
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_7.jpg"></center>'
 								'The chiseled statue of a man continues pounding into his girlfriend for several more minutes, continually changing angles and speed to keep her at the peak of passion. You continue rubbing your dripping vagina, feeling shame and excitement in equal measure. Even from this distance you can hear the blonde girl''s breaths as they become shorter and more erratic. Suddenly her breathe catches in her throat for a moment before she lets out a wailing cry of pleasure. "Oh my god, she just came so hard!" you think as your own arousal continues to build.'
-								gs 'arousal', 'voyeur', 5
+								gs 'arousal', 'voyeur', 4
 								gs 'stat'
 								act 'Further':
 									cla
 									*clr
 									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_8.jpg"></center>'
 									'After her orgasm subsides, the blond rolls over onto her back, letting the massive cock slide out of her for just a moment. Before long, however, her boyfriend is sliding his knees up to her ass in the sand. The hormone driven man pushes his girlfriend''s knees back, exposing her used hole to him once more. Without giving her more than a moment to prepare the strong brute thrusts his mighty dick back into her waiting pussy.'
-									gs 'arousal', 'voyeur', 5
+									gs 'arousal', 'voyeur', 2
 									gs 'stat'
 									act 'Further':
 										cla
 										*clr
 										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_9.jpg"></center>'
 										'"It seems that the time for tender loving is over" you think as you watch the ripped man drive his veiny cock into her without mercy. He thrusts hard and fast, his tight balls swinging violently with every thrust.'
-										gs 'arousal', 'voyeur', 5
+										gs 'arousal', 'voyeur', 1
 										gs 'stat'
 										act 'Further': gt 'gLakeNudeEvent', 'gLakeNude_sex2'
 									end
@@ -92,7 +92,7 @@ if $args[0] = 'gLakeNude_sex2':
 	*clr
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_10.jpg"></center>'
 	'Another unexpected wave crashes onto the beach and flows over the fucking couple. This time it seems like they will pay it no mind, too enraptured by each other''s bodies to care about the sandy water.'
-	gs 'arousal', 'voyeur', 5
+	gs 'arousal', 'voyeur', 1
 	gs 'stat'
 	act 'Further':
 		cla
@@ -107,7 +107,7 @@ if $args[0] = 'gLakeNude_sex2':
 			*clr
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_12.jpg"></center>'
 			'The horny, impatient man wastes no time getting himself back into position. He grips both of the girl''s perfect ass cheeks in either hand, flesh pillowing through is fingers, as he thrusts himself back into her sopping hole.'
-			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'voyeur', 1
 			gs 'stat'
 			act 'Further':
 				cla
@@ -121,7 +121,7 @@ if $args[0] = 'gLakeNude_sex2':
 					*clr
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_14.jpg"></center>'
 					'Without warning the man suddenly crosses his arms over his girlfriend''s hips and flips her onto her back. In a moment he''s back inside of her, never breaking the rhythm of his thrusts. You marvel at the power in his body, as well as the possessiveness he has over his girlfriend. She is his and he will do what he wants with her.'
-					gs 'arousal', 'voyeur', 5
+					gs 'arousal', 'voyeur', 1
 					gs 'stat'
 					act 'Further':
 						cla
@@ -130,14 +130,14 @@ if $args[0] = 'gLakeNude_sex2':
 						'"Do it!" the gruff man commands as his girlfriend vigorously rubs her clit while he fucks her.'
 						'"Do It now!" he threatens just a moment before the blonde girl throws her head back and screams in orgasm, her body and legs shaking uncontrollably.'
 						'The dominant man thrusts hard just a few more times before...'
-						gs 'arousal', 'voyeur', 5
+						gs 'arousal', 'voyeur', 1
 						gs 'stat'
 						act 'Further':
 							cla
 							*clr
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_16.jpg"></center>'
 							'he pulls his pussy juice soaked cock out of his girlfriend''s snatch and erupts a volcano of cum all over her.'
-							gs 'arousal', 'voyeur', 5
+							gs 'arousal', 'voyeur', 1
 							gs 'stat'
 							act 'Further':
 								cla
@@ -145,7 +145,7 @@ if $args[0] = 'gLakeNude_sex2':
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_17.jpg"></center>'
 								'The sperm and sand mix to form a coarse paste as they cover the blonde girl''s belly. She obediently attempts to lean her head forward to catch a few drops in her mouth as it flies out, but she is too spent to really make the effort.'
 								'The couple collapse next to each other, exhausted from their romance session, and begin quietly talking.'
-								gs 'arousal', 'voyeur', 5
+								gs 'arousal', 'voyeur', 1
 								gs 'arousal', 'end'
 								gs 'stat'
 								act 'Further':

+ 34 - 18
locations/gLakeNudeForest.qsrc

@@ -19,26 +19,42 @@ end
 
 if temper >= 20 and month >= 5 and month <= 9 and hour >= 6 and hour <= 20:
 	if voyeurism_forest = 0:
-		set voyeurism_forest = 1
-		act'Follow the girl': gt'gLakeNudeEvent','gLakeNudeForest_piss'
+		voyeurism_forest = 1
+		gs 'willpower', 'voyeur', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Follow the girl (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'gLakeNudeEvent', 'gLakeNudeForest_piss'
+		else
+			act 'Follow the girl (<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'Spy on nudists':
-			menu_off = 1
-			gs 'gLakeNudeEvent','gLakeNude_nudist'
-			act 'Look': gt 'gLakeNudeForest'
+		gs 'willpower', 'voyeur', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Spy on nudists (<<will_cost>> Willpower)':
+				menu_off = 1
+				gs 'willpower', 'voyeur', 'self', 'easy'
+				gs 'willpower', 'pay', 'self'
+				gs 'gLakeNudeEvent','gLakeNude_nudist'
+				act 'Look': gt 'gLakeNudeForest'
+		else
+			act 'Spy on nudists (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
-		act'Spy on girl going for a pee':
-			cla
-			*clr
-			menu_off = 1
-			minut += 10
-			pcs_horny += 10
-			voyeurism += 1
-			kol_foto_piss = 169
-			viewforestpiss = rand(1,kol_foto_piss)
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/piss_forest/piss_forest_<<rand(1,kol_foto_piss)>>.jpg"></center>'
-			'You slip behind a tree and watch as a cute girl looks for a private spot to do her business. She finally decides on a patch of dirt near some bushes and squats down. You dare to peek your head around the tree trunk for a better look as the girl finds her balance and appears to relax. A torrent of hot piss begins to flow from the young woman''s nether lips. You hear a light moan escape her mouth. "Wow, she must have been holding it awhile.", you think as heat radiates through your groin from the naughtiness of what you just saw.'
-			act'Back': gt 'gLakeNudeForest'
+		gs 'willpower', 'voyeur', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Spy on girl going for a pee (<<will_cost>> Willpower)':
+				*clr & cla
+				menu_off = 1
+				gs 'willpower', 'voyeur', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'arousal', 'voyeur', 10
+				voyeurism += 1
+				kol_foto_piss = 169
+				viewforestpiss = rand(1,kol_foto_piss)
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/piss_forest/piss_forest_<<rand(1,kol_foto_piss)>>.jpg"></center>'
+				'You slip behind a tree and watch as a cute girl looks for a private spot to do her business. She finally decides on a patch of dirt near some bushes and squats down. You dare to peek your head around the tree trunk for a better look as the girl finds her balance and appears to relax. A torrent of hot piss begins to flow from the young woman''s nether lips. You hear a light moan escape her mouth. "Wow, she must have been holding it awhile.", you think as heat radiates through your groin from the naughtiness of what you just saw.'
+				act'Back': gt 'gLakeNudeForest'
+			end
+		else
+			act 'Spy on girl going for a pee (<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

+ 29 - 26
locations/gadprostitutes.qsrc

@@ -32,12 +32,11 @@ if $ARGS[0] = 'start':
 	!	end
 	!end
 	if hour >= 16 and hour <= 23:
-		! event to remove Sveta from being miras pimp if she becomes the boys slut, the village whore, or a sub
-		if MiraLoc = 8 and mirapimp = 1 and (npc_QW['A63'] >= 10 or gadriver_gang = 2 or sub > 10):
+		! event to remove Sveta from being miras pimp if she becomes the boys slut, the village whore
+		if MiraLoc = 8 and mirapimp = 1 and (npc_QW['A63'] >= 10 or gadriver_gang = 2):
 			*clr & cla
 			
 			mirapimp = 0
-			sub += 5
 			minut += 5
 			gs 'stat'
 			
@@ -51,8 +50,6 @@ if $ARGS[0] = 'start':
 				'Mira continues, "Look at you, just another slut. Mitka, Kolyamba, and Vasyan told me now much they all love fucking and sharing you now. You thought you were so much better than me, well no more! I''m not working for you anymore. You have proven yourself perfectly capable of enjoying getting shared by a group of friends."'
 			elseif gadriver_gang = 2:
 				'Mira continues, "Look at you, just another whore. All the village men can talk about is how much you moaned for each and every one of them. You thought you were so much better than me, well no more! I''m not working for you anymore. You have proven yourself perfectly capable of enjoying getting gangbanged by multiple groups of strangers."'
-			elseif sub > 0:
-				'Mira continues, "Look at you, so meek and submissive. I''ve heard rumors of how you love to submit yourself to others. You thought you were so much better than me, well no more! I''m not working for you anymore. You cannot make me."'
 			end
 			'After Mira is done with her preaching, you try to think of something witty to say or raise your hand to slap her back, but you just can''t bring yourself to do it.'
 			'Mira sees the defeated look in your eyes and knows that she has won. She pulls you into an embrace and whispers, "It''s alright <<$pcs_nickname>>. We can just be friends again. And if you want to, maybe you can come work with me instead?"'
@@ -61,27 +58,33 @@ if $ARGS[0] = 'start':
 		else
 			if MiraLoc = 8:
 				'You see Mira standing below a streetlight a little ways down the road.'
-				! event to become miras pimp if not the boys slut, not the village whore, and a dom
-				if mirapimp = 0 and npc_QW['A63'] < 10 and gadriver_gang = 0 and pcs_dom > 10:
-					act 'Make Mira your prostitute':
-						*clr & cla
-						
-						mirapimp = 1
-						pcs_dom += 5
-						minut += 5
-						gs 'stat'
-						
-						gs 'Miroslava', 'miraclothes'
-						
-						'You call her over to you. Mira, hurries over and looks at you with downcast eyes.  "Hi, <<$pcs_nickname>>.  You having a good night?"'
-						'You look at her angrily. "A better question, my lovely whore, is ''Are you having a good night''?  I want 500 <b>₽</b> per customer you have each night."  You tell her earnestly.'
-						'Mira looks up in shock and with a hurt look on her face.  "What are you talking about?  Do you think I am a hooker?"'
-						'You step up to her and place your hand on her face.  Mira closes her eyes and leans into your hand.  You look into her eyes once she opens them and then SLAP her hard across the face.  Mira falls to the ground and starts to cry.  "You''re my property whore.  You will do whatever I tell you.  You will never lie to me ever again, or I swear I will make you pay.  Understand me?!"'
-						'Mira nods and she wipes away tears.'
-						'You reach down and help her back to her feet.  You brush her off and help her fix her makeup.  "Good, now get that cute ass back out on that road and earn us some money."'
-						'You give Mira a little slap on the ass and smile as you watch Mira start a new chapter of her life as your prostitute.'
-						
-						act 'Finish':gt'gadprostitutes','start'
+				! event to become miras pimp if not the boys slut, not the village whore
+				if mirapimp = 0 and npc_QW['A63'] < 10 and gadriver_gang = 0:
+					gs 'willpower', 'misc', 'force', 'hard'
+					if will_cost <= pcs_willpwr:
+						act 'Make Mira your prostitute (<<will_cost>> Willpower)':
+							*clr & cla
+							
+							mirapimp = 1
+							minut += 5
+							gs 'willpower', 'misc', 'force', 'hard'
+							gs 'willpower', 'pay', 'force'
+							gs 'stat'
+							
+							gs 'Miroslava', 'miraclothes'
+							
+							'You call her over to you. Mira, hurries over and looks at you with downcast eyes.  "Hi, <<$pcs_nickname>>.  You having a good night?"'
+							'You look at her angrily. "A better question, my lovely whore, is ''Are you having a good night''?  I want 500 <b>₽</b> per customer you have each night."  You tell her earnestly.'
+							'Mira looks up in shock and with a hurt look on her face.  "What are you talking about?  Do you think I am a hooker?"'
+							'You step up to her and place your hand on her face.  Mira closes her eyes and leans into your hand.  You look into her eyes once she opens them and then SLAP her hard across the face.  Mira falls to the ground and starts to cry.  "You''re my property whore.  You will do whatever I tell you.  You will never lie to me ever again, or I swear I will make you pay.  Understand me?!"'
+							'Mira nods and she wipes away tears.'
+							'You reach down and help her back to her feet.  You brush her off and help her fix her makeup.  "Good, now get that cute ass back out on that road and earn us some money."'
+							'You give Mira a little slap on the ass and smile as you watch Mira start a new chapter of her life as your prostitute.'
+							
+							act 'Finish':gt'gadprostitutes','start'
+						end
+					else
+						act 'Make Mira your prostitute (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 					end
 				end
 				! events to prostitute just Mira

+ 5 - 7
locations/gadriver.qsrc

@@ -34,7 +34,7 @@ if $ARGS[0] = 'start':
 
 	if temp_gr = 1 and hour < 5 and month >= 5 and month <= 9 and npc_QW['A60'] >= 20: 'Right next to the path leading to the river, you see <a href="exec: gt ''gadriver'', ''mirapunish'' ">Mira</a> naked, bound with ropes between two trees...'
 
-	if temp_gr = 4 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5 and sub > 0:
+	if temp_gr = 4 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5:
 		if mitkaguysriver ! daystart:
 			mitkaguysriver = daystart
 			'While going to the river you meet Kolyamba and Vasyan. They first invite you to join them, then insist you go with them.'
@@ -73,7 +73,7 @@ if $ARGS[0] = 'start':
 			act 'Go to Gadukino':minut += 20 & MiraLoc ! 1 & gt 'gadukino'
 			act 'Go to the beach':gt 'gadriver', 'gadbitch'
 		end
-	elseif temp_gr = 5 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5 and sub > 0:
+	elseif temp_gr = 5 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5:
 		if mitkaguysriver ! daystart:
 			mitkaguysriver = daystart
 			'While walking towards the river you meet the village boys, whom you''ve been drinking with recently. They ask you to go with them.'
@@ -105,7 +105,7 @@ if $ARGS[0] = 'start':
 			act 'Go to Gadukino':minut += 20 & MiraLoc ! 1 & gt 'gadukino'
 			act 'Go to the beach':gt 'gadriver', 'gadbitch'
 		end
-	elseif temp_gr = 6 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5 and sub > 0:
+	elseif temp_gr = 6 and MiraLoc ! 1 and npc_QW['A63'] >= 13 and hour >= 5:
 		if mitkaguysriver ! daystart:
 			mitkaguysriver = daystart
 			'On your way to the river you meet Vasyan, he insists you follow him home...'
@@ -284,7 +284,7 @@ if $ARGS[0] = 'gadbitch':
 						gs 'stat'
 
 						act 'Finish':gt'gadriver', 'gadbitch'
-					elseif MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 1 and hour >= 8 and hour < 20 and sub > 0:
+					elseif MiraLoc ! 1 and npc_QW['A63'] >= 13 and temp_gr = 1 and hour >= 8 and hour < 20:
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex19.jpg"></center>'
 						'As soon as you get out of the river, you meet a grinning Kolyamba. He smiles wickedly and commands you to get down on your hands and knees so he can fuck you in the ass...'
@@ -998,9 +998,7 @@ if $ARGS[0] = 'GuysRiver':
 			end
 		end
 	end
-	if pcs_dom > 0:
-		act 'Leave':gt'gadriver', 'gadbitch'
-	end
+	act 'Leave':gt'gadriver', 'gadbitch'
 end
 
 if $ARGS[0] = 'fishers':

+ 12 - 1
locations/gadroad.qsrc

@@ -151,7 +151,18 @@ if $ARGS[0] = 'drinking_invite':
 	end
 	! if Sveta came here to kick off Miras quest then she cannot leave otherwise Sveta is free to decline the offer
 	if npc_QW['A60'] > 0 or (MiraLoc ! 5 and npc_QW['A60'] = 0):
-		act 'No thanks, not tonight': gt 'gadroad'
+		gs 'willpower', 'drink', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'No thanks, not tonight. (<<will_cost>> Willpower)':
+				gs 'willpower', 'drink', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				
+				gt 'gadroad'
+			end
+		else
+			act 'No thanks, not tonight. (<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
 

+ 183 - 137
locations/gadukino.qsrc

@@ -206,7 +206,6 @@ if $ARGS[0] = 'succubus_hunt':
 				stat['vaginal'] += 1
 				guy += 1
 				pcs_horny = 0
-				pcs_dom += scfeed
 				orgasm += 1 + scfeed
 				pcs_willpwr += 15 * (1 + scfeed)
 				succubxp += 6
@@ -325,106 +324,110 @@ if $ARGS[0] = 'mira_events':
 		if npc_QW['A60'] = 15 and temper >= 10 and sunWeather = 1 and miraprost = 0:
 			'<center><img <<$set_imgh>> src="images/characters/village/mira/miraqw7.jpg"></center>'
 			'Walking through the village, you notice Mira, digging in her vegetable garden. She stands with her ass high in the air, and to your amazement, she isn''t wearing panties. You get a good look at her pussy lips...'
-
-			act 'You approach slowly':
-				*clr & cla
-				minut += 15
-				gs 'stat'
-
-				'<center><img <<$set_imgh>> src="images/characters/village/mira/mira0,<<rand(0,5)>>.jpg"></center>'
-				'You quietly sneak up to her, but she notices your approach and turns around, her hands pull her skirt back into place, blushing. You stare at her for a few seconds silently, and then ask, "Why don''t you have any panties on?" Mira, her eyes darting about, shifting her weight from foot to foot, explaining hesitantly, "Well what happened is, well it''s very hot and I thought it would feel better without panties." You interrupt her with an upraised hand as you get an idea for your second wish... You remind her she still owes you two wishes and you''re ready to collect your second wish. You tell Mira to sit down and she reluctantly agrees. When she is finally sitting, you order her to show you her pussy. Mira grumbles and glares at you, but eventually sighs and slowly lifts up her skirt, giving you a good look at her crotch.'
-				
-				act 'Watch':
+			
+			gs 'willpower', 'prostitution', 'force'
+			if will_cost <= pcs_willpwr:
+				act 'Approach Mira (<<will_cost>> Willpower)':
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2.jpg"></center>'
-					'You enjoy the view, then snap your fingers as an amazing idea comes to mind for your second wish. Mira says she thought her second wish was over, but you wouldn''t make it that easy. You ask if she is thinking about backing out of granting your wishes, but Mira says no, she will go through with them. You smile and tell her to follow you.'
+					minut += 15
+					gs 'willpower', 'prostitution', 'force'
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="images/characters/village/mira/mira0,<<rand(0,5)>>.jpg"></center>'
+					'You quietly sneak up to her, but she notices your approach and turns around, her hands pull her skirt back into place, blushing. You stare at her for a few seconds silently, and then ask, "Why don''t you have any panties on?" Mira, her eyes darting about, shifting her weight from foot to foot, explaining hesitantly, "Well what happened is, well it''s very hot and I thought it would feel better without panties." You interrupt her with an upraised hand as you get an idea for your second wish... You remind her she still owes you two wishes and you''re ready to collect your second wish. You tell Mira to sit down and she reluctantly agrees. When she is finally sitting, you order her to show you her pussy. Mira grumbles and glares at you, but eventually sighs and slowly lifts up her skirt, giving you a good look at her crotch.'
 					
-					act 'Lead her to the road':
+					act 'Watch':
 						*clr & cla
-						minut += 45
-						pcs_dom += 2
-						gs 'arousal', 'voyeur', 2, 'exhibitionism', 'lesbian', 'dom'
-						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2.jpg"></center>'
+						'You enjoy the view, then snap your fingers as an amazing idea comes to mind for your second wish. Mira says she thought her second wish was over, but you wouldn''t make it that easy. You ask if she is thinking about backing out of granting your wishes, but Mira says no, she will go through with them. You smile and tell her to follow you.'
 						
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2_1.jpg"></center>'
-						'You lead her out to the main road. You tell Mira, that she is to pose as a prostitute and attempt to get a customer or two. This is your second wish. You want Mira to become a prostitute and fulfill the desires of anyone who asks for her services. Mira looks shocked but nods that she will do it, Mira looks around the area and seeing no one else watching begins to pose by the roadside for passing cars...'
-						
-
-						act 'Wait for a car...':
+						act 'Lead her to the road':
 							*clr & cla
-							minut += 30
-							pcs_horny += 20
-							miraprost += 1
-							npc_QW['A60'] = 16
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
-							'It isn''t long before Mira''s first customer pulls up in a nice vehicle. She takes a deep breath, looks you in the eyes, winks and approaches the vehicle and starts talking to the driver.'
-							'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle. It pulls away, but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
+							minut += 45
+							gs 'arousal', 'voyeur', 2, 'exhibitionism', 'lesbian', 'dom'
 							gs 'stat'
-
-							act 'Watch her with the customer':
-								if rand(0,1) = 0:
-									*clr & cla
-									'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1.mp4"></video></center>'
-									'You walk up and look into the car. You see Mira giving one hell of a blowjob to her first customer. Her head is bobbing up and down on his 17cm cock.'
-									gs 'arousal', 'voyeur', 5, 'exhibitionism'
-									gs 'stat'
-
-									act 'Hide':
+							
+							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2_1.jpg"></center>'
+							'You lead her out to the main road. You tell Mira, that she is to pose as a prostitute and attempt to get a customer or two. This is your second wish. You want Mira to become a prostitute and fulfill the desires of anyone who asks for her services. Mira looks shocked but nods that she will do it, Mira looks around the area and seeing no one else watching begins to pose by the roadside for passing cars...'
+							
+
+							act 'Wait for a car...':
+								*clr & cla
+								minut += 30
+								pcs_horny += 20
+								miraprost += 1
+								npc_QW['A60'] = 16
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
+								'It isn''t long before Mira''s first customer pulls up in a nice vehicle. She takes a deep breath, looks you in the eyes, winks and approaches the vehicle and starts talking to the driver.'
+								'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle. It pulls away, but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
+								gs 'stat'
+
+								act 'Watch her with the customer':
+									if rand(0,1) = 0:
 										*clr & cla
-										'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_1.mp4"></video></center>'
-										'You duck for cover as the guy suddenly gets out of the car and opens the passenger door, grabs Mira''s head and starts forcing his cock deep into her throat.'
-										gs 'arousal', 'voyeur', 10, 'exhibitionism'
+										'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1.mp4"></video></center>'
+										'You walk up and look into the car. You see Mira giving one hell of a blowjob to her first customer. Her head is bobbing up and down on his 17cm cock.'
+										gs 'arousal', 'voyeur', 5, 'exhibitionism'
 										gs 'stat'
 
-										act 'Keep watching':
+										act 'Hide':
 											*clr & cla
-											'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
-											'Eventually, the guy grunts and cums all over Mira''s face and into her mouth. The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
-											'Mira walks back towards town counting the money he gave her as she absentmindedly licks the cum as it drips down her face. She smiles at you and shows you the money as you join her.'
+											'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_1.mp4"></video></center>'
+											'You duck for cover as the guy suddenly gets out of the car and opens the passenger door, grabs Mira''s head and starts forcing his cock deep into her throat.'
 											gs 'arousal', 'voyeur', 10, 'exhibitionism'
 											gs 'stat'
 
-											act 'Walk back to the village together':
+											act 'Keep watching':
 												*clr & cla
-												minut += 10
-												miraloc = 0
-												gs 'arousal', 'end'
+												'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
+												'Eventually, the guy grunts and cums all over Mira''s face and into her mouth. The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
+												'Mira walks back towards town counting the money he gave her as she absentmindedly licks the cum as it drips down her face. She smiles at you and shows you the money as you join her.'
+												gs 'arousal', 'voyeur', 10, 'exhibitionism'
 												gs 'stat'
 
-												gt 'gadukino'
+												act 'Walk back to the village together':
+													*clr & cla
+													minut += 10
+													miraloc = 0
+													gs 'arousal', 'end'
+													gs 'stat'
+
+													gt 'gadukino'
+												end
 											end
 										end
-									end
-								else
-									*clr & cla
-									'<center><video autoplay loop src="images/characters/village/mira/miraprost2.mp4"></video></center>'
-									'You walk up and look into the van. You see Mira showing her first customer her tits and rubbing her pussy. You see a hungry gleam in the guy''s eyes, which Mira returns right back.'
-									gs 'arousal', 'voyeur', 20, 'exhibitionism'
-									gs 'stat'
-
-									act 'Keep watching':
+									else
 										*clr & cla
-										'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_1.mp4"></video></center>'
-										'Mira and the guy jump into the back of the van and you watch as he starts fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial ecstasy, partial pain, you know the guy is hitting or entering her cervix.'
-										gs 'arousal', 'voyeur', 10, 'exhibitionism'
+										'<center><video autoplay loop src="images/characters/village/mira/miraprost2.mp4"></video></center>'
+										'You walk up and look into the van. You see Mira showing her first customer her tits and rubbing her pussy. You see a hungry gleam in the guy''s eyes, which Mira returns right back.'
+										gs 'arousal', 'voyeur', 20, 'exhibitionism'
 										gs 'stat'
 
-										act 'Hide':
+										act 'Keep watching':
 											*clr & cla
-											'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
-											'You have to duck behind some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
-											'After the wild sex, Mira and the guy sit in the van and talk for a bit. He gives her a nice wad of cash and she starts walking to the village. Seeing you, she smiles and says thanks.'
+											'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_1.mp4"></video></center>'
+											'Mira and the guy jump into the back of the van and you watch as he starts fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial ecstasy, partial pain, you know the guy is hitting or entering her cervix.'
 											gs 'arousal', 'voyeur', 10, 'exhibitionism'
 											gs 'stat'
 
-											act 'Walk back to the village together':
+											act 'Hide':
 												*clr & cla
-												minut += 10
-												miraloc = 0 
-												gs 'arousal', 'end'
+												'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
+												'You have to duck behind some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
+												'After the wild sex, Mira and the guy sit in the van and talk for a bit. He gives her a nice wad of cash and she starts walking to the village. Seeing you, she smiles and says thanks.'
+												gs 'arousal', 'voyeur', 10, 'exhibitionism'
 												gs 'stat'
-												
-												gt 'gadukino'
+
+												act 'Walk back to the village together':
+													*clr & cla
+													minut += 10
+													miraloc = 0 
+													gs 'arousal', 'end'
+													gs 'stat'
+													
+													gt 'gadukino'
+												end
 											end
 										end
 									end
@@ -433,57 +436,82 @@ if $ARGS[0] = 'mira_events':
 						end
 					end
 				end
+			else
+				act 'Approach Mira (<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 away': gt 'gadukino'
 		! mira slut events
 		elseif npc_QW['A60'] >= 11 and temper >= 10 and sunWeather = 1 and miraday ! daystart:
 			miraday = daystart
+
 			if pcs_horny > 50 and rand(0,1) = 0:
 				gs 'Miroslava', 'miraclothes'
+				*nl
 				'You meet Mira, who is heading to the river to get some water, seeing you she decides to stop and chat with you for a few minutes.'
-				act 'You''re feeling naughty':
-					*clr & cla
-					if mirasextimes < 50:
-						temp = rand(0,3)
-						if temp = 0:
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp.jpg"></center>'
-							'You ask Mira to show you her pussy. She smiles casually and rests her hands on the bench, giving you a view of her bare pussy. She isn''t even wearing any panties!'
-						elseif temp = 1:
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp1.jpg"></center>'
-							'You ask Mira to show you her pussy. She smiles casually sits down on the fence and slightly spreads her legs, showing you her bare pussy. She isn''t even wearing any panties!'
-						elseif temp = 2:
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp2.jpg"></center>'
-							'You ask Mira to show you her pussy. She smiles casually, sits down on the fence and, looking at you with a gleam in her eyes and a mischievous smile, she pulls aside panties showing off her wet pussy...'	
-						elseif temp = 3:
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp5.jpg"></center>'
-							'You ask Mira to show you her pussy. She smiles casually and gets on her hands and knees on the bench. She quickly glances around before pulling up her skirt and arching her back, showing you her naked pussy. She isn''t even wearing any panties!'
-						end
-						npc_rel['A60'] += 1
-						gs 'arousal', 'voyeur', 5, 'lesbian'
-						gs 'arousal', 'end'
-						gs 'stat'
+				
+				gs 'willpower', 'exhib', 'force'
+				if will_cost <= pcs_willpwr:
+					act 'You''re feeling naughty (<<will_cost>> Willpower)':
+						*clr & cla						
+						if mirasextimes < 50:
+							temp = rand(0,3)
+							if temp = 0:
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp.jpg"></center>'
+								*nl
+								'You ask Mira to show you her pussy. She smiles casually and rests her hands on the bench, giving you a view of her bare pussy. She isn''t even wearing any panties!'
+							elseif temp = 1:
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp1.jpg"></center>'
+								*nl
+								'You ask Mira to show you her pussy. She smiles casually sits down on the fence and slightly spreads her legs, showing you her bare pussy. She isn''t even wearing any panties!'
+							elseif temp = 2:
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp2.jpg"></center>'
+								*nl
+								'You ask Mira to show you her pussy. She smiles casually, sits down on the fence and, looking at you with a gleam in her eyes and a mischievous smile, she pulls aside panties showing off her wet pussy...'	
+							elseif temp = 3:
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp5.jpg"></center>'
+								*nl
+								'You ask Mira to show you her pussy. She smiles casually and gets on her hands and knees on the bench. She quickly glances around before pulling up her skirt and arching her back, showing you her naked pussy. She isn''t even wearing any panties!'
+							end
+							npc_rel['A60'] += 1
+							gs 'willpower', 'exhib', 'force'
+							gs 'willpower', 'pay', 'force'
+							gs 'arousal', 'voyeur', 5, 'lesbian'
+							gs 'arousal', 'end'
+							gs 'stat'
 
-						act 'Finish your walk':	gt 'gadukino'
-					else
-						temp = rand(0,1)
-						if temp = 0:
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp3.jpg"></center>'
-							'You ask Mira to show you her pussy. She smiles casually and sits down on a nearby fence. Mira glances around and spreads her legs... You are surprised to see, she isn''t wearing panties and her gaping pussy is oozing cum. She must have just been fucked.'
-							'"Who did that to you?" you ask her. Mira just smiles devilishly and tells you that it''s a secret.'
-						elseif temp = 1:
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp4.jpg"></center>'
-							'You ask Mira to show you her pussy. She smiles casually and squats down... You immediately notice how much her cunt and asshole gape. She must have just been fucked in both holes.'
-							'"Who did that to you?" you ask her. Mira just smiles devilishly and tells you that it''s a secret.'
-						end
-						npc_rel['A60'] += 1
-						gs 'arousal', 'voyeur', 10, 'lesbian'
-						gs 'arousal', 'end'
-						gs 'stat'
+							act 'Finish your walk':	gt 'gadukino'
+						else
+							temp = rand(0,1)
+							if temp = 0:
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp3.jpg"></center>'
+								*nl
+								'You ask Mira to show you her pussy. She smiles casually and sits down on a nearby fence. Mira glances around and spreads her legs... You are surprised to see, she isn''t wearing panties and her gaping pussy is oozing cum. She must have just been fucked.'
+								'"Who did that to you?" you ask her. Mira just smiles devilishly and tells you that it''s a secret.'
+							elseif temp = 1:
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasp4.jpg"></center>'
+								*nl
+								'You ask Mira to show you her pussy. She smiles casually and squats down... You immediately notice how much her cunt and asshole gape. She must have just been fucked in both holes.'
+								'"Who did that to you?" you ask her. Mira just smiles devilishly and tells you that it''s a secret.'
+							end
+							npc_rel['A60'] += 1
+							gs 'willpower', 'exhib', 'force'
+							gs 'willpower', 'pay', 'force'
+							gs 'arousal', 'voyeur', 10, 'lesbian'
+							gs 'arousal', 'end'
+							gs 'stat'
 
-						act 'Finish your walk':	gt 'gadukino'
+							act 'Finish your walk':	gt 'gadukino'
+						end
 					end
+				else
+					act 'You''re feeling naughty (<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 away': gt 'gadukino'
 			else
 				*clr & cla
+				
 				temp = rand(0,7)
 				if temp = 0:
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad5.jpg"></center>'
@@ -510,7 +538,7 @@ if $ARGS[0] = 'mira_events':
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasexgad11.jpg"></center>'
 					'Walking through the village, you meet Mira. You notice she is not wearing panties and the white thread of a tampon is sticking out of her pussy...'
 				end		
-				gs 'arousal', 'voyeur', 5, 'exhibitionism'
+				gs 'arousal', 'voyeur', 10, 'exhibitionism'
 				gs 'arousal', 'end'
 				gs 'stat'
 
@@ -527,20 +555,29 @@ if $ARGS[0] = 'mira_events':
 				gs 'arousal', 'voyeur', 10, 'exhibitionism'
 				gs 'stat'
 				
-				act 'Watch':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad3.jpg"></center>'
-					if rand(0,1) = 0:
-						'They are so absorbed in fucking each other senseless that they ignoring everything else, so you decide to quietly continue to watch. Within a few minutes you see Mitka begin to pick up the pace and he started to drive his cock faster and faster into Mira''s pussy until he grunts like a pig and dumps a huge load of cum into Mira''s pussy which is again squirting. After a few minutes of them just laying together holding each other and gasping for breath, they slowly begin to kiss and laugh as they freshen up. You smile and rub your own dripping snatch before moving away.'
-					else	
-						'They are so absorbed in fucking each other senseless that they ignoring everything else, so you decide to quietly continue to watch. You see Mitka pull his cock out of Mira''s dripping pussy and he drives it deep into her ass, barebacked. Mira let''s out a short scream of protest as Mitka continues to drive his cock into her asshole until his pubes rub up against her ass. Mira writhes under his brutal onslaught. After only a few minutes, Mitka starts to slap her ass leaving bright red marks. Mitka begins to shudder from his thrusts into her ass. Finally, Mitka leans back with his dick still embedded balls deep in Mira''s asshole and lets out a bestial growl as he begins to cum...'
+				gs 'willpower', 'voyeur', 'self'
+				if will_cost <= pcs_willpwr:
+					act 'Continue watching (<<will_cost>> Willpower)':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad3.jpg"></center>'
+						if rand(0,1) = 0:
+							'They are so absorbed in fucking each other senseless that they ignoring everything else, so you decide to quietly continue to watch. Within a few minutes you see Mitka begin to pick up the pace and he started to drive his cock faster and faster into Mira''s pussy until he grunts like a pig and dumps a huge load of cum into Mira''s pussy which is again squirting. After a few minutes of them just laying together holding each other and gasping for breath, they slowly begin to kiss and laugh as they freshen up. You smile and rub your own dripping snatch before moving away.'
+						else	
+							'They are so absorbed in fucking each other senseless that they ignoring everything else, so you decide to quietly continue to watch. You see Mitka pull his cock out of Mira''s dripping pussy and he drives it deep into her ass, barebacked. Mira let''s out a short scream of protest as Mitka continues to drive his cock into her asshole until his pubes rub up against her ass. Mira writhes under his brutal onslaught. After only a few minutes, Mitka starts to slap her ass leaving bright red marks. Mitka begins to shudder from his thrusts into her ass. Finally, Mitka leans back with his dick still embedded balls deep in Mira''s asshole and lets out a bestial growl as he begins to cum...'
+						end
+						gs 'willpower', 'voyeur', 'self'
+						gs 'willpower', 'pay', 'self'
+						gs 'arousal', 'voyeur', 10, 'exhibitionism'
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Finish your walk': gt 'gadukino'
 					end
-					gs 'arousal', 'voyeur', 10, 'exhibitionism'
-					gs 'arousal', 'end'
-					gs 'stat'
-					
-					act 'Finish your walk': gt 'gadukino'
+				else
+					act 'Continue watching (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
+				
+				act 'Walk away': gt 'gadukino'
 			! mira first wish not done
 			elseif npc_QW['A60'] >= 4:
 				*clr & cla
@@ -549,20 +586,29 @@ if $ARGS[0] = 'mira_events':
 				gs 'arousal', 'voyeur', 10, 'exhibitionism'
 				gs 'stat'
 				
-				act 'Watch':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad1.jpg"></center>'
-					if rand(0,1) = 0:
-						'A couple of times you think, she''s about to notice you watching, but she never does, continuing to suck Mitka''s cock. Finally, he tilts his head back and Mira, quickly seeing this takes his dick in her hand and directs it into in her mouth, taking a mouth full of sperm. She greedily swallows it all, and licks Mitka''s cock clean before tucking it back into his pants. You see she is about to rise from her knees, so you hastily depart.'
-					else
-						'Until she finally spots you watching her. You see she blushes crimson, but she does not stop sucking, only occasionally shifts her eyes in your direction. You continue to watch as if not seeing anything unusual, as Mira''s head bobs up and down continuing to suck Mitka''s cock. Finally, he tilts his head back and Mira, quickly seeing this takes his dick in her hand and directs it into in her mouth, taking a mouth full of sperm. She greedily swallows it all, and licks Mitka''s cock clean before tucking it back into his pants. You smile at Mira with the most peaceful of expressions and walk away...'
+				gs 'willpower', 'voyeur', 'self'
+				if will_cost <= pcs_willpwr:
+					act 'Continue watching (<<will_cost>> Willpower)':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad1.jpg"></center>'
+						if rand(0,1) = 0:
+							'A couple of times you think, she''s about to notice you watching, but she never does, continuing to suck Mitka''s cock. Finally, he tilts his head back and Mira, quickly seeing this takes his dick in her hand and directs it into in her mouth, taking a mouth full of sperm. She greedily swallows it all, and licks Mitka''s cock clean before tucking it back into his pants. You see she is about to rise from her knees, so you hastily depart.'
+						else
+							'Until she finally spots you watching her. You see she blushes crimson, but she does not stop sucking, only occasionally shifts her eyes in your direction. You continue to watch as if not seeing anything unusual, as Mira''s head bobs up and down continuing to suck Mitka''s cock. Finally, he tilts his head back and Mira, quickly seeing this takes his dick in her hand and directs it into in her mouth, taking a mouth full of sperm. She greedily swallows it all, and licks Mitka''s cock clean before tucking it back into his pants. You smile at Mira with the most peaceful of expressions and walk away...'
+						end
+						gs 'willpower', 'voyeur', 'self'
+						gs 'willpower', 'pay', 'self'
+						gs 'arousal', 'voyeur', 5, 'exhibitionism'
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Finish your walk': gt 'gadukino'
 					end
-					gs 'arousal', 'voyeur', 5, 'exhibitionism'
-					gs 'arousal', 'end'
-					gs 'stat'
-					
-					act 'Finish your walk': gt 'gadukino'
+				else
+					act 'Continue watching (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
+				
+				act 'Walk away': gt 'gadukino'
 			end
 		! quest not far along enough yet so just talking to mira or already watched mira have sex today
 		else

+ 194 - 18
locations/gadukino_event.qsrc

@@ -127,7 +127,6 @@ if $ARGS[0] = 'gang_apologise':
 			act 'Take the money':
 				*clr & cla
 				minut += 5
-				pcs_dom -= 5
 				gadriver_gang = 2
 				money += 10000
 				gs 'stat'
@@ -141,21 +140,27 @@ if $ARGS[0] = 'gang_apologise':
 				'"I understand..." you answer, turning away and walking away from him.'
 				act 'Walk back to the village':gt 'gadukino'
 			end
-			act 'Refuse':
-				*clr & cla
-				minut += 5
-				pcs_dom += 5
-				gadriver_gang = 3
-				gs 'stat'
+			gs 'willpower', 'prostitution', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Refuse (<<will_cost>> Willpower)':
+					*clr & cla
+					minut += 5
+					gadriver_gang = 3
+					gs 'willpower', 'prostitution', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
 
-				'<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
-				'"I don''t need your fucking money, I''m not a prostitute or a whore" you said in a firm voice, clearly annoyed, looking straight into Uncle Stepan eyes. "You think you can buy my silence with some money, are you really that dumb?"'
-				'He starts acting anxiously telling you once more to take the money. "I''ve already said it, I don''t want your money! But you don''t need to worry I won''t tell anyone what happened." you sternly tell him.'
-				'"That''s a relief..." Stepan says. "I''ll be on my way."'
-				'Just as you were leaving, Uncle Stepan added:'
-				'"One last thing <<$pcs_nickname>>. None of the men will try to fuck you anymore. Mitka warned everyone that if it happens again their cannon would be shooting blanks for the rest of their life... If anyone approaches you, you come to me and I''ll sort it out."'
-				'"I understand..." you answer, turning away and walking away from him.'
-				act 'Walk back to the village':gt 'gadukino'
+					'<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
+					'"I don''t need your fucking money, I''m not a prostitute or a whore" you said in a firm voice, clearly annoyed, looking straight into Uncle Stepan eyes. "You think you can buy my silence with some money, are you really that dumb?"'
+					'He starts acting anxiously telling you once more to take the money. "I''ve already said it, I don''t want your money! But you don''t need to worry I won''t tell anyone what happened." you sternly tell him.'
+					'"That''s a relief..." Stepan says. "I''ll be on my way."'
+					'Just as you were leaving, Uncle Stepan added:'
+					'"One last thing <<$pcs_nickname>>. None of the men will try to fuck you anymore. Mitka warned everyone that if it happens again their cannon would be shooting blanks for the rest of their life... If anyone approaches you, you come to me and I''ll sort it out."'
+					'"I understand..." you answer, turning away and walking away from him.'
+					act 'Walk back to the village':gt 'gadukino'
+				end
+			else
+				act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 	end
@@ -177,7 +182,6 @@ if $ARGS[0] = 'gadriver_gang':
 	gadriver_gang = 1
 	gadboyday = daystart
 	npc_QW['A63'] = 21
-	pcs_dom -= 10
 	if pcs_health <= 100:pcs_health += 100
 	gs 'stat'
 
@@ -676,6 +680,23 @@ if $ARGS[0] = 'gadukino_mitka':
 	'"Hey, <<$pcs_nickname>>, let''s go have some fun getting rid of this boner you just gave me."'
 
 	act 'Go with him': gt 'mitkasex', 'gad1', 'A63'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A63'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You tell him to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'gadukino_kolyamba':
@@ -689,6 +710,23 @@ if $ARGS[0] = 'gadukino_kolyamba':
 	'Walking through the village you met Kolyamba. Seeing you, he reached into his pants and started playing with his balls. He then grabbed you by the arm and dragged into the bushes next to the road.'
 
 	act 'Go with him': gt 'mitkasex', 'gad1', 'A61'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A61'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You tell him to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'gadukino_vasyan':
@@ -702,6 +740,23 @@ if $ARGS[0] = 'gadukino_vasyan':
 	'Walking through the village you met Vasyan. Seeing you, he smiled and waved you over to him. He kisses you on the lips and asks you to join him as he walked into the bushes next to the road.'
 
 	act 'Go with him': gt 'mitkasex', 'gad1', 'A62'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A62'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You tell him to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'gadukino_2boys':
@@ -728,6 +783,32 @@ if $ARGS[0] = 'gadukino_2boys':
 		'Walking through the village you met Kolyamba and Vasyan. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
 	end
 	act 'Go with them': gt 'mitkasex', 'gad2'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			if $ARGS[1] = 1:
+				npc_rel['A63'] -= 3
+				npc_rel['A61'] -= 3
+			elseif $ARGS[1] = 1:
+				npc_rel['A63'] -= 3
+				npc_rel['A62'] -= 3
+			elseif $ARGS[1] = 1:
+				npc_rel['A61'] -= 3
+				npc_rel['A62'] -= 3
+			end
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You tell them to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'mira_mitka':
@@ -742,6 +823,23 @@ if $ARGS[0] = 'mira_mitka':
 	'"Oh hey girls, let''s go have some fun getting rid of this boner you both just gave me."'
 
 	act 'Go with him': gt 'mitkasex', 'forest1', 'A63'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A63'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You take Mira by the hand and tell him to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'mira_kolyamba':
@@ -752,9 +850,26 @@ if $ARGS[0] = 'mira_kolyamba':
 
 	'<center><b><font color = maroon>Kolyamba Pyut</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
-	'Walking with Mira in the village you met Kolyamba. Seeing you and Mira, he starts playing with his balls, and drags you both into the bushes next to the road.'
+	'Walking with Mira in the village you met Kolyamba. Seeing you and Mira, he starts playing with his balls, and tries to grab you both by the hand.'
 
 	act 'Go with him': gt 'mitkasex', 'forest1', 'A61'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A61'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You take Mira by the hand and tell him to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'mira_vasyan':
@@ -765,9 +880,25 @@ if $ARGS[0] = 'mira_vasyan':
 
 	'<center><b><font color = maroon>Vasyan Paket</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
-	'Walking with Mira in the village you met Vasyan. Seeing you and Mira, he smiles and drags you both into the bushes next to the road.'
+	'Walking with Mira in the village you met Vasyan. Seeing you and Mira, he smiles and tries to grab you both by the hand.'
 
 	act 'Go with them': gt 'mitkasex', 'forest1', 'A62'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A62'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You take Mira by the hand and tell him to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'mira_2boys':
@@ -794,6 +925,32 @@ if $ARGS[0] = 'mira_2boys':
 		'Walking with Mira in the village you met Kolyamba and Vasyan. Seeing you and Mira, they smile at each other, and drag you both into the bushes.'
 	end
 	act 'Go with them': gt 'mitkasex', 'forest2', $ARGS[1]
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			if $ARGS[1] = 1:
+				npc_rel['A63'] -= 3
+				npc_rel['A61'] -= 3
+			elseif $ARGS[1] = 1:
+				npc_rel['A63'] -= 3
+				npc_rel['A62'] -= 3
+			elseif $ARGS[1] = 1:
+				npc_rel['A61'] -= 3
+				npc_rel['A62'] -= 3
+			end
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You take Mira by the hand and tell them to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'mira_3boys':
@@ -813,6 +970,25 @@ if $ARGS[0] = 'mira_3boys':
 	'Walking with Mira in the village you met Mitka, Kolyamba and Vasyan. Seeing you and Mira, they smile at each other, and drag you both into the bushes.'
 
 	act 'Go with them': gt 'mitkasex', 'forest3'
+	gs 'willpower', 'sex', 'resist', 'hard'
+	if will_cost <= pcs_willpwr:
+		act 'Refuse (<<will_cost>> Willpower)':
+			cla
+			npc_rel['A63'] -= 3
+			npc_rel['A62'] -= 3
+			npc_rel['A61'] -= 3
+			gs 'willpower', 'sex', 'resist', 'hard'
+			gs 'willpower', 'pay', 'resist'
+			gs 'stat'
+			
+			*nl
+			'You take Mira by the hand and tell them to go away, while quickly walking away in the other direction.'
+			
+			act 'Walk away': gt 'gadukino'
+		end
+	else
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
 end
 
 if $ARGS[0] = 'go_home':

+ 392 - 317
locations/garfather.qsrc

@@ -19,12 +19,12 @@ dynamic $fatherRep
 
 act 'Leave': gt 'gargazel'
 
-if hour >= 21:exit
+if hour >= 21: exit
 
 act 'Chat':
 	cls
 	menu_off = 1
-	minut+=rand(10,15)
+	minut += rand(10,15)
 	gs 'stat'
 	'<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
@@ -32,51 +32,61 @@ act 'Chat':
 
 	dynamic $fatherRep
 
-	if npc_rel['A28']<20:
+	if npc_rel['A28'] < 20:
 		!He hates you
 		'You try to have a conversation with your stepfather, but he dislikes you too much to even pretend to be interested in what you have to say.'
-		if sorryday!daystart:
-			act 'Apologize':
-				cla
-				sorryday=daystart
-				npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
-				gs 'stat'
-				'You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.'
-				act 'Move away':gt $loc, $metka
+		if sorryday ! daystart:
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Apologize (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'self'
+					sorryday = daystart
+					npc_rel['A28'] += (pcs_intel/10) + (pcs_apprnc/20)
+					gs 'stat'
+					'You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.'
+					act 'Move away':gt $loc, $metka
+				end
+			else
+				act 'Apologize (<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 'Move away':gt $loc, $metka
 		end
-	elseif npc_rel['A28']>=20 and npc_rel['A28']<40:
+		act 'Move away':gt $loc, $metka
+	elseif npc_rel['A28'] >= 20 and npc_rel['A28'] < 40:
 		!He doesn''t like you very much
 		'You try to have a conversation with your stepfather, but he''s not really interested and barely has anything to contribute while you do all the talking.'
-		if sorryday!daystart:
-			act 'Try to get on his good side':
-				cla
-				sorryday=daystart
-				npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
-				gs 'stat'
-				'You spend some time trying to get on your stepfather''s good side, and you feel like he likes you a bit more after you show interest in the things he enjoys.'
-				act 'Move away':gt $loc, $metka
+		if sorryday ! daystart:
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Try to get on his good side (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'self'
+					sorryday = daystart
+					npc_rel['A28'] += (pcs_intel/10) + (pcs_apprnc/20)
+					gs 'stat'
+					'You spend some time trying to get on your stepfather''s good side, and you feel like he likes you a bit more after you show interest in the things he enjoys.'
+					act 'Move away':gt $loc, $metka
+				end
+			else
+				act 'Try to get on his good side (<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 'Move away':gt $loc, $metka
 		end
-	elseif npc_rel['A28'] >=40:
+		act 'Move away':gt $loc, $metka
+	elseif npc_rel['A28'] >= 40:
 		if pcs_apprnc + (npc_rel['A28']/10) <= 60:
 			!good relations but he is not attracted to you
 			gs 'dinfather', 'garchat'
 		else
 			!good relations and he finds you attractive
-			talkrand=rand(1,100)
-			if talkrand >=20:
+			talkrand = rand(1,100)
+			if talkrand >= 20:
 				gs 'dinfather', 'garchat'
 			elseif talkrand < 20:
 				'You relax and share funny stories with your stepfather.'
-				if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = RAND (1,8)
-				if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = RAND (1,4)
-				if npc_rel['A28']>=80:FatherMolest = RAND (1,2)
-				if FatherMolest=1:
+				if npc_rel['A28'] >= 40 and npc_rel['A28'] < 60: FatherMolest = rand(1,8)
+				if npc_rel['A28'] >= 60 and npc_rel['A28'] < 80: FatherMolest = rand(1,4)
+				if npc_rel['A28'] >= 80: FatherMolest = rand(1,2)
+				if FatherMolest = 1:
 					gs 'dinfather', 'gar_act1'
 					gs 'dinfather', 'gar_act2'
 					gs 'dinfather', 'gar_act3'
@@ -104,123 +114,154 @@ act 'Help':
 	if npc_rel['A28'] < 20:
 		!scandal stepfather
 		'You offer to help your stepfather out in the garage. He waves you away and grumpily says "Get out of the way <<$pcs_nickname>>, can''t you see I''m busy? Besides, why would I want to be around you?"'
-		if sorryday!daystart:
-			act 'Apologize':
-				cla
-				sorryday=daystart
-				npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
-				gs 'stat'
-				'You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.'
-				act 'Move away':gt $loc, $metka
+		if sorryday ! daystart:
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Apologize (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'self'
+					sorryday = daystart
+					npc_rel['A28'] += (pcs_intel/10) + (pcs_apprnc/20)
+					gs 'stat'
+					'You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.'
+					act 'Move away':gt $loc, $metka
+				end
+			else
+				act 'Apologize (<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 'Move away':gt $loc, $metka
 		end
+		act 'Move away':gt $loc, $metka
 	elseif npc_rel['A28'] >= 20 and npc_rel['A28'] < 40:
 		!strained relations
 		'You ask your stepfather if there''s anything you can do to help him out in the garage, but he shrugs and shakes his head. "And what would you even do? Maybe you should go help your mother in the kitchen, that seems to suit your skill set better."'
-		if sorryday!daystart:
-			act 'Try to get on his good side':
-				cla
-				sorryday=daystart
-				npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
-				gs 'stat'
-				'You spend some time trying to get on your stepfather''s good side, and you feel like he likes you a bit more after you show interest in the things he enjoys.'
-				act 'Move away':gt $loc, $metka
+		if sorryday ! daystart:
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Try to get on his good side (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'self'
+					sorryday = daystart
+					npc_rel['A28'] += (pcs_intel/10) + (pcs_apprnc/20)
+					gs 'stat'
+					'You spend some time trying to get on your stepfather''s good side, and you feel like he likes you a bit more after you show interest in the things he enjoys.'
+					act 'Move away':gt $loc, $metka
+				end
+			else
+				act 'Try to get on his good side (<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 'Move away':gt $loc, $metka
 		end
+		act 'Move away':gt $loc, $metka
 	elseif npc_rel['A28'] >= 40:
 		if pcs_apprnc + (npc_rel['A28']/10) <= 60:
 			!gg good relations but he is not attracted to you
 			gs 'dinfather', 'garhelpchat'
 		else
 			!good relations and Messrs attractive
-			talkrand=rand(1,100)
-			if talkrand>=20:
+			talkrand = rand(1,100)
+			if talkrand >= 20:
 				gs 'dinfather', 'garhelpchat'
 			else
 				'You help your stepfather while he works on the Gazelle, handing him the bolts and tools he needs.'
-				if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = RAND (1,8)
-				if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = RAND (1,4)
-				if npc_rel['A28']>=80:FatherMolest = RAND (1,2)
-				if FatherMolest=1:
-					if pcs_horny >= 50 or TouchedByFather=1:
-						act '''Accidentally'' drop the wrench':
-							cla
-							gs 'arousal', 'flash', 5
-							gs 'arousal', 'end'
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
-
-							'Feeling horny, you decide to tease your stepfather while you help him in the garage. You let the wrench slip out of your hand, the loud clattering of metal on the stone floor ringing throughout the garage. "Oops! I can be so clumsy sometimes..." you say with a smile, bending over to pick up the wrench without bending your knees. In this pose, you give your stepfather a great view of your ass.'
-							if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-							if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
-							if fatherLust >=2:
+				if npc_rel['A28'] >= 40 and npc_rel['A28']<60: FatherMolest = rand(1,8)
+				if npc_rel['A28'] >= 60 and npc_rel['A28']<80: FatherMolest = rand(1,4)
+				if npc_rel['A28'] >= 80: FatherMolest = rand(1,2)
+				if FatherMolest = 1:
+					if pcs_horny >= 60 or TouchedByFather = 1:
+						gs 'willpower', 'exhib', 'self'
+						if will_cost <= pcs_willpwr:
+							act 'Spread your legs (<<will_cost>> Willpower)':
 								cls
-								pcs_horny -= RAND(1,5)
+								gs 'willpower', 'exhib', 'self'
+								gs 'willpower', 'pay', 'self'
+								gs 'arousal', 'flash', 5
+								gs 'arousal', 'end'
 								gs 'stat'
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim29.jpg"></center>' & 'Even though your body is definitely having an effect on him your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel uncomfortable.'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim27.jpg"></center>' & 'The sight of your ass makes your stepfather uncomfortable. "Clumsy you say? It seems like that wrench is not the only thing you let slip today", he snarks, referring to your lack of underwear. His snarky tone and disapproving look make you feel a bit awkward.'
-							else
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim29.jpg"></center>'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim27.jpg"></center>'
-								'Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.'
+								'While pretending not to notice, you slowly spread your legs as you talk.'
+
+								if pcs_apprnc + (npc_rel['A28']/10) < 60: fatherLust = 2
+								if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120: fatherLust = rand(1,4)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200: fatherLust = rand(1,2)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather = 1: fatherLust = 1
+								if fatherLust >= 2:
+									pcs_horny -= rand(1,5)
+									gs 'stat'
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. You look down and notice your skimpy underwear did a very poor job of hiding your pussy. Your stepfather is clearly embarrassed and surprised. He loudly clears his throat and says "<<$pcs_nickname>> don''t do that, that''s no way for a lady to behave. And go put some normal underwear on."'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim24.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. "What''s wrong?" you ask him innocently, knowing full well you''re not wearing underwear and that he has a great view of your bare pussy. You''re not fooling him though, and he doesn''t appreciate your teasing in the slightest. "<<$pcs_nickname>>, stop that at once and go put some pants on."'
+								end
+								if fatherLust = 1:
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response.'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim26.jpg"></center>' & 'Your stepfather gets a glimpse of your bare pussy and realizes what you''re up to. "<<$pcs_nickname>>... are you not wearing panties? Get down on the ground and spread your legs for me, Daddy has to know now." You do as he says, lie down on the ground and spread your legs wide. He kneels in front of you, pulls your clothes to the side and rubs your pussy and thighs with his rough calloused hands. "Just as I thought, you little minx!" he says with a grin on his face. After he had his fun he helps you get back up and even helps you straighten your clothes, his hands lingering on your hips and ass a few seconds longer than is needed.'
+								end
+								act 'Move away':gt $loc, $metka
 							end
-							act 'Move away':gt $loc, $metka
+						else
+							act 'Spread your legs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
-					if pcs_horny >= 30 or TouchedByFather=1:
-						act 'Fondle your breasts as you talk':
-							cls
-							gs 'arousal', 'flashlite', 5
-							gs 'arousal', 'breasts', 5, 'incest', 'exhibitionism'
-							gs 'arousal', 'end'
-							minut -= 5
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
-							'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
-
-							if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-							if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
-							if fatherLust>=2:
-								pcs_horny -= RAND(1,5)
+					if pcs_horny >= 50 or TouchedByFather = 1:
+						gs 'willpower', 'exhib', 'self', 'easy'
+						if will_cost <= pcs_willpwr:
+							act '''Accidentally'' drop the wrench (<<will_cost>> Willpower)':
+								cla
+								gs 'willpower', 'exhib', 'self', 'easy'
+								gs 'willpower', 'pay', 'self'
+								gs 'arousal', 'flash', 5
+								gs 'arousal', 'end'
 								gs 'stat'
-								'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.'
-							elseif fatherLust=1:
-								'Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
+
+								'Feeling horny, you decide to tease your stepfather while you help him in the garage. You let the wrench slip out of your hand, the loud clattering of metal on the stone floor ringing throughout the garage. "Oops! I can be so clumsy sometimes..." you say with a smile, bending over to pick up the wrench without bending your knees. In this pose, you give your stepfather a great view of your ass.'
+								if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
+								if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = rand(1,4)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = rand(1,2)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+								if fatherLust >=2:
+									cls
+									pcs_horny -= rand(1,5)
+									gs 'stat'
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim29.jpg"></center>' & 'Even though your body is definitely having an effect on him your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel uncomfortable.'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim27.jpg"></center>' & 'The sight of your ass makes your stepfather uncomfortable. "Clumsy you say? It seems like that wrench is not the only thing you let slip today", he snarks, referring to your lack of underwear. His snarky tone and disapproving look make you feel a bit awkward.'
+								else
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim29.jpg"></center>'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim27.jpg"></center>'
+									'Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.'
+								end
+								act 'Move away':gt $loc, $metka
 							end
-							act 'Move away':gt $loc, $metka
+						else
+							act '''Accidentally'' drop the wrench (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
-					if pcs_horny >= 60 or TouchedByFather=1:
-						act 'Spread your legs':
-							cls
-							gs 'arousal', 'flash', 5
-							gs 'arousal', 'end'
-							gs 'stat'
-							'You, while pretending to not notice, slowly spread your legs as you talk.'
-
-							if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-							if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
-							if fatherLust>=2:
-								pcs_horny -= RAND(1,5)
+					if pcs_horny >= 30 or TouchedByFather = 1:
+						gs 'willpower', 'exhib', 'self', 'easy'
+						if will_cost <= pcs_willpwr:
+							act 'Fondle your breasts as you talk (<<will_cost>> Willpower)':
+								cls
+								gs 'willpower', 'exhib', 'self', 'easy'
+								gs 'willpower', 'pay', 'self'
+								gs 'arousal', 'flashlite', 5
+								gs 'arousal', 'breasts', 5, 'incest', 'exhibitionism'
+								gs 'arousal', 'end'
+								minut -= 5
 								gs 'stat'
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. You look down and notice your skimpy underwear did a very poor job of hiding your pussy. Your stepfather is clearly embarrassed and surprised. He loudly clears his throat and says "<<$pcs_nickname>> don''t do that, that''s no way for a lady to behave. And go put some normal underwear on."'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim24.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. "What''s wrong?" you ask him innocently, knowing full well you''re not wearing underwear and that he has a great view of your bare pussy. You''re not fooling him though, and he doesn''t appreciate your teasing in the slightest. "<<$pcs_nickname>>, stop that at once and go put some pants on."'
-							end
-							if fatherLust=1:
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response.'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim26.jpg"></center>' & 'Your stepfather gets a glimpse of your bare pussy and realizes what you''re up to. "<<$pcs_nickname>>... are you not wearing panties? Get down on the ground and spread your legs for me, Daddy has to know now." You do as he says, lie down on the ground and spread your legs wide. He kneels in front of you, pulls your clothes to the side and rubs your pussy and thighs with his rough calloused hands. "Just as I thought, you little minx!" he says with a grin on his face. After he had his fun he helps you get back up and even helps you straighten your clothes, his hands lingering on your hips and ass a few seconds longer than is needed.'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
+								'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
+
+								if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
+								if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = rand(1,4)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = rand(1,2)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
+								if fatherLust>=2:
+									pcs_horny -= rand(1,5)
+									gs 'stat'
+									'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.'
+								elseif fatherLust=1:
+									'Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.'
+								end
+								act 'Move away':gt $loc, $metka
 							end
-							act 'Move away':gt $loc, $metka
+						else
+							act 'Fondle your breasts as you talk (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					else
 						gs 'dinfather', 'garhelpchat'
@@ -233,126 +274,124 @@ act 'Help':
 	end
 end
 
-if pcs_horny > 50 and npc_sex['A28']!0:
-
-	act 'Seduce your stepfather':
-		gs 'boyStat', 'A28'
-		cla
-		*clr
-		menu_off = 1
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
-		'You walk up to the Gazelle and pick up a sponge. Bending slightly forwards, you begin washing the car and simultaneously putting your ass on display for your stepfather.'
-		'"- Oh..." - Stepfather did not expect this from you, but his involuntary exhalation and kindled eyes tell you he is enjoying it very much.'
-		'Your stepfather walks up behind you and puts his hands on your ass. He leisurely begins to knead your butt.'
-
-		gs 'arousal', 'foreplay', 3, 'sub', 'incest'
-		gs 'stat'
-
-		act 'Get down on your knees':
-			cla
-			*clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bimbo.knees<<rand(1,3)>>.jpg"></center>'
-			'You fall on your knees in front of your stepfather and place the palm of your hand on his crotch. You can feel his erection through the fabric of his jeans, and begin to caress him. After a while you unzip his pants and pull out his cock, taking a firm grasp on it with one hand.'
-
-			gs 'arousal', 'hj', 3, 'sub', 'incest'
+if pcs_horny > 50 and npc_sex['A28'] ! 0:
+
+	gs 'willpower', 'sex', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Seduce your stepfather (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			gs 'boyStat', 'A28'
+			menu_off = 1
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
+			'You walk up to the Gazelle and pick up a sponge. Bending slightly forwards, you begin washing the car and simultaneously putting your ass on display for your stepfather.'
+			'"- Oh..." - Stepfather did not expect this from you, but his involuntary exhalation and kindled eyes tell you he is enjoying it very much.'
+			'Your stepfather walks up behind you and puts his hands on your ass. He leisurely begins to knead your butt.'
+
+			gs 'arousal', 'foreplay', 3, 'sub', 'incest'
 			gs 'stat'
 
-			act 'Take his dick in your mouth':
-				cla
-				*clr
+			act 'Get down on your knees':
+				*clr & cla
 				gs 'stat'
-				if pcs_throat < dick:pcs_throat += 1
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.0,<<rand(0,4)>>.jpg"></center>'
-				'Your stepfather opens the passenger side door of the Gazelle, and you sit down on the seat. He places a hand on your head and guides his dick towards your mouth.'
-				'You leisurely lick your stepfather''s dick, caress his balls, and then take his cock in your mouth. Soon the cock began to throb, giving signs of an early end.'
+				'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bimbo.knees<<rand(1,3)>>.jpg"></center>'
+				'You fall on your knees in front of your stepfather and place the palm of your hand on his crotch. You can feel his erection through the fabric of his jeans, and begin to caress him. After a while you unzip his pants and pull out his cock, taking a firm grasp on it with one hand.'
 
-				gs 'arousal', 'bj', 5, 'sub', 'incest'
+				gs 'arousal', 'hj', 3, 'sub', 'incest'
 				gs 'stat'
 
-				act 'Suck him off and swallow his sperm':
-					cls
-					if npc_rel['A28']<100:npc_rel['A28']+=2
-					fatherSuck+=1
-					sexpartkno = 1
-					spafinloc = 12
-					gs 'cum_manage'
-					swallow += 1
-					pcs_hydra += 5
+				act 'Take his dick in your mouth':
+					*clr & cla
 					gs 'stat'
-					'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,<<rand(0,10)>>.mp4"></video></center>'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.0,<<rand(0,4)>>.jpg"></center>'
+					'Your stepfather opens the passenger side door of the Gazelle, and you sit down on the seat. He places a hand on your head and guides his dick towards your mouth.'
+					'You leisurely lick your stepfather''s dick, caress his balls, and then take his cock in your mouth. Soon the cock began to throb, giving signs of an early end.'
 
-					'You continue to suck your stepfather''s dick as it continues throbbing. Suddenly, he arches his back and you feel cum begin to pour into your mouth. Although you try your best, the amount of cum flowing from your stepfathers dick is simply too much for you, and some of it instead flows out of your mouth and down your chin. Soon your <<$boydesc>> finishes and you pull his cock out of your sperm-smelling mouth. You can feel the taste of sperm in your mouth, and your <<$liptalk3>> are wet with cum.'
-
-					gs 'arousal', 'bj', 10, 'sub', 'incest'
-					gs 'arousal', 'end'
+					gs 'arousal', 'bj', 5, 'sub', 'incest'
 					gs 'stat'
 
-					act 'Move away':gt 'gargazel'
-				end
-
-				act 'Take his load on your face':
-					cls
-					if npc_rel['A28']<100:npc_rel['A28']+=2
-					fatherSuck+=1
-					sexpartkno = 1
-					spafinloc = 11
-					gs 'cum_manage'
-					facial += 1
-					gs 'stat'
-					gar_rand1 = rand(0,100)
-					if gar_rand1 < 49:'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,<<rand(0,8)>>.jpg"></center>'
-					if gar_rand1 => 50:'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,<<rand(0,8)>>.jpg"></center>'
-					'You stop sucking on your stepfather''s cock just as he reaches orgasm, and a jet of sperm immediately hits you in the face. You squeeze your eyes shut for fear of getting cum in your eyes and feel another jet of hot sperm land on your face.'
-
-					gs 'arousal', 'bj', 10, 'sub', 'incest'
-					gs 'arousal', 'end'
-					gs 'stat'
+					act 'Suck him off and swallow his sperm':
+						cls
+						if npc_rel['A28'] < 100: npc_rel['A28'] += 2
+						fatherSuck += 1
+						sexpartkno = 1
+						spafinloc = 12
+						gs 'cum_manage'
+						swallow += 1
+						pcs_hydra += 5
+						gs 'stat'
+						'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,<<rand(0,10)>>.mp4"></video></center>'
 
-					act 'Move away':gt 'gargazel'
-				end
-			end
+						'You continue to suck your stepfather''s dick as it continues throbbing. Suddenly, he arches his back and you feel cum begin to pour into your mouth. Although you try your best, the amount of cum flowing from your stepfathers dick is simply too much for you, and some of it instead flows out of your mouth and down your chin. Soon your <<$boydesc>> finishes and you pull his cock out of your sperm-smelling mouth. You can feel the taste of sperm in your mouth, and your <<$liptalk3>> are wet with cum.'
 
-			act 'Bend over, leaning against the Gazelle':
-				cla
-				*clr
-				if pcs_vag < dick:pcs_vag += 1
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.1,<<rand(0,2)>>.jpg"></center>'
-				'Your stepfather grabs you and pulls you up from your knees, turning you to face the Gazelle. You plant your hands on the car, and arch your back to give him easier access to your ass and pussy. Once you''re in position, he begins caressing your pussy and then slams his dick in.'
+						gs 'arousal', 'bj', 10, 'sub', 'incest'
+						gs 'arousal', 'end'
+						gs 'stat'
 
-				gs 'arousal', 'vaginal', 10, 'sub', 'incest'
-				gs 'stat'
+						act 'Move away':gt 'gargazel'
+					end
 
-				gs 'dinSex', 'wear_condom'
-				gs 'dinsex','vaginal_sex',10
-				act 'Continue':
-					cla
-					*clr
-					gs 'stat'
-					sexpartkno = 1
-					if npc_rel['A28'] < 100:npc_rel['A28'] += 3
-					if fathersex = 0:guy += 1
-					FatherSex += 1
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.cum1,0.jpg"></center>'
-					if protect = 0:
-						'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling your pussy with his sperm.'
-						gs 'arousal', 'vaginal', 10, 'sub', 'incest'
-						gs 'cum_manage'
-						pcs_mood -= 15
-						pcs_willpwr -= 15
-						gs 'cuminsidereact', 'your stepfather'
-					else
-						'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling the condom with his sperm.'
-						gs 'arousal', 'vaginal', 10, 'sub', 'incest'
+					act 'Take his load on your face':
+						cls
+						if npc_rel['A28'] < 100: npc_rel['A28'] += 2
+						fatherSuck += 1
+						sexpartkno = 1
+						spafinloc = 11
 						gs 'cum_manage'
+						facial += 1
+						gs 'stat'
+						gar_rand1 = rand(0,100)
+						if gar_rand1 < 49:'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,<<rand(0,8)>>.jpg"></center>'
+						if gar_rand1 => 50:'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,<<rand(0,8)>>.jpg"></center>'
+						'You stop sucking on your stepfather''s cock just as he reaches orgasm, and a jet of sperm immediately hits you in the face. You squeeze your eyes shut for fear of getting cum in your eyes and feel another jet of hot sperm land on your face.'
+
+						gs 'arousal', 'bj', 10, 'sub', 'incest'
+						gs 'arousal', 'end'
+						gs 'stat'
+
+						act 'Move away':gt 'gargazel'
 					end
-					gs 'arousal', 'end'
+				end
+
+				act 'Bend over, leaning against the Gazelle':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.1,<<rand(0,2)>>.jpg"></center>'
+					'Your stepfather grabs you and pulls you up from your knees, turning you to face the Gazelle. You plant your hands on the car, and arch your back to give him easier access to your ass and pussy. Once you''re in position, he begins caressing your pussy and then slams his dick in.'
+
+					gs 'arousal', 'vaginal', 10, 'sub', 'incest'
 					gs 'stat'
 
-					act 'Move away':gt 'gargazel'
+					gs 'dinSex', 'wear_condom'
+					gs 'dinsex','vaginal_sex',10
+					act 'Continue':
+						cla
+						*clr
+						gs 'stat'
+						sexpartkno = 1
+						if npc_rel['A28'] < 100:npc_rel['A28'] += 3
+						if fathersex = 0:guy += 1
+						FatherSex += 1
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.cum1,0.jpg"></center>'
+						if protect = 0:
+							'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling your pussy with his sperm.'
+							gs 'arousal', 'vaginal', 10, 'sub', 'incest'
+							gs 'cum_manage'
+							gs 'cuminsidereact', 'your stepfather'
+						else
+							'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling the condom with his sperm.'
+							gs 'arousal', 'vaginal', 10, 'sub', 'incest'
+							gs 'cum_manage'
+						end
+						gs 'arousal', 'end'
+						gs 'stat'
+
+						act 'Move away':gt 'gargazel'
+					end
 				end
 			end
 		end
+	else
+		act 'Seduce your stepfather (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 
@@ -372,141 +411,177 @@ if fatherdrunk=1:
 		!scandal stepfather
 		'You approach your stepfather and uncle Misha and try to ask if you can join them, but your stepfather cuts you off before you can even finish your sentence. "<<$pcs_nickname>>, get out of here! This is a no bitch zone!" he shouts, laughing drunkenly as he waves you off. Uncle Misha finds your stepfather''s degrading talk hilarious, and joins in. You''re clearly not welcome in the garage.'
 		if sorryday!daystart:
-			act 'Persist and ask if you can join them':
-				cla
-				menu_off = 1
-				gs 'stat'
-				'You try to get your stepfather to let you join them but he''s equally persistent in telling you to get lost, being quite rude about it too. He really doesn''t like you at all.'
-				act 'Move away':gt 'gargazel'
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Persist and ask if you can join them (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'self'
+					menu_off = 1
+					gs 'stat'
+					'You try to get your stepfather to let you join them but he''s equally persistent in telling you to get lost, being quite rude about it too. He really doesn''t like you at all.'
+					act 'Move away':gt 'gargazel'
+				end
+			else
+				act 'Persist and ask if you can join 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
+		act 'Move away':gt 'gargazel'
 	elseif npc_rel['A28']>=20 and npc_rel['A28']<40:
 		!strained relations
 		'You ask your stepfather if you can join them, but he''ll have none of it. "<<$pcs_nickname>>, isn''t it past your bedtime? *Hic!* Shoo, go home! *Hic!*"'
 		if sorryday!daystart:
-			act 'Try to persuade him':
-				cla
-				menu_off = 1
-				gs 'stat'
-				'You do your best, but your stepfather remains adamant and sends you home.'
-				act 'Move away':gt 'gargazel'
+			gs 'willpower', 'misc', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Try to persuade him (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'pay', 'self'
+					cla
+					menu_off = 1
+					gs 'stat'
+					'You do your best, but your stepfather remains adamant and sends you home.'
+					act 'Move away':gt 'gargazel'
+				end
+			else
+				act 'Try to persuade him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
+		act 'Move away':gt 'gargazel'
 	elseif npc_rel['A28'] >=40:
 		if pcs_apprnc + (npc_rel['A28']/10) <= 60:
 			gs 'dinfather', 'gardrunkchat'
 		else
 			!good relations and Messrs attractive
-			talkrand=rand(0,100)
-			if talkrand>=20:gs 'dinfather', 'gardrunkchat'
-			if talkrand<20:
+			talkrand = rand(0,100)
+			if talkrand >= 20: gs 'dinfather', 'gardrunkchat'
+			if talkrand < 20:
 				'You relax and have some drinks with the guys, happy to just sit back and listen to the funny stories they exchange.'
-				if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = RAND (1,8)
-				if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = RAND (1,4)
-				if npc_rel['A28']>=80:FatherMolest = RAND (1,2)
+				if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = rand(1,8)
+				if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = rand(1,4)
+				if npc_rel['A28']>=80:FatherMolest = rand(1,2)
 				if FatherMolest=1:
 					'You can''t help but notice that your uncle Misha is staring at you the whole time. You feel like he''s not just undressing you in his mind, but that he''s fucking you in all sorts of positions with reckless abandon.'
 					 if pcs_horny >= 50 and sosedknow=1:
-						act 'Show him your breasts':
-							cls
-							gs 'arousal', 'flash', 5
-							gs 'arousal', 'end'
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim33.jpg"></center>'
-							'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing uncle Misha with an amazing view of your <<$titsize>> breasts.'
-
-							if (pcs_apprnc + (npc_rel['A54']/10)) < 60:mishalust = 2
-							if (pcs_apprnc + (npc_rel['A54']/10)) >= 60 and (pcs_apprnc + (npc_rel['A54']/10)) < 120:mishalust = Rand (1,4)
-							if (pcs_apprnc + (npc_rel['A54']/10)) >= 120 and (pcs_apprnc + (npc_rel['A54']/10)) < 200:mishalust = Rand (1,2)
-							if (pcs_apprnc + (npc_rel['A54']/10)) >= 200:mishaLust = 1
-							if mishaLust>=2:
-								pcs_horny -= RAND(1,5)
+						gs 'willpower', 'exhib', 'self', 'easy'
+						if will_cost <= pcs_willpwr:
+							act 'Show him your breasts (<<will_cost>> Willpower)':
+								cls
+								gs 'willpower', 'exhib', 'self', 'easy'
+								gs 'willpower', 'pay', 'self'
+								gs 'arousal', 'flash', 5
+								gs 'arousal', 'end'
 								gs 'stat'
-								'Uncle Misha is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. You''re happy he at least had enough decency to not clue in your stepfather, who happened to have his back turned against you.'
-							else
-								'You try to be discrete so your stepfather doesn''t notice what you just did, and uncle Misha is quite flustered by the show you just gave him. He stumbles over his words while your stepfather talks to him about bumpers, as you smile mischievously and give uncle Misha a wink when your stepfather looks away.'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim33.jpg"></center>'
+								'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing uncle Misha with an amazing view of your <<$titsize>> breasts.'
+
+								if (pcs_apprnc + (npc_rel['A54']/10)) < 60: mishalust = 2
+								if (pcs_apprnc + (npc_rel['A54']/10)) >= 60 and (pcs_apprnc + (npc_rel['A54']/10)) < 120: mishalust = rand(1,4)
+								if (pcs_apprnc + (npc_rel['A54']/10)) >= 120 and (pcs_apprnc + (npc_rel['A54']/10)) < 200: mishalust = rand(1,2)
+								if (pcs_apprnc + (npc_rel['A54']/10)) >= 200: mishaLust = 1
+								if mishaLust>=2:
+									pcs_horny -= rand(1,5)
+									gs 'stat'
+									'Uncle Misha is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. You''re happy he at least had enough decency to not clue in your stepfather, who happened to have his back turned against you.'
+								else
+									'You try to be discrete so your stepfather doesn''t notice what you just did, and uncle Misha is quite flustered by the show you just gave him. He stumbles over his words while your stepfather talks to him about bumpers, as you smile mischievously and give uncle Misha a wink when your stepfather looks away.'
+								end
+								act 'Move away':gt $loc, $metka
 							end
-							act 'Move away':gt $loc, $metka
+						else
+							act 'Show him your breasts (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					 end
 					if pcs_horny >= 60 or TouchedByFather=1:
-						act 'Get their attention by dropping your bottle':
-							cls
-							gs 'arousal', 'flash', 5
-							gs 'arousal', 'end'
-							gs 'stat'
-							'Even though you''re horny and want the guys to notice you, they are paying more attention to their booze and their conversation. You can change that. Making sure it doesn''t break, you ''accidentally'' drop your bottle and bend over to pick it up without bending your knees, giving them a spectacular view of your ass. You make a show of trying to reduce the spillage, wiping the floor while staying in your current position.'
-
-							if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-							if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
-							if fatherLust>=2:
-								pcs_horny -= RAND(1,5)
+						gs 'willpower', 'exhib', 'self', 'easy'
+						if will_cost <= pcs_willpwr:
+							act 'Get their attention by dropping your bottle (<<will_cost>> Willpower)':
+								cls
+								gs 'willpower', 'exhib', 'self', 'easy'
+								gs 'willpower', 'pay', 'self'
+								gs 'arousal', 'flash', 5
+								gs 'arousal', 'end'
 								gs 'stat'
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim35.jpg"></center>'&'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. Uncle Misha just has a smug grin on his face.'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/pc/fatherim34.jpg"></center>'&'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. Neither of them seem to have noticed you''re not wearing panties.'
-							else
-								if $pantyworntype ! 'none':
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim37.jpg"></center>'
-									'You stick your ass out as much as you can, showing off your ass as much as you can. As you turn around, you notice that both your stepfather and uncle''s gazes are glued to your ass. You simply smile and return to the table as they blubber and try to find excuses.'
-									act 'Tease them some more':
-										cls
-										gs 'arousal', 'flash', 5
-										gs 'arousal', 'end'
-										gs 'stat'
-										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim38.jpg"></center>'
-										'You sit back down, still having their full attention. You try to excuse your behavior: "I''m sorry guys, my clothes rub my pussy raw, bending over normally makes me feel very uncomfortable."'
-										act 'Show them your pussy when they ask':
+								'Even though you''re horny and want the guys to notice you, they are paying more attention to their booze and their conversation. You can change that. Making sure it doesn''t break, you ''accidentally'' drop your bottle and bend over to pick it up without bending your knees, giving them a spectacular view of your ass. You make a show of trying to reduce the spillage, wiping the floor while staying in your current position.'
+
+								if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
+								if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120: fatherLust = rand(1,4)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200: fatherLust = rand(1,2)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather = 1: fatherLust = 1
+								if fatherLust >= 2:
+									pcs_horny -= rand(1,5)
+									gs 'stat'
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim35.jpg"></center>'&'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. Uncle Misha just has a smug grin on his face.'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/pc/fatherim34.jpg"></center>'&'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. Neither of them seem to have noticed you''re not wearing panties.'
+								else
+									if $pantyworntype ! 'none':
+										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim37.jpg"></center>'
+										'You stick your ass out as much as you can, showing off your ass as much as you can. As you turn around, you notice that both your stepfather and uncle''s gazes are glued to your ass. You simply smile and return to the table as they blubber and try to find excuses.'
+										act 'Tease them some more':
 											cls
 											gs 'arousal', 'flash', 5
 											gs 'arousal', 'end'
 											gs 'stat'
-											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim39.jpg"></center>'
-											'Uncle Misha is onto your act, and decides to push you to your limits. He smiles and says: "Oh really, <<$pcs_nickname>>? Why don''t you show us, maybe we can help you. Isn''t that right, Vladimir?" Too turned on to decline, you pull your panties to the side and show them your pussy. It''s really not all that sore, but your arousal has coloured it nice and red and it makes your pussy lips look a bit more puffy. The guys didn''t think you would actually follow through with this, and are flabbergasted when you do.'
-											act 'Move away':gt $loc, $metka
+											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim38.jpg"></center>'
+											'You sit back down, still having their full attention. You try to excuse your behavior: "I''m sorry guys, my clothes rub my pussy raw, bending over normally makes me feel very uncomfortable."'
+											act 'Show them your pussy when they ask':
+												cls
+												gs 'arousal', 'flash', 5
+												gs 'arousal', 'end'
+												gs 'stat'
+												'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim39.jpg"></center>'
+												'Uncle Misha is onto your act, and decides to push you to your limits. He smiles and says: "Oh really, <<$pcs_nickname>>? Why don''t you show us, maybe we can help you. Isn''t that right, Vladimir?" Too turned on to decline, you pull your panties to the side and show them your pussy. It''s really not all that sore, but your arousal has coloured it nice and red and it makes your pussy lips look a bit more puffy. The guys didn''t think you would actually follow through with this, and are flabbergasted when you do.'
+												act 'Move away':gt $loc, $metka
+											end
 										end
+									elseif $pantyworntype = 'none':
+										cls
+										gs 'arousal', 'flash', 5
+										gs 'arousal', 'flash', 5
+										gs 'arousal', 'vaginal_finger', 5, 'exhibitionism', 'rough'
+										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim40.jpg"></center>'
+										'Slightly disappointed, you move away from the table. Lost in your own thoughts, you don''t notice your uncle Misha''s legs and trip over them. Since you''re not wearing any underwear, you''re giving your uncle one hell of a show as you fall down onto your hands and knees. He immediately reaches out and runs his fingers over your wet pussy lips. He fingers you briefly, then returning his fingers to his nose to take a deep whiff. "You have nice holes, <<$pcs_nickname>>, young and juicy..." Realizing he won''t do anything more with your stepfather right there in the room, you get up and fix your clothes before sitting back down at the table.'
+										gs 'arousal', 'end'
+										minut -= 10
+										gs 'stat'
 									end
-								elseif $pantyworntype = 'none':
-									cls
-									gs 'arousal', 'flash', 5
-									gs 'arousal', 'flash', 5
-									gs 'arousal', 'vaginal_finger', 5, 'exhibitionism', 'rough'
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim40.jpg"></center>'
-									'Slightly disappointed, you move away from the table. Lost in your own thoughts, you don''t notice your uncle Misha''s legs and trip over them. Since you''re not wearing any underwear, you''re giving your uncle one hell of a show as you fall down onto your hands and knees. He immediately reaches out and runs his fingers over your wet pussy lips. He fingers you briefly, then returning his fingers to his nose to take a deep whiff. "You have nice holes, <<$pcs_nickname>>, young and juicy..." Realizing he won''t do anything more with your stepfather right there in the room, you get up and fix your clothes before sitting back down at the table.'
-									gs 'arousal', 'end'
-									minut -= 10
-									gs 'stat'
 								end
+								act 'Continue':gt $loc, $metka
 							end
-							act 'Continue':gt $loc, $metka
+						else
+							act 'Get their attention by dropping your bottle (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					 end
 					if pcs_horny >= 75 or TouchedByFather=1:
-						act 'Spread your legs':
-							cls
-							minut+=5
-							pcs_horny += RAND(1,5)
-							'You, pretending to not notice, slowly spread your legs while you talk with the guys.'
-
-							if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-							if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
-							if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
-							if fatherLust>=2:
-								pcs_horny -= RAND(1,5)
-								gs 'stat'
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'Trying to direct Uncle Misha''s attention to something across the room, your stepfather signals you to cover yourself up with agitated hand movements.'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim52.jpg"></center>' & 'Your stepfather notices what you''re trying to do. After he distracts uncle Misha for long enough, he turns to you and whispers: "<<$pcs_nickname>>, don''t... just don''t. You have no idea what you''re getting yourself into." Intimidated by the gravity of his voice, you do as he says and cover up.'
-							else
-								if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response. He pulls away his hand just in time, before uncle Misha notices what''s going on.'
-								if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim25.jpg"></center>' & 'Noticing your stepfather''s blush, you realize at least one person at the table noticed you''re not wearing any underwear. When your uncle Misha looks away, he quickly reaches for you and fingers your wet pussy. A needy moan escapes your lips as he pulls his hand way, and he quickly starts a conversation about wind shield wipers. Your uncle Misha has no idea what just went down.'
+						gs 'willpower', 'exhib', 'self', 'easy'
+						if will_cost <= pcs_willpwr:
+							act 'Spread your legs (<<will_cost>> Willpower)':
+								cls
+								gs 'willpower', 'exhib', 'self', 'easy'
+								gs 'willpower', 'pay', 'self'
+								minut += 5
+								pcs_horny += rand(1,5)
+								'You, pretending to not notice, slowly spread your legs while you talk with the guys.'
+
+								if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
+								if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120: fatherLust = rand(1,4)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200: fatherLust = rand(1,2)
+								if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather = 1: fatherLust = 1
+								if fatherLust >= 2:
+									pcs_horny -= rand(1,5)
+									gs 'stat'
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'Trying to direct Uncle Misha''s attention to something across the room, your stepfather signals you to cover yourself up with agitated hand movements.'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim52.jpg"></center>' & 'Your stepfather notices what you''re trying to do. After he distracts uncle Misha for long enough, he turns to you and whispers: "<<$pcs_nickname>>, don''t... just don''t. You have no idea what you''re getting yourself into." Intimidated by the gravity of his voice, you do as he says and cover up.'
+								else
+									if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response. He pulls away his hand just in time, before uncle Misha notices what''s going on.'
+									if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim25.jpg"></center>' & 'Noticing your stepfather''s blush, you realize at least one person at the table noticed you''re not wearing any underwear. When your uncle Misha looks away, he quickly reaches for you and fingers your wet pussy. A needy moan escapes your lips as he pulls his hand way, and he quickly starts a conversation about wind shield wipers. Your uncle Misha has no idea what just went down.'
+								end
+								act 'Continue':gt $loc, $metka
 							end
-							act 'Continue':gt $loc, $metka
+						else
+							act 'Spread your legs (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
 				else
-				gs 'dinfather', 'gardrunkchat'
+					gs 'dinfather', 'gardrunkchat'
 				end
 			end
 		end

+ 5 - 5
locations/gargazel.qsrc

@@ -2,12 +2,12 @@
 
 CLOSE ALL
 $metka = $ARGS[0]
-$loc = $CURLOC
+$loc = $curloc
 $menu_loc = 'gargazel'
 $menu_arg = ''
 menu_off = 0
 $location_type = 'secluded'
-fatherdrunk=0
+fatherdrunk = 0
 clr
 gs 'stat'
 '<center><h4>Garage</h4></center>'
@@ -26,9 +26,9 @@ if father_go = 1 and hour >= 16 and hour < 20:
 	'Your <a href="exec:gt ''garfather''">stepfather</a> is in the garage, working on his Gazelle pickup truck.'
 end
 
-if father_go=1 and hour>=20 and hour<21:
+if father_go = 1 and hour >= 20 and hour < 21:
 	'Your <a href="exec:gt ''garfather''">stepfather and uncle Misha</a> are in the garage, drinking vodka.'
-	set fatherdrunk=1
+	fatherdrunk = 1
 end
 
 if YouCanGar > 0:
@@ -37,7 +37,7 @@ if YouCanGar > 0:
 	if tovarL >= 30:
 		'You already have too much stored at home and do not have any more space.'
 	elseif tovarL < 30:
-		perenGarTov = 30-tovarL
+		perenGarTov = 30 - tovarL
 		'You can bring <<perenGarTov>> trinkets home and store them somewhere, until you have time to collect and sell them at the train station.'
 
 		if GarTorgItem > 0:

+ 68 - 55
locations/glake.qsrc

@@ -93,20 +93,26 @@ if month >= 5 and month <= 9:
 	end
 
 	if $clothingworntype ! 'nude' and (pcs_inhib > 30 or (exhibitionist_lvl > 1 and pcs_horny >= 60)):
-		act'Strip naked':
-			*clr & cla
-			menu_off = 1
-			minut += 5
-			inhib_exp += rand(1,2)
-			gs 'underwear', 'remove'
-			gs 'clothing', 'strip'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/strip.jpg"></center>'
-			'Without hesitation, despite the fact other people are around, you take off all your clothes and neatly fold them before putting them down on a pile. Without your clothes holding you back, you can go for a nice swim in the lake or just lie down in the sand and do some sunbathing.'
+		gs 'willpower', 'exhib', 'self', 'easy'
+		if will_cost <= pcs_willpwr:
+			act 'Strip naked (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				menu_off = 1
+				minut += 5
+				inhib_exp += rand(1,2)
+				gs 'underwear', 'remove'
+				gs 'clothing', 'strip'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/strip.jpg"></center>'
+				'Without hesitation, despite the fact other people are around, you take off all your clothes and neatly fold them before putting them down on a pile. Without your clothes holding you back, you can go for a nice swim in the lake or just lie down in the sand and do some sunbathing.'
 
-			act'Continue':gt'glake'
+				act'Continue':gt'glake'
+			end
+		else
+			act 'Strip naked (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	elseif $clothingworntype = 'nude':
-		act'Put your clothes back on':
+		act 'Put your clothes back on':
 			*clr & cla
 			menu_off = 1
 			minut+=5
@@ -114,7 +120,6 @@ if month >= 5 and month <= 9:
 			if nudelake <= 3:
 				minut += 5
 				pcs_mood -= 5
-				pcs_willpwr -= 5
 				inhib_exp += rand(1,3)
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/noclothes.jpg"></center>'
 				'You return to the place where you thought you put your clothes to get dressed... except you can''t find them. Oh crap, you can''t find them! You desperately search the beach for a while, while a few passers-by look amused at the naked girl running around the beach. When you can''t find them, you panic and run all the way home... hopefully they''ll turn up.'
@@ -122,7 +127,6 @@ if month >= 5 and month <= 9:
 			elseif nudelake = 4:
 				minut += 5
 				pcs_mood -= 5
-				pcs_willpwr -= 5
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/nakedcar.jpg"></center>'
 				'You return to the place where you thought you put your clothes to get dressed... except you can''t find them. Oh crap, you can''t find them! You desperately search the beach for a while, while a few passers-by look amused at the naked girl running around the beach. Eventually a man approaches you. You can tell his eyes are darting over your body as he asks: "Is there a problem, sweetheart? You seem upset..."'
 				if bag = 1:
@@ -154,7 +158,7 @@ if month >= 5 and month <= 9:
 						'He shakes his head and you can see a slight bulge forming in his pants the more he looks at your naked body. "No sorry, but I might be willing to trade the clothes..." He trails off suggestively and with the way he is looking at you, you have no doubt what he has in mind.'
 						'But it never hurts to see. "What did you have in mind?"'
 						'He grins a bit. "Well how about we get in my car and you let me fuck you and then you can have the clothes."'
-						gs 'willpower', 'sex', 'resist'
+						gs 'willpower', 'prostitution', 'resist'
 						if will_cost <= pcs_willpwr:
 							act 'Refuse and run home naked (<<will_cost>> Willpower)':
 								gs 'willpower', 'pay', 'resist'
@@ -166,27 +170,33 @@ if month >= 5 and month <= 9:
 						act 'Agree to have sex': gt 'glake', 'car_sex'
 					end
 				end
-				act 'Suggest alternative payment':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/nakedcar.jpg"></center>'
-					'3000 <b>₽</b>... you know it''s a fair price for him to ask, but you don''t want to pay 3000 <b>₽</b> right now! This is not how you planned for your day to go. Too afraid to look him in the eye when you ask, you suggest: "Is there... is there some other way I can pay you? 3000 <b>₽</b> is a lot of money."'
-					'He''s been gawking at your naked body the whole time you''ve been talking, and your suggestion seems to be exactly what he wanted to hear. He grins: "I can think of one way..."'
-					'The growing bulge in his pants does an excellent job of telling exactly what he''s thinking.'
-					act 'Agree to have sex': gt 'glake', 'car_sex'
-					if money >= 3000:
-						act 'Pay 3,000 <b>₽</b>':
-							*clr & cla
-							money -= 3000
-							exercise[1] = 1
-							exerciseS[1] = 0
-							exerciseH[1] = 100
-							exerciseB[1] = pcs_hips
-							gs 'clothing', 'wear', 'exercise', 1
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/nakedcar.jpg"></center>'
-							'You don''t want to have sex with him... but you also don''t want to go home naked! Not seeing any other option, you decide to pay him the 3,000 <b>₽</b> after all. You quickly put on the clothes as he hands them over, feeling relieved in the knowledge that at least you don''t have to walk through town in the nude. Now that you''re clothed, you feel more confident in searching the beach a bit more; hopefully your clothes will turn up after all.'
-							act 'Continue': gt 'glake'
+				gs 'willpower', 'prostitution', 'self'
+				if will_cost <= pcs_willpwr:
+					act 'Suggest alternative payment (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'self'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/nakedcar.jpg"></center>'
+						'3000 <b>₽</b>... you know it''s a fair price for him to ask, but you don''t want to pay 3000 <b>₽</b> right now! This is not how you planned for your day to go. Too afraid to look him in the eye when you ask, you suggest: "Is there... is there some other way I can pay you? 3000 <b>₽</b> is a lot of money."'
+						'He''s been gawking at your naked body the whole time you''ve been talking, and your suggestion seems to be exactly what he wanted to hear. He grins: "I can think of one way..."'
+						'The growing bulge in his pants does an excellent job of telling exactly what he''s thinking.'
+						act 'Agree to have sex': gt 'glake', 'car_sex'
+						if money >= 3000:
+							act 'Pay 3,000 <b>₽</b>':
+								*clr & cla
+								money -= 3000
+								exercise[1] = 1
+								exerciseS[1] = 0
+								exerciseH[1] = 100
+								exerciseB[1] = pcs_hips
+								gs 'clothing', 'wear', 'exercise', 1
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/event/nakedcar.jpg"></center>'
+								'You don''t want to have sex with him... but you also don''t want to go home naked! Not seeing any other option, you decide to pay him the 3,000 <b>₽</b> after all. You quickly put on the clothes as he hands them over, feeling relieved in the knowledge that at least you don''t have to walk through town in the nude. Now that you''re clothed, you feel more confident in searching the beach a bit more; hopefully your clothes will turn up after all.'
+								act 'Continue': gt 'glake'
+							end
 						end
 					end
+				else
+					act 'Suggest alternative payment (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
 			else
 				gs 'clothing', 'wear_last_worn'
@@ -203,7 +213,6 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 		*clr & cla
 		menu_off = 1
 		minut += 30
-		pcs_willpwr += 5
 		pcs_mood += 5
 		gs'stat'
 
@@ -234,7 +243,6 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 			gs 'cum_cleanup'
 			minut += 30
 			pcs_mood += 5
-			pcs_willpwr += 5
 			if pcs_sweat > 10: pcs_sweat = 10 + rand(0,4)
 			if pcs_stren < 30: stren_exp += 1
 			fat -= 1
@@ -243,10 +251,10 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 				inhib_exp += rand(1,2)
 			else
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/swim.jpg"></center>'
-				if pcs_inhib < 50:inhib_exp += rand(1,2)
+				if pcs_inhib < 50: inhib_exp += rand(1,2)
 			end
 			'You swim and play in the lake, feeling refreshed and invigorated by the clean lake water.'
-			if $clothingworntype = 'nude' and rand(0,1):pcs_willpwr -= 5 & pcs_mood -= 5 & 'After a few minutes, you feel the piercing gaze of several nearby women on you. They''re making an effort of whispering to one another, yet loud enough so you can hear them: "Look at that <<$pcs_lastname>> slut! She has no decency whatsoever, shamelessly flaunting her naked body like that!" The men at the lake are much more appreciative, and openly stare at your attractive body. You can see bulges forming in the shorts of some of them.'
+			if $clothingworntype = 'nude' and rand(0,1): pcs_mood -= 5 & 'After a few minutes, you feel the piercing gaze of several nearby women on you. They''re making an effort of whispering to one another, yet loud enough so you can hear them: "Look at that <<$pcs_lastname>> slut! She has no decency whatsoever, shamelessly flaunting her naked body like that!" The men at the lake are much more appreciative, and openly stare at your attractive body. You can see bulges forming in the shorts of some of them.'
 			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
 			act 'Get out of the water':gt'glake'
 		end
@@ -319,8 +327,8 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 									'Damn, that voice startled you. You look behind you and you see the tattooed younger man behind you. He has tattoos over his whole body as well, most notably several tombs and skulls on his chest. He stares you down with a stone cold look on his face.'
 									'The bald man smiles and puts his hand on your chest as if he owns it, roughly squeezing your tit through your swimsuit.'
 									'"So... how much?"'
-									act 'Resist':gt 'LakeBoyDy', 'slap'
-									act 'Move away':gt 'LakeBoyDy', 'go'
+									act 'Resist': gs 'LakeBoyDy', 'slap'
+									act 'Move away': gt 'LakeBoyDy', 'go'
 
 								end
 							end
@@ -339,7 +347,7 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 									'You try to ignore them anyway, closing your eyes again. You feel the blade of grass continuously teasing your body, and after a few minutes his sweaty hand is pawing at your breasts through your swimsuit.'
 									'He whispers in your ear: "Come with me baby, I''ll make you feel good. You won''t regret it". His groping becomes more insistent and he''s roughly pinching your nipples now, and the outline of them slowly but surely becomes visible through your swimsuit.'
-									act 'Resist':gt 'LakeBoyDy', 'slap'
+									act 'Resist': gs 'LakeBoyDy', 'slap'
 								end
 							end
 
@@ -446,20 +454,26 @@ if $ARGS[0] = 'nude_home':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/homenude.jpg"></center>'
 	'You cover yourself up as best you can and go through the woods, you use the woods to get as close as you can to your apartment. Luckily no one else seems to be wandering the woods right now and no one spots you. Now though you are at the edge of the woods, so you have decided if you want to sneak the rest of the way and hope no one see''s you are just make a run for it and hope no one recognizes you.'
 	
-	act 'Run home':
-		*clr & cla
-		minut += 7
-		gs 'fame', 'pav', 'sex', 5
-		inhib_exp += rand(2,4)
-		if month < 3 or month = 12:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/naked/runhomenakedw.jpg"></center>'
-		else
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/naked/runhomenaked.jpg"></center>'
+	gs 'willpower', 'exhib', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Run home (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			minut += 7
+			gs 'fame', 'pav', 'sex', 5
+			inhib_exp += rand(2,4)
+			if month < 3 or month = 12:
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/naked/runhomenakedw.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/naked/runhomenaked.jpg"></center>'
+			end
+			'You decided to just get this over with and make a run for it. You use you hands to cover yourself as best you can, looking away from people. Sometimes you have to use your hands to cover you face in the hopes no one recognizes you. Several people gasp, more than a few people, mostly older women chastise you for being such a whore. Some of the men whistle and more than a few people take your picture, you really hope none of those pictures show your face. Finally after what seems forever you make it to the apartment complex.'
+			gs 'arousal', 'flash', 3, 'exhibitionism'
+			gs 'stat'
+			act 'Continue to complex': gt 'pavaptcourtev', 'naked_aptcomplex'
 		end
-		'You decided to just get this over with and make a run for it. You use you hands to cover yourself as best you can, looking away from people. Sometimes you have to use your hands to cover you face in the hopes no one recognizes you. Several people gasp, more than a few people, mostly older women chastise you for being such a whore. Some of the men whistle and more than a few people take your picture, you really hope none of those pictures show your face. Finally after what seems forever you make it to the apartment complex.'
-		gs 'arousal', 'foreplay', 3, 'exhibitionism'
-		gs 'stat'
-		act 'Continue to complex': gt 'pavaptcourtev', 'naked_aptcomplex'
+	else
+		act 'Run home (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	
 	act 'Sneak home':
@@ -469,7 +483,7 @@ if $ARGS[0] = 'nude_home':
 		inhib_exp += rand(1,3)
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/naked/sneakhomenaked.jpg"></center>'
 		'You decided it would be better to take your time and sneak home, doing your best to not be seen. You use you hands to cover yourself as best you can, using cover as often as you, can. Hiding behind trees, parked cars, ducking down alleyways and when that doesn''t work you wait till you don''t see anyone and dart across open stretches of ground. Once or twice you think someone might have seen you, but you hope you wasn''t recognized, if you was seen. Finally after what seems forever you make it to the apartment complex.'
-		gs 'arousal', 'foreplay', 10, 'exhibitionism'
+		gs 'arousal', 'flash', 10, 'exhibitionism'
 		gs 'stat'
 		act 'Continue to complex': gt 'pavaptcourtev', 'naked_aptcomplex'
 	end
@@ -489,7 +503,6 @@ end
 if $ARGS[0] = 'skating':
 	*clr & cla
 	menu_off = 1
-	pcs_willpwr += 5
 	fat -= 1
 	gs 'sweat', 'add', 10
 	stren_exp += 1

+ 1 - 1
locations/gschool_grounds.qsrc

@@ -474,7 +474,7 @@ if $ARGS[0] = 'KristinaFight':
 	BonusDefV = 0
 	!Action Programme
 	program = 0
-	ZverevaFight = 1
+	fightEnding = 12
 
 	if spellavtoklon = 1:klon = 3
 	if spellbefshild = 1:defence = 500

+ 2 - 19
locations/gschool_lunch.qsrc

@@ -11,16 +11,6 @@ if $ARGS[0] = 'lunch':
 		gt 'gschool_events', 'break_events'
 	end
 	
-	if school_lunch = 0:
-		if NikoVolkovQW = 10 and NikoEv = 12:
-			school_lunch = 1 & gt 'NikoDreams', 'Classroom Dream'
-		elseif NikoVolkovQW = 10 and NikoEv = 21 and NikoDate_Day ! daystart:
-			school_lunch = 1 & gt 'NikoEv2', 'Julia Talk 2'
-		elseif VKLenaBully = 1 and VKLena_Day ! daystart and VKWip = 100:
-			school_lunch = 1 & gt 'NikoBully', 'Lena Bully'
-		end
-	end
-
 	if dimaRevenge = 3:
 		gt 'dimaRevenge', 3
 	elseif dimaRevenge = 4 and dimaRevChoice = 0:
@@ -143,12 +133,6 @@ if $ARGS[0] = 'break':
 			gt 'NikoPayback', 'Payback'
 		elseif NikoPayback = 2 and NikoPayback_Day ! daystart:
 			gt 'NikoPayback', 'Payback 2'
-		elseif NikoVolkovQW = 10 and NikoEv = 14:
-			lunch_event = daystart
-			gt 'NikoEv2', 'Sonia Talk'
-		elseif NikoVolkovQW = 10 and NikoEv = 16:
-			lunch_event = daystart
-			gt 'NikoEv2', 'Julia Talk'
 		end
 				
 		if school_period = 6: 
@@ -498,8 +482,7 @@ if $ARGS[0] = 'rolan_meet':
 		minut += 5
 		gs 'stat'
 		rolanmeet += 1
-		'<center><img src="images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet0.jpg"></center>'
-!! LURK MORRISON images are currently located in ''...images\locations\pavlovsk\resident\apartment\aptrolan\rolanmeet'\'
+		'<center><img src="images\locations\pavlovsk\resident\apartment\aptrolan\rolanmeet.jpg"></center>'
 		'He looks like he''s sleeping. You try waking him, "Hey mister, you shouldn''t sleep here!"'
 		'He''s snoring pretty loudly. It''s a wonder no one else has tried to wake him.'
 		'"Hey... Hey... Wake up!"'
@@ -778,9 +761,9 @@ if $ARGS[0] = 'rolan_meet':
 			act 'Take a bite':
 				*clr & cla
 				minut += 5
+				pcs_mood -= 10
 				gs 'stat'
 				'<center><img src="images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet19.jpg"></center>'
-				!! LURK MORRISON Suggestion - Should be a minor mood decrease here. Maybe a hunger decrease as well?
 				'You almost retch after taking a bite. What... the hell is there in this? It''s a medley of different flavors, none of which should go together. You also taste... <i>CHEWING GUM</i>?'
 				'You attempt to gather yourself before speaking. "...t-thanks. So, um, last time we were talking about what you do in your free time...?"'
 				'Rolan takes back his sandwich and continues to eat, oblivious to your disgust. "Yes, when I get off work, I go home. Sometimes I like to go for a walk or do chores, maybe take a bath. Do you want another bite?" He offers you the ''sandwich'' again.'

+ 1 - 1
locations/kisameQW.qsrc

@@ -74,7 +74,6 @@ if $ARGS[0] = 'start':
 			!!Programme of Action
 			program = 5
 			kisamePic = 1
-			KisaFight = 1
 			klonV = 5
 			!!defenceV = 10000
 			if spellavtoklon = 1:klon = 3
@@ -96,6 +95,7 @@ if $ARGS[0] = 'start':
 			opp_health[0] = (opp_vital * 10 + opp_stren * 5)
 			opp_willpwr[0] = 100
 			opp_shoot[0] = 100
+			fightEnding = 7
 
 			gt 'fight', 'start'
 			'You kick Kisame in the face. He shows his teeth, and his appearance begins to change. Instantaneously he has blue gills on his face and shark teeth. He whispers with a smile, "You wanna play baby? Let''s play!"'

+ 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
 

File diff suppressed because it is too large
+ 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

+ 3 - 3
locations/lab.qsrc

@@ -68,7 +68,6 @@ if $ARGS[0] = 'start':
 			BonusDefV = 0
 			!!Programme of Action
 			program = 0
-			jugoFight = 2
 			}
 			gs 'fight','initFight'
 
@@ -87,6 +86,7 @@ if $ARGS[0] = 'start':
 			opp_health[0] = (opp_vital * 10 + opp_stren * 5)
 			opp_willpwr[0] = 50
 			opp_shoot[0] = 100
+			fightEnding = 2
 
 			gt 'fight', 'start'
 		end
@@ -116,8 +116,7 @@ if $ARGS[0] = 'start':
 			BonusAtakV = 0
 			BonusDefV = 0
 			!!Programme of Action
-			program = 4
-			tatianaFight = 1}
+			program = 4}
 			gs 'fight','initFight'
 
 			$opp_name[0] = 'Tatiana'
@@ -135,6 +134,7 @@ if $ARGS[0] = 'start':
 			opp_health[0] = (opp_vital * 10 + opp_stren * 5)
 			opp_willpwr[0] = 100
 			opp_shoot[0] = 100
+			fightEnding = 3
 			gt 'fight', 'start'
 		end
 	end

+ 36 - 36
locations/leonid.qsrc

@@ -34,7 +34,7 @@ if $ARGS[0] = 'firstTime':
 	'You are in the office with label <<$bName>> <<$bSurname>>, lawyer.'
 	'<<$bName>> orders you to kneel in front of his desk.'
 	'"So <<$pcs_firstname>>, I have taken out of that hole. Do you already see why?"'
-	'"I''m not sure mister <<$bSurname>>"'
+	'"I''m not sure Mister <<$bSurname>>"'
 	'"Then let me explain. I love my wife, but I have certain needs. Long time I have neglected myself, but things got even worse. When I got the opportunity, I got in touch with the ''Haulers''. You know them, those are the people that abducted you and made you a what you are now."'
 	'"What? What do you mean by ''what am I now?''"'
 	'"A slave. My slave."'
@@ -48,12 +48,12 @@ if $ARGS[0] = 'firstTime':
 	''
 	'"Do you think I am stupid? The authorities are under my grasp. I own them. Do it and nobody will see you ever again."'
 	'You get up back to your knees.'
-	'"All right mister <<$bSurname>>, I''ve got the idea. I promise to keep quiet and be your...slave."'
+	'"All right Mister <<$bSurname>>, I''ve got the idea. I promise to keep quiet and be your...slave."'
 	'"Very well. I will call you if I require your presence. Until then you are free to go."'
 	if SchoolAtestat = 0:
-		'"But mister <<$bSurname>>, what do I tell to my <<$npc_nickname[''A29'']>>? How do I explain my absence from the school and everything?"'
+		'"But Mister <<$bSurname>>, what do I tell to my <<$npc_nickname[''A29'']>>? How do I explain my absence from the school and everything?"'
 		'"Do not care about the school. I will take care of it. As for your <<$npc_nickname[''A29'']>>, if she asks, tell her you ran from home to a friend but reconsidered and went back."'
-		'"Yes mister <<$bSurname>>."'
+		'"Yes Mister <<$bSurname>>."'
 		schoolprogul = 0
 	end
 	*nl
@@ -76,11 +76,11 @@ if $ARGS[0] = 'hall':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/officehall.jpg"></center>'
 	'You are in the hallway leading to several offices. One of the doors has a doorsign <a href="exec:gt ''leonid'', ''office''"><<$bName>> <<$bSurname>>, lawyer.</a>'
 	gs 'stat'
-	leoHorny = rand (0, 20)
-	leoStress = rand (0, 30)
-	leoCoffee = rand (80, 100)
-	leoComfort = rand (0, 30)
-	paperwork = rand (40, 60)
+	leoHorny = rand(0,20)
+	leoStress = rand(0,30)
+	leoCoffee = rand(80,100)
+	leoComfort = rand(0,30)
+	paperwork = rand(40,60)
 	act 'Get back':gt 'pavCommercialOffices'
 end
 
@@ -104,14 +104,14 @@ if $ARGS[0] = 'office':
 		'You are in the office of <<$bName>> <<$bSurname>>. There are three other doors inside the office, one leading to a small <a href="exec:gt ''leonid'', ''officeKitchen''">kitchen</a>, second leading to a conference room and third leading to a <a href="exec:gt ''leonid'', ''toilet''">toilet</a>.'
 		'<a href="exec:gt ''leonid'', ''officeLeonidGate''"><<$bName>> <<$bSurname>></a> is sitting behind his desk, working.'
 		if slaveEventCount > 0:
-			'In the middle of the bookcase, there are hidden doors to a <a href="exec:gt ''leonid'', ''secretRoom''">bondage rooms</a>.'
+			'In the middle of the bookcase, there are hidden doors to a <a href="exec:gt ''leonid'', ''secretRoom''">bondage rooms/a>.'
 		end
 	elseif (hour >= 19 and hour =< 21) and leonidVisit = 1:
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/office.jpg"></center>'
 		'You are in the office of <<$bName>> <<$bSurname>>. There are three other doors inside the office, one leading to a small <a href="exec:gt ''leonid'', ''officeKitchen''">kitchen</a>, second leading to a conference room and third leading to a <a href="exec:gt ''leonid'', ''toilet''">toilet</a>.'
 		'<a href="exec:gt ''leonid'', ''officeLeonidGate''"><<$bName>> <<$bSurname>></a> is sitting behind his desk, waiting for you to come.'
 		if slaveEventCount > 0:
-			'In the middle of the bookcase, there are hidden doors to a <a href="exec:gt ''leonid'', ''secretRoom''">bondage rooms</a>.'
+			'In the middle of the bookcase, there are hidden doors to a <a href="exec:gt ''leonid'', ''secretRoom''">bondage room</a>.'
 		end
 	else
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/officehall.jpg"></center>'
@@ -125,7 +125,7 @@ if $ARGS[0] = 'office':
 	gs 'stat'
 
 	if $clothingworntype = 'nude':
-		'<b>You need to dress up in order to leave.</b>'
+		'<b>You need to get dressed in order to leave.</b>'
 	else
 		act 'Get back':gt 'leonid', 'hall'
 	end
@@ -139,7 +139,6 @@ if $ARGS[0] = 'secretaryGate':
 	if hour	>= 19:
 		gt 'leonid', 'secretaryEndWorkday'
 	end
-	'<table><tr><td valign="top">'
 	if $clothingworntype = 'nude':
 		'<b>You are naked.</b>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/secretarynaked.jpg"></center>'
@@ -155,9 +154,12 @@ if $ARGS[0] = 'secretaryGate':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/secretarysexy.jpg"></center>'
 		mult = 2
 	end
-	'</td><td valign="top">'
-
-
+	
+	'You are in the office of <<$bName>> <<$bSurname>>. There are three other doors inside the office, one leading to a small <a href="exec:gt ''leonid'', ''officeKitchen''">kitchen</a>, second leading to a conference room and third leading to a <a href="exec:gt ''leonid'', ''toilet''">toilet</a>.'
+	*nl
+	'<a href="exec:gt ''leonid'', ''officeLeonidGate''"><<$bName>> <<$bSurname>></a> is sitting behind his desk, working.'
+	*nl
+	
 	if leoHorny < 0:leoHorny = 0
 		if leoHorny > 100: leoHorny = 100
 	if leoStress < 0:leoStress = 0
@@ -170,22 +172,20 @@ if $ARGS[0] = 'secretaryGate':
 		if paperwork > 100:paperwork = 100
 
 	punishBuildup = (40 * leoHorny + 40 * leoStress + 30 * leoCoffee + 30 * leoComfort) / 100
-
-
-	'You are in the office of <<$bName>> <<$bSurname>>. There are three other doors inside the office, one leading to a small <a href="exec:gt ''leonid'', ''officeKitchen''">kitchen</a>, second leading to a conference room and third leading to a <a href="exec:gt ''leonid'', ''toilet''">toilet</a>.'
-	''
-	'<a href="exec:gt ''leonid'', ''officeLeonidGate''"><<$bName>> <<$bSurname>></a> is sitting behind his desk, working.'
-	''
-	'<<$bName>> - status and needs:'
-	'<b>Overall mood:'+punishBuildup+'</b>'
-	'Horniness: '+leoHorny
-	'Stress: '+leoStress
-	'Coffee: '+leoCoffee
-	'Comfort: '+leoComfort
-	''
-	'Your paperwork: '+paperwork
-	''
-	'</td></tr></table>'
+	
+	!'<table><tr><td valign="top">'
+	!'</td><td valign="top">'
+	!'<<$bName>> - status and needs:'
+	!'<b>Overall mood:'+punishBuildup+'</b>'
+	!'Horniness: '+leoHorny
+	!'Stress: '+leoStress
+	!'Coffee: '+leoCoffee
+	!'Comfort: '+leoComfort
+	!''
+	!'Your paperwork: '+paperwork
+	!''
+	!'</td></tr></table>'
+	
 	if punishBuildup >= 100:
 		act 'Be approched':gt 'leonid', 'doPunish'
 	else
@@ -252,7 +252,6 @@ if $ARGS[0] = 'doLazy':
 	leoComfort += rand (5, 15)
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/lazy'+rand(1, 5)+'.jpg"></center>'
 	'You spend your working time polishing your nails and all the stuff everyone actually thinks secretaries do.'
-	''
 	gs 'stat'
 	act 'Continue':gt 'leonid', 'secretaryGate'
 end
@@ -326,7 +325,7 @@ if $ARGS[0] = 'officeKitchenBringCoffeeNormal':
 end
 
 if $ARGS[0] = 'officeFuck':
-	sexType = rand(1, 2)
+	sexType = rand(1,2)
 	if sexType = 1:
 		'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/pussy'+rand(1, 5)+'.mp4"></video></center>'
 		'<<$bName>> bends you over his desk, pushing the paperwork away.'
@@ -375,7 +374,7 @@ end
 
 if $ARGS[0] = 'askForJob':
 	minut += 2
-	'Sir you know.. I.. I need money. So i thought, maybe, maybe I could work for you..'
+	'Sir you know.. I.. I need money. So I thought, maybe, maybe I could work for you..'
 	'You don''t want me whoring to random men, do you?'
 	''
 	'Hmm, <<$pcs_firstname>>, I was actually already thinking about hiring a secretary.'
@@ -389,7 +388,8 @@ if $ARGS[0] = 'askForJobYes':
 	''
 	'Good.'
 	'Come next working day between 9 and 10.'
-	'Be sure to dress as befits to your role - here, buy some office clothes (he hands you 5000 RUB).'
+	'Be sure to dress as befits to your new role.'
+	'He takes 5000 rubles and hands them to you. Here, buy some office clothes, I need you to at least look the part.'
 	money += 5000
 	leonidSecretary = 1
 	act 'Leave':gt 'leonid', 'office'

+ 163 - 117
locations/mitka.qsrc

@@ -122,97 +122,113 @@ if $ARGS[0] = 'sex_chat':
 	'You greet him, "I''m doing fine, thanks."'
 	'Mitka smiles, "That''s great to hear, <<$pcs_nickname>>.", then he offers, "<<$mitkaInvitation>>"'
 	
-	! Sveta has never had sex with Mitka and Mitka has not seen Sveta nude in the forest multiple times
+	! Sveta has never had sex with Mitka and Mitka has not seen Sveta nude in the forest or river multiple times
 	if npc_QW['A63'] = 0:
 		*nl
 		'Mitka scratches his balls and adds with a grin: "Hey <<$pcs_nickname>>, do you want to have some fun?"'
 		if pcs_vag = 0:
 			if StoryLine = 1:
-				act 'I don''t know. My mother is obsessed with me staying a virgin.':
-					cla		
-					npc_rel['A63'] -= 1
-					pcs_dom += 1
-					gs 'stat'
-					
-					*nl
-					'You turn around and walk away from Mitka. You know it would be fun, but you promised your mother...'
-					act 'Walk away': gt $loc
-				end
-			else
-				act 'I don''t know. I''m still a virgin...':
-					cla
-					npc_rel['A63'] -= 1
-					pcs_dom += 1
-					gs 'stat'
-					
-					*nl
-					'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
-					act 'Walk away': gt $loc
-				end
-			end
-		end
-		if pcs_horny >= 50:
-			act 'Sounds tempting, but only a blowjob.':
-				*clr & cla
-				
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhome.jpg"></center>'
-				*nl
-				'Mitka takes you to '+iif(mitka_first_drink > 1, 'the familiar old trailer','an old trailer')+' in the woods.'
-				'Mitka sits down on a couch as you kneel in front of him. You take his cock out of his pants and start to suck...'
-				
-				npc_rel['A63'] += 5
-				npc_QW['A63'] = 1
-				gs 'boyStat', 'A63'
-				npc_sex['A63'] += 1
-				gs 'arousal', 'bj', 10, 'sub'
-				gs 'stat'
-				
-				act 'Swallow':
-					*clr & cla
-					mitkarand = rand(0,5)
-					if mitkarand = 5:
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum2.jpg"></center>'
-						*nl
-						'Mitka stands up and begins to furiously stroke his cock right in your face.'
-						'Within a minute Mitka is panting hard and suddenly you feel hot cum splattering onto your face and in your mouth.'
-						'You smile up at him and lick your lips, pleased with your efforts.'
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'I don''t know. My mother is obsessed with me staying a virgin. (<<will_cost>> Willpower)':
+						cla		
+						npc_rel['A63'] -= 1
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
 						
-						gs 'cum_call','face','A63',1
-					elseif mitkarand >= 3:
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum3.jpg"></center>'
 						*nl
-						'You bob your head up and down on his cock, trying to cram as much of his cock deep into your mouth. Sometimes you gag as it enters your throat.'
-						'Eventually, you feel Mitka''s cock pulse and a few seconds later your mouth is filled with his salty sperm. You quickly swallow it all down.'
+						'You turn around and walk away from Mitka. You know it would be fun, but you promised your mother...'
+						act 'Walk away': gt $loc
+					end
+				else
+					act 'I don''t know. My mother is obsessed with me staying a virgin. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			else
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'I don''t know. I''m still a virgin. (<<will_cost>> Willpower)':
+						cla
+						npc_rel['A63'] -= 1
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
 						
-						gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-						gs 'cum_call','mouth','A63',1
-						swallow += 1
-					else
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum1.jpg"></center>'
 						*nl
-						'Mitka stands, places his hands on the back of your head and roughly forces you to take his cock deep into your throat.'
-						'Slowly he builds up a rhythm and finally finishes in your mouth. He makes you swallow and lick him clean before removing his cock from your mouth.'
-						
-						gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough'
-						gs 'cum_call','mouth','A63',1
-						sub += 1
-						swallow += 1
+						'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
+						act 'Walk away': gt $loc
 					end
-					gs 'arousal', 'end'
-					gs 'stat'
-
-					act 'Leave': gt $loc
+				else
+					act 'I don''t know. I''m still a virgin. (<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
-		act 'No thanks':
-			cla
-			npc_rel['A63'] -= 1
-			gs 'stat'
+		act 'Sounds tempting, but only a blowjob.':
+			*clr & cla
 			
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhome.jpg"></center>'
 			*nl
-			'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
-			act 'Walk away':gt $loc
+			'Mitka takes you to '+iif(mitka_first_drink > 1, 'the familiar old trailer','an old trailer')+' in the woods.'
+			'Mitka sits down on a couch as you kneel in front of him. You take his cock out of his pants and start to suck...'
+			
+			npc_rel['A63'] += 5
+			npc_QW['A63'] = 1
+			gs 'boyStat', 'A63'
+			npc_sex['A63'] += 1
+			gs 'arousal', 'bj', 10, 'sub'
+			gs 'stat'
+			
+			act 'Swallow':
+				*clr & cla
+				mitkarand = rand(0,5)
+				if mitkarand = 5:
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum2.jpg"></center>'
+					*nl
+					'Mitka stands up and begins to furiously stroke his cock right in your face.'
+					'Within a minute Mitka is panting hard and suddenly you feel hot cum splattering onto your face and in your mouth.'
+					'You smile up at him and lick your lips, pleased with your efforts.'
+					
+					gs 'cum_call','face','A63',1
+				elseif mitkarand >= 3:
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum3.jpg"></center>'
+					*nl
+					'You bob your head up and down on his cock, trying to cram as much of his cock deep into your mouth. Sometimes you gag as it enters your throat.'
+					'Eventually, you feel Mitka''s cock pulse and a few seconds later your mouth is filled with his salty sperm. You quickly swallow it all down.'
+					
+					gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
+					gs 'cum_call','mouth','A63',1
+					swallow += 1
+				else
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum1.jpg"></center>'
+					*nl
+					'Mitka stands, places his hands on the back of your head and roughly forces you to take his cock deep into your throat.'
+					'Slowly he builds up a rhythm and finally finishes in your mouth. He makes you swallow and lick him clean before removing his cock from your mouth.'
+					
+					gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough'
+					gs 'cum_call','mouth','A63',1
+					swallow += 1
+				end
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				act 'Leave': gt $loc
+			end
+		end
+		gs 'willpower', 'bj', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'No thanks (<<will_cost>> Willpower</font>)':
+				cla
+				npc_rel['A63'] -= 1
+				gs 'willpower', 'bj', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				
+				*nl
+				'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
+				act 'Walk away':gt $loc
+			end
+		else
+			act 'No thanks. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	! Sveta is not the boys slut but has had sex with Mitka and she does not know Mira likes Mitka or Mira is the boys slut
 	elseif (npc_QW['A63'] > 0 and npc_QW['A63'] < 10) and (npc_QW['A60'] < 2 or npc_QW['A60'] >= 11):
@@ -244,7 +260,6 @@ if $ARGS[0] = 'sex_chat':
 				if npc_QW['A63'] < 10: npc_QW['A63'] += 1
 				gs 'boyStat', 'A63'
 				npc_sex['A63'] += 1
-				sub += 1
 				gs 'cum_call','vagina','A63',1
 				gs 'arousal', 'vaginal', 10, 'sub'
 				gs 'arousal', 'end'
@@ -253,27 +268,40 @@ if $ARGS[0] = 'sex_chat':
 				act 'Leave': gt $loc
 			end
 			if pcs_vag = 0: 
-				act 'No, I''m still a virgin':
+				gs 'willpower', 'sex', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'No, I''m still a virgin. (<<will_cost>> Willpower)':
+						cla
+						npc_rel['A63'] -= 2
+						gs 'willpower', 'sex', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						
+						*nl
+						'You tell Mitka you are not ready to lose your virginity yet. You know it would be fun, but maybe another time...'
+						
+						act 'Leave': gt $loc
+					end
+				else
+					act 'No, I''m still a virgin. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			end
+			gs 'willpower', 'sex', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'No thanks, not today. (<<will_cost>> Willpower)':
 					cla
 					npc_rel['A63'] -= 2
-					pcs_dom += 1
+					gs 'willpower', 'sex', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					
 					*nl
-					'You tell Mitka you are not ready to lose your virginity yet. You know it would be fun, but maybe another time...'
+					'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
 					
-					act 'Leave': gt $loc
+					act 'Walk away': gt $loc
 				end
-			end
-			act 'No thanks, not today':
-				cla
-				npc_rel['A63'] -= 2
-				gs 'stat'
-				
-				*nl
-				'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
-				
-				act 'Walk away': gt $loc
+			else
+				act 'No thanks, not today. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		elseif mitkarand < 9:
 			'Can you give me a blowjob today?" Mitka asks.'
@@ -321,7 +349,6 @@ if $ARGS[0] = 'sex_chat':
 						
 						gs 'arousal', 'bj', 5, 'sub', 'deepthroat', 'rough'
 						gs 'cum_call','mouth','A63',1
-						sub += 1
 						swallow += 1
 					end
 					gs 'arousal', 'end'
@@ -330,15 +357,22 @@ if $ARGS[0] = 'sex_chat':
 					act 'Leave': gt $loc
 				end
 			end
-			act 'No thanks, not today':
-				cla
-				npc_rel['A63'] -= 2
-				gs 'stat'
-				
-				*nl
-				'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
-				
-				act 'Walk away': gt $loc
+			gs 'willpower', 'bj', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'No thanks, not today. (<<will_cost>> Willpower)':
+					cla
+					npc_rel['A63'] -= 2
+					gs 'willpower', 'bj', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					
+					*nl
+					'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
+					
+					act 'Walk away': gt $loc
+				end
+			else
+				act 'No thanks, not today. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		else
 			'"I want to do anal today. What do you think?" Mitka asks.'
@@ -366,7 +400,6 @@ if $ARGS[0] = 'sex_chat':
 				if npc_QW['A63'] < 10: npc_QW['A63'] += 1
 				gs 'boyStat', 'A63'
 				npc_sex['A63'] += 1
-				sub += 1
 				gs 'cum_call','anus','A63',1
 				gs 'arousal', 'anal', 15, 'sub', 'rough'
 				gs 'arousal', 'end'
@@ -374,28 +407,41 @@ if $ARGS[0] = 'sex_chat':
 				
 				act 'Leave':gt 'gadukino'
 			end
-			if pcs_ass = 0: 
-				act 'No, I''ve never done anal before':
+			if pcs_ass = 0:
+				gs 'willpower', 'anal', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'No, I''ve never done anal before (<<will_cost>> Willpower)':
+						cla
+						npc_rel['A63'] -= 2
+						gs 'willpower', 'anal', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						
+						*nl
+						'You tell Mitka you are not ready to lose your anal virginity yet. You know it would be fun, but maybe another time...'
+						
+						act 'Leave': gt $loc
+					end
+				else
+					act 'No, I''ve never done anal before (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			end
+			gs 'willpower', 'anal', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'No thanks, not today. (<<will_cost>> Willpower)':
 					cla
 					npc_rel['A63'] -= 2
-					pcs_dom += 1
+					gs 'willpower', 'anal', 'resist'
+					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					
 					*nl
-					'You tell Mitka you are not ready to lose your anal virginity yet. You know it would be fun, but maybe another time...'
+					'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
 					
-					act 'Leave': gt $loc
+					act 'Walk away': gt $loc
 				end
-			end
-			act 'No thanks, not today':
-				cla
-				npc_rel['A63'] -= 2
-				gs 'stat'
-				
-				*nl
-				'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
-				
-				act 'Walk away': gt $loc
+			else
+				act 'No thanks, not today. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		end
 	! Sveta is not the boys slut and Sveta knows Mira likes Mitka and Mira is not the boys slut yet

+ 164 - 81
locations/mitkabuh.qsrc

@@ -75,7 +75,7 @@ if $ARGS[0] = 'partyalone':
 			npc_rel['A63'] += rand(0,1)
 			npc_rel['A62'] += rand(0,1)
 			npc_rel['A61'] += rand(0,1)
-			gs 'drugs', 'alcohol', 'vodka', 2
+			gs 'drugs', 'alcohol', 'moonshine', 1
 			gs 'stat'
 			
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drinking.jpg"></center>'
@@ -92,9 +92,22 @@ if $ARGS[0] = 'partyalone':
 
 			act 'Continue drinking':gt 'mitkabuh', 'partyalone'
 		end
-		act 'Leave': mitkabuhday = 0 & minut += 15 & gt 'gadroad'
-	! Sveta is drunk and is a sub or already had sex with Mitka or is the village whore
-	elseif gadriver_gang < 3 and (npc_QW['A63'] > 0 or sub >= 25):
+		gs 'willpower', 'drink', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				mitkabuhday = 0
+				minut += 15
+				gs 'willpower', 'drink', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				
+				gt 'gadroad'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	! Sveta is drunk and already had sex with Mitka or is the village whore
+	elseif npc_QW['A63'] > 0 and gadriver_gang < 3:
 		*clr & cla
 		menu_off = 1
 		if mitkabuhday = 0:
@@ -208,11 +221,28 @@ if $ARGS[0] = 'partywithMira':
 					npc_rel['A62'] += rand(0,1)
 					npc_rel['A61'] += rand(0,1)
 					npc_rel['A60'] += rand(0,1)
-					gs 'drugs', 'alcohol', 'vodka', 2
+					gs 'drugs', 'alcohol', 'moonshine', 1
 					gs 'stat'
 					
 					act 'Continue drinking':gt 'mitkabuh','partywithMira'
 				end
+				gs 'willpower', 'drink', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Leave (<<will_cost>> Willpower)':
+						MiraLoc = 0
+						npc_drunk['A60'] = 0
+						mitkabuhmiraday = 0
+						mitkabuhday = 0
+						minut += 15
+						gs 'willpower', 'drink', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						
+						gt 'gadroad'
+					end
+				else
+					act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
 			else
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/girls_go.jpg"></center>'
@@ -227,8 +257,8 @@ if $ARGS[0] = 'partywithMira':
 	elseif alko >= 10 and mitkabuhday = 0:
 		*clr & cla
 		mitkabuhday = 1
-		! Sveta is the village whore and already had sex with Mitka or is a sub
-		if gadriver_gang < 3 and (npc_QW['A63'] > 0 or sub >= 25):
+		! Sveta already had sex with Mitka or is the village whore
+		if npc_QW['A63'] > 0 and gadriver_gang < 3:
 			if npc_QW['A63'] < 10:
 				gt 'mitkabuh','solo_1to9'
 			elseif npc_QW['A63'] = 10:
@@ -248,18 +278,27 @@ if $ARGS[0] = 'partywithMira':
 			*nl
 			'Mira attempts to pass you another shot glass full of liquor, but you refuse. You have already had too much tonight and are happy to just chat the rest of the night.'
 			if npc_drunk['A60'] < 10:
-				act 'Mira drinks the shot instead':
-					cla
-					minut += 30
-					npc_rel['A63'] += rand(0,1)
-					npc_rel['A62'] += rand(0,1)
-					npc_rel['A61'] += rand(0,1)
-					npc_rel['A60'] += rand(0,1)
-					npc_drunk['A60'] += rand(3,5)
-					gs 'stat'
-					
-					act 'Continue drinking':gt 'mitkabuh','partywithMira'
+				gs 'willpower', 'drink', 'force'
+				if will_cost <= pcs_willpwr:
+					act 'Make Mira drink the shot instead (<<will_cost>> Willpower)':
+						cla
+						minut += 30
+						npc_rel['A63'] += rand(0,1)
+						npc_rel['A62'] += rand(0,1)
+						npc_rel['A61'] += rand(0,1)
+						npc_rel['A60'] += rand(0,1)
+						npc_drunk['A60'] += 5
+						gs 'willpower', 'drink', 'force'
+						gs 'willpower', 'pay', 'force'
+						gs 'stat'
+						
+						act 'Continue drinking':gt 'mitkabuh','partywithMira'
+					end
+				else
+					act 'Make Mira drink the shot instead (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
+				
+				act 'Leave': MiraLoc = 0 & npc_drunk['A60'] = 0 & mitkabuhmiraday = 0 & mitkabuhday = 0 & minut += 15 & gt 'gadroad'
 			else
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/girls_go.jpg"></center>'
@@ -285,9 +324,17 @@ if $ARGS[0] = 'partywithMira':
 				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drinking.jpg"></center>'
 				*nl
-				mirarand = rand(0,1)
-				if mirarand = 0:
-					'Mitka pours some of the brew into a clear plastic shot glass and hands it over to you.'
+				'Mitka pours some of the brew into a clear plastic shot glass and hands it over to you.'
+				act 'Drink the shot yourself':
+					cla
+					minut += 30
+					npc_rel['A63'] += rand(0,1)
+					npc_rel['A62'] += rand(0,1)
+					npc_rel['A61'] += rand(0,1)
+					npc_rel['A60'] += rand(0,1)
+					gs 'drugs', 'alcohol', 'moonshine', 1
+					gs 'stat'
+					
 					'You take the shot glass full of moonshine and quickly gulp it down, you cough and suck in your breath. Mira chats with the boys as they drink as well.'
 					'Mitka looks at you approvingly, "Good shit, right?"'
 					if mitka_first_drink = 1:
@@ -296,18 +343,50 @@ if $ARGS[0] = 'partywithMira':
 					else
 						'"Just as good as the last batch you made!" you reply.'
 					end
-					gs 'drugs', 'alcohol', 'vodka', 2
-					gs 'stat'
+					
+					act 'Continue drinking':gt 'mitkabuh','partywithMira'
+				end
+				gs 'willpower', 'drink', 'force'
+				if will_cost <= pcs_willpwr:
+					act 'Make Mira drink the shot instead (<<will_cost>> Willpower)':
+						cla
+						minut += 30
+						npc_rel['A63'] += rand(0,1)
+						npc_rel['A62'] += rand(0,1)
+						npc_rel['A61'] += rand(0,1)
+						npc_rel['A60'] += rand(0,1)
+						npc_drunk['A60'] += 5
+						gs 'willpower', 'drink', 'force'
+						gs 'willpower', 'pay', 'force'
+						gs 'stat'
+						
+						'Mira examines the glass''s contents for a moment, then gulps down the entire glass with a single toss of her head. Her eyes widen and she coughs a little, sucking in her breath with a smile. You chat with the boys as they drink as well.'
+						
+						act 'Continue drinking':gt 'mitkabuh','partywithMira'
+					end
 				else
-					'Mitka pours some of the brew into a clear plastic shot glass and hands it over to Mira.'
-					'Mira examines the glass''s contents for a moment, then gulps down the entire glass with a single toss of her head. Her eyes widen and she coughs a little, sucking in her breath with a smile. You chat with the boys as they drink as well.'
-					npc_drunk['A60'] += rand(3,5)
-					gs 'stat'
+					act 'Make Mira drink the shot instead (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 				end
-				
+
 				act 'Continue drinking':gt 'mitkabuh','partywithMira'
 			end
-			act 'Leave': MiraLoc = 0 & npc_drunk['A60'] = 0 & mitkabuhmiraday = 0 & mitkabuhday = 0 & minut += 15 & gt 'gadroad'
+			gs 'willpower', 'drink', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					MiraLoc = 0
+					npc_drunk['A60'] = 0
+					mitkabuhmiraday = 0
+					mitkabuhday = 0
+					minut += 15
+					gs 'willpower', 'drink', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					
+					gt 'gadroad'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 		! Sveta is not drunk
 		elseif alko < 10:
 			act 'Drink with the boys':
@@ -318,7 +397,7 @@ if $ARGS[0] = 'partywithMira':
 				npc_rel['A62'] += rand(0,1)
 				npc_rel['A61'] += rand(0,1)
 				npc_rel['A60'] += rand(0,1)
-				gs 'drugs', 'alcohol', 'vodka', 2
+				gs 'drugs', 'alcohol', 'moonshine', 1
 				gs 'stat'
 				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drinking.jpg"></center>'
@@ -335,7 +414,23 @@ if $ARGS[0] = 'partywithMira':
 
 				act 'Continue drinking':gt 'mitkabuh', 'partywithMira'
 			end
-			act 'Leave': MiraLoc = 0 & npc_drunk['A60'] = 0 & mitkabuhmiraday = 0 & mitkabuhday = 0 & minut += 15 & gt 'gadroad'
+			gs 'willpower', 'drink', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					MiraLoc = 0
+					npc_drunk['A60'] = 0
+					mitkabuhmiraday = 0
+					mitkabuhday = 0
+					minut += 15
+					gs 'willpower', 'drink', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					
+					gt 'gadroad'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
 		! Mira is not drunk
 		elseif npc_drunk['A60'] < 10:
 			act 'Watch Mira drink with the boys':
@@ -346,7 +441,7 @@ if $ARGS[0] = 'partywithMira':
 				npc_rel['A61'] += rand(0,1)
 				npc_rel['A60'] += rand(0,1)
 				minut += 30
-				npc_drunk['A60'] += rand(3,5)
+				npc_drunk['A60'] += 5
 				gs 'stat'
 				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drinking.jpg"></center>'
@@ -391,7 +486,6 @@ if $ARGS[0] = 'solo_1to9':
 			if npc_QW['A63'] < 10: npc_QW['A63'] += 1
 			gs 'boyStat', 'A63'
 			npc_sex['A63'] += 1
-			sub += 1
 			gs 'cum_call','vagina','A63',1
 			gs 'arousal', 'vaginal', 20, 'sub'
 			gs 'arousal', 'end'
@@ -425,7 +519,6 @@ if $ARGS[0] = 'solo_1to9':
 			gs 'boyStat', 'A63'
 			npc_sex['A63'] += 1
 			gs 'arousal', 'bj', 10, 'sub'
-			sub += 1
 			gs 'stat'
 			
 			act 'Make him cum':
@@ -504,7 +597,6 @@ if $ARGS[0] = 'solo_1to9':
 			if npc_QW['A63'] < 10: npc_QW['A63'] += 1
 			gs 'boyStat', 'A63'
 			npc_sex['A63'] += 1
-			sub += 1
 			gs 'cum_call','anus','A63',1
 			gs 'arousal', 'anal', 15, 'sub', 'rough'
 			gs 'arousal', 'end'
@@ -557,7 +649,6 @@ if $ARGS[0] = 'solo_10':
 			npc_QW['A63'] = 11
 			gs 'boyStat', 'A61'
 			npc_sex['A61'] += 1
-			sub += 2
 			if mesec = 0:
 				gs 'cum_call','vagina','A61',1
 				gs 'arousal', 'vaginal', 10, 'sub'
@@ -582,51 +673,48 @@ if $ARGS[0] = 'solo_10':
 				end
 			end
 		end
-		if pcs_dom > 0:
-			act 'Protest':
+		act 'Protest':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
+			*nl
+			'You refuse, drunkenly trying to fight off the advancing Kolyamba while barely standing on your feet.'
+			'Your struggles piss Mitka off, who grabs you by the arm and leads you '+iif(sunWeather=1,'inside the trailer','into the bedroom of the trailer')+'.'
+			'Mitka whispers in your ear, "You want my dick so bad then you can have it this time. But, next time you will do as I say. Understand?"'
+			
+			act 'Moan in affirmation':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexnopublic.jpg"></center>'
 				*nl
-				'You refuse, drunkenly trying to fight off the advancing Kolyamba while barely standing on your feet.'
-				'Your struggles piss Mitka off, who grabs you by the arm and leads you '+iif(sunWeather=1,'inside the trailer','into the bedroom of the trailer')+'.'
-				'Mitka whispers in your ear, "You want my dick so bad then you can have it this time. But, next time you will do as I say. Understand?"'
+				'Mitka roughly rips all your clothes off, bends you over the bed and begins mercilessly pounding you. You''ve never seen him this way before, maybe everyone is just more drunk than usual and this will all blow over tomorrow.'
+				'All you can manage are moans as Mitka fucks you. They are so loud you are sure everyone else can hear you outside the bedroom. You can''t help but think to yourself that the other guys may start treating you differently after tonight.'
+				'He cums inside of you and then goes back to drinking with Kolyamba and Vasyan, leaving you naked on the bed. After a little while you sober up enough to get dressed and go sit back by the boys.'
 				
-				act 'Moan in affirmation':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexnopublic.jpg"></center>'
-					*nl
-					'Mitka roughly rips all your clothes off, bends you over the bed and begins mercilessly pounding you. You''ve never seen him this way before, maybe everyone is just more drunk than usual and this will all blow over tomorrow.'
-					'All you can manage are moans as Mitka fucks you. They are so loud you are sure everyone else can hear you outside the bedroom. You can''t help but think to yourself that the other guys may start treating you differently after tonight.'
-					'He cums inside of you and then goes back to drinking with Kolyamba and Vasyan, leaving you naked on the bed. After a little while you sober up enough to get dressed and go sit back by the boys.'
-					
-					npc_rel['A63'] += 1
-					npc_rel['A61'] -= 5
-					npc_QW['A63'] = 11
-					gs 'boyStat', 'A63'
-					npc_sex['A63'] += 1
-					sub += 5
-					if mesec = 0:
-						gs 'cum_call','vagina','A63',1
-						gs 'arousal', 'vaginal', 10, 'sub', 'rough'
+				npc_rel['A63'] += 1
+				npc_rel['A61'] -= 5
+				npc_QW['A63'] = 11
+				gs 'boyStat', 'A63'
+				npc_sex['A63'] += 1
+				if mesec = 0:
+					gs 'cum_call','vagina','A63',1
+					gs 'arousal', 'vaginal', 10, 'sub', 'rough'
+				else
+					gs 'cum_call','anus','A63',1
+					gs 'arousal', 'anal', 10, 'sub', 'rough'
+				end
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				if sunWeather = 1:
+					if MiraLoc ! 5:
+						act 'Sit down outside':gt 'mitkabuh','partyalone'
 					else
-						gs 'cum_call','anus','A63',1
-						gs 'arousal', 'anal', 10, 'sub', 'rough'
+						act 'Sit down outside':gt 'mitkabuh','partywithMira'
 					end
-					gs 'arousal', 'end'
-					gs 'stat'
-
-					if sunWeather = 1:
-						if MiraLoc ! 5:
-							act 'Sit down outside':gt 'mitkabuh','partyalone'
-						else
-							act 'Sit down outside':gt 'mitkabuh','partywithMira'
-						end
+				else
+					if MiraLoc ! 5:
+						act 'Sit down in the trailer':gt 'mitkabuh','partyalone'
 					else
-						if MiraLoc ! 5:
-							act 'Sit down in the trailer':gt 'mitkabuh','partyalone'
-						else
-							act 'Sit down in the trailer':gt 'mitkabuh','partywithMira'
-						end
+						act 'Sit down in the trailer':gt 'mitkabuh','partywithMira'
 					end
 				end
 			end
@@ -660,7 +748,6 @@ if $ARGS[0] = 'solo_11andup_1boy':
 			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			npc_sex[$boy[0]] += 1
 			gs 'arousal', 'bj', 10, 'sub'
-			sub += 1
 			gs 'stat'
 			
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpublic.jpg"></center>'
@@ -725,7 +812,6 @@ if $ARGS[0] = 'solo_11andup_1boy':
 			else
 				gs 'arousal', 'anal', 20, 'sub'
 			end
-			sub += 1
 			gs 'stat'
 			
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexpublic.jpg"></center>'
@@ -796,8 +882,7 @@ if $ARGS[0] = 'solo_11andup_2boys':
 			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			npc_sex[$boy[0]] += 1
 			npc_sex[$boy[1]] += 1
-			gs 'arousal', 'bj', 10, 'sub'			
-			sub += 1
+			gs 'arousal', 'bj', 10, 'sub'
 			gang += 1
 			gs 'stat'
 			
@@ -873,7 +958,6 @@ if $ARGS[0] = 'solo_11andup_2boys':
 			else
 				gs 'arousal', 'anal', 10, 'sub', 'rough'
 			end
-			sub += 1
 			gang += 1
 			gs 'stat'
 			
@@ -945,7 +1029,6 @@ if $ARGS[0] = 'solo_11andup_3boys':
 		npc_sex['A62'] += 1
 		gs 'boyStat', 'A61'
 		npc_sex['A61'] += 1
-		sub += 1
 		gang += 1
 		gs 'arousal', 'hj', 5, 'sub', 'gangbang'
 		if mesec = 0:

+ 18 - 10
locations/mitkabuh_group.qsrc

@@ -116,12 +116,28 @@ if $ARGS[0] = 'partywithMira':
 			'"Just as good as the last batch you made!" you reply.'
 
 			npc_drunk['A60'] += 5
-			gs 'drugs', 'alcohol', 'moonshine'
+			gs 'drugs', 'alcohol', 'moonshine', 1
 			gs 'stat'
 			
 			act 'Continue drinking':gt 'mitkabuh_group','partywithMira'
 		end
-		act 'Leave': MiraLoc = 0 & npc_drunk['A60'] = 0 & mitkabuhmiraday = 0 & mitkabuhday = 0 & minut += 15 & gt 'gadroad'
+		gs 'willpower', 'drink', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Leave (<<will_cost>> Willpower)':
+				MiraLoc = 0
+				npc_drunk['A60'] = 0
+				mitkabuhmiraday = 0
+				mitkabuhday = 0
+				minut += 15
+				gs 'willpower', 'drink', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				
+				gt 'gadroad'
+			end
+		else
+			act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
 	end
 end
 
@@ -141,7 +157,6 @@ if $ARGS[0] = 'group_sex':
 		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
 		npc_sex[$boy[0]] += 1
 		npc_sex[$boy[1]] += 1
-		sub += 1
 		gang += 1
 		gs 'arousal', 'vaginal', 10, 'sub', 'gangbang'
 		gs 'arousal', 'bj', 10, 'sub', 'gangbang'
@@ -166,7 +181,6 @@ if $ARGS[0] = 'group_sex':
 			npc_rel[$boy[2]] += 1
 			npc_rel['A60'] += 1
 			npc_sex[$boy[2]] += 1
-			sub += 1
 			gang += 1
 			gs 'arousal', 'bj', 10, 'sub', 'gangbang'
 			gs 'stat'
@@ -241,7 +255,6 @@ if $ARGS[0] = 'group_bj':
 			if npc_QW['A60'] < 15: npc_QW['A60'] += 1
 			npc_sex[$boy[0]] += 1
 			npc_sex[$boy[1]] += 1
-			sub += 1
 			gang += 1
 			gs 'arousal', 'hj', 10, 'sub', 'gangbang'
 			gs 'arousal', 'bj', 10, 'sub', 'gangbang'
@@ -281,7 +294,6 @@ if $ARGS[0] = 'group_bj':
 					npc_rel[$boy[2]] += 1
 					npc_rel['A60'] += 1
 					npc_sex[$boy[2]] += 1
-					sub += 1
 					gang += 1
 					gs 'arousal', 'bj', 10, 'sub', 'gangbang'
 					gs 'stat'
@@ -372,7 +384,6 @@ if $ARGS[0] = 'group_bj':
 				if npc_QW['A60'] < 15: npc_QW['A60'] += 1
 				npc_sex[$boy[1]] += 1
 				npc_sex[$boy[2]] += 1
-				sub += 1
 				gang += 1
 				gs 'arousal', 'hj', 10, 'sub', 'gangbang'
 				gs 'arousal', 'bj', 10, 'sub', 'gangbang'
@@ -455,7 +466,6 @@ if $ARGS[0] = 'group_show':
 			npc_rel['A60'] += 1
 			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-			sub += 1
 			gs 'stat'
 			
 			mitkapicrand = rand(0,3)
@@ -499,7 +509,6 @@ if $ARGS[0] = 'group_show':
 			npc_rel['A60'] += 1
 			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-			sub += 1
 			gs 'stat'
 			
 			if sunWeather = 1:
@@ -619,7 +628,6 @@ if $ARGS[0] = 'group_anal':
 		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
 		npc_sex[$boy[0]] += 1
-		sub += 1
 		gs 'cum_call','anus',$boy[0],1
 		gs 'arousal', 'anal', 10, 'sub', 'rough', 'deepthroat'
 		gs 'arousal','end'

+ 8 - 49
locations/nill.qsrc

@@ -1,53 +1,12 @@
 # nill
-inFight = 0
-stun = 0
-stunV = 0
-tuman = 0
-tumanV = 0
-klon = 0
-klonV = 0
-blood = 0
-bloodV = 0
-defence = 0
-defenceV = 0
-izanagiV = 0
-round = 0
-heartV = 0
-hodtimeV = 0
-hodtime = 0
-damTip = 0
-damTipV = 0
-unmaterialV = 0
-unmaterial = 0
-defenceM = 0
-defenceW = 0
-defenceActPar = 0
-defenceActParM = 0
-defenceAct = 0
-defenceActM = 0
-defenceMV = 0
-defenceWV = 0
-defenceActParV = 0
-defenceActParMV = 0
-defenceActV = 0
-defenceActMV = 0
-defAtk = 0
-defAtkV = 0
-defAtkM = 0
-defAtkMV = 0
-damTipM = 0
-damTipMV = 0
-kisamePro = 0
-poisonAV = 0
-SasoriBody = 0
-tobiPic = 0
-kisamePic = 0
-sasoriPic = 0
-konanPic = 0
-hidanPic = 0
-barierV = 0
-hidanAtk = 0
-hidanPic = 0
+
+killvar 'fightAtk'
+killvar '$fightAtk'
+killvar '$fightAtk_Type'
+killvar '$fightAtk_TargetType'
+killvar 'fightAtk_TargetNumber'
+killvar 'fightAtk_AttackerNumber'
+
 
 --- nill ---------------------------------
 

+ 4 - 4
locations/park.qsrc

@@ -162,7 +162,7 @@ if $ARGS[0] = 'start':
 						BonusDefV = 0
 						!!Programme of Action
 						program = 1
-						RapistFight = 1
+						fightEnding = 8
 
 						if spellavtoklon = 1:klon = 3
 						if spellbefshild = 1:defence = 500}
@@ -586,7 +586,6 @@ if $ARGS[0] = 'prost':
 			BonusDefV = 0
 			!!Programme of Action
 			program = 0
-			prostitutFight = 1
 
 			if spellavtoklon = 1:klon = 3
 			if spellbefshild = 1:defence = 500}
@@ -608,6 +607,7 @@ if $ARGS[0] = 'prost':
 			opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 			opp_willpwr[0] = 50
 			opp_shoot[0] = 10
+			fightEnding = 4
 
 			gt 'fight', 'start'
 		end
@@ -656,7 +656,6 @@ if $ARGS[0] = 'prost':
 					BonusDefV = 0
 					!!Programme of Action
 					program = 0
-					prostitutFight = 2
 
 					if spellavtoklon = 1:klon = 3
 					if spellbefshild = 1:defence = 500}
@@ -678,6 +677,7 @@ if $ARGS[0] = 'prost':
 					opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 					opp_willpwr[0] = 100
 					opp_shoot[0] = 10
+					fightEnding = 5
 
 					gt 'fight', 'start'
 				end
@@ -751,7 +751,6 @@ if $ARGS[0] = 'prost':
 					BonusDefV = 0
 					!!Programme of Action
 					program = 0
-					prostitutFight = 3
 
 					if spellavtoklon = 1:klon = 3
 					if spellbefshild = 1:defence = 500}
@@ -772,6 +771,7 @@ if $ARGS[0] = 'prost':
 					opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 					opp_willpwr[0] = 50
 					opp_shoot[0] = 10
+					fightEnding = 6
 
 					gt 'fight', 'start'
 				end

+ 1 - 1
locations/parkivent.qsrc

@@ -67,7 +67,7 @@ if $ARGS[0] = '1':
 			BonusDefV = 0
 			!!Programme of Action
 			program = 0
-			RapistFight = 1
+			fightEnding = 8
 
 			if spellavtoklon = 1:klon = 3
 			if spellbefshild = 1:defence = 500}

+ 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'

+ 2 - 1
locations/preCUST.qsrc

@@ -554,7 +554,8 @@ if $ARGS[0] = 'Done':
 	gs 'din_van'
 	gs 'din_bad'
 	gs 'dinSex'
-	gs 'dinBoroda'
+	!! KEY! I merged 'dinBoroda' with 'clener' and removed the dynamics. This line was at the end of dinBoroda, so I moved it here just in case. Sicaa
+	rikudootvet = 1415
 	gs 'BanSexType'
 
 	gs 'outdoors', 'weather'

+ 6 - 2
locations/preTG.qsrc

@@ -268,6 +268,9 @@ if $ARGS[0] = 'otelPRE':
 										pcs_intel = 50
 										pcs_sprt = 100
 										pcs_react = 50
+										pcs_kick = 20
+										pcs_punch = 20
+										pcs_jab = 20
 										pcs_health = pcs_vital * 10
 										pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
 										pcs_mana = (pcs_intel * pcs_magik) + pcs_vital * 5
@@ -299,8 +302,7 @@ if $ARGS[0] = 'otelPRE':
 											BonusAtakV = 0
 											BonusDefV = 0
 											!!Programme of Action
-											program = 0
-											jugoFight = 1}
+											program = 0}
 											gs 'fight','initFight'
 
 											$opp_name[0] = 'Gustav'
@@ -318,6 +320,8 @@ if $ARGS[0] = 'otelPRE':
 											opp_health[0] = (opp_vital * 10 + opp_stren * 5)
 											opp_willpwr[0] = 50
 											opp_shoot[0] = 100
+											!!To set the ending text/code
+											fightEnding = 1
 
 											act 'Fight': gt 'fight', 'start'
 										end

+ 1 - 1
locations/sexm.qsrc

@@ -846,7 +846,6 @@ if $ARGS[0] = 'gangrape':
 		BonusDefV = 0
 		!!Programme of Action
 		program = 0
-		gangrapeFight = 1
 
 		if spellavtoklon = 1:klon = 3
 		if spellbefshild = 1:defence = 500}
@@ -867,6 +866,7 @@ if $ARGS[0] = 'gangrape':
 		opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 		opp_willpwr[0] = 100
 		opp_shoot[0] = 100
+		fightEnding = 11
 
 		gt 'fight', 'start'
 	end

+ 2 - 2
locations/stallion.qsrc

@@ -58,8 +58,7 @@ if $ARGS[0] = 'fight':
 		!!Programme of Action
 		program = 0
 		if spellavtoklon = 1:klon = 3
-		if spellbefshild = 1:defence = 500
-		stallionfight = 1}
+		if spellbefshild = 1:defence = 500}
 		gs 'fight','initFight'
 
 		$opp_name[0] = 'Naked Man'
@@ -77,6 +76,7 @@ if $ARGS[0] = 'fight':
 		opp_health[0] = (opp_vital * 10 + opp_stren * 5)
 		opp_willpwr[0] = 100
 		opp_shoot[0] = 10
+		fightEnding = 13
 
 		gt 'fight', 'start'
 	end

+ 8 - 8
locations/street_event.qsrc

@@ -484,7 +484,6 @@ if $ARGS[1] = 'main':
 			BonusDefV = 0
 			!!Programme of Action
 			program = 0
-			RapistFight = 1
 			if spellavtoklon = 1:klon = 3
 			if spellbefshild = 1:defence = 500}
 			gs 'fight','initFight'
@@ -504,6 +503,7 @@ if $ARGS[1] = 'main':
 			opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 			opp_willpwr[0] = 100
 			opp_shoot[0] = 100
+			fightEnding = 8
 
 			gt 'fight', 'start'
 		end
@@ -599,11 +599,6 @@ if $ARGS[1] = 'main':
 				BonusDefV = 0
 				!!Programme of Action
 				program = 0
-				if rand(0,10) < 5:
-					RapistFight = 1
-				else
-					ThiefFight = 1
-				end
 
 				if spellavtoklon = 1:klon = 3
 				if spellbefshild = 1:defence = 500}
@@ -624,6 +619,11 @@ if $ARGS[1] = 'main':
 				opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 				opp_willpwr[0] = 100
 				opp_shoot[0] = 100
+				if rand(0,10) < 5:
+					fightEnding = 8
+				else
+					fightEnding = 9
+				end
 
 				gt 'fight', 'start'
 			end
@@ -676,7 +676,6 @@ if $ARGS[1] = 'main':
 				BonusDefV = 0
 				!!Programme of Action
 				program = 0
-				ThiefFight = 1
 				if spellavtoklon = 1:klon = 3
 				if spellbefshild = 1:defence = 500}
 				'<<$streetev_title>>'
@@ -699,6 +698,7 @@ if $ARGS[1] = 'main':
 				opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 				opp_willpwr[0] = 100
 				opp_shoot[0] = 100
+				fightEnding = 9
 
 				act 'Fight':gt 'fight', 'start'
 			end
@@ -1323,7 +1323,6 @@ if $ARGS[1] = 'main':
 							BonusDefV = 0
 							!!Programme of Action
 							program = 0
-							BitchFight = 1
 
 							if spellavtoklon = 1:klon = 3
 							if spellbefshild = 1:defence = 500}
@@ -1344,6 +1343,7 @@ if $ARGS[1] = 'main':
 							opp_health[0] = (opp_vital[0] * 10 + opp_stren[0] * 5)
 							opp_willpwr[0] = 100
 							opp_shoot[0] = 100
+							fightEnding = 14
 
 							gt 'fight', 'start'
 						end

+ 5 - 6
locations/succubus.qsrc

@@ -106,23 +106,22 @@ if $ARGS[0] = 'RapistFight':
 	act 'Continue':
 		cla
 		scrand = rand(0,3)
-		if RapistFight = 1 and scfwon = 1:
+		if fightEnding = 8 and scfwon = 1:
 			scrand -= 1
 			scfwon = 0
-			RapistFight = 0
-			ThiefFight = 0
+			fightEnding = 0
 			if rikudo > 10:rikudo += 100
 			pcs_dom += 1
 			Win += 1
-		elseif RapistFight = 1:
-			RapistFight = 0
-			ThiefFight = 0
+		elseif fightEnding = 8:
+			fightEnding = 0
 			SUB += 1
 			Loss += 1
 			if rikudo > 10:rikudo -= 10
 		else
 			scrand -= 1
 			scfwon = 0
+			fightEnding = 0
 		end
 		if scrand < succublvl:
 			scfeed = succublvl + rand(1,4)

+ 171 - 135
locations/train.qsrc

@@ -1,6 +1,5 @@
 # train
 
-!!destination 3
 if $ARGS[0] = 'communal':
 	*clr & cla
 	$menu_loc = 'train'
@@ -134,7 +133,7 @@ if $ARGS[0] = 'communal_village':
 	$metka = 'village'
 	minut += 10
 	menu_off = 1
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
 	'After 10 minutes, the train stops at the small station near the village of Gadukino.'
@@ -150,7 +149,7 @@ if $ARGS[0] = 'communal_oldtown':
 	minut += 20
 	menu_off = 1
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
 	'After 20 minutes, the train stops at old platform by the old town of Pushkin. Famous for its extensive park and old historic buildings, the locals are known to be eccentric but that adds to the charm.'
@@ -166,14 +165,13 @@ if $ARGS[0] = 'communal_pavlovsk':
 	minut += 25
 	menu_off = 1
 	if rand(1, 100) <= 20: gt 'train_incidental', 'events'
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
 	'After 5 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': gt 'pavtrainhall', 'platform'
 end
 
-!!destination 4
 if $ARGS[0] = 'village':
 	$loc = 'train'
 	$metka = 'village'
@@ -284,8 +282,6 @@ if $ARGS[0] = 'village_centre':
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
 	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
-	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
-	if rand(1, 100) <= 20: gt 'train', 'events'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/cityplat.jpg" ></center>'
 	'After 25 minutes, the train stops at the St. Petersburg city center station. The large office blocks and shopping centers fill your view.'
 	act 'Get off the train':
@@ -302,8 +298,6 @@ if $ARGS[0] = 'village_ind':
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
 	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
-	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
-	if rand(1, 100) <= 20: gt 'train', 'events'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/indusplat.jpg" ></center>'
 	'After 20 minutes, the train stops at the St. Petersburg city industrial area station.'
 	act 'Get off the train':
@@ -317,9 +311,8 @@ if $ARGS[0] = 'village_communal':
 	$metka = 'communal'
 	minut += 10
 	menu_off = 1
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
-	if rand(1, 100) < 20: gt 'train', 'events'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/oldplat.jpg" ></center>'
 	'After 10 minutes you arrive at an old railway platform near the communal village.'
 	act 'Get off the train':
@@ -333,9 +326,8 @@ if $ARGS[0] = 'village_oldtown':
 	$metka = 'oldtown'
 	minut += 10
 	menu_off = 1
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
-	if rand(1, 100) < 20: gt 'train', 'events'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
 	'After 10 minutes, the train stops at old platform by the old town of Pushkin. Famous for its extensive park and old historic buildings, the locals are known to be eccentric but that adds to the charm.'
 	act 'Get off the train':
@@ -353,7 +345,7 @@ if $ARGS[0] = 'village_pavlovsk':
 	minut += 15
 	menu_off = 1
 	if rand(1, 100) <= 20: gt 'train_incidental', 'events'
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
 	'After 15 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.'
@@ -363,7 +355,6 @@ if $ARGS[0] = 'village_pavlovsk':
 	end
 end
 
-!!destination 5
 if $ARGS[0] = 'oldtown':
 	*clr & cla
 	$menu_loc = 'train'
@@ -514,7 +505,7 @@ if $ARGS[0] = 'oldtown_village':
 	$metka = 'village'
 	minut += 10
 	menu_off = 1
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
 	'After 10 minutes, the train stops at the small station near the village of Gadukino.'
@@ -530,7 +521,7 @@ if $ARGS[0] = 'oldtown_pavlovsk':
 	minut += 5
 	menu_off = 1
 	if rand(1, 100) <= 20: gt 'train_incidental', 'events'
-	if rand(1, 100) < 20: gt 'train', 'events'
+	if rand(1, 100) <= 20: gt 'train', 'events'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
 	'After 5 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.'
@@ -540,9 +531,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 +544,6 @@ if $ARGS[0] = 'events':
 	end
 end
 
-!!event Weed
 if $ARGS[0] = 'weed':
 	train_event = 1
 	menu_off = 1
@@ -573,56 +560,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 +587,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 +710,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 +798,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 +820,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 +886,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 +967,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 +1060,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 +1084,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 +1134,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 +1152,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 +1166,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 +1176,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

+ 18 - 7
locations/train_incidental.qsrc

@@ -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:
@@ -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.'
@@ -399,7 +407,7 @@ if $ARGS[0] = 'breastfeedthebaby':
 							if tits <=4:
 								'He wipes his mouth off and looks at you: They don''t look like it, but there quiet the amount of milk inside your breasts...'
 							else
-								'He wipes his mouth off and looks at you: There is quiet the amount of milk inside your breasts...'
+								'He wipes his mouth off and looks at you: There is quite the amount of milk inside your breasts...'
 							end
 						else
 							if tits <=4:
@@ -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

Some files were not shown because too many files changed in this diff