[revert] village content commit #51c2ea69 as discussed.

*revert first, so I can merge the new changes easier.

locations/Gaddvor.qsrc

@@ -1,23 +1,17 @@
 # Gaddvor
 
-if $ARGS[0] = '':
-	
+if $ARGS[0]='':
 	music_loop = 0
-	
-	$loc = 'Gaddvor'
 	$metka = ''
+	$loc = 'Gaddvor'
 	$location_type = 'public_outdoors'
-	
 	$menu_loc = 'Gaddvor'
 	$menu_arg = ''
 	menu_off = 0
-	
 	killvar '$locclass'
-	
+	gs 'stat'
 	CLOSE ALL
 	gs 'gadukino_event', 'sound'
-	gs 'stat'
-	
 	clothesAtLocation = FUNC('lost_clothes_here',$CURLOC)
 	if clothesAtLocation = 1:
 		if $clothingworntype = 'nude':
@@ -78,14 +72,15 @@ if $ARGS[0] = '':
 		if meadow > 0 and hour >= 6 and hour < 20 and month >= 4 and month <= 10:act 'Go to the meadow':minut += 20 & gt 'Meadow', 'start'
 		act '<b>Go to Gadukino</b>':minut += 5 & gt 'gadukino'
 
+		!removed from 1.2.5
 		if hour >= 17 and hour < 20:
 			if mitkaday!daystart:'<a href="exec:gt ''mitka''">Mitka</a> is hanging out near the barn in your grandparents'' backyard, he is following you while taking a smoke.'
 		elseif hour >= 20 and sunWeather = 1:
 			'Several <a href="exec:gt ''mitkabuh''">young men</a> are sitting near your grandparents'' backyard, drinking moonshine and talking loudly.'
 		end
-
+		!125s
 		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'] < 10 or npc_QW['A60'] >= 11 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
 			gs 'Miroslava', 'miraclothes'
 			'You went out into the yard and noticed Mira standing there.'
@@ -100,8 +95,9 @@ if $ARGS[0] = '':
 	end
 end
 
-if $ARGS[0] = 'chickens':
+if $ARGS[0]='chickens':
 	*clr & cla
+	menu_off = 0
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/chickens1.jpg"></center>'
 	'Ordinary chickens clucking about their pen.'
 	minut += 1
@@ -124,5 +120,7 @@ if $ARGS[0] = 'chickens':
 	end
 	act 'Leave': gt'Gaddvor'
 end
+!!125e
 
 --- Gaddvor ---------------------------------
+

locations/Meadow.qsrc

@@ -1,100 +1,69 @@
 # Meadow
-
 if $ARGS[0] = 'start' or $ARGS[0] = '':
-	$loc = 'Meadow'
-	$metka = 'start'
 	$location_type = 'secluded'
-	
-	$menu_loc = 'Meadow'
-	$menu_arg = 'start'
-	menu_off = 0
-	
+	$metka = 'start'
+	$loc = 'Meadow'
+
 	gs 'stat'
 
-	!MiraLoc = 0 (Mira at home)
-	!MiraLoc = 1 (Mira at river)
-	!MiraLoc = 2 (Mira at meadow)
-	!MiraLoc = 3 (Mira at forest)
-	!MiraLoc = 4 (Mira at field)
-	!MiraLoc = 5 (Mira with gop)
-	
-	!meadow = 1 'You have found the meadow'
-	!meadow = 2 'Your first visit with Mira'
-	!meadow = 3 'You allowed Mira to come here without you'
-	!meadow = 4 'You have denied Mira from coming here without you. Blocks wish and father events.'
-	!meadow = 5 'You are interested in Mira''s father'
-	!meadow = 6 'You have seduced Mira''s father, now its her turn'
-	
+!MiraLoc = 0 (Mira at home)
+!MiraLoc = 1 (Mira at river)
+!MiraLoc = 2 (Mira at meadow)
+!MiraLoc = 3 (Mira at forest)
+!MiraLoc = 4 (Mira at field)
+!MiraLoc = 5 (Mira with gop)
+
 	'<center><H4>Meadow</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/meadow/meadow1_<<rand(0,5)>>.jpg"></center>'
 	'A quiet and deserted open field of grass and wildflowers in the forest, well hidden from civilization.'
 
-	! mira quest event to find out she broke her promise
-	if (meadow = 3 or meadow = 6) and MiraLoc = 0 and npc_QW['A60'] = 2 and temper >= 10:
-		gt 'Meadow','mira_mitka'
-	! Sveta sympathize/feel bad for Mira watching her here
-	elseif (meadow = 3 or meadow = 6) and MiraLoc = 0 and npc_QW['A60'] = 33 and temper >= 10:
-		gt 'Meadow','mira_gang'
-	! Sveta is the boys slut and so is Mira but not had sex with each other yet
-	elseif npc_QW['A63'] >= 10 and npc_QW['A60'] >= 11 and mirasex = 0:
-		gt 'Meadow','mira_lesb_talk1'
-	! Sveta and Mira are both sluts and there is a chance Mira can force herself on Sveta
-	elseif npc_QW['A63'] >= 10 and npc_QW['A60'] >= 11 and mirasex = 1 and rand(1,5) = 1 and miraday ! daystart:
-		gt 'Meadow','mira_lesb_talk3'
-	! Sveta was not the boys slut before and Mira was and Sveta forced Mira to lick her
-	elseif npc_QW['A63'] >= 10 and npc_QW['A60'] >= 11 and mirasex = 1:
-		gt 'Meadow','mira_lesb_talk2'
-	! Sveta and Mira are both sluts and have had sex with each other already
-	elseif  npc_QW['A63'] >= 10 and npc_QW['A60'] >= 11 and mirasex = 2 and miraday ! daystart:
-		gt 'Meadow','mira_lesb' 
-	end
-	
+	!125s
+	!events trigger before everything
+	if (meadow = 3 or meadow = 6) and MiraLoc = 0 and npc_QW['A60'] = 2 and temper >= 12 and sunWeather = 1:gt 'Meadow','mira_mitka'
+	if (meadow = 3 or meadow = 6) and Mira_no = 0 and MiraLoc = 0 and npc_QW['A60'] = 33 and temper >= 12 and sunWeather = 1:gt 'Meadow','mira_gang'
+	if npc_QW['A63'] > 13 and mirasex = 0 and npc_QW['A60'] > 11:gt 'Meadow','mira_lesb_talk1'
+	if npc_QW['A63'] > 13 and mirasex = 1 and npc_QW['A60'] > 11 and rand(1,5) = 1 and miraday ! daystart:gt 'Meadow','mira_lesb_talk3'
+	if npc_QW['A63'] > 13 and mirasex = 1 and npc_QW['A60'] > 11:gt 'Meadow','mira_lesb_talk2'
+	if mirasex = 2 and rand(1,5) > 3 and miraday ! daystart and npc_rel['A60'] >= 15:gt 'Meadow','mira_lesb'
+	!125e
+
 	if MiraLoc = 2:
 		act 'Talk to Mira': gt 'Meadow', 'Mira'
 		'<a href="exec: gt ''Meadow'', ''Mira''">Mira</a> is in the meadow and is spinning with a delightful smile and laughing.'
 	elseif Mira_no = 0:
-		temp_md = rand(1,16)
-		! Mira is not the boys slut
-		if npc_QW['A60'] < 11 and temper >= 10:
-			if temp_md <= 2:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_alone1''">Mira</a>.'
-			elseif temp_md <= 4:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_alone2''">Mira</a>.'
-			elseif temp_md <= 6:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_mitka1''">Mira with Mitka</a>.'
-			elseif temp_md <= 8:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_mitka2''">Mira with Mitka</a>.'
-			end
-		! Mira is the boys slut
-		elseif npc_QW['A60'] >= 11 and temper >= 10:
-			if temp_md = 1:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_alone1''">Mira</a>.'
-			elseif temp_md = 2:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_alone2''">Mira</a>.'
-			elseif temp_md = 3:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_mitka1''">Mira with Mitka</a>.'
-			elseif temp_md = 4:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_mitka2''">Mira with Mitka</a>.'
-			elseif temp_md = 5:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_kolyamba1''">Mira with Kolyamba</a>.'
-			elseif temp_md = 6:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_vasyan1''">Mira with Vasyan</a>.'
-			elseif temp_md = 7:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_2boys''">Mira with Vasyan and Kolyamba</a>.'
-			elseif temp_md = 8:
-				'In the clearing you notice <a href="exec: gt ''Meadow'', ''mira_3boys''">Mira with Mitka, Vasyan and Kolyamba</a>.'
-			end
+		temp_md = 20
+		if (meadow = 3 or meadow = 6) and sunWeather = 1:temp_md = RAND(0,20)
+		if mirasextimes < 15 and temper >= 12 and temp_md = 0:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''0''">Mira</a>.'
+		elseif npc_QW['A60'] >= 2 and temper >= 15 and temp_md = 1:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''1''">Mira with Mitka</a>.'
+		elseif npc_QW['A60'] >= 8 and temper >= 15 and temp_md = 2:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''2''">Mira with Mitka</a>.'
+		elseif npc_QW['A60'] >= 11 and temper >= 10 and temp_md = 3:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''3''">Mira with Kolyamba</a>.'
+		elseif npc_QW['A60'] >= 11 and temper >= 10 and temp_md = 4:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''4''">Mira with Vasyan</a>.'
+		elseif npc_QW['A60'] >= 11 and temper >= 25 and temp_md = 5:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''5''">Mira with Vasyan</a>.'
+		elseif npc_QW['A60'] >= 11 and temper >= 12 and temp_md = 6:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''6''">Mira with Mitka, Vasyan and Kolyamba</a>.'
+		elseif npc_QW['A60'] >= 20 and temper >= 12 and temp_md = 7:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''7''">Mira with Vasyan and Kolyamba</a>.'
+		elseif npc_QW['A60'] >= 30 and temper >= 20 and temp_md = 8:
+			'In the clearing you notice <a href="exec: gt ''Meadow'', ''8''">A bunch of half-naked hillbilly men</a>.'
+		elseif npc_QW['A60'] >= 20 and temper >= 25 and temp_md = 9:
+			'In a clearing you see <a href="exec: gt ''Meadow'', ''9''">Mira</a>.'
 		end
 	end
 	if sunWeather = 1:
-		if pcs_stam >= 15 or (pcs_stam >= 10 and bookYog + obruch > 0):
+		if pcs_stam >=15 or (pcs_stam >= 10 and bookYog + obruch > 0):
 			if $clothingworntype ! 'exercise' and pcs_inhib < 35 and Miraloc ! 2:
 				'You could do some exercises here if you were wearing <a href="exec: gt ''exercise'', ''workout''">workout clothes</a>.'
 			elseif $clothingworntype ! 'exercise' and $clothingworntype ! 'nude' and pcs_inhib >= 35 and Miraloc ! 2 and temper >= 10:
 				'Your meadow is a perfect place to do some exercises. There is no one around, so you could do it <a href="exec: gs ''clothing'', ''strip'', ''Meadow''& gs ''underwear'', ''remove'' & gt ''exercise'', ''workout'', ''nude'', ''Meadow''">in the nude</a>.'
 			elseif $clothingworntype ! 'exercise' and $clothingworntype = 'nude' and pcs_inhib >= 35 and Miraloc ! 2 and temper >= 10:
 				'Your meadow is a perfect place to do some exercises. There is no one around, so you could do it <a href="exec: gs ''underwear'', ''remove'' & gt ''exercise'', ''workout'', ''nude'', ''Meadow''"> in the nude</a>.'
-			elseif Miraloc = 2 and pcs_inhib <= 40:
+			elseif Miraloc = 2:
 				'It''s a nice day to exercise, but you don''t feel comfortable working out with an audience.'
 			else
 				'Your meadow is a perfect place to do some <a href="exec: gt ''exercise'', ''workout''">exercises</a>.'
@@ -109,12 +78,18 @@ if $ARGS[0] = 'start' or $ARGS[0] = '':
 	act 'Leave':minut += 20 & MiraLoc = 0 & gt 'Gaddvor'
 end
 
+	!meadow = 1 'You have found the meadow'
+	!meadow = 2 'Your first visit with Mira'
+	!meadow = 3 'You allowed Mira to come here without you'
+	!meadow = 4 'You have denied Mira from coming here without you. Kills wish and father events.'
+	!meadow = 5 'You are interested in Mira''s father'
+	!meadow = 6 'You have seduced Mira''s father, now its her turn'
+
 if $ARGS[0] = 'Mira':
 	minut += 2
 	gs 'stat'
-	! first time here with Mira
 	if meadow = 2:
-		gs 'Miroslava', 'miraclothes'
+	gs 'Miroslava', 'miraclothes'
 		'"Wow! This place is awesome. My family and I have only been in the village a few months, but I have never heard anyone ever talk about this place." Mira tells you. "Now I know where I can come to, when I want to be alone. You don''t mind, do you?"'
 		act 'You allow her to come here on her own':
 			*clr & cla
@@ -156,13 +131,353 @@ if $ARGS[0] = 'Mira':
 	elseif MiraLoc = 2:
 		gs 'Miroslava', 'miraclothes'
 		'"What a wonderful place you have found, it''s so comfortable and sunny!"'
-		
-		gt 'Miroslava'
-		
+		if pcs_horny >= 60 and npc_QW['A60'] > 15 and temper >= 20 and sunWeather = 1:
+			act 'Mira, come here and stick that tongue of your in my wet pussy!':
+				*clr & cla
+				if miralick = 0:miralick = 1 & girl += 1
+				! WD: missing horny adjust
+				gs 'stat'
+				if $pantyworntype ! 'none':
+					'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miralick.jpg"></center>'
+					'Mira immediately sits on the grass and waits until you get undressed. Holding out your hand, you throw caution to the winds and push your panties aside, revealing your already dripping snatch...'
+					gs 'arousal', 'foreplay', 5, 'lesbian'
+					gs 'stat'
+					act 'Further':
+						*clr & cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miralick1.jpg"></center>'
+						'You enjoy, Mira''s gentle touch between your legs. She teases you by gently touching your clit...'
+						gs 'arousal', 'vaginal_finger', 5, 'lesbian'
+						gs 'stat'
+						act 'Further':
+							*clr & cla
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miralick2.jpg"></center>'
+							'A couple of minutes later you eagerly get rid of your panties, while Mira lowers her mouth to your pussy and lightly nibbles on your clit, suddenly you are in the midst of an orgasm.'
+							$orgasm_or = 'yes'
+							gs 'arousal', 'cuni', 5, 'lesbian'
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Finish': gt 'Meadow', 'start'
+						end
+					end
+				else
+					act 'Further':
+						*clr & cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miralick2.jpg"></center>'
+						'Mira obediently kneels at your feet and starts licking your clit and fingering your pussy. After a few minutes of this treatment, Mira brings you to a blazing orgasm.'
+						$orgasm_or = 'yes'
+						gs 'arousal', 'cuni', 5, 'lesbian'
+						gs 'arousal', 'vaginal_finger', 5, 'lesbian'
+						minut -= 5
+						gs 'arousal', 'end'
+						gs 'stat'
+						act 'Finish': gt 'Meadow', 'start'
+					end
+				end
+			end
+		end
 		act 'Finish': gt 'Meadow', 'start'
 	end
 end
 
+if $ARGS[0] = '0':
+	if temper < 20:
+		minut += 2
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr.jpg"></center>'
+		'You were about to approach her, but stop as she undoes her pants. You decide to watch to what she does...'
+		act 'Watch':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr1.jpg"></center>'
+			'Mira, pulls up harshly on her panties so that they bite deeply between her labia. Mira looks around again, but you are concealed in the dense thicket thus she fails to spot you watching...'
+			gs 'arousal', 'voyeur', 2, 'lesbian'
+			gs 'stat'
+			act 'Watch':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr2.jpg"></center>'
+				'She pauses for a few seconds before slowly sliding her hand inside her panties to rub her crotch.'
+				gs 'arousal', 'voyeur', 2, 'lesbian'
+				gs 'stat'
+				act 'Watch':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr3.jpg"></center>'
+					'Next she pulls down her panties and you can see her wet pussy.'
+					gs 'arousal', 'voyeur', 1, 'lesbian'
+					gs 'stat'
+					act 'Watch':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr4.jpg"></center>'
+						'Then she removes her jacket, exposing her small tits.'
+						gs 'arousal', 'voyeur', 2, 'lesbian'
+						gs 'stat'
+						act 'Watch':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr5.jpg"></center>'
+							'She begins to fondle her breasts while continuing to finger herself.'
+							gs 'arousal', 'voyeur', 2, 'lesbian'
+							gs 'stat'
+							act 'Watch':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr6.jpg"></center>'
+								'Finally she leans against the nearest tree as she brings herself to orgasm. You watch a couple minutes in hopes of a sequel, but Mira begins to get dressed, so, you decide to make a hasty retreat...'
+								gs 'arousal', 'voyeur', 10, 'lesbian'
+								gs 'arousal', 'end'
+								gs 'stat'
+								act 'Leave':minut += 30 & gt 'gadukino'
+							end
+						end
+					end
+				end
+			end
+		end
+	elseif temper < 25:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr7.jpg"></center>'
+		'Mira is leaning against a tree and starts to caress herself.'
+		gs 'arousal', 'voyeur', 2, 'lesbian'
+		gs 'stat'
+		act 'Watch':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr8.jpg"></center>'
+			'She plays with herself for a few minutes before she stopping to look at a nearby log...'
+			gs 'arousal', 'voyeur', 5, 'lesbian'
+			gs 'stat'
+			act 'Watch':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr9.jpg"></center>'
+				'Having made her decision, she walk over to the log and starts to remove her panties.'
+				gs 'arousal', 'voyeur', 2, 'lesbian'
+				gs 'stat'
+				act 'Watch':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr10.jpg"></center>'
+					'Taking off her panties, she gently sits down on the log...'
+					gs 'arousal', 'voyeur', 1, 'lesbian'
+					gs 'stat'
+					act 'Watch':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr11.jpg"></center>'
+						'Mira begins to caress herself again and brings herself to orgasm... You watch a couple minutes in hopes of a sequel, but Mira begins to get dressed, so, you decide to make a hasty retreat...'
+						gs 'arousal', 'voyeur', 10, 'lesbian'
+						gs 'arousal', 'end'
+						gs 'stat'
+						act 'Leave':minut += 30 & gt 'gadukino'
+					end
+				end
+			end
+		end
+	else
+		minut += 2
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr12.jpg"></center>'
+		'You see Mira standing on a tree stump with a hand in her pants and her tits exposed enjoying the cool breeze.'
+		act 'Watch':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr13.jpg"></center>'
+			'She soon gets bored and she, as if on purpose, turns her ass towards you and pulls off her skirt.'
+			gs 'arousal', 'voyeur', 2, 'lesbian'
+			gs 'stat'
+			act 'Watch':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr14.jpg"></center>'
+				'After doing this, she sits down on the stump and continues to caress herself.'
+				gs 'arousal', 'voyeur', 5, 'lesbian'
+				gs 'stat'
+				act 'Watch':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr15.jpg"></center>'
+					'Getting up from the stump, Mira takes off her top and is now only in her panties.'
+					gs 'arousal', 'voyeur', 1, 'lesbian'
+					gs 'stat'
+					act 'Watch':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr16.jpg"></center>'
+						'Finally she takes off her shirt, squats, and brings herself to orgasm. You watch a couple minutes in hopes of a sequel, but Mira begins to get dressed, so, you decide to make a hasty retreat...'
+						gs 'arousal', 'voyeur', 10, 'lesbian'
+						gs 'arousal', 'end'
+						gs 'stat'
+						act 'Leave':minut += 30 & gt 'gadukino'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = '1':
+	minut += 2
+	pcs_horny += 15
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex.jpg"></center>'
+	'You see Mira and Mitka talking to each other. You can''t hear what they are saying from this far away, but they begin to undress in your meadow.'
+	act 'Watch':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex1.jpg"></center>'
+		'Mira lies before Mitka on the bedspread and opens her legs invitingly in front of him. Mitka wastes no time and immediately starts roughly fucking her pussy.'
+		gs 'arousal', 'voyeur', 15
+		gs 'stat'
+		act 'Watch':
+			*clr & cla
+			if npc_QW['A60'] = 2:npc_QW['A60'] = 3
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex2.jpg"></center>'
+			'Fifteen minutes Mitka finally cums in Mira and leaves. Mira cleans up and then leaves as well.'
+			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':minut += 30 & gt 'gadukino'
+		end
+	end
+end
+
+if $ARGS[0] = '2':
+	temp_md = RAND(0,1)
+	if temp_md = 0:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal.jpg"></center>'
+		'You see Mira lower her ass onto Mitka''s member and begin to bounce on top of him. You can hear the sound everytime her butt cheeks hit his thighs...'
+		gs 'arousal', 'voyeur', 2
+		gs 'stat'
+	else
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal1.jpg"></center>'
+		'Mira get down on all fours and spreads her ass cheeks wide apart.She moans loudly as Mitka drives his cock into her ass.'
+		gs 'arousal', 'voyeur', 2
+		gs 'stat'
+	end
+	act 'Watch':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal2.jpg"></center>'
+		'After a couple of minutes Mitka slaps her ass and pulls out of Mira. She gets up on her knees before him and sticks her tongue out as his warm cum shoots all over her face.'
+		gs 'arousal', 'voyeur', 10
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt 'gadukino'
+	end
+end
+
+if $ARGS[0] = '3':
+	if temper < 15:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj.jpg"></center>'
+		'She enthusiastically sucks his cock and takes his whole member down her throat...'
+		gs 'arousal', 'voyeur', 2
+		gs 'stat'
+		act 'Watch':
+			*clr & cla
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj1.jpg"></center>'
+			'But, apparently, you''re a little late, because after a couple minutes Kolyamba puts a hand on the back of Mira''s head and holds her while he cums down her throat. At first she gags, but eventually obediently swallows his cum...'
+			gs 'arousal', 'voyeur', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':minut += 30 & gt 'gadukino'
+		end
+	else
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj2.jpg"></center>'
+		'All Mira has on is some flip-flops with her face in the ground and her ass in the air. She''s moaning loudly as Kolyamba pounds her pussy and cums inside of her...'
+		gs 'arousal', 'voyeur', 10
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt 'gadukino'
+	end
+end
+
+if $ARGS[0] = '4' or $ARGS[0] = '5':
+	if temper < 12:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj5.jpg"></center>'
+		'Mira is tied to a tree as Vasyan enthusiastically drives his cock in her mouth. She gags and coughs, but at the same time, she moves her head farther down his member. After a couple of minutes Vasyan tilts back his head and with a blissful roar cums in her mouth...'
+		gs 'arousal', 'voyeur', 5
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt 'gadukino'
+	elseif temper >= 12 and temper < 15:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj3.jpg"></center>'
+		'They are both completely naked and Mira is sticking her ass up in the air as she deepthroats Vasyan. After a couple of minutes you see Mira gulp down his sperm without even removing her mouth from his cock.'
+		gs 'arousal', 'voyeur', 5
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt 'gadukino'
+	elseif temper >= 15 and temper < 20:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj4.jpg"></center>'
+		'They are both completely naked and Mira squeals with joy as she rides on Vasyan''s member. He does not last long and cums all over her butt as soon as he pulls out of her.'
+		gs 'arousal', 'voyeur', 5
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt 'gadukino'
+	elseif temper >= 20:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj6.jpg"></center>'
+		'Mira is completely naked and bent over in front of Vasyan. She is really enjoying it as he thrusts into her ass. After a few minutes he pulls out and sprays cum all over back.'
+		gs 'arousal', 'voyeur', 5
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt 'gadukino'
+	end
+end
+
+! WD: No exit and does nothing
+!{
+if $ARGS[0] = '5':
+	if (meadow = 3 or meadow = 6) and MiraLoc = 0 and npc_QW['A60'] >= 11 and temper >= 25 and sunWeather = 1 and temp_md = 5:
+		*clr & cla
+		minut += 5
+		pcs_horny += 20
+		gs 'stat'
+	end
+end
+}!
+
+if $ARGS[0] = '6':
+	if temper < 20:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj7.jpg"></center>'
+		'Mira is kneeling in between the three friends and sucking their cocks with great pleasure. They are all crowded around her so you can''t make out who is in her mouth, who is grabbing her tits, and who is getting a handjob.'
+		gs 'arousal', 'voyeur', 15
+	else
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj8.jpg"></center>'
+		'Mira is kneeling in between the three friends and sucking their cocks with great pleasure. They are all crowded around her so you can''t make out who is in her mouth, who is grabbing her tits, and who is getting a handjob.'
+		gs 'arousal', 'voyeur', 5
+	end
+	gs 'arousal', 'end'
+	gs 'stat'
+	act 'Leave':minut += 30 & gt 'gadukino'
+end
+
+if $ARGS[0] = '7':
+	npc_QW['A60'] += 1
+	if temper < 15:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj11.jpg"></center>'
+		'Mira squats in front of one of the boys and takes his cock in her mouth while another gets ready for his turn.'
+		gs 'arousal', 'voyeur', 15
+	elseif temper >= 15 and temper < 25:
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj10.jpg"></center>'
+		'Two boys are fucking Mira in her mouth and pussy at the same time. The whole time they are laughing and talking while Mira moans in between them... Fifteen minutes later they finish with her and leave.'
+		gs 'arousal', 'voyeur', 15
+	else
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj9.jpg"></center>'
+		'Mira and the two boys she is with are all naked. She is sucking one of them while another plays with her breasts and pusy from behind.'
+		gs 'arousal', 'voyeur', 15
+	end
+	gs 'arousal', 'end'
+	gs 'stat'
+	act 'Leave':minut += 30 & gt 'gadukino'
+end
+
+if $ARGS[0] = '8':
+	npc_QW['A60'] += 1
+	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj12.jpg"></center>'
+	'Mira is almost invisible with all the bodies around her. You can only see her naked ass and feet swaying in the air. You spend half an hour watching, as the men take turns fucking Mira until she is all tired out. You get bored watching them and leave.'
+	gs 'arousal', 'voyeur', 30
+	gs 'arousal', 'end'
+	gs 'stat'
+	act 'Leave':minut += 30 & gt 'gadukino'
+end
+
+if $ARGS[0] = '9':
+	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadows.jpg"></center>'
+	'You see Mira on all fours with her back to you. She is shoving an ear of corn in her ass which looks painful but she is still moaning.'
+	gs 'arousal', 'voyeur', 30
+	gs 'arousal', 'end'
+	gs 'stat'
+	act 'Leave':minut += 30 & gt 'gadukino'
+end
+
+!125s
+!from 1.2.5 [Meadow_events]
 if $ARGS[0] = 'mira_mitka':
 	minut += 5
 	pcs_horny += 15
@@ -189,14 +504,23 @@ if $ARGS[0] = 'mira_mitka':
 	end
 end
 
+if $ARGS[0] = 'mira_gang':
+	npc_QW['A60'] = 31
+	mirasextimes += 1
+
+	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj12.jpg"></center>'
+	'Mira is almost invisible with all the bodies around her. You can only see her naked ass and feet swaying in the air. You spend half an hour watching, as the men take turns fucking Mira until she is all tired out. You get bored watching them and leave.'
+	gs 'arousal', 'voyeur', 30
+	gs 'arousal', 'end'
+	gs 'stat'
+	act 'Go':minut += 30 & gt'Gaddvor'
+end
+
 if $ARGS[0] = 'miraperversion11':
 	minut += 5
 	pcs_horny += 10
 	npc_QW['A60'] = 12
 	gs 'stat'
-	
-	gs 'Miroslava', 'miraclothes'
-	
 	'You don''t know where to begin, so you stay silent just staring at Mira. Mira at the same time is looking at her feet and blushing hard.'
 	'Finally you gather your wits and ask what happened last night? Mira, still not looking you in the eye, stammers out that she doesn''t know why she did it. She says that she was out of control.'
 	'But you were also drunk, and did not do what she did. Her face sinks with shame and she continues to look at the ground.'
@@ -205,18 +529,6 @@ if $ARGS[0] = 'miraperversion11':
 	act 'Leave': gt $loc, $metka
 end
 
-if $ARGS[0] = 'mira_gang':
-	npc_QW['A60'] = 31
-	mirasextimes += 1
-
-	'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj12.jpg"></center>'
-	'Mira is almost invisible with all the bodies around her. You can only see her naked ass and feet swaying in the air. You spend half an hour watching, as the men take turns fucking Mira until she is all tired out. You get bored watching them and leave.'
-	gs 'arousal', 'voyeur', 30
-	gs 'arousal', 'end'
-	gs 'stat'
-	act 'Go':minut += 30 & gt'Gaddvor'
-end
-
 if $ARGS[0] = 'lesb_mira':
 	miraday = daystart
 	mirahorny = rand(0,80)
@@ -325,7 +637,7 @@ if $ARGS[0] = 'mira_lesb_talk1':
 	'" - Well, yeah so?"'
 	'" - I was thinking you served all the boys and forgot about your best friend." Mira said looking you in the eye.'
 	if lesbian = 0:
-		'" - So you''re not a guy. Do you want to do that?," - you say surprised'
+		'" - So you''re not a guy. Do you want to do that?," - you.say surprised'
 		'" - Everyone knows girls know the best ways to pleasure girls," she answered you.'
 	else
 		'You already guessed where she was going with this, but still hesitated.'
@@ -369,9 +681,8 @@ if $ARGS[0] = 'mira_lesb_talk2':
 	mirasex = 2
 	mirahorny = rand(0,80)
 	gs 'stat'
-	
-	'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_lesb_talk2.jpg"></center>'
-	'Mira walks up to you with a malicious smile on her face.'
+
+	'Mira walks up toyou with a malicious smile on her face.'
 	' - Well, <<$pcs_nickname>>, congratulations, she said. - You are now the same whore as me. All the boys fucked you too.'
 	'You tried to keep silent, but she is not satisfied.'
 	' - So did they or did they not?, - she insists on an answer.'
@@ -411,7 +722,6 @@ if $ARGS[0] = 'mira_lesb_talk4':
 	mirahorny = rand(40,80)
 	miraday = daystart
 	gs 'stat'
-	
 	gs 'Miroslava', 'miraclothes'
 
 	'Walking through the village you meet Mira. Seeing you, she immediately came up to you with an excited face.'
@@ -423,12 +733,14 @@ if $ARGS[0] = 'mira_lesb_talk4':
 	act 'Lick Mira':gt 'mirasex','lickmira_first'
 end
 
-
-if $ARGS[0] = 'mira_alone1':
-	if temper < 20:
+if $ARGS[0] = 'mirameadow':
+	minut += 2
+	gs 'stat'
+	if (meadow = 3 or meadow = 6) and MiraLoc = 0 and mirasextimes < 15 and temper >= 12 and temper < 20 and sunWeather = 1 and temp_md = 0:
+		*clr & cla
 		minut += 2
 		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr.jpg"></center>'
-		'You were about to approach her, but stop as she undoes her pants. You decide to watch to what she does...'
+		'You are about to approach her, but stop as she undoes her pants. You decide to watch to what she does...'
 		act 'Watch':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr1.jpg"></center>'
@@ -466,14 +778,15 @@ if $ARGS[0] = 'mira_alone1':
 								gs 'arousal', 'voyeur', 10, 'lesbian'
 								gs 'arousal', 'end'
 								gs 'stat'
-								act 'Leave':minut += 30 & gt 'gadukino'
+								act 'Leave':minut += 30 & gt'Gaddvor'
 							end
 						end
 					end
 				end
 			end
 		end
-	elseif temper < 25:
+	elseif meadow = 3 and MiraLoc = 0 and mirasextimes < 15 and temper >= 20 and temper < 25 and sunWeather = 1 and temp_md = 0:
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr7.jpg"></center>'
 		'Mira is leaning against a tree and starts to caress herself.'
 		gs 'arousal', 'voyeur', 2, 'lesbian'
@@ -503,12 +816,13 @@ if $ARGS[0] = 'mira_alone1':
 						gs 'arousal', 'voyeur', 10, 'lesbian'
 						gs 'arousal', 'end'
 						gs 'stat'
-						act 'Leave':minut += 30 & gt 'gadukino'
+						act 'Leave':minut += 30 & gt'Gaddvor'
 					end
 				end
 			end
 		end
-	else
+	elseif meadow = 3 and MiraLoc = 0 and mirasextimes < 15 and temper >= 25 and sunWeather = 1 and temp_md = 0:
+		*clr & cla
 		minut += 2
 		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowmastr12.jpg"></center>'
 		'You see Mira standing on a tree stump with a hand in her pants and her tits exposed enjoying the cool breeze.'
@@ -537,164 +851,192 @@ if $ARGS[0] = 'mira_alone1':
 						gs 'arousal', 'voyeur', 10, 'lesbian'
 						gs 'arousal', 'end'
 						gs 'stat'
-						act 'Leave':minut += 30 & gt 'gadukino'
+						act 'Leave':minut += 30 & gt'Gaddvor'
 					end
 				end
 			end
 		end
 	end
-end
-
-if $ARGS[0] = 'mira_alone2':
-	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadows.jpg"></center>'
-	'You see Mira on all fours with her back to you. She is shoving an ear of corn in her ass which looks painful but she is still moaning.'
-	gs 'arousal', 'voyeur', 30
-	gs 'arousal', 'end'
-	gs 'stat'
-	act 'Leave':minut += 30 & gt 'gadukino'
-end
-
-if $ARGS[0] = 'mira_mitka1':
-	minut += 2
-	pcs_horny += 15
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex.jpg"></center>'
-	'You see Mira and Mitka talking to each other. You can''t hear what they are saying from this far away, but they begin to undress in your meadow.'
-	act 'Watch':
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 2 and temper >= 15 and sunWeather = 1 and temp_md = 1:
 		*clr & cla
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex1.jpg"></center>'
-		'Mira lies before Mitka on the bedspread and opens her legs invitingly in front of him. Mitka wastes no time and immediately starts roughly fucking her pussy.'
-		gs 'arousal', 'voyeur', 15
+		minut += 2
+		pcs_horny += 15
 		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex.jpg"></center>'
+		'You see Mira and Mitka talking to each other. You can''t hear what they are saying from this far away, but they begin to undress in your meadow.'
 		act 'Watch':
 			*clr & cla
-			if npc_QW['A60'] = 2:npc_QW['A60'] = 3
-			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex2.jpg"></center>'
-			'Fifteen minutes Mitka finally cums in Mira and leaves. Mira cleans up and then leaves as well.'
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex1.jpg"></center>'
+			'Mira lies before Mitka on the bedspread and opens her legs invitingly in front of him. Mitka wastes no time and immediately starts roughly fucking her pussy.'
 			gs 'arousal', 'voyeur', 5
-			gs 'arousal', 'end'
 			gs 'stat'
-			act 'Leave':minut += 30 & gt 'gadukino'
+			act 'Watch':
+				*clr & cla
+				if npc_QW['A60'] = 2:npc_QW['A60'] = 3
+				mirasextimes += 1
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadowsex2.jpg"></center>'
+				'Fifteen minutes Mitka finally cums in Mira and leaves. Mira cleans up and then leaves as well.'
+				gs 'arousal', 'voyeur', 5
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Leave':minut += 30 & gt'Gaddvor'
+			end
 		end
 	end
-end
-
-if $ARGS[0] = 'mira_mitka2':
-	temp_md = RAND(0,1)
-	if temp_md = 0:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal.jpg"></center>'
-		'You see Mira lower her ass onto Mitka''s member and begin to bounce on top of him. You can hear the sound everytime her butt cheeks hit his thighs...'
-		gs 'arousal', 'voyeur', 2
-		gs 'stat'
-	else
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal1.jpg"></center>'
-		'Mira get down on all fours and spreads her ass cheeks wide apart.She moans loudly as Mitka drives his cock into her ass.'
-		gs 'arousal', 'voyeur', 2
-		gs 'stat'
-	end
-	act 'Watch':
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 8 and temper >= 15 and sunWeather = 1 and temp_md = 2:
 		*clr & cla
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal2.jpg"></center>'
-		'After a couple of minutes Mitka slaps her ass and pulls out of Mira. She gets up on her knees before him and sticks her tongue out as his warm cum shoots all over her face.'
-		gs 'arousal', 'voyeur', 10
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Leave':minut += 30 & gt 'gadukino'
-	end
-end
-
-if $ARGS[0] = 'mira_kolyamba1':
-	if temper < 15:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj.jpg"></center>'
-		'She enthusiastically sucks his cock and takes his whole member down her throat...'
-		gs 'arousal', 'voyeur', 2
+		temp_md = RAND(0,1)
 		gs 'stat'
+		if temp_md = 0:
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal.jpg"></center>'
+			'You see Mira lower her ass onto Mitka''s member and begin to bounce on top of him. You can hear the sound everytime her butt cheeks hit his thighs...'
+			gs 'arousal', 'voyeur', 2
+			gs 'stat'
+		else
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal1.jpg"></center>'
+			'Mira get down on all fours and spreads her ass cheeks wide apart.She moans loudly as Mitka drives his cock into her ass.'
+			gs 'arousal', 'voyeur', 2
+			gs 'stat'
+		end
 		act 'Watch':
 			*clr & cla
+			mirasextimes += 1
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowanal2.jpg"></center>'
+			'After a couple of minutes Mitka slaps her ass and pulls out of Mira. She gets up on her knees before him and sticks her tongue out as his warm cum shoots all over her face.'
+			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'end'
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj1.jpg"></center>'
-			'But, apparently, you''re a little late, because after a couple minutes Kolyamba puts a hand on the back of Mira''s head and holds her while he cums down her throat. At first she gags, but eventually obediently swallows his cum...'
+			act 'Leave':minut += 30 & gt'Gaddvor'
+		end
+	end
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 11 and temper >= 15 and sunWeather = 1 and temp_md = 3:
+		*clr & cla
+		if temper < 15:
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj.jpg"></center>'
+			'She enthusiastically sucks his cock and takes his whole member down her throat...'
 			gs 'arousal', 'voyeur', 2
+			gs 'stat'
+			act 'Watch':
+				*clr & cla
+				mirasextimes += 1
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj1.jpg"></center>'
+				'But, apparently, you''re a little late, because after a couple minutes Kolyamba puts a hand on the back of Mira''s head and holds her while he cums down her throat. At first she gags, but eventually obediently swallows his cum...'
+				gs 'arousal', 'voyeur', 5
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Leave':minut += 30 & gt'Gaddvor'
+			end
+		else
+			*clr & cla
+			mirasextimes += 1
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj2.jpg"></center>'
+			'All Mira has on is some flip-flops with her face in the ground and her ass in the air. She''s moaning loudly as Kolyamba pounds her pussy and cums inside of her...'
+			gs 'arousal', 'voyeur', 5
 			gs 'arousal', 'end'
 			gs 'stat'
-			act 'Leave':minut += 30 & gt 'gadukino'
+			act 'Leave':minut += 30 & gt'Gaddvor'
 		end
-	else
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj2.jpg"></center>'
-		'All Mira has on is some flip-flops with her face in the ground and her ass in the air. She''s moaning loudly as Kolyamba pounds her pussy and cums inside of her...'
-		gs 'arousal', 'voyeur', 10
-		gs 'arousal', 'end'
+	end
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 11 and temper >= 15 and sunWeather = 1 and temp_md = 4:
+		*clr & cla
 		gs 'stat'
-		act 'Leave':minut += 30 & gt 'gadukino'
+		if temper < 20:
+			mirasextimes += 1
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj5.jpg"></center>'
+			'Mira is tied to a tree as Vasyan enthusiastically drives his cock in her mouth. She gags and coughs, but at the same time, she moves her head farther down his member. After a couple of minutes Vasyan tilts back his head and with a blissful roar cums in her mouth...'
+			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':minut += 30 & gt'Gaddvor'
+		else
+			mirasextimes += 1
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj6.jpg"></center>'
+			'Mira is completely naked and bent over in front of Vasyan. She is really enjoying it as he thrusts into her ass. After a few minutes he pulls out and sprays cum all over back.'
+			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':minut += 30 & gt'Gaddvor'
+		end
 	end
-end
-
-if $ARGS[0] = 'mira_vasyan1':
-	if temper < 12:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj5.jpg"></center>'
-		'Mira is tied to a tree as Vasyan enthusiastically drives his cock in her mouth. She gags and coughs, but at the same time, she moves her head farther down his member. After a couple of minutes Vasyan tilts back his head and with a blissful roar cums in her mouth...'
-		gs 'arousal', 'voyeur', 5
-		gs 'arousal', 'end'
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 11 and temper >= 15 and sunWeather = 1 and temp_md = 5:
+		*clr & cla
 		gs 'stat'
-		act 'Leave':minut += 30 & gt 'gadukino'
-	elseif temper >= 12 and temper < 15:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj3.jpg"></center>'
-		'They are both completely naked and Mira is sticking her ass up in the air as she deepthroats Vasyan. After a couple of minutes you see Mira gulp down his sperm without even removing her mouth from his cock.'
-		gs 'arousal', 'voyeur', 5
+		if temper < 20:
+			mirasextimes += 1
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj3.jpg"></center>'
+			'They are both completely naked and Mira is sticking her ass up in the air as she deepthroats Vasyan. After a couple of minutes you see Mira gulp down his sperm without even removing her mouth from his cock.'
+			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':minut += 30 & gt'Gaddvor'
+		else
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj4.jpg"></center>'
+			'They are both completely naked and Mira squeals with joy as she rides on Vasyan''s member. He does not last long and cums all over her butt as soon as he pulls out of her.'
+			gs 'arousal', 'voyeur', 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':minut += 30 & gt'Gaddvor'
+		end
+	end
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 11 and temper >= 15 and sunWeather = 1 and temp_md = 6:
+		*clr & cla
+		mirasextimes += 1
+		if temper < 20:
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj7.jpg"></center>'
+			'Mira is kneeling in between the three friends and sucking their cocks with great pleasure. They are all crowded around her so you can''t make out who is in her mouth, who is grabbing her tits, and who is getting a handjob.'
+			gs 'arousal', 'voyeur', 5
+		else
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj8.jpg"></center>'
+			'Mira is kneeling in between the three friends and sucking their cocks with great pleasure. They are all crowded around her so you can''t make out who is in her mouth, who is grabbing her tits, and who is getting a handjob.'
+			gs 'arousal', 'voyeur', 5
+		end
 		gs 'arousal', 'end'
 		gs 'stat'
-		act 'Leave':minut += 30 & gt 'gadukino'
-	elseif temper >= 15 and temper < 20:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj4.jpg"></center>'
-		'They are both completely naked and Mira squeals with joy as she rides on Vasyan''s member. He does not last long and cums all over her butt as soon as he pulls out of her.'
-		gs 'arousal', 'voyeur', 5
+		act 'Leave':minut += 30 & gt'Gaddvor'
+	end
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 11 and temper >= 15 and sunWeather = 1 and temp_md = 7:
+		*clr & cla
+		if npc_QW['A60'] < 20: npc_QW['A60'] += 1
+		if temper < 20:
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj11.jpg"></center>'
+			'Mira squats in front of one of the boys and takes his cock in her mouth while another gets ready for his turn.'
+			gs 'arousal', 'voyeur', 5
+		elseif temper >= 20 and temper < 25:
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj10.jpg"></center>'
+			'Two boys are fucking Mira in her mouth and pussy at the same time. The whole time they are laughing and talking while Mira moans in between them... Fifteen minutes later they finish with her and leave.'
+			gs 'arousal', 'voyeur', 5
+		else
+			'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj9.jpg"></center>'
+			'Mira and the two boys she is with are all naked. She is sucking one of them while another plays with her breasts and pussy from behind.'
+			gs 'arousal', 'voyeur', 5
+		end
 		gs 'arousal', 'end'
 		gs 'stat'
-		act 'Leave':minut += 30 & gt 'gadukino'
-	elseif temper >= 20:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj6.jpg"></center>'
-		'Mira is completely naked and bent over in front of Vasyan. She is really enjoying it as he thrusts into her ass. After a few minutes he pulls out and sprays cum all over back.'
-		gs 'arousal', 'voyeur', 5
+		act 'Leave':minut += 30 & gt'Gaddvor'
+	end
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] > 30 and temper >= 15 and sunWeather = 1 and temp_md = 8:
+		*clr & cla
+		npc_QW['A60'] += 1
+		mirasextimes += 1
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj12.jpg"></center>'
+		'Mira is almost invisible with all the bodies around her. You can only see her naked ass and feet swaying in the air. You spend half an hour watching, as the men take turns fucking Mira until she is all tired out. You get bored watching them and leave.'
+		gs 'arousal', 'voyeur', 30
 		gs 'arousal', 'end'
 		gs 'stat'
-		act 'Leave':minut += 30 & gt 'gadukino'
+		act 'Leave':minut += 30 & gt'Gaddvor'
 	end
-end
-
-if $ARGS[0] = 'mira_2boys':
-	npc_QW['A60'] += 1
-	if temper < 15:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj11.jpg"></center>'
-		'Mira squats in front of one of the boys and takes his cock in her mouth while another gets ready for his turn.'
-		gs 'arousal', 'voyeur', 15
-	elseif temper >= 15 and temper < 25:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj10.jpg"></center>'
-		'Two boys are fucking Mira in her mouth and pussy at the same time. The whole time they are laughing and talking while Mira moans in between them... Fifteen minutes later they finish with her and leave.'
-		gs 'arousal', 'voyeur', 15
-	else
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj9.jpg"></center>'
-		'Mira and the two boys she is with are all naked. She is sucking one of them while another plays with her breasts and pusy from behind.'
-		gs 'arousal', 'voyeur', 15
+	if meadow = 3 and MiraLoc = 0 and npc_QW['A60'] >= 20 and temper >= 15 and sunWeather = 1 and temp_md = 9:
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/village/mira/mirameadows.jpg"></center>'
+		'You see Mira on all fours with her back to you. She is shoving an ear of corn in her ass which looks painful but she is still moaning.'
+		gs 'arousal', 'voyeur', 10
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 30 & gt'Gaddvor'
 	end
-	gs 'arousal', 'end'
-	gs 'stat'
-	act 'Leave':minut += 30 & gt 'gadukino'
 end
 
-if $ARGS[0] = 'mira_3boys':
-	if temper < 20:
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj7.jpg"></center>'
-		'Mira is kneeling in between the three friends and sucking their cocks with great pleasure. They are all crowded around her so you can''t make out who is in her mouth, who is grabbing her tits, and who is getting a handjob.'
-		gs 'arousal', 'voyeur', 15
-	else
-		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirameadowbj8.jpg"></center>'
-		'Mira is kneeling in between the three friends and sucking their cocks with great pleasure. They are all crowded around her so you can''t make out who is in her mouth, who is grabbing her tits, and who is getting a handjob.'
-		gs 'arousal', 'voyeur', 5
-	end
-	gs 'arousal', 'end'
-	gs 'stat'
-	act 'Leave':minut += 30 & gt 'gadukino'
-end
+!125e
 
 --- Meadow ---------------------------------
 

locations/MiroslavaHome.qsrc

@@ -1,23 +1,17 @@
 # MiroslavaHome
 
 if $ARGS[0] = 'start':
-	$loc = 'MiroslavaHome'
-	$metka = 'start'
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	$location_type = 'public_outdoors'
-	
-	$menu_loc = 'MiroslavaHome'
-	$menu_arg = 'start'
-	menu_off = 0
-	
 	*clr & cla
 	minut += 5
 	mira_temp = rand(0,15)
 	gs 'stat'
-	
 	'<center><h2>Gadukino Village</h2></center>'
 	'<center><b>Mira''s Yard</b></center>'
 
-	!!MiraLoc tells us where Mira is Located
+	!!MiaLoc tells us where Mira is Located
 	!!----------------------------------------------
 	!!MiraLoc = 0 (Mira at home)
 	!!MiraLoc = 1 (Mira at river)
@@ -48,115 +42,37 @@ if $ARGS[0] = 'start':
 			gs'stat'
 
 			act 'Further':gt 'miroslavahome', 'start'
-		elseif npc_QW['A60'] = 15 and temper >= 10 and sunWeather = 1 and miraprost = 0:
+		elseif temper >= 15 and sunWeather = 1 and npc_QW['A60'] = 7 and hour >= 8 and hour <= 18:
 			*clr & cla
 			'<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...'
+			'Entering the courtyard, you notice Mira, working in the garden. She is bent over and, to your amazement, you see her bare naked crotch...'
+			MiraLoc = 0
 
-			act 'You approach slowly':
+			act 'Approach it':
 				*clr & cla
+				gs 'Miroslava', 'miraclothes'
+				'You quietly sneak up to her, but she notices you and turns around, immediately blushing rapidly. You a couple seconds of silently staring at her, and then unceremoniously asked why she without panties. Miroslav took the eye, with rumpled feet and legs, explaining that it turned out very hot, so she... You remind her about the second wish and ask to sit down. Miroslav reluctantly agrees, and when he sits down, you tell her, she`ll show you the crotch, you bad considered. The girl mumbles something unintelligible, but then for half a minute lifts up her skirt and gives you a good look at my crotch.'
+				npc_rel['A60'] = 1
 				minut += 15
 				gs 'stat'
 
-				gs 'Miroslava', 'miraclothes'
-
-				'You quietly sneak up to her, but she notices your approach and turns around, her hands pull her skirt back into place, blushing. You stare at her for a few seconds silently, and then ask, "Why don''t you have any panties on?" Mira, her eyes darting about, shifting her weight from foot to foot, explaining hesitantly, "Well what happened is, well it''s very hot and I thought it would feel better without panties." You interrupt her with an upraised hand as you get an idea for your second wish... You remind her she still owes you two wishes and you''re ready to collect your second wish. You tell Mira to sit down and she reluctantly agrees. When she is finally sitting, you order her to show you her pussy. Mira grumbles and glares at you, but eventually sighs and slowly lifts up her skirt, giving you a good look at her crotch.'
 				act 'Watch':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2.jpg"></center>'
-					'You enjoy the view, then snap your fingers as an amazing idea comes to mind for your second wish. Mira says she thought her second wish was over, but you wouldn''t make it that easy. You ask if she is thinking about backing out of granting your wishes, but Mira says no, she will go through with them. You smile and tell her to follow you.'
-					gs 'arousal', 'voyeur', 2, 'exhibitionism', 'lesbian', 'dom'
+					'You enjoy the view, then you have a crazy idea, and you decide to make a second wish. Mira sadly said that she thought this was your second wish, but you answer that you just could not resist, after which you ask her to follow you.'
+					pcs_horny += 15
+					minut += 15
 					gs 'stat'
 
-					act 'Lead her to the road':
+					act 'Go out on the road':
 						*clr & cla
-						minut += 45
-						pcs_dom += 2
 						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2_1.jpg"></center>'
-						'You lead her out to the main road. You tell Mira, that she is to pose as a prostitute and attempt to get a customer or two. This is your second wish. You want Mira to become a prostitute and fulfill the desires of anyone who asks for her services. Mira looks shocked but nods that she will do it, Mira looks around the area and seeing no one else watching begins to pose by the roadside for passing cars...'
+						'Out on the road you say, "Mira, pose as a prostitute, this will be the second wish." Mira sadly nods her head, looks around and seeing that the street was quiet, fulfills your desire...'
+						minut += 15
+						npc_QW['A60'] = 8
 						gs 'stat'
 
-						act 'Wait for a car...':
-							*clr & cla
-							minut += 30
-							pcs_horny += 20
-							miraprost += 1
-							npc_QW['A60'] = 16
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
-							'It isn''t long before Mira''s first customer pulls up in a nice vehicle. She takes a deep breath, looks you in the eyes, winks and approaches the vehicle and starts talking to the driver.'
-							'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle. It pulls away, but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
-							gs 'stat'
-
-							act 'Watch her with the customer':
-								if rand(0,1) = 0:
-									*clr & cla
-									'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1.mp4"></video></center>'
-									'You walk up and look into the car. You see Mira giving one hell of a blowjob to her first customer. Her head is bobbing up and down on his 17cm cock.'
-									gs 'arousal', 'voyeur', 5, 'exhibitionism', 'prostitution'
-									gs 'stat'
-
-									act 'Continue':
-										*clr & cla
-										minut += 10
-										'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_1.mp4"></video></center>'
-										'You duck for cover as the guy suddenly gets out of the car and opens the passenger door, grabs Mira''s head and starts forcing his cock deep into her throat.'
-										gs 'stat'
-
-										act 'Continue':
-											*clr & cla
-											minut += 10
-											'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
-											'Eventually, the guy grunts and cums all over Mira''s face and into her mouth. The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
-											gs 'stat'
-
-											act 'Continue':
-												*clr & cla
-												minut += 10
-												'<center><img <<$set_imgh>> src="images/characters/village/mira/miramoney.jpg"></center>'
-												'Mira walks back towards town counting the money he gave her as she absentmindedly licks the cum as it drips down her face. She smiles at you and shows you the money as you join her.'
-												gs 'arousal', 'end'
-												gs 'stat'
-
-												act 'Return to the village': miraloc = 0 & gt 'gadukino'
-											end
-										end
-									end
-								else
-									*clr & cla
-									'<center><video autoplay loop src="images/characters/village/mira/miraprost2.mp4"></video></center>'
-									'You walk up and look into the van. You see Mira showing her first customer her tits and rubbing her pussy. You see a hungry gleam in the guy''s eyes, which Mira returns right back.'
-									gs 'arousal', 'voyeur', 20, 'exhibitionism', 'prostitution'
-									gs 'stat'
-
-									act 'Continue':
-										*clr & cla
-										'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_1.mp4"></video></center>'
-										'Mira and the guy jump into the back of the van and you watch as he starts fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial ecstasy, partial pain, you know the guy is hitting or entering her cervix.'
-										gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
-										gs 'stat'
-
-										act 'Continue':
-											*clr & cla
-											'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
-											'You have to duck behind some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
-											gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
-											gs 'stat'
-
-											act 'Continue':
-												*clr & cla
-												minut += 10
-												'<left><video autoplay loop src="images/locations/gadukino/sex/mira/miracumpump.mp4"></video></left>''<right><video autoplay loop src="images/locations/gadukino/sex/mira/miracumdump.mp4"></video></right>'
-												'After the wild sex, Mira and the guy sit in the van and talk for a bit. He gives her a nice wad of cash and she starts walking to the village. Seeing you, she smiles and says thanks.'
-												gs 'arousal', 'end'
-												gs 'stat'
-
-												act 'Return to the village': miraloc = 0 & gt 'gadukino'
-											end
-										end
-									end
-								end
-							end
-						end
+						act 'Go back to the village':gt'gadukino'
 					end
 				end
 			end
@@ -180,13 +96,13 @@ if $ARGS[0] = 'start':
 				'Near the house <a href="exec: gt ''mirafather'' ">Afanasiy</a> is working.'
 			end
 			if month >= 5 and month <= 9 and hour >= 18 and hour <= 21 and rand(0,30) >= 28:'You hear a motorcycle in the village. <a href="exec: gt ''miroslavahome'', ''mirabrother''">Miras brother</a> has come in from the city to visit his siblings and father.'
-			if MiraLoc > 0 and npc_QW['A60'] > 15:
+			if MiraLoc > 0 and npc_QW['A60'] > 30:
 				act 'Check on Mira':
 					*clr & cla
 					minut += 2
 					gs 'stat'
 					'Mira isn''t home.'
-					if miraprost > 0 and month >= 5 and month <= 9 and hour >= 18:
+					if miraprost > 0 and month >= 5 and month <= 9 and hour >= 18 and hour >= 0 and rand(0,5) >= 4:
 						'You think you know where to find her. Ever since granting your second wish Mira has been earning money as a prostitute on the highway.'
 						act 'Go to the highway': gt 'gadprostitutes','start'
 					else
@@ -195,7 +111,7 @@ if $ARGS[0] = 'start':
 					act 'Leave': gt 'gadukino'
 				end
 			end
-
+!!125s
 			act 'Ask for Mira':
 				if mira_temp >= 10 and sunWeather = 1 and temper >= 15 and hour < 20 and Mira_no = 0:
 					*clr & cla
@@ -225,7 +141,7 @@ if $ARGS[0] = 'start':
 		end
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome.jpg"></center>'
-		if hour > 22 or hour < 3: 'It''s too late, most of Mira''s family is asleep, no need to wake them up unnecessarily.' else 'It''s too early, most of Mira''s family is still asleep, no need to wake them up unnecessarily.'
+		if hour > 22 or hour < 3: 'It''s late, most of Mira''s family is asleep, no need to them up unnecessarily.' else 'It''s too early, most of Mira''s family is still asleep, no need to wake people up unnecessarily.'
 		act 'Leave': gt 'gadukino'
 	end
 end
@@ -386,3 +302,4 @@ if $ARGS[0] = 'mirabrother':
 end
 
 --- MiroslavaHome ---------------------------------
+

locations/gadfield.qsrc

@@ -1,24 +1,10 @@
 # gadfield
 
-!MiraLoc tells us where Mira is Located
-!----------------------------------------------
-!MiraLoc = 0 (Mira at home)
-!MiraLoc = 1 (Mira at river)
-!MiraLoc = 2 (Mira at meadow)
-!MiraLoc = 3 (Mira at forest)
-!MiraLoc = 4 (Mira at field)
-!MiraLoc = 5 (Mira with gop)
-!---------------------------------------------
+$metka = $ARGS[0]
+$loc = 'gadfield'
 
 if $ARGS[0] = 'field':
-	$loc = 'gadfield'
-	$metka = 'field'
 	$location_type = 'secluded'
-	
-	$menu_loc = 'gadfield'
-	$menu_arg = 'field'
-	menu_off = 0
-	
 	gs 'gadukino_event', 'sound'
 	gs'stat'
 
@@ -38,8 +24,8 @@ if $ARGS[0] = 'field':
 		end
 	end
 
-	'A field outside the village.'
 	
+	'A field outside the village.'
 	if hour >= 9 and hour <= 19 and week < 6:'Grandfather''s horse <a href="exec: gt ''gadfield'',''horse''">Desperado</a> is grazing the field.'
 	if hour >= 9 and hour <= 19 and graze_cow = 0:'You see <a href="exec: gt ''gadfield'',''cow''">a herd of cows</a> in the middle of the field.'
 	if hour >= 6 and hour <= 20 and graze_cow = 1:'You notice <a href="exec: gt ''gadfield'',''cow''">a herd of cows</a>.'
@@ -47,13 +33,12 @@ if $ARGS[0] = 'field':
 
 	if hour >= 7 and hour <= 20 and haying_time = 1:
 		act 'Go to the hayfield':
-			gs 'food', 'm_meal'
+			gs 'food', 'm_meal'&!use current one, *clr & cla will clear messages
 			*clr & cla
-			
 			if npc_rel['A60'] >= 15:
-				npc_rel['A60'] += 5
+				npc_rel['A60'] += 1
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/haying_time_mira.jpg"></center>'
-				'Most of the village has shown up to help out with the hay. You and Mira also partake in the activities. You are really enjoying yourself, especially considering you''re spending time, sitting on the fresh cut hay, talking to Mira.'
+				'Most of the village has shown up to help out with the hay. You and Mira also partake in the activities. You are really enjoying yourself, especially considering you spending time, sitting on the fresh cut hay, talking to Mira.'
 			else
 				fat -= 5
 				stren_exp += 1
@@ -63,14 +48,13 @@ if $ARGS[0] = 'field':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/haying_time.jpg"></center>'
 				'Almost all of the villagers have shown up to help out with the fresh cut hay. You decide to join them.'
 			end
-			
 			minut += 360
 			grandmahelp += 1
 			haying_time = 0
-			hndiwrk_exp += rand(1,3) 
+			hndiwrk_exp += rand(0,2) 
 			gs 'stat'
-			
-			act 'Continue':gt'gadfield','field'
+
+			act 'Further':gt'gadfield','field'
 		end
 	end
 
@@ -78,14 +62,6 @@ if $ARGS[0] = 'field':
 end
 
 if $ARGS[0] = 'horse':
-	$loc = 'gadfield'
-	$metka = 'horse'
-	$location_type = 'public_outdoors'
-	
-	$menu_loc = 'gadfield'
-	$menu_arg = 'horse'
-	menu_off = 0
-	
 	gs 'gadukino_event', 'sound'
 	gs'stat'
 
@@ -98,45 +74,23 @@ if $ARGS[0] = 'horse':
 			'<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.'
 			minut += 60
-			grandmahelp += 1
-			hndiwrk_exp += rand(1,3) 
+			grandmahelp += rand(0,1)
+			hndiwrk_exp += rand(0,3) 
 			gs 'stat'
 
 			act 'Go back to your grandparent''s barn':gt'Gadsarai'
 		end
 	end
-	act 'Go back to the field':gt'gadfield','field'
+	act 'Back':gt'gadfield','field'
 end
 
 if $ARGS[0] = 'cow':
-	$loc = 'gadfield'
-	$metka = 'cow'
-	$location_type = 'secluded'
-	
-	$menu_loc = 'gadfield'
-	$menu_arg = 'cow'
-	menu_off = 0
-	
 	gs 'gadukino_event', 'sound'
+	temp = rand(1,5)
 	gs'stat'
-	
+
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow.jpg"></center>'
-	'The herd of cows is standing in the middle of the field.'
-	
-	temp = rand(1,5)
-	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'] < 10 or npc_QW['A60'] >= 11 or mirasex > 1):
-		*clr & cla
-		'<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.'
-		'" - Hi, <<$pcs_nickname>>. I wanted to visit you and brought water with me," she says nearing you. " - Have you missed me?"'
-		minut += 5
-		npc_rel['A60'] += 1
-		mira = 1
-		gs 'stat'
-
-		act 'Continue':pcs_hydra +=40 & gt'gadfield','cow'
-	end
-	
+	'The cow herd is standing in the middle of the field.'
 	if mira = 1: MiraLoc = 41 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is standing next to you.'
 
 	if hour = 19 and graze_cow = 0:
@@ -145,10 +99,10 @@ if $ARGS[0] = 'cow':
 			'<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...'
 			minut += 60
-			grandmahelp += 1
-			hndiwrk_exp += rand(1,3) 
+			grandmahelp += rand(0,1)
+			hndiwrk_exp += rand(0,3) 
 			gs 'stat'
-			
+
 			act 'Go back to your grandparent''s barn':gt'Gadsarai'
 		end
 	end
@@ -159,36 +113,33 @@ if $ARGS[0] = 'cow':
 				'<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 = 1:'Some time flies by while waiting for the locals and their children to finish their gathering.'
-				
 				if hour >= 9:minut += 20
 				if hour < 9:minut += 60
-				hndiwrk_exp += rand(1,3) 
+				hndiwrk_exp += rand(0,4) 
 				gs 'stat'
-				
-				act 'Continue':gt'gadfield','cow'
+
+				act 'Further':gt'gadfield','cow'
 			end
-		elseif hour >= 10 and hour < 13:
+		end
+		if hour >= 10 and hour < 13:
 			act 'Herd cows with your grandfather (1:00)':
 				*clr & cla
 				'<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.'
-				
 				minut += 60
 				if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 				graze_cow_exp = 1
 				grandmahelp += 1
-				hndiwrk_exp += rand(1,3) 
+				hndiwrk_exp += rand(0,3) 
 				gs 'stat'
 
-				act 'Continue':gt'gadfield','cow'
+				act 'Further':gt'gadfield','cow'
 			end
-			
 			if mira = 0:
 				act 'Take a run on the field (1:00)':
 					*clr & cla
 					'<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.'
-					
 					frost = 0
 					minut += 60
 					fat -= 5
@@ -198,27 +149,52 @@ if $ARGS[0] = 'cow':
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 24
 					gs 'stat'
 
-					act 'Continue':gt'gadfield','cow'
+					act 'Further':gt'gadfield','cow'
+				end
+			end
+			if temper >= 15 and sunWeather = 1 and mira = 0:
+				act 'Tan (1:00)':
+					*clr & cla
+					'<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.'
+					minut += 60
+					pcs_mood += 10
+					pcs_tan += 1
+					pcs_sweat += 10
+					gs 'stat'
+
+					act 'Further':gt'gadfield','cow'
 				end
 				if pcs_sleep < 40:
 					act 'Take a nap (1:00)':
 						*clr & cla
 						'<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.'
-						
 						minut += 60
 						pcs_mood += 10
 						pcs_sleep+= 9
 						if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 						gs 'stat'
 
-						act 'Continue':gt'gadfield','cow'
+						act 'Further':gt'gadfield','cow'
 					end
 				end
+				act 'Pick flowers (1:00)':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
+					'You spend an hour wandering the field, picking flowers.'
+					minut += 60
+					pcs_mood += 20
+					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
+					gs 'stat'
+
+					act 'Further':gt'gadfield','cow'
+				end
 				act 'Read a book (1:00)':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
-					
+					minut += 60
+					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 					if pcs_nerd > 0:
 						lastread = totminut
 						lastreadday = daystart
@@ -233,76 +209,60 @@ if $ARGS[0] = 'cow':
 						pcs_mood += 10
 						'While reading the book, time flies by cause you are really engaged in the books'' plot.'
 					end
-					minut += 60
-					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 					gs 'stat'
-					
+
 					act 'Close the book':gt $loc, $metka
 				end
-				if temper >= 10 and sunWeather = 1:
-					act 'Tan (1:00)':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
-						'It''s really warm and sunny outside so you decide to sunbathe for an hour.'
-						minut += 60
-						pcs_mood += 10
-						pcs_tan += 1
-						pcs_sweat += 10
-						gs 'stat'
-						
-						act 'Continue':gt'gadfield','cow'
-					end
-					act 'Pick flowers (1:00)':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
-						'You spend an hour wandering the field, picking flowers.'
-						
-						minut += 60
-						pcs_mood += 20
-						if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
-						gs 'stat'
-						
-						act 'Continue':gt'gadfield','cow'
-					end
-				end
 			end
-		elseif hour >= 13 and hour < 16:
+		end
+		if hour >= 13 and hour < 16:
 			*clr & cla
 			'<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.'
-			
 			if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 			grandmahelp += 1
 			minut += 60
 			hndiwrk_exp += rand(0,3) 
 			gs 'stat'
-			
-			act 'Herd the cows towards the river':gt'gadfield','cow2'
+
+			act 'Further':gt'gadfield','cow2'
 		end
 	end
-	
-	if graze_cow = 0:act 'Go back to the field':gt'gadfield','field'
+	if graze_cow = 0:act 'Back':gt'gadfield','field'
+end
+
+!MiaLoc tells us where Mira is Located
+!----------------------------------------------
+!MiraLoc = 0 (Mira at home)
+!MiraLoc = 1 (Mira at river)
+!MiraLoc = 2 (Mira at meadow)
+!MiraLoc = 3 (Mira at forest)
+!MiraLoc = 4 (Mira at field)
+!MiraLoc = 5 (Mira with gop)
+!---------------------------------------------
+
+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
+	'<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.'
+	'" - Hi, <<$pcs_nickname>>. I wanted to visit you and brought water with me," she says nearing you. " - Have you missed me?"'
+	minut += 5
+	npc_rel['A60'] += 1
+	mira = 1
+	gs 'stat'
+
+	act 'Further':pcs_hydra +=40 & gt'gadfield','cow'
 end
 
 if $ARGS[0] = 'cow2':
-	$loc = 'gadfield'
-	$metka = 'cow2'
-	$location_type = 'secluded'
-	
-	$menu_loc = 'gadfield'
-	$menu_arg = 'cow2'
-	menu_off = 0
-	
 	gs 'gadukino_event', 'sound'
 	gs'stat'
 
 	'<center><H4>River</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_river.jpg"></center>'
-	
 	'The cow herd is standing by the river.'
-	
-	if mira = 1: MiraLoc = 42 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'
-	if temper >= 15 and sunWeather = 1:'- "You can go for a swim while there is time, <<$pcs_nickname>>. I`ll keep an eye on the herd," said your grandfather.'
+	if mira = 1: MiraLoc = 42 & 'S<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'
+	if temper >= 15 and sunWeather = 1:'- "You can go for a swim while there is time, <<$pcs_nickname>>. I`ll keep an eye on the herd," said you grandpa.'
 
 	if graze_cow = 1:
 		if hour < 16:
@@ -314,35 +274,12 @@ if $ARGS[0] = 'cow2':
 				if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 				grandmahelp += 1
 				graze_cow_exp = 1
-				hndiwrk_exp += rand(1,3) 
-				gs 'stat'
-
-				act 'Continue':gt'gadfield','cow2'
-			end
-			act 'Read a book (1:00)':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
-				minut += 60
-				if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
-				if pcs_nerd > 0:
-					lastread = totminut
-					lastreadday = daystart
-					pcs_nerd += 1
-					blizoruk += 1
-					pcs_mood = 100
-					if pcs_stren > 1: stren_deg -= 1
-					if pcs_vital > 5: vital_deg -= 1
-					'You start reading a book you brought with you. You are so engrossed in the story you forget about the time.'
-				else
-					blizoruk += 1
-					pcs_mood += 10
-					'While reading the book, time flies by cause you are really engaged in the books'' plot.'
-				end
+				hndiwrk_exp += rand(0,3) 
 				gs 'stat'
 
-				act 'Close the book':gt $loc, $metka
+				act 'Further':gt'gadfield','cow2'
 			end
-			if temper >= 10 and sunWeather = 1 and mira = 0:
+			if temper >= 15 and sunWeather = 1 and mira = 0:
 				act 'Swim (0:15)':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river.jpg"></center>'
@@ -355,7 +292,7 @@ if $ARGS[0] = 'cow2':
 					if pcs_stren < 30:stren_exp += 1
 					gs 'stat'
 
-					act 'Continue':gt'gadfield','cow2'
+					act 'Further':gt'gadfield','cow2'
 				end
 				act 'Tan (0:30)':
 					*clr & cla
@@ -367,41 +304,56 @@ if $ARGS[0] = 'cow2':
 					pcs_tan += 1
 					gs 'stat'
 
-					act 'Continue':gt'gadfield','cow2'
+					act 'Further':gt'gadfield','cow2'
+				end
+				act 'Read a book (1:00)':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_book'+rand(1,2)+'.jpg"></center>'
+					minut += 60
+					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
+					if pcs_nerd > 0:
+						lastread = totminut
+						lastreadday = daystart
+						pcs_nerd += 1
+						blizoruk += 1
+						pcs_mood = 100
+						if pcs_stren > 1: stren_deg -= 1
+						if pcs_vital > 5: vital_deg -= 1
+						'You start reading a book you brought with you. You are so engrossed in the story you forget about the time.'
+					else
+						blizoruk += 1
+						pcs_mood += 10
+						'While reading the book, time flies by cause you are really engaged in the books'' plot.'
+					end
+					gs 'stat'
+
+					act 'Close the book':gt $loc, $metka
 				end
 			end
-		elseif hour >= 16 and hour < 19:
+		end
+		if hour >= 16 and hour < 19:
 			*clr & cla
 			'<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.'
 			grandmahelp += 1
 			if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 			minut += 60
-			hndiwrk_exp += rand(1,3) 
+			hndiwrk_exp += rand(0,3) 
 			gs 'stat'
 
-			act 'Herd the cows towards the forest':gt'gadfield','cow3'
+			act 'Further':gt'gadfield','cow3'
 		end
 	end
 end
 
+
 if $ARGS[0] = 'cow3':
-	$loc = 'gadfield'
-	$metka = 'cow3'
-	$location_type = 'secluded'
-	
-	$menu_loc = 'gadfield'
-	$menu_arg = 'cow3'
-	menu_off = 0
-	
 	gs 'gadukino_event', 'sound'
 	gs'stat'
 
 	'<center><H4>Field near the forest</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/cow_forest.jpg"></center>'
-	
 	'The cow herd is standing on a field near the forest.'
-	
 	if mira = 1: MiraLoc = 43 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'
 
 	if graze_cow = 1:
@@ -414,10 +366,10 @@ if $ARGS[0] = 'cow3':
 				if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 				grandmahelp += 1
 				graze_cow_exp = 1
-				hndiwrk_exp += rand(1,3) 
+				hndiwrk_exp += rand(0,3) 
 				gs 'stat'
 
-				act 'Continue':gt'gadfield','cow3'
+				act 'Further':gt'gadfield','cow3'
 			end
 			if mira = 0:
 				act 'Take a run (1:00)':
@@ -433,6 +385,31 @@ if $ARGS[0] = 'cow3':
 					if temper >= 25 and sunWeather = 1:pcs_hydra -= 24
 					gs 'stat'
 
+					act 'Further':gt'gadfield','cow3'
+				end
+			end
+			if temper >= 15 and sunWeather = 1 and mira = 0:
+				act 'Pick flowers (1:00)':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
+					'You spent an hour wandering around the field, picking flowers.'
+					minut += 60
+					pcs_mood += 20
+					if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
+					gs 'stat'
+
+					act 'Further':gt'gadfield','cow3'
+				end
+				act 'Tan (1:00)':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
+					'You sunbathe for an hour.'
+					minut += 60
+					pcs_mood += 10
+					pcs_tan += 1
+					pcs_sweat += 10
+					gs 'stat'
+
 					act 'Further':gt'gadfield','cow3'
 				end
 				if pcs_sleep < 40:
@@ -472,44 +449,18 @@ if $ARGS[0] = 'cow3':
 
 					act 'Close the book':gt $loc, $metka
 				end
-				if temper >= 10 and sunWeather = 1
-					act 'Tan (1:00)':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_sun.jpg"></center>'
-						'You sunbathe for an hour.'
-						minut += 60
-						pcs_mood += 10
-						pcs_tan += 1
-						pcs_sweat += 10
-						gs 'stat'
-
-						act 'Further':gt'gadfield','cow3'
-					end
-					act 'Pick flowers (1:00)':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_flowers.jpg"></center>'
-						'You spent an hour wandering around the field, picking flowers.'
-						minut += 60
-						pcs_mood += 20
-						if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
-						gs 'stat'
-
-						act 'Further':gt'gadfield','cow3'
-					end
-				end
 			end
-		elseif hour >= 19:
+		end
+		if hour >= 19:
 			*clr & cla
-			
 			'<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 up and gather up the cows and rush them towards the village. You are barely keeping up with the herd.'
 			if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
 			minut += 60
 			mira = 0
 			graze_cow = 0
 			grandmahelp += 1
-			hndiwrk_exp += rand(1,3) 
+			hndiwrk_exp += rand(0,3) 
 			gs 'stat'
 
 			act 'Go back to the village':gt'gadukino'
@@ -518,3 +469,4 @@ if $ARGS[0] = 'cow3':
 end
 
 --- gadfield ---------------------------------
+

locations/gadforest.qsrc

@@ -1,155 +1,98 @@
 # gadforest
 
-!MiraLoc tells us where Mira is Located
-!----------------------------------------------
-!MiraLoc = 0 (Mira at home)
-!MiraLoc = 1 (Mira at river)
-!MiraLoc = 2 (Mira at meadow)
-!MiraLoc = 3 (Mira at forest)
-!MiraLoc = 4 (Mira at field)
-!MiraLoc = 5 (Mira with gop)
-!---------------------------------------------
-	
 if $ARGS[0] = '1':
-	! figure out if Sveta came from Mira code or not. events play out differently whether with Mira or not
 	PC_arrive = iif($loc ! 'Miroslava', 1 , 0)
-
-	! edge of forest
-	$loc = 'gadforest'	
-	$metka = '1'
-	$location_type = 'secluded'	
-	$menu_loc = 'gadforest'
-	$menu_arg = '1'
-	menu_off = 0
+	!out skirt
+	$location_type = 'secluded'
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	clothesAtLocation = FUNC('lost_clothes_here',$CURLOC)
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
 	*clr & cla
-	
-	! Add to knowledge of forest
+	gs'stat'
+	!gs'time'
+
+	!MiaLoc tells us where Mira is Located
+	!----------------------------------------------
+	!MiraLoc = 0 (Mira at home)
+	!MiraLoc = 1 (Mira at river)
+	!MiraLoc = 2 (Mira at meadow)
+	!MiraLoc = 3 (Mira at forest)
+	!MiraLoc = 4 (Mira at field)
+	!MiraLoc = 5 (Mira with gop)
+	!---------------------------------------------
+
 	if goforest < 20:goforest += rand(0,1)
-	! chance to get lost
-	lostrand = rand(1,20)
-	! Determine where Sveta got lost in the forest
 	lost = 1
-	! chance to rip clothes
-	riprand = rand(1,10)
+	!to determine the continuation of the way if he got lost
+	lostrand = rand(1,30)
+	!the chance to get lost
 	foresteventrand = rand(1,20)
 	new_boletus = 0
 	new_bilberry = 0
 
-	'<center><H4>Edge of the Forest</H4></center>'
+	'<center><H4>Forest</H4></center>'
 	if month >= 4 and month <= 10:
 		if hour >= 6 and hour < 22:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest1.jpg"></center>'
-			'Your are at the edge of the forest. Mushrooms and berries grow here and you can often find other people picking them.'
+			'The edge of the forest. There are a few mushrooms and you can often see mushroom pickers.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_night1.jpg"></center>'
-			'You are at the edge of the forest. Night in the woods is scary and uncomfortable.'
+			'The edge of the forest. Night in the woods is scary and uncomfortable.'
 		end
 	else
 		if hour >= 8 and hour < 18:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter1.jpg"></center>'
-			'You are at the edge of the forest. The forest in winter is very beautiful.'
+			'The edge of the forest. The forest in the winter is very beautiful.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter_night1.jpg"></center>'
-			'You are at the edge of the forest. Night in the forest during wintertime is very scary and uncomfortable.'
+			'The edge of the forest. Night in the winter forest is very scary and uncomfortable.'
 		end
 	end
-	
 	if forestpicnic = 1:'On the edge of the forest you see people. Apparently they are having a family <a href="exec:gt ''gadforest_event'',''picnic''">picnic</a>.'
-	if MiraLoc = 3:'Nearby is <a href="exec: gt ''Miroslava'' ">Mira</a>.'
-	if clothesAtLocation = 1:'Your clothes are nearby on the ground.'
-	if findvel = 2:'Leaning up against a tree is your old <a href="exec:gt ''bicycle'',''forest''">bike</a>.'
-	if goforest < 20:'You don''t know this part of the forest very well, it''s best if you don''t go any deeper into the woods.'
-	if riprand >= 10: gs 'gadforest', 'torncloth'
-	
-	! Sveta arrive without Mira events
+	if MiraLoc = 3:'Near you wandering in the forest is <a href="exec: gt ''Miroslava'' ">Mira</a>.'
+	if clothesAtLocation = 1:'On the ground lay your clothes.'
+	if findvel = 2:'Near the tree is your old <a href="exec:gt ''bicycle'',''forest''">bike</a>.'
+	if goforest < 10:'You don''t know this forest very well, it''s best if you don''t wander too far.'
+
 	if PC_arrive = 1:
-		! Mira nude event can be done alone as well
-		if temper >= 10 and hour >= 6 and hour <= 20 and miratalkforest = 1 and miraforestday ! daystart and MiraLoc ! 3:act 'Try walking naked in the forest': gt 'gadforest_event', 'nude_event'
-		if temper >= 10 and hour >= 6 and hour <= 20 and miratalkforest = 1 and miraforestday ! daystart and MiraLoc = 3:act 'Mira suggests walking naked in the forest': gt 'gadforest_event', 'nude_event'
-		! Mushroom and berry events
-		if foresteventrand <= 2 and month >= 6 and month <= 9 and mushroom_pickersday ! daystart:mushroom_pickers = 1 & gt'gadforest_event', 'mushroom_pickers1'
-		if foresteventrand <= 4 and month >= 6 and month <= 9 and mushroom_pickersday ! daystart: gt 'gadforest_event', 'mushroom_pickers2'
-		! Picnic event
-		if foresteventrand = 5 and month >= 5 and month <= 9 and temper >= 30 and sunWeather = 1 and week > 5 and forestpicnic = 0: forestpicnic = 1 & gt 'gadforest_event', 'picnic'
-		! Mitka, Kolyamba, Vasyan events
-		if hour > 8 and hour < 20 and month >= 4 and month <= 10:
-			if foresteventrand <= 8:
-				if mitkaday ! daystart: 
-					gt 'gadforest_event', 'gopforest_mitka'
-				elseif kolyambaday ! daystart:
-					gt 'gadforest_event', 'gopforest_kolyamba'
-				elseif vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_vasyan'
-				end
-			elseif foresteventrand <=9:
-				if mitkaday ! daystart and kolyambaday ! daystart:
-					gt 'gadforest_event', 'gopforest_2boys', '4'
-				elseif mitkaday ! daystart and vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_2boys', '5'
-				elseif kolyambaday ! daystart and vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_2boys', '6'
-				elseif mitkaday ! daystart:
-					gt 'gadforest_event', 'gopforest_mitka'
-				elseif kolyambaday ! daystart:
-					gt 'gadforest_event', 'gopforest_kolyamba'
-				elseif vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_vasyan'
-				end
-			elseif foresteventrand <= 10:
-				if mitkaday ! daystart and kolyambaday ! daystart and vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_3boys'
-				elseif mitkaday ! daystart and kolyambaday ! daystart:
-					gt 'gadforest_event', 'gopforest_2boys', '4'
-				elseif mitkaday ! daystart and vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_2boys', '5'
-				elseif kolyambaday ! daystart and vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_2boys', '6'
-				elseif mitkaday ! daystart:
-					gt 'gadforest_event', 'gopforest_mitka'
-				elseif kolyambaday ! daystart:
-					gt 'gadforest_event', 'gopforest_kolyamba'
-				elseif vasyanday ! daystart:
-					gt 'gadforest_event', 'gopforest_vasyan'
-				end
-			end
-		end
+		if temper >= 15 and sunWeather = 1 and hour>=6 and hour<=20 and miratalkforest = 1:gt 'gadforest_event', 'nude_event'
+		if foresteventrand < 3 and month >= 6 and month <= 9 and mushroom_pickersday ! daystart:mushroom_pickers = 1 & gt'gadforest_event', 'mushroom_pickers1'
+		if foresteventrand = 3 and month >= 5 and month <= 9 and temper >= 15 and sunWeather = 1 and week > 5 and forestpicnic = 0: forestpicnic = 1 & gt 'gadforest_event', 'picnic'
+		if foresteventrand = 4 and month >= 6 and month <= 9: gt 'gadforest_event', 'mushroom_pickers2'
+		if foresteventrand = 5 and hour >= 8 and hour <= 15 and month >= 4 and month <= 10 and gadboyday ! daystart and week <= 5: gt 'gadforest_event', 'gopforest_mitka'
+		if foresteventrand = 6 and hour >= 8 and hour <= 18 and month >= 4 and month <= 10 and gadboyday ! daystart and week <= 5: gt 'gadforest_event', 'gopforest_kolyamba'
+		if foresteventrand = 7 and hour >= 8 and hour <= 18 and month >= 4 and month <= 10 and gadboyday ! daystart and week <= 5: gt 'gadforest_event', 'gopforest_vasyan'
+		if foresteventrand = 8 and hour >= 8 and hour <= 15 and month >= 4 and month <= 10 and gadboyday ! daystart and week > 5: gt 'gadforest_event', 'gopforest_2boys'
+		if foresteventrand = 9 and hour >= 8 and hour <= 15 and month >= 4 and month <= 10 and gadboyday ! daystart and week > 5: gt 'gadforest_event', 'gopforest_3boys'
 	end
 
-	! can only be naked if successfully complete Mira gadforest_event, nude_event
-	if $clothingworntype ! 'nude' and clothesAtLocation = 0 and temper >= 10 and hour >= 6 and hour <= 20 and miratalkforest > 1 and MiraLoc ! 3 and (pcs_inhib > 50 or exhibitionist_lvl > 1):
+	if $clothingworntype ! 'nude' and clothesAtLocation = 0 and temper >= 15 and sunWeather = 1 and hour>=6 and hour<=20 and miratalkforest > 1 and MiraLoc ! 3 and (inhib > 50 or exhibitionist_lvl > 1):
 		act'Strip naked':
 			if forestpicnic = 0:
+				inhib_exp += rand(1,3)
 				cla
 				*clr
-				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/nudeforest1.'+rand(1,2)+'.jpg"></center>'
 				gs 'underwear', 'remove'
 				gs 'clothing', 'strip', 'gadforest'
-				gs 'exhibitionism', 3
-				gs 'stat'
-				
 				'You don''t hesitate and quickly get undressed, your clothes are left laying in a pile.'
 
-				act'Continue':gt'gadforest','1'
+				act'Back':gt'gadforest','1'
 			else
 				cla
 				*clr
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/noundress.jpg"></center>'
-				'You see a number of people nearby and decide not to undress right now.'
+				'You see a number of people you are ashamed of.'
 
-				act'Continue':gt'gadforest','1'
+				act'Back':gt'gadforest','1'
 			end
 		end
 	end
-	
 	if clothesAtLocation = 1 and $clothingworntype = 'nude':
-		act 'Get dressed':
+		act 'Dress':
 			cla
 			*clr
 			minut += 5
@@ -157,42 +100,40 @@ if $ARGS[0] = '1':
 			gs 'underwear', 'wear'
 			gs 'clothing', 'recover_lost_clothes', 'gadforest', 1
 			gs 'stat'
-			
-			gt 'gadforest','1'
+			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/nudeforest1.'+rand(1,2)+'.jpg"></center>'
+			'You change back into your clothes.'
+			act 'Back': gt 'gadforest','1'
 		end
 	end
-	
-	! if Sveta left the forest without retrieving her clothes
+	!if he had gone from the forest and put in another place
 	if clothesAtLocation = 1 and $clothingworntype ! 'nude':
 		if $clothingworntype = 'cheap' and clothingwornnumber = 414:
 			act 'Pick up the abandoned clothing':
 				cla
 				minut += 2
 				gs 'clothing', 'swamp_clothes', 0
-				gs 'underwear', 'wear'
 				gs 'clothing', 'recover_lost_clothes', 'gadforest', 1
 				gs 'stat'
 				*nl
 				'You pick up your abandoned clothing and change out of the hessian sack the hunters gave you.'
-				gt 'gadforest','1'
+				act 'Back': gt 'gadforest','1'
 			end
 		else
 			act 'Pick up the abandoned clothing':
 				cla
 				minut += 5
 				gs 'clothing', 'swamp_clothes', 0
-				gs 'underwear', 'wear'
 				gs 'clothing', 'recover_lost_clothes', 'gadforest'
 				gs 'stat'
 				*nl
 				'You pick up your abandoned clothing.'
-				gt 'gadforest','1'
+				act 'Back': gt 'gadforest','1'
 			end
 		end
 	end
-	
-	if hour >= 6 and hour <= 20:
-		act 'Go for a walk in the woods':
+	if hour >= 6 and hour <= 20 and sunWeather = 1:
+		act 'Walking in the woods':
 			cla
 			*clr
 			minut += 60
@@ -210,7 +151,7 @@ if $ARGS[0] = '1':
 					if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and $pantyworntype ! 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest1.'+rand(1,3)+'.jpg"></center>'
 					if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and $pantyworntype = 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest_tanga0.'+rand(1,2)+'.jpg"></center>'
 					if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest_nude0.'+rand(1,4)+'.jpg"></center>'
-					'You are walk through the woods, enjoying the sounds of the forest and the fresh air.'
+					'You are walking through the woods, enjoying the sounds of forest and the fresh air.'
 				else
 					if $clothingworntype ! 'nude':'<center><img <<$set_imgh>> src="images/characters/village/mira/miraforest'+rand(1,3)+'.jpg"></center>'
 					if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/characters/village/mira/miraforest_nude'+rand(1,3)+'.jpg"></center>'
@@ -219,415 +160,355 @@ if $ARGS[0] = '1':
 			else
 				if MiraLoc ! 3:
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforestwinter0.'+rand(1,2)+'.jpg"></center>'
-					'You walk through the snowy woods, enjoying the sounds of the forest and the fresh air.'
+					'You walk through the winter woods, enjoying the sounds of the forest and the fresh air.'
 				else
 					'<center><img <<$set_imgh>> src="images/characters/village/mira/miraforestwinter.jpg"></center>'
-					'You walk with Mira through the snowy woods, enjoying the sounds of the forest and the fresh air.'
+					'You walk with Mira through the winter woods, enjoying the sounds of the forest and the fresh air.'
 				end
 			end
-			
-			act 'Continue':gt 'gadforest','1'
+
+			act 'Further':gt 'gadforest','1'
 		end
 	end
-	
-	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and edgeforestday ! daystart:
+	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and edge_forestday ! daystart:
 		act 'Look for mushrooms and berries':
 			cla
 			*clr
 			minut += 30
-			edgeforestday = daystart
+			temp_gf = rand(1,2)
+			edge_forestday = daystart
+			if goforest < 20:goforest += rand(0,1)
 			gs 'stat'
-			
-			! no mushroom pickers or mushroom pickers moved deeper into the forest
+
 			if mushroom_pickers = 0 or mushroom_pickers = 2:
-				new_boletus += rand(1,2)
-				new_bilberry += rand(1,2)
+				cla
+				new_boletus += rand(0,1)
+				new_bilberry += 1
 				boletus += new_boletus
 				bilberry += new_bilberry
-				pcs_mood += 10
+				pcs_mood += 5
 				gs 'stat'
 
 				gs 'gadforest', 'clothes1'
-				
-				if new_boletus > 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-			! mushroom pickers are at the edge of the forest
-			elseif mushroom_pickers = 1:
-				temp_gf = rand(1,2)
-				if temp_gf = 1:
-					new_boletus += rand(0,1)
-					new_bilberry += rand(0,1)
-					boletus += new_boletus
-					bilberry += new_bilberry
-					if new_boletus > 0 or new_bilberry > 0:pcs_mood += 5
-					if new_boletus = 0 and new_bilberry = 0: pcs_mood -= 5
-					gs 'stat'
-
-					if new_boletus > 0 or new_bilberry > 0: gs 'gadforest', 'clothes1'
-					if new_boletus and new_bilberry = 0: gs 'gadforest', 'clothes2'
-					
-					if new_boletus > 0 and new_bilberry = 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms.'
-					if new_boletus = 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_bilberry>> kg of berries.'
-					if new_boletus > 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-					if new_boletus = 0 and new_bilberry = 0:'After searching for mushrooms and berries for half an hour you found nothing.'
-				elseif temp_gf = 2:
-					pcs_mood -= 5
-					gs 'stat'
-
-					gs 'gadforest', 'clothes2'
-					
-					'After searching for mushrooms and berries for half an hour you found nothing.'
-				end
+				if new_boletus = 0 and new_bilberry > 0:'You`re in for hours of wandering through the woods in search of mushrooms or berries and you found <<new_bilberry>> kg of berries.'
+				if new_boletus > 0 and new_bilberry > 0:'You`re in for hours of wandering through the woods in search of mushrooms or berries and you found <<new_boletus>> kg mushrooms and <<new_bilberry>> kg of berries.'
 			end
-			act 'Continue':gt 'gadforest','1'
+			if mushroom_pickers = 1 and temp_gf = 1:
+				cla
+				new_bilberry += rand(0,1)
+				bilberry += new_bilberry
+				gs 'stat'
+
+				if new_bilberry > 0: gs 'gadforest', 'clothes1'
+				if new_bilberry = 0: gs 'gadforest', 'clothes2'
+				if new_bilberry > 0:'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_bilberry>> kg of berries.'
+				if new_bilberry = 0:'You are wandering through the woods in search of mushrooms or berries for half an hour, but you found nothing.'
+			end
+			if mushroom_pickers = 1 and temp_gf = 2:
+				cla
+				pcs_mood -= 5
+				gs 'stat'
+
+				gs 'gadforest', 'clothes2'
+				'You are wandering through the woods in search of mushrooms or berries for half an hour, but found nothing.'
+			end
+			act 'Further':gt 'gadforest','1'
 		end
  	end
- 	
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and MiraLoc ! 3:
 		act 'Go further into the forest':
 			if goforest >= lostrand:minut += 30 & gt 'gadforest','2'
 			if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	 	end
 	end
-	
 	if goswamp = 1 and MiraLoc ! 3:
-		! day time chance to get stuck in swamp. ps. use bike to get there 100% of the time by illume
 		if hour >= 6 and hour < 20:
 			act 'Go to the swamp':
 				minut += 75
+				!random chance to swamp road. It a pity to use it only in lost. ps. use bike to 100% there by illume
 				if goforest >= lostrand:
 					gt 'swamp'
 				else
 					gt 'gadforestswamp','1'
 				end
 			end
-		! night time chased by wolves
 		else
 			act 'Go to the swamp':gt 'gadforest_event', 'swamp_road'
 		end
 	end
-	
-	act 'Leave the woods':
+	act 'Out of the woods':
 		dirtyclothes = 0
 		gs 'clothing', 'swamp_clothes', 0
-		gs 'stat'
 		if $clothingworntype = 'nude':
 			if $CloLosTyp[$CURLOC] = '' or gadforest_clothestorn = 1:
-				! no clothes here, they must be ripped apart enough times in the woods or swamp to get destroyed.
-				! This may be a good exhibition or rape event entry point
-				inhib_exp += rand(1,3)
+				!no cloth here, it must be broken. There may be a good exhibi or rape event entry point.
+				inhib_exp += rand(0,2)
 				gadforest_clothestorn = 0
-				'You sneak out the woods, hiding your naked body in the shadows and moving toward grandparents house.'
-				'You successfully reach home without anyone noticing.'
+				'You sneak out the woods, hiding your naked body in shadow and moving toward grandparents house.'
+				'You Successfully reach home without witness.'
 				cla
-				act 'Go home':gt'Gadhouse'
+				act 'Further':gt'Gadhouse'
 			else
-				'<B>You should get dressed before leaving the woods.</B>'
+				'<B>You should dress before leave</B>'
 			end
 		else
 			minut += 30 & gt'gadroad'
 		end
 	end
+	if rand(1,10)> 9: gs 'gadforest', 'torncloth'
+	gs 'stat'
 end
 
 if $ARGS[0] = '2':
-	! slightly inside forest
-	$loc = 'gadforest'	
-	$metka = '2'
 	$location_type = 'secluded'
-	$menu_loc = 'gadforest'
-	$menu_arg = '2'
-	menu_off = 0
+	!inside
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
 	*clr & cla
-	
-	! Add to knowledge of forest
-	if goforest < 40:goforest += rand(0,2)
-	! chance to get lost
-	lostrand = rand(1,40)
-	! Determine where Sveta got lost in the forest
+	gs'stat'
+	!gs'time'
+	if goforest < 40:goforest += rand(0,1)
 	lost = 2
-	! chance to rip clothes
-	riprand = rand(1,10)
+	!to determine the continuation of the path YY lost
+	lostrand = rand(1,60)
+	!the chance to get lost
 	foresteventrand = rand(1,10)
 	new_boletus = 0
 	new_bilberry = 0
-	
 	'<center><H4>Forest</H4></center>'
 	if month >= 4 and month <= 10:
 		if hour >= 6 and hour < 22:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest2.jpg"></center>'
-			'You are in the forest. The fresh air and singing birds light up your soul with joy.'
+			'Forest. The intoxicating fresh air and singing birds light up your soul with joy.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_night2.jpg"></center>'
-			'You are in the forest. Night in the woods is scary and uncomfortable.'
+			'Forest. Night in the woods is scary and uncomfortable.'
 		end
 	else
 		if hour >= 8 and hour < 18:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter2.jpg"></center>'
-			'You are in the forest. The forest in the winter is very beautiful, the fresh air makes you happy.'
+			'Forest. The forest in the winter is very beautiful, the fresh air makes you happy.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter_night2.jpg"></center>'
-			'You are in the forest. Night in the forest during wintertime is very scary and uncomfortable.'
+			'Forest. Night in the winter forest is very scary and uncomfortable.'
 		end
 	end
-	
-	if goforest < 40:'You don''t know this part of the forest very well, it''s best if you don''t go any deeper into the woods.'
-	if riprand >= 8: gs 'gadforest', 'torncloth'
-	
-	! mushroom and berry events
-	if foresteventrand <= 1 and month >= 6 and month <= 9 and mushroom_pickersday ! daystart:mushroom_pickers = 2 & gt 'gadforest_event', 'mushroom_pickers1'
-	if foresteventrand <= 2 and month >= 6 and month <= 9 and mushroom_pickersday ! daystart:mushroom_pickers = 2 & gt 'gadforest_event', 'mushroom_pickers3'
-	! hunters events
-	if foresteventrand <= 5 and hour > 8 and hour < 20 and foresteventday ! daystart:gt 'gadforest_event', 'forest_hanters'
-
-	act 'Go back to the edge of the forest':
-		lostrand = rand(1,40)
+	if goforest < 20:'You do not know this part of the forest, it''s better not to wander too far.'
+
+	if foresteventrand = 1 and month >= 6 and month <= 9 and mushroom_pickersday ! daystart:mushroom_pickers = 2 & gt 'gadforest_event', 'mushroom_pickers1'
+	if foresteventrand = 2 and hour > 8 and hour < 20 and foresteventday ! daystart:gt 'gadforest_event', 'forest_hanters'
+	if foresteventrand > 7 and month >= 6 and month <= 9 and foresteventday ! daystart:mushroom_pickers = 2 & gt 'gadforest_event', 'mushroom_pickers3'
+
+
+	act 'Back':
+		lostrand = rand(1,30)
 		if goforest >= lostrand:minut += 30 & gt 'gadforest','1'
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	end
-		
 	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
 			minut += 30
+			temp_gf = rand(1,2)
 			forestday = daystart
+			if goforest < 40:goforest += rand(0,1)
 			gs 'stat'
-			
-			! mushroom_pickers either not seen today or still at the edge of the forest
+
 			if mushroom_pickers < 2:
-				new_boletus += rand(2,3)
-				new_bilberry += rand(2,3)
+				cla
+				new_boletus += 1
+				new_bilberry += rand(1,2)
 				boletus += new_boletus
 				bilberry += new_bilberry
-				pcs_mood += 10
+				pcs_mood += 5
 				gs 'stat'
 
 				gs 'gadforest', 'clothes1'
-				
-				if new_boletus > 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-			! mushroom pickers are in the forest
-			elseif mushroom_pickers = 2:
-				temp_gf = rand(1,2)
-				if temp_gf = 1:
-					new_boletus += rand(0,1)
-					new_bilberry += rand(0,1)
-					boletus += new_boletus
-					bilberry += new_bilberry
-					if new_boletus > 0 or new_bilberry > 0:pcs_mood += 5
-					if new_boletus = 0 and new_bilberry = 0: pcs_mood -= 5
-					gs 'stat'
-
-					if new_boletus > 0 or new_bilberry > 0: gs 'gadforest', 'clothes1'
-					if new_boletus and new_bilberry = 0: gs 'gadforest', 'clothes2'
-					
-					if new_boletus > 0 and new_bilberry = 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms.'
-					if new_boletus = 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_bilberry>> kg of berries.'
-					if new_boletus > 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-					if new_boletus = 0 and new_bilberry = 0:'After searching for mushrooms and berries for half an hour you found nothing.'
-				elseif temp_gf = 2:
-					pcs_mood -= 5
-					gs 'stat'
-
-					gs 'gadforest', 'clothes2'
-					
-					'After searching for mushrooms and berries for half an hour you found nothing.'
-				end
+				'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_boletus>> kg mushrooms and <<new_bilberry>> kg of berries.'
+			end
+			if mushroom_pickers = 2 and temp_gf = 1:
+				cla
+				new_boletus += rand(0,1)
+				new_bilberry += 1
+				boletus += new_boletus
+				bilberry += new_bilberry
+				gs 'stat'
+
+				if new_boletus > 0 or new_bilberry > 0: gs 'gadforest', 'clothes1'
+				if new_boletus = 0 and new_bilberry > 0:'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_bilberry>> kg of berries.'
+				if new_boletus > 0 and new_bilberry > 0:'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_boletus>> kg mushrooms and <<new_bilberry>> kg of berries.'
+			end
+			if mushroom_pickers = 2 and temp_gf = 2:
+				cla
+				pcs_mood -= 5
+				gs 'stat'
+
+				gs 'gadforest', 'clothes2'
+				'You are wandering through the woods in search of mushrooms or berries for half an hour, but found nothing.'
 			end
-			act 'Continue':gt 'gadforest','2'
+			act 'Further':gt 'gadforest','2'
 		end
- 	end
-	
+	end
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9:
 		act 'Go further into the forest':
 			if goforest >= lostrand:minut += 30 & gt 'gadforest','3'
 			if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	 	end
 	end
+	if rand(1,10)> 8: gs 'gadforest', 'torncloth'
 end
 
 if $ARGS[0] = '3':
-	! deep inside forest
-	$loc = 'gadforest'	
-	$metka = '3'
+	!deep forest
 	$location_type = 'secluded'
-	$menu_loc = 'gadforest'
-	$menu_arg = '3'
-	menu_off = 0
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
 	*clr & cla
-	
-	! Add to knowledge of forest
-	if goforest < 60:goforest += rand(0,3)
-	! chance to get lost
-	lostrand = rand(1,60)
-	! Determine where Sveta got lost in the forest
+	gs'stat'
+	!gs'time'
+	if goforest < 60:goforest += rand(0,1)
 	lost = 3
-	! chance to rip clothes
-	riprand = rand(1,10)
-	foresteventrand = rand(1,12)
+	!to determine the continuation of the path YY lost
+	lostrand = rand(1,100)
+	!the chance to get lost
+	foresteventrand = rand(1,10)
 	new_boletus = 0
 	new_bilberry = 0
-	
-	'<center><H4>Deep Forest</H4></center>'
+	'<center><H4>Thicket</H4></center>'
 	if month >= 4 and month <= 10:
 		if hour >= 6 and hour < 22:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest3.jpg"></center>'
-			'You are deep in the forest. The fresh air and singing birds light up your soul with joy.'
+			'Forest. The intoxicating fresh air and singing birds light up your soul with joy.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_night3.jpg"></center>'
-			'You are deep in the forest. Night in the woods is scary and uncomfortable.'
+			'Forest. Night in the woods is scary and uncomfortable.'
 		end
 	else
 		if hour >= 8 and hour < 18:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter3.jpg"></center>'
-			'You are deep in the forest. The forest in the winter is very beautiful, the fresh air makes you happy.'
+			'Forest. The forest in the winter is very beautiful, the fresh air makes you happy.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter_night3.jpg"></center>'
-			'You are deep in the forest. Night in the forest during wintertime is very scary and uncomfortable.'
+			'Forest. Night in the winter forest is very scary and uncomfortable.'
 		end
 	end
-	
-	if goforest < 60:'You don''t know this part of the forest very well, it''s best if you don''t go any deeper into the woods.'
-	if riprand >= 6: gs 'gadforest', 'torncloth'
-	
-	! mushroom and berry events
+	if goforest < 30:'You do not know this part of the forest, it''s better not to wander too far.'
+
 	if foresteventrand = 1 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'basket'
 	if foresteventrand = 2 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'bilberry'
-	if foresteventrand = 3 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'mushroom'
-	! hunters events
-	if foresteventrand <= 6 and hour > 8 and hour < 20 and foresteventday ! daystart:gt 'gadforest_event', 'forest_hanters'
+	if foresteventrand = 3 and foresteventday ! daystart: gt 'gadforest_event', 'mushroom'
+	if foresteventrand = 4 and hour > 8 and hour < 20 and foresteventday ! daystart:gt 'gadforest_event', 'forest_hanters'
 
-	act 'Go back to the forest':
+	act 'Back':
 		lostrand = rand(1,60)
 		if goforest >= lostrand:minut += 30 & gt 'gadforest','2'
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	end
-	
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and thicketday ! daystart:
-		cla
-		*clr
-		minut += 30
-		thicketday = daystart
-		gs 'stat'
-		
-		act 'Look for mushrooms and berries':
-			new_boletus += rand(3,4)
-			new_bilberry += rand(3,4)
+
+	act 'Look for mushrooms and berries':
+			*clr & cla
+			minut += 30
+			thicketday = daystart
+			if goforest < 60:goforest += rand(0,1)
+			new_boletus += rand(1,2)
+			new_bilberry += rand(1,2)
 			boletus += new_boletus
 			bilberry += new_bilberry
-			pcs_mood += 10
+			pcs_mood += 5
 			gs 'stat'
-
 			gs 'gadforest', 'clothes1'
-			
-			if new_boletus > 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-			
-			act 'Continue':gt 'gadforest','3'
+			'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_boletus>> kg mushrooms and <<new_bilberry>> kg of berries.'
+
+			act 'Further':gt 'gadforest','3'
 		end
 	end
-	
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9:
+
 		act 'Go further into the forest':
 			if goforest >= lostrand:minut += 30 & gt 'gadforest','4'
 			if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	 	end
 	end
+	if rand(1,10)> 6: gs 'gadforest', 'torncloth'
 end
 
 if $ARGS[0] = '4':
-	! forest near swamp
-	$loc = 'gadforest'	
-	$metka = '4'
+	!near swamp
 	$location_type = 'secluded'
-	$menu_loc = 'gadforest'
-	$menu_arg = '4'
-	menu_off = 0
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
 	*clr & cla
-	
-	! Add to knowledge of forest
-	if goforest < 80:goforest += rand(0,4)
-	! chance to get lost
-	lostrand = rand(1,80)
-	! Determine where Sveta got lost in the forest
+	gs'stat'
+	!gs'time'
+	if goforest < 80:goforest += rand(0,1)
 	lost = 4
-	! chance to rip clothes
-	riprand = rand(1,10)
-	! dirty
+	!to determine the continuation of the path YY lost
+	lostrand = rand(1,120)
+	!the chance to get lost
+	foresteventrand = rand(1,10)
 	dirty = 0
-	foresteventrand = rand(1,8)
 	new_boletus = 0
 	new_bilberry = 0
-	
-	'<center><H4>Forest near the Swamp</H4></center>'
+	'<center><H4>Woods near swamps</H4></center>'
 	if month >= 4 and month <= 10:
 		if hour >= 6 and hour < 22:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest4.jpg"></center>'
-			'You are in the forest near the swamp. The fresh air and singing birds light up your soul with joy.'
+			'Forest. The intoxicating fresh air and singing birds light up your soul with joy.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_night4.jpg"></center>'
-			'You are in the forest near the swamp. Night in the woods is scary and uncomfortable.'
+			'Forest. Night in the woods is scary and uncomfortable.'
 		end
 	else
 		if hour >= 8 and hour < 18:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter4.jpg"></center>'
-			'You are in the forest near the swamp. The forest in the winter is very beautiful, the fresh air makes you happy.'
+			'Forest. The forest in the winter is very beautiful, the fresh air makes you happy.'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_winter_night4.jpg"></center>'
-			'You are in the forest near the swamp. Night in the forest during wintertime is very scary and uncomfortable.'
+			'Forest. Night in the winter forest is very scary and uncomfortable.'
 		end
 	end
-	
-	if goforest < 80:'You don''t know this part of the forest very well, it''s best if you don''t go any deeper into the woods.'
-	if riprand >= 4: gs 'gadforest', 'torncloth'
-	
-	! mushroom and berry events
-	if foresteventrand = 1 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'bilberry'
-	if foresteventrand = 2 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'mushroom'
-	! hunter events
-	if foresteventrand <= 4 and hour > 8 and hour < 20 and foresteventday ! daystart:gt 'gadforest_event', 'forest_hanters'
-
-	act 'Go back to the deep woods':
-		lostrand = rand(1,80)
+	if goforest < 60:'You do not know this part of the forest. It is better not to go too far in.'
+
+	if foresteventrand < 2 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'bilberry'
+	if foresteventrand > 7 and month >= 6 and month <= 9 and foresteventday ! daystart: gt 'gadforest_event', 'mushroom'
+	if foresteventrand = 5 and hour > 8 and hour < 20 and foresteventday ! daystart:gt 'gadforest_event', 'forest_hanters'
+
+	act 'Back':
+		lostrand = rand(1,100)
 		if goforest >= lostrand:minut += 30 & gt 'gadforest','3'
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	end
-	
-	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and swampforestday ! daystart:
-		cla
-		*clr
-		minut += 30
-		swampforestday = daystart
-		gs 'stat'
-		
-		act 'Look for mushrooms and berries':
-			new_boletus += rand(4,5)
-			new_bilberry += rand(4,5)
+	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
+			*clr
+			minut += 30
+			swampforest = daystart
+			if goforest < 80:goforest += rand(0,1)
+			new_boletus += rand(1,2)
+			new_bilberry += rand(2,3)
 			boletus += new_boletus
 			bilberry += new_bilberry
-			pcs_mood += 10
+			pcs_mood += 5
 			gs 'stat'
 
 			gs 'gadforest', 'clothes1'
-			
-			if new_boletus > 0 and new_bilberry > 0:'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-			
-			act 'Continue':gt 'gadforest','4'
+			'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_boletus>> kg mushrooms and <<new_bilberry>> kg of berries.'
+
+			act 'Further':gt 'gadforest','4'
 		end
 	end
-	
-	act 'Go further into the swamp':
+	act 'Go further into the forest':
 		if goforest >= lostrand and goswamp = 1:minut += 30 & gt 'swamp'
 		if goforest >= lostrand and goswamp = 0:minut += 30 & gt 'gadforestswamp','1'
 		if goforest < lostrand:gt 'gadforest', 'gadforestloststart'
 	end
+	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 end
 
 !dynamics to ARGS by illume
@@ -659,27 +540,28 @@ end
 if $ARGS[0] = 'gadforestloststart':
 	cla
 	*clr
+	!gs'time'
 	gs 'stat'
-	
-	! add for rescue in forest by illume
-	forest_lost = 1
-	if StoryLine = 1: forest_lostday = daystart + rand(1,3)
-	
+
 	'<center><H4>Somewhere in the woods</H4></center>'
-	if month >= 4 and month <= 10:
+	if month >= 5 and month <= 9:
 		if $clothingworntype ! 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadfear1.jpg"></center>'
 		if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadfear2.jpg"></center>'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadfear3.jpg"></center>'
 	end
-	'You suddenly realize in horror that you are not familiar with the area you are in... you are lost!.'
+	'You suddenly realize in horror that you are not familiar with the area you are in... you get lost.'
 
-	act 'Try to find your way out of the forest':
+	act 'Further':
 		if lost = 1: gt 'gadforestlost','1'
 		if lost = 2: gt 'gadforestlost','2'
 		if lost = 3: gt 'gadforestlost','3'
 		if lost = 4: gt 'gadforestlost','4'
 	end
+
+	!add for realistic, rescue in forest! by illume
+	forest_lost = 1
+	if StoryLine = 1: forest_lostday = daystart + rand(1,3)
 end
 
 if $ARGS[0] = 'torncloth':
@@ -687,12 +569,11 @@ if $ARGS[0] = 'torncloth':
 	if $clothingworntype ! 'nude':
 		if (PCloThinness = 1 or PCloSkirt > 0) and PCloQuality < 5:
 			!skirts, not fit, and not high-class enough by illume
-			'Oops, your clothes get snagged and tear slightly.'
+			'Oops, your clothes get snagged and tears slightly.'
 			dynamic $clothingworntype + 'H[<<clothingwornnumber>>] -= 1'
-			!add remove clothes if worn out
+			!add remove cloth if worn out, need better texting by illume.
 			if dyneval('RESULT = <<$clothingworntype>>H[<<clothingwornnumber>>]') <= 0:
-				'Your ripped clothes were barely holding together, but now they have finally fell apart.'
-				'You are naked now.'
+				'Your raggedy clothes have finally had enough and fall apart. You are naked now.'
 				gadforest_clothestorn = 1
 				gs 'clothing', 'strip', 'gadforest', 2
 			end
@@ -701,3 +582,4 @@ if $ARGS[0] = 'torncloth':
 end
 
 --- gadforest ---------------------------------
+

locations/gadforestlost.qsrc

@@ -1,220 +1,180 @@
 # gadforestlost
 
+!make this trigger after 2 days in swamp house, minus a countdown per hour
+if $ARGS[0] = 'forestrescue':
+	!rescue in forest by illume. I think we need good texts.
+	cls
+	minut += 150
+	lost_girl = 0
+	dirtyclothes = 0
+	forest_lostday = 0
+	hanters = 0
+	gs 'clothing', 'swamp_clothes', 0
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/forester.jpg"></center>'
+	'You wander in the forest trying to find your way out, suddenly you spot a man dressed as a forest ranger.'
+	'"And here is our lost girl." he said wearily, "Your grandfather and grandmother are very worried about you. They asked me to help find you. Follow me, I will take you home."'
+	if $loc = 'gadforestrelax':
+		!rescued during rest
+		if bonfire = 1:
+			!have fire
+			'When lost, it''s very smart if you stay in one place and make a fire. It will keep you warm, and make you visable to others.'
+		else
+			'Staying in one place is a good idea when you are lost.'
+		end
+	end
+	'You get ready quickly and you follow the forest ranger out of the woods.'
+	if $clothingworntype ! 'nude':
+		act 'Further':gt'Gadhouse'
+	elseif $clothingworntype = 'nude':
+		act 'Further':gt'gadforest', '1'
+	end
+end
 if $ARGS[0] = '1':
-	$loc = 'gadforestlost'
-	$metka = '1'
+	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 7: gt 'gadforestlost', 'forestrescue' & !add rescue by illume
 	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestlost'
-	$menu_arg = '1'
-	menu_off = 0
-	
+	$metka = $ARGS[0]
+	 $loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
 	cla
 	*clr
-	
-	riprand = rand(1,10)
-	rescuerand = rand(1,10)
 	wolfrand = rand(1,10)
-	
-	! chance to rip clothes - eventually they will get destroyed and Sveta ends up naked
-	if riprand >= 8: gs 'gadforest', 'torncloth'
-	! chance to be rescued by forest ranger any time of day or night
-	if rescuerand >= 4 and StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday: gt 'gadforestlost', 'forestrescue'
-	! chance to be chased by wolves at night
-	if wolfrand >= 10 and (hour = 23 or hour >= 0 and hour < 4):gt 'gadforest_event', 'lost'
-	
+	hantrand = rand(1,10)
+	gs'stat'
+	!gs'time'
 	gs 'gadforestlost', 'gadforestlost'
 
-	act 'Look for a way out of the woods':
+	if wolfrand = 1 and (hour = 23 or hour >= 0 and hour < 6):gt 'gadforest_event', 'lost'
+
+	act 'Look for the road':
 		cla
 		*clr
 		minut += 60
 		pcs_mood -= 5
-		if goforest < 20:goforest += rand(0,2)
+		goforest += rand(0,1)
+		lostrand = rand(1,40)
 		gs 'stat'
-		
+
 		gs 'gadforestlost', 'lostclothes'
-		
-		lostrand = rand(1,20)
 		if goforest > lostrand:
-			act 'Continue looking for a way out of the woods':gs 'gadforestlost', 'gadforestlostfinish1'
+			act 'Look for the road':gs 'gadforestlost', 'gadforestlostfinish1'
 		else
-			act 'Continue looking for a way out of the woods':gt 'gadforestlost','1'
+			act 'Look for the road':gt 'gadforestlost','1'
 		end
-		
-		act 'Take a break':gt 'gadforestrelax'
+		act 'To take a break':gt 'gadforestrelax'
 	end
-	
+	if rand(1,10)> 8: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 end
-
 if $ARGS[0] = '2':
-	$loc = 'gadforestlost'
-	$metka = '2'
+	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 8: gt 'gadforestlost', 'forestrescue' & !add rescue by illume
 	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestlost'
-	$menu_arg = '2'
-	menu_off = 0
-	
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
-	cla
-	*clr
-	
-	riprand = rand(1,10)
-	rescuerand = rand(1,10)
-	hantrand = rand(1,10)
+	cls
 	wolfrand = rand(1,10)
-	
-	! chance to rip clothes - eventually they will get destroyed and Sveta ends up naked
-	if riprand >= 6: gs 'gadforest', 'torncloth'
-	! chance to be rescued by forest ranger any time of day or night
-	if rescuerand >= 6 and StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday: gt 'gadforestlost', 'forestrescue'
-	! chance to be rescued by hunters during the day
-	if hantrand >= 10 and hour > 8 and hour < 20 :forest_lost = 1 & gt 'gadforest_event', 'forest_hanters'
-	! chance to be chased by wolves at night
-	if wolfrand >= 9 and (hour = 23 or hour >= 0 and hour < 4):gt 'gadforest_event', 'lost'
-	
+	hantrand = rand(1,10)
+	gs'stat'
+	!gs'time'
 	gs 'gadforestlost', 'gadforestlost'
 
+	if wolfrand <= 2 and (hour = 23 or hour >= 0 and hour < 6):gt 'gadforest_event', 'lost'
+	if hantrand = 1 and hour > 8 and hour < 20 :forest_lost = 1 & gt 'gadforest_event', 'forest_hanters'
+
 	act 'Look for the road':
 		cla
 		*clr
 		minut += 60
 		pcs_mood -= 5
-		if goforest < 40:goforest += rand(0,3)
+		goforest += rand(0,1)
+		lostrand = rand(1,120)
 		gs 'stat'
-		
+
 		gs 'gadforestlost', 'lostclothes'
-		
-		lostrand = rand(1,40)
 		if goforest > lostrand:
-			act 'Continue looking for a way out of the woods':gs 'gadforestlost', 'gadforestlostfinish2'
+			act 'Look for the road ':gs 'gadforestlost', 'gadforestlostfinish2'
 		else
-			act 'Continue looking for a way out of the woods':gt 'gadforestlost','2'
+			act 'Look for the road':gt 'gadforestlost','2'
 		end
-		
-		act 'Take a break':gt 'gadforestrelax'
+		act 'To take a break':gt 'gadforestrelax'
 	end
-	
+	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 end
-
 if $ARGS[0] = '3':
-	$loc = 'gadforestlost'
-	$metka = '3'
+	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 9: gt 'gadforestlost', 'forestrescue' & !add rescue by illume
 	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestlost'
-	$menu_arg = '3'
-	menu_off = 0
-	
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
-	cla
-	*clr
-	
-	riprand = rand(1,10)
-	rescuerand = rand(1,10)
-	hantrand = rand(1,10)
+	cls
 	wolfrand = rand(1,10)
-	
-	! chance to rip clothes - eventually they will get destroyed and Sveta ends up naked
-	if riprand >= 4: gs 'gadforest', 'torncloth'
-	! chance to be rescued by forest ranger any time of day or night
-	if rescuerand >= 8 and StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday: gt 'gadforestlost', 'forestrescue'
-	! chance to be rescued by hunters during the day
-	if hantrand >= 8 and hour > 8 and hour < 20 :forest_lost = 1 & gt 'gadforest_event', 'forest_hanters'
-	! chance to be chased by wolves at night
-	if wolfrand >= 8 and (hour = 23 or hour >= 0 and hour < 4):gt 'gadforest_event', 'lost'
-	
+	hantrand = rand(1,10)
+	gs'stat'
+	!gs'time'
 	gs 'gadforestlost', 'gadforestlost'
+	if wolfrand <= 3 and (hour = 23 or hour >= 0 and hour < 6):gt 'gadforest_event', 'lost'
+	if hantrand = 1 and hour > 8 and hour < 20 :forest_lost = 1 & gt 'gadforest_event', 'forest_hanters'
 
 	act 'Look for the road':
 		cla
 		*clr
 		minut += 60
 		pcs_mood -= 5
-		if goforest < 60:goforest += rand(0,4)
+		goforest += rand(0,1)
+		lostrand = rand(1,180)
 		gs 'stat'
-		
+
 		gs 'gadforestlost', 'lostclothes'
-		
-		lostrand = rand(1,60)
 		if goforest > lostrand:
-			act 'Continue looking for a way out of the woods':gs 'gadforestlost', 'gadforestlostfinish3'
+			act 'Look for the road ':gs 'gadforestlost', 'gadforestlostfinish3'
 		else
-			act 'Continue looking for a way out of the woods':gt 'gadforestlost','3'
+			act 'Look for the road':gt 'gadforestlost','3'
 		end
-		
-		act 'Take a break':gt 'gadforestrelax'
+		act 'To take a break':gt 'gadforestrelax'
 	end
-	
+	if rand(1,10)> 6: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 end
-
 if $ARGS[0] = '4':
-	$loc = 'gadforestlost'
-	$metka = '4'
+	if StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday and rand(1,10)> 9: gt 'gadforestlost', 'forestrescue' & !add rescue by illume
 	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestlost'
-	$menu_arg = '4'
-	menu_off = 0
-	
+	$metka = $ARGS[0]
+	$loc = $CURLOC
 	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
-	cla
-	*clr
-	
-	riprand = rand(1,10)
-	rescuerand = rand(1,10)
-	hantrand = rand(1,10)
+	cls
 	wolfrand = rand(1,10)
-	
-	! chance to rip clothes - eventually they will get destroyed and Sveta ends up naked
-	if riprand >= 2: gs 'gadforest', 'torncloth'
-	! chance to be rescued by forest ranger any time of day or night
-	if rescuerand >= 10 and StoryLine = 1 and forest_lostday > 0 and daystart > forest_lostday: gt 'gadforestlost', 'forestrescue'
-	! chance to be rescued by hunters during the day
-	if hantrand >= 6 and hour > 8 and hour < 20 :forest_lost = 1 & gt 'gadforest_event', 'forest_hanters'
-	! chance to be chased by wolves at night
-	if wolfrand >= 7 and (hour = 23 or hour >= 0 and hour < 4):gt 'gadforest_event', 'lost'
-	
+	hantrand = rand(1,10)
+	gs'stat'
+	!gs'time'
 	gs 'gadforestlost', 'gadforestlost'
 
+	if wolfrand <= 4 and (hour = 23 or hour >= 0 and hour < 6):gt 'gadforest_event', 'lost'
+	if hantrand = 1 and hour > 8 and hour < 20 :forest_lost = 1 & gt 'gadforest_event', 'forest_hanters'
+
 	act 'Look for the road':
 		cla
 		*clr
 		minut += 60
 		pcs_mood -= 5
-		if goforest < 80:goforest += rand(0,5)
+		goforest += rand(0,1)
+		lostrand = rand(1,300)
+		temp = rand(1,10)
 		gs 'stat'
-		
+
 		gs 'gadforestlost', 'lostclothes'
-		
-		lostrand = rand(1,80)
-		swamptemp = rand(1,10)
-		if goforest > lostrand:
-			act 'Continue looking for the road':gs 'gadforestlost', 'gadforestlostfinish4'
-		else
-			if swamptemp > 8:gt 'gadforestswamp','1'
-			if swamptemp <= 8:act 'Continue looking for the road':gt 'gadforestlost','4'
+		act 'Look for the road ':
+			if goforest > lostrand: gs 'gadforestlost', 'gadforestlostfinish4'
+			if goforest < lostrand and temp > 7:gt 'gadforestswamp','1'
+			if goforest < lostrand and temp <= 7:gt 'gadforestlost','4'
 		end
-		
-		act 'Take a break':gt 'gadforestrelax'
+		act 'To take a break':gt 'gadforestrelax'
 	end
-	
+	if rand(1,10)> 7: gs 'gadforest', 'torncloth'
 	gs 'gadforestlost', 'searchfood'
 end
-
 if $ARGS[0] = 'gadforestlost':
 	'<center><H4>Forest</H4></center>'
 	if month >= 4 and month <= 10:
@@ -235,20 +195,16 @@ if $ARGS[0] = 'gadforestlost':
 		end
 	end
 end
-
 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/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>'
-	'After wandering through the woods for an hour you decide to....'
+	'Within an hour of wandering through the woods you decide....'
 end
-
 if $ARGS[0] = 'gadforestlostfinish':
 	'<center><H4>Somewhere in the woods</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadjoy.jpg"></center>'
-	
-	'You look over and realize that you finally see lights shining from distant houses, glad to get out of this alive you rush forward.'
-	
+	'You look over and realize that you finally see lights shining from distnat houses, glad to get out of this alive you rush forward.'
 	!clear lost flags by illume, clear dirtyclothes flag by rachels
 	lost_girl = 0
 	dirtyclothes = 0
@@ -256,97 +212,104 @@ if $ARGS[0] = 'gadforestlostfinish':
 	hanters = 0
 	gs 'clothing', 'swamp_clothes', 0
 	gs 'stat'
-	
 	if $clothingworntype = 'nude':
-		act 'Leave the woods':
+		act 'Out of the woods':
 			minut += 25
-			'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 find your way out of the woods, hiding your naked body in shadow and moving toward the edge of the forest, where you left your clothes.'
 			cla
 			act 'Continue':gt'gadforest', '1'
 		end
-		!disable further actions from being added
 		temp=0
+		!disable further act add.
 	end
 end
-
 if $ARGS[0] = 'gadforestlostfinish1':
 	cls
 	*clr
+	temp = RAND(1,3)
 	lost = 0
 	pcs_mood += 20
+	!gs'time'
 	gs 'stat'
 
 	gs 'gadforestlost', 'gadforestlostfinish'
-	
-	temp = RAND(1,10)
-	if temp <= 4:act 'Leave the woods':minut += 15 & gt'gadfield','field'
-	if temp <= 8:act 'Leave the woods':minut += 15 & gt'gadroad'
-	if temp <= 10:act 'Leave the woods':minut += 15 & gt'Gadriver','start'
+	''
+
+	if temp = 1:act 'Out of the woods':minut += 15 & gt'gadforest','1'
+	if temp = 2:act 'Out of the woods':minut += 15 & gt'gadfield','field'
+	if temp = 3:act 'Out of the woods':minut += 15 & gt'gadroad'
 
 end
 if $ARGS[0] = 'gadforestlostfinish2':
 	cls
 	*clr
+	temp = RAND(1,5)
 	lost = 0
-	pcs_mood += 40
+	pcs_mood += 20
+	!gs'time'
 	gs 'stat'
 
 	gs 'gadforestlost', 'gadforestlostfinish'
-	
-	temp = RAND(1,10)
-	if temp <= 3:act 'Leave the woods':minut += 15 & gt'gadfield','field'
-	if temp <= 6:act 'Leave the woods':minut += 15 & gt'gadroad'
-	if temp <= 9:act 'Leave the woods':minut += 15 & gt'Gadriver','start'
-	if temp <= 10:act 'Leave the woods':minut += 15 & gt'Meadow'
+	''
+
+	if temp = 1:act 'Out of the woods':minut += 15 & gt'gadforest','1'
+	if temp = 2:act 'Out of the woods':minut += 15 & gt'gadfield','field'
+	if temp = 3:act 'Out of the woods':minut += 15 & gt'gadroad'
+	if temp = 4:act 'Out of the woods':minut += 15 & gt'Gadriver','start'
+	if temp = 5:act 'Out of the woods':minut += 15 & gt'Meadow'
 end
 if $ARGS[0] = 'gadforestlostfinish3':
 	cls
 	*clr
+	temp = RAND(1,7)
 	lost = 0
 	pcs_mood += 20
+	!gs'time'
 	gs 'stat'
 
 	gs 'gadforestlost', 'gadforestlostfinish'
+	''
 
-	temp = RAND(1,10)
-	if temp <= 1:act 'Leave the woods':minut += 15 & gt'gadfield','field'
-	if temp <= 2:act 'Leave the woods':minut += 15 & gt'gadroad'
-	if temp <= 3:act 'Leave the woods':minut += 15 & gt'Gadriver','start'
-	if temp <= 5:act 'Leave the woods':minut += 15 & gt'Meadow'
-	if temp <= 8:act 'Leave the woods':minut += 15 & gt 'swamp'
-	if temp <= 10:act 'Leave the woods':minut += 15 & nroad = 10 & gt'road'
+	if temp = 1:act 'Out of the woods':minut += 15 & gt'gadforest','1'
+	if temp = 2:act 'Out of the woods':minut += 15 & gt'gadfield','field'
+	if temp = 3:act 'Out of the woods':minut += 15 & gt'gadroad'
+	if temp = 4:act 'Out of the woods':minut += 15 & gt'Gadriver','start'
+	if temp = 5:act 'Out of the woods':minut += 15 & gt'Meadow'
+	if temp = 6:act 'Out of the woods':minut += 15 & nroad = 15 & gt'road'
+	if temp = 7:act 'Out of the woods':minut += 15 & nroad = 10 & gt'road'
 end
-
 if $ARGS[0] = 'gadforestlostfinish4':
 	cls
 	*clr
+	temp = RAND(1,9)
 	lost = 0
 	pcs_mood += 20
+	!gs'time'
 	gs 'stat'
 
 	gs 'gadforestlost', 'gadforestlostfinish'
-	
-	temp = RAND(1,10)
-	if temp <= 1:act 'Leave the woods':minut += 15 & gt'gadfield','field'
-	if temp <= 2:act 'Leave the woods':minut += 15 & gt'gadroad'
-	if temp <= 3:act 'Leave the woods':minut += 15 & gt'Gadriver','start'
-	if temp <= 4:act 'Leave the woods':minut += 15 & gt'Meadow'
-	if temp <= 8:act 'Leave the woods':minut += 15 & gt 'swamp'
-	if temp <= 9:act 'Leave the woods':minut += 15 & nroad = 10 & gt'road'
-	if temp <= 10:act 'Leave the woods':minut += 15 & nroad = 15 & gt'road'
-end
+	''
+
+	if temp = 1:act 'Out of the woods':minut += 15 & gt'gadforest','1'
+	if temp = 2:act 'Out of the woods':minut += 15 & gt'gadfield','field'
+	if temp = 3:act 'Out of the woods':minut += 15 & gt'gadroad'
+	if temp = 4:act 'Out of the woods':minut += 15 & gt'Gadriver','start'
+	if temp = 5:act 'Out of the woods':minut += 15 & gt'Meadow'
+	if temp = 6:act 'Out of the woods':minut += 15 & nroad = 15 & gt'road'
+	if temp = 7:act 'Out of the woods':minut += 15 & nroad = 10 & gt'road'
+	if temp = 8:act 'Out of the woods':minut += 15 & nroad = 10 & gt'road'
+	if temp = 9 and goswamp = 0:act 'Out of the woods':minut += 15 & gt 'gadforestswamp','1'
+	if temp = 9 and goswamp = 1:act 'Out of the woods':minut += 15 & gt 'swamp'
 
+end
 if $ARGS[0] = 'searchfood':
 	if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10:
 		act 'Look for mushrooms and berries':
 			cla
 			*clr
 			minut += 30
-			
 			new_boletus += rand(1,2)
 			new_bilberry += rand(1,2)
-			
 			if new_boletus + new_bilberry > 0:
 				boletus += new_boletus
 				bilberry += new_bilberry
@@ -354,72 +317,16 @@ if $ARGS[0] = 'searchfood':
 				gs 'stat'
 
 				gs 'gadforest', 'clothes1'
-				
 				'Within half an hour of wandering through the woods in search of mushrooms or berries, you found <<new_boletus>> kg mushrooms and <<new_bilberry>> kg of berries.'
 			else
 				pcs_mood -= 5
-				gs 'stat'
-				
 				gs 'gadforest', 'clothes2'
-				
 				'After half an hour of wandering through the woods in search of mushrooms or berries, you found nothing.'
 			end
-			
-			act 'Continue':gt $loc, $metka
-		end
-	end
-end
-
-!rescue in forest by illume
-!make this trigger after 2 days in swamp house, minus a countdown per hour
-if $ARGS[0] = 'forestrescue':
-	$loc = 'gadforestlost'
-	$metka = 'forestrescue'
-	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestlost'
-	$menu_arg = 'forestrescue'
-	menu_off = 0
-	
-	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
-	cls
-	minut += 150
-	lost_girl = 0
-	dirtyclothes = 0
-	forest_lostday = 0
-	hanters = 0
-	gs 'clothing', 'swamp_clothes', 0
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/forester.jpg"></center>'
-	
-	'Suddenly you spot a man dressed as a forest ranger.'
-	'He walks up to you and says, "And here is our lost girl. Your grandfather and grandmother are very worried about you. They asked me to help find you. Follow me, I will take you home."'
-
-	!rescued during rest
-	if $loc = 'gadforestrelax':
-		!have fire
-		if bonfire = 1:
-			'When lost, it''s very smart if you stay in one place and make a fire. It will keep you warm, and make you visible to others.'
-		else
-			'Staying in one place is a good idea when you are lost.'
+			gs 'stat'
+			act 'Further':gt $loc, $metka
 		end
 	end
-	
-	'You get ready quickly and follow the forest ranger out of the woods.'
-	
-	if $clothingworntype ! 'nude':
-		'You can''t wait to get back to your grandparents house and have a bath and a nice hot meal.'
-		
-		act 'Go back to your grandparents house':gt'Gadhouse'
-	elseif $clothingworntype = 'nude':
-		'The ranger looks you up and down and you feel like he is about to ask you something but he decides against it.'
-		'You remember you left your clothes by the edge of the woods and ask the ranger to take you there instead.'
-		
-		act 'Go back to the edge of the woods':gt'gadforest', '1'
-	end
 end
 
 --- gadforestlost ---------------------------------

locations/gadforestswamp.qsrc

@@ -1,17 +1,12 @@
 # gadforestswamp
 
+$location_type = 'secluded'
 if $ARGS[0] = '1':
-	$loc = 'gadforestswamp'
 	$metka = '1'
-	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestswamp'
-	$menu_arg = '1'
-	menu_off = 0
-	
+	$loc = 'gadforestswamp'
+
 	gs 'gadukino_event', 'sound'
 	gs 'stat'
-	
 	'<center><H4>Swamp</H4></center>'
 	if month >= 4 and month <= 10:
 		if hour >= 6 and hour < 22:
@@ -26,64 +21,45 @@ if $ARGS[0] = '1':
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/gadforestlostswamp_winter_night.jpg"></center>'
 		end
 	end
-	'You come to the edge of the swamp; you can see a hut in the distance.'
-	'You can go back into the woods or try to get to the hut through the marsh, but will you have enough strength and agility to overcome this obstacle?'
+	'You went to the marsh, behind it you can see some kind of hut. You can go back into the woods or try to get to the hut through the mash, but will you have enough strength and agility to overcome this obstacle?'
 
 	act 'Go back to the forest':gt 'gadforestlost','4'
 
-	act 'Try to walk through the mire':
+	act 'Try to go forward through the mire':
 		*clr & cla
 		minut += 10
+		swamprand = pcs_stren + pcs_agil
 		pcs_sweat += 10
 		gs 'stat'
 
 		if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp.jpg"></center>'
 		if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski.jpg"></center>'
 		if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+rand(4,5)+'.jpg"></center>'
-		
 		'You entered the swamp and felt your feet starting to sink into the mud...'
-		
-		swamprand = pcs_stren + pcs_agil
 		temp_gads = RAND(1,100)
-		act 'Give it one more effort':
+		act 'Go further':
 			if swamprand > temp_gads:gt 'swamp_yard'
-			if Enable_nogameover = 0:
-				if swamprand < temp_gads and temp_gads >= 90:over = 10 & gt 'gameover'
-				if swamprand < temp_gads and temp_gads < 90:gt 'gadforestswamp', '2'
-			else
-				gt 'gadforestswamp', '2'
-			end
+			if swamprand < temp_gads and temp_gads >= 90:over = 10 & gt 'gameover'
+			if swamprand < temp_gads and temp_gads < 90:gt 'gadforestswamp', '2'
 		end
 	end
 end
 
 if $ARGS[0] = '2':
-	$loc = 'gadforestswamp'
 	$metka = '2'
-	$location_type = 'secluded'
-	
-	$menu_loc = 'gadforestswamp'
-	$menu_arg = '2'
-	menu_off = 0
-	
+	$loc = 'gadforestswamp'
 	gs 'gadukino_event', 'sound'
-	gs 'stat'
-	
-	! unbrush hair and remove makeup
+
 	pcs_hairbsh = 0
 	if pcs_makeup > 1:pcs_makeup = 0
-	
-	! clothes wear out, "dirty" to avoid at a time 
+	!clothes wear out, "dirty" to avoid at a time 
 	if dirty = 0 and ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):dirty = 1 & dirtyclothes = 1 & dynamic $clothingworntype + 'H[<<clothingwornnumber>>] -= 10'
-	! add remove clothes if worn out
+	!add remove cloth if worn out, need better texting by illume.
 	if dyneval('RESULT = <<$clothingworntype>>H[<<clothingwornnumber>>]') <= 0:
-		'Your ripped clothes were barely holding together, but now they have finally fell apart.'
-		'You are naked now.'
-		gadforest_clothestorn = 1
-		gs 'clothing', 'strip', 'gadforestswamp', 2
+		'Your clothes are torn to pieces, you are naked now.'
+		gs 'clothing', 'strip'
 	end
 	gs 'stat'
-	
 	'<center><H4>Swamp</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/panicswamp.jpg"></center>'
 	'You are stuck in the quagmire."I''m stuck!", you think in panic "What do I do?". '
@@ -91,15 +67,13 @@ if $ARGS[0] = '2':
 	act 'Call for help':
 		*clr & cla
 		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:temp_gads = RAND(1,5)
 		gs 'stat'
-		
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/gadforestlosthelp.jpg"></center>'
-		
-		'You are exhausted and begin to scream for help...'
-		
-		if week > 5:temp_gads = RAND(1,3)
-		if week <= 5:temp_gads = RAND(1,5)
+		'You are exhausted and begin to scream for help, suddenly you see people...'
+
 		act 'Wait':
 			if temp_gads = 1:
 				*clr & cla
@@ -107,21 +81,16 @@ if $ARGS[0] = '2':
 				hanters = 1
 				hanterhelp = 1
 				gs 'stat'
-				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/handshelp.jpg"></center>'
-				'You hear men speaking and begin to shout louder. The voices come closer and finally, someone''s strong hands grabbed you and dragged back to solid ground.'
-				'You are so tired from your ordeal you pass out.'
-				
-				act 'Wake up sometime later':gt 'swamp_yard'
+				'You hear men speaking and begin to shouting louder. The voices come closer and finally, someone''s strong hands grabbed you and dragged back to solid ground.'
+
+				act 'Further':gt 'swamp_yard'
 			else
 				*clr & cla
 				minut += 10
-				gs 'stat'
-				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/panicswamp.jpg"></center>'
 				'No one responds to your call, looks like you are all alone.'
-				
-				act 'Contemplate your life':gt 'gadforestswamp','2'
+				act 'Further':gt 'gadforestswamp','2'
 			end
 		end
 	end
@@ -129,58 +98,49 @@ if $ARGS[0] = '2':
 	act 'Try to get back to the woods':
 		*clr & cla
 		minut += 10
-		stren_exp += rand(1,2)
-		agil_exp += rand(1,2)
+		swamprand = pcs_stren + pcs_agil
+		stren_exp += rand(0,1)
+		agil_exp += rand(0,1)
 		pcs_sweat += 30
+		temp_gads = RAND(1,100)
 		gs 'stat'
 
-		gs 'gadforestswamp', 'swampclothes'
-		
-		'You decide it''s wisest to try and turn back...'
-		
-		swamprand = pcs_stren + pcs_agil
-		temp_gads = RAND(1,100)
-		act 'Give it one more effort':
+		dynamic $swampclothes
+		'You decided not to tempt fate more and turn back...'
+
+		act 'Go':
 			if swamprand > temp_gads:gt 'gadforestswamp','1'
-			if Enable_nogameover = 0:
-				if swamprand < temp_gads and temp_gads >= 90:over = 10 & gt 'gameover'
-				if swamprand < temp_gads and temp_gads < 90:gt 'gadforestswamp', '2'
-			else
-				gt 'gadforestswamp', '2'
-			end
+			if swamprand < temp_gads and temp_gads <= 20:over = 10 & gt'gameover'
+			if swamprand < temp_gads and temp_gads > 20:gt 'gadforestswamp','2'
 		end
 	end
 	act 'Try to go on to the hut':
 		cla
 		*clr
 		minut += 10
-		stren_exp += rand(1,2)
-		agil_exp += rand(1,2)
+		swamprand = pcs_stren + pcs_agil
+		stren_exp += rand(0,1)
+		agil_exp += rand(0,1)
 		pcs_sweat += 30
+		temp_gads = RAND(1,100)
 		gs 'stat'
 
-		gs 'gadforestswamp', 'swampclothes'
-		
-		'You decide you might as well keep going forward at this point...'
-		
-		swamprand = pcs_stren + pcs_agil
-		temp_gads = RAND(1,100)
-		act 'Give it one more effort':
+		dynamic $swampclothes
+		'You thought more about it and decided against it. You move on from the house...'
+
+		act 'Go':
 			if swamprand > temp_gads:gt 'swamp_yard'
-			if Enable_nogameover = 0:
-				if swamprand < temp_gads and temp_gads >= 90:over = 10 & gt 'gameover'
-				if swamprand < temp_gads and temp_gads < 90:gt 'gadforestswamp', '2'
-			else
-				gt 'gadforestswamp', '2'
-			end
+			if swamprand < temp_gads and temp_gads <= 30:over = 10 & gt'gameover'
+			if swamprand < temp_gads and temp_gads > 30:gt 'gadforestswamp','2'
 		end 
 	end
 end
 
-if $ARGS[0] = 'swampclothes':
+$swampclothes = {
 	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp1.jpg"></center>'
 	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_ski1.jpg"></center>'
 	if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/goswamp_nude0.'+rand(4,5)+'.jpg"></center>'
-end
+}
 
 --- gadforestswamp ---------------------------------
+

locations/gadprostitutes.qsrc

@@ -1,200 +1,99 @@
 # gadprostitutes
+!!NOTE:  This is a placeholder.  I intend to flesh this out and maybe expand it to include the PC taking part as well.
 
 if $ARGS[0] = 'start':
-	$loc = 'gadprostitutes'
-	$metka = 'start'
-	$location_type = 'public_outdoors'
-	
-	$menu_loc = 'gadprostitutes'
-	$menu_arg = 'start'
-	menu_off = 0
-	
+	$metka = $ARGS[0]
+	$loc = $CURLOC
+    $location_type = 'public_outdoors'
 	CLOSE ALL
-	gs 'gadukino_event', 'sound'
-	gs'stat'
-	
-	cla
-	*clr
-	
-	'<center><h4>Main Road near Gadukino</h4></center>'
-	if month >= 11 or month <= 3:
-		'<center><img <<$set_imgh>> src="images/locations/highway/roadwinter.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/locations/highway/road.jpg"></center>'
+
+	if sound = 0:
+		if month >=11 and month <= 12 or month >=1 and month <=3:
+			if hour >= 8 and hour <= 23: PLAY 'sound/zima2.mp3',30
+			if hour >= 0 and hour <= 7: PLAY 'sound/zima2.mp3',30
+		else
+			if hour >= 8 and hour <= 23: PLAY 'sound/ptica.mp3',30
+			if hour >= 0 and hour <= 7: PLAY 'sound/ptica.mp3',30
+		end
 	end
+	clr
+	gs 'stat'
+	'<center><h4>Highway near Gadukino Village</h4></center>'
+	'You walk out to the highway '
 	
-	if hour < 18:
-		'You a look around for Mira but don''t see her here, maybe come back later in the evening.'
-		
-		act 'Walk back to the village': gt 'gadukino'
-	elseif hour >= 18:
-		if miraprost > 0 and npc_QW['A60'] > 15:
+	! commented out to make it more likely and similiar to the choices in miroslavaHome
+					!and hour <= 23:
+	if hour >= 18:
+		if miraprost > 0 and npc_QW['A60'] > 30:
+			!last events end after 1.2.5 will be 31 by illume
 			'You a look around for Mira and spot her standing below a streetlight down the road a little ways.'
-			
-			! event to become miras pimp if not the boys slut, not the village whore, and a dom
-			if mirapimp = 0 and npc_QW['A63'] < 10 and gadriver_gang = 0 and pcs_dom > 0:
-				act 'Make Mira your prostitute':
-					*clr & cla
-					
-					pcs_dom += rand(2,5)
-					mirapimp = 1
-					
-					gs 'Miroslava', 'miraclothes'
-					
-					'You call her over to you.  Mira, hurries over and looks at you with downcast eyes.  "Hi, <<$pcs_nickname>>.  You having a good night?"'
-					'You look at her angryly.  "A better question, my lovely whore, is ''Are you having a good night''?  I want 500 <b>₽</b> per customer you have each night."  You tell her earnestly.'
-					'Mira looks up in shock and with a hurt look on her face.  "What are you talking about?  Do you think I am a hooker?"'
-					'You step up to her and place your hand on her face.  Mira closes her eyes and leans into your hand.  You look into her eyes once she opens them and then SLAP her hard across the face.  Mira falls to the ground and starts to cry.  "You''re my property whore.  You will do whatever I tell you.  You will never lie to me ever again, or I swear I will make you pay.  Understand me?!"'
-					'Mira nods and she wipes away tears.'
-					'You  reach down and help her back to her feet.  You brush her off and help her fix her makeup.  "Good, now get that cute ass back out on that road and earn us some money."'
-					'You give Mira a little slap on the ass and smile as you watch Mira start her life as your prostitute.'
-					
-					act 'Finish':gt'gadprostitutes','start'
-				end
-			! can do prostitution with Mira if Sveta is the village whore - this can be achieved by doing Mitka''s questline
-			!elseif gadriver_gang = 2:
-				! future events to prostitute Sveta with Mira will go here - SM
-				! act 'Prostitute yourself with Mira':gt 'gadprostitutes', 'with_mira'
+			if mirapimp = 0:
+				pcs_dom += RAND(2,6)
+				mirapimp = 1
+				'You call her over to you.  Mira, hurries over and looks at you with downcast eyes.  "Hi, <<$pcs_nickname>>.  You having a good night?"'
+				'You look at her angryly.  "A better question, my lovely whore, is ''Are you having a good night''?  I want 300 <b>₽</b> per customer you have each night."  You tell her earnestly.'
+				'Mira looks up in shock and with a hurt look on her face.  "What are you talking about?  Do you think I am a hooker?"'
+				'You step up to her and place your hand on her face.  Mira closes her eyes and leans into your hand.  You look into her eyes once she opens them and then SLAP her hard across the face.  Mira falls to the ground and starts to cry.  "You''re my property whore.  You will do whatever I tell you.  You will never lie to me ever again, or I swear I will make you pay.  Understand me?!"'
+				'Mira nods and she wipes away tears.'
+				'You  reach down and help her back to her feet.  You brush her off and help her fix her makeup.  "Good, now get that cute ass back out on that road and earn us some money."'
+				act 'You smile wickedly as you watch Mira start her life as your prostitute-slave':gt 'gadprostitutes', 'start'
 			else
-				! events to prostitute just Mira
-				act 'Watch Mira prostitute herself': gt 'gadprostitutes', 'just_mira'
-			end
-		! can do prostitution without Mira if Sveta is the village whore - this can be achieved by doing Mitka''s questline
-		!elseif gadriver_gang = 2:
-			! future events to prostitute Sveta without Mira will go here - SM
-			! act 'Prostitute yourself':gt 'gadprostitutes', 'without_mira'
-		end
-		act 'Walk back to the village': gt 'gadukino'
-	end
-end
-
-! Prostitution events for Sveta and Mira together - SM
-!if $ARGS[0] = 'with_mira'
-!	act 'Try to attract a customer with Mira':
-!
-!	end
-!
-!	act 'Stop looking for customers with Mira': gt 'gadprostitutes', 'start'
-!end
-
-! Prostitution events for just Mira - SM
-if $ARGS[0] = 'just_mira':
-	gs 'Miroslava', 'miraclothes'
-
-	act 'Wait for Mira to attract a customer':
-		*clr & cla
-		minut += 30
-		gs 'stat'
-		
-		temp_gadpro = rand(1,10)
-		if temp_gadpro > 5:
-			miraprost += 1
-			if npc_QW['A60'] < 20: npc_QW['A60'] += 1 
-			
-			'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
-			
-			'It isn''t long before a customer pulls up in a nice vehicle. Mira approaches the vehicle and starts talking to the driver.'
-			'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle. It pulls away, but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
-			
-			act 'Watch Mira and the customer':
-				
-				temp_gadpro = rand(0,1)
-				if temp_gadpro = 0:
-					*clr & cla
-					gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
-					gs 'stat'
-					
-					'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1.mp4"></video></center>'
-					
-					'You walk up and look into the car. You see Mira giving one hell of a blowjob to her customer. Her head is bobbing up and down on his cock.'
-					
-					act 'Hide':
-						*clr & cla
-						gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
+				act 'Watch her perform a trick...':
+					pcs_dom += RAND(0,2)  
+					cls	
+					minut += 30
+					temp = RAND(0,5)
+					if temp = 0:
+						miraprost += 1
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirawish2_2.jpg"></center>'
+						'It isn''t long before Mira''s first customer pulls up in a nice vehicle.  She takes a deep breath, looks you in the eyes, you nod and wink, as she approachs the vehicle and starts talking to the driver.'
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
+						'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle.  It pulls away, but doesn''t go far.  You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
+					elseif temp = 1:
+						miraprost += 1
+						cls
 						gs 'stat'
-						
+						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1.mp4"></video></center>'	
+						'You walk up and look into the car.  You see Mira giving one hell of a blowjob to her first customer.  Her head is bobbing up and down on his 17cm cock.'
 						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_1.mp4"></video></center>'
-						
 						'You duck for cover as the guy suddenly gets out of the car and opens the passenger door, grabs Mira''s head and starts forcing his cock deep into her throat.'
-						
-						act 'Keep watching':
-							*clr & cla
-							gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
-							gs 'stat'
-							
-							'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
-							'Eventually, the guy grunts and cums all over Mira''s face and into her mouth. The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
-							'Mira walks back towards the road counting the money he gave her as she absentmindedly licks the cum as it drips down her face. She smiles at you and shows you the money as you join her.'
-							gs 'stat'
-							
-							act 'Finish':
-								*clr & cla
-								if mirapimp = 1: money += 500
-								gs 'arousal', 'end'
-								gs 'stat'
-								
-								gt 'gadprostitutes', 'just_mira'
-							end
-						end
-					end
-				elseif temp_gadpro = 1:
-					*clr & cla
-					gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
-					gs 'stat'
-					
-					'<center><video autoplay loop src="images/characters/village/mira/miraprost2.mp4"></video></center>'
-					'You walk up and look into the van. You see Mira showing her customer her tits and rubbing her pussy. You see a hungry gleam in the guy''s eyes, which Mira returns right back.'
-					
-					act 'Keep watching':
-						*clr & cla
-						gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
+						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
+						'Eventually, the guys grunts and cums all over Mira''s face and into her mouth.  The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
+						'<center><img <<$set_imgh>> src="images/characters/village/mira/miramoney.jpg"></center>'
+						gs 'arousal', 'voyeur', 25
+						gs 'stat'
+					elseif temp = 2:
+						cls
+						pcs_horny += 20
+						minut += 20
 						gs 'stat'
-						
+						'<center><video autoplay loop src="images/characters/village/mira/miraprost2.mp4"></video></center>'
+						'You walk up and look into the van.  You see Mira showing the john her tits and rubbing her pussy.  You see a hungry gleam in the guys eyes, which Mira returns in force.'
 						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_1.mp4"></video></center>'
-						
-						'Mira and the guy jump into the back of the van and you watch as he starts fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial ecstasy, partial pain, you know the guy is hitting or entering her cervix.'
-						
-						act 'Hide':
-							*clr & cla
-							gs 'arousal', 'voyeur', 10, 'exhibitionism', 'prostitution'
-							gs 'stat'
-							
-							'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
-							
-							'You have to duck behind some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
-							'After the wild sex, Mira and the guy sit in the van and talk for a bit. He gives her a nice wad of cash and she starts walking back towards the road. She smiles at you and shows you the money as you join her.'
-							
-							act 'Finish':
-								*clr & cla
-								if mirapimp = 1: money += 500
-								gs 'arousal', 'end'
-								gs 'stat'
-								
-								gt 'gadprostitutes', 'just_mira'
-							end
-						end
+						'Mira and her john jump into the back of the van and you watch as he start fucking her wet pussy.  His hand covers her mouth as she screams in ecstasy.  The guy pounds his 20cm cock deep into her pussy.  From Mira''s grunts of partial ecstasy, partial pain, you know the John is hitting or entering her cervix.'
+						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
+						'You have to duck behing some bushes as they move outside the van.  The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
+						'<left><video autoplay loop src="images/locations/gadukino/sex/mira/miracumpump.mp4"></video></left>''<right><video autoplay loop src="images/locations/gadukino/sex/mira/miracumdump.mp4"></video></right>'
+						'After the wild sex, Mira and the john sit in the van and talk for a bit.  He gives her a nice wad of cash and she starts walking to the village.  Seeing you, she smiles and waves a fist full of bills.'
+						gs 'arousal', 'voyeur', 25
+						gs 'stat'
+					else
+						'Mira walks along the street showing off her legs to passing car and trucks, but no one stops to partake of her services.'
 					end
+					act 'Walk back to the village': gt 'gadukino'
 				end
 			end
-		else
-			'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2_1.jpg"></center>'
-			
-			'Mira walks along the road showing off her body to passing car and trucks, but no one stops to pick her up.'
-			
-			act 'Continue' :gt 'gadprostitutes', 'just_mira'
+			act 'Walk back to the village': 
+				gs 'arousal', 'end'
+				gs 'stat'
+				gt 'gadukino'
+			end
 		end
+	else
+		'At this time no one will be here.'
 	end
-	
-	act 'Leave Mira to her work': gt 'gadprostitutes', 'start'
+	act 'Walk backto the village': gt 'gadukino'
 end
 
-! Prostitution events for Sveta alone - SM
-!if $ARGS[0] = 'without_mira'
-!	act 'Try to attract a customer':
-!
-!	end
-!
-!	act 'Stop looking for customers': gt 'gadprostitutes', 'start'
-!end
-
 --- gadprostitutes ---------------------------------
+

locations/gadukino_event.qsrc

@@ -1,12 +1,179 @@
 # gadukino_event
 
+if $ARGS[0] = 'mira_apologise':
+	minut += 5
+	gadboyday = daystart
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
+	'Walking through the village you hear someone catching up to you. Turning around, you see Mira nearing you.'
+
+	act 'Further':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+		gs 'Miroslava', 'miraclothes'
+
+		'Mira ran immediately up to you and started gossiping.'
+		'"<<$pcs_nickname>>, I heard what happened," she began gasping for breath. "I overheard Mitka and Kolyamba."'
+		'You stood there in silence waiting for her to catch her breath and to see what she''ll say.'
+		'"<<$pcs_nickname>>, could you ever forgive me for acting like a fool, I treated you like shit," she continued. "I had an epiphany and realized that you''re my only true friend here."'
+		'"So what now?," you asked, looking at her.'
+		'"Well, if you want, I can make it up to you?" she answered a bit embarrassed.'
+		'While you pondered what to answer, Mira stares at you, biting her lip impatiently.'
+		act 'Agree':
+			*clr & cla
+			minut += 5
+			pcs_horny += 5
+			mirasex = 2
+			gs 'stat'
+			gs 'Miroslava', 'miraclothes'
+
+			'You finally decide what to answer Mira.'
+			'"Ok, I agree to a truce," you say smiling, genuinely filled with joy ending all the drama. "I forgive you."'
+			'"And...?" Mira asks you.'
+			'Instead of answering her, you grab her by the arm and pull her into the bushes.'
+			act 'Further': gt 'mirasex','miralick_first'
+		end
+		act 'Refuse':
+			*clr & cla
+			minut += 30
+			mirasex = 3
+
+			gs 'stat'
+			gs 'Miroslava', 'miraclothes'
+
+			'You finally decide what to answer Mira.'
+			'"Ok, I agree to a truce," you say smiling, genuinely filled with joy that all the drama has come to an end. "I forgive you."'
+			'"And...?" Mira asks you.'
+			'"No, Mira, I don''t want anything more from you," you reply. "I''m not sexually interested in girls."'
+			'"Well, if you ever change your mind..." said Mira. "Let''s get back to the village."'
+			'You walk back to the village, gossiping about the boys in the village.'
+			act 'Go back to the village':gt 'gadukino'
+		end
+	end
+end
+
+if $ARGS[0] = 'mitka_apologise':
+	minut += 5
+	gadboyday = daystart
+	gadriver_gang = 4
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
+	'Walking through the village you hear someone catching up to you. Turning around, you see Mitka running towards you. Knowing from experience, that boys are faster runners, you stop and wait for him to catch up.'
+
+	act 'Further':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+
+		'<center><b><font color = maroon>Mitka Pin</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mitka.jpg"></center>'
+		'Mitka catches up to you and strikes up a conversation.'
+		'"Listen, <<$pcs_nickname>>. I beat up the other guys," he said with a smirk, seeing the fear on your face "I told them not to touch you anymore, and if they want anything to do with you they have to come and speak to me first."'
+		'You stood silently and waited to see what more he had to say.'
+		'"In short, I remember you as one of my best childhood friends, so I don''t want to argue anymore about Mira," he said with a grin. "Friends?"'
+		if npc_QW['A60'] >= 12:
+			'"So you won''t have sex with Mira anymore?," you ask relieved.'
+			'"Don''t worry, Mira won''t mind." Mitka snickered.'
+			'"You must stop having sex with her." you look at Mitka with distrust.'
+			'"Well, what can I do. If she begs me to it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
+			'Mitka starts walking towards Kolyamba''s house. You watch him for a while, until he disappears behind a corner.'
+		else
+			'"And you must stop having sex with Mira." you look at Mitka with distrust.'
+			'"Well, what can I do. If she begs me to it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
+			'Mitka starts walking towards Kolyamba''s house. You watch him for a while, until he disappears behind a corner.'
+		end
+		act 'Go back to the village':gt 'gadukino'
+	end
+end
+
+if $ARGS[0] = 'gang_apologise':
+	minut += 5
+	gadboyday = daystart
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
+	'Walking through the village you suddenly hear someone calling out to you by name. Turning back, you see that it is Uncle Stepan, coming your way. Remembering the recent events you pick up your pace. There is no way you want to relive the same thing again.'
+	'"<<$pcs_nickname>>, wait, I need to speak with you," Stepan yelled from afar, seeing that you are ready run away.'
+
+	act 'Wait':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+
+		'<center><b><font color = maroon>Uncle Styopa</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/uncle_stepan.jpg"></center>'
+		'For a moment you hesitated, wondering what he wants. While you contemplating to stay or run away, he caught up with you. He started nervously shifted from foot to foot, clearly not knowing how to begin the conversation. You looked puzzled at him thinking he would be prepared, when he finally speaks up.'
+		'"<<$pcs_nickname>>, -uh," he began, but immediately faltered. "In short, I''m trully sorry for what happened the other night... I don''t know what came over us, it was like a demon possessed me, I got aroused by Mitka''s drunken tales."'
+		'He looked at you with sorrow in his eyes. You did not expect that anyone of them would be sorry.'
+		'"I had a talk with the other men in the morning, and, uh," uncle Stepan losing his composure. "Well, in short, I decided that I wanted to talk to you, apologize and ask if you could forget about yesterday... I''m really sorry and I''m worried that we might have damaged you physically."'
+		'You looked skeptically at "your uncle", not really knowing if he''s joking or not.'
+		act 'Further':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/10000.jpg"></center>'
+			'Feeling that you''re still skeptical, Uncle Stepan reached into his sweatpants and pulled out a bundle, handing it over to you.'
+			'"Here," he showed the money in your hand. "It''s ten thousand rubles."'
+			'"What do you do want me to do with this?" you asked somewhat annoyed.'
+			'"I don''t know, you can do whatever you want with them," replied uncle Stepan. "Spend it on some treatment, or buy yourself something nice."'
+			'Not knowing what to choose, you look at the money, then at "your uncle."'
+
+			act 'Take the money':
+				*clr & cla
+				minut += 5
+				pcs_dom -= 1
+				gadriver_gang = 2
+				money += 10000
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/take_money.jpg"></center>'
+				'"Okay, I accept your money," you finally decide. "Let''s pretend nothing happened yesterday."'
+				'You take the money from his hand.'
+				'"That''s a relief..." Stepan says relieved. "I''ll be on my way."'
+				'You were about to turn and leave, when Uncle Stepan added:'
+				'"And yeah... <<$pcs_nickname>>, none of the men will fuck you like that again, so there''s no need to be afraid."'
+				'"I understand..." you answer, turning away and walking away from him.'
+				act 'Walk back to the village':gt 'gadukino'
+			end
+			act 'Refuse':
+				*clr & cla
+				minut += 5
+				pcs_dom += 1
+				gadriver_gang = 3
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
+				'"I don''t need your fucking money, I''m not a prostitute or a whore" you said in a firm voice, clearly annoyed, looking straight into Uncle Stepan eyes. "You think you can buy my silence with some money, are you really that dumb?"'
+				'He starts acting anxiously telling you once more to take the money. "I''ve already said it, I don''t want your money! But you don''t need to worry I won''t tell anyone what happened." you sternly tell him.'
+				'"That''s a relief..." Stepan says relieved. "I''ll be on my way."'
+				'Just as you were leaving, Uncle Stepan added:'
+				'"One last thing <<$pcs_nickname>>. None of the men will try to fuck you anymore. Mitka warned everyone that if it happens again their cannon would be shooting blanks for the rest of their life... If anyone approaches you, you come to me and I''ll sort it out."'
+				'"I understand..." you answer, turning away and walking away from him.'
+				act 'Walk back to the village':gt 'gadukino'
+			end
+		end
+	end
+	act 'Run away':
+		*clr & cla
+		minut += 15
+		gs 'stat'
+
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/girl_escapes.jpg"></center>'
+		'You started running away from the road, not stopping before you felt you were in the clear.'
+		'"Good thing I ran away from that evil man." you thought to yourself, looking around.'
+		act 'Further':gt'Meadow'
+	end
+end
+
 if $ARGS[0] = 'gadriver_gang':
 	minut += 5
-	menu_off = 1
 	gadriver_gang = 1
-	mitkaday = daystart
-	kolyambaday = daystart
-	vasyanday = daystart
+	gadboyday = daystart
+	npc_QW['A63'] = 21
 	pcs_dom -= 10
 	if pcs_health <= 100:pcs_health += 100
 	gs 'stat'
@@ -15,7 +182,7 @@ if $ARGS[0] = 'gadriver_gang':
 	'You walked along the path, fully immersed in your inner thoughts, you didn''t immediately notice the crowd of drunken village men. Noticing you alone the men turn their attention towards you.'
 	'One of the men grabs you and forces you away from the village. They start stripping you, surround you on all sides, taking out their cocks, warming up for what''s supposed to come. You think about resisting, but considering your reputation in the village, you find it''s not worth fighting, plus there was no way you could fight against this many men so you humbly kneel.'
 
-	act 'Suck on the nearest cock':
+	act 'Suck':
 		*clr & cla
 		gs 'underwear', 'wear'
 		gs 'clothing', 'strip'
@@ -30,7 +197,7 @@ if $ARGS[0] = 'gadriver_gang':
 		minut -= 5
 		gs 'stat'
 
-		act 'Suck the next guy':
+		act 'Keep sucking':
 			*clr & cla
 			gs 'npcgeneratec', 0, 'some country guy', rand(19,45)
 			gs 'boyStat', $npclastgenerated, 'a'
@@ -41,7 +208,7 @@ if $ARGS[0] = 'gadriver_gang':
 			gs 'arousal', 'bj', 5, 'sub', 'gangbang'
 			gs 'stat'
 
-			act 'Deepthroat two cocks at once':
+			act 'Further':
 				*clr & cla
 				gs 'npcgeneratec', 0, 'some country guy', rand(19,45)
 				gs 'boyStat', $npclastgenerated, 'b'
@@ -52,7 +219,7 @@ if $ARGS[0] = 'gadriver_gang':
 
 				gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 				gs 'stat'
-				act 'Make the first trio of guys cum':
+				act 'Further':
 					*clr & cla
 					minut += 5
 					gs 'cum_call', 'mouth', $boy, 1
@@ -60,11 +227,11 @@ if $ARGS[0] = 'gadriver_gang':
 					gs 'cum_call', 'stomach', $boy2, 1
 
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_cum1.jpg"></center>'
-					'It doesn''t take long before the first men finish, cumming in your mouth, on the face and chest. You continue sucking more men off, however...'
+					'It doesn''t take long before the first men finish, cumming in your mouth, on the face and chest. You continue sucking the men off, however...'
 
 					gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 					gs 'stat'
-					act 'Get penetrated from behind':
+					act 'Further':
 						*clr & cla
 						gs 'npcgeneratec', 0, 'some country man', rand(19,45)
 						gs 'boyStat', $npclastgenerated
@@ -78,7 +245,7 @@ if $ARGS[0] = 'gadriver_gang':
 						minut -= 5
 						gs 'stat'
 
-						act 'Another man enters you':
+						act 'Further':
 							*clr & cla
 							minut += 5
 							gs 'npcgeneratec', 0, 'man', rand(19,45)
@@ -97,7 +264,7 @@ if $ARGS[0] = 'gadriver_gang':
 							pose = 1
 							if rand(1,2) = 1:gs 'dinsex','sexcum'
 
-							act 'Feel some fingers enter your ass':
+							act 'Further':
 								*clr & cla
 								gs 'npcgeneratec', 0, 'drunk man', rand(19,45)
 								gs 'boyStat', $npclastgenerated
@@ -116,13 +283,13 @@ if $ARGS[0] = 'gadriver_gang':
 								minut -= 5
 								gs 'stat'
 
-								act 'Try to enjoy Mitka''s anal pounding':
+								act 'Further':
 									*clr & cla
 									gs 'boyStat', 'A63'
 									npc_sex[$boy] += 1
 
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog4.jpg"></center>'
-									'Mitka, not wanting to be out done by the man before, grabbed his cock and thrusted it in your anus and started pounding you relentlessly.'
+									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog2.jpg"></center>'
+									'The next man, not wanting to be worse than the man before, grabbed the cock and thrusted it in your anus and started pounding you relentlessly.'
 
 									gs 'dinSex','boy_wants_anal','lubri'
 									gs 'dinsex','analsex'
@@ -131,7 +298,7 @@ if $ARGS[0] = 'gadriver_gang':
 									minut -= 5
 									gs 'stat'
 
-									act 'Watch Uncle Stepan enter your pussy':
+									act 'Further':
 										*clr & cla
 										gs 'boyStat', 'A171'
 										npc_sex[$boy] += 1
@@ -149,7 +316,7 @@ if $ARGS[0] = 'gadriver_gang':
 										minut -= 5
 										gs 'stat'
 
-										act 'The next man in line starts to fuck you':
+										act 'Further':
 											*clr & cla
 											gs 'npcgeneratec', 0, 'village man', rand(19,45)
 											gs 'boyStat', $npclastgenerated
@@ -166,7 +333,7 @@ if $ARGS[0] = 'gadriver_gang':
 											if rand(1,2) = 1:gs 'dinsex','sexcum'
 											gs 'stat'
 
-											act 'Vasyan''s cock feels familiar inside of you':
+											act 'Further':
 												*clr & cla
 												minut += 5
 												gs 'boyStat', 'A62'
@@ -185,7 +352,7 @@ if $ARGS[0] = 'gadriver_gang':
 												gs 'stat'
 												*pl
 
-												act 'Switch back to oral sex':
+												act 'Further':
 													*clr & cla
 													minut += 5
 													if pcs_health <= 100:pcs_health += 100
@@ -198,7 +365,7 @@ if $ARGS[0] = 'gadriver_gang':
 													'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_oral4.jpg"></center>'
 													'The men decide that your holes need a rest, so the next few men are only going to get oral pleasure. They tell you to get on your knees and ordered you to suck.'
 
-													act 'Make them cum':
+													act 'Further':
 														*clr & cla
 														gs 'cum_call', 'mouth', $boy, 1
 														swallow += 1
@@ -219,7 +386,7 @@ if $ARGS[0] = 'gadriver_gang':
 														'They finish and walk away.'
 														gs 'stat'
 
-														act 'Resume doggy style':
+														act 'Further':
 															*clr & cla
 															gs 'npcgeneratec', 0, 'man', rand(19,45)
 															gs 'boyStat', $npclastgenerated
@@ -237,7 +404,7 @@ if $ARGS[0] = 'gadriver_gang':
 															'The men cum and walk away feeling satisfied.'
 															gs 'stat'
 
-															act 'Let the next group of guys share you':
+															act 'Further':
 																*clr & cla
 																gs 'npcgeneratec', 0, 'unfamiliar guy', rand(19,45)
 																gs 'boyStat', $npclastgenerated
@@ -255,7 +422,7 @@ if $ARGS[0] = 'gadriver_gang':
 																'The men cum and walk away feeling satisfied.'
 																gs 'stat'
 
-																act 'You wonder how wide your wholes must be at this point':
+																act 'Further':
 																	*clr & cla
 																	gs 'npcgeneratec', 0, 'guy', rand(19,45)
 																	gs 'boyStat', $npclastgenerated
@@ -271,7 +438,7 @@ if $ARGS[0] = 'gadriver_gang':
 																	minut -= 5
 																	gs 'stat'
 
-																	act 'At least this guys limp dick hurts less at this point':
+																	act 'Further':
 																		*clr & cla
 																		gs 'npcgeneratec', 0, 'Drunk man', rand(19,45)
 																		gs 'boyStat', $npclastgenerated
@@ -286,7 +453,7 @@ if $ARGS[0] = 'gadriver_gang':
 																		minut -= 5
 																		gs 'stat'
 
-																		act 'You''ve tried to keep count of all the men up until this point':
+																		act 'Further':
 																			*clr & cla
 																			gs 'boyStat', 'A172'
 																			npc_sex[$boy] += 1
@@ -303,7 +470,7 @@ if $ARGS[0] = 'gadriver_gang':
 																			minut -= 5
 																			gs 'stat'
 
-																			act 'But it doesn''t even matter anymore':
+																			act 'Further':
 																				*clr & cla
 																				gs 'npcgeneratec', 0, 'a man', rand(19,45)
 																				gs 'boyStat', $npclastgenerated
@@ -320,7 +487,7 @@ if $ARGS[0] = 'gadriver_gang':
 																				if rand(1,2) = 1:gs 'dinsex','sexcum'
 																				gs 'stat'
 
-																				act 'Another oral break':
+																				act 'Further':
 																					*clr & cla
 																					minut += 5
 																					if pcs_health <= 100:pcs_health += 100
@@ -330,7 +497,7 @@ if $ARGS[0] = 'gadriver_gang':
 																					'"I really hope that that was the last one..." you thought.'
 																					'This was just unfortunately wishful thinking. The men soon put you on your knees and then several men shoved their cocks in your face.'
 
-																					act 'Mount the next guy':
+																					act 'Further':
 																						*clr & cla
 																						gs 'npcgeneratec', 0, 'stranger', rand(19,45)
 																						gs 'boyStat', $npclastgenerated
@@ -347,7 +514,7 @@ if $ARGS[0] = 'gadriver_gang':
 																						if rand(1,2) = 1:gs 'dinsex','sexcum'
 																						gs 'stat'
 
-																						act 'Keep riding':
+																						act 'Further':
 																							*clr & cla
 																							gs 'npcgeneratec', 0, 'drunk guy', rand(19,45)
 																							gs 'boyStat', $npclastgenerated
@@ -367,7 +534,7 @@ if $ARGS[0] = 'gadriver_gang':
 																							if rand(1,2) = 1:gs 'dinsex','sexcum'
 																							*pl
 
-																							act 'Finish up cowgirl':
+																							act 'Further':
 																								*clr & cla
 																								gs 'npcgeneratec', 0, 'a man', rand(19,45)
 																								gs 'boyStat', $npclastgenerated
@@ -386,7 +553,7 @@ if $ARGS[0] = 'gadriver_gang':
 																								minut -= 5
 																								gs 'stat'
 
-																								act 'Another familiar cock enters you, this time it''s Kolyamba':
+																								act 'Further':
 																									*clr & cla
 																									gs 'npcgeneratec', 0, 'unknown man', rand(19,45)
 																									gs 'boyStat', $npclastgenerated
@@ -403,7 +570,7 @@ if $ARGS[0] = 'gadriver_gang':
 																									minut -= 5
 																									gs 'stat'
 
-																									act 'Get double penetrated':
+																									act 'Further':
 																										*clr & cla
 																										gs 'npcgeneratec', 0, 'a villager', rand(19,45)
 																										gs 'boyStat', $npclastgenerated
@@ -420,7 +587,7 @@ if $ARGS[0] = 'gadriver_gang':
 																										minut -= 5
 																										gs 'stat'
 
-																										act 'Plead with them to stop':
+																										act 'Further':
 																											*clr & cla
 																											minut += 5
 																											if pcs_health <= 100:pcs_health += 100
@@ -431,7 +598,7 @@ if $ARGS[0] = 'gadriver_gang':
 																											gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 																											gs 'stat'
 
-																											act 'Agree to just suck off the final men':
+																											act 'Further':
 																												*clr & cla
 																												minut += 5
 																												gs 'npcgeneratec', 0, 'stranger', rand(19,45)
@@ -444,26 +611,25 @@ if $ARGS[0] = 'gadriver_gang':
 																												gs 'boyStat', $npclastgenerated, 'd'
 																												gs 'cum_call', 'mouth', $boy1, 1
 																												gs 'cum_call', 'face', $boy2, 1
-																												swallow += 2
+																												swallow += 1
 																												gs 'stat'
 
 																												'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_cum3.jpg"></center>'
 																												'Like a panicked animal being pushed against a wall you gave it all, using all your might to please them. Your endeavor didn''t go unnoticed, some of men began cumming in your mouth and some of them on your face. There was so much sperm that your chest and abdomen also got covered.'
-																												act 'Collapse':
+																												act 'Further':
 																													*clr & cla
 																													minut += 5
 																													gs 'cum_call', 'mouth', $boy3, 1
 																													gs 'cum_call', 'face', $boy4, 1
-																													swallow += 2
+																													swallow += 1
 																													gang += 1
-																													menu_off = 0
 																													gs 'stat'
 
 																													'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_cum4.jpg"></center>'
 																													'When the last men finally came, the crowd began to disperse, leaving you wrapped in a tattered blanket. You hear them sharing impressions of their drunken antics.'
 																													gs 'arousal', 'end'
 																													gs 'stat'
-																													act 'Leave':minut += 5 & gt'Gadriver', 'Gadbitch'
+																													act 'Further':minut += 5 & gt'Gadriver', 'Gadbitch'
 																												end
 																											end
 																										end
@@ -494,173 +660,6 @@ if $ARGS[0] = 'gadriver_gang':
 	end
 end
 
-if $ARGS[0] = 'gang_apologise':
-	minut += 5
-	gadboyday = daystart
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
-	'Walking through the village you suddenly hear someone calling out to you by name. Turning back, you see that it is Uncle Stepan, coming your way. Remembering the recent events you pick up your pace. There is no way you want to relive the same thing again.'
-	'"<<$pcs_nickname>>, wait, I need to speak with you," Stepan yelled from afar, seeing that you are ready run away.'
-
-	act 'Wait':
-		*clr & cla
-		minut += 5
-		gs 'stat'
-
-		'<center><b><font color = maroon>Uncle Stepan</font></b></center>'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/uncle_stepan.jpg"></center>'
-		'For a moment you hesitated, wondering what he wants. While you contemplating to stay or run away, he caught up with you. He started nervously shifted from foot to foot, clearly not knowing how to begin the conversation. You looked puzzled at him thinking he would be prepared, when he finally speaks up.'
-		'"<<$pcs_nickname>>, -uh," he began, but immediately faltered. "In short, I''m trully sorry for what happened the other night... I don''t know what came over us, it was like a demon possessed me, I got aroused by Mitka''s drunken tales."'
-		'He looked at you with sorrow in his eyes. You did not expect that anyone of them would be sorry.'
-		'"I had a talk with the other men in the morning, and, uh," uncle Stepan losing his composure. "Well, in short, I decided that I wanted to talk to you, apologize and ask if you could forget about yesterday... I''m really sorry and I''m worried that we might have damaged you physically."'
-		'You looked skeptically at "your uncle", not really knowing if he''s joking or not.'
-		act 'Hear out his apology':
-			*clr & cla
-			minut += 5
-			gs 'stat'
-
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/10000.jpg"></center>'
-			'Feeling that you''re still skeptical, Uncle Stepan reached into his sweatpants and pulled out a bundle, handing it over to you.'
-			'"Here," he showed the money in your hand. "It''s ten thousand rubles."'
-			'"What do you do want me to do with this?" you asked somewhat annoyed.'
-			'"I don''t know, you can do whatever you want with them," replied uncle Stepan. "Spend it on some treatment, or buy yourself something nice."'
-			'Not knowing what to choose, you look at the money, then at "your uncle."'
-
-			act 'Take the money':
-				*clr & cla
-				minut += 5
-				pcs_dom -= 1
-				gadriver_gang = 2
-				npc_QW['A63'] = 22
-				money += 10000
-				gs 'stat'
-
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/take_money.jpg"></center>'
-				'"Okay, I accept your money," you finally decide. "Let''s pretend nothing happened yesterday."'
-				'You take the money from his hand.'
-				'"That''s a relief..." Stepan says relieved. "I''ll be on my way."'
-				'You were about to turn and leave, when Uncle Stepan added:'
-				'"And yeah... <<$pcs_nickname>>, none of the men will fuck you like that again, so there''s no need to be afraid."'
-				'"I understand..." you answer, turning away and walking away from him.'
-				'Despite Uncle Stepan''s promises, you can''t help but think that word of this may spread around the village as well.'
-				act 'Walk back to the village':gt 'gadukino'
-			end
-			act 'Refuse':
-				*clr & cla
-				minut += 5
-				pcs_dom += 1
-				gadriver_gang = 3
-				npc_QW['A63'] = 21
-				gs 'stat'
-
-				'<center><video autoplay loop src="images/pc/no.mp4"></video></center>'
-				'"I don''t need your fucking money, I''m not a prostitute or a whore" you said in a firm voice, clearly annoyed, looking straight into Uncle Stepan eyes. "You think you can buy my silence with some money, are you really that dumb?"'
-				'He starts acting anxiously telling you once more to take the money. "I''ve already said it, I don''t want your money! But you don''t need to worry I won''t tell anyone what happened." you sternly tell him.'
-				'"That''s a relief..." Stepan says relieved. "I''ll be on my way."'
-				'Just as you were leaving, Uncle Stepan added:'
-				'"One last thing <<$pcs_nickname>>. None of the men will try to fuck you anymore. Mitka warned everyone that if it happens again their cannon would be shooting blanks for the rest of their life... If anyone approaches you, you come to me and I''ll sort it out."'
-				'"I understand..." you answer, turning away and walking away from him.'
-				'As you walk away, you feel like this a good decision and all the men and boys in the village will be much better behaved now.'
-				act 'Walk back to the village':gt 'gadukino'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'mitka_apologise':
-	minut += 5
-	gadboyday = daystart
-	gadriver_gang = 4
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
-	'Walking through the village you hear someone catching up to you. Turning around, you see Mitka running towards you. Knowing from experience, that boys are faster runners, you stop and wait for him to catch up.'
-
-	act 'Hear out his apology':
-		*clr & cla
-		minut += 5
-		gs 'stat'
-
-		'<center><b><font color = maroon>Mitka Pin</font></b></center>'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mitka.jpg"></center>'
-		'Mitka catches up to you and strikes up a conversation.'
-		'"Listen, <<$pcs_nickname>>. I beat up the other guys," he said with a smirk, seeing the fear on your face "I told them not to touch you anymore, and if they want anything to do with you they have to come and speak to me first."'
-		'You stood silently and waited to see what more he had to say.'
-		'"In short, I remember you as one of my best childhood friends, so I don''t want to argue anymore about Mira," he said with a grin. "Friends?"'
-		if npc_QW['A60'] >= 11:
-			'"So you won''t have sex with Mira anymore?," you ask relieved.'
-			'"Don''t worry, Mira won''t mind." Mitka snickered.'
-			'"You must stop having sex with her." you look at Mitka with distrust.'
-			'"Well, what can I do. If she begs me to it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
-			'Mitka starts walking towards Kolyamba''s house. You watch him for a while, until he disappears behind a corner.'
-		else
-			'"And you must stop having sex with Mira." you look at Mitka with distrust.'
-			'"Well, what can I do. If she begs me to it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
-			'Mitka starts walking towards Kolyamba''s house. You watch him for a while, until he disappears behind a corner.'
-		end
-		act 'Go back to the village':gt 'gadukino'
-	end
-end
-
-if $ARGS[0] = 'mira_apologise':
-	minut += 5
-	gadboyday = daystart
-	gadriver_gang = 5
-	gs 'stat'
-
-	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
-	'Walking through the village you hear someone catching up to you. Turning around, you see Mira nearing you.'
-
-	act 'Wait':
-		*clr & cla
-		minut += 5
-		gs 'stat'
-		
-		gs 'Miroslava', 'miraclothes'
-
-		'Mira ran immediately up to you and started gossiping.'
-		'"<<$pcs_nickname>>, I heard what happened," she began gasping for breath. "I overheard Mitka and Kolyamba."'
-		'You stood there in silence waiting for her to catch her breath and to see what she''ll say.'
-		'"<<$pcs_nickname>>, could you ever forgive me for acting like a fool, I treated you like shit," she continued. "I had an epiphany and realized that you''re my only true friend here."'
-		'"So what now?," you asked, looking at her.'
-		'"Well, if you want, I can make it up to you?" she answered a bit embarrassed.'
-		'While you pondered what to answer, Mira stares at you, biting her lip impatiently.'
-		
-		act 'Agree':
-			*clr & cla
-			minut += 5
-			pcs_horny += 5
-			mirasex = 2
-			gs 'stat'
-			
-			gs 'Miroslava', 'miraclothes'
-			
-			'You finally decide what to answer Mira.'
-			'"Ok, I agree to a truce," you say smiling, genuinely filled with joy ending all the drama. "I forgive you."'
-			'"And...?" Mira asks you.'
-			'Instead of answering her, you grab her by the arm and pull her into the bushes.'
-			act 'Go to the meadow': gt 'mirasex','miralick_first'
-		end
-		act 'Refuse':
-			*clr & cla
-			minut += 30
-			mirasex = 3
-			gs 'stat'
-			
-			gs 'Miroslava', 'miraclothes'
-
-			'You finally decide what to answer Mira.'
-			'"Ok, I agree to a truce," you say smiling, genuinely filled with joy that all the drama has come to an end. "I forgive you."'
-			'"And...?" Mira asks you.'
-			'"No, Mira, I don''t want anything more from you," you reply. "I''m not sexually interested in girls."'
-			'"Well, if you ever change your mind..." said Mira. "Let''s get back to the village."'
-			'You walk back to the village, gossiping about the boys in the village.'
-			act 'Go back to the village':gt 'gadukino'
-		end
-	end
-end
-
 if $ARGS[0] = 'gadukino_mitka':
 	minut += 5
 	mitkaday = daystart
@@ -668,11 +667,10 @@ if $ARGS[0] = 'gadukino_mitka':
 
 	'<center><b><font color = maroon>Mitka Shkvoryen</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mitka.jpg"></center>'
-	
 	'Walking through the village you met Mitka. Seeing you, he started rubbing his crotch and said with a grin.'
 	'"Hey, <<$pcs_nickname>>, let''s go have some fun getting rid of this boner you just gave me."'
 
-	act 'Go with him': gt 'mitkasex', 'gad1', 'A63'
+	act 'Further': gt 'mitkasex', 'gad1', 'A63'
 end
 
 if $ARGS[0] = 'gadukino_kolyamba':
@@ -682,10 +680,9 @@ if $ARGS[0] = 'gadukino_kolyamba':
 
 	'<center><b><font color = maroon>Kolyamba Pyut</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
-	
 	'Walking through the village you met Kolyamba. Seeing you, he reached into his pants and started playing with his balls. He then grabbed you by the arm and dragged into the bushes next to the road.'
 
-	act 'Go with him': gt 'mitkasex', 'gad1', 'A61'
+	act 'Further': gt 'mitkasex', 'gad1', 'A61'
 end
 
 if $ARGS[0] = 'gadukino_vasyan':
@@ -693,16 +690,17 @@ if $ARGS[0] = 'gadukino_vasyan':
 	vasyanday = daystart
 	gs 'stat'
 
-	'<center><b><font color = maroon>Vasyan Paket</font></b></center>'
+	'<center><b><font color = maroon>Vasya Paket</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
-	
 	'Walking through the village you met Vasya. Seeing you, he smiled and waved you over to him. He kisses you on the lips and asks you to join him as he walked into the bushes next to the road.'
 
-	act 'Go with him': gt 'mitkasex', 'gad1', 'A62'
+	act 'Further': gt 'mitkasex', 'gad1', 'A62'
 end
 
 if $ARGS[0] = 'gadukino_2boys':
 	minut += 5
+	gadboyday = daystart
+	mitboyrand = rand(1,3)
 	gs 'stat'
 
 	if month >= 6 and month <= 8:
@@ -710,21 +708,11 @@ if $ARGS[0] = 'gadukino_2boys':
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/2boys.2.jpg"></center>'
 	end
-	
-	if $ARGS[1] = 1:
-		mitkaday = daystart
-		kolyambaday = daystart
-		'Walking through the village you met Mitka and Kolyamba. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
-	elseif $ARGS[1] = 2:
-		mitkaday = daystart
-		vasyanday = daystart
-		'Walking through the village you met Mitka and Vasya. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
-	elseif $ARGS[1] = 3:
-		kolyambaday = daystart
-		vasyanday = daystart
-		'Walking through the village you met Kolyamba and Vasya. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
-	end
-	act 'Go with them': gt 'mitkasex', 'gad2'
+	if mitboyrand = 1:'Walking through the village you met Mitka and Kolyamba. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
+	if mitboyrand = 2:'Walking through the village you met Mitka and Vasya. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
+	if mitboyrand = 3:'Walking through the village you met Kolyamba and Vasya. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
+
+	act 'Further': gt 'mitkasex', 'gad2'
 end
 
 if $ARGS[0] = 'mira_mitka':
@@ -737,7 +725,7 @@ if $ARGS[0] = 'mira_mitka':
 	'Walking with Mira in the village you met Mitka. Seeing Mira, he started playing with his balls and said with a grin.'
 	'"Oh hey Mira, let''s go have some fun getting rid of this boner you just gave me."'
 
-	act 'Go with them': gt 'mitkasex', 'forest1', 'A63'
+	act 'Further': gt 'mitkasex', 'forest1', 'A63'
 end
 
 if $ARGS[0] = 'mira_kolyamba':
@@ -749,7 +737,7 @@ if $ARGS[0] = 'mira_kolyamba':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
 	'Walking with Mira in the village you met Kolyamba. Seeing Mira, he started playing with his balls, dragging her into the bushes next to the road.'
 
-	act 'Go with them': gt 'mitkasex', 'forest1', 'A61'
+	act 'Further': gt 'mitkasex', 'forest1', 'A61'
 end
 
 if $ARGS[0] = 'mira_vasyan':
@@ -761,11 +749,13 @@ if $ARGS[0] = 'mira_vasyan':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
 	'Walking with Mira in the village you met Vasyan. Seeing Mira, he smiled and dragged her into the bushes next to the road.'
 
-	act 'Go with them': gt 'mitkasex', 'forest1', 'A62'
+	act 'Further': gt 'mitkasex', 'forest1', 'A62'
 end
 
 if $ARGS[0] = 'mira_2boys':
 	minut += 5
+	gadboyday = daystart
+	mitboyrand = rand(1,3)
 	gs 'stat'
 
 	if month >= 6 and month <= 8:
@@ -773,29 +763,16 @@ if $ARGS[0] = 'mira_2boys':
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/2boys.2.jpg"></center>'
 	end
-	
-	if $ARGS[1] = 1:
-		mitkaday = daystart
-		kolyambaday = daystart
-		'Walking with Mira in the village you met Mitka and Kolyamba. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
-	elseif $ARGS[1] = 2:
-		mitkaday = daystart
-		vasyanday = daystart
-		'Walking with Mira in the village you met Mitka and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
-	elseif $ARGS[1] = 3:
-		kolyambaday = daystart
-		vasyanday = daystart
-		'Walking with Mira in the village you met Kolyamba and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
-	end
+	if mitboyrand = 1:'Walking with Mira in the village you met Mitka and Kolyamba. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
+	if mitboyrand = 2:'Walking with Mira in the village you met Mitka and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
+	if mitboyrand = 3:'Walking with Mira in the village you met Kolyamba and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
 
-	act 'Go with them': gt 'mitkasex', 'forest2', $ARGS[1]
+	act 'Further': gt 'mitkasex', 'forest2', mitboyrand
 end
 
 if $ARGS[0] = 'mira_3boys':
 	minut += 5
-	mitkaday = daystart
-	kolyambaday = daystart
-	vasyanday = daystart
+	gadboyday = daystart
 	gs 'stat'
 
 	if month >= 6 and month <= 8:
@@ -806,7 +783,7 @@ if $ARGS[0] = 'mira_3boys':
 
 	'Walking with Mira in the village you met Mitka, Kolyamba and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
 
-	act 'Go with them': gt 'mitkasex', 'forest3'
+	act 'Further': gt 'mitkasex', 'forest3'
 end
 
 if $ARGS[0] = 'go_home':
@@ -817,7 +794,7 @@ if $ARGS[0] = 'go_home':
 				*clr & cla
 				'<center><b><font color="maroon">Your mother, Natasha <<$pcs_lastname>></font></b></center>'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
-				'Mom asks you "Well, <<$pcs_nickname>>, are you coming home with us or are you going to stay in the village with your grandparents?"'
+				'<<$npc_nickname[''A29'']>> asks you "Well, <<$pcs_nickname>>, are you coming home with us or are you going to stay in the village with your grandparents?"'
 				act 'Stay':
 					staygad = daystart
 					gadstay = 1 & !Flag to monthly pay scene
@@ -879,3 +856,4 @@ if $ARGS[0] = 'cleanup':
 end
 
 --- gadukino_event ---------------------------------
+

locations/mirasex.qsrc

@@ -1,14 +1,14 @@
 # mirasex
 
-!MiraLoc tells us where Mira is Located
-!----------------------------------------------
-!MiraLoc = 0 (Mira at home)
-!MiraLoc = 1 (Mira at river)
-!MiraLoc = 2 (Mira at meadow)
-!MiraLoc = 3 (Mira at forest)
-!MiraLoc = 4 (Mira at field)
-!MiraLoc = 5 (Mira with gop)
-!---------------------------------------------
+	!MiaLoc tells us where Mira is Located
+	!----------------------------------------------
+	!MiraLoc = 0 (Mira at home)
+	!MiraLoc = 1 (Mira at river)
+	!MiraLoc = 2 (Mira at meadow)
+	!MiraLoc = 3 (Mira at forest)
+	!MiraLoc = 4 (Mira at field)
+	!MiraLoc = 5 (Mira with gop)
+	!---------------------------------------------
 
 if $ARGS[0] = 'miralick_first':
 	*clr & cla
@@ -723,3 +723,4 @@ $text_cum[2] = 'After some time, Mira began to tremble and her pussy started rhy
 $text_cum[3] = 'Gradually, a pleasant warmth growing and throbbing in the abdomen, then the sensations crashing down on you and your body cover the hot waves of orgasm. At the same time you notice that Mira trembled all over and her pussy started rhythmically pulsing. She arched in orgasm and not holding back moaning loudly, squeezing your head with their feet and flooding his face with her juices.'
 
 --- mirasex ---------------------------------
+

locations/mitka.qsrc

@@ -1,29 +1,12 @@
 # mitka
-
-!---------------------------------------------
-! npc_QW['A63'] = 0 Sveta has never had sex with Mitka
-! npc_QW['A63'] = 1 Sveta has either had any sex with Mitka or Mitka has seen Sveta nude multiple times in the forest
-! npc_QW['A63'] = 2 to 9 Sveta continues to have sex with Mitka by himself or when drunk with him
-! npc_QW['A63'] = 10 Mitka shares Sveta with Kolyamba and Vasyan for the first time when Sveta is too drunk
-! npc_QW['A63'] = 11 to 19 Sveta continues to have sex with Mitka and Kolyamba and Vasyan in the forest and when she is drunk with them
-! npc_QW['A63'] = 20 Sveta gangbanged by all the drunk village men
-! npc_QW['A63'] = 21 Sveta rejected the village men''s money and they will no longer have sex with her - hunters are the exception they do not care and will continue to force Sveta to have sex with them in the swamp
-! npc_QW['A63'] = 22 Sveta accepted the village men''s money and is now the village prostitute. Also everyone in the village knows she is a whore and will demand sex from her all over the village
-! currently content ends after the river gangbang - the random scenes around the village and with the hunters are all done but none of the scenes for Sveta prostitution and beyond are written or coded yet - SM
-!---------------------------------------------
-	
-$menu_loc = 'mitka'
-$menu_arg = ''
-menu_off = 1
 gs 'stat'
-
 '<center><b><font color="maroon">Mitka Shkvoryen</font></b></center>'
 '<center><img <<$set_imgh>> src="images/locations/gadukino/village/mitka.jpg"></center>'
 *nl
 'He is barely older than you, you remember him from your childhood. You both used to swim in the local river together.'
-if npc_QW['A63'] = 0:
+if npc_QW['A63'] = 0 and rand(0,3) = 0:
 	'You blush as you recall that you used to swim naked when you were little.'
-	if pcs_horny >= 50: 'You bite your lip and glance down at his crotch and can''t help but wonder how much he has grown since then.'
+	if pcs_horny >= 40: 'You bite your lip and glance down at his crotch and can''t help but wonder how much he has grown since then.'
 end
 *nl
 
@@ -41,8 +24,7 @@ else
 		*nl
 		'You greet him, "I''m doing fine, thanks."'
 		'Mitka smiles, "That''s great to hear, <<$pcs_nickname>>.", then he offers, "<<$mitkaInvitation>>"'
-		
-		! Sveta has never had sex with Mitka and is still a virgin
+
 		If npc_QW['A63'] = 0 and pcs_vag = 0:
 			*nl
 			'Mitka scratches his balls and adds with a grin: "Hey <<$pcs_nickname>>, do you want to have some fun?"'
@@ -50,17 +32,17 @@ else
 			act 'I don''t know. My mother is obsessed with me staying a virgin.':
 				cla
 				'You turn away and slowly walk away from Mitka. You know you want him, but you promised your mother...'
-				act 'Walk away': gt 'gadukino'
+				act 'Continue': gt 'gadukino'
 			end
-			If pcs_horny >= 50:
-				act 'Hmm. Sounds tempting. I won''t have sex with you Mitka, but I will give you a blowjob.':
+			if pcs_horny >= 50:
+				act 'Hmm. No sex, Mitka. I will give you a blowjob only.':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhome.jpg"></center>'
 					*nl
 					'Mitka takes you to his house and onto the veranda. You kneel down on your knees and smiling up at him take his cock out of his pants and start to suck...'
 					gs 'boyStat', 'A63'
 					npc_sex[$boy] += 1
-					npc_QW['A63'] = 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'bj', 10, 'sub'
 					gs 'stat'
 
@@ -74,6 +56,7 @@ else
 							gs 'arousal', 'bj', 10, 'sub', 'deepthroat'
 							gs 'cum_call','mouth',1
 							swallow += 1
+							gs 'stat'
 						elseif temp_mb >= 3:
 							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjhomecum2.jpg"></center>'
 							*nl
@@ -85,8 +68,8 @@ else
 							'Mitka places his large hands on the back of your head and roughly forces you to take his cock deep into your throat. Slowly he builds up a rhythm and finally finishes in your mouth.'
 							gs 'arousal', 'bj', 10, 'sub', 'deepthroat', 'rough'
 							gs 'cum_call','mouth',1
-							sub += 1
 							swallow += 1
+							gs 'stat'
 						end
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -95,13 +78,11 @@ else
 					end
 				end
 			end
-		! Sveta is not the boys slut and Mira is
-		elseif npc_QW['A63'] < 10 or npc_QW['A60'] >= 11:
+		elseif npc_QW['A63'] < 13 or npc_QW['A60'] > 10:
 			temp_mb = RAND(0,5)
 			*nl
 			'Mitka scratches his balls and adds with a grin: "Hey <<$pcs_nickname>>, do you want to have some fun?"'
-			! vaginal
-			if temp_mb = 0 or (temp_mb < 2 and pcs_vag > 0):
+			if temp_mb = 0 or (temp_mb < 3 and pcs_vag > 0):
 				act 'Sure, sounds like fun':
 					*clr & cla
 				    if pcs_vag = 0:
@@ -111,9 +92,8 @@ else
 				    end
 					*nl
 					'Mitka takes you to his house and onto the veranda. He has you sit on the couch and begins pawing at your clothes pulling them off you.'
-					if pcs_vag = 0: 'You feel your hymen break as Mitka penetrates you. Mitka looks down at you in surprise and says, "Wow, how were you still a virgin? If I had known, I would have savoured this moment longer!"'
 					'Breathing heavily, Mitka gets off of you and says, "Nice fuck!"'
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'boyStat', 'A63'
 					npc_sex[$boy] += 1
 					gs 'arousal', 'vaginal', 10, 'sub'
@@ -123,7 +103,6 @@ else
 					act 'Leave':gt 'gadukino'
 				end
 				act 'Leave':gt 'gadukino'
-			! oral
 			elseif temp_mb < 5:
 				act 'Suck his cock':
 					*clr & cla
@@ -132,7 +111,7 @@ else
 					'Mitka takes you to his house and onto the veranda. He insists you get on your knees and suck his cock...'
 					gs 'boyStat', 'A63'
 					npc_sex[$boy] += 1
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'bj', 10, 'sub'
 					gs 'stat'
 
@@ -157,8 +136,6 @@ else
 							'Mitka places his large hands on the back of your head and roughly forces you to take his cock deep into your throat. Slowly he builds up a rhythm and finally finishes in your mouth.'
 							gs 'arousal', 'bj', 10, 'sub', 'deepthroat', 'rough'
 							gs 'cum_call','mouth',1
-							sub += 1
-							swallow += 1
 						end
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -167,9 +144,8 @@ else
 					end
 				end
 				act 'Leave':gt 'gadukino'
-			! anal
 			else
-				act 'I guess so':
+				act 'I guess':
 					*clr & cla
 					if pcs_ass < 10:
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaanalhome.jpg"></center>'
@@ -181,7 +157,7 @@ else
 					'Mitka takes you to his house and onto the veranda. He has you sit on the couch and begins pawing at your clothes pulling them off you.'
 					gs 'boyStat', 'A63'
 					npc_sex[$boy] += 1
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'anal', 15, 'sub', 'rough'
 					gs 'cum_call','anus',1
 					gs 'arousal', 'end'
@@ -191,8 +167,8 @@ else
 				end
 				act 'Leave':gt 'gadukino'
 			end
-		! Sveta is not the boys slut and Mira is not either
-		elseif npc_QW['A63'] < 10 and npc_QW['A60'] >= 2 and npc_QW['A60'] < 11:
+		elseif npc_QW['A63'] < 13 and npc_QW['A60'] >= 2 and npc_QW['A60'] <= 10:
+			temp_mb = RAND(3,10)
 			*nl
 			'Mitka scratches his balls and adds with a grin: "Hey <<$pcs_nickname>>, do you want to have some fun?"'
 
@@ -206,11 +182,13 @@ else
 		else
 			act 'Leave':gt 'gadukino'
 		end
-		! Sveta is not the boys slut, is not drunk, and is not a sub
 		if (npc_QW['A63'] < 10 and alko < 6 and sub < 25):
 			act 'Leave':gt 'gadukino'
 		end
 	end
 end
 
+if npc_QW['A63'] = 0:act 'Leave':gt 'gadukino'
+
 --- mitka ---------------------------------
+

locations/mitkabuh.qsrc

@@ -9,12 +9,17 @@
 !MiraLoc = 4 (Mira at field)
 !MiraLoc = 5 (Mira with gop)
 !---------------------------------------------
+! gadriver_gang ... if > 3 means that all the village guys promised not to have sex with PC (rachels explanation)
+! npc_drunk['A60'] += RAND(3,4)
+! mirapiss = RAND(0,10)
+! alko += rand(3,5)
+! npc_QW['A60']
 
 !! default entry point
 if $ARGS[0] = '':
 	gs 'stat'
 	if hour >= 17:
-		if MiraLoc ! 5: 
+		if MiraLoc ! 5 : 
 			gt 'mitkabuh','partyalone'
 		else
 			gt 'mitkabuh','partywithMira'
@@ -26,20 +31,10 @@ if $ARGS[0] = '':
 end
 
 if $ARGS[0] = 'partyalone':
-	$loc = 'mitkabuh'
-	$metka = 'partyalone'
-	$location_type = 'public_outdoors'
-	CLOSE ALL
-	
-	$menu_loc = 'mitkabuh'
-	$menu_arg = 'partyalone'
-	menu_off = 0
-	
-	!! repeat until drunk
-	! Sveta is not drunk
+!! repeat until drunk
 	if alko < 8:
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
-		'Sitting in a secluded spot behind your grandparents'' house the three village boys, Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut are drinking moonshine, without any snacks. Mitka pours the brew into a clear plastic shot glass and hands it over to you.'
+		'Set in a secluded spot behind your grandparents'' house the three village boys, Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut are drinking moonshine, without any snacks. Mitka pours the brew into a clear plastic shot glass and hands it over to you.'
 		act 'Leave':gt 'Gaddvor'
 		act 'Drink':
 			*clr & cla
@@ -57,15 +52,15 @@ if $ARGS[0] = 'partyalone':
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 			'You drink the moonshine and it burns as it goes down your throat. Your eyes water a little and you have a tough time catching your breath. You wipe your eyes and mouth on your sleeve, and look around but are a little disappointed because of the lack of snacks to munch on. Mitka said approvingly "Good shit, huh."'
 
-			act 'Continue drinking':gt 'mitkabuh'
+			act 'Catching your breath':gt 'mitkabuh'
 		end
-	! Sveta is drunk and is a sub or already had sex with Mitka or is the village whore
 	elseif gadriver_gang < 3 and (npc_QW['A63'] > 0 or sub >= 25):
 		*clr & cla
 		if mitkadaybuh ! daystart:
 			mitkadaybuh = daystart
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 			'You are trashed - your legs can barely keep you upright. Mitka, noticing your condition, grabs you by the waist. "Well, well little <<$pcs_nickname>>, come with me."'
+
 			if npc_QW['A63'] < 3:
 				act 'You nod and slur your words...mumbling something as you fell into his waiting arms':
 					*clr & cla
@@ -77,11 +72,11 @@ if $ARGS[0] = 'partyalone':
 					*nl
 					'Mitka takes you to his house and onto the veranda. He has you sit on the couch and begins pawing at your clothes pulling them off you.'
 					*nl
-					'Mitka, breathing heavily gets off of you and says, "You''re a good fuck! We should do it again soon!"'
+					'Mitka, breathing heavily gets off of you and says, "You''re a good fuck!"'
 					gs 'boyStat', 'A63'
 					npc_sex[$boy] += 1
 					pose = 0
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'dinsex', 'boy_puts_condom'
 					gs 'dinsex','vaginal_sex',10
 					gs 'dinsex','sexcum'
@@ -110,11 +105,10 @@ if $ARGS[0] = 'partyalone':
 			if npc_QW['A63'] < 10:
 				'The guys talk about you, not paying you any attention.'
 			else
-				' "Hey, <<$pcs_nickname>>, come drink with us again, we love fucking you!! Ha-ha!" They laugh as you make your way back to your grandparents cottage. You are too drunk to come up with a proper insult and just mumble, "I''m sure you can find someone else instead..."'
+				' "Hey, <<$pcs_nickname>>, come drink with us again, we love fucking you!! Ha-ha!" They laugh as you make your way back to your grandparents cottage. You scream at them, "Find someone-else, something... You fucking bastards."'
 			end
 			act 'Leave':gt'Gaddvor'
 		end
-	! Sveta is drunk but hasn''t done anything to encourage Mitka yet
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 		'You are absolutely trashed, your legs refuse to follow your directions and you slowly slide to the ground. Mitka, noticing your condition, he steps over to you and picks you up and laughs, "It seems, you''ve had enough..."'
@@ -123,30 +117,20 @@ if $ARGS[0] = 'partyalone':
 end
 
 if $ARGS[0] = 'partywithMira':
-	$loc = 'mitkabuh'
-	$metka = 'partywithMira'
-	$location_type = 'public_outdoors'
-	CLOSE ALL
-	
-	$menu_loc = 'mitkabuh'
-	$menu_arg = 'partywithMira'
-	menu_off = 0
-	
-	! first time to kick off Mira quest
 	if npc_QW['A60'] = 0:
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 		'Set in a secluded spot behind your grandparents'' house the three village boys, Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut are drinking moonshine, without any snacks. You and Mira approach them and ask for a drink. The guys immediately brighten up and nod their heads. They introduce theyselves and welcome you both to the party. Mitka pours the brew into a clear plastic shot glass and hands it over to you and Mira.'
 		npc_QW['A60'] = 1
-		act 'Drink with the boys': gt 'mitkabuh'
+		act 'Further': gt 'mitkabuh'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 		if alko = 0: 'Set in a secluded spot behind your grandparents'' house the three village boys, Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut are drinking moonshine, without any snacks. You and Mira approach them and ask for a drink. The guys immediately brighten up and actively nod their heads. Mitka pours the brew into a clear plastic shot glass and hands it over to you and Mira.'
 		if alko > 0: 'Set in a secluded spot behind your grandparents'' house the three village boys, Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut are drinking moonshine, without any snacks. Mitka pours the brew into a clear plastic shot glass and hands it over to you and Mira.'
-		!Sveta is not drunk and Mira is not drunk
 		if alko < 8 and npc_drunk['A60'] < 8:
-			if alko < 4: act 'Leave':MiraLoc = 0 & gt 'Gaddvor'
-			! 50/50 chance you drink or Mira drinks
-			temp_mb = rand(0,1)
+
+			if alko <4: act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+
+			temp_mb = RAND(0,1)
 			if temp_mb = 0:
 				act 'You take the liquor and swallow it quickly':
 					*clr & cla
@@ -159,155 +143,140 @@ if $ARGS[0] = 'partywithMira':
 					pcs_breath = 0
 					gs 'stat'
 
-					act 'Continue drinking':gt 'mitkabuh'
+					act 'Catching your breath':gt 'mitkabuh'
 				end
 			elseif temp_mb = 1:
 				act 'You pass the shot glass of liquor to Mira':
 					*clr & cla
-					npc_drunk['A60'] += rand(3,5)
+					npc_drunk['A60'] += RAND(3,5)
 					minut += 15
-					gs 'stat'
-					mirapiss = rand(0,10)
-					if npc_QW['A60'] >= 8 and npc_QW['A60'] <= 10 and mirapiss < 6:
+					mirapiss = RAND(0,10)
+					if npc_QW['A60'] >= 8 and mirapiss <= 2:
 						gt 'mitkabuh','with_mira_piss_1'
-					elseif npc_QW['A60'] >= 11 and mirapiss < 3:
+					elseif npc_QW['A60'] >= 11 and mirapiss >= 3 and mirapiss < 6:
 						gt 'mitkabuh','with_mira_piss_2'
-					elseif npc_QW['A60'] >= 11 and mirapiss < 6:
+					elseif npc_QW['A60'] >= 15 and mirapiss = 6:
 						gt 'mitkabuh','with_mira_piss_3'
 					else
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drinking.jpg"></center>'
 						'You pass Mira a shot glass full of liquor, she examines the glass''s contents for a moment, then gulps down the entire glass with a single tose of her head. Her eyes wided and she coughs a little, sucking in her breath with a smile. You talk lively with the guys as they drink as well.'
-						act 'Continue drinking':gt 'mitkabuh'
+						act 'Further':gt 'mitkabuh'
 					end
 				end
 			end
-		! Sveta is drunk
 		elseif alko >= 8:
 			mitkadaybuh = daystart
-			! never had sex with Mitka and Mira is not already the boys slut or Sveta is not the village whore
-			if (npc_QW['A63'] = 0 and npc_QW['A60'] < 11) or gadriver_gang >= 3:
+			if (npc_QW['A63'] = 0 and npc_QW['A60'] < 11) or gadriver_gang > 2:
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 				'You got absolutely trashed, your legs refuse to follow your directions and you slowly slide to the ground. Mitka, noticing your condition, he steps over to you and picks you up and laughs, "It seems, you''ve had enough..."'
-				'Mira comes over and takes you back to your grandparents house.'
 				gs 'stat'
 
-				act 'Leave':MiraLoc = 0 & gt 'Gaddvor'
-			! Mira is already the boys slut and cannot stand up to them to take you home anymore or Sveta has already had sex with Mitka
+				act 'Leave':MiraLoc = 0 & gt'Gaddvor'
 			else
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
-				if npc_QW['A60'] < 11:'You are trashed, your legs can barely hold you upright. Mitka, noticing your condition, steps over to you and grabs you by the waist and pulls you close. "Well now, <<$pcs_nickname>>, come with me and lets have some fun?"'
-				if npc_QW['A60'] >= 11:'You got so drunk on the swill they served you, your legs can barely hold you upright. Mitka notices your condition, he walks over and offers to fuck you right there in front of the others.'
-				menu_off = 1
-				temp_mb = RAND(0,5)
-				if temp_mb = 0 or (temp_mb < 3 and pcs_vag > 0):
-					act 'You mumble and slur your words':
-						*clr & cla
-						if pcs_vag = 0:
-							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkafirst.jpg"></center>'
-						else
+				if mirasextimes < 13:'You are trashed, your legs can barely hold you upright. Mitka, noticing your condition, steps over to you and grabs you by the waist and pulls you close. "Well now, <<$pcs_nickname>>, come with me and lets have some fun?"'
+				if mirasextimes >= 13:'You got so drunk on the swill they served you, your legs can barely hold you upright. Mitka notices your condition, he walks over and offers to fuck you right there in front of the others.'
+!				if npc_QW['A63'] < 10:
+					temp_mb = RAND(0,5)
+					if temp_mb = 0 or (temp_mb < 3 and pcs_vag > 0):
+						act 'You mumble and slur your words':
+							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasex1.jpg"></center>'
-						end
-						'Mitka, with a last wink to the other guys, and not paying Mira any attention, walks you back to his house''s porch where he quickly began to undress you.'
-						if pcs_vag = 0: 'You''re so drunk you don''t even feel your hymen break as Mitka penetrates you. Mitka looks down at you in surprise and says, "Wow, how were you still a virgin? If I had known, I would have savoured moment this longer!"'
-						gs 'boyStat', 'A63'
-						npc_sex[$boy] += 1
-						pose = 0
-						if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-						if mesec = 0:
-							gs 'dinsex', 'boy_puts_condom'
-							gs 'dinsex','vaginal_sex',10
-							gs 'dinsex','sexcum'
-						else
-							gs 'dinSex','boy_wants_anal','lubri'
-							gs 'dinsex','analsex',10
-						end
-						'Mitka, get off of you after cumming. "I really liked fucking you <<$pcs_nickname>>!"'
-						gs 'arousal', 'end'
-						gs 'stat'
+							'Mitka, with a last wink to the other guys, and not paying Mira any attention, walks you back to his house''s porch where he quickly began to undress you.'
+							gs 'boyStat', 'A63'
+							npc_sex[$boy] += 1
+							pose = 0
+							npc_QW['A63'] += 1
+							if mesec = 0:
+								gs 'dinsex', 'boy_puts_condom'
+								gs 'dinsex','vaginal_sex',10
+								gs 'dinsex','sexcum'
+							else
+								gs 'dinSex','boy_wants_anal','lubri'
+								gs 'dinsex','analsex',10
+							end
+							'Mitka, get off of you after cumming. "I really liked fucking you <<$pcs_nickname>>!"'
+							gs 'arousal', 'end'
+							gs 'stat'
 
-						act 'Leave':MiraLoc = 0 & gt'Gaddvor'
-					end
-				elseif temp_mb < 5:
-					act 'Suck':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabj.jpg"></center>'
-						'Mitka, with a last wink to the other guys, and not paying Mira any attention, walks you back to his house''s porch where he demanded you get on knees and give him a blowjob.'
-						gs 'boyStat', 'A63'
-						npc_sex[$boy] += 1
-						gs 'oral','start'
-						if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-						gs 'stat'
-						temp_mb = rand(0,5)
-						if temp_mb < 3:
-							act 'Swallow':
-								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum.jpg"></center>'
-								'Mitka, suddenly stops fucking your mouth for a few seconds. You tighten your grip around his cock without taking it out of your mouth. Mitka yells fiercely, as he begins to erupt into your mouth. Cum...you love the taste of the warm sticky liquid of life.'
-								minut += 10
-								swallow += 1
-								gs 'cum_call','mouth',$boy,1
-								gs 'arousal', 'end'
-								gs 'stat'
+							act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+						end
+					elseif temp_mb < 5:
+						act 'Suck':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabj.jpg"></center>'
+							'Mitka, with a last wink to the other guys, and not paying Mira any attention, walks you back to his house''s porch where he demanded you get on knees and give him a blowjob.'
+							gs 'boyStat', 'A63'
+							npc_sex[$boy] += 1
+							gs 'oral','start'
+							npc_QW['A63'] += 1
+							gs 'stat'
+							if rand(0,5) < 3:
+								act 'Swallow':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum.jpg"></center>'
+									'Mitka, suddenly stops fucking your mouth for a few seconds. You tighten your grip around his cock without taking it out of your mouth. Mitka yells fiercely, as he begins to erupt into your mouth. Cum...you love the taste of the warm sticky liquid of life.'
+									minut += 10
+									gs 'cum_call','mouth',$boy,1
+									gs 'arousal', 'end'
+									gs 'stat'
 
-								act 'Leave':MiraLoc = 0 & gt'Gaddvor'
-							end
-						elseif temp_mb < 5:
-							act 'Swallow':
-								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum1.jpg"></center>'
-								'You don''t have time enough to take Mitka''s cock in her mouth before he starts to cum on your lips and face, while you''re trying to figure out, what just happened...'
-								minut += 10
-								gs 'cum_call','face',$boy,1
-								gs 'arousal', 'end'
-								gs 'stat'
+									act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+								end
+							elseif temp_mb < 5:
+								act 'Swallow':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum1.jpg"></center>'
+									'You don''t have time enough to take Mitka''s cock in her mouth before he starts to cum on your lips and face, while you''re trying to figure out, what just happened...'
+									minut += 10
+									gs 'cum_call','face',$boy,1
+									gs 'arousal', 'end'
+									gs 'stat'
 
-								act 'Leave':MiraLoc = 0 & gt'Gaddvor'
-							end
-						else
-							act 'Swallow':
-								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum2.jpg"></center>'
-								'You''re trying to take Mitka''s cock in your mouth, but he rudely grabs you by the hair and pulls his cock out of your mouth and starts to spray cum on your face...'
-								minut += 10
-								swallow += 1
-								sub += 1
-								gs 'cum_call','face',$boy,1
-								gs 'arousal', 'end'
-								gs 'stat'
+									act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+								end
+							else
+								act 'Swallow':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum2.jpg"></center>'
+									'You''re trying to take Mitka''s cock in your mouth, but he rudely grabs you by the hair and pulls his cock out of your mouth and starts to spray cum on your face...'
+									minut += 10
+									gs 'cum_call','face',$boy,1
+									gs 'arousal', 'end'
+									gs 'stat'
 
-								act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+									act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+								end
 							end
 						end
-					end
-				else
-					act 'Slurred mumble':
-						*clr & cla
-						if pcs_ass < 10:
-							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaanal.jpg"></center>'
-						else
-							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaanal1.jpg"></center>'
-						end
-						'Mitka, with a last wink to the other guys, and not paying Mira any attention, walks you back to his house''s porch where he quickly began to undress you.'
-						gs 'boyStat', 'A63'
-						npc_sex[$boy] += 1
-						pose = 0
-						if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-						gs 'dinSex','boy_wants_anal','lubri'
-						gs 'dinsex','analsex',10
-						gs 'cum_call','anus',$boy,1
-						gs 'arousal', 'end'
-						gs 'stat'
+					else
+						act 'Slurred mumble':
+							*clr & cla
+							if pcs_ass < 10:
+								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaanal.jpg"></center>'
+							else
+								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaanal1.jpg"></center>'
+							end
+							'Mitka, with a last wink to the other guys, and not paying Mira any attention, walks you back to his house''s porch where he quickly began to undress you.'
+							gs 'boyStat', 'A63'
+							npc_sex[$boy] += 1
+							pose = 0
+							npc_QW['A63'] += 1
+							gs 'dinSex','boy_wants_anal','lubri'
+							gs 'dinsex','analsex',10
+							gs 'cum_call','anus',$boy,1
+							gs 'arousal', 'end'
+							gs 'stat'
 
-						act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+							act 'Leave':MiraLoc = 0 & gt'Gaddvor'
+						end
 					end
-				end
+!				end
 			end
-		! Mira is drunk
 		else
 			if npc_QW['A60'] = 5:
-				menu_off = 1
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
 				'You''re already drunk, but remember Mira''s words, Therefore, still trying not to touch any of the others. Mira threw you a knowing look, and as soon as they said their goodbyes to you, you waited a couple of minutes before following behind Vasya and Kolambaya and go to Mitka''s home. A little short of a the house you hear the couple a few dozen feet in front of you, loudly chattering at each other. You fumble in the dark a bit before you find a hiding place to watch from without being seen yourself. You watch what is happening to Mira in the yard....'
@@ -329,6 +298,7 @@ if $ARGS[0] = 'partywithMira':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
 				'Mira got blind drunk, you had to support her all the way home so that she didn''t fall down. She mumbles something completely unintelligible at times and has no idea where she is. You yourself are no better - you can barely see in the dark and just want to get home and sleep in a soft warm bed. If you drink even one more glass you will fall over so you decide to leave for the night. You say goodbye to the boys and go home.'
+				mirasextimes += 1
 				minut += 10
 				gs 'stat'
 
@@ -339,7 +309,6 @@ if $ARGS[0] = 'partywithMira':
 end
 
 if $ARGS[0] = 'solo_3to9':
-	menu_off = 1
 	temp_mb = RAND(0,5)
 	if temp_mb = 0 or (temp_mb < 3 and pcs_vag > 0):
 		act 'Slurred mumble':
@@ -351,12 +320,11 @@ if $ARGS[0] = 'solo_3to9':
 			end
 			'Mitka takes you to his house and starts pulling off your clothes and tosses them aside.'
 			*nl
-			if pcs_vag = 0: 'You''re so drunk you don''t even feel your hymen break as Mitka penetrates you. Mitka looks down at you in surprise and says, "Wow, how were you still a virgin? If I had known, I would have savoured moment this longer!"'
 			'"Fuck me <<$pcs_nickname>>, your pussy felt so good wrapped around my dick!", Mitka whispered in your ear.'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
 			pose = 0
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+			npc_QW['A63'] += 1
 			if mesec = 0:
 				gs 'dinsex', 'boy_puts_condom'
 				gs 'dinsex','vaginal_sex',10
@@ -380,8 +348,7 @@ if $ARGS[0] = 'solo_3to9':
 			'Mitka takes you to his house, pulls off your shirt and then presses down on your shoulders; you know what he wants...'
 			gs 'oral','start'
 			gs 'stat'
-			temp_mb = RAND(0,5)
-			if temp_mb < 3:
+			if RAND(0,2) = 0:
 				act 'Swallow':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum.jpg"></center>'
@@ -389,13 +356,13 @@ if $ARGS[0] = 'solo_3to9':
 					minut += 10
 					gs 'cum_call','mouth',$boy, 1
 					swallow += 1
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'end'
 					gs 'stat'
 
 					act 'Leave':gt'Gaddvor'
 				end
-			elseif temp_mb < 5:
+			elseif RAND(0,1) = 0:
 				act 'Swallow':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum1.jpg"></center>'
@@ -403,7 +370,7 @@ if $ARGS[0] = 'solo_3to9':
 					minut += 10
 					gs 'cum_call','face',$boy, 1,'','',20
 					gs 'cum_call','mouth',$boy, 1,'','',20
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -415,11 +382,9 @@ if $ARGS[0] = 'solo_3to9':
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjcum2.jpg"></center>'
 					'You''re bobbing your head up and down fiercely as you cram as much of his ''yummy'' cock as deep in your mouth and throat as you can take it. Mitka, roughly grabs you by by the hair and pulls his cock out of your earger mouth and starts to spurt warm sticky spunk all over your face and hair...'
 					minut += 10
-					swallow += 1
-					sub += 1
 					gs 'cum_call','face',$boy, 1,'','',20
 					gs 'cum_call','hair',$boy, 1,'','',20
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -442,7 +407,8 @@ if $ARGS[0] = 'solo_3to9':
 			pose = 0
 			gs 'dinSex','boy_wants_anal','lubri'
 			gs 'dinsex','analsex',10
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+			if pcs_ass < 10:sub += RAND(0,1)
+			npc_QW['A63'] += 1
 			gs 'arousal', 'end'
 			gs 'stat'
 
@@ -452,7 +418,6 @@ if $ARGS[0] = 'solo_3to9':
 end
 
 if $ARGS[0] = 'solo_10':
-	menu_off = 1
 	act 'You mumble and slur your words...':
 		*clr & cla
 		minut += 5
@@ -462,14 +427,13 @@ if $ARGS[0] = 'solo_10':
 		'"Well, that''s ... a beautifully sight," Mitka stammers smugly. "So let''s get this party started!"'
 
 		if sub > 0:
-			act 'Bend over':
+			act 'Bend over and get fucked':
 				*clr & cla
 				minut += 15
 				gs 'boyStat', 'A61'
 				npc_sex[$boy] += 1
 				pose = 1
-				sub += 1
-				if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+				npc_QW['A63'] += 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexpublic.jpg"></center>'
 				'You, drunkenly wallow to a nearby log, feeling a hand on your ass as Kolyamba steps up behind you and pulls your piss soaked panties down. '
 
@@ -492,18 +456,14 @@ if $ARGS[0] = 'solo_10':
 				minut += 10
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
-				'You refuse, drunkenly trying to fight off the advancing Kolyamba while barely standing on your feet. Your struggles piss Mitka off, he finally walks forward and grabs you by the arm and leads you to his veranda...'
-				'Mitka whispers in your ear, "You want my dick so bad then you can have it this time. But, next time you will do as I say. Understand?"'
-				act 'Moan in affirmation':
+				'You refuse, drunken fighting off the advancing Kolyamba while barely standing on your feet. Your struggles piss Mitka off, he finally walks forward and grabs you by the arm and leads you to his veranda...'
+				act 'Moan':
 					*clr & cla
 					minut += 15
 					gs 'boyStat', 'A63'
 					npc_sex[$boy] += 1
-					sub += 2
-					if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 					pose = 1
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexnopublic.jpg"></center>'
-					'All you can manage are moans as Mitka fucks you, but you can''t help but think to yourself that the other guys may start treating you differently after tonight.'
 					if mesec = 0:
 						gs 'dinsex', 'boy_puts_condom'
 						gs 'dinsex','vaginal_sex',10
@@ -523,16 +483,13 @@ if $ARGS[0] = 'solo_10':
 end
 
 if $ARGS[0] = 'solo_11':
-	menu_off = 1
-	if rand(0,5) < 2:
-		act 'Bend over':
+	if rand(0,5) < 5:
+		act 'Bend over and get fucked':
 			*clr & cla
 			minut += 15
 			gs 'boyStat', 'A61'
 			npc_sex[$boy] += 1
 			pose = 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-			sub += 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexpublic.jpg"></center>'
 			'You, drunkenly wallow to a nearby log, feeling a hand on your ass as Kolyamba steps up behind you and pulls your piss soaked panties down...'
 			if mesec = 0:
@@ -553,12 +510,10 @@ if $ARGS[0] = 'solo_11':
 			*clr & cla
 			gs 'boyStat', 'A61'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-			sub += 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpublic.jpg"></center>'
 			gs 'oral','start'
 			gs 'stat'
-			if rand(0,5) < 2:
+			if rand(0,5) < 5:
 				act 'Swallow':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpubliccum.jpg"></center>'
@@ -581,6 +536,7 @@ if $ARGS[0] = 'solo_11':
 					pcs_horny += 10
 					gs 'cum_call','mouth',$boy, 1
 					swallow += 1
+					npc_QW['A63'] += 1
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -592,13 +548,11 @@ if $ARGS[0] = 'solo_11':
 end
 
 if $ARGS[0] = 'solo_12':
-	menu_off = 1
-	if rand(0,5) < 2:
-		act 'Bend over':
+	if rand(0,5) < 4:
+		act 'Bend':
 			*clr & cla
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			pose = 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexpublic.jpg"></center>'
 			'You''re startled and stumble to your feet, you make your way over to Mitka and fall into into his waiting arms. You feel Mitka pull up your skirt up and bare your ass...'
@@ -620,10 +574,9 @@ if $ARGS[0] = 'solo_12':
 			*clr & cla
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpublic.jpg"></center>'
 			gs 'oral','start'
-			if RAND(0,5) < 2:
+			if RAND(0,5) < 4:
 				act 'Swallow':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpubliccum.jpg"></center>'
@@ -663,7 +616,7 @@ if $ARGS[0] = 'solo_12':
 						gs 'cum_call','face',$boy, 1
 						cumface += 2
 						gang += 1
-						sub += 1
+						npc_QW['A63'] += 1
 						gs 'arousal', 'end'
 						gs 'stat'
 
@@ -676,16 +629,14 @@ if $ARGS[0] = 'solo_12':
 end
 
 if $ARGS[0] = 'solo_13':
-	menu_off = 1
 	temp_mb = RAND(0,5)
-	if temp_mb < 2:
-		act 'Bend over':
+	if temp_mb < 3:
+		act 'Bend':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexpublic.jpg"></center>'
 			'You''re startled and stumble to your feet, you make your way over to Mitka and fall into into his waiting arms. You feel Mitka pull up your skirt up and bare your ass...'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			pose = 1
 			if mesec = 0:
 				gs 'dinsex', 'boy_puts_condom'
@@ -706,7 +657,6 @@ if $ARGS[0] = 'solo_13':
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpublic.jpg"></center>'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			gs 'oral','start'
 			gs 'stat'
 
@@ -730,7 +680,6 @@ if $ARGS[0] = 'solo_13':
 			'You, drunkenly and messily start sucking and kissing Kolyamba''s cock.'
 			gs 'boyStat', 'A61'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			gs 'oral','start'
 			gs 'cum_call','face',$boy, 1
 			gs 'boyStat', 'A63'
@@ -748,7 +697,7 @@ if $ARGS[0] = 'solo_13':
 			'You sit on the bench and the boys immediately begin to touch you and push there fingers into all your holes.'
 			gs 'arousal', 'vaginal_finger', 15, 'sub', 'gangbang'
 			gs 'arousal', 'anal_finger', 15, 'sub', 'gangbang'
-			minut +=15
+			minut -=15
 			gs 'stat'
 
 			act 'Lie down':
@@ -757,8 +706,7 @@ if $ARGS[0] = 'solo_13':
 				'You undress and lie down on a wooden bench...'
 				pose = 0
 				gang += 1
-				sub += 1
-				if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+				npc_QW['A63'] += 1
 				gs 'stat'
 
 
@@ -804,7 +752,6 @@ if $ARGS[0] = 'solo_13':
 end
 
 if $ARGS[0] = 'solo_14':
-	menu_off = 1
 	temp_mb = RAND(0,5)
 	if temp_mb < 2:
 		act 'Suck':
@@ -812,7 +759,6 @@ if $ARGS[0] = 'solo_14':
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpublic.jpg"></center>'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			gs 'oral','start'
 			gs 'stat'
 
@@ -829,13 +775,12 @@ if $ARGS[0] = 'solo_14':
 			end
 		end
 	elseif temp_mb = 2:
-		act 'Bend over':
+		act 'Bend':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkasexpublic.jpg"></center>'
 			'You stumble around until you come to reach a nearby log and placing both hands on it lean against it for support. Mitka walks up behind you and grabs your clothes and pulls them down, exposing your bare ass...'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			pose = 1
 			if mesec = 0:
 				gs 'dinsex', 'boy_puts_condom'
@@ -865,8 +810,6 @@ if $ARGS[0] = 'solo_14':
 			'You feel that soon they will cum all over your face and then lose interest in you...'
 			gs 'cum_call','face',$boy,1
 			cumface += 2
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-			sub += 1
 			gs 'arousal', 'end'
 			gs 'stat'
 
@@ -915,8 +858,6 @@ if $ARGS[0] = 'solo_14':
 							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagroupcum2.jpg"></center>'
 							gs 'boyStat', 'A62'
 							npc_sex[$boy] += 1
-							if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-							sub += 1
 							gs 'oral','start'
 							'Exhausted, you hear Vasya straining as he fucks your mouth. You immediately tighten your grip around his cock and squeeze it and guide it into your mouth. A few seconds later you feel the tart taste of semen...'
 							gs 'cum_call','mouth',$boy,1
@@ -937,7 +878,7 @@ if $ARGS[0] = 'solo_14':
 			gs 'boyStat', 'A61'
 			npc_sex[$boy] += 1
 			pose = 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+			npc_QW['A63'] += 1
 			gs 'stat'
 			if RAND(0,5) < 4:
 				act 'Moan':
@@ -993,7 +934,6 @@ if $ARGS[0] = 'solo_14':
 end
 
 if $ARGS[0] = 'solo_ge15':
-	menu_off = 1
 	temp_mb = RAND(0,5)
 	if temp_mb = 0:
 		act 'Suck':
@@ -1001,7 +941,6 @@ if $ARGS[0] = 'solo_ge15':
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkabjpublic.jpg"></center>'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			gs 'oral','start'
 			gs 'stat'
 
@@ -1024,7 +963,6 @@ if $ARGS[0] = 'solo_ge15':
 			'You stumble around until you come to reach a nearby log and placing both hands on it lean against it for support. Mitka walks up behind you and grabs your cloths and pulls them down, exposing your bare your ass...'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			if mesec = 0:
 				gs 'dinsex', 'boy_puts_condom'
 				gs 'dinsex','vaginal_sex',10
@@ -1046,7 +984,6 @@ if $ARGS[0] = 'solo_ge15':
 			'You feel that soon they will cum all over your face and then lose interest in you...'
 			gs 'boyStat', 'A61'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			gs 'arousal','bj',10,'sub','deepthroat'
 			gs 'cum_call','mouth',$boy,1
 			gs 'arousal', 'end'
@@ -1060,8 +997,6 @@ if $ARGS[0] = 'solo_ge15':
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagroup.jpg"></center>'
 			'You sit on the bench and the boys immediately begin to touch you and push their fingers into all your holes.'
 			pcs_horny += 20
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-			sub += 1
 			minut += 5
 			gs 'stat'
 
@@ -1118,8 +1053,7 @@ if $ARGS[0] = 'solo_ge15':
 			'Vasya and Kolyamba take you to Vasyan''s and into the summer kitchen, where they quickly began to take off your clothes...'
 			gs 'boyStat', 'A61'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-			sub += 1
+			npc_QW['A63'] += 1
 			minut += 15
 			gs 'stat'
 			if rand(0,5) < 4:
@@ -1179,10 +1113,8 @@ if $ARGS[0] = 'solo_ge15':
 			'You climb up on the bench and obediently get on all fours. The boys drunkenly talk among themselves about who will go first, you pull down your panties and get a couple seconds later a cock is crammed into your pussy...'
 			gs 'boyStat', 'A63'
 			npc_sex[$boy] += 1
-			if npc_QW['A63'] < 20: npc_QW['A63'] += 1
 			gs 'arousal','vaginal',10,'sub','gangbang'
 			gang +=1
-			sub += 1
 			gs 'stat'
 			if RAND(0,5) < 4:
 				act 'Moan':
@@ -1240,7 +1172,6 @@ if $ARGS[0] = 'solo_ge15':
 end
 
 if $ARGS[0] = 'with_mira_piss_1':
-	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mirapiss.jpg"></center>'
 	'You give Mira a shot glass of moonshine, but she asks you wait a few of minutes. You watch as she goes over to the nearest tree, where she lifts up her skirt, squats down and startis to pee. Vasya and Kolyamba are laughing loudly and stare hungerly at Mira. Mitka smiles and looks on indifferently. Having finish peeing, Mira walks back over to you as if nothing had happened and starts speaking to you and the guys as if nothing had happened. She gulps down her moonshine and asks for more.'
 	minut += 5
@@ -1302,19 +1233,18 @@ if $ARGS[0] = 'with_mira_piss_1':
 				end
 			else
 				'Mira only chuckles in response, and Mitka cuffs Vasyan on the head...'
-				act 'Continue drinking':gt 'mitkabuh'
+				act 'Further':gt 'mitkabuh'
 			end
 		end
 	else
-		act 'Continue drinking':gt 'mitkabuh'
+		act 'Further':gt 'mitkabuh'
 	end
 end
 
 if $ARGS[0] = 'with_mira_piss_2':
-	menu_off = 1
 	if npc_drunk['A60'] >= 4:
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11.jpg"></center>'
 		'"Well Mira," Mitka says while smiling. "Are you ready to work that pussy?" - The other guys voice their agreement.'
@@ -1322,14 +1252,13 @@ if $ARGS[0] = 'with_mira_piss_2':
 		act 'Watch':
 			*clr & cla
 			minut += 5
-			temp = rand(0,2)
-			if temp = 0:
+			if mirapiss = 3:
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11_1.jpg"></center>'
 				'Kolyamba is displeased with the show. He frowns and pulls Mira aside, where he orders her to work her cunt on his cock. He pulls off his pants and plops down, Mira jumps on top of him and starts to ride his cock until he cums in her cunt...'
-			elseif temp = 1:
+			elseif mirapiss = 4:
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11_2.jpg"></center>'
 				'Mitka grunts approvingly and takes the drunk Mira aside, where and he pulls down his pants a little and shoves his cock into her exposed pussy. He fucks her for several moments until her dumps his load into her pussy.'
-			elseif temp = 2:
+			elseif mirapiss = 5:
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11_3.jpg"></center>'
 				'Vasyan enjoys the show and asks Mira to follow him. She does so. Vasyan orders her to take off her clothes. Mira looks at him a second before complying with his order. Once completely naked Vasyan pulls off his pants and starts to fuck Mira. Vasyan, hoots and hollers as he roughly fucks Mira, acting like a cowboy. Eventally, he cums deep in her pussy.'
 			end
@@ -1338,11 +1267,11 @@ if $ARGS[0] = 'with_mira_piss_2':
 			gs 'arousal', 'end'
 			gs 'stat'
 
-			act 'Continue drinking':gt 'mitkabuh'
+			act 'Leave':MiraLoc = 0 & minut += 10 & gt'Gaddvor'
 		end
 	else
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
+		if npc_QW['A60'] < 20: npc_QW['A60'] += 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/village/mira/miraqw11_4.jpg"></center>'
 		'"Well Mira," Mirka says while smiling. "Are you ready to suck some cock?" - The other guys voice their agreement.'
@@ -1350,14 +1279,13 @@ if $ARGS[0] = 'with_mira_piss_2':
 		act 'Watch':
 			*clr & cla
 			minut += 5
-			temp = rand(0,2)
-			if temp = 0:
+			if mirapiss = 3:
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11_5.jpg"></center>'
 				'The boys immediately forget about you, as they surround Mira and pull out their cocks and present them to her. Mira in turn starts to suck off all the guys with loud slurping lips...'
-			elseif temp = 1:
+			elseif mirapiss = 4:
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11_6.jpg"></center>'
 				'The boys immediately forget about you, as they surround Mira and take turns roughly fucking her mouth. She grunts and gags a lot, but they don''t pay attention, they continuing to slam their cocks into her mouth and throat.'
-			elseif temp = 2:
+			elseif mirapiss = 5:
 				'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw11_7.jpg"></center>'
 				'The boys immediately forget about you, as they surround Mira and she in turns starts carefully sucking off each guy while jerking off the others with her free hands.'
 			end
@@ -1366,20 +1294,19 @@ if $ARGS[0] = 'with_mira_piss_2':
 			gs 'arousal', 'end'
 			gs 'stat'
 
-			act 'Continue drinking':gt 'mitkabuh'
+			act 'Leave':MiraLoc = 0 & minut += 10 & gt'Gaddvor'
 		end
 	end
 end
 
 if $ARGS[0] = 'with_mira_piss_3':
-	menu_off = 1
 	if npc_drunk['A60'] >= 4:
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
+		if npc_QW['A60'] < 25: npc_QW['A60'] += 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
 		'"I''m bored!" Mitka yells. "Mira get your ass down and give us a show to remember!" he snorts like a pig. "Show us how how loose your holes are whore..."'
-		'Mira mumbles affirmatively, and undresses.'
+		'Mira grunts affirmatively, and undresses.'
 
 		act 'Watch':
 			*clr & cla
@@ -1388,14 +1315,14 @@ if $ARGS[0] = 'with_mira_piss_3':
 			gs 'arousal', 'voyeur', 5, 'group'
 			gs 'stat'
 
-			act 'Continue drinking':gt 'mitkabuh'
+			act 'Further':gt 'mitkabuh'
 		end
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunkgirl.jpg"></center>'
 		'"I''m bored!" Mitka yells. "Mira get your ass down and give us a show to remember!" he snorts like a pig. "Show us how how loose your holes are whore..."'
-		'Mira refuses. Mitka and the others immediately demand she follow their orders. She continues to refuse to do their bidding. Eventually Mira offers a compromise and they agree with it, she''ll just strip naked and be made to crawl around in front of them on all fours, portraying a dog...'
+		'Mira refuses. Mitka and the others immediately demand she follow their orders. She continues to refuses to do their bidding. Eventually Mira offers a compromise and they agree with it, she''ll just strip naked and be made to crawl around in front of them on all fours, portraying a dog...'
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
+		if npc_QW['A60'] < 25: npc_QW['A60'] += 1
 		gs 'stat'
 
 		act 'Watch':
@@ -1405,9 +1332,10 @@ if $ARGS[0] = 'with_mira_piss_3':
 			gs 'arousal', 'voyeur', 5, 'group'
 			gs 'stat'
 
-			act 'Continue drinking':gt 'mitkabuh'
+			act 'Further':gt 'mitkabuh'
 		end
 	end
 end
 
 --- mitkabuh ---------------------------------
+

locations/mitkabuh_group.qsrc

@@ -11,21 +11,11 @@
 !---------------------------------------------
 !! default entry point
 if $ARGS[0] = '':
-	$loc = 'mitkabuh_group'
-	$metka = ''
-	$location_type = 'public_outdoors'
-	CLOSE ALL
-	
-	$menu_loc = 'mitkabuh_group'
-	$menu_arg = ''
-	menu_off = 0
-
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
-	'Sitting in a secluded spot behind your grandparents house, three village youths - Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut - drink moonshine without snacks. You and Mira approach them and ask them if you can join them. The boys immediately brighten up and nod their heads. Mitka immediately begins to pour the moonshine into some extra glasses, then passes one of them to you, saying that, as they don''t have enough cups, you and Mira may have to take turns drinking.'
-	!! repeat until drunk
-	! Sveta is not drunk
+	'Sitting in a secluded place, three village youths - Mitka Shkvoryen, Vasyan Paket and Kolyamba Pyut - drink vodka without snacks. You and Mira approach them and ask them if you can join them. The boys immediately brighten up and nod their heads. Mitka immediately begins to pour the moonshine into some extra glasses, then passes one of them to you, saying that, as they don''t have enough cups, you and Mira may have to take turns drinking.'
+!! repeat until drunk
 	if alko < 8:
-		if alko < 4: act 'Leave': gt'Gaddvor'
+		if alko <4: act 'Leave': gt'Gaddvor'
 		temp_mb = RAND(0,1)
 		if temp_mb = 0:
 			act 'You take the liquor and swallow it quickly':
@@ -34,36 +24,38 @@ if $ARGS[0] = '':
 				'You take a glass of moonshine and quickly gulp it down, you cough and suck in your breath. Mira meanwhile holds her drink and slowly sips on it, while the local youths encourage her to slug it down like you did.'
 				minut += 15
 				alko += rand (3,5)
-				gs 'stat'
 				if pcs_hydra >= 100:
 					pcs_hydra -= 10
 				else
 					pcs_hydra -= 20
 				end
+				temp_mb = 2
+				gs 'stat'
 
-				act 'Continue drinking':gt 'mitkabuh_group'
+				act 'Breathe':gt $curloc
 			end
 		else
 			act 'You pass the shot glass of liquor to Mira':
 				*clr & cla
-				npc_drunk['A60'] += RAND(3,5)
+				npc_drunk['A60'] += rand (3,5)
 				minut += 15
+				temp_mb = 0
+				mirapiss = RAND(0,10)
 				gs 'stat'
-				mirapiss = rand(0,10)
-				if npc_QW['A60'] >= 11 and mirapiss < 6:
+				if npc_QW['A60'] >= 15 and mirapiss <= 2:
 					gt 'mitkabuh_group','mirapiss_1'
-				elseif npc_QW['A60'] >= 11 and mirapiss < 3:
-					gt 'mitkabuh_group','with_mirapiss_2'
-				elseif npc_QW['A60'] >= 11 and mirapiss < 6:
+				elseif npc_QW['A60'] >= 15 and mirapiss >= 3 and mirapiss < 6:
+					gt 'mitkabuh_group','mirapiss_2'
+				elseif npc_QW['A60'] >= 15 and mirapiss = 6:
 					gt 'mitkabuh_group','mirapiss_3'
 				else
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drinking.jpg"></center>'
-					'You pass Mira a shot glass full of liquor, she examines the glass''s contents for a moment, then gulps down the entire glass with a single tose of her head. Her eyes wided and she coughs a little, sucking in her breath with a smile. You talk lively with the guys as they drink as well.'
-					act 'Continue drinking':gt 'mitkabuh_group'
+					'You pass Mira a shot glass full of liquor, she examines the glass''s contents for a moment, then gulps down the entire glass with a single tose of her head. Her eyes wided and she coughs a little, sucking in her breath with a smile. You talk with the guys as they drink as well.'
+
+					act 'Further':gt $curloc
 				end
 			end
 		end
-	! Sveta is drunk
 	else
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/drunkgirl1.jpg"></center>'
@@ -89,15 +81,12 @@ end
 
 if $ARGS[0] = 'mirapiss_1':
 	*clr & cla
-	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/drunk1.jpg"></center>'
 	'You pass Mira a shot glass full of liquor, she examines the glass''s contents for a moment, then gulps down the entire glass with a single tose of her head. Her eyes widened and she coughs a little, sucking in her breath with a smile.'
 	'After she drank the liquor, Vasyan jokingly says that you both look incredible, but would look even better with cocks in your mouths.'
 	'Mira, already pretty drunk, just giggles in response and nods. You shrug, and nod in agreement as well. Kolyamba immediately stands up and crushed Mira in a bear hug, while Vasyan approaches you. Mira, continues to giggle drunkenly as Kolyamba finished his hug and forces her to her knees. You smile at Vasyan as you see him slowly unzipping his pants and lowering them to his ankles. You then follow Mira''s example and get on your knees before Vasyan.'
 	minut += 5
-	if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-	if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-	sub += 2
+	if npc_QW['A60'] < 20: npc_QW['A60'] += 1
 	gs 'stat'
 
 	act 'Suck':
@@ -160,15 +149,12 @@ if $ARGS[0] = 'mirapiss_1':
 	end
 end
 if $ARGS[0] = 'mirapiss_2':
-	menu_off = 1
 	if npc_drunk['A60'] >= 4:
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuhshow1.jpg"></center>'
 		'"Bitches," Mitka yelled at both you and Mira. "I want to see a show, how about you bitches play with those holes? Show us how truely nasty you are!" The rest of the drunken guys yell their approval.'
 		'Mira smiled as you both willingly comply with his demands.'
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
 		gs 'stat'
 
 		act 'Sit on the bench':
@@ -230,9 +216,7 @@ if $ARGS[0] = 'mirapiss_2':
 		'"Alright girls," Mitka yelled. "Its time to pay us back for all the booze you have been drinking. Get on your knees and show us how much you like cock!" - The rest of the drunken guys yell their approval.'
 		'You and Mira both nod together and obediently kneel down right where you stood.'
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 2
+		if npc_QW['A60'] < 20: npc_QW['A60'] += 1
 		gs 'stat'
 
 		act 'Suck':
@@ -301,14 +285,13 @@ if $ARGS[0] = 'mirapiss_2':
 end
 
 if $ARGS[0] = 'mirapiss_3':
-	menu_off = 1
 	if npc_drunk['A60'] >= 4:
 		'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/miraqw15.jpg"></center>'
 		'"I''m bored!" Kolyamba yells. "Mira get your ass down and give us a show to remember!" he snorts like a pig. "Show us how how loose your holes are whore..."'
 		'Mira slurs affirmatively, and undresses. She gets down on all hours and sticks out her ass in the direction of the party. She begins to fuck many of her fingers into both holes. Mira moans like an animal as she forces more fingers into her stretched holes. She continues to awkwardly thrust her fingers deep into both her pussy and ass. Vasyan, looks over at you appraisingly and says, "<<$pcs_nickname>>, why don''t you join her" - and starts cheering you on. '
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
+		if npc_QW['A63'] < 20:npc_QW['A63'] += 1
 		gs 'stat'
 
 		act 'You join Mira':
@@ -334,8 +317,7 @@ if $ARGS[0] = 'mirapiss_3':
 		gs 'underwear', 'remove'
 		inhib_exp += rand(0,1)
 		minut += 5
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
+		if npc_QW['A60'] < 25: npc_QW['A60'] += 1
 		gs 'stat'
 
 		act 'Dance':
@@ -351,7 +333,6 @@ if $ARGS[0] = 'mirapiss_3':
 end
 
 if $ARGS[0] = 'mirafuck_0':
-	menu_off = 1
 	act 'Suck':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuhoral0.'+rand(1,8)+'.jpg"></center>'
@@ -359,9 +340,7 @@ if $ARGS[0] = 'mirafuck_0':
 		gs 'clothing', 'strip', 'gadukino'
 		gs 'underwear', 'remove'
 		minut += 10
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		if npc_QW['A60'] < 20: npc_QW['A60'] += 1
 
 		gs 'boyStat', 'A63'
 		npc_sex[$boy] += 1
@@ -393,7 +372,6 @@ if $ARGS[0] = 'mirafuck_0':
 end
 
 if $ARGS[0] = 'mirafuck_1':
-	menu_off = 1
 	act 'Fuck Mitka':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuhgroup1.'+rand(1,5)+'.jpg"></center>'
@@ -403,9 +381,7 @@ if $ARGS[0] = 'mirafuck_1':
 		gs 'boyStat', 'A63'
 		npc_sex[$boy] += 1
 		pose = 1
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
 		if mesec = 0:
 			gs 'dinsex', 'boy_puts_condom'
 			gs 'dinsex','vaginal_sex',10,'gangbang'
@@ -471,14 +447,11 @@ if $ARGS[0] = 'mirafuck_1':
 end
 
 if $ARGS[0] = 'mirafuck_2':
-	menu_off = 1
 	act 'Suck':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuh1.'+rand(1,5)+'.jpg"></center>'
 		'You are fully clothed and on your knees before the youths cocks. You open your mouth wide and slowly began to serve them.'
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		if npc_QW['A60'] < 20: npc_QW['A60'] += 1
 		gs 'boyStat', 'A63'
 		npc_sex[$boy] += 1
 		gs 'oral','start'
@@ -499,16 +472,14 @@ if $ARGS[0] = 'mirafuck_2':
 end
 
 if $ARGS[0] = 'mirafuck_3':
-	menu_off = 1
 	act 'Flop on the bed':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuh2.'+rand(3,4)+'.jpg"></center>'
 		'You and Mira both flop down on the bed and the boys immediately begin to touch you both and push there fingers into all your holes.'
 		gs 'clothing', 'strip', 'gadukino'
 		gs 'underwear', 'remove'
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		npc_QW['A63'] += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
 		gs 'stat'
 
 		act 'Suck':
@@ -560,8 +531,9 @@ if $ARGS[0] = 'mirafuck_3':
 	end
 end
 
+
+
 if $ARGS[0] = 'mirafuck_4':
-	menu_off = 1
 	act 'Go with the boys':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuhgroup.jpg"></center>'
@@ -572,12 +544,11 @@ if $ARGS[0] = 'mirafuck_4':
 		minut += 15
 		gs 'boyStat', 'A61'
 		npc_sex[$boy] += 1
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		if npc_QW['A63'] < 20:npc_QW['A63'] += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
 		gs 'stat'
 
-		if temp_mb < 3:
+		if temp_mb < 4:
 			act 'Moan':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuhgroup0.'+rand(1,5)+'.jpg"></center>'
@@ -634,7 +605,6 @@ if $ARGS[0] = 'mirafuck_4':
 end
 
 if $ARGS[0] = 'mirafuck_5':
-	menu_off = 1
 	act 'Get in position':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuh2.4.jpg"></center>'
@@ -644,12 +614,10 @@ if $ARGS[0] = 'mirafuck_5':
 		temp_mb = RAND(0,5)
 		minut += 15
 		pose = 1
-		if npc_QW['A60'] < 15: npc_QW['A60'] += 1
-		if npc_QW['A63'] < 20: npc_QW['A63'] += 1
-		sub += 1
+		if npc_QW['A60'] < 30: npc_QW['A60'] += 1
 		gs 'stat'
 
-		if temp_mb < 3:
+		if temp_mb < 4:
 			act 'Moan':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitka_group/mitkabuhgroup1.'+rand(1,5)+'.jpg"></center>'
@@ -707,3 +675,4 @@ if $ARGS[0] = 'mirafuck_5':
 end
 
 --- mitkabuh_group ---------------------------------
+

locations/mitkasex.qsrc

@@ -1,5 +1,4 @@
 # mitkasex
-
 gs 'stat'
 
 $textsexhanter = 'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Damn, I had to do an enema." - belatedly dumaeete you.'
@@ -16,8 +15,6 @@ $textsexhanter11 = 'Gradually, a pleasant warmth growing and throbbing in the ab
 $textsexhanter12 = 'You feel nice when <<dick>> cm dick is moving inside of your ass and you moan with pleasure. Gradually, a pleasant warmth growing and throbbing in the abdomen, then the sensations crashing down on you and your body cover the hot waves of orgasm.'
 
 if $ARGS[0] = 'forest1':
-	*clr & cla
-	menu_off = 1
 	minut += 5
 	boyAsex = 0
 	dirty_dickA = 0
@@ -29,7 +26,7 @@ if $ARGS[0] = 'forest1':
 	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaforestsex1.'+rand(1,2)+'.jpg"></center>'
-	'Entering deeper into the thicket <<$boydesc>> comes up to you and Mira. He undresses you both and makes you kneel before him...'
+	'Entering deeper into the thicket <<$boydesc>> comes up to you and Mira. He undresses you both makes you kneel before him...'
 	hantsexa = rand(1,3)
 	if hantsexa = 1:act 'Suck':gt 'mitkasex', 'forestOral1_1'
 	if hantsexa = 2:act 'Suck':gt 'mitkasex', 'forestOral1_2'
@@ -37,8 +34,6 @@ if $ARGS[0] = 'forest1':
 end
 
 if $ARGS[0] = 'forest2':
-	*clr & cla
-	menu_off = 1
 	boyAsex = 0
 	boyBsex = 0
 	dirty_dickA = 0
@@ -50,13 +45,13 @@ if $ARGS[0] = 'forest2':
 	pcs_dom -= 1
 	gang += 1
 	temp_ms = rand(1,2)
-	if $ARGS[1] = 4:
+	if ARGS[1] = 1:
 		if temp_ms = 1:gs 'boyStat', 'A63'
 		if temp_ms = 2:gs 'boyStat', 'A61'
-	elseif $ARGS[1] = 5:
+	elseif ARGS[1] = 2:
 		if temp_ms = 1:gs 'boyStat', 'A63'
 		if temp_ms = 2:gs 'boyStat', 'A62'
-	elseif $ARGS[1] = 6:
+	elseif ARGS[1] = 3:
 		if temp_ms = 1:gs 'boyStat', 'A61'
 		if temp_ms = 2:gs 'boyStat', 'A62'
 	end
@@ -71,8 +66,6 @@ if $ARGS[0] = 'forest2':
 end
 
 if $ARGS[0] = 'forest3':
-	*clr & cla
-	menu_off = 1
 	minut += 5
 	mitkaforestsex = 0
 	pcs_dom -= 1
@@ -103,8 +96,6 @@ if $ARGS[0] = 'forest3':
 end
 
 if $ARGS[0] = 'gad1':
-	*clr & cla
-	menu_off = 1
 	minut += 5
 	boyAsex = 0
 	boyAsexa = 0
@@ -124,7 +115,6 @@ end
 
 if $ARGS[0] = 'gad2':
 	*clr & cla
-	menu_off = 1
 	boyAsex = 0
 	boyBsex = 0
 	boyAsexa = 0
@@ -256,7 +246,7 @@ if $ARGS[0] = 'gadHandsCum2':
 	gs 'stat'
 	if kosmetica <= 0:'After the guys went about their business and you are left to clean yourself up.'
 	if kosmetica > 0:
-		act 'Continue':
+		act 'Further':
 			*clr & cla
 			minut += 5
 			body_write = 1
@@ -266,14 +256,12 @@ if $ARGS[0] = 'gadHandsCum2':
 			'When the guys finished, they painted on your body "fuck slut" and writing a couple of other obscene words, and went about their business. You are left to clean yourself up.'
 			gs 'arousal', 'end'
 			gs 'stat'
-			menu_off = 0
-			act 'Finish':gt $loc, $metka
+			act 'Further':gt $loc, $metka
 		end
 	else
 		gs 'arousal', 'end'
 		gs 'stat'
-		menu_off = 0
-		act 'Finish':gt $loc, $metka
+		act 'Further':gt $loc, $metka
 	end
 end
 
@@ -635,8 +623,7 @@ if $ARGS[0] = 'gadOralCum1':
 	'<<$textsexhanter3>>'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'gadSideVag1':
@@ -680,8 +667,7 @@ if $ARGS[0] = 'gadSideVagCum1':
 	$orgasm_txt = ''
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'gadMisVag1':
@@ -765,7 +751,7 @@ if $ARGS[0] = 'gadCowVag1':
 		if hantsexa = 4:act 'Doggy':gt 'mitkasex', 'gadDogVag1'
 		if hantsexa = 5:act 'Doggy':gt 'mitkasex', 'gadDogAnal1'
 	else
-		act 'Keep riding':gt 'mitkasex', 'gadCowVagCum1'
+		act 'To ride on':gt 'mitkasex', 'gadCowVagCum1'
 	end
 end
 
@@ -781,8 +767,7 @@ if $ARGS[0] = 'gadCowVagCum1':
 	*pl
 	'<<$textsexhanter3>>'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'gadDogAnal1':
@@ -830,8 +815,7 @@ if $ARGS[0] = 'gadDogAnalCum1':
 	*pl
 	'<<$textsexhanter3>>'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'gadCowAnal1':
@@ -872,8 +856,7 @@ if $ARGS[0] = 'gadHandsCum1':
 	gs 'arousal', 'hj', 5, 'sub'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 ! One guy vs GG and Mira
@@ -970,8 +953,7 @@ if $ARGS[0] = 'forestOralCum1_1':
 	'<<$textsexhanter10>>'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestSide1_1':
@@ -1015,8 +997,7 @@ if $ARGS[0] = 'forestSideCum1_1':
 	*pl
 	'<<$textsexhanter10>>'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestSide1_2':
@@ -1077,7 +1058,7 @@ if $ARGS[0] = 'forestCow1_1':
 		if hantsexa = 5:act 'Watch':gt 'mitkasex', 'forestDog1_2'
 		if hantsexa = 6:act 'Doggy':gt 'mitkasex', 'forestDog1_3'
 	else
-		act 'Keep riding':gt 'mitkasex', 'forestSideCum1_1'
+		act 'To ride on':gt 'mitkasex', 'forestSideCum1_1'
 	end
 end
 
@@ -1092,8 +1073,7 @@ if $ARGS[0] = 'forestSideCum1_1':
 	*nl
 	'<<$textsexhanter10>>'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestCow1_2':
@@ -1153,8 +1133,7 @@ if $ARGS[0] = 'forestCowCum1_2':
 	'<<$textsexhanter10>>'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestCowOral1_1':
@@ -1184,8 +1163,7 @@ if $ARGS[0] = 'forestCowOral1_1':
 		if hantsexa = 5:act 'Watch':gt 'mitkasex', 'forestDog1_2'
 		if hantsexa = 6:act 'Doggy':gt 'mitkasex', 'forestDog1_3'
 	else
-		menu_off = 0
-		act 'Finish':gt $loc, $metka
+		act 'Further':gt $loc, $metka
 	end
 end
 
@@ -1232,7 +1210,7 @@ if $ARGS[0] = 'forestDogCum1_1':
 	gs 'arousal', 'anal', 5, 'sub', 'group'
 	gs 'arousal', 'end'
 	gs 'stat'
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestDog1_2':
@@ -1267,8 +1245,7 @@ if $ARGS[0] = 'forestDogCum1_2':
 	gs 'arousal', 'voyeur', 1, 'sub', 'group'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestDog1_3':
@@ -1300,7 +1277,7 @@ if $ARGS[0] = 'forestDog1_3':
 	end
 end
 
-if $ARGS[0] = 'forestDogCum1_3':
+if $ARGS[0] = 'forestDogCum1_2':
 	minut += 5
 	pose = 1
 	gs 'cum_call', 'butt', $boy
@@ -1310,8 +1287,7 @@ if $ARGS[0] = 'forestDogCum1_3':
 	'<<$textsexhanter10>>'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 ! Two guys vs GG and Mira
@@ -1472,13 +1448,11 @@ if $ARGS[0] = 'forestOralCum2_1':
 	if boyB_cum = 0:
 		gs 'arousal', 'end'
 		gs 'stat'
-		act 'Continue':gt 'mitkasex', 'forestRelax2'
+		act 'Further':gt 'mitkasex', 'forestRelax2'
 	else
 		gs 'arousal', 'end'
 		gs 'stat'
-		boyB_cum = 0
-		menu_off = 0
-		act 'Finish':gt $loc, $metka
+		act 'Further':boyB_cum = 0 & gt $loc, $metka
 	end
 end
 
@@ -1624,8 +1598,7 @@ if $ARGS[0] = 'forestRelax2':
 	else
 		gs 'arousal', 'end'
 		gs 'stat'
-		menu_off = 0
-		act 'Finish':gt $loc, $metka
+		act 'Further':gt $loc, $metka
 	end
 end
 
@@ -1640,7 +1613,7 @@ if $ARGS[0] = 'forestDog_mira2_1':
 	if horny_boyB >= 100:'Suddenly the guy grabs Mira by the hair and setting himself on his knees, starts to masturbate in front of her face.'
 
 	if horny_boyB < 100:
-		act 'Continue':gt 'mitkasex', 'forestRelax2'
+		act 'Further':gt 'mitkasex', 'forestRelax2'
 	else
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -1659,7 +1632,7 @@ if $ARGS[0] = 'forestCow_mira2_1':
 	if horny_boyB >= 100:'Suddenly the guy rudely pushes her off and setting himself on his knees, starts to masturbate in front of the face.'
 
 	if horny_boyB < 100:
-		act 'Continue':gt 'mitkasex', 'forestRelax2'
+		act 'Further':gt 'mitkasex', 'forestRelax2'
 	else
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -2144,8 +2117,7 @@ if $ARGS[0] = 'forestCum3_3':
 	'Soon, unable to withstand your skill the guys start to finish. Jets of sperm hit you in the mouth and face. There was so much sperm your mouth can''t hold it all and it runs down your chin and onto your breasts. The guys have you clean their dicks before going about their business. You are left alone to clean up.'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestCum3_2':
@@ -2180,8 +2152,7 @@ if $ARGS[0] = 'forestCum3_2':
 	'Soon, unable to withstand your skill the guys start to finish. Jets of sperm hit you in the mouth and face. There was so much sperm your mouth can''t hold it all and it runs down your chin and onto your breasts. The guys have you clean their dicks before going about their business. You are left alone to clean up.'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestCum3_1':
@@ -2213,8 +2184,7 @@ if $ARGS[0] = 'forestCum3_1':
 	'<<$textsexhanter3>>'
 	gs 'arousal', 'end'
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 if $ARGS[0] = 'forestRelax_mira':
@@ -2458,8 +2428,8 @@ if $ARGS[0] = 'forestCum_mira3':
 	'Turning your head to look at Mira, you can see her, moaning loudly, as she plays with the cum covering her face and body.'
 	gs 'arousal', 'voyeur', 1
 	gs 'stat'
-	menu_off = 0
-	act 'Finish':gt $loc, $metka
+	act 'Further':gt $loc, $metka
 end
 
 --- mitkasex ---------------------------------
+

locations/swamp.qsrc

@@ -1,24 +1,17 @@
 # swamp
 
-$loc = 'swamp'
-$metka = ''
 $location_type = 'secluded'
-
-$menu_loc = 'swamp'
-$menu_arg = ''
-menu_off = 0
-
+$metka = $ARGS[0]
+$loc = $CURLOC
+gs 'gadukino_event', 'sound'
+cls
 new_boletus = 0
 new_bilberry = 0
+gs'stat'
+!gs'time'
 goswamp = 1
 
-gs 'gadukino_event', 'sound'
-gs 'stat'
-
-cls
-
 '<center><H4>Swamp</H4></center>'
-
 if month >= 4 and month <= 10:
 	if hour >= 6 and hour < 22:
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/swamp.jpg"></center>'
@@ -33,41 +26,36 @@ else
 	end
 end
 
-'You are in the swamp area of the forest.'
-'It is considered dangerous to hike here day unless extremely physically fit and should be avoided at night no matter what.'
-'But you can find a lot of mushrooms and berries here.'
-
-'There''s a small visible path to a clearing that leads to <a href="exec: gt ''swamp_yard'' ">the hut</a>, used by the hunters.'
+'You''ve found the swamp area of the forest. It is considered dangerous to hike here in the afternoon, and forbidden at night. But you can find a lot of mushrooms and berries in the woods near the swamp area.'
+'There''s a small visible path to a clearing that leads to <a href="exec: gt ''swamp_yard'' ">the old hut</a>, it is probably used as a hunting lodge.'
 
 if hour >= 6 and hour <= 21 and month >= 6 and month <= 9:
-	act 'Walk into the forest':gs 'clothing', 'swamp_clothes', 0 & minut += 30 & gt 'gadforest','4'
+	act 'Walk into the forest':gs 'clothing', 'swamp_clothes', 0  & minut += 30 & gt 'gadforest','4'
 end
 if hour >= 6 and hour < 21:
-	act 'Return to the edge of the forest':gs 'clothing', 'swamp_clothes', 0 & hanters = 0 & minut += 150 & gt 'gadforest','1'
+	act 'Return to the edge of the forest':gs 'clothing', 'swamp_clothes', 0  & hanters = 0 & minut += 150 & gt 'gadforest','1'
 else
-	act 'Return to the edge of the forest':gs 'clothing', 'swamp_clothes', 0 & hanters = 0 & gt 'gadforest_event', 'forest_road'
+	act 'Return to the edge of the forest':gs 'clothing', 'swamp_clothes', 0  & hanters = 0 & gt 'gadforest_event', 'forest_road'
 end
 
 if hour >= 6 and hour <= 20 and month >= 6 and month <= 9 and boletus + bilberry < 10 and swamp_day ! daystart:
-	act 'Look for mushrooms and berries (0:30)':
+	act 'Look for berries (0:30)':
 		cla
 		*clr
 		minut += 30
+		temp = RAND(1,2)
 		swamp_day = daystart
-		if goforest < 20:goforest += rand(1,2)
-		new_boletus += rand(4,5)
-		boletus += new_boletus
+		if goforest < 20:goforest += rand(0,1)
 		new_bilberry += rand(4,5)
 		bilberry += new_bilberry
 		pcs_mood += 5
 		gs 'stat'
 
 		gs 'gadforest', 'clothes1'
-		
-		'You spend half an hour wandering through the woods in search of mushrooms and berries and manage to find <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-		
-		act 'Continue': gt'swamp'
+		'You spend half an hour wandering through the woods in search of mushrooms or berries and manage to found <<new_bilberry>> kg of berries.'
+		act 'Further': gt'swamp'
 	end
 end
 
 --- swamp ---------------------------------
+