Browse Source

[fixed] updated willpower

julzor 5 years ago
parent
commit
05b6ea3ae3
4 changed files with 81 additions and 75 deletions
  1. 1 1
      locations/ParChurch.qsrc
  2. 5 5
      locations/ParChurch2.qsrc
  3. 72 66
      locations/pavaptcourtev.qsrc
  4. 3 3
      locations/willpower.qsrc

+ 1 - 1
locations/ParChurch.qsrc

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

+ 5 - 5
locations/ParChurch2.qsrc

@@ -235,7 +235,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to give the father a hand job (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 			end
 			act 'Finish':
@@ -298,7 +298,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to give the father a blow job (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 			end
 			act 'Finish':
@@ -361,7 +361,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to let the father fuck your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 			end
 			act 'Finish':
@@ -424,7 +424,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to let the father fuck you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 			end
 			act 'Finish':
@@ -527,7 +527,7 @@ if $ARGS[0] = 'confession':
 						end
 					end
 				else
-					'<br>You don''t have enough willpower to refuse.'
+					act 'Refuse to masturbate in front of the father (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 			end
 			act 'Finish':

+ 72 - 66
locations/pavaptcourtev.qsrc

@@ -312,7 +312,7 @@ if $ARGS[0] = 'events1':
 						gt 'pavComplex', 'start' 
 					end
 				else
-					'You don''t have enough willpower to refuse.'
+					act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 				act 'Get down on your knees':gt 'pavaptcourtev', 'smokeblowjob'
 			else
@@ -563,7 +563,7 @@ if $ARGS[0] = 'events2':
 						gt 'pavComplex', 'start'
 					end
 				else
-					'You don''t have enough willpower to refuse.'
+					act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 				act 'Get down on your knees':gt 'pavaptcourtev', 'smokeblowjob'
 			else
@@ -644,7 +644,7 @@ if $ARGS[0] = 'male_gopnik_beer':
 			gt 'pavComplex', 'start'
 		end
 	else
-		'You don''t have enough willpower to stop drinking and leave.'
+		act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end
 	
 	act 'Drink more':
@@ -661,7 +661,7 @@ if $ARGS[0] = 'male_gopnik_beer':
 				gt 'pavComplex', 'start'
 			end
 		else
-			'You don''t have enough willpower to stop drinking and leave.'
+			act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 		end
 		act 'Drink even more':
 			*clr & cla
@@ -684,7 +684,7 @@ if $ARGS[0] = 'male_gopnik_beer':
 						gt 'pavComplex', 'start'
 					end
 				else
-					'You don''t have enough willpower to stop drinking and leave.'
+					act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 				act 'Grab another beer':
 					*clr & cla
@@ -716,7 +716,7 @@ if $ARGS[0] = 'male_gopnik_beer':
 									act 'Move away':gt 'pavComplex', 'start'
 								end
 							else
-								'You don''t have enough willpower to refuse.'
+								act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 							end
 							act 'Agree': gt 'pavaptcourtev', 'suck3stooges'
 							
@@ -738,11 +738,11 @@ if $ARGS[0] = 'male_gopnik_beer':
 									act 'Move away':gt 'pavComplex', 'start'
 								end
 							elseif grupTipe = 4 and will_cost > pcs_willpwr:
-								'You don''t have enough willpower to threaten Dan.'
+								act 'Threaten Dan (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 							end
 						end
 					else
-						'You don''t have enough willpower to refuse.'
+						act 'Refuse bet(<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 					end
 					act 'Make bet':
 						*clr & cla
@@ -771,6 +771,8 @@ if $ARGS[0] = 'male_gopnik_beer':
 								'You know they will get over it eventually, most likely. You also know their is no point arguing with them, so you leave them to grumble about you welshing on your bet.'
 								act 'Move away':gt 'pavComplex', 'start'
 							end
+						else
+							act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 						end
 						act 'Payup':
 							*clr & cla
@@ -815,7 +817,7 @@ if $ARGS[0] = 'female_gopnik_beer_1':
 			gt 'pavComplex', 'start'
 		end
 	else
-		'You don''t have enough willpower to stop drinking and leave.'
+		act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end
 	act 'Drink more':
 		*clr & cla
@@ -831,7 +833,7 @@ if $ARGS[0] = 'female_gopnik_beer_1':
 				gt 'pavComplex', 'start' 
 			end
 		else
-			'You don''t have enough willpower to stop drinking and leave.'
+			act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 		end
 		act 'Drink even more':
 			*clr & cla
@@ -847,7 +849,7 @@ if $ARGS[0] = 'female_gopnik_beer_1':
 					gt 'pavComplex', 'start'
 				end
 			else
-				'You don''t have enough willpower to stop drinking and leave.'
+				act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 			end
 			act 'Grab another beer':
 				*clr & cla
@@ -859,6 +861,56 @@ if $ARGS[0] = 'female_gopnik_beer_1':
 				*nl
 				'This seems to amuse them even more. "Yeah I bet you could down a beer faster than Alyona can, couldn''t you?" You give her a look wondering what she is up to but right now you feel like you could out drink anyone so you nod. "Yeah I think I could."'
 				'Lena grins widely. "Great then how about we make a bet, if you can out down one faster than Alyona, Lera will walk around the complex naked, but if you lose. You got to walk around the complex completely naked. What do you say?" Lera gives Lena a look of surprise but Lena just nods and Lera doesn''t say anything.'
+
+				gs 'willpower', 'exhib', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Refuse bet (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/eatmelera.jpg"></center>'
+						'You shake your head no. "No I don''t think so, I wouldn''t win so no reason for me to make that bet." You reach for another beer but Lera pulls it away before you can grab it. Then he stands up and pulls her pants down enough to show off her clit. "If you want another beer you have to eat me <<$pcs_nickname>>." She says with a smirk. The other girls perk up at this and seem interested in what you''re going to do.' 
+						gs 'willpower', 'cuni', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Refuse (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'cuni', 'resist'
+								gs 'willpower', 'pay', 'resist'
+								'<center><img <<$set_imgh>> src="images/pc/no.jpg"></center>'
+								'You shake your head no. "I''m not licking your pussy for a beer Lera."'
+								'She laughs, "Then you''re not getting another beer." Knowing you won''t win this and you are not about to lick her pussy for a beer you sigh and leave them.'
+								act 'Move away':gt 'pavComplex', 'start'
+							end
+						else
+							act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
+						end
+						act 'Agree':gt 'pavaptcourtev', 'eatlera'
+						gs 'willpower', 'drink', 'force', 'hard'
+						if grupTipe = 4 and will_cost <= pcs_willpwr:
+							act 'Threaten Lera (<<will_cost>> Willpower)':
+								*clr & cla
+								npc_rel['A21'] -= 2
+								grupvalue[4] += 1
+								minut += 5
+								gs 'drugs', 'alcohol', 'beer'
+								gs 'willpower', 'drink', 'force', 'hard'
+								gs 'willpower', 'pay', 'force'
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/eatmelera.jpg"></center>'
+								'You smile to Lera and reach over and pinch her clit between your index finger and thumb, which makes her squeal in pain, she grabs your arm with her hands. Trying to pull your hand away only makes it hurt more. "Fuck <<$pcs_nickname>> let go before you rip my clit off!" The other girls howl in laughter at this.'
+								*nl
+								'You give her a sadist little smile. "Give me a beer and I will let go." She gives you a dirty look but winces as you dig your nails in even harder, with that he quickly hands you another beer. You take your time taking another drink before releasing her.'
+								*nl
+								'She pulls her pants back up and spends the next several minutes complaining about how much her clit hurts. With the last of the beers drank, the girls get up and tell each other and you night. Then they each go their own way.'
+								act 'Move away':gt 'pavComplex', 'start'
+							end
+						elseif grupTipe = 4 and will_cost > pcs_willpwr:
+							act 'Threaten Lera (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
+						end
+					else
+						act 'Refuse bet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
+					end
+				end
+				
 				act 'Make bet':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/beer' + rand(1,2) + '.jpg"></center>'
@@ -888,7 +940,7 @@ if $ARGS[0] = 'female_gopnik_beer_1':
 							act 'Move away':gt 'pavComplex', 'start'
 						end
 					else
-						'You don''t have enough willpower to refuse paying.'
+						act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 					end
 					act 'Payup':
 						*clr & cla
@@ -911,52 +963,6 @@ if $ARGS[0] = 'female_gopnik_beer_1':
 						act 'Go home':gt 'pavaptcourtev', 'homenaked'
 					end
 				end
-				gs 'willpower', 'exhib', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Refuse bet':
-						*clr & cla
-						gs 'willpower', 'pay', 'resist'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/eatmelera.jpg"></center>'
-						'You shake your head no. "No I don''t think so, I wouldn''t win so no reason for me to make that bet." You reach for another beer but Lera pulls it away before you can grab it. Then he stands up and pulls her pants down enough to show off her clit. "If you want another beer you have to eat me <<$pcs_nickname>>." She says with a smirk. The other girls perk up at this and seem interested in what you''re going to do.' 
-						gs 'willpower', 'cuni', 'resist'
-						if will_cost <= pcs_willpwr:
-							act 'Refuse (<<will_cost>> Willpower)':
-								*clr & cla
-								gs 'willpower', 'cuni', 'resist'
-								gs 'willpower', 'pay', 'resist'
-								'<center><img <<$set_imgh>> src="images/pc/no.jpg"></center>'
-								'You shake your head no. "I''m not licking your pussy for a beer Lera."'
-								'She laughs, "Then you''re not getting another beer." Knowing you won''t win this and you are not about to lick her pussy for a beer you sigh and leave them.'
-								act 'Move away':gt 'pavComplex', 'start'
-							end
-						else
-							'You don''t have enough willpower to refuse.'
-						end
-						act 'Agree':gt 'pavaptcourtev', 'eatlera'
-						gs 'willpower', 'drink', 'force', 'hard'
-						if grupTipe = 4 and will_cost <= pcs_willpwr:
-							act 'Threaten Lera (<<will_cost>> Willpower)':
-								*clr & cla
-								npc_rel['A21'] -= 2
-								grupvalue[4] += 1
-								minut += 5
-								gs 'drugs', 'alcohol', 'beer'
-								gs 'willpower', 'drink', 'force', 'hard'
-								gs 'willpower', 'pay', 'force'
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/eatmelera.jpg"></center>'
-								'You smile to Lera and reach over and pinch her clit between your index finger and thumb, which makes her squeal in pain, she grabs your arm with her hands. Trying to pull your hand away only makes it hurt more. "Fuck <<$pcs_nickname>> let go before you rip my clit off!" The other girls howl in laughter at this.'
-								*nl
-								'You give her a sadist little smile. "Give me a beer and I will let go." She gives you a dirty look but winces as you dig your nails in even harder, with that he quickly hands you another beer. You take your time taking another drink before releasing her.'
-								*nl
-								'She pulls her pants back up and spends the next several minutes complaining about how much her clit hurts. With the last of the beers drank, the girls get up and tell each other and you night. Then they each go their own way.'
-								act 'Move away':gt 'pavComplex', 'start'
-							end
-						elseif grupTipe = 4 and will_cost > pcs_willpwr:
-							'You don''t have enough willpower to threaten Lera.'
-						end
-					end
-				end
 			end
 		end
 	end
@@ -980,7 +986,7 @@ if $ARGS[0] = 'female_gopnik_beer_2':
 			gt 'pavComplex', 'start'
 		end
 	else
-		'You don''t have enough willpower to stop drinking and leave.'
+		act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end
 	act 'Drink more':
 		*clr & cla
@@ -996,7 +1002,7 @@ if $ARGS[0] = 'female_gopnik_beer_2':
 				gt 'pavComplex', 'start' 
 			end
 		else
-			'You don''t have enough willpower to stop drinking and leave.'
+			act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 		end
 		act 'Drink even more':
 			*clr & cla
@@ -1012,7 +1018,7 @@ if $ARGS[0] = 'female_gopnik_beer_2':
 					gt 'pavComplex', 'start'
 				end
 			else
-				'You don''t have enough willpower to stop drinking and leave.'
+				act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 			end
 			act 'Grab another beer':
 				*clr & cla
@@ -1028,7 +1034,7 @@ if $ARGS[0] = 'female_gopnik_beer_2':
 						gt 'pavComplex', 'start' 
 					end
 				else
-					'You don''t have enough willpower to stop drinking and leave.'
+					act 'Stop drinking and leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 				act 'Keep drinking':
 					*clr & cla
@@ -1053,7 +1059,7 @@ if $ARGS[0] = 'female_gopnik_beer_2':
 							act 'Move away':gt 'pavComplex', 'start'
 						end
 					else
-						'You don''t have enough willpower to stop drinking and leave.'
+						act 'Had enough(<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 					end
 					act 'Try to keep up':
 						*clr & cla
@@ -1082,7 +1088,7 @@ if $ARGS[0] = 'female_gopnik_beer_2':
 								act 'Move away':gt 'pavComplex', 'start'
 							end
 						else
-							'You don''t have enough willpower to stop drinking and leave.'
+							act 'Had enough(<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 						end
 						act 'Keep going':
 							*clr & cla
@@ -1155,7 +1161,7 @@ if $ARGS[0] = 'follownush':
 						act 'Leave':gt 'pavComplex', 'start'
 					end
 				else
-					'You don''t have enough willpower to stop stop and leave.'
+					act 'This is going to far(<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 				end
 				act 'Undress':
 					*clr & cla
@@ -1505,7 +1511,7 @@ if $ARGS[0] = 'two_boys':
 			act 'Stay home': gt 'bedrPar'
 		end
 	else
-		'You don''t have enough willpower to refuse.'
+		act 'Tell them no and go home(<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end
 	act 'Agree':
 		*clr & cla

+ 3 - 3
locations/willpower.qsrc

@@ -41,7 +41,7 @@
 			act 'Next action': gt 'farawayistan'
 		end
 	else
-		'<br>You don''t have enough willpower to kick him in the balls.'
+		act 'Kick him in the balls (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end	
 }
 
@@ -60,7 +60,7 @@
 			act 'Next action': gt 'farawayistan'
 		end
 	else
-		'<br>You don''t have enough willpower to kick him in the balls.'
+		act 'Kick him in the balls (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end	
 	
 	gs 'willpower', 'misc', 'self', 'medium'
@@ -76,7 +76,7 @@
 			act 'Next action': gt 'farawayistan'
 		end
 	else
-		'<br>You don''t have enough willpower to kick him in the balls.'
+		act 'Slap him across the face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willower to use this action.</font>'
 	end	
 }