[edit] willpower seeding

locations/webcam_site.qsrc

@@ -9,9 +9,14 @@ if $args[0] = 'start':
 	'<center>Video chat with the best girls online!</center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/computer/webcam/webcam.jpg"></center>'
 	act 'Logout': gt 'Komp', 'start'
-	if $webcam_name = 0:
-		'<center>If you are beautiful and you want to earn a little revealing itself, you need to have a webcam and go through a simple registration.</center>'
-		act 'Register': dynamic $webcam_rega
+	gs 'willpower', 'exhib', 'self', 'hard'
+	if $webcam_name = 0 and will_cost <= pcs_willpwr:
+		'<center>If you are beautiful and you want to earn a little, revealing yourself, you need to have a webcam and go through a simple registration.</center>'
+		act 'Register (<<will_cost>> Willpower)': dynamic $webcam_rega
+		gs 'willpower', 'pay', 'self'
+		gs 'stat'
+	elseif will_cost > pcs_willpwr:
+		act 'Register (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to register online.</font>.'
 	else
 		if $webcam_name > 0: '<center>Your username: <<$webcam_name>></center>' 
 		if $webcam_name > 0: '<center><a href="exec: dynamic $webcam_stat">View your statistics</a></center>'
@@ -134,7 +139,7 @@ $webcam_show = {
 	if show_counter = 4:
 		*clr
 		'<center><video autoplay loop src="images/shared/accessories/computer/webcam/end'+rand(1,2)+'.mp4"></video></center>'
-		'You have already greatly so tired. And the viewers need to take a breath after your super-duper show. It''s time to call it a day.'
+		'You are already super tired and the viewers need to take a breather, after your super-duper show. It''s time to call it a day.'
 
 		
 		'You collected <<my_show_tip_all>> <b>₽</b> during today''s show.'
@@ -159,7 +164,7 @@ $webcam_show = {
 		gs'stat'
 		*clr
 		'<center><video autoplay loop src="images/shared/accessories/computer/webcam/show'+rand(5,7)+'.mp4" ></video></center>'
-		'Show must go on!'
+		'The show must go on!'
 		
 		'You have already collected <<my_show_tip_all>> <b>₽</b> for the show.'
 		
@@ -519,7 +524,7 @@ $webcam_show = {
 !---------Sex - Vasya---------!
 !------------------------------!
 		if $loc='shulga_room' and npc_rel['A11'] >= 100 and week >= 6 and hour >= 15 and vgape < 3 and agape < 3 and pcs_vag >= 1 and my_show_sex = 0:
-			act 'Call Vasya and arrange sex show':
+			act 'Call Vasya and arrange a sex show':
 				gs'stat'
 				*clr
 				'<center><video autoplay loop src="images/shared/accessories/computer/webcam/sex'+rand(1,5)+'.mp4" ></video></center>'

locations/zsoft_gopskverGorSlut.qsrc

@@ -110,7 +110,15 @@ if $ARGS[0] = '1':
 	'You just want a nice, cold beer and decide to take the initiative. You ask them: "Come on boys, why so rude? Surely you''ll give a nice lady a beer?" in a playful tone, taking a seductive pose and giving them your most <<$text_sveta_obol>> smile. The guys look and whisper some things, but <<$shultextrand33>> quickly grins and beckons you to come closer.' 
 	'You shake your hips and teasingly lick your parched <<$liptalk3>>, and for a second you wonder if you''re laying it on too thick as you approach the three guys. You can feel your mouth water when you see the cold beer they''re reaching out to you though.'
 	'<<$shultextrand33>> says <<$shultextrand6>>: "<<$shul_text_byh>>"'
-	act 'Leave':gt 'gskver', 'start'
+	gs 'willpower', 'misc', 'resist'
+	if will_cost <= pcs_willpwr:
+		act 'Leave (<<will_cost>> Willpower)':
+		*clr & cla
+		gs 'willpower', 'pay', 'resist'
+		gs 'stat'
+	gt 'gskver', 'start'
+	else
+		act 'Leave (<font color="red"><<will_cost>> Willpower </font>)': '<br><font color="red"> You don''t have enough willpower to leave the boys.</font>'
 	act 'Have a beer with the guys':gt'zsoft_gopskverGorSlut','2'
 end
 
@@ -172,9 +180,14 @@ if $ARGS[0] = '2':
 	r_event_p=rand(1,100)
 	if r_event_p <= 15 and alko < 6:'The guys suggest: "Hey <<$pcs_nickname>>, show us your tits!" (<a href="exec:gt ''zsoft_gopskverGorSlut'',''siski''">Show them.</a>)'
 
-	if alko<6:act 'Leave':gt 'gskver', 'start'
-
-	if alko<6:act 'Drink some more with the guys':gt'zsoft_gopskverGorSlut','2'
+	gs 'willpower', 'drink', 'resist', 'hard'
+	!!Removed alko<6 from the 'leave' action below. 	
+	if will_cost <= pcs_willpwr:
+		act 'Leave (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'gskver', 'start'
+	elseif will_cost > pcs_willpwr:
+		act 'Leave (<font color="red"><<will_cost>> Willpower</font>': '<br><font color="red">You don''t have enough willpower to leave.</font>'
+	if alko<6: act 'Drink some more with the guys': gt'zsoft_gopskverGorSlut','2'
+		
 	act 'Strike a sexy pose':
 		cls
 		minut += 2
@@ -379,11 +392,21 @@ if $ARGS[0] = '2':
 			You just want the torture to stop, and nod meekly. The guys pull you towards the bench, and pull you over it so your knees rest on the seat. Vasily takes place behind the bench and pulls the gag from your mouth, replacing it with his cock.
 			With your spirit broken from the rough treatment, you don''t know any better but to just open your mouth and let him in. Vasily gladly accepts your unspoken invitation, and immediately shoves his cock deeper down your throat and begins to fuck your mouth. It''s a little hard to breathe at first, but after a while you get into the rhythm and just let him fuck your throat while your saliva runs down your chin. Then he pulls his cock from your mouth and sits down on the bench, next to his friends and tells you: "Alright... that was fun, but there''s no reason why we should do all the work. Your turn now, <<$pcs_nickname>>. Make it good."'
 
+			gs 'willpower', 'misc', 'resist', 'hard'
 			rndpsos=rand(1,100)
 			if rndpsos>15:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/sex/group/oral/o'+rand(1,33)+'.jpg"></center>
 			<<$gop_grup_oral_text>>'
 			if rndpsos<=15:'<<$gop_grup_event>>'
-			if rndpsos<=15: act 'Run away from them':gt 'gskver', 'start'	
+			if rndpsos<=15 and will_cost <= pcs_willpwr: 
+				act 'Run away from them (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+			gt 'gskver', 'start'
+			
+			else
+				act 'Run away from them (<font color="red"><will_cost>> Willpower)': '<br><font color="red">You don''t have enough willpower to run away from them.</font>'
+				
 			if rndpsos>15:	
 				act 'Let them do what they want':
 					cls
@@ -444,14 +467,19 @@ if $ARGS[0] = 'piss':
 		act 'Go to the police station':schtraf = 500 & minut += 5 & katalkinNoexit = 1 & gt'katalkin'
 		act 'Say you can''t afford the fine':
 			*clr & cla
-			gs'stat'
+			gs 'willpower', 'bj', 'self'
+			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/gop/pol2.jpg"></center>'
 			'You look at the policeman sadly and say: "I''m sorry sir, I can''t afford to pay that fine..."'
 			'One of the policemen says: "That is very unfortunate, but then we''ll have to stick to the protocol. We''ll take you to the police station, where we''ll fill out the documents and lock you up until someone in your family is willing to come pay the fine for you."'
 			'You don''t want that! Everyone in your family would know what you did if they called home! There''s probably something you could do, to get them to forget about your infraction...'
+			
 			act 'Go to the police station':schtraf = 500 & minut += 5 & katalkinNoexit = 1 & gt'katalkin'
-			act 'Give the policemen a blowjob':
+			
+			if will_cost <= pcs_willpwr:
+			act 'Persuade the policemen with a blowjob (<<will_cost>> Willpower)':
 				*clr & cla
+				gs 'willpower', 'pay', 'self'
 				gs 'npcgeneratec', 0, 'Policeman', rand(18,38)
 				gs 'boyStat', $npclastgenerated
 				pcs_horny += 5
@@ -478,6 +506,9 @@ if $ARGS[0] = 'piss':
 				'You hear them laugh as they walk away, while you wipe the cum from your eyes. They might have humiliated you a little, but at least no one else will know!'
 				act 'Leave':gt 'gskver', 'start'
 				act 'Return to the guys':gt'zsoft_gopskverGorSlut','2'
+			elseif will_cost > pcs_willpwr:
+				act 'Persuade the policemen with a blowjob (<font color="red"><<will_cost>> Willpower)': '<br><font color="red">You don''t have enough willpower to persuade the policeman.</font>'
+						
 			end
 		end
 	}