[added] Menu seeding for O

locations/obekt.qsrc

@@ -1,4 +1,9 @@
 # obekt
+
+$menu_loc = 'obekt'
+$menu_arg = ''
+menu_off = 0
+
 clr
 gs 'stat'
 $location_type = 'secluded'
@@ -13,6 +18,7 @@ end
 act 'Sneak into the construction site':
 	cls
 	minut += 5
+	menu_off = 1
 	gs 'stat'
 
 	if ObjektOpen = 0:
@@ -28,6 +34,7 @@ act 'Sneak into the construction site':
 	!!if ObjektBil = 1:end
 
 	act 'Go on the road':minut += 15 & nroad = 16 & gt 'road'
+end
 
 --- obekt ---------------------------------
 

locations/obekt2.qsrc

@@ -1,10 +1,19 @@
 # obekt2
-clr
+
+
+$menu_loc = 'obekt2'
+$menu_arg = ''
+menu_off = 0
+
+*clr
+cla
+
 gs 'stat'
 $location_type = 'secluded'
 '<center><h4>An object</h4></center>'
 '<center><img <<$set_imgh>> src="images/locations/construction/obekt.jpg"></center>'
 'There is not much to see at the construction site, only a trailer where a guard sits. The entrance is closed...'
+
 act 'Try to sneak in':
 	cla & *clr
 	minut += 10

locations/obkitchen.qsrc

@@ -5,6 +5,9 @@ if $args[0] = '':
 	$loc = 'obkitchen'
     $location_type = 'private'
 	$locclass = 'kitr'
+	$menu_loc = 'obkitchen'
+	$menu_arg = ''
+	menu_off = 0
 	gs 'stat'
 	'<center><b>in the dorm kitchen</b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/obkitchen.jpg"></center>'
@@ -17,6 +20,7 @@ if $args[0] = '':
 			act 'Cook food (0:25)':
 				cla
 				*clr
+				menu_off = 1
 				minut += 25
 				edahot += 1
 				eda -= 1

locations/obroom.qsrc

@@ -8,6 +8,9 @@ if $ARGS[0] = 'start':
 	$metkaM = 'start'
 	$locM = 'obroom'
     $location_type = 'private'
+	$menu_loc = 'obroom'
+	$menu_arg = 'start'
+	menu_off = 0
 	cla
 	*clr
 	odkomp = 1
@@ -48,8 +51,10 @@ if $ARGS[0] = 'start':
 
 	act 'Read the course literature (2:00)':
 		cla
+		menu_off = 1
 		minut += 120
 		intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
+		gs 'stat'
 		'You spend two hours reading the course literature. You feel like you''ve picked up some stuff from the book that will come in handy in time for the examination.'
 
 		act 'Finish':gt 'obroom', 'start'
@@ -59,11 +64,13 @@ if $ARGS[0] = 'start':
 		act 'Do some coursework (1:00)':
 			cla
 			*clr
+			menu_off = 1
 			minut += 60
 			pcs_mood -= 10
 			kursovik += rand(pcs_intel / 20, pcs_intel / 10)
 
 			if kursovik > 100:kursovik = 100
+			gs 'stat'
 
 			'<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
 			'You sit for an hour and prepare your work for the class. You''ve finish <<kursovik>> percent of the work.'

locations/office.qsrc

@@ -6,6 +6,9 @@ if $ARGS[0] = 'start':
 	CLOSE ALL
 	$location_type = 'event'
 	$sexloc = 'office'
+	$menu_loc = 'office'
+	$menu_arg = 'start'
+	menu_off = 0
 	if sound = 0 and hour >= 8 and hour < 17:PLAY 'sound/office.mp3',30 & PLAY 'sound/office2.mp3',30
 	minut += 5
 	gs 'stat'
@@ -20,6 +23,7 @@ if $ARGS[0] = 'start':
 	if secrDiplom = 1 and workSec = 0 and (work = 0 or cheatWork = 1):
 		act 'Interview for a job':
 			cla
+			menu_off = 1
 			minut += 60
 			'You''ve come to the personnel department, and after taking a look at your diploma and resume they offered you a job as secretary.'
 
@@ -52,6 +56,7 @@ if $ARGS[0] = 'start':
 	if worksec = 1:
 		act 'Resign':
 			cla
+			menu_off = 1
 			minut += 30
 			work = 0
 			workSec = 0
@@ -66,6 +71,9 @@ end
 
 if $ARGS[0] = 'work':
 	killvar '$boy'
+	$menu_loc = 'office'
+	$menu_arg = 'work'
+	menu_off = 0
 	gs 'stat'
 	'<center><b><font color="maroon">your workplace</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sekr.jpg"></center>'
@@ -85,6 +93,7 @@ if $ARGS[0] = 'work':
 	if hour < 17:
 		act 'Work':
 			minut += 60
+			menu_off = 1
 			cla
 			'You print documents, write emails, and occasionally bring your boss a coffee.'
 			officerand = rand(0, 15)
@@ -338,6 +347,7 @@ if $ARGS[0] = 'work':
 		act 'Chat with Sveta':
 			cla
 			minut += 30
+			menu_off = 1
 			officerand = rand(0, 10)
 
 			if officeslut > 0 and officerand > 8:gt 'office', 'negr'
@@ -356,6 +366,7 @@ if $ARGS[0] = 'work':
 			act 'ASk <<$pcs_nickname>> about her relationship with the boss':
 				cla
 				minut += 30
+				menu_off = 1
 				svetslut = 2
 				'"<<$pcs_nickname>> and what is your relationship with the boss?" you asked.'
 				'"What has sang that <<$pcs_nickname>> slut barefoot sleeping?" she snapped.'
@@ -375,6 +386,7 @@ if $ARGS[0] = 'work':
 			act 'Tell Amy about having sex in the office':
 				cla
 				minut += 30
+				menu_off = 1
 				svetslut = 4
 				'Waiting when the boss is not at home, you have decided to ask Amy about the incident in the office of the chief.'
 				'"Well, it was, as you know, I''ll be back in a minute with the tea?" you asked'
@@ -514,6 +526,7 @@ if $ARGS[0] = 'work':
 				cla
 				*clr
 				minut += 30
+				menu_off = 1
 				officerand = rand(0, 10)
 
 				if officeslut > 0 and officerand > 8:gt 'office', 'dostavka'
@@ -538,6 +551,7 @@ if $ARGS[0] = 'boss':
 	cla
 	*clr
 	minut += 15
+	menu_off = 1
 	officerand = rand(0, 15)
 
 	if officeslut > 0 and officerand = 10:gt 'office', 'boss2'
@@ -615,6 +629,9 @@ if $ARGS[0] = 'kor':
 	cla
 	*clr
 	minut += 5
+	$menu_loc = 'office'
+	$menu_arg = 'kor'
+	menu_off = 0
 	gs 'stat'
 	'<center><b><font color="maroon">corridor</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/office.jpg"></center>'
@@ -632,6 +649,9 @@ if $ARGS[0] = 'kuh':
 	$loc = $CURLOC
 	cla
 	*clr
+	$menu_loc = 'office'
+	$menu_arg = 'kuh'
+	menu_off = 0
 	minut += 5
 	gs 'stat'
 	officerand = rand(0, 10)
@@ -641,6 +661,7 @@ if $ARGS[0] = 'kuh':
 	elseif officerand < 2 and (officeslut > 5 or pcs_horny >= 90):
 		cla
 		*clr
+		menu_off = 1
 		gs 'office', 'rand_manager'
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m12.jpg"></center>'
 		'As you enter the room you see a manager with a bottle in his hand.'
@@ -705,7 +726,9 @@ if $ARGS[0] = 'sveta':
 	cla
 	*clr
 	minut += 30
+	menu_off = 1
 	svetslut = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/s1.jpg"></center>'
 	'You brought the documents to the chief for his signature, and <<$pcs_nickname>> had just gone to him, waiting for ten minutes you have decided to place documents. Opening the door you dumbfounded, stood at the head of the table, and <<$pcs_nickname>> makes him a blowjob on her knees and looking at it through the eyes of devotees. You shut the door quietly, "I hope they let me invisible" you thought.'
 
@@ -716,6 +739,8 @@ if $ARGS[0] = 'boss1':
 	cla
 	*clr
 	minut += 30
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/b1.jpg"></center>'
 	'Chief invited to the <<$pcs_nickname>> itself, it was not 30 minutes, you have already decided that they''re having fun again, when he called and you went into the office, you will not see anything, <<$pcs_nickname>> sitting on the sofa with a notebook in hand and write down something .'
 	'"Come in, sit down." said the boss.'
@@ -886,6 +911,7 @@ end
 if $ARGS[0] = 'boss0':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 1
 	gs 'boyStat', 'A179'
 	spafinloc = 12
@@ -907,6 +933,7 @@ if $ARGS[0] = 'komer0':
 	girl += 1
 	lesbian += 1
 	minut += 30
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/k0.jpg"></center>'
 	'You summoned Commercial Director. You went to the office at the table sat a woman much older than 30, she pointed out to you on a chair, you obediently sat down and waited.'
@@ -975,6 +1002,7 @@ end
 if $ARGS[0] = 'komer1':
 	cla
 	*clr
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/k6.jpg"></center>'
 	'As soon you enter the office as she dug her lips in your. "Well, that girl fun?" she asked.'
@@ -1026,6 +1054,7 @@ if $ARGS[0] = 'dostavka':
 	cla
 	*clr
 	minut += 30
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/s9.jpg"></center>'
 	'Once you have started to have fun as a knock on the door of the cabinet. You barely managed to stop the <<$pcs_nickname>>, and sat her down on a chair to fix it first, and then himself. However, she and Narov continue brakes seen it already ripped and she had ostanavitsya nemogla. You grief half sat her back in the chair and opened the door. The doorbell went courier "Well, you girls are so long, I''m tired of standing. You sign for the parcel."'
@@ -1073,6 +1102,7 @@ end
 if $ARGS[0] = 'negr':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 1
 	gs 'boyStat', 85
 	minut += 30
@@ -1121,11 +1151,13 @@ end
 if $ARGS[0] = 'boss2':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 1
 	gs 'boyStat', 'A179'
 	gs 'npcgeneratec', 0, 'Courier', rand(30,50)
 	gs 'boyStat', $npclastgenerated, 'a'
 	officeslut += 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/b11.jpg"></center>'
 	'"A <<$pcs_nickname>>, come on you just in time" with these words the chief stood up and came to you without formally launched their hands under your clothes, exposing your breasts. "I just need to pull off. Mouth So You work for a start." he continued.'
 
@@ -1176,10 +1208,12 @@ end
 if $ARGS[0] = 'boss3':
 	cla
 	*clr
+	menu_off = 1
 	gs 'boyStat', 'A179'
 	gs 'npcgeneratec', 0, 'Business Partner', rand(30,50)
 	gs 'boyStat', $npclastgenerated, 'a'
 	officeslut += 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/b14.jpg"></center>'
 	'"A <<$pcs_nickname>>, come on you just in time, we''re celebrating with a partner deal." said the boss sees you included in the study.'
 	'"I just love to confess about you, saying that the best secretary did not find, and it works well, and fucks superbly, but he does not believe." he said pointing to the other man, "says his secretary better, so you have to <<$pcs_nickname>> defend the honor of the company, show him how you are able to use their holes." continued supervision'
@@ -1218,6 +1252,7 @@ end
 if $ARGS[0] = 'boss4':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 1
 	killvar '$boy'
 	gs 'office', 'rand_manager'
@@ -1258,9 +1293,11 @@ end
 if $ARGS[0] = 'gang':
 	cla
 	*clr
+	menu_off = 1
 	guy += 3
 	swallow += 6
 	officeslut += 1
+	gs 'stat'
 	killvar '$boy'
 	gs 'npcgeneratec', 0, 'Office Worker', rand(18,45)
 	gs 'boyStat', $npclastgenerated
@@ -1310,10 +1347,12 @@ end
 if $ARGS[0] = 'boss5':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 1
 	gs 'boyStat', 'A179'
 	minut += 30
 	officeslut += 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/b19.jpg"></center>'
 	'"A <<$pcs_nickname>>, come on you just in time, I have so stiff neck Mash it up a bit, " said the boss sees you included in the study. You immediately go up to him and start to massage his neck and shoulders.'
 	'"So, okay?" asked you about ten minutes later.'
@@ -1343,10 +1382,12 @@ end
 if $ARGS[0] = 'boss6':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 1
 	gs 'boyStat', 'A179'
 	spank += 1
 	officeslut += 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/b21.jpg"></center>'
 	'"A <<$pcs_nickname>>, come on you just in time. Go to the archive and bring me back some projects, " said the boss sees you included in the study. You quickly go to the archives and brought together all the necessary papers are returned to the office, and the thing at the very table you drop all the documents and they scatter in all directions, now you two hours to lay them into folders. Chef today is clearly not in the best mood, he starts yelling at you and then walks up to you and vskhvativ neck throws a side. You swooped on his desk and spread on it, tears streamed from his eyes, and he continues to yell at you'
 
@@ -1369,10 +1410,12 @@ end
 if $ARGS[0] = 'motiv0':
 	cla
 	*clr
+	menu_off = 1
 	gs 'boyStat', 'A179'
 	gs 'npcgeneratec', 0, 'Business Client', rand(18,45)
 	gs 'boyStat', $npclastgenerated, 'a'
 	minut += 180
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m15.jpg"></center>'
 	'You come with the head to the hotel and go up to the room to the client. While the chef with the client to discuss the contract you park yourself on the bed and pretend that something down. When it comes to controversial issues, chief transplanted to you on the bed and starts stroking you. His hands glide over your body then crept under her skirt then stroking his chest, soon your skirt is Zadran to the waist. Customer looks to you between the legs without taking his eyes, seeing this boss says "can make a little break to relax." and you vskhvativ crotch pulls up, you go and find yourself standing on all fours on the bed with a bare ass. "You''re like <<$pcs_nickname>> help us relax?" appeals to you boss.'
 
@@ -1396,10 +1439,12 @@ end
 if $ARGS[0] = 'motiv1':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 0
 	gs 'npcgeneratec', 0, 'Business Client', rand(18,45)
 	gs 'boyStat', $npclastgenerated
 	minut += 120
+	gs 'stat'
 	picrand = rand(65, 68)
 
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m<<picrand>>.jpg"></center>'
@@ -1420,8 +1465,8 @@ end
 if $ARGS[0] = 'motiv2':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 0
-
 	officerand2 = rand(1, 4)
 	if officerand2 = 1:gt 'office', 'motiv4'
 
@@ -1431,6 +1476,7 @@ if $ARGS[0] = 'motiv2':
 	minut += 240
 	swallow += 2
 	guy += 2
+	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m<<picrand>>.jpg"></center>'
 	'It suits you and the boss says, "So <<$pcs_nickname>>, you need to go to the object, there is one of our masters became strongly with late deadlines works promotiviruy it as you are able."'
@@ -1463,9 +1509,9 @@ end
 if $ARGS[0] = 'motiv3':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 0
 	picrand = rand(30, 33)
-
 	officerand2 = rand(1, 4)
 	if officerand2 = 1:gt 'office', 'motiv5'
 
@@ -1476,6 +1522,7 @@ if $ARGS[0] = 'motiv3':
 	minut += 240
 	swallow += 2
 	guy += 2
+	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m<<picrand>>.jpg"></center>'
 	'It suits you and the boss says, "So <<$pcs_nickname>>, you need to go to the object, there a couple of our artists have become much late with deadlines works promotiviruy them as you are able."'
@@ -1508,12 +1555,14 @@ end
 if $ARGS[0] = 'motiv4':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 0
 	gs 'npcgeneratec', 0, 'Business Client', rand(18,45)
 	gs 'boyStat', $npclastgenerated
 	picrand = 29
 	minut += 180
 	guy += 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m17.jpg"></center>'
 	'It suits you and the boss says, "So <<$pcs_nickname>>, you need to go to the object, there is one of our masters became strongly with late deadlines works promotiviruy it as you are able."'
 	'"Well, have a meal." you answer and go to the site.'
@@ -1545,6 +1594,7 @@ end
 if $ARGS[0] = 'motiv5':
 	cla
 	*clr
+	menu_off = 1
 	sexpartkno = 0
 	gs 'npcgeneratec', 0, 'Business Client', rand(18,45)
 	gs 'boyStat', $npclastgenerated
@@ -1553,6 +1603,7 @@ if $ARGS[0] = 'motiv5':
 	picrand = 34
 	minut += 180
 	guy += 2
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/sex/m19.jpg"></center>'
 	'It suits you and the boss says, "So <<$pcs_nickname>>, you need to go to the object, there a couple of our artists have become much late with deadlines works promotiviruy them as you are able."'
 	'"Well, have a meal." you answer and go to the site.'

locations/oral.qsrc

@@ -1,4 +1,7 @@
 # oral
+
+menu_off = 1
+
 if $ARGS[0] = 'start':
 	tmpl = iif(ARGS[1] = 0,10, ARGS[1])
 	frost = 0

locations/orgazm.qsrc

@@ -1,4 +1,7 @@
 # orgazm
+
+menu_off = 1
+
 if $ARGS[0] = 'start':
 	protect = 0
 	vidageday -= 1