Sfoglia il codice sorgente

[added] Menu variables for G

KevinSmarts 5 anni fa
parent
commit
368a8aafcb
45 ha cambiato i file con 316 aggiunte e 28 eliminazioni
  1. 12 0
      locations/Gadbana.qsrc
  2. 2 0
      locations/Gaddvor.qsrc
  3. 23 6
      locations/Gadgarden.qsrc
  4. 8 0
      locations/Gadhouse.qsrc
  5. 2 0
      locations/Gadsarai.qsrc
  6. 2 0
      locations/Gnpc.qsrc
  7. 1 0
      locations/Gnpc2.qsrc
  8. 1 0
      locations/Gnpc_cinema.qsrc
  9. 14 0
      locations/Gshveyfab.qsrc
  10. 2 0
      locations/gKristinaZv.qsrc
  11. 8 0
      locations/gLakeNude.qsrc
  12. 1 0
      locations/gLakeNudeEvent.qsrc
  13. 6 1
      locations/gLakeNudeForest.qsrc
  14. 24 0
      locations/gadfield.qsrc
  15. 17 4
      locations/gadforest.qsrc
  16. 2 0
      locations/gadforest_event.qsrc
  17. 23 3
      locations/gadforestlost.qsrc
  18. 17 6
      locations/gadforestrelax.qsrc
  19. 4 0
      locations/gadforestswamp.qsrc
  20. 4 0
      locations/gadriver.qsrc
  21. 4 0
      locations/gadroad.qsrc
  22. 25 0
      locations/gadukino.qsrc
  23. 2 0
      locations/gadukino_event.qsrc
  24. 5 0
      locations/gameover.qsrc
  25. 10 2
      locations/garfather.qsrc
  26. 6 0
      locations/gargazel.qsrc
  27. 11 1
      locations/gdkbibl.qsrc
  28. 9 0
      locations/gdkin.qsrc
  29. 5 0
      locations/gdkkru.qsrc
  30. 4 2
      locations/gdksex.qsrc
  31. 19 0
      locations/gdktoilet.qsrc
  32. 3 0
      locations/gevent.qsrc
  33. 1 0
      locations/gkafe.qsrc
  34. 9 0
      locations/glake.qsrc
  35. 2 0
      locations/gopnew.qsrc
  36. 2 0
      locations/gopnik_house.qsrc
  37. 2 0
      locations/gopsex.qsrc
  38. 2 0
      locations/grandmahelp.qsrc
  39. 2 0
      locations/grandpahelp.qsrc
  40. 5 2
      locations/graveyard.qsrc
  41. 2 0
      locations/grigory.qsrc
  42. 1 0
      locations/gschool_grounds.qsrc
  43. 6 1
      locations/gskino.qsrc
  44. 3 0
      locations/gskver.qsrc
  45. 3 0
      locations/gtelefon.qsrc

+ 12 - 0
locations/Gadbana.qsrc

@@ -6,6 +6,9 @@ $loc = 'Gadbana'
 $metkaM = ''
 $metkaM = ''
 $locM = 'Gadbana'
 $locM = 'Gadbana'
 $location_type = 'bathroom'
 $location_type = 'bathroom'
+$menu_loc = 'Gadbana'
+$menu_arg = ''
+menu_off = 0
 frost = 0
 frost = 0
 clothesAtLocation = FUNC('lost_clothes_here','Gadbana')
 clothesAtLocation = FUNC('lost_clothes_here','Gadbana')
 
 
@@ -20,6 +23,7 @@ if mira = 0:
 	if clothesAtLocation = 1 and $clothingworntype = 'nude':
 	if clothesAtLocation = 1 and $clothingworntype = 'nude':
 		act 'Get dressed and leave':
 		act 'Get dressed and leave':
 			minut += 1
 			minut += 1
+			menu_off = 1
 			gs 'clothing', 'recover_lost_clothes', 'Gadbana', 1
 			gs 'clothing', 'recover_lost_clothes', 'Gadbana', 1
 			gs 'underwear', 'wear'
 			gs 'underwear', 'wear'
 			gs 'stat'
 			gs 'stat'
@@ -31,6 +35,7 @@ if mira = 0:
 	elseif $clothingworntype = 'nude':
 	elseif $clothingworntype = 'nude':
 		act 'Go outside naked':
 		act 'Go outside naked':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 1
 			minut += 1
 			inhib_exp += rand(0,2)
 			inhib_exp += rand(0,2)
 			grandma_trouble += rand(0,1)
 			grandma_trouble += rand(0,1)
@@ -43,6 +48,7 @@ if mira = 0:
 	elseif $clothingworntype = 'nude' and ($pantyworntype ! 'none' or $braworntype ! 'none'):
 	elseif $clothingworntype = 'nude' and ($pantyworntype ! 'none' or $braworntype ! 'none'):
 		act 'Go outside in your underwear':
 		act 'Go outside in your underwear':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 1
 			minut += 1
 			inhib_exp += rand(0,2)
 			inhib_exp += rand(0,2)
 			grandma_trouble += rand(0,1)
 			grandma_trouble += rand(0,1)
@@ -63,6 +69,7 @@ if mira = 0:
 			if banaday ! daystart:
 			if banaday ! daystart:
 				act 'Relax in the banya (2:00)':
 				act 'Relax in the banya (2:00)':
 					cls
 					cls
+					menu_off = 1
 					minut += 120
 					minut += 120
 					pcs_sweat = rand(0,5)
 					pcs_sweat = rand(0,5)
 					dynamic $showerdin
 					dynamic $showerdin
@@ -94,6 +101,7 @@ if mira = 0:
 
 
 	act 'Wash your body (0:25)':
 	act 'Wash your body (0:25)':
 		cls
 		cls
+		menu_off = 1
 		minut += 25
 		minut += 25
 		dynamic $showerdin
 		dynamic $showerdin
 		if frost > 0:frost = 0
 		if frost > 0:frost = 0
@@ -130,6 +138,7 @@ if mira = 0:
 		if pain['total'] > 0 and pain['killer'] = 0:
 		if pain['total'] > 0 and pain['killer'] = 0:
 			act 'Take a painkiller':
 			act 'Take a painkiller':
 				cla
 				cla
+				menu_off = 1
 				pain['killer'] += 1
 				pain['killer'] += 1
 				painkiller -= 1
 				painkiller -= 1
 				pcs_hydra += 20
 				pcs_hydra += 20
@@ -170,6 +179,7 @@ if mira = 0:
 	if (cumloc[6] = 1 or cumloc[7] = 1):
 	if (cumloc[6] = 1 or cumloc[7] = 1):
 		act 'Rinse the cum stains off your clothes in luke warm water(0:10)':
 		act 'Rinse the cum stains off your clothes in luke warm water(0:10)':
 			cla
 			cla
+			menu_off = 1
 			cumspclnt = 6
 			cumspclnt = 6
 			gs 'cum_cleanup'
 			gs 'cum_cleanup'
 			minut += 10
 			minut += 10
@@ -195,6 +205,7 @@ if mira = 0:
 	if mosolmaz > 0 and mosol > 0 and mosal_time ! (daystart * 100) + hour:
 	if mosolmaz > 0 and mosol > 0 and mosal_time ! (daystart * 100) + hour:
 		act 'Rub ointment onto your pussy (0:05)':
 		act 'Rub ointment onto your pussy (0:05)':
 			cla
 			cla
+			menu_off = 1
 			mosal_time = (daystart * 100) + hour
 			mosal_time = (daystart * 100) + hour
 			minut += 5
 			minut += 5
 			mosolmaz -= 1
 			mosolmaz -= 1
@@ -208,6 +219,7 @@ else
 	!125st
 	!125st
 	act 'Undress':
 	act 'Undress':
 		cls
 		cls
+		menu_off = 1
 		gs 'clothing', 'strip', 'Gadbana'
 		gs 'clothing', 'strip', 'Gadbana'
 		gs 'underwear', 'remove'
 		gs 'underwear', 'remove'
 		gs 'stat'
 		gs 'stat'

+ 2 - 0
locations/Gaddvor.qsrc

@@ -15,6 +15,7 @@ if $ARGS[0]='':
 	if hour >= 6 and hour < 22:
 	if hour >= 6 and hour < 22:
 		if grandma_trouble = 10:
 		if grandma_trouble = 10:
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			killvar 'grandma_trouble'
 			killvar 'grandma_trouble'
 			'<center><h4>Your grandparents'' yard</h4></center>'
 			'<center><h4>Your grandparents'' yard</h4></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandma_trouble.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandma_trouble.jpg"></center>'
@@ -92,6 +93,7 @@ if $ARGS[0]='':
 		mira_temp = rand(1,5)
 		mira_temp = rand(1,5)
 		if mira_temp = 3 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 1 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
 		if mira_temp = 3 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 1 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			gs 'Miroslava', 'miraclothes'
 			gs 'Miroslava', 'miraclothes'
 			'You went out into the yard and noticed Mira standing there.'
 			'You went out into the yard and noticed Mira standing there.'
 			'"Oh, <<$pcs_nickname>> hi, hope you don’’t mind me visiting. I was bored being home alone." she said smiling.'
 			'"Oh, <<$pcs_nickname>> hi, hope you don’’t mind me visiting. I was bored being home alone." she said smiling.'

+ 23 - 6
locations/Gadgarden.qsrc

@@ -1,8 +1,12 @@
 # Gadgarden
 # Gadgarden
+
 if $ARGS[0] = 'garden':
 if $ARGS[0] = 'garden':
 	$location_type = 'secluded'
 	$location_type = 'secluded'
-    $metka = $ARGS[0]
-    $loc = $CURLOC
+    $metka = 'garden'
+    $loc = 'Gadgarden'
+	$menu_loc = 'Gadgarden'
+	$menu_arg = 'garden'
+	menu_off = 0
     gs 'gadukino_event', 'sound'
     gs 'gadukino_event', 'sound'
     cls
     cls
     gs'stat'
     gs'stat'
@@ -30,6 +34,7 @@ if $ARGS[0] = 'garden':
 	    act 'Work in the garden (3:00)':
 	    act 'Work in the garden (3:00)':
 		    cla
 		    cla
 		    *clr
 		    *clr
+			menu_off = 1
 		    minut += 180
 		    minut += 180
 		    pcs_sweat += 10
 		    pcs_sweat += 10
             work_garden = 0
             work_garden = 0
@@ -49,6 +54,7 @@ if $ARGS[0] = 'garden':
 	    act 'Water the garden (1:00)':
 	    act 'Water the garden (1:00)':
 		    cla
 		    cla
 		    *clr
 		    *clr
+			menu_off = 1
 		    pcs_sweat += 10
 		    pcs_sweat += 10
 		    minut += 60
 		    minut += 60
 		    water_garden = 0
 		    water_garden = 0
@@ -68,6 +74,7 @@ if $ARGS[0] = 'garden':
 	    act 'Harvest (3:00)':
 	    act 'Harvest (3:00)':
 		    cla
 		    cla
 		    *clr
 		    *clr
+			menu_off = 1
 		    minut += 180
 		    minut += 180
 		    pcs_sweat += 10
 		    pcs_sweat += 10
 		    harvest_garden = 0
 		    harvest_garden = 0
@@ -86,8 +93,11 @@ if $ARGS[0] = 'garden':
 end	
 end	
 
 
 if $ARGS[0] = 'strawberry':
 if $ARGS[0] = 'strawberry':
-    $metka = $ARGS[0]
-    $loc = $CURLOC
+    $metka = 'strawberry'
+    $loc = 'Gadgarden'
+	$menu_loc = 'Gadgarden'
+	$menu_arg = 'strawberry'
+	menu_off = 0
     gs 'gadukino_event', 'sound'
     gs 'gadukino_event', 'sound'
     cls
     cls
     gs'stat'
     gs'stat'
@@ -113,6 +123,7 @@ if $ARGS[0] = 'strawberry':
 		act 'Eat the strawberries (1:00)':
 		act 'Eat the strawberries (1:00)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			strawberriesday = daystart
 			strawberriesday = daystart
 			minut += 60
 			minut += 60
 			pcs_mood += 10
 			pcs_mood += 10
@@ -133,6 +144,7 @@ if $ARGS[0] = 'strawberry':
 		act 'Collect strawberries (3:00)':
 		act 'Collect strawberries (3:00)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 180
 			minut += 180
 			pcs_sweat += 10
 			pcs_sweat += 10
 			collect_strawberries = 0
 			collect_strawberries = 0
@@ -156,8 +168,11 @@ end
 
 
 
 
 if $ARGS[0] = 'fruit_garden':
 if $ARGS[0] = 'fruit_garden':
-    $metka = $ARGS[0]
-    $loc = $CURLOC
+    $metka = 'fruit_garden'
+    $loc = 'Gadgarden'
+	$menu_loc = 'Gadgarden'
+	$menu_arg = 'fruit_garden'
+	menu_off = 0
     gs 'gadukino_event', 'sound'
     gs 'gadukino_event', 'sound'
     cls
     cls
     gs'stat'
     gs'stat'
@@ -175,6 +190,7 @@ if $ARGS[0] = 'fruit_garden':
 		act 'Eat the fruit (1:00)':
 		act 'Eat the fruit (1:00)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			fruitday = daystart
 			fruitday = daystart
 			minut += 60
 			minut += 60
 			pcs_mood += 10
 			pcs_mood += 10
@@ -195,6 +211,7 @@ if $ARGS[0] = 'fruit_garden':
 		act 'Collect fruit (3:00)':
 		act 'Collect fruit (3:00)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 180
 			minut += 180
 			pcs_sweat += 10
 			pcs_sweat += 10
 			fruit_collect = 0
 			fruit_collect = 0

+ 8 - 0
locations/Gadhouse.qsrc

@@ -199,6 +199,7 @@ if $ARGS[0] = 'Main':
 	elseif $clothingworntype = 'nude':
 	elseif $clothingworntype = 'nude':
 		act 'Go outside naked':
 		act 'Go outside naked':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 1
 			minut += 1
 			inhib_exp += rand(0,2)
 			inhib_exp += rand(0,2)
 			grandma_trouble += rand(1,3)
 			grandma_trouble += rand(1,3)
@@ -212,6 +213,7 @@ if $ARGS[0] = 'Main':
 	elseif $clothingworntype = 'nude' and ($pantyworntype ! 'none' or $braworntype ! 'none'):
 	elseif $clothingworntype = 'nude' and ($pantyworntype ! 'none' or $braworntype ! 'none'):
 		act 'Go outside in your underwear':
 		act 'Go outside in your underwear':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 1
 			minut += 1
 			inhib_exp += rand(0,2)
 			inhib_exp += rand(0,2)
 			grandma_trouble += rand(1,3)
 			grandma_trouble += rand(1,3)
@@ -255,6 +257,7 @@ if $ARGS[0] = 'Main':
 		act 'Drink tea with biscuits (0:05)':
 		act 'Drink tea with biscuits (0:05)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 5
 			minut += 5
 			pranik -= 1
 			pranik -= 1
 			pcs_health += 30
 			pcs_health += 30
@@ -282,6 +285,7 @@ if $ARGS[0] = 'Main':
 		act 'Prepare a diet meal (0:30)':
 		act 'Prepare a diet meal (0:30)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			frost = 0
 			frost = 0
 			minut += 30
 			minut += 30
 			pcs_health += 10
 			pcs_health += 10
@@ -321,6 +325,7 @@ if $ARGS[0] = 'Main':
 			act 'Take a pill (0:05)':
 			act 'Take a pill (0:05)':
 				cla
 				cla
 				*clr
 				*clr
+				menu_off = 1
 				minut += 5
 				minut += 5
 				lekarday = daystart
 				lekarday = daystart
 				lekarstvo -= 1
 				lekarstvo -= 1
@@ -345,6 +350,7 @@ if $ARGS[0] = 'Main':
 			act 'Take vitamins (0:05)':
 			act 'Take vitamins (0:05)':
 				cla
 				cla
 				*clr
 				*clr
+				menu_off = 1
 
 
 				minut += 5
 				minut += 5
 				vitaminday = daystart
 				vitaminday = daystart
@@ -378,6 +384,7 @@ if $ARGS[0] = 'Main':
 		if newgobelen = 0 and tkan > 0:
 		if newgobelen = 0 and tkan > 0:
 			act'Start a new tapestry':
 			act'Start a new tapestry':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				tkan -= 1
 				tkan -= 1
 				newgobelen = 1
 				newgobelen = 1
 				minut += 15
 				minut += 15
@@ -390,6 +397,7 @@ if $ARGS[0] = 'Main':
 			'Your tapestry is <<newgobelen/10>> percent finished.'
 			'Your tapestry is <<newgobelen/10>> percent finished.'
 			act'Work on the tapestry for an hour':
 			act'Work on the tapestry for an hour':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				minut += 60
 				minut += 60
 				sewng_exp += rand(pcs_intel/10, pcs_intel/5)
 				sewng_exp += rand(pcs_intel/10, pcs_intel/5)
 				gobramax = (pcs_sewng - 70) * 6
 				gobramax = (pcs_sewng - 70) * 6

+ 2 - 0
locations/Gadsarai.qsrc

@@ -1,5 +1,7 @@
 # Gadsarai
 # Gadsarai
 
 
+menu_off = 1
+
 if $ARGS[0] = '':
 if $ARGS[0] = '':
 	$metka = ''
 	$metka = ''
 	$loc = 'Gadsarai'
 	$loc = 'Gadsarai'

+ 2 - 0
locations/Gnpc.qsrc

@@ -1,4 +1,6 @@
 # Gnpc
 # Gnpc
+
+menu_off = 1
 !!Guys
 !!Guys
 GvstreBoyAfter[numnpc] = 0
 GvstreBoyAfter[numnpc] = 0
 GvstreBoy = 0
 GvstreBoy = 0

+ 1 - 0
locations/Gnpc2.qsrc

@@ -1136,6 +1136,7 @@ $din_gboy_go_to_boyhome = {
 
 
 }
 }
 
 
+menu_off = 1
 gs 'stat'
 gs 'stat'
 '<center><h1><font color="maroon"><<$boydesc>></font></h1></center>'
 '<center><h1><font color="maroon"><<$boydesc>></font></h1></center>'
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/<<numnpc>>.jpg"></center>'
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/<<numnpc>>.jpg"></center>'

+ 1 - 0
locations/Gnpc_cinema.qsrc

@@ -1,5 +1,6 @@
 # Gnpc_cinema
 # Gnpc_cinema
 
 
+menu_off = 1
 cls
 cls
 minut += 15
 minut += 15
 gs 'stat'
 gs 'stat'

+ 14 - 0
locations/Gshveyfab.qsrc

@@ -6,6 +6,9 @@ $location_type = 'public_outdoors'
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
 	cla
 	cla
 	*clr
 	*clr
+	$menu_loc = 'Gshveyfab'
+	$menu_arg = 'start'
+	menu_off = 0
 	gs'stat'
 	gs'stat'
 
 
 	'<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
 	'<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
@@ -31,6 +34,7 @@ if $ARGS[0] = 'start':
 		act 'Visit the tailor':
 		act 'Visit the tailor':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 5
 			minut += 5
 			gs'stat'
 			gs'stat'
 			'An elderly man is inspecting some repaired clothes, as you walk in, he stops and smiles gently, greeting you.'
 			'An elderly man is inspecting some repaired clothes, as you walk in, he stops and smiles gently, greeting you.'
@@ -69,6 +73,9 @@ if $ARGS[0] = 'enter':
 CLOSE ALL
 CLOSE ALL
 	cla
 	cla
 	*clr
 	*clr
+	$menu_loc = 'Gshveyfab'
+	$menu_arg = 'enter'
+	menu_off = 0
 	gs'stat'
 	gs'stat'
 	'<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
 	'<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/factory/gshveyfab.jpg" ></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/factory/gshveyfab.jpg" ></center>'
@@ -91,6 +98,7 @@ CLOSE ALL
 	if workFabrika = 1:
 	if workFabrika = 1:
 		'You can quit your job, but quitting will lead to a deducted wage.'
 		'You can quit your job, but quitting will lead to a deducted wage.'
 		act 'Quit job':
 		act 'Quit job':
+			menu_off = 1
 			if age >= 16 and age < 18:
 			if age >= 16 and age < 18:
 				smenaFabrika -= 1
 				smenaFabrika -= 1
 			elseif age >= 18:
 			elseif age >= 18:
@@ -114,6 +122,9 @@ end
 if $ARGS[0] = 'job_start':
 if $ARGS[0] = 'job_start':
 	cla
 	cla
 	*clr
 	*clr
+	$menu_loc = 'Gshveyfab'
+	$menu_arg = 'job_start'
+	menu_off = 0
 	gs'stat'
 	gs'stat'
 	'<center><B>FOREMAN''S OFFICE</B></center>'
 	'<center><B>FOREMAN''S OFFICE</B></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/stepan/nachalnik.jpg" ></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/stepan/nachalnik.jpg" ></center>'
@@ -124,6 +135,7 @@ if $ARGS[0] = 'job_start':
 
 
 		act 'Accept the job':
 		act 'Accept the job':
 			cla
 			cla
+			menu_off = 1
 			minut += 10
 			minut += 10
 			work = 1
 			work = 1
 			workFabrika = 1
 			workFabrika = 1
@@ -140,6 +152,7 @@ if $ARGS[0] = 'job_start':
 
 
 		act 'Accept the job':
 		act 'Accept the job':
 			cla
 			cla
+			menu_off = 1
 			minut += 10
 			minut += 10
 			work = 1
 			work = 1
 			workFabrika = 1
 			workFabrika = 1
@@ -157,6 +170,7 @@ end
 if $ARGS[0] = 'job':
 if $ARGS[0] = 'job':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	FabrikaProgul -= 1
 	FabrikaProgul -= 1
 	if FabrikaProgul < 0: FabrikaProgul = 0
 	if FabrikaProgul < 0: FabrikaProgul = 0
 	if age >= 16 and age < 18:
 	if age >= 16 and age < 18:

+ 2 - 0
locations/gKristinaZv.qsrc

@@ -1,4 +1,6 @@
 # gKristinaZv
 # gKristinaZv
+
+menu_off = 1
 gs 'stat'
 gs 'stat'
 'After your gym class you go to the locker room with the rest of the girls. Christina theatrically moves over to you, and the eyes of all the girls in the locker room are on you now.'
 'After your gym class you go to the locker room with the rest of the girls. Christina theatrically moves over to you, and the eyes of all the girls in the locker room are on you now.'
 
 

+ 8 - 0
locations/gLakeNude.qsrc

@@ -55,6 +55,7 @@ if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 	act'Get dressed':
 	act'Get dressed':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		minut+=5
 		minut+=5
 		gs 'clothing', 'wear_last_worn'
 		gs 'clothing', 'wear_last_worn'
 		gs 'underwear', 'wear'
 		gs 'underwear', 'wear'
@@ -69,6 +70,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 		act'Change into your swimwear':
 		act'Change into your swimwear':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut+=5
 			minut+=5
 			if pcs_horny >= 90:
 			if pcs_horny >= 90:
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants1.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants1.jpg"></center>'
@@ -89,6 +91,7 @@ end
 if temper >= 15 and month >= 5 and month <= 9:
 if temper >= 15 and month >= 5 and month <= 9:
 	if $clothingworntype ! 'nude':
 	if $clothingworntype ! 'nude':
 		act'Take off your clothes':
 		act'Take off your clothes':
+			menu_off = 1
 			if pcs_inhib > 30:
 			if pcs_inhib > 30:
 				cla
 				cla
 				*clr
 				*clr
@@ -116,6 +119,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 	end
 	end
 	if hour >= 6 and hour <= 20:
 	if hour >= 6 and hour <= 20:
 		act'Go swimming (1:00)':
 		act'Go swimming (1:00)':
+			menu_off = 1
 			if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 			if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 				cla
 				cla
 				*clr
 				*clr
@@ -149,6 +153,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 	end
 	end
 	if sunWeather = 1 and hour >= 6 and hour <= 20:
 	if sunWeather = 1 and hour >= 6 and hour <= 20:
 		act'Go sunbathing (1:00)':
 		act'Go sunbathing (1:00)':
+			menu_off = 1
 			if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 			if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 				cla
 				cla
 				*clr
 				*clr
@@ -192,6 +197,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 		act'Look around the beach':
 		act'Look around the beach':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 5
 			minut += 5
 			voyeurism_start_view = RAND(1,3)
 			voyeurism_start_view = RAND(1,3)
 			if voyeurism_start_view <= 2:
 			if voyeurism_start_view <= 2:
@@ -209,6 +215,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 		act'Watch couple on the beach':
 		act'Watch couple on the beach':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			if voyeurism = 0:
 			if voyeurism = 0:
 				minut += 5
 				minut += 5
 				voyeurism += 1
 				voyeurism += 1
@@ -229,6 +236,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 		end
 		end
 	elseif voyeurism_start = 2 and (pcs_horny < 90 or pav_slut < 50):
 	elseif voyeurism_start = 2 and (pcs_horny < 90 or pav_slut < 50):
 		act 'Spy on other nudists on the beach':
 		act 'Spy on other nudists on the beach':
+			menu_off = 1
 			if voyeurism_nudist <= 14 or pav_slut > 50:
 			if voyeurism_nudist <= 14 or pav_slut > 50:
 				voyeurism_nudist += 1
 				voyeurism_nudist += 1
 				gs'gLakeNudeEvent','gLakeNude_nudist'
 				gs'gLakeNudeEvent','gLakeNude_nudist'

+ 1 - 0
locations/gLakeNudeEvent.qsrc

@@ -1,5 +1,6 @@
 # gLakeNudeEvent
 # gLakeNudeEvent
 
 
+menu_off = 1
 if $args[0] = 'gLakeNude_sex':
 if $args[0] = 'gLakeNude_sex':
 	cla
 	cla
 	*clr
 	*clr

+ 6 - 1
locations/gLakeNudeForest.qsrc

@@ -1,8 +1,11 @@
 # gLakeNudeForest
 # gLakeNudeForest
 
 
+$menu_loc = 'gLakeNudeForest'
+$menu_arg = ''
+menu_off = 0
 gs 'stat'
 gs 'stat'
 !gs 'time'
 !gs 'time'
-$loc = $curloc
+$loc = 'gLakeNudeForest'
 
 
 'The woods near the secludeed beach'
 'The woods near the secludeed beach'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_4.jpg"></center>'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_4.jpg"></center>'
@@ -20,12 +23,14 @@ if temper >= 20 and month >= 5 and month <= 9 and hour >= 6 and hour <= 20:
 		act'Follow the girl': gt'gLakeNudeEvent','gLakeNudeForest_piss'
 		act'Follow the girl': gt'gLakeNudeEvent','gLakeNudeForest_piss'
 	else
 	else
 		act'Spy on nudists':
 		act'Spy on nudists':
+			menu_off = 1
 			gs 'gLakeNudeEvent','gLakeNude_nudist'
 			gs 'gLakeNudeEvent','gLakeNude_nudist'
 			act 'Look': gt 'gLakeNudeForest'
 			act 'Look': gt 'gLakeNudeForest'
 		end
 		end
 		act'Spy on girl going for a pee':
 		act'Spy on girl going for a pee':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 10
 			minut += 10
 			pcs_horny += 10
 			pcs_horny += 10
 			voyeurism += 1
 			voyeurism += 1

+ 24 - 0
locations/gadfield.qsrc

@@ -52,6 +52,7 @@ if $ARGS[0] = 'field':
 		act 'Go to the hayfield':
 		act 'Go to the hayfield':
 			gs 'food', 'm_meal'
 			gs 'food', 'm_meal'
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 
 
 			if npc_rel['A60'] >= 15:
 			if npc_rel['A60'] >= 15:
 				npc_rel['A60'] += 1
 				npc_rel['A60'] += 1
@@ -98,6 +99,7 @@ if $ARGS[0] = 'horse':
 	if hour = 19:
 	if hour = 19:
 		act 'Lead the horse home (1:00)':
 		act 'Lead the horse home (1:00)':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse_field.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/horse_field.jpg"></center>'
 			'You spot your grandfather''s horse wandering loose in the field and decide to help out by taking Desperado home. Reaching for the bridle, you start leading Desperado towards the village.'
 			'You spot your grandfather''s horse wandering loose in the field and decide to help out by taking Desperado home. Reaching for the bridle, you start leading Desperado towards the village.'
 			minut += 60
 			minut += 60
@@ -131,6 +133,7 @@ if $ARGS[0] = 'cow':
 	if hour = 19 and graze_cow = 0:
 	if hour = 19 and graze_cow = 0:
 		act 'Lead the cows home (1:00)':
 		act 'Lead the cows home (1:00)':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_field.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_field.jpg"></center>'
 			'Seeing the cow herd on the field, you decide to help your grandfather bring the cows home...'
 			'Seeing the cow herd on the field, you decide to help your grandfather bring the cows home...'
 			minut += 60
 			minut += 60
@@ -145,6 +148,7 @@ if $ARGS[0] = 'cow':
 		if hour < 10:
 		if hour < 10:
 			act 'Wait until the herd is gathered':
 			act 'Wait until the herd is gathered':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_wait.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_wait.jpg"></center>'
 				if graze_cow_exp = 0:'Some time flies by while waiting for the locals to finish their gathering.'
 				if graze_cow_exp = 0:'Some time flies by while waiting for the locals to finish their gathering.'
 				if graze_cow_exp = 1:'Some time flies by while waiting for the locals and their children to finish their gathering.'
 				if graze_cow_exp = 1:'Some time flies by while waiting for the locals and their children to finish their gathering.'
@@ -160,6 +164,7 @@ if $ARGS[0] = 'cow':
 		if hour >= 10 and hour < 13:
 		if hour >= 10 and hour < 13:
 			act 'Herd cows with your grandfather (1:00)':
 			act 'Herd cows with your grandfather (1:00)':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
 				'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
 				'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
 
 
@@ -176,6 +181,7 @@ if $ARGS[0] = 'cow':
 			if mira = 0:
 			if mira = 0:
 				act 'Take a run on the field (1:00)':
 				act 'Take a run on the field (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_run.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_run.jpg"></center>'
 					'Since you have nothing to do, you run intervals across the field for an hour.'
 					'Since you have nothing to do, you run intervals across the field for an hour.'
 
 
@@ -194,6 +200,7 @@ if $ARGS[0] = 'cow':
 			if temper >= 15 and sunWeather = 1 and mira = 0:
 			if temper >= 15 and sunWeather = 1 and mira = 0:
 				act 'Tan (1:00)':
 				act 'Tan (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
 					'It''s really warm outside so you decide to sunbathe for an hour.'
 					'It''s really warm outside so you decide to sunbathe for an hour.'
 					minut += 60
 					minut += 60
@@ -207,6 +214,7 @@ if $ARGS[0] = 'cow':
 				if pcs_sleep < 40:
 				if pcs_sleep < 40:
 					act 'Take a nap (1:00)':
 					act 'Take a nap (1:00)':
 						*clr & cla
 						*clr & cla
+						menu_off = 1
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_lying.jpg"></center>'
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_lying.jpg"></center>'
 						'You lie down on the grass and doze off for an hour.'
 						'You lie down on the grass and doze off for an hour.'
 
 
@@ -221,6 +229,7 @@ if $ARGS[0] = 'cow':
 				end
 				end
 				act 'Pick flowers (1:00)':
 				act 'Pick flowers (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
 					'You spend an hour wandering the field, picking flowers.'
 					'You spend an hour wandering the field, picking flowers.'
 					minut += 60
 					minut += 60
@@ -232,6 +241,7 @@ if $ARGS[0] = 'cow':
 				end
 				end
 				act 'Read a book (1:00)':
 				act 'Read a book (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
 					minut += 60
 					minut += 60
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
@@ -257,6 +267,7 @@ if $ARGS[0] = 'cow':
 		end
 		end
 		if hour >= 13 and hour < 16:
 		if hour >= 13 and hour < 16:
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go.jpg"></center>'
 			'Looking at his watch, grandpa turns to you and says "The time is around lunchtime so it''s time to take the herd to the watering hole." You begin to gather the cows and lead them to the river.'
 			'Looking at his watch, grandpa turns to you and says "The time is around lunchtime so it''s time to take the herd to the watering hole." You begin to gather the cows and lead them to the river.'
 
 
@@ -284,6 +295,7 @@ end
 
 
 if graze_cow = 1 and npc_rel['A60'] >= 15 and mira = 0 and sunWeather = 1 and hour >= 10 and temp = 1 and Mira_no = 0 and(npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
 if graze_cow = 1 and npc_rel['A60'] >= 15 and mira = 0 and sunWeather = 1 and hour >= 10 and temp = 1 and Mira_no = 0 and(npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mira2.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mira2.jpg"></center>'
 	'While keeping an eye on the cow herd, you see Mira in the distance, approaching. You happily wave to her.'
 	'While keeping an eye on the cow herd, you see Mira in the distance, approaching. You happily wave to her.'
 	'" - Hi, <<$pcs_nickname>>. I wanted to visit you and brought water with me," she says nearing you. " - Have you missed me?"'
 	'" - Hi, <<$pcs_nickname>>. I wanted to visit you and brought water with me," she says nearing you. " - Have you missed me?"'
@@ -319,6 +331,7 @@ if $ARGS[0] = 'cow2':
 		if hour < 16:
 		if hour < 16:
 			act 'Herd cows with your grandfather (1:00)':
 			act 'Herd cows with your grandfather (1:00)':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
 				'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
 				'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
 				minut += 60
 				minut += 60
@@ -333,6 +346,7 @@ if $ARGS[0] = 'cow2':
 			if temper >= 15 and sunWeather = 1 and mira = 0:
 			if temper >= 15 and sunWeather = 1 and mira = 0:
 				act 'Swim (0:15)':
 				act 'Swim (0:15)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river.jpg"></center>'
 					'You take a quick swim, cooling off your body.'
 					'You take a quick swim, cooling off your body.'
 					minut += 15
 					minut += 15
@@ -347,6 +361,7 @@ if $ARGS[0] = 'cow2':
 				end
 				end
 				act 'Tan (0:30)':
 				act 'Tan (0:30)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
 					'You lie down to sunbathe, while grandpa looks after the herd.'
 					'You lie down to sunbathe, while grandpa looks after the herd.'
 					minut += 30
 					minut += 30
@@ -359,6 +374,7 @@ if $ARGS[0] = 'cow2':
 				end
 				end
 				act 'Read a book (1:00)':
 				act 'Read a book (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
 					minut += 60
 					minut += 60
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
@@ -384,6 +400,7 @@ if $ARGS[0] = 'cow2':
 		end
 		end
 		if hour >= 16 and hour < 19:
 		if hour >= 16 and hour < 19:
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go.jpg"></center>'
 			'Looking at his watch, grandpa says that it''s time to drive the herd back on the field, but now closer to the forest. The two of you begin to gather the scattered herd and head toward the forest.'
 			'Looking at his watch, grandpa says that it''s time to drive the herd back on the field, but now closer to the forest. The two of you begin to gather the scattered herd and head toward the forest.'
 			grandmahelp += 1
 			grandmahelp += 1
@@ -420,6 +437,7 @@ if $ARGS[0] = 'cow3':
 		if hour < 19:
 		if hour < 19:
 			act 'Herd cows with your grandfather (1:00)':
 			act 'Herd cows with your grandfather (1:00)':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow'+rand(1,4)+'.jpg"></center>'
 				'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
 				'You manage to herd all the cows within the hour. Instead of letting your grandfather do all the work, you roll up the sleeves and do most of the work.'
 				minut += 60
 				minut += 60
@@ -434,6 +452,7 @@ if $ARGS[0] = 'cow3':
 			if mira = 0:
 			if mira = 0:
 				act 'Take a run (1:00)':
 				act 'Take a run (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_run.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_run.jpg"></center>'
 					'Since you have nothing to do, you run intervals across the field for an hour.'
 					'Since you have nothing to do, you run intervals across the field for an hour.'
 					frost = 0
 					frost = 0
@@ -451,6 +470,7 @@ if $ARGS[0] = 'cow3':
 			if temper >= 15 and sunWeather = 1 and mira = 0:
 			if temper >= 15 and sunWeather = 1 and mira = 0:
 				act 'Pick flowers (1:00)':
 				act 'Pick flowers (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
 					'You spent an hour wandering around the field, picking flowers.'
 					'You spent an hour wandering around the field, picking flowers.'
 					minut += 60
 					minut += 60
@@ -462,6 +482,7 @@ if $ARGS[0] = 'cow3':
 				end
 				end
 				act 'Tan (1:00)':
 				act 'Tan (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
 					'You sunbathe for an hour.'
 					'You sunbathe for an hour.'
 					minut += 60
 					minut += 60
@@ -475,6 +496,7 @@ if $ARGS[0] = 'cow3':
 				if pcs_sleep < 40:
 				if pcs_sleep < 40:
 					act 'Nap on the grass (1:00)':
 					act 'Nap on the grass (1:00)':
 						*clr & cla
 						*clr & cla
+						menu_off = 1
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_lying.jpg"></center>'
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_lying.jpg"></center>'
 						'You lie down on the grass and doze off for an hour.'
 						'You lie down on the grass and doze off for an hour.'
 						minut += 60
 						minut += 60
@@ -488,6 +510,7 @@ if $ARGS[0] = 'cow3':
 				end
 				end
 				act 'Read a book (1:00)':
 				act 'Read a book (1:00)':
 					*clr & cla
 					*clr & cla
+					menu_off = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
 					minut += 60
 					minut += 60
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
@@ -513,6 +536,7 @@ if $ARGS[0] = 'cow3':
 		end
 		end
 		if hour >= 19:
 		if hour >= 19:
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 
 
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go_home.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_go_home.jpg"></center>'
 			'Looking at his watch, grandpa says that it is late and time to drive the herd home. You hurry and gather up the cows and drive them towards the village.'
 			'Looking at his watch, grandpa says that it is late and time to drive the herd home. You hurry and gather up the cows and drive them towards the village.'

+ 17 - 4
locations/gadforest.qsrc

@@ -84,6 +84,7 @@ if $ARGS[0] = '1':
 			if forestpicnic = 0:
 			if forestpicnic = 0:
 				cla
 				cla
 				*clr
 				*clr
+				menu_off = 1
 				if pcs_inhib < 50:inhib_exp += rand(1,3)
 				if pcs_inhib < 50:inhib_exp += rand(1,3)
 				minut += 5
 				minut += 5
 				if CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/nudeforest.jpg"></center>'
 				if CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/nudeforest.jpg"></center>'
@@ -111,6 +112,7 @@ if $ARGS[0] = '1':
 		act 'Get dressed':
 		act 'Get dressed':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 5
 			minut += 5
 			gs 'clothing', 'swamp_clothes', 0
 			gs 'clothing', 'swamp_clothes', 0
 			gs 'underwear', 'wear'
 			gs 'underwear', 'wear'
@@ -128,6 +130,7 @@ if $ARGS[0] = '1':
 		if $clothingworntype = 'cheap' and clothingwornnumber = 414:
 		if $clothingworntype = 'cheap' and clothingwornnumber = 414:
 			act 'Pick up your abandoned clothing':
 			act 'Pick up your abandoned clothing':
 				cla
 				cla
+				menu_off = 1
 				minut += 2
 				minut += 2
 				gs 'clothing', 'swamp_clothes', 0
 				gs 'clothing', 'swamp_clothes', 0
 				gs 'underwear', 'wear'
 				gs 'underwear', 'wear'
@@ -140,6 +143,7 @@ if $ARGS[0] = '1':
 		else
 		else
 			act 'Pick up your abandoned clothing':
 			act 'Pick up your abandoned clothing':
 				cla
 				cla
+				menu_off = 1
 				minut += 5
 				minut += 5
 				gs 'clothing', 'swamp_clothes', 0
 				gs 'clothing', 'swamp_clothes', 0
 				gs 'underwear', 'wear'
 				gs 'underwear', 'wear'
@@ -156,6 +160,7 @@ if $ARGS[0] = '1':
 		act 'Go for a walk in the woods':
 		act 'Go for a walk in the woods':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 60
 			minut += 60
 			pcs_mood += 20
 			pcs_mood += 20
 			pcs_willpwr += willpowermax/5
 			pcs_willpwr += willpowermax/5
@@ -195,6 +200,7 @@ if $ARGS[0] = '1':
 		act 'Look for mushrooms and berries':
 		act 'Look for mushrooms and berries':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 30
 			minut += 30
 			temp_gf = rand(1,2)
 			temp_gf = rand(1,2)
 			edge_forestday = daystart
 			edge_forestday = daystart
@@ -310,6 +316,7 @@ end
 
 
 if $ARGS[0] = 'caught':
 if $ARGS[0] = 'caught':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	caught_rand = rand(0, 100)
 	caught_rand = rand(0, 100)
 	if caught_rand > 90:
 	if caught_rand > 90:
 		inhib_exp += rand(0,3)
 		inhib_exp += rand(0,3)
@@ -401,9 +408,10 @@ if $ARGS[0] = '2':
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	end
 	end
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and forestday ! daystart:
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and forestday ! daystart:
-			act 'Look for mushrooms and berries':
-				cla
+		act 'Look for mushrooms and berries':
+			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 30
 			minut += 30
 			temp_gf = rand(1,2)
 			temp_gf = rand(1,2)
 			forestday = daystart
 			forestday = daystart
@@ -515,6 +523,7 @@ if $ARGS[0] = '3':
 
 
 	act 'Look for mushrooms and berries':
 	act 'Look for mushrooms and berries':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 30
 			minut += 30
 			thicketday = daystart
 			thicketday = daystart
 			if goforest < 60:goforest += rand(0,1)
 			if goforest < 60:goforest += rand(0,1)
@@ -596,9 +605,10 @@ if $ARGS[0] = '4':
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	end
 	end
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and swampforest ! daystart:
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and swampforest ! daystart:
-			act 'Look for mushrooms and berries':
-				cla
+		act 'Look for mushrooms and berries':
+			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 30
 			minut += 30
 			swampforest = daystart
 			swampforest = daystart
 			if goforest < 80:goforest += rand(0,1)
 			if goforest < 80:goforest += rand(0,1)
@@ -653,6 +663,7 @@ end
 if $ARGS[0] = 'gadforestloststart':
 if $ARGS[0] = 'gadforestloststart':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	gs 'stat'
 	gs 'stat'
 
 
 	'<center><H4>Somewhere in the woods</H4></center>'
 	'<center><H4>Somewhere in the woods</H4></center>'
@@ -677,6 +688,8 @@ if $ARGS[0] = 'gadforestloststart':
 end
 end
 
 
 if $ARGS[0] = 'torncloth':
 if $ARGS[0] = 'torncloth':
+	menu_off = 1
+	gs 'stat'
 	!the withdrawal strength of the garment, if not jeans. moved from gadforest 1 into args, and call in all forest by illume
 	!the withdrawal strength of the garment, if not jeans. moved from gadforest 1 into args, and call in all forest by illume
 	if $clothingworntype ! 'nude':
 	if $clothingworntype ! 'nude':
 		if (PCloThinness = 1 or PCloSkirt > 0) and PCloQuality < 5:
 		if (PCloThinness = 1 or PCloSkirt > 0) and PCloQuality < 5:

+ 2 - 0
locations/gadforest_event.qsrc

@@ -11,6 +11,8 @@
 !---------------------------------------------
 !---------------------------------------------
 
 
 $location_type = 'event_outdoors'
 $location_type = 'event_outdoors'
+menu_off = 1
+gs 'stat'
 
 
 if $ARGS[0] = 'gopforest_mitka':
 if $ARGS[0] = 'gopforest_mitka':
 	! clothed events
 	! clothed events

+ 23 - 3
locations/gadforestlost.qsrc

@@ -49,6 +49,7 @@ if $ARGS[0] = 'forestrescue':
 		act 'To the edge of the woods':gt'gadforest', '1'
 		act 'To the edge of the woods':gt'gadforest', '1'
 	end
 	end
 end
 end
+
 if $ARGS[0] = '1':
 if $ARGS[0] = '1':
 	*clr & cla
 	*clr & cla
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 7: gt 'gadforestlost', 'forestrescue'
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 7: gt 'gadforestlost', 'forestrescue'
@@ -76,6 +77,7 @@ if $ARGS[0] = '1':
 	act 'Look for a way out':
 	act 'Look for a way out':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		minut += 60
 		minut += 60
 		pcs_mood -= 5
 		pcs_mood -= 5
 		goforest += rand(0,1)
 		goforest += rand(0,1)
@@ -93,6 +95,7 @@ if $ARGS[0] = '1':
 	if rand(1,10)> 8: gs 'gadforest', 'torncloth'
 	if rand(1,10)> 8: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 	gs 'gadforestlost', 'searchfood'
 end
 end
+
 if $ARGS[0] = '2':
 if $ARGS[0] = '2':
 	*clr & cla
 	*clr & cla
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 8: gt 'gadforestlost', 'forestrescue'
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 8: gt 'gadforestlost', 'forestrescue'
@@ -118,6 +121,7 @@ if $ARGS[0] = '2':
 	act 'Look for the road':
 	act 'Look for the road':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		minut += 60
 		minut += 60
 		pcs_mood -= 5
 		pcs_mood -= 5
 		goforest += rand(0,1)
 		goforest += rand(0,1)
@@ -135,6 +139,7 @@ if $ARGS[0] = '2':
 	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 	gs 'gadforestlost', 'searchfood'
 end
 end
+
 if $ARGS[0] = '3':
 if $ARGS[0] = '3':
 	*clr & cla
 	*clr & cla
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 9: gt 'gadforestlost', 'forestrescue'
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 9: gt 'gadforestlost', 'forestrescue'
@@ -160,6 +165,7 @@ if $ARGS[0] = '3':
 	act 'Look for the road':
 	act 'Look for the road':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		minut += 60
 		minut += 60
 		pcs_mood -= 5
 		pcs_mood -= 5
 		goforest += rand(0,1)
 		goforest += rand(0,1)
@@ -177,6 +183,7 @@ if $ARGS[0] = '3':
 	if rand(1,10)> 6: gs 'gadforest', 'torncloth'
 	if rand(1,10)> 6: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 	gs 'gadforestlost', 'searchfood'
 end
 end
+
 if $ARGS[0] = '4':
 if $ARGS[0] = '4':
 	*clr & cla
 	*clr & cla
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 9: gt 'gadforestlost', 'forestrescue'
 	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 9: gt 'gadforestlost', 'forestrescue'
@@ -207,6 +214,7 @@ if $ARGS[0] = '4':
 	act 'Look for the road':
 	act 'Look for the road':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		minut += 60
 		minut += 60
 		pcs_mood -= 5
 		pcs_mood -= 5
 		goforest += rand(0,1)
 		goforest += rand(0,1)
@@ -225,6 +233,7 @@ if $ARGS[0] = '4':
 	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 	gs 'gadforestlost', 'searchfood'
 end
 end
+
 if $ARGS[0] = 'gadforestlost':
 if $ARGS[0] = 'gadforestlost':
 	'<center><H4>Forest</H4></center>'
 	'<center><H4>Forest</H4></center>'
 	if month >= 4 and month <= 10:
 	if month >= 4 and month <= 10:
@@ -245,12 +254,14 @@ if $ARGS[0] = 'gadforestlost':
 		end
 		end
 	end
 	end
 end
 end
+
 if $ARGS[0] = 'lostclothes':
 if $ARGS[0] = 'lostclothes':
 	if $clothingworntype ! 'nude' and CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestsearch0.'+rand(1,4)+'.jpg"></center>'
 	if $clothingworntype ! 'nude' and CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestsearch0.'+rand(1,4)+'.jpg"></center>'
 	if $clothingworntype ! 'nude' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestsearch_ski0.'+rand(1,4)+'.jpg"></center>'
 	if $clothingworntype ! 'nude' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestsearch_ski0.'+rand(1,4)+'.jpg"></center>'
 	if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestsearch_nude0.'+rand(1,4)+'.jpg"></center>'
 	if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestsearch_nude0.'+rand(1,4)+'.jpg"></center>'
 	'After wandering through the woods for an hour you decide to....'
 	'After wandering through the woods for an hour you decide to....'
 end
 end
+
 if $ARGS[0] = 'gadforestlostfinish':
 if $ARGS[0] = 'gadforestlostfinish':
 	'<center><H4>Somewhere in the woods</H4></center>'
 	'<center><H4>Somewhere in the woods</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadjoy.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadjoy.jpg"></center>'
@@ -260,10 +271,12 @@ if $ARGS[0] = 'gadforestlostfinish':
 	lost_girl = 0
 	lost_girl = 0
 	forest_lostday = 0
 	forest_lostday = 0
 	hanters = 0
 	hanters = 0
+	menu_off = 1
 	gs 'clothing', 'swamp_clothes', 0
 	gs 'clothing', 'swamp_clothes', 0
 	gs 'stat'
 	gs 'stat'
 	if $clothingworntype = 'nude':
 	if $clothingworntype = 'nude':
 		act 'Leave the woods':
 		act 'Leave the woods':
+			menu_off = 1
 			minut += 25
 			minut += 25
 			'You find your way out of the woods, hiding your naked body in shadows.'
 			'You find your way out of the woods, hiding your naked body in shadows.'
 			'You make your way back towards the edge of the forest where you left your clothes.'
 			'You make your way back towards the edge of the forest where you left your clothes.'
@@ -274,9 +287,11 @@ if $ARGS[0] = 'gadforestlostfinish':
 		temp=0
 		temp=0
 	end
 	end
 end
 end
+
 if $ARGS[0] = 'gadforestlostfinish1':
 if $ARGS[0] = 'gadforestlostfinish1':
 	cls
 	cls
 	*clr
 	*clr
+	menu_off = 1
 	temp = RAND(1,3)
 	temp = RAND(1,3)
 	lost = 0
 	lost = 0
 	pcs_mood += 20
 	pcs_mood += 20
@@ -289,9 +304,11 @@ if $ARGS[0] = 'gadforestlostfinish1':
 	if temp = 3:act 'Leave the woods':minut += 15 & gt'gadroad'
 	if temp = 3:act 'Leave the woods':minut += 15 & gt'gadroad'
 
 
 end
 end
+
 if $ARGS[0] = 'gadforestlostfinish2':
 if $ARGS[0] = 'gadforestlostfinish2':
 	cls
 	cls
 	*clr
 	*clr
+	menu_off = 1
 	temp = RAND(1,5)
 	temp = RAND(1,5)
 	lost = 0
 	lost = 0
 	pcs_mood += 20
 	pcs_mood += 20
@@ -305,9 +322,11 @@ if $ARGS[0] = 'gadforestlostfinish2':
 	if temp = 4:act 'Leave the woods':minut += 15 & gt'gadriver','start'
 	if temp = 4:act 'Leave the woods':minut += 15 & gt'gadriver','start'
 	if temp = 5:act 'Leave the woods':minut += 15 & gt'Meadow'
 	if temp = 5:act 'Leave the woods':minut += 15 & gt'Meadow'
 end
 end
+
 if $ARGS[0] = 'gadforestlostfinish3':
 if $ARGS[0] = 'gadforestlostfinish3':
 	cls
 	cls
 	*clr
 	*clr
+	menu_off = 1
 	temp = RAND(1,7)
 	temp = RAND(1,7)
 	lost = 0
 	lost = 0
 	pcs_mood += 20
 	pcs_mood += 20
@@ -323,9 +342,11 @@ if $ARGS[0] = 'gadforestlostfinish3':
 	if temp = 6:act 'Leave the woods':minut += 15 & nroad = 15 & gt'road'
 	if temp = 6:act 'Leave the woods':minut += 15 & nroad = 15 & gt'road'
 	if temp = 7:act 'Leave the woods':minut += 15 & nroad = 10 & gt'road'
 	if temp = 7:act 'Leave the woods':minut += 15 & nroad = 10 & gt'road'
 end
 end
+
 if $ARGS[0] = 'gadforestlostfinish4':
 if $ARGS[0] = 'gadforestlostfinish4':
 	cls
 	cls
 	*clr
 	*clr
+	menu_off = 1
 	temp = RAND(1,9)
 	temp = RAND(1,9)
 	lost = 0
 	lost = 0
 	pcs_mood += 20
 	pcs_mood += 20
@@ -333,8 +354,6 @@ if $ARGS[0] = 'gadforestlostfinish4':
 
 
 	gs 'gadforestlost', 'gadforestlostfinish'
 	gs 'gadforestlost', 'gadforestlostfinish'
 
 
-
-
 	if temp = 1:act 'Leave the woods':minut += 15 & gt'gadforest','1'
 	if temp = 1:act 'Leave the woods':minut += 15 & gt'gadforest','1'
 	if temp = 2:act 'Leave the woods':minut += 15 & gt'gadfield','field'
 	if temp = 2:act 'Leave the woods':minut += 15 & gt'gadfield','field'
 	if temp = 3:act 'Leave the woods':minut += 15 & gt'gadroad'
 	if temp = 3:act 'Leave the woods':minut += 15 & gt'gadroad'
@@ -345,13 +364,14 @@ if $ARGS[0] = 'gadforestlostfinish4':
 	if temp = 8:act 'Leave the woods':minut += 15 & nroad = 10 & gt'road'
 	if temp = 8:act 'Leave the woods':minut += 15 & nroad = 10 & gt'road'
 	if temp = 9 and goswamp = 0:act 'Leave the woods':minut += 15 & gt 'gadforestswamp','1'
 	if temp = 9 and goswamp = 0:act 'Leave the woods':minut += 15 & gt 'gadforestswamp','1'
 	if temp = 9 and goswamp = 1:act 'Leave the woods':minut += 15 & gt 'swamp'
 	if temp = 9 and goswamp = 1:act 'Leave the woods':minut += 15 & gt 'swamp'
-
 end
 end
+
 if $ARGS[0] = 'searchfood':
 if $ARGS[0] = 'searchfood':
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10:
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10:
 		act 'Look for mushrooms and berries':
 		act 'Look for mushrooms and berries':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut += 30
 			minut += 30
 			new_boletus += rand(1,2)
 			new_boletus += rand(1,2)
 			new_bilberry += rand(1,2)
 			new_bilberry += rand(1,2)

+ 17 - 6
locations/gadforestrelax.qsrc

@@ -1,14 +1,16 @@
 # gadforestrelax
 # gadforestrelax
 
 
 $location_type = 'secluded'
 $location_type = 'secluded'
-$metka = $ARGS[0]
-$loc = $CURLOC
+$metka = ''
+$loc = 'gadforestrelax'
+$menu_loc = 'gadforestrelax'
+$menu_arg = ''
+menu_off = 0
 if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10) + bonfire > 8: gt 'gadforestlost', 'forestrescue' & !add rescue by illume
 if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10) + bonfire > 8: gt 'gadforestlost', 'forestrescue' & !add rescue by illume
 gs 'gadukino_event', 'sound'
 gs 'gadukino_event', 'sound'
-cls
 wolfrand = rand(1,10)
 wolfrand = rand(1,10)
 gs'stat'
 gs'stat'
-!gs'time'
+
 '<center><H4>Forest</H4></center>'
 '<center><H4>Forest</H4></center>'
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0 and bonfire = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax1.jpg"></center>'
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0 and bonfire = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax1.jpg"></center>'
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0 and bonfire = 1:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax2.jpg"></center>'
 if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0 and bonfire = 1:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax2.jpg"></center>'
@@ -23,6 +25,7 @@ if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and bonfire =
     act 'Kindle fire':
     act 'Kindle fire':
         cla
         cla
    	    *clr
    	    *clr
+		menu_off = 1
    	    minut += 10
    	    minut += 10
    	    bonfire = 1
    	    bonfire = 1
    	    gs 'stat'
    	    gs 'stat'
@@ -39,6 +42,7 @@ if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and bonfire =
 	    act 'Eat fried mushrooms':
 	    act 'Eat fried mushrooms':
 	        cla
 	        cla
 	        *clr
 	        *clr
+			menu_off = 1
 	        minut += 15
 	        minut += 15
 	        edahot = 0
 	        edahot = 0
 	        pcs_health += 10
 	        pcs_health += 10
@@ -62,11 +66,13 @@ if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and bonfire =
    	act 'Get warm by the fire':
    	act 'Get warm by the fire':
         cla
         cla
    	    *clr
    	    *clr
+		menu_off = 1
         minut += 60
         minut += 60
         pcs_sleep += 9
         pcs_sleep += 9
         pcs_health += 10
         pcs_health += 10
         frost = 0
         frost = 0
         pcs_mood += 10
         pcs_mood += 10
+		gs 'stat'
         
         
 	    if hour >= 6 and hour < 21:
 	    if hour >= 6 and hour < 21:
 		    '<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_bonfire2.jpg"></center>'
 		    '<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestrelax_bonfire2.jpg"></center>'
@@ -80,7 +86,8 @@ if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and bonfire =
    	end
    	end
 	act 'Nap by the campfire':
 	act 'Nap by the campfire':
         cla
         cla
-   	    *clr	
+   	    *clr
+		menu_off = 1
 	    if pcs_sleep < 40:
 	    if pcs_sleep < 40:
 		    pcs_sleep += 30
 		    pcs_sleep += 30
 		    pcs_health += 20
 		    pcs_health += 20
@@ -107,6 +114,7 @@ if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and bonfire =
 	    act 'Grill the mushrooms in the fire':
 	    act 'Grill the mushrooms in the fire':
 	        cla
 	        cla
 	        *clr
 	        *clr
+			menu_off = 1
 	        minut += 30
 	        minut += 30
 	        edahot = 1
 	        edahot = 1
 	        boletus -= 1
 	        boletus -= 1
@@ -123,6 +131,7 @@ if $clothingworntype ! 'nude' and bonfire = 0:
    	act 'Sit on the grass':
    	act 'Sit on the grass':
         cla
         cla
    	    *clr
    	    *clr
+		menu_off = 1
    	    if temper < 12:pcs_health -= healthmax/20
    	    if temper < 12:pcs_health -= healthmax/20
         minut += 60
         minut += 60
         pcs_sleep += 6
         pcs_sleep += 6
@@ -139,7 +148,8 @@ if $clothingworntype ! 'nude' and bonfire = 0:
    	end
    	end
 	act 'Nap on the ground':
 	act 'Nap on the ground':
         cla
         cla
-   	    *clr	
+   	    *clr
+		menu_off = 1
 	    if pcs_sleep < 40:
 	    if pcs_sleep < 40:
 		    pcs_sleep += 30
 		    pcs_sleep += 30
 		    if temper < 12:pcs_health -= healthmax/10
 		    if temper < 12:pcs_health -= healthmax/10
@@ -168,6 +178,7 @@ if bilberry > 0:
 	act 'Eat berries':
 	act 'Eat berries':
 	    cla
 	    cla
 	    *clr
 	    *clr
+		menu_off = 1
 	    minut += 30
 	    minut += 30
 	    pcs_energy += 15
 	    pcs_energy += 15
 	    pcs_hydra += 40
 	    pcs_hydra += 40

+ 4 - 0
locations/gadforestswamp.qsrc

@@ -34,6 +34,7 @@ if $ARGS[0] = '1':
 
 
 	act 'Try to go through the mire':
 	act 'Try to go through the mire':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		minut += 10
 		minut += 10
 		swamprand = pcs_stren + pcs_agil
 		swamprand = pcs_stren + pcs_agil
 		pcs_sweat += 15
 		pcs_sweat += 15
@@ -88,6 +89,7 @@ if $ARGS[0] = '2':
 
 
 	act 'Call for help':
 	act 'Call for help':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		minut += 10
 		minut += 10
 		if pcs_sweat < 10: pcs_sweat += 10
 		if pcs_sweat < 10: pcs_sweat += 10
 		if week = 6 or week = 7:temp_gads = RAND(1,3)
 		if week = 6 or week = 7:temp_gads = RAND(1,3)
@@ -125,6 +127,7 @@ if $ARGS[0] = '2':
 
 
 	act 'Try to get back to the woods':
 	act 'Try to get back to the woods':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		minut += 10
 		minut += 10
 		swamprand = pcs_stren + pcs_agil
 		swamprand = pcs_stren + pcs_agil
 		stren_exp += rand(0,1)
 		stren_exp += rand(0,1)
@@ -149,6 +152,7 @@ if $ARGS[0] = '2':
 	act 'Try to go on to the hut':
 	act 'Try to go on to the hut':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		minut += 10
 		minut += 10
 		swamprand = pcs_stren + pcs_agil
 		swamprand = pcs_stren + pcs_agil
 		stren_exp += rand(0,1)
 		stren_exp += rand(0,1)

+ 4 - 0
locations/gadriver.qsrc

@@ -41,6 +41,7 @@ if $ARGS[0] = 'start':
 
 
 			act 'Go with them':
 			act 'Go with them':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex17.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex17.jpg"></center>'
 				'The boys take you to Vasyan''s house, where, they rudely keep pushing you until you are bent over the kitchen table. They then take turns fucking you...'
 				'The boys take you to Vasyan''s house, where, they rudely keep pushing you until you are bent over the kitchen table. They then take turns fucking you...'
 				gs 'boyStat', 'A61'
 				gs 'boyStat', 'A61'
@@ -79,6 +80,7 @@ if $ARGS[0] = 'start':
 
 
 			act 'Go with them':
 			act 'Go with them':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex18.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex18.jpg"></center>'
 				'The boys lead you to Vasyan''s house, where they spend an hour fucking you in the ass...'
 				'The boys lead you to Vasyan''s house, where they spend an hour fucking you in the ass...'
 				gs 'arousal', 'anal', 20, 'gangbang', 'sub'
 				gs 'arousal', 'anal', 20, 'gangbang', 'sub'
@@ -110,6 +112,7 @@ if $ARGS[0] = 'start':
 
 
 			act 'Go with him':
 			act 'Go with him':
 				*clr & cla
 				*clr & cla
+				menu_off = 1
 				gs 'boyStat', 'A62'
 				gs 'boyStat', 'A62'
 				npc_sex[$boy] += 1
 				npc_sex[$boy] += 1
 				pose = 1
 				pose = 1
@@ -610,6 +613,7 @@ end
 
 
 if $ARGS[0] = 'second_thoughts':
 if $ARGS[0] = 'second_thoughts':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirariver.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirariver.jpg"></center>'
 	*nl
 	*nl
 	if ARRSIZE('swimwear') = 0:
 	if ARRSIZE('swimwear') = 0:

+ 4 - 0
locations/gadroad.qsrc

@@ -3,6 +3,9 @@ $location_type = 'secluded'
 $metka = ''
 $metka = ''
 $loc = 'gadroad'
 $loc = 'gadroad'
 gs 'gadukino_event', 'sound'
 gs 'gadukino_event', 'sound'
+$menu_loc = 'gadroad'
+$menu_arg = ''
+menu_off = 0
 clr
 clr
 gs'stat'
 gs'stat'
 !gs'time'
 !gs'time'
@@ -30,6 +33,7 @@ act 'Go into the woods':minut += 30 & gt'gadforest','1'
 if $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour >= 6 and hour < 22 and daygadrun ! daystart:
 if $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour >= 6 and hour < 22 and daygadrun ! daystart:
 	act 'Go for a run (1:00)':
 	act 'Go for a run (1:00)':
 		cls
 		cls
+		menu_off = 1
 		minut += 60
 		minut += 60
 		fat -= RAND(5,15)
 		fat -= RAND(5,15)
 		run_exp += RAND(3,6)
 		run_exp += RAND(3,6)

+ 25 - 0
locations/gadukino.qsrc

@@ -116,6 +116,7 @@ if $ARGS[0] = '':
 				act 'Walk through the village':
 				act 'Walk through the village':
 					*clr & cla
 					*clr & cla
 					minut += 15
 					minut += 15
+					menu_off = 1
 					gs 'stat'
 					gs 'stat'
 					if Mira_no = 0:
 					if Mira_no = 0:
 						temp = RAND(0,100)
 						temp = RAND(0,100)
@@ -179,6 +180,7 @@ end
 if $ARGS[0] = 'succubus_hunt':
 if $ARGS[0] = 'succubus_hunt':
 	cla
 	cla
 	minut += 30
 	minut += 30
+	menu_off = 1
 	*nl
 	*nl
 	'At this hour of the night, the village is only illuminated by the light of the moon. You know this will be to your advantage. No one will be able to see you coming... That is, if there were anyone out at night. You prowl the village looking for prey, but as the minutes pass, your frustration grows.'
 	'At this hour of the night, the village is only illuminated by the light of the moon. You know this will be to your advantage. No one will be able to see you coming... That is, if there were anyone out at night. You prowl the village looking for prey, but as the minutes pass, your frustration grows.'
 	if rand(1,100) < 70:
 	if rand(1,100) < 70:
@@ -262,6 +264,9 @@ if $ARGS[0] = 'succubus_hunt':
 end
 end
 
 
 if $ARGS[0] = '1':
 if $ARGS[0] = '1':
+	$menu_loc = 'gadukino'
+	$menu_arg = '1'
+	menu_off = 0
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/meadow/trail_meadow.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/meadow/trail_meadow.jpg"></center>'
 	'Walking around the village you see a small path that leads between neighbor''s houses, the path leads away from the village into a dense thicket...'
 	'Walking around the village you see a small path that leads between neighbor''s houses, the path leads away from the village into a dense thicket...'
 
 
@@ -269,6 +274,7 @@ if $ARGS[0] = '1':
 		*clr & cla
 		*clr & cla
 		meadow = 1
 		meadow = 1
 		minut += 10
 		minut += 10
+		menu_off = 1
 		gs 'stat'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/meadow/meadow_thicket.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/meadow/meadow_thicket.jpg"></center>'
 		'You follow the path to see where it goes, but about ten minutes later the path disappears into a very dense thicket if bushes and trees.'
 		'You follow the path to see where it goes, but about ten minutes later the path disappears into a very dense thicket if bushes and trees.'
@@ -311,6 +317,8 @@ if $ARGS[0] = '1':
 end
 end
 
 
 if $ARGS[0] = '2':
 if $ARGS[0] = '2':
+	menu_off = 1
+	gs 'stat'
 	! never met mira before
 	! never met mira before
 	if npc_rel['A60'] = 0:
 	if npc_rel['A60'] = 0:
 		*clr & cla
 		*clr & cla
@@ -458,6 +466,8 @@ if $ARGS[0] = '2':
 end
 end
 
 
 if $ARGS[0] = '3':
 if $ARGS[0] = '3':
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/miraqw7.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/miraqw7.jpg"></center>'
 	'Walking through the village, you notice Mira, digging in her vegetable garden. She stands with her ass high in the air, and to your amazement, she isn''t wearing panties. You get a good look at her pussy lips...'
 	'Walking through the village, you notice Mira, digging in her vegetable garden. She stands with her ass high in the air, and to your amazement, she isn''t wearing panties. You get a good look at her pussy lips...'
 
 
@@ -590,6 +600,7 @@ if $ARGS[0] = '3':
 end
 end
 
 
 if $ARGS[0] = '4':
 if $ARGS[0] = '4':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad5.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad5.jpg"></center>'
 	'Walking through the village, you notice that behind a shed Vasya and Mira are having sex. Mira moans as she rides his cock and it seems as if she''s oblivious to anything around her. But you''re not sure you can say the same about Vasya... So, you decide not to risk being caught peeking and leave the couple alone.'
 	'Walking through the village, you notice that behind a shed Vasya and Mira are having sex. Mira moans as she rides his cock and it seems as if she''s oblivious to anything around her. But you''re not sure you can say the same about Vasya... So, you decide not to risk being caught peeking and leave the couple alone.'
@@ -601,6 +612,7 @@ if $ARGS[0] = '4':
 end
 end
 
 
 if $ARGS[0] = '5':
 if $ARGS[0] = '5':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad6.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad6.jpg"></center>'
 	'Walking through the village, you notice that behind a shed Vasya and Mira are having sex. Mira moans as she rides his cock and it seems as if she''s oblivious to anything around her. But you''re not sure you can say the same about Vasya... So, you decide not to risk being caught peeking and leave the couple alone.'
 	'Walking through the village, you notice that behind a shed Vasya and Mira are having sex. Mira moans as she rides his cock and it seems as if she''s oblivious to anything around her. But you''re not sure you can say the same about Vasya... So, you decide not to risk being caught peeking and leave the couple alone.'
@@ -612,6 +624,7 @@ if $ARGS[0] = '5':
 end
 end
 
 
 if $ARGS[0] = '6':
 if $ARGS[0] = '6':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad7.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad7.jpg"></center>'
 	'Walking through the village, you notice Kolambu and Mira hiding behind some bushes. She''s squatting before him, passionately sucking on his cock...'
 	'Walking through the village, you notice Kolambu and Mira hiding behind some bushes. She''s squatting before him, passionately sucking on his cock...'
@@ -623,6 +636,7 @@ if $ARGS[0] = '6':
 end
 end
 
 
 if $ARGS[0] = '7':
 if $ARGS[0] = '7':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad8.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad8.jpg"></center>'
 	'Walking through the village, you notice behind the bushes Kolambu with Vasya and Mira. Mira is butt naked on all fours and taking turns sucking the boys members...'
 	'Walking through the village, you notice behind the bushes Kolambu with Vasya and Mira. Mira is butt naked on all fours and taking turns sucking the boys members...'
@@ -634,6 +648,7 @@ if $ARGS[0] = '7':
 end
 end
 
 
 if $ARGS[0] = '8':
 if $ARGS[0] = '8':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirahorny.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirahorny.jpg"></center>'
 	'Walking through the village, you see Mira. She sits on the fence intensely rubbing her pussy, as if no one is watching...'
 	'Walking through the village, you see Mira. She sits on the fence intensely rubbing her pussy, as if no one is watching...'
@@ -645,6 +660,7 @@ if $ARGS[0] = '8':
 end
 end
 
 
 if $ARGS[0] = '9':
 if $ARGS[0] = '9':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad9.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirasexgad9.jpg"></center>'
 	'Walking through the village, you notice Mira behind a fence with Kolyamba. She squirms and moans, but dutifully exposes her bare butt to Kolyamba, who is trying to shove a bottle in her...'
 	'Walking through the village, you notice Mira behind a fence with Kolyamba. She squirms and moans, but dutifully exposes her bare butt to Kolyamba, who is trying to shove a bottle in her...'
@@ -656,6 +672,7 @@ if $ARGS[0] = '9':
 end
 end
 
 
 if $ARGS[0] = '10':
 if $ARGS[0] = '10':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasexgad10.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasexgad10.jpg"></center>'
 	'Walking through the village, you see Mira, facing Mitka with his pants down and sticking his fingers in her ass...'
 	'Walking through the village, you see Mira, facing Mitka with his pants down and sticking his fingers in her ass...'
@@ -667,6 +684,7 @@ if $ARGS[0] = '10':
 end
 end
 
 
 if $ARGS[0] = '11':
 if $ARGS[0] = '11':
+	menu_off = 1
 	*clr & cla
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasexgad11.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirasexgad11.jpg"></center>'
 	'Walking through the village, you meet Mira. You notice she is not wearing panties and the white thread of a tampon is sticking out of her pussy...'
 	'Walking through the village, you meet Mira. You notice she is not wearing panties and the white thread of a tampon is sticking out of her pussy...'
@@ -679,6 +697,7 @@ end
 
 
 if $ARGS[0] = '12':
 if $ARGS[0] = '12':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	minut += 5
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol.jpg"></center>'
 	'Walking through the village, you see two grandmas, sawing boards...'
 	'Walking through the village, you see two grandmas, sawing boards...'
@@ -689,6 +708,7 @@ end
 
 
 if $ARGS[0] = '13':
 if $ARGS[0] = '13':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	minut += 5
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol1.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol1.jpg"></center>'
 	gs 'stat'
 	gs 'stat'
@@ -698,6 +718,7 @@ end
 
 
 if $ARGS[0] = '14':
 if $ARGS[0] = '14':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	minut += 5
 	minut += 5
 	if temper >= 15:
 	if temper >= 15:
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol3.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol3.jpg"></center>'
@@ -713,6 +734,7 @@ end
 
 
 if $ARGS[0] = '15':
 if $ARGS[0] = '15':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	minut += 5
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol4.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadlol4.jpg"></center>'
 	'Walking through the village, a group of young boys, looking no older than 13 or 14, are playing in the road. Two of the older boys sit on an old, beat up dirt bike. You''re not even sure it even works, but the kids are having fun playing on it nonetheless.'
 	'Walking through the village, a group of young boys, looking no older than 13 or 14, are playing in the road. Two of the older boys sit on an old, beat up dirt bike. You''re not even sure it even works, but the kids are having fun playing on it nonetheless.'
@@ -723,6 +745,8 @@ end
 
 
 if $ARGS[0] = '16':
 if $ARGS[0] = '16':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
+	gs 'stat'
 	'<center><h2>Village Gadukino</h2></center>'
 	'<center><h2>Village Gadukino</h2></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/walk.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/walk.jpg"></center>'
 	'You kill time, walking through the village.'
 	'You kill time, walking through the village.'
@@ -732,6 +756,7 @@ end
 !125s
 !125s
 if $ARGS[0] = 'collection_point':
 if $ARGS[0] = 'collection_point':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/collection_point.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/collection_point.jpg"></center>'

+ 2 - 0
locations/gadukino_event.qsrc

@@ -1,5 +1,7 @@
 # gadukino_event
 # gadukino_event
 
 
+menu_off = 1
+
 if $ARGS[0] = 'mira_apologise':
 if $ARGS[0] = 'mira_apologise':
 	minut += 5
 	minut += 5
 	gadboyday = daystart
 	gadboyday = daystart

+ 5 - 0
locations/gameover.qsrc

@@ -1,4 +1,9 @@
 # gameover
 # gameover
+
+$menu_loc = 'gameover'
+$menu_arg = ''
+menu_off = 0
+gs 'stat'
 '<center><b><font color="maroon">GAME OVER</font></b></center>'
 '<center><b><font color="maroon">GAME OVER</font></b></center>'
 
 
 if over = 1:
 if over = 1:

+ 10 - 2
locations/garfather.qsrc

@@ -4,9 +4,12 @@ fatherAge = year - (((npc_dob['A28']) - (npc_dob['A28'] mod 10000)) / 10000)
 gs 'stat'
 gs 'stat'
 gs 'dinSex'
 gs 'dinSex'
 
 
-$metka = $ARGS[0]
-$loc = $CURLOC
+$metka = ''
+$loc = 'garfather'
 $location_type = 'event'
 $location_type = 'event'
+$menu_loc = 'garfather'
+$menu_arg = ''
+menu_off = 0
 
 
 '<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
 '<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
 '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
@@ -20,6 +23,7 @@ if hour >= 21:exit
 
 
 act 'Chat':
 act 'Chat':
 	cls
 	cls
+	menu_off = 1
 	minut+=rand(10,15)
 	minut+=rand(10,15)
 	gs 'stat'
 	gs 'stat'
 	'<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
 	'<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
@@ -86,6 +90,7 @@ end
 
 
 act 'Help':
 act 'Help':
 	cls
 	cls
+	menu_off = 1
 	minut += 60
 	minut += 60
 	pcs_sweat += 10
 	pcs_sweat += 10
 	hndiwrk_exp += rand(0,3)
 	hndiwrk_exp += rand(0,3)
@@ -234,6 +239,7 @@ if pcs_horny > 50 and npc_sex['A28']!0:
 		gs 'boyStat', 'A28'
 		gs 'boyStat', 'A28'
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
 		'You walk up to the Gazelle and pick up a sponge. Bending slightly forwards, you begin washing the car and simultaneously putting your ass on display for your stepfather.'
 		'You walk up to the Gazelle and pick up a sponge. Bending slightly forwards, you begin washing the car and simultaneously putting your ass on display for your stepfather.'
 		'"- Oh..." - Stepfather did not expect this from you, but his involuntary exhalation and kindled eyes tell you he is enjoying it very much.'
 		'"- Oh..." - Stepfather did not expect this from you, but his involuntary exhalation and kindled eyes tell you he is enjoying it very much.'
@@ -368,6 +374,7 @@ if fatherdrunk=1:
 		if sorryday!daystart:
 		if sorryday!daystart:
 			act 'Persist and ask if you can join them':
 			act 'Persist and ask if you can join them':
 				cla
 				cla
+				menu_off = 1
 				gs 'stat'
 				gs 'stat'
 				'You try to get your stepfather to let you join them but he''s equally persistent in telling you to get lost, being quite rude about it too. He really doesn''t like you at all.'
 				'You try to get your stepfather to let you join them but he''s equally persistent in telling you to get lost, being quite rude about it too. He really doesn''t like you at all.'
 				act 'Move away':gt 'gargazel'
 				act 'Move away':gt 'gargazel'
@@ -379,6 +386,7 @@ if fatherdrunk=1:
 		if sorryday!daystart:
 		if sorryday!daystart:
 			act 'Try to persuade him':
 			act 'Try to persuade him':
 				cla
 				cla
+				menu_off = 1
 				gs 'stat'
 				gs 'stat'
 				'You do your best, but your stepfather remains adamant and sends you home.'
 				'You do your best, but your stepfather remains adamant and sends you home.'
 				act 'Move away':gt 'gargazel'
 				act 'Move away':gt 'gargazel'

+ 6 - 0
locations/gargazel.qsrc

@@ -1,7 +1,11 @@
 # gargazel
 # gargazel
+
 CLOSE ALL
 CLOSE ALL
 $metka = $ARGS[0]
 $metka = $ARGS[0]
 $loc = $CURLOC
 $loc = $CURLOC
+$menu_loc = 'gargazel'
+$menu_arg = ''
+menu_off = 0
 $location_type = 'secluded'
 $location_type = 'secluded'
 fatherdrunk=0
 fatherdrunk=0
 clr
 clr
@@ -40,6 +44,7 @@ if YouCanGar > 0:
 			if GarTorgItem >= perenGarTov:
 			if GarTorgItem >= perenGarTov:
 				act 'Move <<perenGarTov>> trinkets to your home':
 				act 'Move <<perenGarTov>> trinkets to your home':
 					cls
 					cls
+					menu_off = 1
 					minut += 60
 					minut += 60
 					tovarL += perenGarTov
 					tovarL += perenGarTov
 					GarTorgItem -= perenGarTov
 					GarTorgItem -= perenGarTov
@@ -53,6 +58,7 @@ if YouCanGar > 0:
 			if GarTorgItem < perenGarTov:
 			if GarTorgItem < perenGarTov:
 				act 'Collect <<GarTorgItem>> trinkets to take with you':
 				act 'Collect <<GarTorgItem>> trinkets to take with you':
 					cls
 					cls
+					menu_off = 1
 					minut += 30
 					minut += 30
 					tovarL += GarTorgItem
 					tovarL += GarTorgItem
 					GarTorgItem = 0
 					GarTorgItem = 0

+ 11 - 1
locations/gdkbibl.qsrc

@@ -3,9 +3,12 @@
 $metka = ''
 $metka = ''
 $loc = 'gdkbibl'
 $loc = 'gdkbibl'
 $location_type = 'public_indoors'
 $location_type = 'public_indoors'
+$menu_loc = 'gdkbibl'
+$menu_arg = ''
+menu_off = 0
 frost = 0
 frost = 0
 gs 'stat'
 gs 'stat'
-	gs 'themes', 'indoors'
+gs 'themes', 'indoors'
 '<center><b><font color="maroon">Community center library</font></b></center>'
 '<center><b><font color="maroon">Community center library</font></b></center>'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/library/gdkbibl.jpg"></center>'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/library/gdkbibl.jpg"></center>'
 'For such a small town, this library is surprisingly large - containing many interesting books on a wide variety of subjects.'
 'For such a small town, this library is surprisingly large - containing many interesting books on a wide variety of subjects.'
@@ -17,6 +20,7 @@ act 'Go to the toilets': gt 'gdktoilet', 'start'
 if hour >= 8 and hour < 18:
 if hour >= 8 and hour < 18:
 	act 'Read a book on science (1:00)':
 	act 'Read a book on science (1:00)':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 		glassqw = 1
 		glassqw = 1
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
@@ -37,6 +41,7 @@ if hour >= 8 and hour < 18:
 	end
 	end
 	act 'Read an adventure novel (1:00)':
 	act 'Read an adventure novel (1:00)':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 		glassqw = 1
 		glassqw = 1
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
@@ -58,6 +63,7 @@ if hour >= 8 and hour < 18:
 	end
 	end
 	act 'Read a fantasy novel (1:00)':
 	act 'Read a fantasy novel (1:00)':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 		glassqw = 1
 		glassqw = 1
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
@@ -79,6 +85,7 @@ if hour >= 8 and hour < 18:
 	end
 	end
 	act 'Read a science fiction novel (1:00)':
 	act 'Read a science fiction novel (1:00)':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 		glassqw = 1
 		glassqw = 1
 		msg'The text blurs across the page - it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
 		msg'The text blurs across the page - it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
@@ -100,6 +107,7 @@ if hour >= 8 and hour < 18:
 	end
 	end
 	act 'Read a romance novel (1:00)':
 	act 'Read a romance novel (1:00)':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 		glassqw = 1
 		glassqw = 1
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
 		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
@@ -121,6 +129,7 @@ if hour >= 8 and hour < 18:
 	end
 	end
 	act 'Study for an hour':
 	act 'Study for an hour':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 			glassqw = 1
 			glassqw = 1
 			msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'
 			msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'
@@ -142,6 +151,7 @@ if hour >= 8 and hour < 18:
 	end
 	end
 	act 'Read from the collected works of Leo Tolstoy (1:00)':
 	act 'Read from the collected works of Leo Tolstoy (1:00)':
 		*clr & cla
 		*clr & cla
+		menu_off = 1
 		if blizoruk = 100 or glassqw = 1:
 		if blizoruk = 100 or glassqw = 1:
 			glassqw = 1
 			glassqw = 1
 			msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
 			msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc

+ 9 - 0
locations/gdkin.qsrc

@@ -50,6 +50,7 @@ if $ARGS[0] = '':
 
 
 		act 'Dance (0:15)':
 		act 'Dance (0:15)':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			'<center><b><font color="maroon">Disco</font></b></center>'
 			'<center><b><font color="maroon">Disco</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
 			if pcs_inhib < 40:inhib_exp += rand(1,2)
 			if pcs_inhib < 40:inhib_exp += rand(1,2)
@@ -133,6 +134,7 @@ if $ARGS[0] = '':
 
 
 		act 'Stand at the wall':
 		act 'Stand at the wall':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 5
 			minut += 5
 			!!fat -= 1
 			!!fat -= 1
 			pcs_mood -= 5
 			pcs_mood -= 5
@@ -205,6 +207,7 @@ end
 
 
 if $ARGS[0] = 'Katja_dance':
 if $ARGS[0] = 'Katja_dance':
 	minut += 15
 	minut += 15
+	menu_off = 1
 	gs'stat'
 	gs'stat'
 	*clr & cla
 	*clr & cla
 	dancerand=rand(1,5)
 	dancerand=rand(1,5)
@@ -287,6 +290,7 @@ end
 
 
 if $ARGS[0] = 'kotov_love':
 if $ARGS[0] = 'kotov_love':
 	cls
 	cls
+	menu_off = 1
 	gs 'stat'
 	gs 'stat'
 	'<center><b><font color="maroon">Disco</font></b></center>'
 	'<center><b><font color="maroon">Disco</font></b></center>'
 	'<center><b><font color="maroon"><<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>></font></b></center>'
 	'<center><b><font color="maroon"><<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>></font></b></center>'
@@ -317,6 +321,7 @@ if $ARGS[0] = 'kotov_love':
 end
 end
 
 
 if $ARGS[0] = 'reakt_dance':
 if $ARGS[0] = 'reakt_dance':
+	menu_off = 1
 	if alko >= 3:
 	if alko >= 3:
 		'You feel yourself getting aroused by the guy''s actions.'
 		'You feel yourself getting aroused by the guy''s actions.'
 		gs 'arousal', 'foreplay', 5
 		gs 'arousal', 'foreplay', 5
@@ -333,6 +338,7 @@ if $ARGS[0] = 'reakt_dance':
 end
 end
 
 
 if $ARGS[0] = 'reverse_reakt_dance':
 if $ARGS[0] = 'reverse_reakt_dance':
+	menu_off = 1
 	if alko < 3:
 	if alko < 3:
 		pcs_mood += 20
 		pcs_mood += 20
 		'You enjoy dancing with him a great deal.'
 		'You enjoy dancing with him a great deal.'
@@ -352,6 +358,7 @@ end
 
 
 if $ARGS[0] = 'dance_vrp':
 if $ARGS[0] = 'dance_vrp':
 	*clr & cla
 	*clr & cla
+	menu_off = 1
 	minut += 5
 	minut += 5
 	if pcs_danc < 50 and pcs_agil >=pcs_danc:danc_exp += 1
 	if pcs_danc < 50 and pcs_agil >=pcs_danc:danc_exp += 1
 	if pcs_inhib < 40:inhib_exp += rand(1,2)
 	if pcs_inhib < 40:inhib_exp += rand(1,2)
@@ -565,6 +572,7 @@ end
 
 
 if $ARGS[0] = 'familiar':
 if $ARGS[0] = 'familiar':
 	cls
 	cls
+	menu_off = 1
 	gs 'stat'
 	gs 'stat'
 
 
 	Tboynum = sozboyrand
 	Tboynum = sozboyrand
@@ -596,6 +604,7 @@ end
 if $ARGS[0] = 'too_drunk_dance':
 if $ARGS[0] = 'too_drunk_dance':
 	if StoryLine = 1 and SchoolAtestat = 0:
 	if StoryLine = 1 and SchoolAtestat = 0:
 		cls
 		cls
+		menu_off = 1
 		gs 'stat'
 		gs 'stat'
 		'<center><b><font color="maroon">Disco</font></b></center>'
 		'<center><b><font color="maroon">Disco</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance_alco1.jpg"></center>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance_alco1.jpg"></center>'

+ 5 - 0
locations/gdkkru.qsrc

@@ -2,6 +2,9 @@
 
 
 $metka = ''
 $metka = ''
 $loc = 'gdkkru'
 $loc = 'gdkkru'
+$menu_loc = 'gdkkru'
+$menu_arg = ''
+menu_off = 0
 $location_type = 'public_indoors'
 $location_type = 'public_indoors'
 
 
 frost = 0
 frost = 0
@@ -27,6 +30,7 @@ if hour >= 12 and hour < 20:
 	else
 	else
 		act 'Go to the sewing club':
 		act 'Go to the sewing club':
 			cls
 			cls
+			menu_off = 1
 			gs 'stat'
 			gs 'stat'
 			'<center><b><font color = maroon>Sewing circle</font></b></center>'
 			'<center><b><font color = maroon>Sewing circle</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/krupo.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/krupo.jpg"></center>'
@@ -52,6 +56,7 @@ if hour >= 12 and hour < 20:
 	else
 	else
 		act 'Go to the chess club':
 		act 'Go to the chess club':
 			cls
 			cls
+			menu_off = 1
 			gs 'stat'
 			gs 'stat'
 			'<center><b><font color = maroon>Chess Circle</font></b></center>'
 			'<center><b><font color = maroon>Chess Circle</font></b></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/kruchess.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/kruchess.jpg"></center>'

+ 4 - 2
locations/gdksex.qsrc

@@ -8,9 +8,10 @@ if $ARGS[0] = 'outside':
 	if $ARGS[1] = 'aggressiv': gdk_nice_guy = 0
 	if $ARGS[1] = 'aggressiv': gdk_nice_guy = 0
 	if $ARGS[1] = 'nice': gdk_nice_guy = 1
 	if $ARGS[1] = 'nice': gdk_nice_guy = 1
 	
 	
-	$metka = $ARGS[0]
-	$loc = $CURLOC
+	$metka = 'outside'
+	$loc = 'gdksex'
 	$location_type = 'event'
 	$location_type = 'event'
+	menu_off = 1
 	
 	
 	minut += 5
 	minut += 5
 	gs 'stat'
 	gs 'stat'
@@ -808,6 +809,7 @@ end
 !! Scene 2: Hotel
 !! Scene 2: Hotel
 if $ARGS[0] = 'hotel':
 if $ARGS[0] = 'hotel':
 	
 	
+	menu_off = 1
 	music_loop = 0
 	music_loop = 0
 	close all
 	close all
 	
 	

+ 19 - 0
locations/gdktoilet.qsrc

@@ -5,6 +5,9 @@ if $ARGS[0] = 'start':
 	$location_type = 'indoors'
 	$location_type = 'indoors'
 	$metka = 'start'
 	$metka = 'start'
 	$loc = 'gdktoilet'
 	$loc = 'gdktoilet'
+	$menu_loc = 'gdktoilet'
+	$menu_arg = 'start'
+	menu_off = 0
 	cls
 	cls
 	gs 'stat'
 	gs 'stat'
 	ghnow = 0
 	ghnow = 0
@@ -59,6 +62,7 @@ if $ARGS[0] = 'start':
 end
 end
 
 
 if $ARGS[0] = 'mens_entrance_events':
 if $ARGS[0] = 'mens_entrance_events':
+	menu_off = 1
 	temp = RAND(1,100)
 	temp = RAND(1,100)
 !!Gloryhole1
 !!Gloryhole1
 	if temp >= 80:
 	if temp >= 80:
@@ -279,6 +283,9 @@ if $ARGS[0] = 'mens':
 	$metkaM = 'mens'
 	$metkaM = 'mens'
 	$locM = 'gdktoilet'
 	$locM = 'gdktoilet'
 	$location_type = 'bathroom'
 	$location_type = 'bathroom'
+	$menu_loc = 'gdktoilet'
+	$menu_arg = 'mens'
+	menu_off = 0
 	cls
 	cls
 	gs 'stat'
 	gs 'stat'
 	
 	
@@ -303,6 +310,7 @@ if $ARGS[0] = 'mens':
 	
 	
 	act 'Look at the hole':
 	act 'Look at the hole':
 		cls
 		cls
+		menu_off = 1
 		gs 'stat'
 		gs 'stat'
 		'<center><b><font color="maroon">Men''s Room</font></b></center>'
 		'<center><b><font color="maroon">Men''s Room</font></b></center>'
 		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/menghpeek.mp4"></video></center>'
 		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/menghpeek.mp4"></video></center>'
@@ -337,6 +345,7 @@ if $ARGS[0] = 'mensmast':
 	minut += 2
 	minut += 2
 	pcs_horny += 5
 	pcs_horny += 5
 	pcs_mood += 5
 	pcs_mood += 5
+	menu_off = 1
 	gs 'stat'
 	gs 'stat'
 	if picrand = 1:
 	if picrand = 1:
 		cls
 		cls
@@ -450,10 +459,12 @@ if $ARGS[0] = 'mensmast':
 end
 end
 
 
 if $ARGS[0] = 'mensglory':
 if $ARGS[0] = 'mensglory':
+	menu_off = 1
 	gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
 	gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
 	$npc_thdick[$npclastgenerated] = 'massive'
 	$npc_thdick[$npclastgenerated] = 'massive'
 	npc_dick[$npclastgenerated] = 20
 	npc_dick[$npclastgenerated] = 20
 	gs 'boyStat', $npclastgenerated
 	gs 'boyStat', $npclastgenerated
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
 	act 'Submit':
 	act 'Submit':
 		cls
 		cls
@@ -617,6 +628,9 @@ if $ARGS[0] = 'womens':
 	$loc = 'gdktoilet'
 	$loc = 'gdktoilet'
 	$metkaM = 'womens'
 	$metkaM = 'womens'
 	$locM = 'gdktoilet'
 	$locM = 'gdktoilet'
+	$menu_loc = 'gdktoilet'
+	$menu_arg = 'womens'
+	menu_off = 0
 	$location_type = 'bathroom'
 	$location_type = 'bathroom'
 	cls
 	cls
 	gs 'stat'
 	gs 'stat'
@@ -635,6 +649,7 @@ end
 if $ARGS[0] = 'emptystall':
 if $ARGS[0] = 'emptystall':
 	cls
 	cls
 	minut +=5
 	minut +=5
+	menu_off = 1
 	gs 'stat'
 	gs 'stat'
 	'<center><b><font color="maroon">Empty Stall</font></b></center>'
 	'<center><b><font color="maroon">Empty Stall</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sitting.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sitting.jpg"></center>'
@@ -682,6 +697,7 @@ end
 
 
 if $ARGS[0] = 'contmast':
 if $ARGS[0] = 'contmast':
 	pcs_mood += 5
 	pcs_mood += 5
+	menu_off = 1
 	gs 'stat'
 	gs 'stat'
 	if picrand = 1:
 	if picrand = 1:
 		cls
 		cls
@@ -730,6 +746,7 @@ end
 
 
 if $ARGS[0] = 'hole':
 if $ARGS[0] = 'hole':
 	cls
 	cls
+	menu_off = 1
 	gs 'npcgeneratec', 0, 'unknown guy', rand(18,40)
 	gs 'npcgeneratec', 0, 'unknown guy', rand(18,40)
 	gs 'boyStat', $npclastgenerated
 	gs 'boyStat', $npclastgenerated
 	minut +=5
 	minut +=5
@@ -1097,6 +1114,8 @@ end
 if $ARGS[0] = 'rape':
 if $ARGS[0] = 'rape':
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
+	gs 'atat'
 	dick = rand(9, 25)
 	dick = rand(9, 25)
 	if rand(1, 20) > 12:
 	if rand(1, 20) > 12:
 		gs 'npcgeneratec', 0, 'rapist', rand(19,45)
 		gs 'npcgeneratec', 0, 'rapist', rand(19,45)

+ 3 - 0
locations/gevent.qsrc

@@ -1,5 +1,8 @@
 # gevent
 # gevent
+
+menu_off = 1
 CLOSE ALL
 CLOSE ALL
+gs 'stat'
 if $ARGS[0] = '1':
 if $ARGS[0] = '1':
 	*clr & cla
 	*clr & cla
 	menu_off = 1
 	menu_off = 1

+ 1 - 0
locations/gkafe.qsrc

@@ -27,6 +27,7 @@ if $ARGS[0] = '':
 
 
 		act 'Walk around the cafe':
 		act 'Walk around the cafe':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 15
 			minut += 15
 			gs 'stat'
 			gs 'stat'
 			'Being locked outside of the cafe, you walk around it to try and figure out why it is closed. Suddenly, you hear weak voices through the wall. It sounds like some poor woman is screaming! You quickly look around and notice a stack of old crates. If you stand on it, you think you can reach a small window and see what is happening inside.'
 			'Being locked outside of the cafe, you walk around it to try and figure out why it is closed. Suddenly, you hear weak voices through the wall. It sounds like some poor woman is screaming! You quickly look around and notice a stack of old crates. If you stand on it, you think you can reach a small window and see what is happening inside.'

+ 9 - 0
locations/glake.qsrc

@@ -67,6 +67,7 @@ if $clothingworntype = 'nude':
 
 
 	act'Put your clothes back on':
 	act'Put your clothes back on':
 		cla
 		cla
+		menu_off = 1
 		minut+=5
 		minut+=5
 		gs 'clothing', 'wear_last_worn'
 		gs 'clothing', 'wear_last_worn'
 		if $clothingworntype = 'nude':
 		if $clothingworntype = 'nude':
@@ -140,6 +141,7 @@ end
 if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 	act 'Take a walk along the beach (1:00)':
 	act 'Take a walk along the beach (1:00)':
 		cls
 		cls
+		menu_off = 1
 		minut += 60
 		minut += 60
 		pcs_willpwr += 5
 		pcs_willpwr += 5
 		pcs_mood += 5
 		pcs_mood += 5
@@ -167,6 +169,7 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 	if $clothingworntype ! 'nude' and (pcs_inhib >= 60 or (exhibitionist_lvl > 1 and pcs_horny >= 60)):
 	if $clothingworntype ! 'nude' and (pcs_inhib >= 60 or (exhibitionist_lvl > 1 and pcs_horny >= 60)):
 		act'Strip naked':
 		act'Strip naked':
 			cla
 			cla
+			menu_off = 1
 			minut += 5
 			minut += 5
 			inhib_exp += rand(1,2)
 			inhib_exp += rand(1,2)
 			gs 'underwear', 'remove'
 			gs 'underwear', 'remove'
@@ -182,6 +185,7 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 		act 'Go swim in the lake (1:00)':
 		act 'Go swim in the lake (1:00)':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			pcs_makeup = 1
 			pcs_makeup = 1
 			cumspclnt = 4
 			cumspclnt = 4
 			gs 'cum_cleanup'
 			gs 'cum_cleanup'
@@ -206,6 +210,7 @@ if temper >= 15 and month>=5 and month<=9 and hour>=6 and hour<=20:
 		if sunWeather = 1:
 		if sunWeather = 1:
 			act 'Go sunbathing (1:00)':
 			act 'Go sunbathing (1:00)':
 
 
+				menu_off = 1
 				if $clothingworntype = 'nude' and zoo > 0 and rand(1,10) = 5:
 				if $clothingworntype = 'nude' and zoo > 0 and rand(1,10) = 5:
 					cla
 					cla
 					*clr
 					*clr
@@ -364,6 +369,7 @@ if month = 12 or month = 1 or month = 2:
 		act'Take off your skates':
 		act'Take off your skates':
 			cla
 			cla
 			*clr
 			*clr
+			menu_off = 1
 			minut+=10
 			minut+=10
 			konki_cloth=0
 			konki_cloth=0
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/konki0,1.jpg"></center>'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/konki0,1.jpg"></center>'
@@ -376,6 +382,7 @@ if month = 12 or month = 1 or month = 2:
 			act'Put your skates on':
 			act'Put your skates on':
 				cla
 				cla
 				*clr
 				*clr
+				menu_off = 1
 				minut += 5
 				minut += 5
 				konki_cloth = 1
 				konki_cloth = 1
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/konki0,0.jpg"></center>'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/konki0,0.jpg"></center>'
@@ -393,6 +400,7 @@ $katok_base = {
 	cla
 	cla
 	*clr
 	*clr
 	minut += 3
 	minut += 3
+	menu_off = 1
 	gs'stat'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/katok0,'+rand(0,3)+'.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/katok0,'+rand(0,3)+'.jpg"></center>'
 	'You slowly make your way over to the ice rink, where a lot of people are already skating. Some people are really good at skating and basically fly around the lake on their skates, while others carefully shuffle around, doing their best to just stay on their skates without falling.'
 	'You slowly make your way over to the ice rink, where a lot of people are already skating. Some people are really good at skating and basically fly around the lake on their skates, while others carefully shuffle around, doing their best to just stay on their skates without falling.'
@@ -403,6 +411,7 @@ $katok_base = {
 $katok_start = {
 $katok_start = {
 	cla
 	cla
 	*clr
 	*clr
+	menu_off = 1
 	pcs_willpwr += 5
 	pcs_willpwr += 5
 	fat -= 1
 	fat -= 1
 	pcs_sweat += 10
 	pcs_sweat += 10

+ 2 - 0
locations/gopnew.qsrc

@@ -1,5 +1,7 @@
 # gopnew
 # gopnew
 
 
+menu_off = 1
+
 if $ARGS[0] = 'start':
 if $ARGS[0] = 'start':
 	'<center><b>Alley entrance next to cafe</b></center>'
 	'<center><b>Alley entrance next to cafe</b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street.jpg"></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street.jpg"></center>'

+ 2 - 0
locations/gopnik_house.qsrc

@@ -1,4 +1,6 @@
 # gopnik_house
 # gopnik_house
+
+menu_off = 1
 gs 'stat'
 gs 'stat'
 
 
 if gophouse = 0:
 if gophouse = 0:

+ 2 - 0
locations/gopsex.qsrc

@@ -1,4 +1,6 @@
 # gopsex
 # gopsex
+
+menu_off = 1
 *P ''
 *P ''
 !------------------------------------!
 !------------------------------------!
 ! Different variations of sex -------------!
 ! Different variations of sex -------------!

+ 2 - 0
locations/grandmahelp.qsrc

@@ -1,4 +1,6 @@
 # grandmahelp
 # grandmahelp
+
+menu_off = 1
 gs'stat'
 gs'stat'
 
 
 frost = 0
 frost = 0

+ 2 - 0
locations/grandpahelp.qsrc

@@ -1,4 +1,6 @@
 # grandpahelp
 # grandpahelp
+
+menu_off = 1
 gs'stat'
 gs'stat'
 
 
 '<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
 '<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'

+ 5 - 2
locations/graveyard.qsrc

@@ -1,7 +1,10 @@
 # graveyard
 # graveyard
-$metka = $ARGS[0]
-$loc = $CURLOC
+$metka = ''
+$loc = 'graveyard'
 $location_type = 'secluded'
 $location_type = 'secluded'
+$menu_loc = 'graveyard'
+$menu_arg = ''
+menu_off = 0
 clr
 clr
 gs 'stat'
 gs 'stat'
 '<center><h4>Cemetery</h4></center>'
 '<center><h4>Cemetery</h4></center>'

+ 2 - 0
locations/grigory.qsrc

@@ -3,6 +3,8 @@
 !!npcstatic number = 221
 !!npcstatic number = 221
 !!grigoryEV = relationship - 1 = met - 2 = flirted - 3 = sexual
 !!grigoryEV = relationship - 1 = met - 2 = flirted - 3 = sexual
 
 
+menu_off = 1
+
 if $ARGS[0] = 'dummy':
 if $ARGS[0] = 'dummy':
 	*nl
 	*nl
 	'It is a shortcut out - because this event is not finished, be patient !!!'
 	'It is a shortcut out - because this event is not finished, be patient !!!'

+ 1 - 0
locations/gschool_grounds.qsrc

@@ -41,6 +41,7 @@ if $ARGS[0] = 'main':
 
 
 		act 'Go to your graduation':
 		act 'Go to your graduation':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			miunt += 120
 			miunt += 120
 			SchoolAtestat = 1
 			SchoolAtestat = 1
 			intel_exp += 10
 			intel_exp += 10

+ 6 - 1
locations/gskino.qsrc

@@ -1,6 +1,10 @@
 # gskino
 # gskino
-gs 'stat'
+
 gs 'themes', 'indoors'
 gs 'themes', 'indoors'
+$menu_loc = 'gskino'
+$menu_arg = ''
+menu_off = 0
+gs 'stat'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/theater/kinoteatr.jpg"></center>'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/theater/kinoteatr.jpg"></center>'
 'Small cinema in which there is just one small screen. A movie ticket costs 100 <b>₽</b>.'
 'Small cinema in which there is just one small screen. A movie ticket costs 100 <b>₽</b>.'
 
 
@@ -20,6 +24,7 @@ if money >= 100:
 	act 'Go to the movies':
 	act 'Go to the movies':
 		cla
 		cla
 		*clr
 		*clr
+		menu_off = 1
 		money -= 100
 		money -= 100
 		minut += 120
 		minut += 120
 		pcs_mood += rand(30, 50)
 		pcs_mood += rand(30, 50)

+ 3 - 0
locations/gskver.qsrc

@@ -134,6 +134,7 @@ if $ARGS[0] = 'start':
 	if hour >= 8 and hour < 22:
 	if hour >= 8 and hour < 22:
 		act 'Distribute flyers to earn money (50 <b>₽</b>) (1:00)':
 		act 'Distribute flyers to earn money (50 <b>₽</b>) (1:00)':
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			minut += 60
 			minut += 60
 			money += 50
 			money += 50
 			pcs_mood -= 5
 			pcs_mood -= 5
@@ -160,6 +161,7 @@ if $ARGS[0] = 'start':
 		act 'Flash your tits (0:05)':
 		act 'Flash your tits (0:05)':
 			if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
 			if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			gs 'flash', 'tits', 'outdoors', 5
 			gs 'flash', 'tits', 'outdoors', 5
 			gs 'stat'
 			gs 'stat'
 
 
@@ -173,6 +175,7 @@ if $ARGS[0] = 'start':
 		act 'Flash your pussy (0:05)':
 		act 'Flash your pussy (0:05)':
 			if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
 			if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1'
 			*clr & cla
 			*clr & cla
+			menu_off = 1
 			gs 'flash', 'pussy', 'outdoors', 5
 			gs 'flash', 'pussy', 'outdoors', 5
 			gs 'stat'
 			gs 'stat'
 
 

+ 3 - 0
locations/gtelefon.qsrc

@@ -1,4 +1,7 @@
 # gtelefon
 # gtelefon
+
+
+menu_off = 1
 boyinday[numnpcboy] = daystart
 boyinday[numnpcboy] = daystart
 Gcall = 0
 Gcall = 0
 minut += 3
 minut += 3