Try this again, anfisa and anfisa_events replacing vnlake1, updating nudelake to reflect this

locations/anfisa.qsrc

@@ -2,7 +2,7 @@
 
 $boy = 'Anfisa'
 dick = 10
-anfisaday = daystart
+anfisa['daystart'] = daystart
 if anfisa['horny'] < 70:
 	'<center><b><font color="maroon">Anfisa</font></b></center>'
 	'<center><img <<$set_imgh>> src="images\locations\city\residential\lake\sex\anfisa\anfisa'+rand(1,3)+'.jpg"></center>'
@@ -28,7 +28,7 @@ if cumface > 0:
 		'"I see you had fun without me", - Anfisa mockingly says, looking at the sperm on your face.'
 		'"Yes, it was the case...", You answer laughing.'
 	end
-	if exhibitionist_lvl < 1: act 'Run away': gt 'city_nudelake'
+	if exhibitionist_lvl < 1: act 'Run away': gt 'nudelake'
 end
 
 act 'Further':

locations/anfisa_events.qsrc

@@ -1,6 +1,6 @@
 # anfisa_events
 
-anfisaday = daystart
+anfisa['daystart'] = daystart
 if $ARGS[0] = 'start':
 	*clr & cla
 	minut += 5
@@ -10,7 +10,7 @@ if $ARGS[0] = 'start':
 	'<center><img <<$set_imgh>> src="images\locations\city\residential\lake\sex\anfisa\walk'+iif(hotcat >= 6,1,2)+'.jpg"></center>'
 	'Tanning, you'+iif(npc_QW['Anfisa'] = 1,' again notice', ' notice')+' a drunken girl wandering along the beach with a bottle of wine in her hand, idly inspecting the beach, as if looking for someone among holidaymakers. **'+iif(hotcat < 6,'She slowly walked past, without even looking at you. Apparently you are not the one whom she looks out for, ”Noticing your look, she, smiles back, comes up to you: ** <do>- Hi! Do you mind if I sit here?</do>','')
 	if hotcat <= 5:
-		act 'Further': gt 'city_nudelake'
+		act 'Further': gt 'nudelake'
 	else
 		act 'Of course not, Sit':
 			npc_QW['Anfisa'] = 2
@@ -45,7 +45,7 @@ if $ARGS[0] = 'start':
 							'"Anfisa, no offense, but '+iif(lesbian = 0,' it''s not like that, I like boys')+'."'
 							'"Okay, none taken," smiles Anfisa, winking at you." Maybe another time then, if you change your mind, you''ll find me here."'
 							'She stands, waves goodbye and leaves.'
-							act 'Watch her go': gt 'city_nudelake'
+							act 'Watch her go': gt 'nudelake'
 						end
 					end
 				end
@@ -57,7 +57,7 @@ if $ARGS[0] = 'start':
 					'"Reluctantly no." you answer her, "Just don''t be offended."'
 					'"Oh well no so no", Anfisa smiles. "Maybe another time then, if you change your mind, you''ll find me here."'
 					'Chating with you for another ten minutes or so, she stands, waves her hand in farewell, and wanders towards the exit'
-					act 'Walk away': gt 'city_nudelake'
+					act 'Walk away': gt 'nudelake'
 				end
 			end
 			act 'Not possible':
@@ -65,7 +65,7 @@ if $ARGS[0] = 'start':
 				'<center><img <<$set_imgh>> src="images\locations\city\residential\lake\sex\anfisa\talk5.jpg"></center>'
 				'"Well, you and the beech tree," Anfisa grins drunkly. "If you ever thaw, come find me."'
 				'The girl rises, swaying, and waving her hand in farewell, wanders off'
-				act 'Watch her go': gt 'city_nudelake'
+				act 'Watch her go': gt 'nudelake'
 			end
 		end
 		act 'No':
@@ -73,7 +73,7 @@ if $ARGS[0] = 'start':
 			npc_QW['Anfisa'] = 3
 			'<center><img <<$set_imgh>> src="images\locations\city\residential\lake\sex\anfisa\talk6.jpg"></center>'
 			'"Well, We got one here." she sticks out her tongue and wanders off in search of adventure, leaving you alone.'
-			act 'Further': gt 'city_nudelake'
+			act 'Further': gt 'nudelake'
 		end
 	end
 end
@@ -111,7 +111,7 @@ if $ARGS[0] = 'alko':
 					'"Okay, none taken," smiles Anfisa, winking at you.'
 					'"Maybe another time then, if you change your mind, you''ll find me here."'
 					'She stands, waves goodbye and leaves.'
-					act 'Watch her go': gt 'city_nudelake'
+					act 'Watch her go': gt 'nudelake'
 				end
 			end
 		end
@@ -124,7 +124,7 @@ if $ARGS[0] = 'alko':
 			'"Oh well no so no" Anfisa smiles.'
 			'"Maybe another time then, if you change your mind, you''l find me here."'
 			'Chatting with you for a few more minuted, she stands, waves her hand in farewell, and wanders towards the exit'
-			act 'Watch her leave': gt 'city_nudelake'
+			act 'Watch her leave': gt 'nudelake'
 		end
 	end
 end
@@ -138,7 +138,7 @@ if $ARGS[0] = 'talk':
 	'For an hour, you and Anfisa sit, hugging, on the beach, just talking about all sorts of nonsence.'
 	'"Oh, <<$pcs_nickname>>, look at the time," glancing at her watch, Anfisa catches herself.'
 	'"I have to go." Quickly dressing and waving goodbye, she heads for the exit.'
-	act 'Back to the beach': gt 'city_nudelake'
+	act 'Back to the beach': gt 'nudelake'
 end
 
 if $ARGS[0] = 'kiss':
@@ -410,9 +410,10 @@ if $ARGS[0] = 'end':
 	end
 	'You and Anfisa, tired but very satisfied, sit side by side for some time, resting and idly talking about all sorts of trivia. Finally, Anfisa, glancing at her watch, says that it''s time for her to go and begins to dress.
  '+iif(anfisa['sex'] = 1,'I''m usually here on the beach in good weather, come sometime','See you soon, <<$pcs_nickname>>')+', she tells you and smiles as she leaves.'
-	act 'Watch her go': gt 'city_nudelake'
+	act 'Watch her go': gt 'nudelake'
 end
 
 
+
 --- anfisa_events ---------------------------------
 

locations/nudelake

@@ -0,0 +1,208 @@
+# Nudelake
+
+$loc = 'Nudelake'
+$loc_arg = ''
+$menu_loc = 'Nudelake'
+$menu_arg = ''
+menu_off = 0
+$location_type = 'secluded'
+
+'<center><b>nudist beach</b></center>'
+'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/nudelake.jpg"></center>'
+'The nudist beach - clothing optional.'
+
+if $clothingworntype = 'swimwear' or $clothingworntype = 'nude' or $clothingworntype = 'beach':
+	act'Get dressed':
+		cla & *clr
+		minut+=5
+		gs 'clothing', 'wear_last_worn'
+		gs 'underwear', 'wear'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/dress_nudebeach.jpg"></center>'
+		'You put your clothes back on.'
+		act'Continue':gt 'Nudelake'
+	end
+end
+
+if temper >= 15 and month >= 5 and month <= 9:
+	if func('changingroom','count_swim_item') > 0 and $clothingworntype ! 'swimwear' and $clothingworntype ! 'beach':
+		act'Change into your swimwear':
+			menu_off = 1
+			cla & *clr
+			minut+=5
+			if pcs_horny >= 90:
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants1.jpg"></center>'
+				'You want to change into a swimsuit, but with no changing room here and your pussy oozing juices down your leg coupled with the thought that people will see, horrifies you. You abandon the idea.'
+				'"I should sort out my arousal first." You think to yourself.'
+
+				act'Continue':gt 'Nudelake'
+			else
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/dress/swimsuit_nudebeach.jpg"></center>'
+				'You wrap a towel around yourself and you''re ready to change into your swimsuit.'
+
+				act'Choose outfit':gt 'changingroom', 'view_swim_list'
+			end
+		end
+	end
+end
+
+if temper >= 15 and month >= 5 and month <= 9:
+	if $clothingworntype ! 'nude':
+		act'Take off your clothes':
+			menu_off = 1
+			if pcs_inhib > 30:
+				cla & *clr
+				minut += 5
+				gs 'clothing', 'strip'
+				gs 'underwear', 'remove'
+				if pcs_horny >= 80 and exhibitionist_lvl > 1:
+					'<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_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. 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
+			else
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/shyness.jpg"></center>'
+				'Even though no one is around, you don''t feel confident enough to actually take your clothes off. What if someone would see you nude?'
+			end
+			act'Continue':gt 'Nudelake'
+		end
+	end
+end
+gs 'stat'
+
+if hour >= 6 and hour <= 20 and temper >= 15:
+	if $clothingworntype = 'nude':
+		'Here you can <a href="exec:gt ''Nudelake'', ''zagarat''">sunbathe</a> and <a href="exec:gt ''Nudelake'', ''swim''">swim</a>'
+		act 'Go swimming': gt 'Nudelake', 'swim'
+		act 'Go sunbathe': gt 'Nudelake', 'zagarat'
+		'Also, you can play <a href="exec:gt ''Nudelake'', ''voleybol''">beach volleyball</a>'
+	end
+elseif hour >= 6 and hour <= 20:
+	'Its too cold for any nudist activities.'
+else
+	'The nudist beach is closed.'
+end
+
+if anfisa['daystart'] ! daystart and npc_QW['Anfisa'] = 2 and $clothingworntype = 'nude' and ((week <= 5 and (hour < 17 and temper > 30)or (hour > 17 and temper >= 25)) or temper > 20)and rand(1,5) ! 1: 
+	'You see '+iif(anfisa['horny'] < 70,'sunbathing on the beach', 'wandering along the beach, tipsy')+' <a href="exec: gt ''anfisa''">Anfisa</a>.'
+	act 'Approach Anfisa':gt 'anfisa'
+end
+
+if $clothingworntype = 'nude':
+	act 'Get dressed':
+		if $clothingworntype = 'nude':gs 'clothing', 'wear_last_worn'
+		gs 'underwear', 'wear'
+	end
+else
+	act 'Return to the main beach':gt 'city_lake', 'start'
+end
+
+if katday ! daystart and npc_rel['A219'] >= 1 and temper >= 15:
+	'You see Kat on the beach.'
+	act 'Approach Kat':gt 'Katlake', 'kat'
+end
+
+if $ARGS[0] = 'voleybol':
+	$location_type = 'event_outdoors'
+	$menu_loc = 'Nudelake'
+	$menu_arg = 'voleybol'
+	menu_off = 0
+	*clr & cla
+	minut += 1
+	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/voleybol.jpg"></center>'
+	'You go to the volleyball court.'
+
+	act 'Watch':gt 'Nudelake', 'smotr'
+	act 'Leave':gt 'Nudelake'
+
+	act 'Play':
+		menu_off = 1
+		cla & *clr
+		agil_exp += 1
+		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.'
+
+		act 'Finish':gt 'Nudelake'
+	end
+end
+
+if $ARGS[0] = 'zagarat':
+	$location_type = 'event_outdoors'
+	*clr & cla
+	minut += 30
+	if pcs_sweat < 35 : gs 'sweat', 'add', 5
+	inhib_exp += rand(1,3)
+	pcs_mood += 5
+	menu_off = 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/nudezagarat.jpg"></center>'
+
+	if krem = 0:
+		pcs_tan += 1
+		'You go to the beach and sunbathe.'
+	else
+		krem -= 1
+		pcs_tan += 3
+		'You smear sunblock on your body and sunbathe.'
+	end
+
+	nzagrand = rand(0, 100)
+
+	if nzagrand >= 60 and nzagrand < 70 and npc_rel['A219'] > 30 and katkey = 0:gt 'Katlake', 'key'
+	if nzagrand >= 70 and nzagrand < 80 and kat = 0 and katday ! daystart:gt 'Katlake'
+	if nzagrand >= 80 and nzagrand < 90 and npc_QW['Anfisa'] < 2 and anfisa['daystart'] ! daystart: gt 'anfisa_events', 'start'
+	if nzagrand >= 80 and nzagrand < 90 and npc_QW['Anfisa'] = 2 and anfisa['daystart'] ! daystart and anfisa['horny'] >= 70: gt 'anfisa_events', 'alko'
+	if nzagrand >= 90:gt 'Vnlake2'
+
+	act 'Finish':gt 'Nudelake'
+end
+
+if $ARGS[0] = 'swim':
+	$location_type = 'event_outdoors'
+	menu_off = 0
+	cla
+	*clr
+	pcs_makeup = 1
+	cumspclnt = 4
+	gs 'cum_cleanup'
+	minut += 60
+	if $clothingworntype = 'nude':
+		gs 'exercise', 'tier1', 1, 'stren_exp'
+		gs 'exhibitionism', 2
+		inhib_exp += rand(1,3)
+	else
+		gs 'exercise', 'tier1', 1, 'stren_exp'
+		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>'
+	'You go for a swim.'
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
+
+	act 'Finish':gt 'Nudelake'
+end
+
+if $ARGS[0] = 'smotr':
+	$location_type = 'event_outdoors'
+	menu_off = 0
+	*clr & cla
+	minut += 30
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/voleybol.jpg"></center>'
+	'You watch the others play.'
+
+	act 'Leave':gt 'Nudelake'
+end
+
+--- Nudelake ---------------------------------
+