glife/locations/miroslava.qsrc

# miroslava
!2021/05/05
!2024/05/05 - Mira schedule introduced.
!locat['A60'] = Mira''s location. See 'miroslava_schedule'
!!Model used - Pyanzina Svetlana Petrovna

if $ARGS[0] = 'start' or $ARGS[0] = '':
	gs 'shortgs', 'setloc', 'miroslava', 'start'
	menu_off = 0

	gs 'boyStat', 'A60'
	girlage = age

	!locat['A60'] = Mira''s location. See 'miroslava_schedule'

	!---------------------------------------------
	! MiraVars['QW'] = 1 Mira met local guys
	! MiraVars['QW'] = 2 Mira admits that she likes Mitka
	! MiraVars['QW'] = 3 PC watches Mitka and Mira sex
	! MiraVars['QW'] = 4 Mira has to fullfill 3 wishes .. PC is Dom
	! MiraVars['QW'] = 5 Mira has to fullfill 3 wishes .. PC is Sub or Neutral
	! MiraVars['QW'] = 5 PC wants to watch M and M anal sex
	! MiraVars['QW'] = 6 PC watches M and M anal sex
	! MiraVars['QW'] = 7 First wish fulfilled
	! MiraVars['QW'] = 8 Second wish - mira has to pose as prostitute
	! MiraVars['QW'] = 9 Mira pissed at party
	! MiraVars['QW'] = 10 Mira pissed at party
	! MiraVars['QW'] = 11 Guys fuck Mira after she pissed at party
	! MiraVars['QW'] = 12 PC tells her about it
	! MiraVars['QW'] += Mira pose as a prostitute

	! daystart < MiraVars['emb_day'] hiding in her house after 3rd wish. Reduces 1 per day, plus 1 more per day if you talk to her

	gs 'miroslava', 'miraclothes'
	'Mira is a sociable girl. She is <<girlage>> years old. She lives with her father, who recently moved in here because of his considerable debts to some disreputable men in the city. He had to sell all the family''s property, including an apartment in the city center. With the money left over, they could only afford to buy a house in a rundown village like this one.'

	!npc_rel['A60'] is the measure of your friendship with Mira
	if npc_rel['A60'] < 25:
		'You two have a strained relationship.'
	elseif npc_rel['A60'] < 45:
		'You two have a normal relationship.'
	elseif npc_rel['A60'] < 65:
		'You have a good relationship with Mira.'
	elseif npc_rel['A60'] < 80:
		'You two have a great relationship.'
	else
		'You and Mira are best friends.'
	end

	if grandpaQW['chore_herd_cattle'] = 1:
		gs 'miroslava', 'cattle_chore_acts'
	end

	if MiraVars['QW'] = 11:
		act 'Talk to Mira in the meadow': gt 'gad_meadow', 'miraperversion11'
	elseif MiraVars['QW'] >= 15 and MiraVars['had_sex'] = 0 and locat['A60'] = 61 and npc_QW['A63'] < 13 and pcs_horny >= 40:
		act 'Talk to Mira in the meadow': gt 'gad_meadow', 'lesb_talk_mira1'
	elseif MiraVars['QW'] >= 15 and npc_QW['A63'] >= 13 and MiraVars['had_sex'] = 1 and MiraVars['cuni_given'] = 0 and locat['A60'] = 61 and pcs_horny >= 60:
		act 'Talk to Mira in the meadow': gt 'gad_meadow', 'lesb_talk_mira2'
	else
		if $loc = 'gad_meadow' and locat['A60'] = 61 and pcs_horny >= 40:
			if MiraVars['had_sex'] = 1 and npc_QW['A63'] < 13 and MiraVars['cuni_given'] > 0: act 'Talk to Mira in the meadow': gt 'gad_meadow', 'lesb_talk_mira3'
			if MiraVars['had_sex'] = 2 and npc_rel['A60'] >= 15: act 'Talk to Mira in the meadow': gt 'gad_meadow', 'lesb_mira'
		end

		act 'Leave': gt 'miroslava', 'leave'
		act 'Chat': gt 'miroslava', 'miratalk'

		if month >= 4 and month <= 10 and sunWeather = 1:
			act 'Offer to walk together': gt 'miroslava', 'walk_together'
		end

		if gad_meadow_found = 1 and MiraVars['meadow'] = 0 and (locat['A60'] / 10) ! 6:
			act 'Show her your secret place':
				menu_off = 1
				*clr & cla
				minut += 30
				npc_rel['A60'] += 2
				MiraVars['meadow'] = 1

				MiraVars['follower'] = 1
				MiraVars['follow_time'] = 1
				MiraVars['guest'] = 0

				if ($clothingworntype = 'nude' or PCloswimwear = 1):
					gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
					gs 'underwear', 'wear'
				end
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/girls_go.jpg"></center>'
				'You lead Mira through the thickets to the hidden meadow and all the way she talks about everything and anything, merrily telling stories from her past urban life.'

				act 'Continue': gt 'gad_meadow', 'start'
			end
		end

		if (MiraVars['meadow'] = 2 or MiraVars['meadow'] = 5) and hour >= 8 and hour < 19 and (locat['A60'] / 10) ! 6 and sunWeather = 1:
			act 'Offer to go to the Meadow': gt 'miroslava', 'offer_go_meadow'
		end

		if npc_rel['A60'] >= 15 and hour >= 20 and MiraVars['QW'] = 0 and locat['A60'] ! 60:
			act 'Ask if she''s met the local boys?':
				menu_off = 1
				*clr & cla
				minut += 2
				npc_rel['A60'] += 1
				if ($clothingworntype = 'nude' or PCloswimwear = 1):
					gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
					gs 'underwear', 'wear'
				end
				gs 'stat'
				gs 'miroslava', 'miraclothes'
				'You ask Mira if she has already met everyone in the village. When she says no, you offer to introduce her to some local guys, and she readily agrees, asking you to wait a few minutes while she changes and freshens up. When she comes out, you go drinking with the group of boys near your house...'

				MiraVars['follower'] = 1
				MiraVars['follow_time'] = 24 - hour
				act 'Continue': minut += 15 & gt 'mitkabuh'
			end
		end

		if npc_rel['A60'] >= 16 and hour >= 20 and MiraVars['QW'] > 0 and sunWeather = 1 and locat['A60'] ! 60:
			act 'Drink with the local guys': gt 'miroslava', 'offer_drink_boys'
		end

		if npc_rel['A60'] >= 20 and week >= 6 and hour > 18 and hour < 22:
			act 'Invite for a steam bath': gt 'miroslava', 'offer_steam_bath'
		end

		if sunWeather = 1 and temper >= 15 and month >= 5 and month <= 9 and locat['A60'] ! 51:
			act 'Offer to go to the river': gt 'miroslava', 'offer_go_river'
		end

		if sunWeather = 1 and temper >= 15 and month >= 5 and month <= 9 and locat['A60'] ! 60 and MiraVars['pickingtalk'] > 0 and npc_rel['A60'] >= 5:
			act 'Offer to go to the forest': gt 'miroslava', 'offer_go_forest'
		end

		if sunWeather = 1 and temper >= 15 and month >= 5 and month <= 9 and locat['A60'] = 60 and MiraVars['nudetalk'] > 1 and npc_rel['A60'] >= 5 and $clothingworntype ! 'nude' and forestpicnic = 0:
			if pcs_inhib >= 25 or exhibitionist_lvl > 1:
				act 'Offer to walk naked':
					menu_off = 1
					*clr & cla
					minut+=5
					gs 'clothing', 'strip_all', 'forest_edge'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/miraforest6.jpg"></center>'
					'You offered Mira to walk through the woods naked, and she immediately agreed.'

					act'Continue': gt 'gad_forest', 'forest_edge'
				end
			end
		end

		if npc_rel['A60'] >= 15 and locat['A60'] ! 60 and grandmaQW['block'] = 0 and (npc_QW['A63'] < 11 or MiraVars['QW'] >= 11 or MiraVars['had_sex'] > 1) and $start_type['loc'] = 'sg':
			gs 'miroslava', 'guest_acts'
		end


		if locat['A60'] ! locat['A60_prev'] and MiraVars['meadow'] > 1:
			*clr & cla
			menu_off = 1
			minut += 5
			gs 'stat'

			if locat['A60_prev'] = 10:
				gs 'miroslava', 'miraclothes'
				'"<<$pcs_nickname>>, you''re fun to be with, but my dad has chores for me to work on," Mira tells you.'
			else
				if locat['A60_prev'] = 51:
					if $clothingworntype ! 'nude':'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_go_home.jpg"></center>'
					if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_go_home_nude.jpg"></center>'
				else
					gs 'miroslava', 'miraclothes'
				end
				'"<<$pcs_nickname>>, you''re fun to be with, but I gotta get home. My dad has chores for me to work on." Mira tells you.'
			end

			if $clothingworntype = 'nude':
				gs 'clothing', 'wear_last_worn'
				gs 'underwear', 'wear'
			end

			act 'Go back to the village': gt 'Gadukino'
		end

		if npc_rel['A60'] >= 15 and daystart >= MiraVars['emb_day'] and (npc_QW['A63'] < 11 or MiraVars['QW'] >= 11 or MiraVars['had_sex'] > 1):
			temp_rand = rand(0, 20)
			if (temp_rand = 1 or temp_rand = 2) and MiraVars['guest'] = 0 and MiraVars['follow_time'] = 0 and locat['A60'] ! 60 and grandmaQW['block'] = 0 and $start_type['loc'] = 'sg':
				*clr & cla
				menu_off = 1
				minut += 1
				gs 'stat'

				if locat['A60'] = 51:
					gs 'miroslava', 'mira_river'
				else
					gs 'miroslava', 'miraclothes'
				end
				'"<<$pcs_nickname>>, it''s so boring here," Mira pouts, "I know! Let''s go to your place." Mira suggests brightly.'

				act 'Agree':
					*clr & cla
					MiraVars['follow_time'] = 1
					MiraVars['guest'] = 1
					if ($clothingworntype ! 'nude' and PCloswimwear = 0):
						minut += 15
						npc_rel['A60'] += 1
						gt 'gad_gphouse', 'entry'
					else
						npc_rel['A60'] += 1
						if npc_rel['A60'] < 30: npc_rel['A60'] += 1
						minut += 20
						gs 'underwear', 'wear'
						gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber

						'<center><img <<$set_imgh>> src="images/locations/gadukino/river/dressbch.jpg"></center>'
						'You change into your clothes and go home with Mira.'

						act 'Continue': gt 'gad_gphouse', 'entry'
					end
				end

				act 'Refuse':
					*clr & cla
					minut += 1
					npc_rel['A60'] -= 1
					gs 'stat'

					'<center><img <<$set_imgh>> src="images/pc/reactions/speak_to_the_hand.jpg"></center>'
					'You deny Mira, saying that you don''t want to right now.'

					act 'Continue': gt 'miroslava', 'start'
				end

			elseif (temp_rand = 3 or temp_rand = 4) and MiraVars['guest'] = 1:
				menu_off = 1
				*clr & cla
				minut += 1
				gs 'stat'
				gs 'miroslava', 'miraclothes'

				'"<<$pcs_nickname>>, come watch TV with me. That''s boring -"  Mira said.'

				act 'Agree':
					*clr & cla
					minut += 60
					if npc_rel['A60'] < 20: npc_rel['A60'] += 1
					pcs_mood += 10
					gs 'stat'

					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_tv'+rand(1,12)+'.jpg"></center>'
					'You watch TV with Mira for an hour.'

					act 'Continue': gt 'gad_gphouse', 'entry'
				end

				act 'Refuse':
					*clr & cla
					minut += 1
					npc_rel['A60'] -= 1

					'<center><img <<$set_imgh>> src="images/pc/reactions/speak_to_the_hand.jpg"></center>'
					'You deny Mira, saying that you don''t want to right now.'

					act 'Continue': gt $loc, $loc_arg
				end

			elseif temp_rand = 5 and locat['A60'] ! 61 and locat['A60'] ! 60 and (MiraVars['meadow'] = 2 or MiraVars['meadow'] = 5) and MiraVars['follow_time'] = 0 and hour < 19 and sunWeather = 1:
				menu_off = 1
				*clr & cla
				minut += 1
				gs 'stat'
				gs 'miroslava', 'miraclothes'
				'"<<$pcs_nickname>>, can we go to the meadow?" Mira asked you. "Let''s take a walk and get some fresh air."'

				act 'Agree':
					*clr & cla
					minut += 15
					if npc_rel['A60'] < 50: npc_rel['A60'] += 1
					MiraVars['follower'] = 1
					MiraVars['follow_time'] = 2
					if ($clothingworntype = 'nude' or PCloswimwear = 1):
						gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
						gs 'underwear', 'wear'
					end
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/girls_go.jpg"></center>'
					'You go with Mira through the dense undergrowth to the hidden meadow. Along the way, she merrily tells stories from her past city life.'

					act 'Continue': gt 'gad_meadow', 'start'
				end

				act 'Refuse':
					*clr & cla
					minut += 1
					npc_rel['A60'] -= 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/pc/reactions/speak_to_the_hand.jpg"></center>'
					'You deny Mira, saying that you don''t want to right now.'

					act 'Continue': gt 'miroslava', 'start'
				end

			elseif (temp_rand = 6 or temp_rand = 7) and locat['A60'] ! 51 and locat['A60'] ! 60 and sunWeather = 1 and temper >= 15 and month >= 5 and month <= 9 and MiraVars['follow_time'] = 0 and hour < 18:
				menu_off = 1
				*clr & cla
				minut += 1
				gs 'stat'
				gs 'miroslava', 'miraclothes'
				'"<<$pcs_nickname>>, do you want to go to the river?" - Mira asks. "Let''s go swim and sunbathe."'

				act 'Agree':
					*clr & cla
					minut += 15
					if npc_rel['A60'] < 30: npc_rel['A60'] += 1
					MiraVars['follower'] = 1
					MiraVars['follow_time'] = 2
					if ($clothingworntype = 'nude' or PCloswimwear = 1):
						gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
						gs 'underwear', 'wear'
					end
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/girls_go.jpg"></center>'
					'You decided to go with Mira to the village beach, and all the way, she goes, merrily chattering and telling stories.'

					act 'Continue': gt 'gad_beach', 'start', 1
				end

				act 'Refuse':
					*clr & cla
					minut += 1
					npc_rel['A60'] -= 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/pc/reactions/speak_to_the_hand.jpg"></center>'
					'You tell Mira that you don''t feel like going to the river now.'

					act 'Continue': gt 'miroslava', 'start'
				end

			elseif temp_rand = 8 or temp_rand = 9:
				menu_off = 1
				*clr & cla
				minut += 1
				MiraVars['follow_time'] = 1
				gs 'stat'
				gs 'miroslava', 'miraclothes'
				'Mira wants to chat with you.'
				'"<<$pcs_nickname>>, do you want to just chat a little?" Mira asks.'

				act 'Chat':gt 'miroslava', 'miratalk'

				act 'Refuse':
					*clr & cla
					minut += 1
					npc_rel['A60'] -= 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira.jpg"></center>'
					'"Not right now, Mira," you say. "I''m not in the mood to talk right now."'

					act 'Continue': gt 'miroslava', 'start'
				end

			elseif temp_rand > 10 and locat['A60'] ! 60 and hour >= 20 and sunWeather = 1 and MiraVars['follow_time'] = 0 and MiraVars['QW'] > 0:
				menu_off = 1
				*clr & cla
				minut += 1
				MiraVars['follower'] = 1
				MiraVars['follow_time'] = 2
				if ($clothingworntype = 'nude' or PCloswimwear = 1):
					gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
					gs 'underwear', 'wear'
				end
				gs 'stat'
				gs 'miroslava', 'miraclothes'

				'"<<$pcs_nickname>>, let''s hang out with those guys and drink a little?" Mira asks you. "I''m bored and want to party."'

				act 'Agree':
					minut += 15
					if MiraVars['QW'] >= 16 and GadBoy['river_gang'] = 2:
						gt 'mitkabuh_group'
					else
						gt 'mitkabuh'
					end
				end

				act 'Refuse':
					*clr & cla
					minut += 1
					npc_rel['A60'] -= 1
					gs 'stat'

					'<center><img <<$set_imgh>> src="images/pc/reactions/speak_to_the_hand.jpg"></center>'
					'You deny Mira, saying that you don''t want to right now.'

					act 'Continue': gt 'miroslava', 'start'
				end
			end
			killvar 'temp_rand'
		end

		if MiraVars['QW'] = 20 and locat['A60'] ! 60 and hour < 19 and month >= 5 and month <= 9:
			act '<b>Make your third wish</b>': gt 'miroslava', 'third_wish'
		end

		!if hour = 23:
		if hour = 23:
			menu_off = 1
			*clr & cla
			minut += 5
			gs 'stat'
			if locat['A60'] = 10:
				gs 'miroslava', 'miraclothes'
				'"<<$pcs_nickname>>, you''re fun to be with, but it''s late. I gotta get to bed. Dad has chores for me to work on tomorrow." Mira tells you.'
			else
				if locat['A60'] = 51:
					if $clothingworntype ! 'nude':'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_go_home.jpg"></center>'
					if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_go_home_nude.jpg"></center>'
				else
					gs 'miroslava', 'miraclothes'
				end

				'"<<$pcs_nickname>>, you''re fun to be with, but I gotta get home and get to bed. My dad has chores for me to work on tomorrow." Mira tells you.'
			end

			if $clothingworntype = 'nude':
				gs 'clothing', 'wear_last_worn'
				gs 'underwear', 'wear'
			end

			act 'Go back to the village': gt 'Gadukino'
		end
	end
end




if $ARGS[0] = 'cattle_chore_acts':
	act 'Talk to Mira':
		*clr & cla
		menu_off = 1
		minut += 60
		if temper >= 25 and sunWeather = 1:pcs_hydra -= 12
		if npc_rel['A60'] < 50: npc_rel['A60'] += 1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/graze_cow_mira.jpg"></center>'
		'You chat with Mira for an hour. You feel like your relationship with her has improved.'

		if hour < 13:
			act 'Continue': gt 'gad_field', 'cow'
		elseif hour < 16:
			act 'Continue': gt 'gad_field', 'cow2'
		else
			act 'Continue': gt 'gad_field', 'cow3'
		end
	end

	if hour < 13 or hour >= 16:
		act 'Go for a run on the field':
			*clr & cla
			menu_off = 1
			minut += 60
			fat -= 5
			gs 'exp_gain', 'run', 1
			gs 'sweat', 'add', 10
			pcs_mood += 5
			if temper >= 25 and sunWeather = 1: pcs_hydra -= 24
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/graze_cow_run_mira.jpg"></center>'
			'You spend the next hour running around the field with Mira.'

			if hour >= 16:
				act 'Continue': gt 'gad_field', 'cow3'
			else
				act 'Continue': gt 'gad_field', 'cow'
			end
		end

		if temper >= 15 and sunWeather = 1:
			act 'Tan by the field':
				menu_off = 1
				*clr & cla
				minut += 60
				pcs_mood += 10
				pcs_tan += 1
				gs 'sweat', 'add', 10
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/graze_cow_sun_mira.jpg"></center>'
				'You lie down next to Mira and tan together in the sun.'

				if hour >= 16:
					act 'Continue': gt 'gad_field', 'cow3'
				else
					act 'Continue': gt 'gad_field', 'cow'
				end
			end
		end

	elseif temper >= 15 and sunWeather = 1:
		if pcs_stam >= (5 * (10 - sport_clothes_exercise_bonus)) / 2:
			act 'Swim in the nearby river':
				menu_off = 1
				*clr & cla
				gs 'exercise', 'tier1', 15, 'stren', 'stren'
				cumspclnt = 4 & gs 'cum_cleanup'
				pcs_sweat = 10 + rand(0, 4)
				pcs_mood += 5
				if pcs_inhib < 50: inhib_exp += rand(1, 2)
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/graze_cow_river_mira.jpg"></center>'
				'You wade in the river, splashing around with Mira is a lot of fun.'
				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'

				act 'Continue': gt 'gad_field', 'cow2'
			end
		end

		act 'Tan by the river':
			menu_off = 1
			*clr & cla
			minut += 30
			gs 'sweat', 'add', 10
			pcs_mood += 5
			pcs_tan += 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/graze_cow_sun_mira2.jpg"></center>'
			'You lie down next to Mira and tan together in the sun.'

			act 'Continue': gt 'gad_field', 'cow2'
		end
	end

	act 'Depart': gt 'gad_field', 'field'
end


if $ARGS[0] = 'walk_together':
	menu_off = 1
	if daystart < MiraVars['emb_day']:
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_shy.jpg"></center>'
		'You ask Mira to stroll around the village, but Mira only shakes her head, saying she is too ashamed to leave the house.'

		act 'Leave': gt 'miroslava', 'leave'
	else
		if npc_QW['A63'] >= 13 and MiraVars['QW'] < 10 and MiraVars['had_sex'] <= 1:
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_said_no.jpg"></center>'
			'You ask Mira to walk around the village, but she tells you that she does not want people to see you walking together and then wonder if she, too, is such a whore...'

			act 'Leave': gt 'miroslava', 'leave'
		else
			if locat['A60'] = 60:
				minut += 85
			else
				minut += 40
			end

			if npc_rel['A60'] < 15: npc_rel['A60'] += 1

			MiraVars['guest'] = 0

			if ($clothingworntype = 'nude' or PCloswimwear = 1):
				gs 'underwear', 'wear'
				gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
			end
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/girls_walking'+rand(1,3)+'.jpg"></center>'
			'You invite her to wander around the village, and she gladly accepts. Then you walk together around the small village, telling each other different stories from your lives.'

			if GadBoy['river_gang'] = 2 and MiraVars['QW'] > 15 and hour >= 7 and hour < 20:
				temp_rand = rand(1, 12)
				! 33% chance one of the village boys will demand sex from Mira and Sveta
				if temp_rand <= 4:
					! 25% chance for more than 1 boy
					if temp_rand = 4:
						killvar 'temp_rand'
						if GadBoy['mitka_day'] ! daystart and GadBoy['kolyamba_day'] ! daystart and GadBoy['vasyan_day'] ! daystart:
							gt 'gadukino_event', 'mira_3boys'
						elseif GadBoy['mitka_day'] ! daystart and GadBoy['kolyamba_day'] ! daystart:
							gt 'gadukino_event', 'mira_2boys', '1'
						elseif GadBoy['mitka_day'] ! daystart and GadBoy['vasyan_day'] ! daystart:
							gt 'gadukino_event', 'mira_2boys', '2'
						elseif GadBoy['kolyamba_day'] ! daystart and GadBoy['vasyan_day'] ! daystart:
							gt 'gadukino_event', 'mira_2boys', '3'
						elseif GadBoy['mitka_day'] ! daystart:
							gt 'gadukino_event', 'mira_mitka'
						elseif GadBoy['kolyamba_day'] ! daystart:
							gt 'gadukino_event', 'mira_kolyamba'
						elseif GadBoy['vasyan_day'] ! daystart:
							gt 'gadukino_event', 'mira_vasyan'
						end
					! 75% chance for only 1 boy
					else
						killvar 'temp_rand'
						if GadBoy['mitka_day'] ! daystart:
							gt 'gadukino_event', 'mira_mitka'
						elseif GadBoy['kolyamba_day'] ! daystart:
							gt 'gadukino_event', 'mira_kolyamba'
						elseif GadBoy['vasyan_day'] ! daystart:
							gt 'gadukino_event', 'mira_vasyan'
						end
					end
				end
				killvar 'temp_rand'
			end

			act 'Finish your walk': gt 'miroslava', 'start'
		end
	end
end


if $ARGS[0] = 'offer_go_meadow':
	menu_off = 1
	if daystart < MiraVars['emb_day']:
		minut += 5
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_shy.jpg"></center>'
		'You ask Mira if she wants to go to the meadow, but Mira only shakes her head, saying she is too ashamed to leave the house.'

		act 'Leave': gt 'miroslava', 'leave'
	else
		if npc_QW['A63'] >= 13 and MiraVars['QW'] < 5 and MiraVars['had_sex'] <= 1:
			minut += 5
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_said_no.jpg"></center>'
			'You offer to walk with Mira outside the village, but she says she doesn''t want to wander that far away from home.'

			act 'Leave': gt 'miroslava', 'leave'

		else
			if npc_rel['A60'] < 50: npc_rel['A60'] += 1

			MiraVars['follower'] = 1
			if minut > 30: MiraVars['follow_time'] = 2

			if ($clothingworntype = 'nude' or PCloswimwear = 1):
				gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
				gs 'underwear', 'wear'
			end
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/girls_go.jpg"></center>'
			'You offer to go with Mira to the meadow, and she readily agrees. On the way, you tell each other different stories, some genuine but primarily tall tales.'

			act 'Continue': gt 'gad_meadow', 'start'
		end
	end
end



if $ARGS[0] = 'offer_drink_boys':
	menu_off = 1
	if daystart < MiraVars['emb_day']:
		minut += 5
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_shy.jpg"></center>'
		'You ask Mira if she wants to go drink with the boys, but she only shakes her head, saying she is too ashamed and will not leave the house.'

		act 'Leave': gt 'miroslava', 'leave'

	else
		minut += 5
		if npc_rel['A60'] < 20:npc_rel['A60'] += 1

		if ($clothingworntype = 'nude' or PCloswimwear = 1):
			gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
			gs 'underwear', 'wear'
		end
		gs 'stat'

		gs 'miroslava', 'miraclothes'
		if MiraVars['QW'] = 5:
			'You suggest drinking with the village boys, and Mira agrees. Then she whispers that when she leaves with Mitka, you should wait for a little and follow them to his home.'
		else
			'You suggest drinking with the village boys, and Mira readily agrees, then asks you to wait a few minutes while she changes. When she comes out, you go to drink with the group of boys near your house...'
		end

		MiraVars['follower'] = 1
		MiraVars['follow_time'] = 1
		act 'Continue':
			minut += 15
			if MiraVars['QW'] >= 16 and GadBoy['river_gang'] = 2:
				gt 'mitkabuh_group'
			else
				gt 'mitkabuh'
			end
		end
	end
end


if $ARGS[0] = 'offer_steam_bath':
	menu_off = 1
	if daystart < MiraVars['emb_day']:
		minut += 5
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_shy.jpg"></center>'
		'You ask Mira if she wants to come over and take a steam bath, but she only shakes her head, saying that after what she did, she is too ashamed to leave the house.'

		act 'Leave': gt 'miroslava', 'leave'
	else
		if npc_QW['A63'] >= 13 and MiraVars['QW'] < 10 and MiraVars['had_sex'] <= 1:
			minut += 5
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_said_no.jpg"></center>'
			'You offer Mira together to relax you in the bath, but she rudely answers that she will never go bathe with such a whore like you.'

			act 'Leave': gt 'miroslava', 'leave'
		else
			minut += 10
			if npc_rel['A60'] < 50: npc_rel['A60'] += 1
			MiraVars['guest'] = 1

			if ($clothingworntype = 'nude' or PCloswimwear = 1):
				gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
				gs 'underwear', 'wear'
			end

			if locat['A60'] = 60:
				minut += 85
			else
				minut += 40
			end

			gs 'stat'
			gs 'miroslava', 'miraclothes'

			'You offer Mira the opportunity to relax with you in the bath. She pauses for a few moments to think but then agrees slowly. Then, you lead her into your grandparents'' backyard...'

			act 'Go to your home': gt 'gad_gpbath', 'start'
		end
	end
end


if $ARGS[0] = 'offer_go_river':
	menu_off = 1
	if daystart < MiraVars['emb_day']:
		minut += 5
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_shy.jpg"></center>'
		'You ask Mira if she wants to go to the river with you, but she only shakes her head, saying that she will not leave the house after her humiliation.'

		act 'Leave': gt 'miroslava', 'leave'
	else
		if npc_QW['A63'] >= 13 and MiraVars['QW'] < 10 and MiraVars['had_sex'] <= 1:
			minut += 5
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_said_no.jpg"></center>'
			'You suggest going to the river together, but she snorts contemptuously at you and says that she is not going anywhere with a slut like you.'

			act 'Leave': gt 'miroslava', 'leave'
		else
			minut += 17
			if npc_rel['A60'] < 30: npc_rel['A60'] += 1
			MiraVars['guest'] = 0
			if ($clothingworntype = 'nude' or PCloswimwear = 1):
				gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
				gs 'underwear', 'wear'
			end
			if locat['A60'] = 60: minut += 30

			gs 'stat'
			gs 'miroslava', 'miraclothes'

			'You suggest going to the river to swim or sunbathe, and Mira readily agrees.'

			MiraVars['follower'] = 1
			MiraVars['follow_time'] = 2
			act 'Go to the river': gt 'gad_beach', 'start', 1
		end
	end
end


if $ARGS[0] = 'offer_go_forest':
	menu_off = 1
	if daystart < MiraVars['emb_day']:
		minut += 5
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_shy.jpg"></center>'
		'You ask Mira to go to the forest with you to look for mushrooms and berries, but she only shakes her head, saying that she will not leave the house after her humiliation.'

		act 'Leave': gt 'miroslava', 'leave'
	else
		if npc_QW['A63'] >= 13 and MiraVars['QW'] < 10 and MiraVars['had_sex'] <= 1:
			minut += 5
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_said_no.jpg"></center>'
			'You have to offer Mira together to go to the forest for mushrooms and berries. Still, she contemptuously snorts in response and says she''s not going anywhere with a slut like you.'

			act 'Leave': gt 'miroslava', 'leave'
		else
			minut += 2
			if npc_rel['A60'] < 30: npc_rel['A60'] += 1
			MiraVars['guest'] = 0
			if ($clothingworntype = 'nude' or PCloswimwear = 1):
				gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
				gs 'underwear', 'wear'
			end
			gs 'stat'
			gs 'miroslava', 'miraclothes'

			'You offer her to go to the forest to look for mushrooms and berries, and she willingly agrees.'

			MiraVars['follower'] = 1
			MiraVars['follow_time'] = 1
			act 'Go into the woods': minut += 45 & gt 'gad_forest', 'forest_edge'
		end
	end
end


if $ARGS[0] = 'guest_acts':
	if MiraVars['guest'] = 0:
		act 'Invite to your grandparent''s':
			*clr & cla
			menu_off = 1
			minut += 5
			MiraVars['guest'] = 1
			if npc_rel['A60'] < 30: npc_rel['A60'] += 1
			gs 'stat'
			gs 'miroslava', 'miraclothes'

			'You are tired of hanging around on the street, and you decide to invite Mira to dinner.'

			act 'Go home':
				if ($clothingworntype ! 'nude' and PCloswimwear = 0):
					minut += 15 & gt 'gad_gphouse', 'entry'
				else
					*clr & cla
					minut += 5
					gs 'underwear', 'wear'
					gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber

					'<center><img <<$set_imgh>> src="images/locations/gadukino/river/dressbch.jpg"></center>'
					'You changed into your regular clothes and went home with Mira.'

					act 'Continue': minut += 15 & gt 'gad_gphouse', 'entry'
				end
			end
		end
	else
		act 'Watch TV':
			*clr & cla
			menu_off = 1
			minut += 60
			if npc_rel['A60'] < 20:npc_rel['A60'] += 1
			pcs_mood += 10
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_tv'+rand(1, 12)+'.jpg"></center>'
			'You and Mira watch TV for an hour.'

			act 'Continue': gt 'gad_gphouse', 'entry'
		end

		if hour >= 18:
			act 'Sleep over':
				*clr & cla
				menu_off = 1
				minut += 60
				if npc_rel['A60'] < 20: npc_rel['A60'] += rand(1,2)
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_tv'+rand(1, 12)+'.jpg"></center>'
				'You ask your grandparents if Mira can sleep over. They tell you it''s okay with them, so you invite Mira to sleep over.'
				*nl
				'You and Mira head over to the vast wardrobe where your clothes are and spend an hour trying on different dresses and underwear.'

				act 'Mira and you raid the kitchen for a late night snack (0:15)': 'You and Mira head to the kitchen to make a quick snack' & gs 'food', 'snack'
				act 'Go to sleep': 'You''re feeling tired. You and Mira head to your bed and crawl under the covers together and get into bed.' & gt 'bed2'
				act 'Finish': MiraVars['guest'] = 0 & gt $loc, $loc_arg
			end
		end

		act 'Say goodbye to Mira':
			*clr & cla
			menu_off = 1
			minut += 5
			gs 'stat'
			gs 'miroslava', 'miraclothes'

			'You say goodbye to Mira, and she goes home.'

			MiraVars['guest'] = 0
			MiraVars['follow_time'] = 0
			MiraVars['follower'] = 0
			if MiraVars['guestday'] <= daystart: MiraVars['guestday'] = daystart + 1
			act 'Walk back home': gt 'gad_gphouse', 'entry'
		end
	end
end


if $ARGS[0] = 'third_wish':
	menu_off = 1
	minut += 2
	MiraVars['guest'] = 0
	if ($clothingworntype = 'nude' or PCloswimwear = 1):
		gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
		gs 'underwear', 'wear'
	end
	gs 'stat'
	gs 'miroslava', 'miraclothes'

	'You remind Mira about the third wish, and she reluctantly nods and says she remembers it. But, then, you act mysterious and, with a sinister smile, command her to follow you...'

	act 'Make Mira walk through village naked':
		*clr & cla
		minut += 15
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/street.jpg"></center>'
		'You lead Mira out to the village street. Mira stares at her feet, sometimes looking at you with watchful eyes...'

		act 'Order her to undress':
			*clr & cla
			minut += 2
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_looks.jpg"></center>'
			'You lead her to the center of the village square, in front of the market. Here, you turn to her and demand disdainfully that she undress. You tell her that this is your final wish and you will forgive her betrayal after she completes this task. Mira''s mouth slowly drops open, and she looks at you as if you''re insane.'
			'"Come on, you''re like a little girl," you snort, "we both know you''re a big whore and can''t live without having cock every day. And now this is the mother load, entirely for free."'
			'Mira, in silence, looks at you and then looks around at the village street on which people walk about their business.'
			'"<<$pcs_nickname>>, please don''t make this your wish. I will die of embarrassment!" - Mira plaintively begs, hoping it will change your mind.'

			act 'Confirm your wish':
				*clr & cla
				minut += 5
				pcs_horny += rand(5,10)
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_nude1.jpg"></center>'
				'"No. You freely made the promise of three wishes. Anything I want, and I want you to strip naked and head through the village to the fields. I''ll meet you there, and I''ll bring your clothes to you. Now, do as you promised," you stated in an adamant voice.'
				'Mira hesitates for another minute, shifting uncomfortably from foot to foot, nods to herself and finally decides to undress before you. Once nude, she hands you her clothes.'
				'"Well, now you must walk through the entire village and go to the fields. Once you get to me, you can consider yourself forgiven," you said with a malicious smile and slammed the palm of your hand into Mira''s ass to help her on the way. You slowly follow her and watch with interest.'

				act 'Watch':
					*clr & cla
					minut += 5
					pcs_horny += rand(5,10)
					gs 'stat'

					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_nude2.jpg"></center>'
					'Mira hesitantly begins to move through the village street. You look at her and the reaction of passers-by.'

					act 'Look further':
						*clr & cla
						minut += 15
						pcs_horny += rand(5,10)
						MiraVars['emb_day'] = daystart + 7
						MiraVars['event_day'] = daystart
						MiraVars['QW'] = 21
						npc_rel['A60'] = 1
						gs 'stat'

						'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_nude3.jpg"></center>'
						'Finally flushed crimson, Mira arrives in the fields just beyond the village. She then turns and rushes up to you.'
						'"<<$pcs_nickname>>, we''re even!" Mira states and looks at you imploringly.'
						'You nod your head while handing her clothes back. After watching a few more minutes as Mira dresses, several of the village men are hooting as she sprints to her house. Slowly the men settle down and go about their business.'

						MiraVars['guest'] = 0
						MiraVars['follower'] = 0
						MiraVars['follow_time'] = 0
						act 'Finish': gt 'gadukino'
					end
				end
			end

			act 'Forgive her':
				*clr & cla
				minut += 5
				npc_rel['A60'] += 5
				MiraVars['QW'] = 22
				MiraVars['guest'] = 0
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira_leaves.jpg"></center>'
				'"Well, Mira, fuck you. I had a good day planned," You pause. "You can consider yourself forgiven,"'
				'The girl is still for several moments, shifts uncomfortably from foot to foot, unable to believe her ears, then jumps up to you and kisses you on the cheek.'
				'"Thank you, <<$pcs_nickname>>, I... I..., "- she stammers before running home.'

				act 'Finish': gt 'gadukino'
			end
		end
	end
end


if $ARGS[0] = 'miratalk':
	minut += 10
	menu_off = 1
	if MiraVars['QW'] = 0:
		if npc_rel['A60'] < 10: npc_rel['A60'] += 1
		if locat['A60'] = 51:
			gs 'miroslava', 'mira_river'
		else
			gs 'miroslava', 'miraclothes'
		end
		if npc_QW['A63'] < 13 or MiraVars['had_sex'] > 1:
			'You have ten minutes of fun talking about all sorts of trivia.'
		else
			'While trying to talk with Mira, she remained silent, sometimes giving you scornful glances.'
		end
		gs 'stat'

		act 'Finish': gt $loc, $loc_arg

	elseif MiraVars['QW'] = 1:
		if npc_rel['A60'] < 20:npc_rel['A60'] += 1
		if locat['A60'] = 51:
			gs 'miroslava', 'mira_river'
		else
			gs 'miroslava', 'miraclothes'
		end
		if npc_QW['A63'] < 13 or MiraVars['had_sex'] > 1:
			'You have ten minutes of fun talking about all sorts of trivia and, sometimes, how you got drunk with village guys...'
		else
			'While trying to talk to Mira, she remained silent, sometimes giving you scornful glances.'
		end
		gs 'stat'

		act 'Finish': gt $loc, $loc_arg
		!if MiraVars['Mitka_fucks'] > 3:
			act 'Ask Mira if she likes Mitka...':
				*clr & cla
				minut += 2
				pcs_horny += 10
				npc_rel['A60'] += 1
				MiraVars['QW'] = 2
				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
				'You ask Mira if there is something between her and Mitka. She looks at you a little timidly but responds yes, there is. However, she refuses to go into further detail, so you decide to leave the subject until a more appropriate time comes up...'
				gs 'stat'

				act 'Finish': gt $loc, $loc_arg
			end
		!end
	elseif MiraVars['QW'] = 3:
		if locat['A60'] = 51:
			gs 'miroslava', 'mira_river'
		else
			gs 'miroslava', 'miraclothes'
		end
		gs 'stat'

		act 'Tell her that you saw her fucking Mitka in the meadow.':
			*clr & cla
			minut += 2
			pcs_horny += 10
			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
			'You coldly tell Mira you saw her when she fucked Mitka in the meadow. You remind her that she swore not to tell anyone about your secret place. Mira turns red and flutters her eyes at you trying to look innocent as she mumbles that she''s sorry about breaking her promise. Mira asks if there is any way to make amends. You smile and remind her that she promised you three wishes if she ever revealed the meadow to anyone. Mira meekly nods her head, confirming that she does indeed remember making that promise and is ready to fulfil them.'

			gs 'willpower', 'exhib', 'force'
			if will_cost <= pcs_willpwr:
				act 'She deserves some punishment (<<will_cost>> Willpower)':
					*clr & cla
					minut += 5
					gs 'willpower', 'exhib', 'force'
					gs 'willpower', 'pay', 'force'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
					act 'Tell her to show you her pussy':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/miraqw3.jpg"></center>'
						*nl
						'"To start, you will pull down your panties and show me your pussy, and tell me what it felt like fucking Mitka in my meadow." you tell her sternly, "I want to know what is so special about his dick that you would exchange it for our friendship."'
						'Mira gasps in shock from the sting in your words and jumps to her feet. She stares at you, stupified, and you can see the protest welling up in her, but you don''t give her time to recover.'
						'"If you want us to stay friends, you had better stick to the deal, and if you can''t keep your word, then our friendship is over," you state, glaring at her angrily.'
						'Mira''s eyes fill with tears, and she blushes deeply. Then, hesitantly, she shifts from foot to foot before you, unable to say anything. Finally, you decide to up the ante, and you turn away from her and start to leave...'
						'"Wait!" Mira cries, reaching out to you, "Stop, please don''t go!" but you pretend to ignore her and keep moving away.'
						'Mira hesitates for a moment, then rushes after you. She catches up with you red-faced, grabs you by the hand, and pulls you behind a rickety shed.'

						act 'Go for it':
							*clr & cla
							minut += 10
							pcs_horny += 15
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mirawish1.jpg"></center>'
							'Mentally exulting over your victory, you allow Mira to drag you behind the shed. She stops and turns to you, her face filled with anger and shame. Mira searches your face for a few seconds, hoping you will relent until she sees that you meant what you said. She stomps her feet a few times on the ground in frustration, and then, with a heavy sigh, she starts to remove her panties.'

							act 'Watch':
								*clr & cla
								minut += 5
								pcs_horny += 50
								MiraVars['QW'] = 4
								MiraVars['event_day'] = daystart
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mirawish1_1.jpg"></center>'
								'Taking off her panties, Mira turns her ass to you and lifts up her skirt as she bends low. You smile broadly and, in an indifferent voice, order her to pull her ass cheeks apart. Mira reluctantly fulfils your requirement. You then ask her what she felt as she fucked with Mitka in the meadow. Mira tries to straighten, but you place a restraining hand on her back and tell her that your wishes will be humiliating punishments for her. Over the next five minutes, you rub Mira''s buttocks as she tells you in detail what she felt when she fucked Mitka...'
								'Finally, you tell her that you do not feel she has fully atoned for her actions and this was only part of your first wish, but further punishments will have to wait for another time.'

								act 'Turn around and walk away': gt 'gadukino'
							end
						end
					end
				end
			else
				act 'She deserves some punishment (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Tell her that you want to watch as Mitka fucks her in the ass':
				*clr & cla
				minut += 5
				pcs_horny += 10
				MiraVars['QW'] = 5
				npc_rel['A60'] -= 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
				'You say you want to see Mitka fuck her ass because she told him your secret. Mira jumps to her feet from the suggestion and just looks at you. Still, you don''t give her time to recover and continue to emphasize further, Recalling that a deal is a deal, and if your word doesn''t matter, our friendship will end. Mira blushes and hesitantly shifts from foot to foot. Finally, you decide to go for broke, turn around and start to leave...'
				'  - Wait, so it''s screaming at you in the back of Mira, but you pretend to not notice and go on.'
				' - Well, <<$pcs_nickname>>, - after a couple of seconds until you hear a hysterical scream from Mira, I''ll think of something!'

				act 'Leave': gt 'miroslava', 'leave'
			end
		end
	elseif MiraVars['QW'] = 4 and MiraVars['event_day'] ! daystart:
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/miraqw4a.jpg"></center>'
		*nl
		act 'Remind her that she has not atoned for bringing Mitka to the meadow':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/miraqw4b.jpg"></center>'
			*nl
			'You remind Mira that you are still unsatisfied with her atonement, and she asks you what you want her to do.'

			act 'Tell her that you want to watch as Mitka fucks her in the ass':
				*clr & cla
				minut += 5
				pcs_horny += 10
				MiraVars['QW'] = 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
				'You tell her that what you want to see is Mitka fucking her in the ass. Mira jumps to her feet in shock and looks at you with disbelief. But you don''t give her time to recover and continue to speak, emphasizing the deal she made with you, and if she can''t uphold her end, then your friendship is at an end. Miroslava deeply blushes and hesitantly shifts from foot to foot, watching you. Finally, after a few seconds of silence, you nod your head, turn around, and start to leave...'
				'Mira shouts at you to stop, but you pretend to not hear her and keep walking on.'
				'"Fine, <<$pcs_nickname>>, you win," Mira states loud enough for you to hear. She is on the verge of hysteria, eyes watering and nose running. Mira nearly screams, "I, I''ll figure something out!"'

				act 'Leave': gt 'gadukino'
			end
		end
	elseif MiraVars['QW'] = 6:
		pcs_horny += 10
		if locat['A60'] = 51:
			gs 'miroslava', 'mira_river'
		else
			gs 'miroslava', 'miraclothes'
		end
		gs 'stat'

		act 'Tell her that the first wish has been completed':
			*clr & cla
			minut += 10
			pcs_horny += 15
			MiraVars['QW'] = 7
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
			'You tell Mira that you have now seen Mitka fuck her in the ass. Maliciously you ask, does she like having her ass fucked? To your surprise, Mira responds that she does like it a bit. You are slightly disappointed because this was supposed to be a punishment. Remind her that she still has two wishes to fulfil. Once they are all fulfilled, she will have satisfied her debt to you. Mira nods and says she is ready to redeem your wishes upon demand. You think it over for several moments before walking away...'

			act 'Leave': gt 'miroslava', 'leave'
		end
	else
		if (npc_QW['A63'] > 0 and npc_QW['A63'] < 13) and npc_rel['A60'] < 50: npc_rel['A60'] += 1
		if npc_QW['A63'] >= 13 and MiraVars['QW'] > 15 and npc_rel['A60'] < 50: npc_rel['A60'] += 1
		if daystart < MiraVars['emb_day'] and MiraVars['event_day'] ! daystart: MiraVars['event_day'] = daystart & MiraVars['emb_day'] -= 1
		if locat['A60'] = 51:
			gs 'miroslava', 'mira_river'
		else
			gs 'miroslava', 'miraclothes'
		end
		gs 'stat'

		if MiraVars['QW'] < 3 and npc_QW['A63'] < 11:
			'You have ten minutes of fun talking about all sorts of trivia.'
		elseif MiraVars['QW'] < 16 and npc_QW['A63'] < 11:
			'You spend ten minutes talking about trivia. Mira can''t seem to focus and barely looks you in the eyes. She seems distracted by other thoughts.'
		elseif MiraVars['QW'] < 20 and npc_QW['A63'] < 11:
			'You spend ten minutes talking about trivia, and you often refer to Mira as a whore, but she just pretends not to hear.'
		elseif MiraVars['QW'] >= 20 and npc_QW['A63'] < 11:
			'You spend ten minutes talking about trivia, but Mira isn''t listening. Instead, all she wants to talk about is sex.'
		else
			'You have ten minutes of fun talking about all sorts of trivia.'
		end

		act 'Finish': gt $loc, $loc_arg
	end
end



if $ARGS[0] = 'miraclothes':
	'<center><B>Mira</B></center>'
	if MiraVars['QW'] = 0:
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira.jpg"></center>'
	elseif MiraVars['QW'] > 0 and MiraVars['QW'] < 4:
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3.jpg"></center>'
	elseif MiraVars['QW'] >= 4 and MiraVars['QW'] < 8:
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira0,'+rand(0,5)+'.jpg"></center>'
	elseif MiraVars['QW'] >= 8 and MiraVars['QW'] < 12:
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira1,'+rand(0,2)+'.jpg"></center>'
	elseif MiraVars['QW'] >= 12 and MiraVars['QW'] < 20:
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira2,'+rand(0,5)+'.jpg"></center>'
	elseif MiraVars['QW'] >= 20:
		'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira3,'+rand(0,3)+'.jpg"></center>'
	end
end

if $ARGS[0] = 'mira_river':
	if ($clothingworntype ! 'nude' and PCloswimwear = 0):'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mirarivertalk.jpg"></center>'
	if PCloswimwear = 1:'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mirarivertalkbikini.jpg"></center>'
	if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mirarivernudetalk.jpg"></center>'
end


if $ARGS[0] = 'leave':
	if locat['A60'] = 10:
		gt 'gad_miroslava_home','start'
	elseif locat['A60'] = 60:
		gt 'gad_forest', 'forest_edge'
	elseif locat['A60'] = 21:
		gt 'gad_gphouse', 'entry'
	elseif locat['A60'] = 20:
		gt 'gad_gpyard', 'start'
	else
		gt $loc, $loc_arg
	end
end

--- miroslava ---------------------------------