[added] willpower seeding

locations/lesbidomhouse.qsrc

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