[added] Menu seeding for P

locations/Palatka.qsrc

@@ -2,9 +2,12 @@
 $location_type = 'event'
 
 if $ARGS[0] = 'start':
-	$sexloc = $CURLOC
-	$metkaM = $ARGS[0]
-	$locM = $CURLOC
+	$sexloc = 'Palatka'
+	$metkaM = 'start'
+	$locM = 'Palatka'
+	$menu_loc = 'Palatka'
+	$menu_arg = 'start'
+	menu_off = 0
     $location_type = 'private'
 	palMir = 1
 	gs 'stat'
@@ -29,6 +32,8 @@ end
 if $ARGS[0] = 'pal0':
 	cla
 	*clr
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/military/sex/pal0.jpg"></center>'
 	'Once you begin to change clothes, you notice that there are two soldiers in the tent. They see you half-naked, walking up to you with their erect cocks. You long for their cocks, wondering if you should get them off or ignore them and relax after a hard day instead.'
 
@@ -49,6 +54,8 @@ end
 if $ARGS[0] = 'pal1':
 	cla
 	*clr
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/military/pal1.jpg"></center>'
 	'Entering the tent, you stumble, you reflexively close your eyes, as you prepare to hit the floor face first. Much to your surprise you do not land on the floor. Instead you feel powerful, strong hands catching you. Opening your eyes in surprise, you look up and see that a well-built black soldier has caught you in his arms.'
 

locations/ParChurch.qsrc

@@ -16,8 +16,11 @@ if $ARGS[0] = 'start':
 			if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
 		end
 	end
-	$loc = $CURLOC
-	$metka = $ARGS[0]
+	$loc = 'ParChurch'
+	$metka = 'start'
+	$menu_loc = 'ParChurch'
+	$menu_arg = 'start'
+	menu_off = 0
 	gs 'stat'
 	'<center><b><font color="maroon">Church of Saint Nikolas</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/st-nikolas.jpg"></center>'
@@ -53,6 +56,7 @@ end
 if $ARGS[0] = 'vigil':
 	cls
 	CLOSE ALL
+	menu_off = 1
 	churchday = daystart
 	pcs_mood += 10
 	temprand = rand(0,5)
@@ -106,6 +110,7 @@ if $ARGS[0] = 'liturgy':
 	cls
 	CLOSE ALL
 	churchday = daystart
+	menu_off = 1
 	gs 'stat'
 	hour = 12
 	PLAY 'sound/church/t' + rand(1,19) + '.mp3',30
@@ -149,6 +154,7 @@ end
 if $ARGS[0] = 'Narthex':
 	cls
 	CLOSE ALL
+	menu_off = 1
 	gs 'stat'
 	PLAY 'sound/church/76139__dkustic__090227-01-people-church-concert.wav',30
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/enterchurch.jpg"></center>'
@@ -166,6 +172,7 @@ end
 if $ARGS[0] = 'candle':
 	cls
 	minut += 30
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/ch_candle.jpg"></center>'
 	if money >= 10 and owechurch = 0: 
@@ -198,6 +205,7 @@ end
 
 if $ARGS[0] = 'pray':
 	cls
+	menu_off = 1
 	randtime = rand(15,60)
 	minut += randtime
 	if pav_sex > 1: pav_sex -= 1
@@ -259,6 +267,7 @@ end
 
 if $ARGS[0] = 'amends':
 	cls
+	menu_off = 1
 	minut += 15
 	gs 'stat'
 	'As you approach the priest, you recall your previous behaviour and that the priest said that he wanted to discuss it with you further.'
@@ -440,7 +449,9 @@ end
 if $ARGS[0] = 'confessional':
 	cls
 	cla
+	menu_off = 1
 	minut += 5
+	gs 'atat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/church/ch_talk.jpg"></center>'
 	'As you got ready to kneel, Father Kirill stopped you.'
 	'"One moment, my dear." he says softly, "I was wondering if you wouldn''t mind indulging an old man."'
@@ -496,6 +507,8 @@ if $ARGS[0] = 'confessional':
 end	
 
 if $ARGS[0] = 'Questions':
+	menu_off = 1
+	gs 'stat'
 	if Kirillsex = 0:
 		pcs_horny += 2
 		'"father, are you alright?" you ask concerned, "You sound out of breath."'

locations/ParChurch2.qsrc

@@ -1,6 +1,7 @@
 # ParChurch2
 if $ARGS[0] = 'confession':
 	cls
+	menu_off = 1
 	gs 'stat'
 	if confK ! 0: lastconf = daystart - confess
 	confess = daystart

locations/ParkKafe.qsrc

@@ -56,6 +56,7 @@ end
 if $ARGS[0] = 'guys':
 	menu_off = 1
 	cla
+	gs 'stat'
 
 	if rand(0, 1) = 0:
 		'You look at them intensely, but you don''t think they notice you.'
@@ -149,6 +150,7 @@ end
 if $ARGS[0] = 'Armenians':
 	menu_off = 1
 	cla
+	gs 'stat'
 
 	if rand(0, 1) = 0:
 		'You look at them intensely, but you don''t think they notice you.'
@@ -224,6 +226,7 @@ end
 if $ARGS[0] = 'man':
 	menu_off = 1
 	cla
+	gs 'stat'
 
 	if rand(0, 1) = 0:
 		'You stealthily glance at the respectable man, but it doesn''t look like he noticed you.'
@@ -270,13 +273,16 @@ end
 if $ARGS[0] = 'woman':
 	menu_off = 1
 	cla
+	gs 'stat'
 	'You stealthily glance at the imperious woman, but she doesn''t seem to noticed you.'
 
 	act 'Leave': gt 'parkKafe', 'end', 'cafe'
 end
 
 if $ARGS[0] = 'youth':
+	menu_off = 1
 	cla
+	gs 'stat'
 
 	if rand(0, 1) = 0:
 		'You look at the group of snickering youths, but they don''t seem to notice you.'
@@ -343,6 +349,7 @@ end
 if $ARGS[0] = 'negros':
 	menu_off = 1
 	cla
+	gs 'stat'
 
 	if rand(0, 1) = 0 or afra >= 1:
 		'You stealthily glance at the Africans, but it looks like they overlooked you.'
@@ -359,6 +366,7 @@ end
 if $ARGS[0] = 'the_boy':
 	menu_off = 1
 	cla
+	gs 'stat'
 
 	if rand(0, 1) = 0 and gosh = 0:
 		'You secretly look at the young boy, but it looks like he didn''t notice you.'

locations/Peterroom.qsrc

@@ -1,8 +1,11 @@
 # Peterroom
+
 if $ARGS[0] = 'start_door':
 	cla
-	clr
 	*clr
+	$menu_loc = 'Peterroom'
+	$menu_arg = 'start_door'
+	menu_off = 0
 	minut += 5
 	gs 'stat'
 	gs 'themes', 'indoors'
@@ -16,7 +19,9 @@ if $ARGS[0] = 'start_door':
 	end
 
 	act 'Ring the doorbell':
+		menu_off = 1
 		cla
+		gs 'stat'
 
 		if petersexday < 1:
 			petersexday += 1
@@ -39,6 +44,8 @@ end
 if $ARGS[0] = 'start':
 	cla
 	*clr
+	menu_off = 1
+	gs 'stat'
 
 	if peter > 0 :
 		peterrand = rand(1, 2)

locations/Prostitute.qsrc

@@ -6,6 +6,7 @@ if $ARGS[0] = 'start':
 	$loc = $CURLOC
 	$metkaSex = $ARGS[0]
 	$locSex = $CURLOC
+	menu_off = 1
 	cls
 	minut += 5
 	gs 'stat'

locations/panties.qsrc

@@ -4,6 +4,8 @@
 !!gs 'panties', 'remove'
 !!gs 'panties', 'wear'
 
+menu_off = 1
+
 if $ARGS[0] = 'dispose':
 	dynamic $pantyworntype + '_panties[<<pantywornnumber>>] = 0'
 	$lastwornpantytype = 'none'

locations/park.qsrc

@@ -524,7 +524,7 @@ end
 
 if $ARGS[0] = 'prost':
 	*clr & cla
-	menu_off = 0
+	menu_off = 1
 	minut += 5
 	gs 'stat'
 	'<center><b><font color="maroon">Hooker</font></b></center>'
@@ -714,7 +714,7 @@ end
 if $ARGS[0] = 'rape1':
     $location_type = 'event_outdoors'
 	*clr & cla
-	menu_off = 0
+	menu_off = 1
 	rape += 1
 	gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
 	gs 'boyStat', $npclastgenerated

locations/parkBimbo.qsrc

@@ -5,10 +5,11 @@ if $ARGS[0] = 'pos1':
 	*clr
 	minut += 10
 	pcs_horny += 5
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/parkbimbo1.jpg"></center>'
 	'You notice a old guy, who has to be in his sixties watching you. Then you notice he has his rather large dick out and he has a raging hard on.'
-	if pcs_horny > 50:act 'Help the old guy out.':gt 'parkBimbo', 'pos2'
+	if pcs_horny > 50:act 'Help the old guy out':gt 'parkBimbo', 'pos2'
 	act 'Flip him the bird':gt 'gskver', 'start'
 end
 

locations/parkM.qsrc

@@ -1,5 +1,7 @@
 # parkM
 
+menu_off = 1
+
 if $ARGS[0] = 'start':
 	minut += 30
 	'You leisurely stroll through the park.'

locations/parkivent.qsrc

@@ -1,5 +1,7 @@
 # parkivent
 
+menu_off = 1
+
 if $ARGS[0] = 'empty':
 	pcs_mood += 10
 	pcs_willpwr += 10

locations/parks.qsrc

@@ -5,6 +5,9 @@ if $ARGS[0] = 'start':
 	$location_type = 'public_outdoors'
 	$metka = 'start'
 	$loc = 'parks'
+	$menu_loc = 'parks'
+	$menu_arg = 'start'
+	menu_off = 0
 	gs'stat'
 	'<center><B>Old Town Park</B></center>'
 	'<center><img <<$set_imgh>> src="images/locations/oldtown/park/parkus.jpg" ></center>'
@@ -46,6 +49,7 @@ if $ARGS[0] = 'start':
 
 	if pcs_inhib >= 35 or exhibitionist_lvl > 0:
 		act 'Flash your tits':
+			menu_off = 1
 			if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
 			cls
 			gs 'exhibitionism', 1
@@ -59,6 +63,7 @@ if $ARGS[0] = 'start':
 
 	if exhibitionist_lvl > 1:
 		act 'Flash your pussy':
+			menu_off = 1
 			if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
 			cls
 			gs 'exhibitionism', 3

locations/party_boy.qsrc

@@ -1,4 +1,6 @@
 # party_boy
+menu_off = 1
+
 if $ARGS[0] = 'party_boy':
 	cls
 	minut += 5

locations/party_boys.qsrc

@@ -8,6 +8,9 @@ if $ARGS[0] = 'drink':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	party_boys_drink += 1
+	$menu_loc = 'party_boys'
+	$menu_arg = 'drink'
+	menu_off = 0
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_2_' + rand(1,4) + '.jpg"></center>'
 	i = rand(1,6)
@@ -48,28 +51,32 @@ if $ARGS[0] = 'drink':
 		'"Guys, you poured too much into the glass. I''m drunk already." , you say."'
 		'"Come on <<$pcs_nickname>>, lets have another." with that, one of the guys puts his arm around you and bares your breasts. The touchy guy is surprisingly nice and you are a little amused by this situation.'
 		if rex >= 50:'You notice Rex in the room...'
-		if rex >= 50: act 'Take a look at Rex':gt 'party_boys', 'Rex_save'
-		act 'Giggle':gt 'party_boys', 'smile'
-		if pcs_dom >= 10: act 'Try to escape':gt 'party_boys', 'Try_save'
+		if rex >= 50: act 'Take a look at Rex':minut += 5 & gt 'party_boys', 'Rex_save'
+		act 'Giggle':minut += 5 & gt 'party_boys', 'smile'
+		if pcs_dom >= 10: act 'Try to escape':minut += 5 & gt 'party_boys', 'Try_save'
 	end
 end
 
 if $ARGS[0] = 'Rex_save':
 	cls
-	minut += 5
 	Rex_save +=1
+	$menu_loc = 'party_boys'
+	$menu_arg = 'Rex_save'
+	menu_off = 0
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_10.jpg"></center>'
 	'You glance over to Rex. He seems ready to help you out of this awkward situation.'
 	'He quickly exclaims, "Hey boys, are you insane? Take your hands off my fucking girl. One more time and I will kick your ass!"'
 	'The guy takes his hands off of you, "Rex, bro, we were just having a bit of drunken fun. I''m sorry, if I hurt your girl."'
 	'Rex comes up to you and picks you up, "Come on, sweety. I''ll make sure the other guys leave you alone. Lets go to another room."'
-	act 'Go to the Rex''s room':gt 'party_boys', 'V_komnatu'
+	act 'Go to the Rex''s room':minut += 5 & gt 'party_boys', 'V_komnatu'
 end
 
 if $ARGS[0] = 'smile':
 	cls
-	minut += 5
+	$menu_loc = 'party_boys'
+	$menu_arg = 'smile'
+	menu_off = 0
 	party_boys_in +=1
 	gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
 	gs 'boyStat', $npclastgenerated
@@ -85,23 +92,27 @@ if $ARGS[0] = 'smile':
 	'You give the guys a faint smile, showing your availability. They quickly realize the situation and come over to you and start to stroke your hair and massage your neck. It is very relaxing and you give a soft sigh which turns into a moan. You have the full attention of the boys and they decide to drag you.'
 	i = rand(1,2)
 	if i = 1:act 'Go outside Rex''s house':gt 'party_boys', 'out'
-	if i = 2:act 'Go to another room':gt 'party_boys', 'V_komnatu'
+	if i = 2:act 'Go to another room':minut += 5 & gt 'party_boys', 'V_komnatu'
 end
 
 if $ARGS[0] = 'Try_save':
 	cls
-	minut += 5
+	$menu_loc = 'party_boys'
+	$menu_arg = 'Try_save'
+	menu_off = 0
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_3.jpg"></center>'
 	'You find the strength to break free of the grasping hands, shouting "Let me go, I don''t want that. Get your filthy hands off me."'
 	'"Come on, <<$pcs_nickname>>, we''re just having fun. Just admit that you liked where this was going." the touchy guy responds.'
 	act 'Move away':gt $loc,$metka
-	act 'Giggle':gt 'party_boys', 'smile'
+	act 'Giggle':minut += 5 & gt 'party_boys', 'smile'
 end
 
 if $ARGS[0] = 'V_komnatu':
 	cls
-	minut += 5
+	$menu_loc = 'party_boys'
+	$menu_arg = 'V_komnatu'
+	menu_off = 0
 	gs'stat'
 	i = rand(1,5)
 	if i = 1:
@@ -147,6 +158,7 @@ if $ARGS[0] = 'out':
 	gang += 1
 	pcs_vag += 3
 	pcs_ass += 3
+	menu_off = 1
 	gs'stat'
 	i = rand(1,4)
 	if i = 1:
@@ -440,6 +452,7 @@ if $ARGS[0] = 'in':
 	stat['anal'] +=1
 	pcs_vag += 3
 	pcs_ass += 3
+	menu_off = 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_5_' + rand(7,13) + '.jpg"></center>'
 	'You fall down on your knees in front of the annoying guys and put your hand on two of their members. Tightening your grip slightly, you cause a faint sigh from one of the boys. You lick their members from the bottom up closing your lips around their heads. You continue taking turns sucking on their dicks without stopping. Your lips slide up and down on each member, exploring every bump and vein on their rock hard dicks. Greedily you take care of each one, leaving nobody unsatisfied. One of the guys starts to caress your back. He seems ready.'
@@ -523,6 +536,7 @@ if $ARGS[0] = 'gost_drink':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	party_boys_in += 1
+	menu_off = 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_1.jpg"></center>'
 	'You happily make a couple of sips. Some guys urge you to show off more of your body.'
@@ -534,6 +548,7 @@ end
 
 if $ARGS[0] = 'boobs_yes':
 	cls
+	menu_off = 1
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_3.jpg"></center>'
 	if Rex_Love = 1:'You completely ignore Rex and laugh at the seemingly happy guys.'
@@ -611,6 +626,7 @@ end
 
 if $ARGS[0] = 'boobs':
 	cls
+	menu_off = 1
 	gs'stat'
 	i = rand(1,2)
 	if i = 1:'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_2_1.mp4"></video></center>'
@@ -628,6 +644,7 @@ end
 
 if $ARGS[0] = 'gost_drink_else':
 	cls
+	menu_off = 1
 	minut += 5
 	alko +1
 	cumspclnt = 2
@@ -726,6 +743,7 @@ end
 
 if $ARGS[0] = 'gost_home_cum':
 	cls
+	menu_off = 1
 	minut += 5
 	facial += 1
 	gs 'boyStat', $boy1
@@ -752,6 +770,7 @@ end
 
 if $ARGS[0] = 'gost_home_cow':
 	cls
+	menu_off = 1
 	pcs_vag += 1
 	pcs_ass += 1
 	guy += 2
@@ -774,6 +793,7 @@ end
 
 if $ARGS[0] = 'gost_home_dog':
 	cls
+	menu_off = 1
 	pcs_vag += 2
 	guy += 2
 	gang += 1
@@ -795,6 +815,7 @@ end
 
 if $ARGS[0] = 'gost_home_suck':
 	cls
+	menu_off = 1
 	gs'stat'
 	i = rand(1,2)
 	if i = 1:'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_9_' + rand(8,9) + '.mp4"></video></center>'
@@ -808,6 +829,7 @@ end
 
 if $ARGS[0] = 'gost_home_hand':
 	cls
+	menu_off = 1
 	gs'stat'
 	'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_9_' + rand(6,7) + '.mp4"></video></center>'
 	'You run your fingers up and down their shafts before gripping them firmly. You start to stroke them, feeling their dicks getting harder and harder in your hands.'
@@ -818,6 +840,7 @@ end
 
 if $ARGS[0] = 'gost_home':
 	cls
+	menu_off = 1
 	if Rex_Love ! 0:
 		gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
 		$boy1 = $npclastgenerated
@@ -838,6 +861,7 @@ end
 
 if $ARGS[0] = 'gost_dance':
 	cls
+	menu_off = 1
 	minut += 5
 	if pcs_inhib < 40:inhib_exp += rand(1,2)
 	gs'stat'
@@ -852,6 +876,7 @@ end
 
 if $ARGS[0] = 'dance':
 	cls
+	menu_off = 1
 	minut += 5
 	if pcs_inhib < 40:inhib_exp += rand(1,2)
 	gs'stat'
@@ -866,6 +891,7 @@ end
 
 if $ARGS[0] = 'party_boys':
 	cls
+	menu_off = 1
 	minut += 5
 	gs'stat'
 	'<center><b><font color = maroon>Guys</font></b></center>'

locations/party_girls.qsrc

@@ -1,5 +1,7 @@
 # party_girls
 
+menu_off = 1
+
 if $ARGS[0] = 'talk':
 	cls
 	minut += 5

locations/pavCommercialOffices.qsrc

@@ -1,9 +1,12 @@
 # pavCommercialOffices
 
-$metka = $ARGS[0]
-$loc = $CURLOC
-$metkaStreet = $ARGS[0]
-$locStreet = $CURLOC
+$metka = ''
+$loc = 'pavCommercialOffices'
+$metkaStreet = ''
+$locStreet = 'pavCommercialOffices'
+$menu_loc = 'pavCommercialOffices'
+$menu_arg = ''
+menu_off = 0
 CLOSE ALL
 
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/officebuilding.jpg"></center>'

locations/pavComplexOld.qsrc

@@ -2,8 +2,11 @@
 
 ! apt house entry hallway
 if $ARGS[0] = 'etaj_1':
+	$menu_loc = 'pavComplexOld'
+	$menu_arg = 'etaj_1'
 	menu_off = 0
 	minut += 2
+	gs 'stat'
 	'<center><h3>old apartment building</h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/apthallway.jpg"></center>'
 	''
@@ -15,6 +18,7 @@ if $ARGS[0] = 'etaj_1':
 	act 'Take the elevator':
 		*clr & cla
 		minut +=1
+		menu_off = 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/liftnotwork.jpg"></center>'
 		'The building supervisor put a sign on the elevator: "Dear tenants, the elevator is out of order for today. Don''t worry, I should have it working again by tomorrow!". Unfortunately, that sign has been there for years.'
@@ -24,6 +28,7 @@ if $ARGS[0] = 'etaj_1':
 	act 'Go up to the second floor':
 		*clr & cla
 		minut +=1
+		menu_off = 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/brokenstairs.jpg"></center>'
 		'The stairs are as rundown as the rest of the apartment building.Thankfully there is no one I want to see on the floor above.'
@@ -34,7 +39,11 @@ if $ARGS[0] = 'etaj_1':
 end
 
 if $ARGS[0] = 'advert':
+	$menu_loc = 'pavComplexOld'
+	$menu_arg = 'advert'
+	menu_off = 0
 	minut += 2
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/board.jpg"></center>'
 	''
 	act 'Continue':gt 'pavComplexOld', 'etaj_1'

locations/pavComplexb2.qsrc

@@ -165,7 +165,9 @@ if $ARGS[0] = 'roof':
 				minut += 60
 				inhib_exp += rand(1,3)
 				if pcs_sweat < 35: pcs_sweat += 5
+				menu_off = 1
 				pcs_mood += 5
+				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/zagar1.jpg"></center>'
 
 				if krem = 0:

locations/pavComplexb3.qsrc

@@ -165,10 +165,12 @@ if $ARGS[0] = 'roof':
 			act 'Sunbathe (1:00)':
 				cla
 				*clr
+				menu_off = 1
 				minut += 60
 				inhib_exp += rand(1,3)
 				if pcs_sweat < 35: pcs_sweat += 5
 				pcs_mood += 5
+				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/zagar1.jpg"></center>'
 
 				if krem = 0:

locations/pavResidential.qsrc

@@ -165,6 +165,8 @@ if (hour > 20 or hour < 4) and succubusQW = 5 and suchuntday ! daystart:
 	act 'Go hunting near the community center (this can take a lot of time)':
 		scrand = rand(0,4)
 		minut += 60 - (5 * (succublvl + scrand))
+		menu_off = 1
+		gs 'stat'
 		if rand(0,7) - succublvl < 2:
 			gt 'succubus', 'pavResfeed'
 		else
@@ -196,6 +198,7 @@ end
 if StoryLine ! 0 and (hour >= 8 or hour < 23) and cumloc[11] = 1 and rand(0, 3) = 0 and sosedday ! daystart:
 	*clr & cla
 	sosedday = daystart
+	menu_off = 1
 	gs 'stat'
 
 	if sosedknow = 0:
@@ -210,8 +213,10 @@ if StoryLine ! 0 and (hour >= 8 or hour < 23) and cumloc[11] = 1 and rand(0, 3)
 end
 
 if pcs_magik >= 1 and mainQW = 0 and altQS = 1:
+	menu_off = 1
 	*clr & cla
 	mainQW = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
 	'At the entrance to the apartment building you see Tatiana and Juugo. Tatiana adjusts her glasses and looks around, while Juugo seems to have his head in the clouds not really paying attention to his surroundings. His tattoos are not visible.'
 	'Tatiana closely looks around you: "I felt a burst of energy. Were you attacked by a magician?"'
@@ -221,7 +226,9 @@ if pcs_magik >= 1 and mainQW = 0 and altQS = 1:
 end
 
 if storyline ! 0 and AndRev = 1 and (hour >=22 or hour <=2) and rand(1,100) >= 90 and AndRevstart ! daystart:
+	menu_off = 1
 	*clr & cla
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
 	'It was late and you were hurrying to get home when you are suddenly grabbed from behind. A large hand covered your mouth and you cannot scream. A powerful arm wrapped around your arms and chest and lifted you from your feet. You are dragged into an alleyway between two buildings and the arm around you loosened for just a moment.'
 	act 'Continue':
@@ -235,18 +242,22 @@ end
 if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
 
 if npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week = 7:
+	menu_off = 1
 	cla & *clr
 	daybelisex = daystart
 	minut += 5
+	gs 'stat'
 	
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
 	'As you walk through Pavlovsk, Vadim Belys Mitsubishi Pajero stops near you.'
 
 	act 'Go to the jeep': return_residential = 1 & gt 'belgang', 'payday' 	
 elseif npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week ! 7 and belgangPayWeek >= 300 and belgangProstitute = 1 and rand (0,2) = 0:
+	menu_off = 1
 	cla & *clr
 	daybelisex = daystart
 	minut += 5
+	gs 'stat'
 	
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
 	'You see the by now familiar old Mitsubishi Pajero driving through the streets with Vadim Bely and his gang. Your heart skips a beat as you notice one of them pointing at you, and soon they pull over.'

locations/pavcomplexrolan.qsrc

@@ -1,7 +1,8 @@
 # pavcomplexrolan
 
+menu_off = 1
 CLOSE ALL
-$metka = $ARGS[0]
+$metka = ''
 $loc = 'pavcomplexrolan'
 $location_type = 'public_outdoors'
 

locations/pavtrain.qsrc

@@ -36,6 +36,7 @@ if kidaloa = 0:
 
 	if money >= 5000 and hour >= 8 and hour <= 20 and podrand = 0 and monthKidalo ! month:
 		cls
+		menu_off = 1
 		monthKidalo = month
 		gs 'stat'
 		'<center><h4>Pavlovsk''s train station</h4></center>'
@@ -94,6 +95,7 @@ if kidalob = 0:
 	podrand = rand(0, 5)	
 	if money >= 1000 and hour >= 8 and hour <= 20 and podrand = 5 and ($clothingworntype = 'formal' or $clothingworntype = 'expensive') and monthKidalo ! month:
 		cls
+		menu_off = 1
 		monthKidalo = month
 		gs 'stat'
 		'<center><h4>Pavlovsk''s train station</h4></center>'

locations/pavtrain_market.qsrc

@@ -8,8 +8,11 @@ Fixed Rice wine event
 }
 $location_type = 'public_outdoors'
 if $ARGS[0] = 'start':
-	$metka = $ARGS[0]
-	$loc = $CURLOC
+	$metka = 'start'
+	$loc = 'pavtrain_market'
+	$menu_loc = 'pavtrain_market'
+	$menu_arg = 'start'
+	menu_off = 0
 	CLOSE ALL
 	if sound = 0:
 		if month >=11 and month <= 12 or month >=1 and month <=3:
@@ -40,6 +43,7 @@ if $ARGS[0] = 'start':
 			'An Armenian man comes up to you and in broken Russian says, "You girl who like men, no? Come meet real men have good time."'
 			act 'Go with him':gt 'gevent', '3'
 			act 'Reject him':
+				menu_off = 1
 				cla
 				'You pretend not to understand what he is saying.'
 				act 'Return':gt 'pavtrain_market', 'start'
@@ -69,6 +73,7 @@ if $ARGS[0] = 'start':
 
 		if gobelen > 0 and gobQW = 0:
 			act'Sell ​​tapestry':
+				menu_off = 1
 				cls
 				gobQW = 1
 				minut += 15
@@ -81,6 +86,7 @@ if $ARGS[0] = 'start':
 
 		if gobelen > 0 and gobQW >= 1:
 			act'Sell ​​tapestry':
+				menu_off = 1
 				cls
 				minut += 15
 				gs'stat'
@@ -121,6 +127,7 @@ if $ARGS[0] = 'start':
 			cla
 			gs 'stat'
 			minut += 20
+			menu_off = 1
 			lookwine = daystart
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
 			'You were looking through the market when you came upon a stall selling Chinese foods. On a shelf behind the old woman minding the stall there are a number of bottles.'
@@ -153,7 +160,7 @@ if $ARGS[0] = 'start':
 					'You are astonished by the price and realize that you cannot afford the wine. You apologize and turn away.'
 					act 'Leave the market': gt 'pavtrain_market', 'start'
 					act 'Continue browsing the market':
-						cls
+						*clr
 						cla
 						gs 'stat'
 						minut += 15
@@ -173,7 +180,8 @@ if $ARGS[0] = 'start':
 			end
 		elseif ShowerIvan = 5 and lookwine ! daystart:
 			cla
-			cls
+			*clr
+			menu_off = 1
 			gs 'stat'
 			lookwine = daystart
 			if month >= 11 or month <= 3:
@@ -185,8 +193,9 @@ if $ARGS[0] = 'start':
 			act 'Leave': gt 'pavtrain_market', 'start'
 		end
 		if porndeal = 1 and porndealday ! daystart:
-			cls 
+			*clr
 			cla
+			menu_off = 1
 			gs 'stat'
 			porndealday = daystart
 			lookboy = 0
@@ -207,6 +216,7 @@ if $ARGS[0] = 'start':
 		if porndeal = 1 and porndealday = daystart and lookboy = 0:
 			cls
 			cla
+			menu_off = 1
 			gs 'stat'
 			lookboy = 1
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/chinese_stall01.jpg"></center>'
@@ -224,6 +234,7 @@ if $ARGS[0] = 'events':
 	cla
 	'<center><h4>Market</h4></center>'
 	minut += 10
+	menu_off = 1
 	gs 'stat'
 	rinevrand = rand(1,19)
 
@@ -252,6 +263,8 @@ end
 if ARGS[0] = 1:
 	cla
 	*clr
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/poproshaika1.jpg"></center>'
 	'You are strolling through the market when a beggar asks you for some change.'
 	act 'Don''t give money': 
@@ -282,6 +295,7 @@ end
 
 if ARGS[0] = 3:
 	cls
+	menu_off = 1
 	gs 'stat'
 	if month >= 11 or month <= 3:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/bookw.jpg"></center>'
@@ -328,6 +342,8 @@ end
 if ARGS[0] = 4:
 	cla
 	*clr
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pornmag.jpg"></center>'
 	'You find a small stall that has many shelves with a large variety of porn magazines, a pack of brand new porn playing cards, and you can see several sex toys just behind the counter. The salesman watches over his stall with shifty eyes.'
 	act 'Leave':gt 'pavtrain_market', 'start'
@@ -530,6 +546,8 @@ if ARGS[0] = 5:
 end
 
 if ARGS[0] = 6:
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/nenavizublyadcigan.jpg"></center>'
 	'You meet a Gypsy woman. She offers to tell your fortune.'
 	act 'Agree':
@@ -558,6 +576,7 @@ if ARGS[0] = 6:
 end
 
 if ARGS[0] = 7:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/kosmetic.jpg"></center>'
 	tovpay = 800
 	'You see some cosmetics on sale for <<tovpay>> <b>₽</b>.'
@@ -574,6 +593,7 @@ if ARGS[0] = 7:
 end
 
 if ARGS[0] = 8:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/vitaminki.jpg"></center>'
 	tovpay = 105
 	'You see some vitamins on sale for <<tovpay>> <b>₽</b>.'
@@ -589,6 +609,7 @@ if ARGS[0] = 8:
 end
 
 if ARGS[0] = 9:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/condoms.jpg"></center>'
 	tovpay = 80
 	'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
@@ -609,6 +630,7 @@ if ARGS[0] = 9:
 end
 
 if ARGS[0] = 10:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/balzam.jpg"></center>'
 	tovpay = 100
 	'There is lip balm on sale for <<tovpay>> <b>₽</b>.'
@@ -624,6 +646,7 @@ if ARGS[0] = 10:
 end
 
 if ARGS[0] = 11:
+	menu_off = 1
 	if arturKnow = 0:
 		'Someone suddenly calls out to you, "Hey pretty girl, do you want a fresh, juicy tangerine?"'
 		act 'Look': gt 'arturRinok','start'
@@ -634,6 +657,7 @@ if ARGS[0] = 11:
 end
 
 if ARGS[0] = 12:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/cheburek.jpg"></center>'
 	'Walking through the market, you came across a old woman selling pies.'
 	if pcs_energy <= 80:
@@ -659,6 +683,7 @@ if ARGS[0] = 12:
 end
 
 if ARGS[0] = 13:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dropwallet.jpg"></center>'
 	'You see woman ahead of you drop her purse.'
 	cla
@@ -716,6 +741,7 @@ if ARGS[0] = 17:
 end
 
 if ARGS[0] = 18:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/dirka.jpg"></center>'
 	'As you walk past a stall you notice a small hole torn in the canvas.'
 	act 'Look through the hole':
@@ -729,6 +755,7 @@ if ARGS[0] = 18:
 end
 
 if ARGS[0] = 19:
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/birthcontrolpills.jpg"></center>'
 	tovpay = 1500
 	'You see a booth selling birth control pills for <<tovpay>> <b>₽</b>.'

locations/pavtrainhall.qsrc

@@ -57,6 +57,7 @@ if $ARGS[0] = '':
 			act 'Work': gt 'pavtrainhall', 'work'
 		elseif cleZarplatDay ! daystart:
 			act 'Collect your salary':
+				menu_off = 1
 				*clr & cla
 				'<center><h4>Pavlovsk train station interior</h4></center>'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzal.jpg"></center>'

locations/pavtrainhall_events.qsrc

@@ -2,6 +2,7 @@
 
 if $ARGS[0] = 'manager':
 	cls
+	menu_off = 1
 	gs 'stat'
 	'When you walk past the station manager''s office, you notice a sign next to the door:'
 	'"Cleaner wanted! 2 hours per day at any time, salary 130 <b>₽</b>. Ask inside for more info."'
@@ -37,6 +38,7 @@ end
 
 if $ARGS[0] = 'wallet1':
 	cls
+	menu_off = 1
 	gs 'stat'
 	'<center><h4>Pavlovsk train station interior</h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzal.jpg"></center>'
@@ -87,6 +89,7 @@ if $ARGS[0] = 'wallet2':
 end
 
 if $ARGS[0] = 'vera':
+	menu_off = 1
 	verarand = rand(0, 1)
 
 	if verakassir = 3 and hour >= 8 and hour <= 20 and verarand = 0:
@@ -549,6 +552,7 @@ if $ARGS[0] = 'vera':
 end
 
 if $ARGS[0] = 'toilet_event':
+	menu_off = 1
 	startevtoirand = rand(0, 1)
 
 	if startevtoirand = 0:
@@ -646,6 +650,7 @@ end
 
 if $ARGS[0] = 'trinkets':
 	cls
+	menu_off = 1
 	minut += 30
 	prodskill = pcs_apprnc/4 + pcs_sprt + pcs_dom
 

locations/paysex.qsrc

@@ -4,6 +4,8 @@
 ! It does not need the array size
 ! Custom text can be entered for each kind of sex type, in $paysextext[0] = '', $paysextext[1] = '' format
 
+menu_off = 1
+
 if ARGS[1] > 0:
 	knwn = ARGS[1] 
 	:knownloop

locations/pirsingsalon.qsrc

@@ -1,8 +1,12 @@
 # pirsingsalon
 
+menu_off = 1
 
 if $ARGS[0] = 'start':
 	$location_type = 'indoors'
+	$menu_loc = 'pirsingsalon'
+	$menu_arg = 'start'
+	menu_off = 0
 	gs 'stat'
 	gs 'themes', 'indoors'
 	'<center><b>Tattoo & Piercing Salon</b></center>'

locations/placer_act.qsrc

@@ -1,4 +1,6 @@
 # placer_act
+
+menu_off = 1
 gs 'stat'
 gs 'skverdin'
 

locations/placer_end.qsrc

@@ -1,8 +1,10 @@
 # placer_end
-gs 'stat'
+
 
 if Frend_num = 14:
+	menu_off = 1
 	KatjaHorny += 10
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/14.jpg"></center>'
 	'You walk back home with Katja.'
 	if KatjaOhrenet > 0:
@@ -17,10 +19,10 @@ if Frend_num = 14:
 
 	'You say goodbye and Katja disappears into her house.'
 
-	 act 'Leave':
-		 Frend_num = 0
-		 gt 'pavResidential'
-	 end
+	act 'Leave':
+		Frend_num = 0
+		gt 'pavResidential'
+	end
 end
 
 --- placer_end ---------------------------------

locations/placer_gop_orgy.qsrc

@@ -1,4 +1,8 @@
 # placer_gop_orgy
+
+
+menu_off = 1
+
 alko += 5
 cumspclnt = 2
 gs 'cum_cleanup'

locations/placer_gskver.qsrc

@@ -1,4 +1,5 @@
 # placer_gskver
+
 if hour >= 22 or hour < 8:
 	encounter = 0
 else

locations/placer_house.qsrc

@@ -1,4 +1,7 @@
 # placer_house
+
+menu_off = 1
+
 alko += 10
 cumspclnt = 2
 gs 'cum_cleanup'

locations/placer_house_one.qsrc

@@ -1,4 +1,7 @@
 # placer_house_one
+
+menu_off = 1
+
 alko += 10
 cumspclnt = 2
 gs 'cum_cleanup'

locations/placer_sex.qsrc

@@ -1,4 +1,7 @@
 # placer_sex
+
+menu_off = 1
+
 $metkaM = $ARGS[0]
 $location_type = 'event'
 gs'stat'

locations/pod_ezd.qsrc

@@ -3,8 +3,8 @@
 !SETTINGS:
 CLOSE ALL
 gs 'themes', 'indoors'
-$metka = $ARGS[0]
-$loc = $CURLOC
+$metka = ''
+$loc = 'pod_ezd'
 !elevator does not work
 if liftnotwork_day ! daystart: liftnotwork_count = 1
 !Apartment Uncle Misha

locations/pod_whore.qsrc

@@ -1,5 +1,7 @@
 # pod_whore
 
+menu_off = 1
+
 !chatter with the client
 if $ARGS[0] = 'client_talk':
 	CLOSE ALL

locations/podezdM.qsrc

@@ -2,6 +2,8 @@
 
 if $ARGS[0] = 'start':
 	minut += 15
+	menu_off = 1
+	gs 'stat'
 	'<<$loverdesc[lover_number]>> turns to you and says, "Let''s go to the store and get some beer."'
 
 	act 'Walk while embraced':

locations/podval_rape.qsrc

@@ -1,4 +1,7 @@
 # podval_rape
+
+menu_off = 1
+
 gs 'stat'
 $boydesc2 = $boydesc
 if podvalrape = 0:

locations/police.qsrc

@@ -1,4 +1,7 @@
 # police
+
+menu_off = 1
+
 if $ARGS[0] = '1':
 	gopstop = 0
 	minut += 60

locations/popu.qsrc

@@ -1,4 +1,7 @@
 # popu
+
+menu_off = 1
+
 if $ARGS[0] = 'start':
 	cla
 	*clr

locations/porn_view.qsrc

@@ -1,6 +1,8 @@
 # porn_view
 $location_type = 'event'
 
+menu_off = 1
+
 act 'Go': 
 	killvar '$_zz_boy_arr'
 	minut += iif(seepornofut < 4,rand(15,30),rand(60,80))

locations/pornfilm.qsrc

@@ -1,4 +1,7 @@
 # pornfilm
+
+menu_off = 1
+
 if $ARGS[0] = 'pornactor':
 	if pfactor ! 50:
 		num = pfactor

locations/pornstudio.qsrc

@@ -3,8 +3,11 @@ $location_type = 'public_indoors'
 
 if $ARGS[0] = 'start':
 	CLOSE ALL
-	$metka = $ARGS[0]
-	$loc = $CURLOC
+	$metka = 'start'
+	$loc = 'pornstudio'
+	$menu_loc = 'pornstudio'
+	$menu_arg = 'start'
+	menu_off = 0
 	gs 'pornhist', 'short'
 	cls
 	minut += 5
@@ -31,6 +34,7 @@ if $ARGS[0] = 'start':
 	if workDolg > 0 and money >= workDolg:
 		act 'Repay your debt':
 			cls
+			menu_off = 1
 			minut += 5
 			workDisk = 0
 			money -= workDolg
@@ -44,6 +48,7 @@ if $ARGS[0] = 'start':
 		if workDisk = 1 and week = 5:
 			act 'Take the disk':
 				cls
+				menu_off = 1
 				minut += 5
 				workDisk = 2
 				gs 'stat'
@@ -56,6 +61,7 @@ if $ARGS[0] = 'start':
 		elseif workDisk = 3 and week = 5:
 			act 'Give the envelope':
 				cls
+				menu_off = 1
 				minut += 5
 				workDisk = 4
 				gs 'stat'
@@ -84,6 +90,7 @@ if $ARGS[0] = 'start':
 	if pfilmNO = 1 and pfilmNoVenera = 1 and Venera = 0:
 		act 'Show your medical certificate':
 			cls
+			menu_off = 1
 			minut += 5
 			pfilmNoVenera = 0
 			pfilmNO = 0
@@ -99,6 +106,9 @@ if $ARGS[0] = 'pa':
 	cla
 	*clr
 	minut += 5
+	$menu_loc = 'pornstudio'
+	$menu_arg = 'pa'
+	menu_off = 0
 	gs 'stat'
 	'There is a young guy tapping on the computer keyboard in a small office.'
 
@@ -109,6 +119,8 @@ if $ARGS[0] = 'pa':
 		act 'Change your porn name':
 			cla
 			*clr
+			menu_off = 1
+			gs 'stat'
 			'"I would like to change my professional name. Is it possible?"'
 			'"Of course, just give me a minute to register it in the database. So, what would you ike to be called?"'
 			act '"I want to be called..."':
@@ -122,6 +134,7 @@ if $ARGS[0] = 'pa':
 			act 'What''s the rating of my videos?':
 				cla
 				minut += 5
+				menu_off = 1
 				gs 'stat'
 
 				'"You''ve made <<film>> films.'
@@ -237,6 +250,7 @@ end
 if $ARGS[0] = 'delivery':
 	cls
 	minut += 15
+	menu_off = 1
 	gs 'stat'
 	'We made inquiries about you, and everything seems in order. Essentially, we give you a thumb drive, you deliver it to the sauna, they give you an envelope and you bring it to us. Immediately.'
 	'Upon delivery of envolope you get 5000 <b>₽</b>. Deliveries are available every Friday, after the studio has opened. If you agree, then visit any Friday, and choose a safe mode of transport.'
@@ -277,11 +291,13 @@ if $ARGS[0] = 'shower':
 	*clr
 	$location_type = 'bathroom'
 	$locM = 'pornstudio'
+	menu_off = 1
 	$metkaM = 'bathroom'
 	minut += 5
 	pcs_horny += 1
 	pcs_makeup = 1
 	dynamic $showerdin
+	gs 'stat'
 	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 	'You enter the shower cubicle. Turned on the shower and gently wash all traces of semen from your body.'
 
@@ -295,6 +311,10 @@ if $ARGS[0] = 'bathroom':
 	$location_type = 'bathroom'
 	$locM = 'pornstudio'
 	$metkaM = 'bathroom'
+	$menu_loc = 'pornstudio'
+	$menu_arg = 'bathroom'
+	menu_off = 0
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/shower.jpg"></center>'
 	'You are in the shower room after your movie shoot, you should go and see Peter to get your pay unless you need to use the mirror again.'
 
@@ -305,6 +325,7 @@ end
 if $ARGS[0] = 'manager':
 	cls
 	minut += 5
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/studia_0.jpg"></center>'
 	'You walk into the office of the producer in the porn production company, and you see that the producer is here.'
@@ -734,6 +755,7 @@ end
 
 if $ARGS[0] = 'first':
 	cls
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/studia_0.jpg"></center>'
 	'You sit down on the sofa and greet the boss. "I see it''s your first time with us. Do you want to be a porn star?'
@@ -751,6 +773,7 @@ end
 
 if $ARGS[0] = 'yes':
 	cls
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/studia_0.jpg"></center>'
 	'You sit down on the sofa and greet the boss. "I see it''s your first time with us. Do you want to be a porn star?'
@@ -835,6 +858,7 @@ end
 if $ARGS[0] = 'medical':
 	cla
 	*clr
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/exam.jpg"></center>'
 	minut += 5
 	gs 'stat'
@@ -886,6 +910,7 @@ end
 
 if $ARGS[0] = 'postvideo':
 	cls
+	menu_off = 1
 	minut += 30
 	pf = pfilmday[0]
 	pfilmday[0] = 0
@@ -1030,6 +1055,7 @@ if $ARGS[0] = '1':
 
 	minut = minut + 5
 	clr
+	menu_off = 1
 	gs'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/studio/pierre_1.jpg"></center>'
@@ -1105,6 +1131,7 @@ end
 if $ARGS[0] = '2':
 	$metka = $ARGS[0]
 	$loc = $CURLOC
+	menu_off = 1
 
 	clr
 	! WD: Fix Uninitialised ~ 'carrf' to 'carrar'
@@ -1146,6 +1173,7 @@ if $ARGS[0] = '3':
 	gs 'stat'
 	gt 'bdsm'
 end
+
 if $ARGS[0] = 'pregreact':
 	'"Wow, since you are so visibly pregnant. I''m surprised you still want to do the shoot. The good news is, we''ve been looking into appealing to people with different fetishes, so this is the perfect opportunity to start marketing to pregnancy fetishists. But, this that is also going to change the shoots you can do. You see, this is more of a niche thing and not something we can really use for wide appeal. You can still work, but only on specific pregnancy shoots, so you might not get the same amount of work you got before. But don''t worry, if we can find a way to make money off of you, we definitely will," the manager ends with a smile.'
 	act 'Continue':pregtalkpornstudio = 1 & gt 'pornstudio', 'manager'

locations/postdeliveries.qsrc

@@ -15,6 +15,8 @@
 !!postburn = (0-1), whether hoodlums tampered with your mail. Gets you fired if yes)
 !!postworkday = day check so postmaster knows you worked already
 
+menu_off = 1
+
 if $ARGS[0] = 'start':
 	cla
 	'He guides you to the back room, where a number of small packages and letters are packed into a shoulder bag.'

locations/postevents.qsrc

@@ -1,5 +1,7 @@
 # postevents
 
+menu_off = 1
+
 if $ARGS[0] = '1':
 	cls
 	minut += 10

locations/postmaster.qsrc

@@ -8,6 +8,8 @@
 
 
 if $ARGS[0] = 'start':
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/postoffice/postmaster.jpg"></center>'
 	'The manager of the post office, also known as the postmaster, just finished helping a customer and is about to walk back to his office when he spots you.'
 	'"You look like you want to ask something... if it''s about our regular services, you should get in line. I don''t have time to help more customers," he says.'

locations/psiklin.qsrc

@@ -7,6 +7,9 @@ if $ARGS[0]='start':
     *clr
 	$loc = 'psiklin'
 	$metka = 'start'
+	$menu_loc = 'psiklin'
+	$menu_arg = 'start'
+	menu_off = 0
     gs'stat'
     '<center><H4>Elite settlement<H4></center>'
     '<left><img <<$set_imgh>> src="images/locations/city/suburb/settlement.jpg" ></left>'
@@ -36,6 +39,9 @@ end
 if $ARGS[0]='ps1':
     cla
     *clr
+	$menu_loc = 'psiklin'
+	$menu_arg = 'ps1'
+	menu_off = 0
     gs'stat'
     '<center><H4>Insane asylum<H4></center>'
     'The inscription on the sign by the road reads: "Closed to the public".'
@@ -48,6 +54,9 @@ end
 if $ARGS[0]='ps2':
     cla
     *clr
+	$menu_loc = 'psiklin'
+	$menu_arg = 'ps2'
+	menu_off = 0
     gs'stat'
     '<center><H4>An old abandoned building<H4></center>'
     '<center><img <<$set_imgh>> src="images/locations/city/suburb/abandoned.jpg" ></center>'

locations/ptu_dush.qsrc

@@ -1,8 +1,12 @@
 # ptu_dush
+
 if $ARGS[0] = 'pos1':
 	cla
 	*clr
 	minut += 10
+	$menu_loc = 'ptu_dush'
+	$menu_arg = 'pos1'
+	menu_off = 0
 	gs 'stat'
 	'<center><b><font color="maroon">Women''s shower</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_jen.jpg"></center>'
@@ -18,7 +22,8 @@ if $ARGS[0] = 'pos2':
 	minut += 5
 	teachlevel -= 1
 	pcs_horny += 3
-	gs'stat'
+	menu_off = 1
+	gs 'stat'
 
 	randPtu_dush = rand(1,100)
 	if randPtu_dush >= 90 and pcs_horny > 70:

locations/purses.qsrc

@@ -1,6 +1,8 @@
 # purses
 
 if $ARGS[0] = 'view_purse_list':
+	menu_off = 1
+	gs 'stat'
 	!! ARGS 0 - view_purse_list
 	
 	if $ARGS[1] = 'wardrobe':
@@ -59,6 +61,8 @@ if $ARGS[0] = 'view_purse_list':
 end
 
 if $ARGS[0] = 'view_purse_item':
+	menu_off = 1
+	gs 'stat'
 	!! ARGS 0 - view_purse_item
 	!! ARGS 1 = action type (home, shop)
 	!! ARGS 2 - purse type