[removed] Old willpower additions that were interfering with new willpower.

locations/din_pav.qsrc

@@ -325,7 +325,7 @@ $pavser8 = {
 $pavser9 = {
     *clr & cla
 	menu_off = 1
-    pcs_willpwr = pcs_willpwr - 100
+    pcs_mood -= 40
     gs'stat'
     
     '<center><img <<$set_imgh>> src="images/locations/oldtown/vacanthouse/kiss.jpg" ></center>'

locations/drugs.qsrc

@@ -83,7 +83,7 @@ elseif $ARGS[0] = 'cocaine':
 	end
 	dur -= 1
 	pcs_health = pcs_vital * 10 + pcs_stren * 5
-	pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
+	pcs_willpwr += 10
 	pcs_mood = 100
 	pcs_horny = 100
 	nark += 10

locations/ender.qsrc

@@ -129,7 +129,8 @@ if $ARGS[0] = 'loss':
 		sexvolume = 10
 		gs 'cum_manage'
 		pcs_mood -= 20
-		pcs_willpwr = 20
+		pcs_willpwr = -20
+		if pcs_willpwr < 0:pcs_willpwr = 0
 		rape += 1
 
 		picrand = rand(1, 6)

locations/gadriver.qsrc

@@ -315,7 +315,6 @@ if $ARGS[0] = 'gadbitch':
 					minut = minut + 20
 					pcs_sweat = 10 + rand(0,4)
 					pcs_mood += 5
-					pcs_willpwr = pcs_willpwr + 5
 					inhib_exp += rand(1,3)
 					if pcs_stren < 30: stren_exp += 1
 					if hour >= 22 and hour <= 6:

locations/gopsex.qsrc

@@ -30,7 +30,6 @@ if $ARGS[0] = 'gg_devst_deflor':
 	if pcs_vag <= 0:
 		pcs_horny = 0
 		pcs_mood = pcs_mood - 15
-		pcs_willpwr = pcs_willpwr - 15
 		'You tell them that it''s your first time, and ask them to be gentle.'
 		'<font color = red><b>You bit your lip in pain and tears well up in your eyes, when his member enters into your pussy, breaking your hymen. You are crying and moaning as the sturdy cock fucks your bloody pussy.</b></font>'
 	end
@@ -44,7 +43,6 @@ if $ARGS[0] = 'gg_sex_orgasm':
 	!periods, orgasm is not possible
 		pcs_horny = 0
 		pcs_mood = pcs_mood - 10
-		pcs_willpwr = pcs_willpwr - 10
 		'<font color = red><b>You have a period. As his cock ramming your cunt, period blood is leaking out of your box.</b></font>'
 	elseif pcs_horny >= 50:
 		horny_orgasm_text = RAND(0,11)
@@ -77,7 +75,6 @@ if $ARGS[0] = 'gg_sex_orgasm':
 			orgasm += 1
 			pcs_horny = 0
 			pcs_mood += 25
-			pcs_willpwr += 10
 			pcs_hairbsh = 0
 			orgasm_text = RAND(0,11)
 			if orgasm_text = 0:
@@ -115,7 +112,6 @@ if $ARGS[0] = 'masturb_gg':
 		!periods, orgasm is not possible
 		pcs_horny = 0
 		pcs_mood = pcs_mood - 10
-		pcs_willpwr = pcs_willpwr - 10
 		minut +=3
 		'<font color = red><b>What you are seeing makes you a little excited, but since its your time of month, you don''t feel like masturbating and getting your fingers bloody...</b></font>'
 	elseif mesec <= 0:

locations/housecall.qsrc

@@ -339,7 +339,6 @@ if $ARGS[0] = 'ninel1':
 												if ninelsex = 1:girl += 1
 												sick = 0
 												pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
-												pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
 												pcs_mood = 100
 												gs 'stat'
 												'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sex/ninel18.jpg"></center>'
@@ -442,7 +441,6 @@ if $ARGS[0] = 'ninel2':
 						if ninelsex = 1:girl += 1
 						sick = 0
 						pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
-						pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
 						pcs_mood = 100
 						'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sex/ninel18.jpg"></center>'
 						'You feel yourself about to explode again, Ninel seems to sense this, turning she pushes you down on your back. She straddles your face as she leans forward to bury her face in your crotch again.'
@@ -584,7 +582,6 @@ if $ARGS[0] = 'ninel3':
 										ninelsex += 1
 										sick = 0
 										pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
-										pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
 										pcs_mood = 100
 										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sex/ninel28.jpg"></center>'

locations/husbSex.qsrc

@@ -303,7 +303,6 @@ if $ARGS[0] = 'kuni':
 
 	if pcs_horny >= 90:
 		pcs_mood += 15
-		pcs_willpwr = pcs_willpwr + 15
 
 		$orgasm_or = 'yes'
 		$orgasm_txt = 'He is very skilled and soon your whole body spasms from a powerful orgasm.'

locations/mainQW.qsrc

@@ -29,7 +29,6 @@ act 'Investigate':
 		act 'Enter the door':
 			cls
 			pcs_health = pcs_vital * 10
-			pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
 			pcs_mana = (pcs_intel * pcs_magik) + pcs_vital * 5 + rikudo
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/lab.jpg"></center>'

locations/placer_sex.qsrc

@@ -302,7 +302,6 @@ if $args[0] = 'piano':
 												act 'Get fucked by both of them':
 													guy += 1
 													pcs_mood += 25
-													pcs_willpwr += 25
 													pcs_vag += 1
 													vaginalOrgasm += 1
 													gs 'cum_manage'
@@ -360,7 +359,6 @@ if $args[0] = 'piano':
 													act 'Continue':
 														guy += 1
 														pcs_mood += 25
-														pcs_willpwr += 25
 														pcs_vag += 1
 														vaginalOrgasm += 1
 														spafinloc = 12
@@ -395,7 +393,6 @@ if $args[0] = 'piano':
 										act 'Continue':
 											guy += 2
 											pcs_mood =+ 25
-											pcs_willpwr += 25
 											pcs_vag += 1
 											vaginalOrgasm += 1
 											gs 'cum_manage'
@@ -442,7 +439,6 @@ if $args[0] = 'piano':
 										end
 									else
 										pcs_mood += 15
-										pcs_willpwr += 15
 										pcs_vag += 1
 										vaginalOrgasm += 1
 										gs 'cum_manage'
@@ -462,7 +458,6 @@ if $args[0] = 'piano':
 							else
 								act 'Remain silent':
 									pcs_mood += 15
-									pcs_willpwr += 15
 									pcs_vag += 1
 									vaginalOrgasm += 1
 									gs 'cum_manage'
@@ -531,7 +526,6 @@ if $args[0] = 'vodka2':
 			act 'Slow down and get off his cock':
 				*clr & cla
 				pcs_mood += 5
-				pcs_willpwr += 5
 				gs 'cum_manage'
 				guy+=1
 				gs'stat'
@@ -579,7 +573,6 @@ if $args[0] = 'vodka2':
 							gs 'arousal','breasts', 1
 							act 'Continue':
 								pcs_mood += 15
-								pcs_willpwr += 15
 								pcs_vag += 1
 								vaginalOrgasm += 1
 								gs 'cum_manage'
@@ -635,7 +628,6 @@ if $args[0] = 'vodka2':
 end
 
 if $args[0] = 'twister':
-	pcs_willpwr += 25
 	pcs_mood += 25
 	gs'stat'
 	*clr & cla
@@ -709,7 +701,6 @@ if $args[0] = 'twister':
 						gs 'stat'
 						act 'Continue':
 							minut += 30
-							pcs_willpwr += 15
 							pcs_mood += 15
 							pcs_vag += 1
 							vaginalOrgasm += 1
@@ -821,7 +812,6 @@ if $args[0] = 'card_sex':
 					pcs_throat+= 1
 					facial+=1
 					guy+=2
-					pcs_willpwr += 25
 					pcs_mood += 25
 					pcs_vag += 1
 					vaginalOrgasm += 1
@@ -945,7 +935,6 @@ if $args[0] = 'card_stript':
 									gs 'stat'
 									act 'Continue':
 										minut += 30
-										pcs_willpwr += 15
 										pcs_mood += 15
 										gs'stat'
 										*clr & cla
@@ -1148,7 +1137,6 @@ if $args[0] = 'stay_in_bed':
 							gs 'stat'
 							act 'Continue':
 								minut += 30
-								pcs_willpwr += 25
 								pcs_mood += 25
 								pcs_vag += 1
 								vaginalOrgasm += 1
@@ -1261,7 +1249,6 @@ if $args[0] = 'sleep_sex':
 								gs 'stat'
 								act 'Continue':
 									minut += 20
-									pcs_willpwr += 15
 									pcs_mood += 15
 									pcs_vag += 1
 									vaginalOrgasm += 1
@@ -1349,7 +1336,6 @@ gs 'stat'
 					gs 'stat'
 					act 'Continue':
 						pcs_mood += 15
-						pcs_willpwr += 15
 						analOrgasm += 1
 						gs'stat'
 						*clr & cla
@@ -1599,7 +1585,6 @@ if $args[0] = 'rape':
 												minut += 60
 												pcs_mood = 0
 												pcs_horny = 0
-												pcs_willpwr = pcs_willpwr/2
 												pcs_vag += 2
 												swallow+= 1
 												pcs_throat+= 2
@@ -1689,7 +1674,6 @@ if $args[0] = 'rape':
 													act 'Continue':
 														minut += 60
 														pcs_horny = 0
-														pcs_willpwr -= 50
 														pcs_mood -= 50
 														pcs_vag += 2
 														swallow+= 1
@@ -1739,7 +1723,6 @@ if $args[0] = 'rape':
 																	act 'Leave the apartment':
 																		*clr & cla
 																		pcs_mood = 5
-																		pcs_willpwr = pcs_willpwr/2
 																		minut += 10
 																		gs'stat'
 																		Big_C = 1
@@ -1765,7 +1748,7 @@ if $args[0] = 'rape':
 																$orgasm_or = 'yes'
 																gs 'arousal', 'end'
 																gs 'stat'
-																act 'A while later...': pcs_mood = 5 & pcs_willpwr = pcs_willpwr/2 & gs 'placer_sex', 'rape_end'
+																act 'A while later...': pcs_mood = 5 & gs 'placer_sex', 'rape_end'
 															end
 														end
 													end
@@ -2043,7 +2026,6 @@ if $ARGS[0] = 'sleeping_park_alco_rape':
 														flag_rape_1 = 1
 														pcs_horny = 0
 														pcs_mood = pcs_mood / 2
-														pcs_willpwr = pcs_willpwr / 2
 														pcs_horny = 0
 														vgape = 2
 														cumprecheck = 1 & gs 'cum_manage'
@@ -2105,7 +2087,6 @@ if $ARGS[0] = 'sleeping_park_alco_rape':
 													if pcs_vag < dick: pcs_vag += 1
 													flag_rape_1 = 2
 													pcs_mood += 25
-													pcs_willpwr += 25
 													if dick - pcs_vag > 8: vgape = 2
 													gs 'arousal', 'end'
 													gs 'clothing', 'wear_last_worn'

locations/poli.qsrc

@@ -64,12 +64,11 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-	if pcs_willpwr < pcs_intel * 5 + pcs_sprt * 5:
+	if pcs_mood < 10:
 		act 'See a therapist (1:00)':
 			*clr & cla
 			menu_off = 1
 			minut += 60
-			pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
 			pcs_mood = 100
 
 			if hosprand = 0:gt 'poli', '0'
@@ -830,7 +829,6 @@ if $ARGS[0] = 'ninel':
 													pcs_vag += 1
 													sick = 0
 													pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
-													pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
 													pcs_mood = 100
 													gs 'stat'
 													'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/exam19a.jpg"></center>'
@@ -957,7 +955,6 @@ if $ARGS[0] = 'ninel2':
 									pcs_vag += 1
 									sick = 0
 									pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
-									pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
 									pcs_mood = 100
 									gs 'stat'
 									'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/exam08.jpg"></center>'
@@ -1053,8 +1050,7 @@ if $ARGS[0] = 'ninel3':
 					act 'Ride her':
 						*clr & cla
 						pcs_mood += 15
-						pcs_willpwr += 15
-						pcs_vag += 1
+						girl += 1
 
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/polsex04.jpg"></center>'

locations/sauna.qsrc

@@ -68,7 +68,7 @@ if $ARGS[0] = 'sauna2':
 			if pcs_horny < 0: pcs_horny = 0
 			pcs_health += healthmax/5
 			pcs_stam = stammax
-			pcs_willpwr = pcs_intel*5 + will*5+1000
+			pcs_willpwr += 20
 			pcs_mana = (pcs_intel*pcs_magik) + pcs_magik*100 + pcs_vital*10 + rikudo
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/sauna/sau.jpg"></center>'

locations/stat.qsrc

@@ -433,7 +433,9 @@ if minut >= 60:
 		pcs_sleep -= 4
 	end
 
-	pcs_willpwr += willpowermax/50
+	pcs_willpower_feeder += willpowermax*2
+	pcs_willpwr += pcs_willpower_feeder/100
+	pcs_willpower_feeder -= pcs_willpower_feeder/100
 	if pcs_willpwr > willpowermax: pcs_willpwr = willpowermax
 	if pcs_willpwr < 20: will_degrade += 1
 	if will_degrade >= 20: willpowermax -= 1 & will_degrade = 0