Browse Source

[added] menu variables to all location starting with C
[fixes] moved several leave options to the top

julzor 5 years ago
parent
commit
dd470b0f63

+ 12 - 19
locations/Club2.qsrc

@@ -1,7 +1,9 @@
 # Club2
 # Club2
+
+menu_off = 1
+
 if $ARGS[0] = 'toilet1':
 if $ARGS[0] = 'toilet1':
-	cla
-	*clr
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
 	gs 'npcgeneratec', 0, 'Gloryhole Client', rand(18,60)
 	gs 'boyStat', $npclastgenerated
 	gs 'boyStat', $npclastgenerated
@@ -13,8 +15,7 @@ if $ARGS[0] = 'toilet1':
 	act 'Leave':gt 'club', 'inside'
 	act 'Leave':gt 'club', 'inside'
 
 
 	act 'Take a closer look':
 	act 'Take a closer look':
-		cla
-		*clr
+		*clr & cla
 
 
 		if TQuest = 1:TQuest = 2
 		if TQuest = 1:TQuest = 2
 
 
@@ -27,8 +28,7 @@ if $ARGS[0] = 'toilet1':
 		gs 'stat'
 		gs 'stat'
 
 
 		act 'Cover lips':
 		act 'Cover lips':
-			cla
-			*clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory2.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory2.jpg"></center>'
 			'You bows member lips and start sucking it, trying to take it as deep as possible.'
 			'You bows member lips and start sucking it, trying to take it as deep as possible.'
 			'Suddenly, in your mouth and poured hot tart liquid.'
 			'Suddenly, in your mouth and poured hot tart liquid.'
@@ -37,8 +37,7 @@ if $ARGS[0] = 'toilet1':
 			gs 'stat'
 			gs 'stat'
 		
 		
 			act 'Swallow':
 			act 'Swallow':
-				cla
-				*clr
+				*clr & cla
 				swallow += 1
 				swallow += 1
 				spafinloc = 12
 				spafinloc = 12
 				gs 'cum_manage'
 				gs 'cum_manage'
@@ -72,9 +71,7 @@ if $ARGS[0] = 'toilet1':
 end
 end
 
 
 if $ARGS[0] = 'toilet':
 if $ARGS[0] = 'toilet':
-	cla
-	clr
-	*clr
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	'You pee sitting on the toilet and began to wipe your vagina with toilet paper. Apparently you pressed too hard because you embraced the thrill of touching between the legs.'
 	'You pee sitting on the toilet and began to wipe your vagina with toilet paper. Apparently you pressed too hard because you embraced the thrill of touching between the legs.'
 	
 	
@@ -104,8 +101,7 @@ if $ARGS[0] = 'toilet':
 end
 end
 
 
 if $ARGS[0] = 'toilet2':
 if $ARGS[0] = 'toilet2':
-	cla
-	*clr
+	*clr & cla
 	'You sit in a booth and hear someone come into the toilet after you and doors of adjacent booths closing. You realize there is two of them.'
 	'You sit in a booth and hear someone come into the toilet after you and doors of adjacent booths closing. You realize there is two of them.'
 	'Voice from the next stall tells you - do not be afraid baby, we will not hurt you, on the contrary, we will give you some delicious candy with cream filling.'
 	'Voice from the next stall tells you - do not be afraid baby, we will not hurt you, on the contrary, we will give you some delicious candy with cream filling.'
 
 
@@ -124,8 +120,7 @@ if $ARGS[0] = 'toilet2':
 		gs 'stat'
 		gs 'stat'
 		
 		
 		wait 3000
 		wait 3000
-		cla
-		*clr
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory5.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory5.jpg"></center>'
 		'You are enthusiastically fucked by both members in turn.'
 		'You are enthusiastically fucked by both members in turn.'
 		
 		
@@ -133,8 +128,7 @@ if $ARGS[0] = 'toilet2':
 		gs 'stat'
 		gs 'stat'
 		
 		
 		wait 3000
 		wait 3000
-		cla
-		*clr
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory6.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory6.jpg"></center>'
 		'Finally one of the men ends up in your mouth.'
 		'Finally one of the men ends up in your mouth.'
 		'You lick and start to finish processing the second term.'
 		'You lick and start to finish processing the second term.'
@@ -143,8 +137,7 @@ if $ARGS[0] = 'toilet2':
 		gs 'stat'
 		gs 'stat'
 		
 		
 		wait 3000
 		wait 3000
-		cla
-		*clr
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory7.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/glory7.jpg"></center>'
 		'The second man also comes in your mouth.'
 		'The second man also comes in your mouth.'
 		'You swallow a mouthful and wipe your face, but semen is smeared all over it.'
 		'You swallow a mouthful and wipe your face, but semen is smeared all over it.'

+ 4 - 3
locations/cafe2.qsrc

@@ -1,7 +1,9 @@
 # cafe2
 # cafe2
+
+menu_off = 1
+
 if $ARGS[0] = 'beginning':
 if $ARGS[0] = 'beginning':
-	cla
-	*clr
+	*clr & cla
 	'<<$boybody>> <<$boybod>> <<$boyface>>, introduces himself as <<$boydesc>>.'
 	'<<$boybody>> <<$boybod>> <<$boyface>>, introduces himself as <<$boydesc>>.'
 	deyst = rand(1, 100)
 	deyst = rand(1, 100)
 
 
@@ -66,7 +68,6 @@ if $ARGS[0] = 'dance':
 		act 'Finish the dance':gt 'Cafe2', 'dance2'
 		act 'Finish the dance':gt 'Cafe2', 'dance2'
 	elseif deyst > 80:
 	elseif deyst > 80:
 		pcs_horny += 8
 		pcs_horny += 8
-		clr
 		gs 'stat'
 		gs 'stat'
 		'During the dance <<$boydesc>> paws at your ass, you cling to his body your tender flesh on his and he wants to kiss you.'
 		'During the dance <<$boydesc>> paws at your ass, you cling to his body your tender flesh on his and he wants to kiss you.'
 
 

+ 7 - 8
locations/cafe3.qsrc

@@ -1,7 +1,9 @@
 # cafe3
 # cafe3
+
+menu_off = 1
+
 if $ARGS[0] = 'house':
 if $ARGS[0] = 'house':
-	cla
-	*clr
+	*clr & cla
 	money += 100
 	money += 100
 	gs 'stat'
 	gs 'stat'
 	'<<$boydesc>> pays your bill and hails a taxi.'
 	'<<$boydesc>> pays your bill and hails a taxi.'
@@ -81,8 +83,7 @@ if $ARGS[0] = 'house':
 end
 end
 
 
 if $ARGS[0] = '0':
 if $ARGS[0] = '0':
-	cla
-	*clr
+	*clr & cla
 	minut += 15
 	minut += 15
 	gs 'stat'
 	gs 'stat'
 	gs 'dinsexFX'
 	gs 'dinsexFX'
@@ -272,8 +273,7 @@ if $ARGS[0] = 'toilet':
 			gs 'stat'
 			gs 'stat'
 
 
 			act 'Remove from mouth':
 			act 'Remove from mouth':
-			cla
-			*clr
+			*clr & cla
 			bjrand = rand(1, 100)
 			bjrand = rand(1, 100)
 
 
 			if bjrand < 50: 'You have time to take his member out of your mouth, <<$boydesc>>s cum just misses you.'
 			if bjrand < 50: 'You have time to take his member out of your mouth, <<$boydesc>>s cum just misses you.'
@@ -295,8 +295,7 @@ if $ARGS[0] = 'toilet':
 		end
 		end
 
 
 		act 'Suck on':
 		act 'Suck on':
-			cla
-			*clr
+			*clr & cla
 			picrand = rand(20, 29)
 			picrand = rand(20, 29)
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum<<picrand>>.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum<<picrand>>.jpg"></center>'
 			'You feel like a hot jet of sperm hits you in the throat. You have a mouth full of sperm.'
 			'You feel like a hot jet of sperm hits you in the throat. You have a mouth full of sperm.'

+ 1 - 3
locations/cafe_parco.qsrc

@@ -10,10 +10,8 @@ if $args[0]= 'start':
 	'<center><img <<$set_imgh>> src="'+'images/locations/pavlovsk/park/cafe/caffe_del_parco'+iif(hour > 20 or hour < 7,'_night','')+'.jpg'+'"></center>'
 	'<center><img <<$set_imgh>> src="'+'images/locations/pavlovsk/park/cafe/caffe_del_parco'+iif(hour > 20 or hour < 7,'_night','')+'.jpg'+'"></center>'
 	'The newly opened cafe "Del Parco", with its striking facade, there are lots of tables and a summer terrace. Opening hours between 14.00 to 21.00.'
 	'The newly opened cafe "Del Parco", with its striking facade, there are lots of tables and a summer terrace. Opening hours between 14.00 to 21.00.'
 
 
-	if hour >= 14 and hour < 21:
-		act 'Enter the cafe': gt 'cafe_parco', 'inner'
-	end
 	act 'Return to the square': gt 'gskver', 'start'
 	act 'Return to the square': gt 'gskver', 'start'
+	if hour >= 14 and hour < 21: act 'Enter the cafe': gt 'cafe_parco', 'inner'
 end
 end
 
 
 if $args[0]= 'inner':
 if $args[0]= 'inner':

+ 4 - 6
locations/carF.qsrc

@@ -1,5 +1,7 @@
 # carF
 # carF
 
 
+menu_off = 1
+
 $enddrive = {
 $enddrive = {
 	if cardrive = 1:gt 'street'
 	if cardrive = 1:gt 'street'
 	if cardrive = 2:gt 'down'
 	if cardrive = 2:gt 'down'
@@ -29,9 +31,7 @@ if $ARGS[0] = 'start':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
 	CLOSE ALL
 	CLOSE ALL
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 1
 	minut += 1
 	gs 'stat'
 	gs 'stat'
 	gs 'themes', 'indoors'
 	gs 'themes', 'indoors'
@@ -61,9 +61,7 @@ end
 if $ARGS[0] = 'salon':
 if $ARGS[0] = 'salon':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 1
 	minut += 1
 	gs 'stat'
 	gs 'stat'
 	'<center><b><<$car>></b></center>'
 	'<center><b><<$car>></b></center>'

+ 249 - 335
locations/carF1.qsrc

@@ -1,335 +1,300 @@
 # carF1
 # carF1
+
+menu_off = 1
+
 if $ARGS[0] = 'car':
 if $ARGS[0] = 'car':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>VAZ 2107</b></center>'
 	'<center><b>VAZ 2107</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car2':
 if $ARGS[0] = 'car2':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>VAZ 2115</b></center>'
 	'<center><b>VAZ 2115</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car2.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car2.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon2.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car2'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon2.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car2'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car3':
 if $ARGS[0] = 'car3':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>VAZ 2113</b></center>'
 	'<center><b>VAZ 2113</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car3.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car3.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon3.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car3'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon3.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car3'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car4':
 if $ARGS[0] = 'car4':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>VAZ 2114</b></center>'
 	'<center><b>VAZ 2114</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car4.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car4.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon4.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car4'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon4.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car4'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car5':
 if $ARGS[0] = 'car5':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>VAZ 2119</b></center>'
 	'<center><b>VAZ 2119</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car5.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car5.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon5.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car5'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon5.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car5'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car6':
 if $ARGS[0] = 'car6':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 
 
 	'<center><b>VAZ Kalina</b></center>'
 	'<center><b>VAZ Kalina</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car6.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car6.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon6.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car6'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon6.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car6'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car7':
 if $ARGS[0] = 'car7':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>WHA PRIORA</b></center>'
 	'<center><b>WHA PRIORA</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car7.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car7.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon7.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car7'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon7.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car7'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car8':
 if $ARGS[0] = 'car8':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>Chevrolet Niva</b></center>'
 	'<center><b>Chevrolet Niva</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car8.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car8.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon8.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car8'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon8.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car8'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car9':
 if $ARGS[0] = 'car9':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>UAZ HUNTER</b></center>'
 	'<center><b>UAZ HUNTER</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car9.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car9.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon9.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car9'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon9.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car9'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car10':
 if $ARGS[0] = 'car10':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>UAZ Patriot</b></center>'
 	'<center><b>UAZ Patriot</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car10.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car10.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon10.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car10'
-	end
-
-	act 'Leave':
+		act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon10.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car10'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car13':
 if $ARGS[0] = 'car13':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Ford Focus 2</b></center>'
 	'<center><b>Ford Focus 2</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car13.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car13.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon13.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car13'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon13.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car13'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car95':
 if $ARGS[0] = 'car95':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>Mitsubishi l200</b></center>'
 	'<center><b>Mitsubishi l200</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car95.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car95.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon95.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car95'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon95.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car95'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car96':
 if $ARGS[0] = 'car96':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 
 
@@ -337,454 +302,403 @@ if $ARGS[0] = 'car96':
 	'<center><b>Audi Q7</b></center>'
 	'<center><b>Audi Q7</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car96.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car96.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon96.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car96'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon96.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car96'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car97':
 if $ARGS[0] = 'car97':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>Cadillac Escalade</b></center>'
 	'<center><b>Cadillac Escalade</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car97.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car97.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon97.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car97'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon97.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car97'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car98':
 if $ARGS[0] = 'car98':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
-
-
 	'<center><b>Porsche Cayenne</b></center>'
 	'<center><b>Porsche Cayenne</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car98.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car98.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon98.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car98'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon98.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car98'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car99':
 if $ARGS[0] = 'car99':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>BMW X6</b></center>'
 	'<center><b>BMW X6</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car99.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car99.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon99.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car99'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon99.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car99'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car100':
 if $ARGS[0] = 'car100':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><b>Mercedes-Benz S 600</b></center>'
 	'<center><b>Mercedes-Benz S 600</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car100.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car100.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon100.jpg"></center>'
-
-		act 'Leave':gt 'carF1', 'car100'
-	end
-
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 
 
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 1:gt 'autosalonF', 'start'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 		if cartraid = 2:gt 'autotraidF', 'manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon100.jpg"></center>'
+
+		act 'Leave':gt 'carF1', 'car100'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car101':
 if $ARGS[0] = 'car101':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>BMW Z4</b></center>'
 	'<center><b>BMW Z4</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car101.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car101.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon101.jpg"></center>'
-
-		act 'Leave':gt'carF1','car101'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon101.jpg"></center>'
+
+		act 'Leave':gt'carF1','car101'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car102':
 if $ARGS[0] = 'car102':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Renault LOGAN</b></center>'
 	'<center><b>Renault LOGAN</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car102.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car102.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon102.jpg"></center>'
-
-		act 'Leave':gt'carF1','car102'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon102.jpg"></center>'
+
+		act 'Leave':gt'carF1','car102'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car103':
 if $ARGS[0] = 'car103':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Toyaboutta Corolla</b></center>'
 	'<center><b>Toyaboutta Corolla</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car103.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car103.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon103.jpg"></center>'
-
-		act 'Leave':gt'carF1','car103'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon103.jpg"></center>'
+
+		act 'Leave':gt'carF1','car103'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car104':
 if $ARGS[0] = 'car104':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Toyota Celica</b></center>'
 	'<center><b>Toyota Celica</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car104.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car104.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon104.jpg"></center>'
-
-		act 'Leave':gt'carF1','car104'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon104.jpg"></center>'
+
+		act 'Leave':gt'carF1','car104'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car105':
 if $ARGS[0] = 'car105':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Mazda 6</b></center>'
 	'<center><b>Mazda 6</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car105.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car105.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon105.jpg"></center>'
-
-		act 'Leave':gt'carF1','car105'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon105.jpg"></center>'
+
+		act 'Leave':gt'carF1','car105'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car106':
 if $ARGS[0] = 'car106':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Mercedes-Benz E 212</b></center>'
 	'<center><b>Mercedes-Benz E 212</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car106.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car106.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon106.jpg"></center>'
-
-		act 'Leave':gt'carF1','car106'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon106.jpg"></center>'
+
+		act 'Leave':gt'carF1','car106'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car107':
 if $ARGS[0] = 'car107':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>BMW M5</b></center>'
 	'<center><b>BMW M5</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car107.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car107.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon107.jpg"></center>'
-
-		act 'Leave':gt'carF1','car107'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon107.jpg"></center>'
+
+		act 'Leave':gt'carF1','car107'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car108':
 if $ARGS[0] = 'car108':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Jaguar XKR-S</b></center>'
 	'<center><b>Jaguar XKR-S</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car108.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car108.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon108.jpg"></center>'
-
-		act 'Leave':gt'carF1','car108'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon108.jpg"></center>'
+
+		act 'Leave':gt'carF1','car108'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car109':
 if $ARGS[0] = 'car109':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Audi A6</b></center>'
 	'<center><b>Audi A6</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car109.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car109.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon109.jpg"></center>'
-
-		act 'Leave':gt'carF1','car109'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon109.jpg"></center>'
+
+		act 'Leave':gt'carF1','car109'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car110':
 if $ARGS[0] = 'car110':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Ford Mondeo</b></center>'
 	'<center><b>Ford Mondeo</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car110.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car110.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon110.jpg"></center>'
-
-		act 'Leave':gt'carF1','car110'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon110.jpg"></center>'
+
+		act 'Leave':gt'carF1','car110'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car111':
 if $ARGS[0] = 'car111':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla	
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Bentley Continental GT</b></center>'
 	'<center><b>Bentley Continental GT</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car111.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car111.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon111.jpg"></center>'
-
-		act 'Leave':gt'carF1','car111'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon111.jpg"></center>'
+
+		act 'Leave':gt'carF1','car111'
+	end
 end
 end
 
 
 if $ARGS[0] = 'car112':
 if $ARGS[0] = 'car112':
 	$metka = $ARGS[0]
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$loc = $CURLOC
-
-	cla
-	clr
-	*clr
-	minut = minut + 5
+	*clr & cla
+	minut += 5
 	gs'stat'
 	gs'stat'
 
 
 	'<center><b>Ferrari 458 Italia</b></center>'
 	'<center><b>Ferrari 458 Italia</b></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car112.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/shared/accessories/car/car112.jpg"></center>'
 
 
-	act 'Sit behind the wheel':
-		cla
-		*clr
-		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon112.jpg"></center>'
-
-		act 'Leave':gt'carF1','car112'
-	end
 	act 'Leave':
 	act 'Leave':
 		cla
 		cla
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 1:gt'autosalonF','start'
 		if cartraid = 2:gt'autotraidF','manager'
 		if cartraid = 2:gt'autotraidF','manager'
 	end
 	end
+	
+	act 'Sit behind the wheel':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/accessories/car/salon112.jpg"></center>'
+
+		act 'Leave':gt'carF1','car112'
+	end
 end
 end
 
 
 --- carF1 ---------------------------------
 --- carF1 ---------------------------------

+ 5 - 3
locations/card.qsrc

@@ -1,8 +1,12 @@
 # card
 # card
+
+menu_off = 1
+
 gs 'stat'
 gs 'stat'
 
 
+act 'Put the cards away':gt $loc
 act 'Pull a card from the deck':
 act 'Pull a card from the deck':
-	cls
+	*clr & cla
 	you_slut += 1
 	you_slut += 1
 
 
 	!!if you_slut < 10:end
 	!!if you_slut < 10:end
@@ -57,8 +61,6 @@ act 'Pull a card from the deck':
 	act 'Put the card back into the deck':gt 'card'
 	act 'Put the card back into the deck':gt 'card'
 end
 end
 
 
-act 'Put the cards away':gt $loc
-
 if card_deck = 0:
 if card_deck = 0:
 	act 'Throw away your deck of vintage porn cards': vcard = 0 & vcard_trash = 1 & gt $loc
 	act 'Throw away your deck of vintage porn cards': vcard = 0 & vcard_trash = 1 & gt $loc
 elseif card_deck = 1:
 elseif card_deck = 1:

+ 3 - 0
locations/cardgame_durak.qsrc

@@ -2,6 +2,9 @@
 !-----------------------------------------------!
 !-----------------------------------------------!
 !-----Playing cards with the guys on the strip-----!
 !-----Playing cards with the guys on the strip-----!
 !===============================================!
 !===============================================!
+
+menu_off = 1
+
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
 	CLOSE ALL
 	CLOSE ALL
 	cla
 	cla

+ 4 - 2
locations/cards.qsrc

@@ -1,13 +1,15 @@
 # cards
 # cards
-clr
+*clr & cla
+menu_off = 1
 minut += 10
 minut += 10
 gs 'stat'
 gs 'stat'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/zalcart.jpg"></right>'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/zalcart.jpg"></right>'
 'In the hall a lot of free games tables in Blackjack and Casino Wars.'
 'In the hall a lot of free games tables in Blackjack and Casino Wars.'
 
 
+act 'Back in the hall':gt 'hall'
 act 'To the table game Blackjack':gt 'blackjackPlay', 'new'
 act 'To the table game Blackjack':gt 'blackjackPlay', 'new'
 act 'To the table games in Casino War':gt 'kazvar'
 act 'To the table games in Casino War':gt 'kazvar'
-act 'Back in the hall':gt 'hall'
+
 !!SYMBOLS
 !!SYMBOLS
 !! ♥
 !! ♥
 !! ♠
 !! ♠

+ 9 - 2
locations/casino.qsrc

@@ -1,13 +1,20 @@
 # casino
 # casino
 
 
+$loc = 'casino'
+$metka = ''
+$menu_loc = 'casino'
+$menu_arg = ''
+menu_off = 0
+
+*clr & cla
 gs 'stat'
 gs 'stat'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/zdcasino.jpg"></right>'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/zdcasino.jpg"></right>'
 'You stand in front of the door of the huge building casinos.'
 'You stand in front of the door of the huge building casinos.'
 
 
-act 'Enter the casino': minut += 1 & gt 'hall'
-
 act 'Return to the city industrial area': minut += 10 & gt 'nord'
 act 'Return to the city industrial area': minut += 10 & gt 'nord'
 
 
+act 'Enter the casino': minut += 1 & gt 'hall'
+
 !!if tobiQW < 1000:tobiQW = 1000
 !!if tobiQW < 1000:tobiQW = 1000
 
 
 --- casino ---------------------------------
 --- casino ---------------------------------

+ 12 - 30
locations/cfnm.qsrc

@@ -1,9 +1,9 @@
 # cfnm
 # cfnm
 
 
+menu_off = 1
+
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
-	cla
-	clr
-	*clr
+	*clr & cla
 	money -= 50
 	money -= 50
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/cfnm.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/cfnm.jpg"></center>'
@@ -21,9 +21,7 @@ if $ARGS[0] = 'start':
 end
 end
 
 
 if $ARGS[0] = 'tits':
 if $ARGS[0] = 'tits':
-	cla
-	clr
-	*clr
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/cfnm1.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/cfnm1.jpg"></center>'
 	'The stripper continues sucking your nipples, occasionally introducing a gentle bite, eliciting a moan from your lips. You reach out your thin hand and begin rubbing his cock, feeling the warmth beneath your palm'
 	'The stripper continues sucking your nipples, occasionally introducing a gentle bite, eliciting a moan from your lips. You reach out your thin hand and begin rubbing his cock, feeling the warmth beneath your palm'
@@ -44,9 +42,7 @@ if $ARGS[0] = 'tits':
 end
 end
 
 
 if $ARGS[0] = 'hand':
 if $ARGS[0] = 'hand':
-	cla
-	clr
-	*clr
+	*clr & cla
 	fotoCFNMblowjob += 1
 	fotoCFNMblowjob += 1
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/sex/cfnmhand.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/sex/cfnmhand.jpg"></center>'
@@ -60,9 +56,7 @@ if $ARGS[0] = 'hand':
 end
 end
 
 
 if $ARGS[0] = 'eat':
 if $ARGS[0] = 'eat':
-	cla
-	clr
-	*clr
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/cfnm2.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/cfnm2.jpg"></center>'
 	'The stripper holds a towel between the two of you, creating a barrier. You begin stroking him more vigorously as his thick, veiny cock grows harder.'
 	'The stripper holds a towel between the two of you, creating a barrier. You begin stroking him more vigorously as his thick, veiny cock grows harder.'
@@ -83,9 +77,7 @@ if $ARGS[0] = 'eat':
 end
 end
 
 
 if $ARGS[0] = 'blow':
 if $ARGS[0] = 'blow':
-	cla
-	clr
-	*clr
+	*clr & cla
 
 
 	if stripguy = 0: stripguy = 1 & guy += 1
 	if stripguy = 0: stripguy = 1 & guy += 1
 
 
@@ -109,9 +101,7 @@ if $ARGS[0] = 'blow':
 end
 end
 
 
 if $ARGS[0] = 'blow2':
 if $ARGS[0] = 'blow2':
-	cla
-	clr
-	*clr
+	*clr & cla
 	fotoCFNMblowjob += 1
 	fotoCFNMblowjob += 1
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/sex/cfnmblow2.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/sex/cfnmblow2.jpg"></center>'
@@ -133,9 +123,7 @@ if $ARGS[0] = 'blow2':
 end
 end
 
 
 if $ARGS[0] = 'blow3':
 if $ARGS[0] = 'blow3':
-	cla
-	clr
-	*clr
+	*clr & cla
 	spafinloc = 12
 	spafinloc = 12
 	gs 'cum_manage'
 	gs 'cum_manage'
 	swallow += 1
 	swallow += 1
@@ -152,9 +140,7 @@ if $ARGS[0] = 'blow3':
 end
 end
 
 
 if $ARGS[0] = 'blow4':
 if $ARGS[0] = 'blow4':
-	cla
-	clr
-	*clr
+	*clr & cla
 	spafinloc = 11
 	spafinloc = 11
 	gs 'cum_manage'
 	gs 'cum_manage'
 	facial += 1
 	facial += 1
@@ -171,9 +157,7 @@ if $ARGS[0] = 'blow4':
 end
 end
 
 
 if $ARGS[0] = 'end':
 if $ARGS[0] = 'end':
-	cla
-	clr
-	*clr
+	*clr & cla
 	pcs_horny += 10
 	pcs_horny += 10
 	minut += 15
 	minut += 15
 	gs 'stat'
 	gs 'stat'
@@ -187,9 +171,7 @@ if $ARGS[0] = 'end':
 end
 end
 
 
 if $ARGS[0] = 'sex':
 if $ARGS[0] = 'sex':
-	cla
-	clr
-	*clr
+	*clr & cla
 	cumprecheck = 1
 	cumprecheck = 1
 	gs 'cum_manage'
 	gs 'cum_manage'
 	spafinloc = 4
 	spafinloc = 4

+ 2 - 0
locations/changingroom.qsrc

@@ -1,5 +1,7 @@
 # changingroom
 # changingroom
 
 
+menu_off = 1
+
 if $ARGS[0] = 'view_swim_list':
 if $ARGS[0] = 'view_swim_list':
 
 
 	if $loc = 'fit' or $loc = 'bass' or temper >= 15:
 	if $loc = 'fit' or $loc = 'bass' or temper >= 15:

+ 4 - 2
locations/chessplay.qsrc

@@ -1,5 +1,7 @@
 # chessplay
 # chessplay
 
 
+menu_off = 1
+
 if $ARGS[0] = '':
 if $ARGS[0] = '':
 	if $chess_name='':$chess_name='girl'
 	if $chess_name='':$chess_name='girl'
 	gs'stat'
 	gs'stat'
@@ -294,7 +296,7 @@ end
 
 
 
 
 if $ARGS[0] = 'win':
 if $ARGS[0] = 'win':
-	cls
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	chess_win += 1
 	chess_win += 1
 	'You have won this game.'
 	'You have won this game.'
@@ -302,7 +304,7 @@ if $ARGS[0] = 'win':
 end
 end
 
 
 if $ARGS[0] = 'lose':
 if $ARGS[0] = 'lose':
-	cls
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	'You have lost this game.'
 	'You have lost this game.'
 	act 'Return': gt $loc
 	act 'Return': gt $loc

+ 25 - 3
locations/cityTrain.qsrc

@@ -4,7 +4,10 @@ if $ARGS[0] = 'start':
 	$metka = 'start'
 	$metka = 'start'
 	$loc = 'cityTrain'
 	$loc = 'cityTrain'
 	$location_type = 'public_outdoors'
 	$location_type = 'public_outdoors'
-	cls
+	$menu_loc = 'cityTrain'
+	$menu_arg = 'start'
+	menu_off = 0
+	*clr & cla
 	gs'stat'
 	gs'stat'
 	'<center><B>City center railway station</B></center>'
 	'<center><B>City center railway station</B></center>'
 	if hour < 9 or hour > 19:
 	if hour < 9 or hour > 19:
@@ -26,7 +29,10 @@ if $ARGS[0] = 'inside':
 	$metka = 'inside'
 	$metka = 'inside'
 	$loc = 'cityTrain'
 	$loc = 'cityTrain'
 	$location_type = 'public_indoors'
 	$location_type = 'public_indoors'
-	cls
+	$menu_loc = 'cityTrain'
+	$menu_arg = 'inside'
+	menu_off = 0
+	*clr & cla
 	gs'stat'
 	gs'stat'
 	'<center><B>City center railway station</B></center>'
 	'<center><B>City center railway station</B></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/trainstation/central_station_inside.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/trainstation/central_station_inside.jpg"></center>'
@@ -42,7 +48,10 @@ if $ARGS[0] = 'inside':
 end
 end
 
 
 if $ARGS[0] = 'tickets':
 if $ARGS[0] = 'tickets':
-	cls
+	$menu_loc = 'cityTrain'
+	$menu_arg = 'tickets'
+	menu_off = 0
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	'<center><h4>Ticket office</h4></center>'
 	'<center><h4>Ticket office</h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/kassa.jpg" ></center>'
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/kassa.jpg" ></center>'
@@ -57,6 +66,7 @@ if $ARGS[0] = 'tickets':
 	if money >= 1500 and Trainpass_day <= daystart:
 	if money >= 1500 and Trainpass_day <= daystart:
 		act 'Buy a weekly pass  (7 days - 1500 <b>₽</b>) ':
 		act 'Buy a weekly pass  (7 days - 1500 <b>₽</b>) ':
 			cla
 			cla
+			menu_off = 1
 			money -= 1500
 			money -= 1500
 			Trainpass_day = daystart + 7
 			Trainpass_day = daystart + 7
 			act 'Return': gt 'cityTrain', 'inside'
 			act 'Return': gt 'cityTrain', 'inside'
@@ -66,6 +76,7 @@ if $ARGS[0] = 'tickets':
 	if money >= 5500 and Trainpass_day <= daystart:
 	if money >= 5500 and Trainpass_day <= daystart:
 		act 'Buy a monthly pass (30day -  5500 <b>₽</b>)':
 		act 'Buy a monthly pass (30day -  5500 <b>₽</b>)':
 			cla
 			cla
+			menu_off = 1
 			money -= 5500
 			money -= 5500
 			Trainpass_day = daystart + 30
 			Trainpass_day = daystart + 30
 			act 'Return': gt 'cityTrain', 'inside'
 			act 'Return': gt 'cityTrain', 'inside'
@@ -74,6 +85,9 @@ if $ARGS[0] = 'tickets':
 end
 end
 
 
 if $ARGS[0] = 'buy_ticket':
 if $ARGS[0] = 'buy_ticket':
+	$menu_loc = 'cityTrain'
+	$menu_arg = 'buy_ticket'
+	menu_off = 0
 	
 	
 	act 'Leave the ticket office': minut += 1 & gt 'cityTrain', 'inside'
 	act 'Leave the ticket office': minut += 1 & gt 'cityTrain', 'inside'
 	
 	
@@ -125,6 +139,9 @@ end
 
 
 if $ARGS[0] = 'platform':
 if $ARGS[0] = 'platform':
 	$location_type = 'public_outdoors'
 	$location_type = 'public_outdoors'
+	$menu_loc = 'cityTrain'
+	$menu_arg = 'platform'
+	menu_off = 0
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzalper.jpg" ></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzalper.jpg" ></center>'
 	'When you arrive at the platform, you can''t help but notice it bustling with activity. Lots of passengers are coming and going, all carrying shopping bags. It feels like it is always busy here, no matter at what time of the day it is.'
 	'When you arrive at the platform, you can''t help but notice it bustling with activity. Lots of passengers are coming and going, all carrying shopping bags. It feels like it is always busy here, no matter at what time of the day it is.'
@@ -145,6 +162,7 @@ end
 if $ARGS[0] = 'ind':
 if $ARGS[0] = 'ind':
 	$loc = 'nordtrain'
 	$loc = 'nordtrain'
 	$metka = 'platform'
 	$metka = 'platform'
+	menu_off = 1
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	if rand(1, 100) < 15: gt 'train', 'private'
 	if rand(1, 100) < 15: gt 'train', 'private'
@@ -161,6 +179,7 @@ end
 if $ARGS[0] = 'communal':
 if $ARGS[0] = 'communal':
 	$loc = 'train'
 	$loc = 'train'
 	$metka = 'communal'
 	$metka = 'communal'
+	menu_off = 1
 	minut += 15
 	minut += 15
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
 	if rand(1, 100) <= 20: gt 'train', 'events'
 	if rand(1, 100) <= 20: gt 'train', 'events'
@@ -176,6 +195,7 @@ end
 if $ARGS[0] = 'village':
 if $ARGS[0] = 'village':
 	$loc = 'train'
 	$loc = 'train'
 	$metka = 'village'
 	$metka = 'village'
+	menu_off = 1
 	minut += 25
 	minut += 25
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
 	if rand(1, 100) <= 10: gt 'train_incidental', 'events'
 	if rand(1, 100) < 20: gt 'train', 'events'
 	if rand(1, 100) < 20: gt 'train', 'events'
@@ -191,6 +211,7 @@ end
 if $ARGS[0] = 'oldtown':
 if $ARGS[0] = 'oldtown':
 	$loc = 'train'
 	$loc = 'train'
 	$metka = 'oldtown'
 	$metka = 'oldtown'
+	menu_off = 1
 	minut += 35
 	minut += 35
 	if rand(1, 100) < 15: gt 'train', 'private'
 	if rand(1, 100) < 15: gt 'train', 'private'
 	if rand(1, 100) < 30: gt 'train', 'Gopnik'
 	if rand(1, 100) < 30: gt 'train', 'Gopnik'
@@ -208,6 +229,7 @@ end
 if $ARGS[0] = 'pavlovsk':
 if $ARGS[0] = 'pavlovsk':
 	$loc = 'pavtrainhall'
 	$loc = 'pavtrainhall'
 	$metka = 'platform'
 	$metka = 'platform'
+	menu_off = 1
 	minut += 40
 	minut += 40
 	if rand(1, 100) < 15: gt 'train', 'private'
 	if rand(1, 100) < 15: gt 'train', 'private'
 	if rand(1, 100) < 30: gt 'train', 'Gopnik'
 	if rand(1, 100) < 30: gt 'train', 'Gopnik'

+ 23 - 17
locations/clener.qsrc

@@ -1,10 +1,11 @@
 # clener
 # clener
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
-	cla
-	*clr
+	$menu_loc = 'clener'
+	$menu_arg = 'start'
+	menu_off = 0
 	CLOSE ALL
 	CLOSE ALL
 	if sound = 0 and hour >= 8 and hour < 17:PLAY 'sound/office.mp3',30 & PLAY 'sound/office2.mp3',30
 	if sound = 0 and hour >= 8 and hour < 17:PLAY 'sound/office.mp3',30 & PLAY 'sound/office2.mp3',30
-	clr
+	*clr & cla
 	gs 'stat'
 	gs 'stat'
 	gs 'themes', 'indoors'
 	gs 'themes', 'indoors'
 	'<center><b><font color="maroon">Office building</font></b></center>'
 	'<center><b><font color="maroon">Office building</font></b></center>'
@@ -19,11 +20,14 @@ if $ARGS[0] = 'start':
 		end
 		end
 	end
 	end
 
 
+	act 'Leave': minut += 5 & gt 'street'
+	
 	if jouryQwNo = 1 and hour = 17:
 	if jouryQwNo = 1 and hour = 17:
 		'You see Yuri walking down the corridor, you remember him making a move on you but you refused him. He looks at you, smiles and approaches you.'
 		'You see Yuri walking down the corridor, you remember him making a move on you but you refused him. He looks at you, smiles and approaches you.'
 
 
 		act 'Talk to Yuri':
 		act 'Talk to Yuri':
 			cla
 			cla
+			menu_off = 1
 			minut += 15
 			minut += 15
 			gs 'stat'
 			gs 'stat'
 			'Still smiling he says, "<<$pcs_nickname>>, want to grab a cup of coffee?"'
 			'Still smiling he says, "<<$pcs_nickname>>, want to grab a cup of coffee?"'
@@ -31,7 +35,7 @@ if $ARGS[0] = 'start':
 			act 'Decline':jouryQwNo = 1 & gt 'clener', 'start'
 			act 'Decline':jouryQwNo = 1 & gt 'clener', 'start'
 
 
 			act 'Accept':
 			act 'Accept':
-				cls
+				*clr & cla
 				minut += 30
 				minut += 30
 				gs 'stat'
 				gs 'stat'
 				'You nod and the two of you head off to the café, where Yuri orders coffee. You sit down at the table and begin to sip on your coffee. Yuri is painfully quiet, he has no sense of humor and is very stiff.'
 				'You nod and the two of you head off to the café, where Yuri orders coffee. You sit down at the table and begin to sip on your coffee. Yuri is painfully quiet, he has no sense of humor and is very stiff.'
@@ -49,7 +53,8 @@ if $ARGS[0] = 'start':
 
 
 	if borodachQW > 0 and hour >= 19:
 	if borodachQW > 0 and hour >= 19:
 		act 'Approach Sasha':
 		act 'Approach Sasha':
-			cls
+			*clr & cla
+			menu_off = 1
 			minut += 5
 			minut += 5
 			gs 'stat'
 			gs 'stat'
 
 
@@ -92,7 +97,7 @@ if $ARGS[0] = 'start':
 						end
 						end
 
 
 						act 'Put your hand on his pants':
 						act 'Put your hand on his pants':
-							cls
+							*clr & cla
 							borodachTimes += 1
 							borodachTimes += 1
 							gs 'stat'
 							gs 'stat'
 
 
@@ -126,7 +131,8 @@ if $ARGS[0] = 'start':
 		'You see a crossword placed on a chair in front of the guard as he''s deeply sighs. He looks up to you and asks, "I''m looking for another word for pleasure, the second letter is u."'
 		'You see a crossword placed on a chair in front of the guard as he''s deeply sighs. He looks up to you and asks, "I''m looking for another word for pleasure, the second letter is u."'
 
 
 		act 'Reply':
 		act 'Reply':
-			cls
+			*clr & cla
+			menu_off = 1
 			borodachQW = 1
 			borodachQW = 1
 			'"Fulfilment?" you reply.'
 			'"Fulfilment?" you reply.'
 			'The guard smiles, "You''re right, the only word that came up in my head was fucking."'
 			'The guard smiles, "You''re right, the only word that came up in my head was fucking."'
@@ -196,6 +202,7 @@ if $ARGS[0] = 'start':
 	if clener >= 10 and clenerT = 0:
 	if clener >= 10 and clenerT = 0:
 		act 'Ask for more work':
 		act 'Ask for more work':
 			cla
 			cla
+			menu_off = 1
 			'You ask Boris Ivanovich whether he has more work for you. He says that he needs a cleaner to clean the toilets. You''ll be almost able to work every day. Cleaning toilets for an hour earns you 65 <b>₽</b> upfront.'
 			'You ask Boris Ivanovich whether he has more work for you. He says that he needs a cleaner to clean the toilets. You''ll be almost able to work every day. Cleaning toilets for an hour earns you 65 <b>₽</b> upfront.'
 
 
 			act 'Refuse and leave': minut += 5 & gt 'street'
 			act 'Refuse and leave': minut += 5 & gt 'street'
@@ -213,6 +220,7 @@ if $ARGS[0] = 'start':
 	if clener = 1:
 	if clener = 1:
 		act 'Ask about available jobs':
 		act 'Ask about available jobs':
 			cla
 			cla
+			menu_off = 1
 			'You head into the office that advertised the job. You see a large man in a jacket sitting there. He tells you can clean the Office for 65 <b>₽</b> per hour, payed upfront.'
 			'You head into the office that advertised the job. You see a large man in a jacket sitting there. He tells you can clean the Office for 65 <b>₽</b> per hour, payed upfront.'
 
 
 			act 'Refuse and leave': minut += 5 & gt 'street'
 			act 'Refuse and leave': minut += 5 & gt 'street'
@@ -229,8 +237,8 @@ if $ARGS[0] = 'start':
 
 
 	if clener > 1 and clenday ! daystart:
 	if clener > 1 and clenday ! daystart:
 		act 'Mop the floor in the office for 65 <b>₽</b> (1:00)':
 		act 'Mop the floor in the office for 65 <b>₽</b> (1:00)':
-			cla
-			*clr
+			*clr & cla
+			menu_off = 1
 			clenday = daystart
 			clenday = daystart
 			minut += 60
 			minut += 60
 			clener += 1
 			clener += 1
@@ -251,7 +259,7 @@ if $ARGS[0] = 'start':
 					jouryQw += 1
 					jouryQw += 1
 					'You fill a bucket of water and head over  to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you can feel his burning gaze.'
 					'You fill a bucket of water and head over  to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you can feel his burning gaze.'
 				elseif jouryQw = 7 and hour >= 9 and hour <= 16:
 				elseif jouryQw = 7 and hour >= 9 and hour <= 16:
-					cls
+					*clr & cla
 					gs 'stat'
 					gs 'stat'
 					jouryQw += 1
 					jouryQw += 1
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
@@ -296,8 +304,8 @@ if $ARGS[0] = 'start':
 
 
 	if clenerT >= 1 and clendayT ! daystart:
 	if clenerT >= 1 and clendayT ! daystart:
 		act 'Clean toilets for 65 <b>₽</b> (1:00)':
 		act 'Clean toilets for 65 <b>₽</b> (1:00)':
-			cla
-			*clr
+			*clr & cla
+			menu_off = 1
 			clendayT = daystart
 			clendayT = daystart
 			minut += 60
 			minut += 60
 			clenerT += 1
 			clenerT += 1
@@ -342,14 +350,14 @@ if $ARGS[0] = 'start':
 				'You clean the toilet and all of a sudden you hear the toilet door as someone walks in, as you turn around you see a man. To your surprise, it is Stasik, with him is his friend Valera that you''ve met at the beach. Stasik also apparently recognizes you, walking up to you, "Hi <<$pcs_nickname>>, you work here as a cleaner?"'
 				'You clean the toilet and all of a sudden you hear the toilet door as someone walks in, as you turn around you see a man. To your surprise, it is Stasik, with him is his friend Valera that you''ve met at the beach. Stasik also apparently recognizes you, walking up to you, "Hi <<$pcs_nickname>>, you work here as a cleaner?"'
 
 
 				act 'Explain':
 				act 'Explain':
-					cls
+					*clr & cla
 					gs 'stat'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
 					'Shrugging, you say, "I need the money. So I''ll do whatever it takes."'
 					'Shrugging, you say, "I need the money. So I''ll do whatever it takes."'
 					'Stasik smiles, "Well, an attractive girl as you shouldn''t work a job like this, I can find a decent part-time job instead."'
 					'Stasik smiles, "Well, an attractive girl as you shouldn''t work a job like this, I can find a decent part-time job instead."'
 
 
 					act 'Further':
 					act 'Further':
-						cls
+						*clr & cla
 						SVqw = 1
 						SVqw = 1
 						gs 'stat'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
 						'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
@@ -359,7 +367,7 @@ if $ARGS[0] = 'start':
 						act 'Not interested':gt 'clener', 'start'
 						act 'Not interested':gt 'clener', 'start'
 
 
 						act 'Accept':
 						act 'Accept':
-							cls
+							*clr & cla
 							SVqw = 2
 							SVqw = 2
 							gs 'stat'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
 							'<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener2.jpg"></center>'
@@ -378,8 +386,6 @@ if $ARGS[0] = 'start':
 			act 'Leave':gt 'clener', 'start'
 			act 'Leave':gt 'clener', 'start'
 		end
 		end
 	end
 	end
-
-	act 'Leave': minut += 5 & gt 'street'
 end
 end
 
 
 --- clener ---------------------------------
 --- clener ---------------------------------

+ 2 - 0
locations/cloakroom.qsrc

@@ -1,5 +1,7 @@
 # cloakroom
 # cloakroom
 
 
+menu_off = 1
+
 $coat_list_line = {
 $coat_list_line = {
 	!! a single line in a clothing list (wardrobe, etc)
 	!! a single line in a clothing list (wardrobe, etc)
 	!! ARGS 0 - clothing index
 	!! ARGS 0 - clothing index

+ 2 - 0
locations/clothing.qsrc

@@ -1,5 +1,7 @@
 # clothing
 # clothing
 
 
+menu_off = 1
+
 $clothing_list_line = {
 $clothing_list_line = {
 	!! a single line in a clothing list (wardrobe, etc)
 	!! a single line in a clothing list (wardrobe, etc)
 	!! ARGS 0 - action type (wardrobe, sell, resize, store, forsale)
 	!! ARGS 0 - action type (wardrobe, sell, resize, store, forsale)

+ 2 - 0
locations/clothing_QV.qsrc

@@ -1,5 +1,7 @@
 # clothing_QV
 # clothing_QV
 
 
+menu_off = 1
+
 if $ARGS[0] = 'list':
 if $ARGS[0] = 'list':
 	'<h3><center><b><font color="maroon">Wardrobe - Brand Selection</font></b></center></h3>'
 	'<h3><center><b><font color="maroon">Wardrobe - Brand Selection</font></b></center></h3>'
 	'<center><b><font color="maroon">click on a shop name to view clothes from that shop</font></b></center>'
 	'<center><b><font color="maroon">click on a shop name to view clothes from that shop</font></b></center>'

+ 71 - 37
locations/club.qsrc

@@ -4,7 +4,10 @@ CLOSE ALL
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
 	$sexloc = $CURLOC
 	$sexloc = $CURLOC
     $location_type = 'public_outdoors'
     $location_type = 'public_outdoors'
-	cls
+	$menu_loc = 'club'
+	$menu_arg = 'start'
+	menu_off = 0
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	gs 'themes', 'indoors'
 	gs 'themes', 'indoors'
@@ -19,8 +22,8 @@ if $ARGS[0] = 'start':
 
 
 	if clubwork = 1:
 	if clubwork = 1:
 		act 'Meet Erik for work':
 		act 'Meet Erik for work':
-			cla
-			*clr
+			*clr & cla
+			menu_off = 1
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club.jpg"></center>'
 			'You tell the bouncer you are here to work for Erik'
 			'You tell the bouncer you are here to work for Erik'
 			'He looks you over.'
 			'He looks you over.'
@@ -47,6 +50,7 @@ if $ARGS[0] = 'start':
 
 
 	if money >= 250:
 	if money >= 250:
 		act 'Enter the club (250 <b>₽</b>)':
 		act 'Enter the club (250 <b>₽</b>)':
+			menu_off = 1
 			if pcs_makeup > 1 and pcs_sweat < 30 and (PCloSkirt > 2 or PCloPants > 4 or $clothingworntype = 'exhibit'):
 			if pcs_makeup > 1 and pcs_sweat < 30 and (PCloSkirt > 2 or PCloPants > 4 or $clothingworntype = 'exhibit'):
 				'You can feel his eyes all over your body, but eventually he nods and lets you inside.'
 				'You can feel his eyes all over your body, but eventually he nods and lets you inside.'
 				minut += 5
 				minut += 5
@@ -75,7 +79,10 @@ if $ARGS[0] = 'start':
 end
 end
 
 
 if $ARGS[0] = 'inside':
 if $ARGS[0] = 'inside':
-	cls
+	$menu_loc = 'club'
+	$menu_arg = 'inside'
+	menu_off = 0
+	*clr & cla
 	minut += 5
 	minut += 5
 	frost = 0
 	frost = 0
 	gs 'stat'
 	gs 'stat'
@@ -88,6 +95,7 @@ if $ARGS[0] = 'inside':
 	if hour >= 18 and pcs_apprnc > 88 and clubwork = 0 and clubno = 0 and rand (0,10) = 0:
 	if hour >= 18 and pcs_apprnc > 88 and clubwork = 0 and clubno = 0 and rand (0,10) = 0:
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 		'You are approached by a man in a suit, at first you think he must be security, but his suit looks too expensive.'
 		'You are approached by a man in a suit, at first you think he must be security, but his suit looks too expensive.'
 		'"Hi there, my name''s Erik, I''m the promoter for the club. I''m looking for someone for some casual work and you have the right look."'
 		'"Hi there, my name''s Erik, I''m the promoter for the club. I''m looking for someone for some casual work and you have the right look."'
@@ -113,10 +121,18 @@ if $ARGS[0] = 'inside':
 		exit
 		exit
 	end
 	end
 
 
+	act 'Leave the club':
+		cla
+		drunk = 0
+		minut += 5
+		gt 'down'
+	end
+	
 	if hour >= 18  and clubwork = 0 and clubno = 1:
 	if hour >= 18  and clubwork = 0 and clubno = 1:
 		act 'Look for the promoter':
 		act 'Look for the promoter':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 5
 			minut += 5
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 			'You search the club for a few minutes, before finding the promoter.'
 			'You search the club for a few minutes, before finding the promoter.'
@@ -157,23 +173,20 @@ if $ARGS[0] = 'inside':
 			act 'Talk to him':gt 'club', 'work'
 			act 'Talk to him':gt 'club', 'work'
 		end
 		end
 	end
 	end
-
-	act 'Leave the club':
-		cla
-		drunk = 0
-		minut += 5
-		gt 'down'
-	end
 end
 end
 
 
 if $ARGS[0] = 'toi':
 if $ARGS[0] = 'toi':
-	cla
-	*clr
+	$menu_loc = 'club'
+	$menu_arg = 'toi'
+	menu_off = 0
+	*clr & cla
 	'Shit, there''s a very long queue infront of the womens toilet. You can''t tell how long this is going to take.'
 	'Shit, there''s a very long queue infront of the womens toilet. You can''t tell how long this is going to take.'
 
 
 	act 'Wait in line':
 	act 'Wait in line':
 		cla
 		cla
+		menu_off = 1
 		minut += rand(10, 30)
 		minut += rand(10, 30)
+		gs 'stat'
 		'Finally there''s a free booth for you.'
 		'Finally there''s a free booth for you.'
 
 
 		act 'WC':gt 'club', 'tou'
 		act 'WC':gt 'club', 'tou'
@@ -181,6 +194,7 @@ if $ARGS[0] = 'toi':
 
 
 	act 'Sneak into the mens toilet':
 	act 'Sneak into the mens toilet':
 		cla
 		cla
+		menu_off = 1
 		acta += 1
 		acta += 1
 		'You slip unnoticed into the mens toilet room.'
 		'You slip unnoticed into the mens toilet room.'
 
 
@@ -213,7 +227,10 @@ if $ARGS[0] = 'tou':
 	$locM = 'club'
 	$locM = 'club'
 	$metkaM = 'tou'
 	$metkaM = 'tou'
     $location_type = 'bathroom'
     $location_type = 'bathroom'
-	cls
+	$menu_loc = 'club'
+	$menu_arg = 'tou'
+	menu_off = 0
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	gs 'themes', 'indoors'
 	gs 'themes', 'indoors'
@@ -233,24 +250,27 @@ if $ARGS[0] = 'tou':
 end
 end
 
 
 if $ARGS[0] = 'dance':
 if $ARGS[0] = 'dance':
-	cls
+	*clr & cla
+	$menu_loc = 'club'
+	$menu_arg = 'dance'
+	menu_off = 0
 	gs 'stat'
 	gs 'stat'
 	'<center><b><font color="maroon">The dance floor</font></b></center>'
 	'<center><b><font color="maroon">The dance floor</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
 	'The club is filled to the brink with people. Most of which are dancing on the dancefloor.'
 	'The club is filled to the brink with people. Most of which are dancing on the dancefloor.'
+	
 	act 'Leave':gt 'club', 'inside'
 	act 'Leave':gt 'club', 'inside'
-
+	
 	if hour <= 3 or hour >= 18:
 	if hour <= 3 or hour >= 18:
 		act 'Dance (0:15)':
 		act 'Dance (0:15)':
-			if pcs_inhib < 40:inhib_exp += rand(1,2)
-			cla
-			*clr
+			*clr % cla
+			menu_off = 1
 			minut += 15
 			minut += 15
 			pcs_stam -= 5
 			pcs_stam -= 5
 			pcs_sweat += 3
 			pcs_sweat += 3
 			fat -= 1
 			fat -= 1
 			danc_exp += 1
 			danc_exp += 1
-
+			if pcs_inhib < 40:inhib_exp += rand(1,2)
 			pcs_mood += 10
 			pcs_mood += 10
 			pcs_willpwr += 10
 			pcs_willpwr += 10
 			clrand = rand(0, 400)
 			clrand = rand(0, 400)
@@ -262,6 +282,8 @@ if $ARGS[0] = 'dance':
 				gs 'boy'
 				gs 'boy'
 				'While you''re dancing you feel that someone is groping your ass, you turn around and see <<$boybody>> <<$boybod>> <<$boyface>>. He''s <<$boyClo>>'
 				'While you''re dancing you feel that someone is groping your ass, you turn around and see <<$boybody>> <<$boybod>> <<$boyface>>. He''s <<$boyClo>>'
 
 
+				act 'Stop dancing':gt 'club', 'inside'
+				
 				act 'Dance with him':
 				act 'Dance with him':
 					cla
 					cla
 					*clr
 					*clr
@@ -314,6 +336,8 @@ if $ARGS[0] = 'dance':
 					'While you''re dancing you a hand groping your ass. You turn around to see who touched your, but you''re surprised to see women smiling at you, she seems to be biting her lips.'
 					'While you''re dancing you a hand groping your ass. You turn around to see who touched your, but you''re surprised to see women smiling at you, she seems to be biting her lips.'
 					dansexclub = rand(0, 1)
 					dansexclub = rand(0, 1)
 
 
+					act 'Stop dancing':gt 'club', 'inside'
+					
 					if dansexclub = 0:
 					if dansexclub = 0:
 						act '"Let''s go to the toilet, to have fun."':gt 'club', 'lezbsort'
 						act '"Let''s go to the toilet, to have fun."':gt 'club', 'lezbsort'
 					elseif dansexclub = 1:
 					elseif dansexclub = 1:
@@ -321,8 +345,6 @@ if $ARGS[0] = 'dance':
 
 
 						act '"Let''s go to VIP-Room, to have fun."':$sexloc = 'vipclub' & xgt 'lezbsex', 'var'
 						act '"Let''s go to VIP-Room, to have fun."':$sexloc = 'vipclub' & xgt 'lezbsex', 'var'
 					end
 					end
-
-					act 'Send it':gt 'club', 'inside'
 				end
 				end
 			end
 			end
 
 
@@ -330,8 +352,8 @@ if $ARGS[0] = 'dance':
 		end
 		end
 
 
 		act 'Go up to the DJ (0:30)':
 		act 'Go up to the DJ (0:30)':
-			cla
-			*clr
+			*clr & cla
+			menu_off = 1
 			minut += 30
 			minut += 30
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club7.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club7.jpg"></center>'
 
 
@@ -342,7 +364,7 @@ if $ARGS[0] = 'dance':
 				'As Alexei sees you, he invites you into his DJ booth.'
 				'As Alexei sees you, he invites you into his DJ booth.'
 
 
 				act 'Go into the booth':
 				act 'Go into the booth':
-					cls
+					*clr & cla
 					minut += 30
 					minut += 30
 					gs 'stat'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club7.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club7.jpg"></center>'
@@ -362,7 +384,7 @@ if $ARGS[0] = 'dance':
 						act 'Leave the booth':gt 'club', 'dance'
 						act 'Leave the booth':gt 'club', 'dance'
 
 
 						act 'Get on your knees and give him a BJ':
 						act 'Get on your knees and give him a BJ':
-							cls
+							*clr & cla
 							alexeySex += 1
 							alexeySex += 1
 							alexeyClubSex += 1
 							alexeyClubSex += 1
 							gs 'stat'
 							gs 'stat'
@@ -374,7 +396,7 @@ if $ARGS[0] = 'dance':
 							gs 'stat'
 							gs 'stat'
 
 
 							act 'He''s cumming':
 							act 'He''s cumming':
-								cls
+								*clr & cla
 								pcs_horny += 10
 								pcs_horny += 10
 								minut += 10
 								minut += 10
 								swallow += 1
 								swallow += 1
@@ -401,15 +423,18 @@ if $ARGS[0] = 'dance':
 			act 'Leave the booth':gt 'club', 'dance'
 			act 'Leave the booth':gt 'club', 'dance'
 		end
 		end
 	else
 	else
+		menu_off = 1
 		'Its getting late and the music stops, looks like it might be time to go home.'
 		'Its getting late and the music stops, looks like it might be time to go home.'
 		act 'Leave':gt 'club', 'inside'
 		act 'Leave':gt 'club', 'inside'
-	end
-	act 'Stop dancing':gt 'club', 'inside'
+	end	
 end
 end
 
 
 if $ARGS[0] = 'bar':
 if $ARGS[0] = 'bar':
-	cls
+	*clr & cla
 	minut += 5
 	minut += 5
+	$menu_loc = 'club'
+	$menu_arg = 'bar'
+	menu_off = 0
 	gs 'stat'
 	gs 'stat'
 	'<center><b><font color="maroon">bar</font></b></center>'
 	'<center><b><font color="maroon">bar</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club10.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club10.jpg"></center>'
@@ -422,7 +447,8 @@ if $ARGS[0] = 'bar':
 	act 'Go back':gt 'club', 'inside'
 	act 'Go back':gt 'club', 'inside'
 
 
 	if alko >= 7:
 	if alko >= 7:
-		cls
+		*clr & cla
+		menu_off = 1
 		temp = rand(0, 100)
 		temp = rand(0, 100)
 
 
 		if temp = 5:
 		if temp = 5:
@@ -705,8 +731,8 @@ if $ARGS[0] = 'bar':
 
 
 	if money >= 300:
 	if money >= 300:
 		act 'Buy a drink (300 <b>₽</b>)':
 		act 'Buy a drink (300 <b>₽</b>)':
-			cla
-			*clr
+			*clr & cla
+			menu_off = 1
 			minut += 15
 			minut += 15
 			fat += 1
 			fat += 1
 			pcs_mood += 10
 			pcs_mood += 10
@@ -727,7 +753,8 @@ if $ARGS[0] = 'bar':
 end
 end
 
 
 if $ARGS[0] = 'sex':
 if $ARGS[0] = 'sex':
-	cls
+	*clr & cla
+	menu_off = 1
 	dynamic $venerasiakOral
 	dynamic $venerasiakOral
 	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
 	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
 	gs 'boyStat', $npclastgenerated
 	gs 'boyStat', $npclastgenerated
@@ -844,6 +871,7 @@ end
 if $ARGS[0] = 'bar0':
 if $ARGS[0] = 'bar0':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar0.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar0.jpg"></center>'
 	'As you sit at the bar, a woman walk up to you and begins to chat with you.'
 	'As you sit at the bar, a woman walk up to you and begins to chat with you.'
@@ -943,6 +971,7 @@ end
 if $ARGS[0] = 'bar1':
 if $ARGS[0] = 'bar1':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar7.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar7.jpg"></center>'
 	'While you sit on one of the bar stools a man comes to and grabs on of your ass cheeks. "Why don''t we both have some fun together, huh?", the bloke says and you can hear, that he had more than one beer.'
 	'While you sit on one of the bar stools a man comes to and grabs on of your ass cheeks. "Why don''t we both have some fun together, huh?", the bloke says and you can hear, that he had more than one beer.'
@@ -976,6 +1005,7 @@ end
 if $ARGS[0] = 'bar2':
 if $ARGS[0] = 'bar2':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	dynamic $venerasiakOral
 	dynamic $venerasiakOral
 	guy += 1
 	guy += 1
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><b><font color="maroon">Bar</font></b></center>'
@@ -1008,6 +1038,7 @@ end
 if $ARGS[0] = 'bar3':
 if $ARGS[0] = 'bar3':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
 	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
 	gs 'boyStat', $npclastgenerated
 	gs 'boyStat', $npclastgenerated
 	cumprecheck = 1
 	cumprecheck = 1
@@ -1046,7 +1077,7 @@ end
 if $ARGS[0] = 'rape':
 if $ARGS[0] = 'rape':
 	cla
 	cla
 	*clr
 	*clr
-
+	menu_off = 1
 	SUB += 5
 	SUB += 5
 	rape += 1
 	rape += 1
 	'<center><b><font color="maroon">Bar</font></b></center>'
 	'<center><b><font color="maroon">Bar</font></b></center>'
@@ -1113,7 +1144,7 @@ end
 if $ARGS[0] = 'lezbsort':
 if $ARGS[0] = 'lezbsort':
 	cla
 	cla
 	*clr
 	*clr
-
+	menu_off = 1
 	girl += 1
 	girl += 1
 	'<center><b><font color="maroon">WC</font></b></center>'
 	'<center><b><font color="maroon">WC</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/lezbsort.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/lezbsort.jpg"></center>'
@@ -1127,6 +1158,7 @@ end
 if $ARGS[0] = 'lezbsort1':
 if $ARGS[0] = 'lezbsort1':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	'<center><b><font color="maroon">WC</font></b></center>'
 	'<center><b><font color="maroon">WC</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortukuni.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortukuni.jpg"></center>'
 	'You remove her pants and sit down on the toilet. She happily does as you told her. She spreads her legs and you begin to lick her cunt furiously. She moans heavily and plays with her erect nipples. Some time later you make cum.'
 	'You remove her pants and sit down on the toilet. She happily does as you told her. She spreads her legs and you begin to lick her cunt furiously. She moans heavily and plays with her erect nipples. Some time later you make cum.'
@@ -1146,6 +1178,7 @@ end
 if $ARGS[0] = 'lezbsort2':
 if $ARGS[0] = 'lezbsort2':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	'<center><b><font color="maroon">WC</font></b></center>'
 	'<center><b><font color="maroon">WC</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortkuni.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortkuni.jpg"></center>'
 	'You sit donw on the toilet and move your feet up. "Lick it", you tell her. She seductively bites her lips and happily follows your orders. The woman parts your pussy lips and begins to lick your cunt. Every so often she switches between licking your pink flesh and your flower. She doesn''t stop until you cry out in pleasure and cum.'
 	'You sit donw on the toilet and move your feet up. "Lick it", you tell her. She seductively bites her lips and happily follows your orders. The woman parts your pussy lips and begins to lick your cunt. Every so often she switches between licking your pink flesh and your flower. She doesn''t stop until you cry out in pleasure and cum.'
@@ -1190,7 +1223,8 @@ if $ARGS[0] = 'vip':
 end
 end
 
 
 if $ARGS[0] = 'work':
 if $ARGS[0] = 'work':
-	cls
+	*clr & cla
+	menu_off = 1
 	frost = 0
 	frost = 0
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'

+ 6 - 6
locations/comendant.qsrc

@@ -1,7 +1,9 @@
 # comendant
 # comendant
+
+menu_off = 1
+
 if $ARGS[0] = 'pos1':
 if $ARGS[0] = 'pos1':
-	cla
-	*clr
+	*clr & cla
 	minut += 10
 	minut += 10
 	gs 'stat'
 	gs 'stat'
 	'<center><b><font color="maroon">Hostel owner</font></b></center>'
 	'<center><b><font color="maroon">Hostel owner</font></b></center>'
@@ -11,8 +13,7 @@ if $ARGS[0] = 'pos1':
 end
 end
 
 
 if $ARGS[0] = 'pos2':
 if $ARGS[0] = 'pos2':
-	cla
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gor_dorm = 1
 	gor_dorm = 1
 	gs 'stat'
 	gs 'stat'
@@ -28,8 +29,7 @@ if $ARGS[0] = 'pos2':
 end
 end
 
 
 if $ARGS[0] = 'pos3':
 if $ARGS[0] = 'pos3':
-	cla
-	*clr
+	*clr & cla
 	minut += 5
 	minut += 5
 	gor_dorm = 3
 	gor_dorm = 3
 	gs 'stat'
 	gs 'stat'

+ 9 - 6
locations/crossfit_north_box.qsrc

@@ -7,8 +7,14 @@ $location_type = 'public_indoors'
 $metka = 'box'
 $metka = 'box'
 $metkaM = 'box'
 $metkaM = 'box'
 $crossfit_north_image_dir = 'images/locations/city/citycenter/gym/crossfit/'
 $crossfit_north_image_dir = 'images/locations/city/citycenter/gym/crossfit/'
+$menu_loc = 'crossfit_north_box'
+$menu_arg = 'box'
+menu_off = 0
 
 
 if $ARGS[0] = 'box':
 if $ARGS[0] = 'box':
+	
+	act 'Leave': gt 'fit', 'dressing room'
+	
 	if crossfit_random_choice < daystart OR $todays_crossfit_wod = '':
 	if crossfit_random_choice < daystart OR $todays_crossfit_wod = '':
 		gs 'crossfit_north_wod', 'setup_wod'
 		gs 'crossfit_north_wod', 'setup_wod'
 		$todays_crossfit_wod = $crossfit_wods[rand(0, ARRSIZE('$crossfit_wods') - 1)]
 		$todays_crossfit_wod = $crossfit_wods[rand(0, ARRSIZE('$crossfit_wods') - 1)]
@@ -29,17 +35,17 @@ if $ARGS[0] = 'box':
 	if crossfit_first = 1:
 	if crossfit_first = 1:
 		act 'Check personal records':
 		act 'Check personal records':
 			cla
 			cla
+			menu_off = 1
 			gt 'crossfit_north_record', 'view_records'
 			gt 'crossfit_north_record', 'view_records'
 		end
 		end
 	end
 	end
 
 
 	act 'Start the exercise':
 	act 'Start the exercise':
-
+		menu_off = 1
 		if last_crossfit_workout = daystart:
 		if last_crossfit_workout = daystart:
 			msg'<b><font color = red>You already did this workout today. That''s enough for one day.</font></b>'
 			msg'<b><font color = red>You already did this workout today. That''s enough for one day.</font></b>'
 		else
 		else
-			cla
-			*clr
+			*clr & cla
 			last_crossfit_workout = daystart
 			last_crossfit_workout = daystart
 			crossfit_first = 1
 			crossfit_first = 1
 			abonement -= 1
 			abonement -= 1
@@ -82,9 +88,6 @@ if $ARGS[0] = 'box':
 			end
 			end
 		end
 		end
 	end
 	end
-	act 'Turn around and leave':
-		gt 'fit', 'dressing room'
-	end
 end
 end
 
 
 --- crossfit_north_box ---------------------------------
 --- crossfit_north_box ---------------------------------

+ 3 - 4
locations/crossfit_north_girlmeet.qsrc

@@ -1,13 +1,13 @@
 # crossfit_north_girlmeet
 # crossfit_north_girlmeet
 
 
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
+	menu_off = 1
 	!! generate a girlfriend
 	!! generate a girlfriend
 	gs 'girl'
 	gs 'girl'
 	$boydesc = $previous_record_holder
 	$boydesc = $previous_record_holder
 	$boyClo = 'wearing workout clothes'
 	$boyClo = 'wearing workout clothes'
 	killvar '$previous_record_holder'
 	killvar '$previous_record_holder'
-	*clr
-	cla
+	*clr & cla
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
@@ -29,8 +29,7 @@ if $ARGS[0] = 'start':
 				gs 'dateF', 'date_choice'
 				gs 'dateF', 'date_choice'
 			end
 			end
 			act 'Decline':
 			act 'Decline':
-				*clr
-				cla
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picrand+'.jpg"></center>'
 				'"I''m sorry but I don''t feel myself attracted to you enough and I don''t want to lead you on."'
 				'"I''m sorry but I don''t feel myself attracted to you enough and I don''t want to lead you on."'
 				'<<$boydesc>> looks at you disappointed. "Oh well, I didn''t know if I had a chance but you can''t blame me for trying."'
 				'<<$boydesc>> looks at you disappointed. "Oh well, I didn''t know if I had a chance but you can''t blame me for trying."'

+ 3 - 3
locations/crossfit_north_record.qsrc

@@ -1,8 +1,9 @@
 # crossfit_north_record
 # crossfit_north_record
 
 
+menu_off = 1
+
 if $ARGS[0] = 'view_records':
 if $ARGS[0] = 'view_records':
-	cla
-	*clr
+	*clr & cla
 	gs 'crossfit_north_record', 'update_box_records'
 	gs 'crossfit_north_record', 'update_box_records'
 
 
 	'<center><img <<$set_imgh>> src="<<$crossfit_north_image_dir>>records.jpg"></center>'
 	'<center><img <<$set_imgh>> src="<<$crossfit_north_image_dir>>records.jpg"></center>'
@@ -24,7 +25,6 @@ if $ARGS[0] = 'view_records':
 	end
 	end
 end
 end
 
 
-
 if $ARGS[0] = 'recordstring':
 if $ARGS[0] = 'recordstring':
 	if ARGS[2] = 0:
 	if ARGS[2] = 0:
 		$result = 'No score yet'
 		$result = 'No score yet'

+ 5 - 3
locations/croupier.qsrc

@@ -1,9 +1,12 @@
 # croupier
 # croupier
-clr
+*clr & cla
+menu_off = 1
 minut += 5
 minut += 5
 gs 'stat'
 gs 'stat'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/crup.jpg"></right>'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/crup.jpg"></right>'
-'- How can I help you?'
+'"How can I help you?"'
+
+act 'Move away from the dealer':gt 'roulette'
 
 
 act 'Ask rules':
 act 'Ask rules':
 	msg 'The rules are very simple.
 	msg 'The rules are very simple.
@@ -20,7 +23,6 @@ act 'Ask rules':
 	gt 'croupier'
 	gt 'croupier'
 end
 end
 
 
-act 'Move away from the dealer':gt 'roulette'
 
 
 --- croupier ---------------------------------
 --- croupier ---------------------------------
 
 

+ 5 - 4
locations/croupier2.qsrc

@@ -1,9 +1,12 @@
 # croupier2
 # croupier2
-clr
+*clr & cla
+menu_off = 1
 minut += 5
 minut += 5
 gs 'stat'
 gs 'stat'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/crupcw.jpg"></right>'
 '<right><img <<$set_imgh>> src="images/locations/city/industrial/casino/crupcw.jpg"></right>'
-'- How can I help you?'
+'"How can I help you?"'
+
+act 'Move away from the dealer':gt 'kazvar'
 
 
 act 'Ask rules':
 act 'Ask rules':
 	msg 'The rules are very simple.
 	msg 'The rules are very simple.
@@ -25,7 +28,5 @@ act 'Ask rules':
 	gt 'croupier2'
 	gt 'croupier2'
 end
 end
 
 
-act 'Move away from the dealer':gt 'kazvar'
-
 --- croupier2 ---------------------------------
 --- croupier2 ---------------------------------
 
 

+ 3 - 0
locations/cumreaction.qsrc

@@ -1,4 +1,7 @@
 # cumreaction
 # cumreaction
+
+menu_off = 1
+
 if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
 if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
 	npc_rel[$static_num] -= 10
 	npc_rel[$static_num] -= 10