[added] willpower for balkon2 and bass

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

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