Bläddra i källkod

Inhibition seeding for all files with "swim" in them and photo studio bugfixes

hornguy6 6 år sedan
förälder
incheckning
fb5dd55f78

+ 1 - 0
locations/Miroslava.qsrc

@@ -116,6 +116,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 				pcs_mood += 5
 				pcs_willpwr += 5
 				if pcs_stren < 30:stren_exp += 1
+				if pcs_inhib < 50:inhib_exp += rand(1,2)
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river_mira.jpg"></center>'
 				'You wade in the river, fun with Mira spray each other with water.'

+ 8 - 3
locations/Nudelake.qsrc

@@ -5,7 +5,7 @@ $location_type = 'secluded'
 'The nudist beach - clothing optional.'
 
 if $clothingworntype ! 'swimwear' and $clothingworntype ! 'nude':
-	if pcs_exhibition > 30:
+	if pcs_inhib > 50:
 		minut += 5
 		gs 'underwear', 'remove'
 		gs 'clothing', 'strip'
@@ -16,7 +16,7 @@ if $clothingworntype ! 'swimwear' and $clothingworntype ! 'nude':
 	exit
 	end
 elseif $clothingworntype = 'swimwear':
-	if pcs_exhibition > 30:
+	if pcs_inhib > 50:
 		act'Strip naked':
 			cls
 			minut += 5
@@ -66,6 +66,7 @@ if $ARGS[0] = 'voleybol':
 		react_exp += 1
 		vball_exp += rand(1,3)
 		minut += 30
+		inhib_exp += rand(1,3)
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/voleybol.jpg"></center>'
 		'You go up to the players and ask whether it is possible to join in, they are happy to put you on a team.'
 
@@ -78,7 +79,7 @@ if $ARGS[0] = 'zagarat':
 	cls
 	minut += 30
 	if pcs_sweat < 35 : pcs_sweat += 5
-	exhibition_exp += rand(1,3)
+	inhib_exp += rand(1,3)
 	pcs_mood += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/nudezagarat.jpg"></center>'
@@ -111,7 +112,11 @@ if $ARGS[0] = 'swim':
 	gs 'cum_cleanup'
 	minut += 60
 	if $clothingworntype = 'nude': gs 'exercise', 'tier1', 1, 'stren_exp', 'exhibition_exp'
+	if $clothingworntype = 'nude':inhib_exp += rand(1,3)
 	if $clothingworntype ! 'nude': gs 'exercise', 'tier1', 1, 'stren_exp'
+	if $clothingworntype ! 'nude':
+		if pcs_inhib < 50:inhib_exp += rand(1,3)
+	end
 	pcs_sweat = 10 + rand(0,4)
 	
 	'<center><img <<$set_imgh>> src="images/locations/shared/lake/nudeswim.jpg"></center>'

+ 1 - 0
locations/backwater.qsrc

@@ -131,6 +131,7 @@ if $clothingworntype = 'nude':
 		minut += 30
 		pcs_mood += 10
 		pcs_willpwr += 5
+		inhib_exp += rand(1,3)
 		if hantersRape = 1: hantersRape = 2
 
 		if $pantyworntype = 'none':

+ 1 - 0
locations/bass.qsrc

@@ -146,6 +146,7 @@ if $ARGS[0] = 'a':
 		gs 'cum_cleanup'
 		gs 'exercise', 'tier1', 60, 'stren_exp'
 		pcs_sweat = 10 + rand(0,4)
+		if pcs_inhib < 50:inhib_exp += rand(1,2)
 			
 		'<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>'
 		'You take a swim in the pool, which invigorates you making you feel refreshed.'

+ 11 - 5
locations/fit.qsrc

@@ -95,6 +95,7 @@ if $ARGS[0] = 'dressing room':
 		pcs_horny += 1
 		pcs_hairbsh = 0
 		pcs_makeup = 1
+		if pcs_inhib < 15:inhib_exp += rand(1,2)
 		dynamic $showerdin
 		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 		'You go into the bathroom and turn on the shower. You lather your body and wash in the shower.'
@@ -282,6 +283,7 @@ if $ARGS[0] = 'gym':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop1'
 		loopcount = 0
 		timemult = 0
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		
 		'<center><img <<$set_imgh>> src="images/locations/shared/gym/fit1.jpg"></center>'
 		'You do very vigorous exercises to the music, and burn some fat.'
@@ -306,7 +308,7 @@ if $ARGS[0] = 'gym':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop2'
 		loopcount = 0
 		timemult = 0
-		
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit2.jpg"></center>'
 		'You pump iron, building strength.'
 
@@ -330,7 +332,7 @@ if $ARGS[0] = 'gym':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop3'
 		loopcount = 0
 		timemult = 0
-		
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit3.jpg"></center>'
 		'You spend a half hour doing reps on the cross trainer developing your endurance.'
 
@@ -354,7 +356,7 @@ if $ARGS[0] = 'gym':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop4'
 		loopcount = 0
 		timemult = 0
-		
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit4.jpg"></center>'
 		'You run tennis exercises, concentrating on defensive drills.'
 
@@ -378,7 +380,7 @@ if $ARGS[0] = 'gym':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop5'
 		loopcount = 0
 		timemult = 0
-		
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit4.jpg"></center>'
 		'You run tennis exercises, concentrating on court reactions.'
 
@@ -541,6 +543,7 @@ if $ARGS[0] = 'kickboxing':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop6'
 		loopcount = 0
 		timemult = 0
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
 		'You practice your jabs on the speed bag and double-end bag, straight punches with a step forward. These strikes are not so powerful, but they are fast.'
 
@@ -558,6 +561,7 @@ if $ARGS[0] = 'kickboxing':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop7'
 		loopcount = 0
 		timemult = 0
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
 		'You practice your power punches on the heavy bag. These are high impact and powerful, but they are hard to get to their target.'
 
@@ -575,6 +579,7 @@ if $ARGS[0] = 'kickboxing':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop8'
 		loopcount = 0
 		timemult = 0
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
 		'You practice your powerful kicks on a kickboxing bag. These impacts are very powerful and able to cut down an opponant, but are very difficult to hit with.'
 
@@ -592,6 +597,7 @@ if $ARGS[0] = 'kickboxing':
 		if loopcount < timemult: loopcount += 1 & jump 'timeloop9'
 		loopcount = 0
 		timemult = 0
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
 		'You practice your defense movements.'
 
@@ -602,7 +608,7 @@ if $ARGS[0] = 'kickboxing':
 		cla
 		*clr
 		'You need to choose a partner for sparring'
-
+		if pcs_inhib < 30:inhib_exp += rand(1,2)
 		act 'Pick a random partner':
 			abonement -= 1
 			pcs_mood += 2

+ 20 - 15
locations/foto.qsrc

@@ -78,16 +78,16 @@ if $ARGS[0] = 'start':
 		act'Go back to the main floor':gt'foto','studio'
 	end
 
-	if $pantyworntype ! 'none':
+	if $pantyworntype ! 'none' and pcs_inhib < 60:
 		if studio_strip_talk < 3 and $braworntype ! 'none' and pcs_inhib < 60:
 			act'Just strip to your panties':
 				gs 'clothing', 'strip'
-				gs 'bras', 'remove'
 				cla & *clr
 				inhib_exp += 2
 				if studio_strip_talk = 0:
 					gt'foto_events','studio_strip_talk1'
 				elseif studio_underwear > 0:
+					gs 'bras', 'remove'
 					'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip1.mp4"></video></center>'
 					'	As you drop your clothes into the locker, you can''t help but take small comfort in the warmth of the panties you still wear. It''s not much, but as long as you have time to put this off, you''ll take solace in what little coverage they provide.'
 					act'Go to the main floor':
@@ -248,14 +248,14 @@ if $ARGS[0] = 'studio':
 
 	if model = 1:
 		act 'Leave':
-			if studio_underwear_steal = 1:
+			*clr & cla
+			if studio_underwear_steal > 0:
 				gs 'clothing', 'wear_last_worn'
 				gs 'stat'
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/dress.mp4"></video></center>'
 				'	You go to your locker in the back room and start to throw on your clothes when you suddenly remember that one of the managers took your underwear earlier today. You''ll have to go see him to get it back...'
 				act'Go see the manager':gt'foto_events','underwear_steal2'
 			else
-				*clr & cla
 				gs 'underwear', 'wear'
 				gs 'clothing', 'wear_last_worn'
 				gs 'stat'
@@ -411,11 +411,12 @@ if $ARGS[0] = 'interview':
 	if howoldareyou = 0:
 		'	"You want to work here? How old are you?"'
 		if age >= 18:
-			howoldareyou = 1
-			gs'foto','interview'
+			howoldareyou = 2
+			'	I''m <<age>>.'
 		elseif fakepassport = 1:
-			howoldareyou = 1
-			gs'foto','interview'
+			howoldareyou = 2
+			'	"I''m 18."'
+			'	"I see. Alright, undress. Let me take a look at you."'
 		else
 			act 'Tell the truth':
 				age_truth = 1
@@ -431,11 +432,16 @@ if $ARGS[0] = 'interview':
 			end
 		end
 	end
-	gs'stat'
-	if howoldareyou = 1:
-		if age_lie = 1 or fakepassport = 1:'	"I''m 18."'
-		if age_truth = 1 or age >= 18:'	"I''m <<age>>."'
-		'	"I see. Alright, undress. Let me take a look at you."'
+	if howoldareyou < 0:
+		if howoldareyou = 1:
+			howoldaryou = 2:
+			if age_truth = 1 or age >= 18:'	"I''m <<age>>."'
+				'	"I see. Alright, undress. Let me take a look at you."'
+			elseif fakepassport = 1:
+				'	"I''m 18."'
+				'	"I see. Alright, undress. Let me take a look at you."'
+			end
+		end
 		if undress_ask = 0:
 			act'What? Why?':
 				undress_ask = 1
@@ -470,8 +476,7 @@ if $ARGS[0] = 'interview':
 				'	He spends several minutes doing this without saying anything. Several people walk by while he does, including several beautiful and nude women who glance at you, whispering to each other before moving on.'
 				act'Continue':gt'foto','job_offer'
 			end
-		else
-			if pcs_inhib >= 15:
+		elseif pcs_inhib >= 15:
 				act'Reluctantly undress':
 					reluctant_undress = 1
 					*clr & cla

+ 15 - 3
locations/foto_events.qsrc

@@ -39,6 +39,7 @@ if $ARGS[0] = 'studio_strip_talk1':
 	'	After pulling off the rest of your clothes, you thumb your underwear for a moment before realizing that you can''t strip all the way. You just don''t have enough confidence in yourself. But you''re still in your underwear right? You''re new here, surely they''ll understand won''t they?'
 	*nl
 	if $braworntype = 'none':'	Still, feeling your nipples harden in the cool air, you cross your arms to cover them. You really wish you had worn a bra today...'
+	gs 'bras', 'remove'
 	act'Go back to the main floor':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
@@ -54,6 +55,8 @@ if $ARGS[0] = 'studio_strip_talk1':
 				cla & *clr
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip1.mp4"></video><video autoplay loop src="images/locations/city/citycenter/photo/strip2.mp4"></video></center>'
 				'	Embarrassed that you were caught breaking the rules and scolded for it so quickly, you blush and stammer an apology, retreating into the back room to reluctantly change into your full birthday suit. So much for that. Guess you''re just going to have to deal with your discomfort with nudity if you want to keep working here.'
+				act'Go back to the main floor':gt'foto','studio'
+			end
 			act'Try to explain yourself':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
@@ -136,7 +139,11 @@ if $ARGS[0] = 'underwear_steal':
 		gs 'underwear', 'remove'
 		gs 'stat'
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip1.mp4"></video><video autoplay loop src="images/locations/city/citycenter/photo/strip2.mp4"></video></center>'
-		'	Blushing hard, you nervously do as he says. As hot as your face feels from removing your bra in front of him and exposing your breasts, it somehow manages to burn even hotter when your panties come down after exposing your pussy. Clutching your underwear to your body, you stand back up to see the manager holding out his hand.'
+		if pcs_inhib < 30:
+			'	Blushing hard, you nervously do as he says. As hot as your face feels from removing your bra in front of him and exposing your breasts, it somehow manages to burn even hotter when your panties come down after exposing your pussy. Clutching your underwear to your body, you stand back up to see the manager holding out his hand.'
+		else
+			'	You blush hard but do as he says. As you slide down your panties you have to admit to yourself that even if you don''t like this, it''s still bearable to you. You don''t have any more excuses not to comply with the dress code. Picking your underwear back up, you turn towards the locker room but stop when you see the manager holding out his hand.'
+		end
 		'	"What?"'
 		'	"Give me your underwear."'
 		'	"What?!"'
@@ -147,7 +154,11 @@ if $ARGS[0] = 'underwear_steal':
 		gs 'underwear', 'remove'
 		gs 'stat'
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip2.mp4"></video></center>'
-		'	Blushing hard, you nervously do as he says, face burning hot as you slip your panties down around your legs, keenly aware of your now visible pussy. Clutching your underwear to your body, you stand back up to see the manager holding out his hand.'
+		if pcs_inhib < 30:
+			'	Blushing hard, you nervously do as he says, face burning hot as you slip your panties down around your legs, keenly aware of your now visible pussy. Clutching your underwear to your body, you stand back up to see the manager holding out his hand.'
+		else
+			'	You blush hard but do as he says. As you slide down your panties you have to admit to yourself that even if you don''t like this, it''s still bearable to you. You don''t have any more excuses not to comply with the dress code. Picking your underwear back up, you turn towards the locker room but stop when you see the manager holding out his hand.'
+		end
 		'	"What?"'
 		'	"Give me your underwear."'
 		'	"What?!"'
@@ -175,6 +186,7 @@ if $ARGS[0] = 'underwear_steal2':
 		'	But also, doing that here in front of him? He already forced you to undress, you suppose. Getting dressed can''t be worse than that right?'
 		act'Go to the back room and re-dress':gt'foto_events','re-dress'
 		act'Just put your panties on under your skirt':
+			cla & *clr
 			gs 'panties','wear'
 			'<center><video autoplay loop src="images/locations/city/citycenter/photo/panties.mp4"></video></center>'
 			'	Well, you''re wearing a skirt today right? It wouldn''t be too difficult to just slip your panties on that way right?'
@@ -187,7 +199,7 @@ if $ARGS[0] = 'underwear_steal2':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 				'	Sighing deeply, you stammer out what he wants you to say.'
-				'	"I promise that from now on you will only see me naked in the studio unless it''s for a shoot."'
+				'	"I promise that from now I will always be completely naked in the studio unless it''s for a shoot."'
 				'	"Good. Feel free to go home now. Hope to see you again soon."'
 				'	With your underwear returned and safely covering your hips, you awkwardly make your exit.'
 				act'Leave':gt 'down'

+ 13 - 6
locations/gLakeNude.qsrc

@@ -84,19 +84,19 @@ end
 if temper >= 15 and month >= 5 and month <= 9:
 	if $clothingworntype ! 'nude':
 		act'Take off your clothes':
-			if pcs_exhibition > 30:
+			if pcs_inhib > 30:
 				cla
 				*clr
 				minut+=5
 				gs 'clothing', 'strip'
 				gs 'underwear', 'remove'
-				if pcs_horny >= 80:
+				if pcs_horny >= 80 and pcs_exhibition >= 50:
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants3.jpg"></center>'
 					'You strip off. A couple of passing men do a double-take and pause a moment to look at your sopping wet panties, probably thinking about what is making you so excited. You don''t care about what they might say or think of you.'
-				elseif pcs_exhibition >= 40:
+				elseif pcs_inhib >= 60:
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
-					'Not caring if anyone is looking at you, you slowly take off your clothes. You peel off each item like a stripper. You feel so naughty. Soon, you are completely naked.'
-				elseif pcs_exhibition > 30:
+					'Not caring if anyone is looking at you, you slowly take off your clothes. You peel off each item like a stripper. Soon, you are completely naked.'
+				elseif pcs_inhib < 60:
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg"></center>'
 					'You quickly check to see if anyone is watching, and when you''re satisfied no one is paying you undue attention, you take off your clothes. You''re naked now.'
 				end
@@ -120,6 +120,11 @@ if temper >= 15 and month >= 5 and month <= 9:
 				pcs_sweat = 10 + rand(0,4)
 				pcs_mood += 5
 				pcs_willpwr = pcs_willpwr + 5
+				if $clothingworntype = 'swimwear':
+					if pcs_inhib < 50:inhib_exp += rand(1,2)
+				elseif $clothingworntype = 'nude':
+					inhib_exp += rand(1,3)
+				end
 				if pcs_stren < 30: stren_exp += 1
 
 				if $clothingworntype = 'nude':
@@ -147,8 +152,10 @@ if temper >= 15 and month >= 5 and month <= 9:
 				pcs_mood += 5
 				if $clothingworntype = 'swimwear':
 					'<center><img <<$set_imgh>> src="images/locations/shared/lake/zagar.jpg"></center>'
+					if pcs_inhib < 50:inhib_exp += rand(1,2)
 				else
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/nudezagarat.jpg"></center>'
+					inhib_exp += rand(1,3)
 				end
 				if krem = 0:
 					pcs_tan = pcs_tan + 1
@@ -238,7 +245,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 		end
 	end
 	act'Leave the secluded beach without changing':
-		if $clothingworntype ! 'nude' or ($clothingworntype = 'nude' and pcs_exhibition > 40):
+		if $clothingworntype ! 'nude' or ($clothingworntype = 'nude' and pcs_inhib >= 60):
 			cla
 			minut += 10
 			gt'glake'

+ 5 - 1
locations/gadforest.qsrc

@@ -71,6 +71,7 @@ if $ARGS[0] = '1':
 	if $clothingworntype ! 'nude' and clothesAtLocation = 0 and temper >= 15 and sunWeather = 1 and hour>=6 and hour<=20 and miratalkforest > 1 and MiraLoc ! 3:
 		act'Strip naked':
 			if forestpicnic = 0:
+				inhib_exp += rand(1,3)
 				cla
 				*clr
 				minut+=5
@@ -122,7 +123,9 @@ if $ARGS[0] = '1':
 			minut += 60
 			pcs_mood += 20
 			pcs_willpwr += willpowermax/5
-			if $clothingworntype = 'nude':pcs_health += healthmax/5 & pcs_horny += 5
+			if $clothingworntype = 'nude':
+				pcs_health += healthmax/5 & pcs_horny += 5
+				inhib_exp += rand(1,5)
 			gs 'stat'
 
 			if month >= 4 and month <= 10:
@@ -220,6 +223,7 @@ if $ARGS[0] = '1':
 		dirtyclothes = 0 & swamp_clothes = 0
 		if $clothingworntype = 'nude':
 			if $CloLosTyp[$CURLOC] = '':
+				inhib_exp += rand(0,2)
 				!no cloth here, it must be broken. There may be a good exhibi or rape event entry point.
 				'You sneak out the woods, hiding your naked body in shadow and moving toward grandparents house.'
 				'You Successfully reach home without witness.'

+ 10 - 0
locations/gadforest_event.qsrc

@@ -220,6 +220,7 @@ if $ARGS[0] = 'gopforest_mitka':
 			end
 		end
 	else
+		inhib_exp += rand(1,3)
 		if MiraLoc ! 3 or gadriver_gang >= 3:
 			if npc_QW['A63'] = 0 and gadriver_gang < 3:
 				cla
@@ -276,6 +277,7 @@ if $ARGS[0] = 'gopforest_mitka':
 					minut += 5
 					if npc_QW['A63'] = 0:npc_QW['A63'] += 1
 					pcs_horny += 20
+					inhib_exp += rand(1,3)
 					gs 'stat'
 					!gs 'time'
 
@@ -606,6 +608,7 @@ if $ARGS[0] = 'gopforest_kolyamba':
 			end
 		end
 	else
+		inhib_exp += rand(1,3)
 		if MiraLoc ! 3:
 			if npc_QW['A63'] < 13 and gadriver_gang >= 3:
 				cla
@@ -960,6 +963,7 @@ if $ARGS[0] = 'gopforest_vasyan':
 			end
 		end
 	else
+		inhib_exp += rand(1,3)
 		if MiraLoc ! 3:
 			if npc_QW['A63'] < 13 or gadriver_gang >= 3:
 				cla
@@ -1338,6 +1342,7 @@ if $ARGS[0] = 'gopforest_2boys':
 			end
 		end
 	else
+		inhib_exp += rand(1,3)
 		if MiraLoc ! 3:
 			temphant = rand(4,6)
 			if npc_QW['A63'] < 13 or gadriver_gang >= 3:
@@ -1727,6 +1732,7 @@ if $ARGS[0] = 'gopforest_3boys':
 			end
 		end
 	else
+		inhib_exp += rand(1,3)
 		if MiraLoc ! 3:
 			if npc_QW['A63'] < 13 or gadriver_gang >= 3:
 				cla
@@ -2014,6 +2020,7 @@ if $ARGS[0] = 'nude_event':
 		minut+=5
 		gs 'underwear', 'remove'
 		pcs_horny += 10
+		inhib_exp += rand(1,3)
 		if MiraLoc = 3:npc_rel['A60'] += 5
 		gs 'stat'
 		if CloSkirtShortness = 0 and MiraLoc ! 3:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/nudeforest.jpg"></center>'
@@ -2143,6 +2150,7 @@ if $ARGS[0] = 'mushroom':
 		if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and $pantyworntype ! 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/mushroom2.jpg"></center>'
 		if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and $pantyworntype = 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/mushroom3.jpg"></center>'
 		if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/mushroom4.'+rand(1,2)+'.jpg"></center>'
+		if $clothingworntype = 'nude':inhib_exp += rand(1,3)
 		'You begin collecting mushrooms trying to make everything fit in the basket.'
 		act 'Further':gt $loc, $metka
 	end
@@ -2257,6 +2265,7 @@ if $ARGS[0] = 'forest_hanters':
 					'- Yeah, " laughed the second. - And above it either.'
 					'Then you went for derevaun clearing.'
 				else
+					inhib_exp += rand(0,2)
 					'You froze, not knowing what to do, whether to hide, or to ask for help. But hiding it was too late, the men noticed you and you are safely moved to meet them. Yet you went to him, men did not take his eyes off you. You were uncomfortable under these studies the views, but there was no other way.'
 					'- What happened? - started single, older, when you came closer. - And why are you in such... hmmm... the?'
 					'- I was lost - you said with tears in his eyes. And began to carry all sorts of nonsense about killers, rapists, car chases and other absurdities, explaining its is not suitable for walks in the forest view.'
@@ -2344,6 +2353,7 @@ if $ARGS[0] = 'forest_hanters':
 						if pcs_horny >= 70:'"Well, that''s exactly what you need right now." you thought, feeling your pussy screaming with desire. You went with the guys, you were so eager, you almost lead the way.'
 					end
 				else
+					inhib_exp += rand(0,2)
 					'"<<$pcs_nickname>>, what happened?" asked Andrei, when you came closer. "And why are you in such... uummm... state?"'
 					'"I was lost!" you said with tears in your eyes and began talking too fast about all sorts of nonsense fears like killers, rapists, car chases and other absurdities.'
 					'"Okay, okay, calm down, " he interrupted you. "It`s all over now. It''s good that you met us and not a pack of wolves."'

+ 1 - 0
locations/gadforestrelax.qsrc

@@ -16,6 +16,7 @@ if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtS
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness > 0 and $pantyworntype ! 'none' and bonfire = 1:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_ski2.jpg"></center>'
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness > 0 and $pantyworntype = 'none' and bonfire = 1:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_ski3.jpg"></center>'
 if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_nude'+ rand(1,3) +'.jpg"></center>'
+if $clothingworntype = 'nude':inhib_exp += rand(1,3)
 'You are tired and decided to rest a little.'
 if wolfrand <= 3 and bonfire = 0 and hour = 23 or hour >= 0 and hour < 6 and bonfire = 0 and wolfrand <= 3:gt 'gadforest_event', 'relax'
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and bonfire = 0:

+ 12 - 3
locations/gadriver.qsrc

@@ -191,7 +191,11 @@ if $ARGS[0] = 'Gadbitch':
 				gs 'cum_cleanup'
 				minut += 30
 				if $clothingworntype = 'nude': gs 'exercise', 'tier1', 1, 'stren_exp', 'exhibition_exp'
+				if $clothingworntype = 'nude':inhib_exp += rand(1,3)
 				if $clothingworntype ! 'nude': gs 'exercise', 'tier1', 1, 'stren_exp'
+				if $clothingworntype ! 'nude':
+					if pcs_inhib < 50:inhib_exp += rand(1,3)
+				end
 				pcs_sweat = 10 + rand(0,4)
 				if $clothingworntype = 'swimwear':
 					if hour >= 22 or hour <= 6:
@@ -294,10 +298,11 @@ if $ARGS[0] = 'Gadbitch':
 				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:
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/river/watergirls1.jpg"></center>'
-					'You strip your clothes off and slowly step in to the cold river, kwowing that the darkness hides your nudity. You swim around feeling the refreshing and invigorating water caressing your body.'
+					'You strip your clothes off and slowly step in to the cold river, knowing that the darkness hides your nudity. You swim around feeling the refreshing and invigorating water caressing your body.'
 				else
 					if temp_gr >= 10 and MiraLoc = 1:
 						pcs_horny += RAND(5,15)
@@ -367,6 +372,7 @@ if $ARGS[0] = 'Gadbitch':
 						minut += 5
 						mira_go_blok = 1
 						if PCloExhibit + 10 > pcs_exhibition:exhibition_exp += rand(1,3)
+						if pcs_inhib < 50:inhib_exp += rand(1,3)
 						gs 'stat'
 						if $clothingworntype = 'nude':
 							'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_go_river_nude.jpg"></center>'
@@ -379,7 +385,8 @@ if $ARGS[0] = 'Gadbitch':
 					elseif $clothingworntype = 'nude':
 						*clr & cla
 						minut += 60
-						exhibition_exp += rand(1,3)
+						exhibition_exp += rand(0,3)
+						inhib_exp += rand(1,3)
 						if pcs_sweat < 35 : pcs_sweat += 5
 						pcs_mood += 5
 						if temp_gr < 10 and MiraLoc = 1:
@@ -570,6 +577,7 @@ if $ARGS[0] = 'Gadbitch':
 						minut += 5
 						gs 'underwear', 'remove'
 						gs 'clothing', 'strip', 'VillageRiver'
+						inhib_exp += rand(1,3)
 						'Without hesitation, you take off all your clothes and neatly fold them before putting them down on a pile. Without your clothes holding you back, you can go for a nice swim in the river or just lie down in the sand and do some sunbathing.'
 
 						act 'Swim':
@@ -600,6 +608,7 @@ if $ARGS[0] = 'Gadbitch':
 							temp_gr = RAND(0,15)
 							cumspclnt = 4 & gs 'cum_cleanup'
 							minut += 30
+							if pcs_inhib < 50:inhib_exp += rand(1,2)
 							gs 'exercise', 'tier1', 1, 'stren_exp'
 							pcs_sweat = 10 + rand(0,4)
 							gs'stat'
@@ -731,7 +740,7 @@ if $ARGS[0] = 'GuysRiver':
 			gs 'stat'
 
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex.jpg"></center>'
-			'You quickly take off your pants and climb onto Kolyamba, grabing his cock, leading it inside you.'
+			'You quickly take off your pants and climb onto Kolyamba, grabbing his cock, leading it inside you.'
 
 			gs 'arousal', 'vaginal', 10, 'sub', 'group'
 			gs 'stat'

+ 8 - 2
locations/glake.qsrc

@@ -141,8 +141,10 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk.bikini.fat0,0.jpg"></center>'
 		elseif $clothingworntype = 'swimwear' and pcs_hips>=110:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk.bikini.fat0,1.jpg"></center>'
+			if pcs_inhib < 50:inhib_exp += rand(1,2)
 		elseif $clothingworntype = 'nude':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/walknude.jpg"></center>'
+			inhib_exp += rand(1,3)
 		else
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk0,'+rand(0,2)+'.jpg"></center>'
 		end
@@ -152,10 +154,11 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 
 	end
 
-	if $clothingworntype ! 'nude' and pcs_exhibition > 50:
+	if $clothingworntype ! 'nude' and pcs_inhib > 50:
 		act'Strip naked':
 			cla
 			minut += 5
+			inhib_exp += rand(1,2)
 			gs 'underwear', 'remove'
 			gs 'clothing', 'strip'
 			'Without hesitation, you take off all your clothes and neatly fold them before putting them down on a pile. Without your clothes holding you back, you can go for a nice swim in the lake or just lie down in the sand and do some sunbathing.'
@@ -180,8 +183,10 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 
 			if $clothingworntype = 'nude':
 				'<center><img <<$set_imgh>> src="images/locations/shared/lake/nudeswim<<rand(0,9)>>.jpg"></center>'
+				inhib_exp += rand(1,3)
 			else 
 				'<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>' 
+				if pcs_inhib < 50:inhib_exp += rand(1,2)
 			end
 			'You swim and play in the lake, feeling refreshed and invigorated by the clean lake water.'
 			if $clothingworntype = 'nude':pcs_willpwr -= 5 & pcs_mood -= 5 & 'After a few minutes, you feel the piercing gaze of several nearby women on you. They''re making an effort of whispering to one another, yet loud enough so you can hear them: "Look at that <<$pcs_lastname>> slut! She has no decency whatsoever, shamelessly flaunting her naked body like that!" The men at the lake are much more appreciative, and openly stare at your attractive body. You can see bulges forming in the shorts of some of them.'
@@ -196,6 +201,7 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 					*clr
 					pcs_willpwr -= 5
 					pcs_mood -= 5 
+					inhib_exp += rand(1,3)
 					'<center><img <<$set_imgh>> src="images/beast/dogcaine.jpg"></center>'
 					'As you lie down on your towel to catch some rays of sun and hopefully work on your tan a little, a stray dog appears out of nowhere. It keeps sniffing between your legs, which makes you feel very uncomfortable since you''re not wearing anything. You spend most of the hour trying to chase the dog away, but it comes back every time you think you got rid of it. You don''t get much sunbathing done as a result.'
 					act 'Give up on sunbathing':gt'glake'
@@ -203,7 +209,7 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 					cla
 					*clr
 					minut += 60
-					if PCloExhibit + 10 > pcs_exhibition:exhibition_exp += rand(1,3)
+					if pcs_inhib < 50:inhib_exp += rand(1,2)
 					if pcs_sweat < 35 : pcs_sweat += 5
 					pcs_mood += 5
 					gs'stat'

+ 3 - 2
locations/lake.qsrc

@@ -69,6 +69,7 @@ if $ARGS[0] = 'start':
 				minut += 60
 				gs 'exercise', 'tier1', 1, 'stren_exp'
 				pcs_sweat = 10 + rand(0,4)
+				if pcs_inhib < 40:inhib_exp += rand(1,2)
 
 				'<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>'
 				'You swim in the lake, the water refreshes and invigorates.'
@@ -80,7 +81,7 @@ if $ARGS[0] = 'start':
 					cla
 					*clr
 					minut += 60
-					if PCloExhibit + 10 > pcs_exhibition:exhibition_exp += rand(1,3)
+					if pcs_inhib < 50:inhib_exp += rand(1,2)
 					if pcs_sweat < 35 : pcs_sweat += 5
 					if pcs_hydra >= 100:
 						pcs_hydra -= 10
@@ -163,7 +164,7 @@ if $ARGS[0] = 'start':
 										act 'Chat':
 											cla
 											*clr
-											'"Who are you?" You realise as you speak that it is a stupid thing to ask a rapist, but stil, nothing ventured...'
+											'"Who are you?" You realise as you speak that it is a stupid thing to ask a rapist, but still, nothing ventured...'
 											'"Andrew" He grins.'
 											'"And yours?"'
 											'"<<$pcs_nickname>>" You answer.'

+ 7 - 5
locations/nastja.qsrc

@@ -153,14 +153,14 @@ if $ARGS[0] = 'pos9':
 	'Nastya: "No, no, I can''t. I really gotta go, right now!"' 
 	'With these words, she runs around the corner, leaving you confused and awkward.'
 
-	act 'No choice but to wait for your girlfriend...':
+	act 'No choice but to wait for Nastya...':
 		cls
 		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/city/anastasia/1shamp3.jpg"></center>'
-		'As luck would have it, a tubby little man approached and from what you can tell, he is headed in the same general direction Anastastia disappeared in.'
+		'As luck would have it, a tubby little man approached and from what you can tell, he is headed in the same general direction Nastya disappeared in.'
 
-		act 'Warn your girlfriend':
+		act 'Warn Nastya':
 			cls
 			minut += 5
 			gs 'stat'
@@ -438,6 +438,7 @@ if $ARGS[0] = 'pos20':
 	*clr
 	minut += 20
 	pcs_mood += 30
+	inhib_exp += rand(1,5)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/anastasia/2bvolley.jpg"></center>'
 	'Ants seem to be crawling all over your skin and your fingers feel numb as you undo the top of your swimsuit. It takes you unusually long, perhaps because there''s already so much attention on you because of Nastya, but you finally win the fight and the next moment, you are topless, just like your friend.'
@@ -535,8 +536,9 @@ if $ARGS[0] = 'pos24':
 	''
 	'As you hang up, you see that twinkle in Nastya''s eyes again and already half-know what she''s thinking about.'
 	'Nastya: "<<$pcs_nickname>>, I just had a fun idea. I ''ve seen this on the internet: A girl orders a pizza and then wraps up her naked body in a towel, like she just came out of the shower, and answers the door. And when she''s paid and is about to close the door, she ''accidentally'' drops the towel. I''ve been fantasizing about this for such a long time but if I did that at my place, I could get into really big trouble because of my father. But... you aren''t scared like me, are you?"'
-
-	act 'That sounds exciting - Agree':gt 'nastja', 'pos26'
+	if pcs_inhib >= 50:
+		act 'That sounds exciting - Agree':gt 'nastja', 'pos26'
+	end
 	act 'Chicken out':gt 'nastja', 'pos25'
 end