glife/locations/Gadhouse.qsrc

# Gadhouse

if $ARGS[0]='' or $ARGS[0] = 'Start':
	$location_type = 'indoors'
	$metka = ''
	$loc = 'Gadhouse'
	$menu_loc = 'Gadhouse'
	$menu_arg = ''
	menu_off = 0
	$locclass = 'singleroom'
	curr_home = 2
	cla
	*clr
	frost = 0
	CLOSE ALL
	mira_temp = rand(1,5)
	!125s
	!execute before everything
	if monthbabkapay ! month and monthgrandmahelp ! month and hour >= 6 and hour < 22:
		monthbabkapay = month
		monthgrandmahelp = month
		if grandmahelp > 0: money += grandmahelp*50
		money += 2000
		minut += 10

		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/grandmahelp.jpg"></center>'
		if gadstay = 0:
			'Upon entering the house, you let out a screech as you catch sight of your grandmother, throwing yourself at her, wrapping your arms around her neck. She embraces you tightly. She starts by saying "Dear <<$pcs_nickname>>, you''re only skin and bones, but don''t worry, a few months here and you''ll be looking your usual self again ."'
			'"But look at you, you sure have grown up. A young woman." she says proudly. She continues "Grandpa and I keep getting older and older and need some help around the house. What do you say youngling? You will not have to do much. Here''s the deal, you lend us a helping hand on the farm as much as possible, and we will pay you for each chore you do. It will be a great life lesson, you will learn about hard work. What do you say?"'
			'"Of course I`ll help out, Grandma." you answer.'
			'"I''m glad to hear that <<$pcs_nickname>>, here is little something upfront so you know we are serious," Grandma says and hands over 2000 rubels.'
			'"Thanks Babushka!" you kiss her on the cheek before you head on out.'
		else
			'When you got out of bed, your grandmother called you over to her.'
			'"I imagine you''ve spent all your allowance on sweets so lets see what we can do to give you some more pocket money, hmmmm?" she says as she opens her purse.'
			if grandmahelp > 0:
				'"You were quite helpful over the last few weeks, so here''s <<2000+grandmahelp*50>> rubles." she starts to hand you the money, then lifts it away with a stern look, "But you can always do more work, young lady!" she scolds gently then smiles as she gives you the money.'
			else
				'"We really could have used your help last month." she says mournfully as she counts out some bills, "Maybe this month you''ll do more to help us?" She looks at you sternly as she hands you 2000 rubles.'
			end
			grandmahelp = 0
			gs 'stat'
		end
		act 'Further': gt 'Gadhouse', 'Start'

	elseif go_in_boletus = 1 and boletus >= grandpa_boletus and hour >= 6 and hour < 22:
		cla
		*clr
		grandmahelp += 1
		boletus -= grandpa_boletus
		minut += 5
		go_in_boletus = 0
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
		'Upon entering the house you immediately walk up to grandpa.'
		'"Grandpa, here are the mushrooms!"'
		'"Thank you <<$pcs_nickname>>, you''ve made an old man very happy," your grandfather replies with a smile. "The mushrooms are in a part of the forest that is difficult to reach."'
		'"I can still go and gather more mushrooms, if you want?"'
		'"There''s no need <<$pcs_nickname>>." - said your grandpa. "But if I need some help, I''ll be sure to let you know."'
		'You kiss your grandfather on the cheek and get on with your day.'

		act 'Further': grandpa_boletus = 0 & gt 'Gadhouse', 'Start'

	elseif go_in_boletus_bilberry = 1 and boletus >= grandpa_boletus and bilberry >= grandpa_bilberry and hour >= 6 and hour < 22:
		cla
		*clr
		grandmahelp += 1
		boletus -= grandpa_boletus
		bilberry -= grandpa_bilberry
		minut += 5
		go_in_boletus_bilberry = 0
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
		'Upon entering the house you immediately walk up to grandpa.'
		'"Grandpa, here are the mushrooms and berries!"'
		'"Oh, thank you <<$pcs_nickname>>." you grandpa replied.'
		'"If you want, I can go out for an another run."'
		'"You don''t need to do that <<$pcs_nickname>>," your grandpa said. "But I''ll be sure to let you know if something comes up."'
		'You give your grandpa a smooch on the cheek and go on with your day.'

		act 'Further': grandpa_boletus = 0 & grandpa_bilberry = 0 & gt 'Gadhouse', 'Start'

	elseif go_in_bilberry = 1 and bilberry >= grandpa_bilberry and hour >= 6 and hour < 22:
		cla
		*clr
		grandmahelp += 1
		bilberry -= grandpa_bilberry
		minut += 5
		go_in_bilberry = 0
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
		'Upon entering the house you immediately walk up to grandpa.'
		'"Grandpa, here are the berries!"'
		'"Oh, thank you, nicely done," grandpa replied. "It''s hard for your grandmother to gather the berries, and the berries are needed so she can make jam for the winter."'
		'"If you need some more berries I''ll be glad to go out and gather some more."'
		'"There''s no need <<$pcs_nickname>>," your grandpa said. "But if your grandma need some more berries, I''ll let you know."'
		'You kiss your grandfather on the cheek, you go on with your business.'

		act 'Further': grandpa_bilberry = 0 & gt 'Gadhouse', 'Start'

	elseif mira_temp = 1 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 0 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or miragopQW >= 10 or mirasex > 1):
		cla
		*clr
		mira_guestday = daystart
		minut += 5
		mira_guest = 1
		gs 'stat'

		gs 'Miroslava', 'miraclothes'
		'You notice Mira coming towards your grandparents home.'
		'You step out on the porch and greet Mira. She replies "Hi <<$pcs_nickname>>, I was really bored being all alone at home. Do you want to do something?"'

		act 'Further':gt'Gadhouse', 'Start'

	else
		gt 'Gadhouse', 'Main'
	end
end
	!125e
if $ARGS[0] = 'Main':
	$metkaM = 'Main'
	$locM = 'Gadhouse'
	$locclass = 'livingr'
	$menu_loc = 'Gadhouse'
	$menu_arg = 'livingr'
	menu_off = 0
	*clr
	cla
	gs 'stat'
	'<center><H4>Your Grandparents'' Cottage</H4></center>'
	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/izba.jpg"></center>'
	'A fairly simple cottage in the village of Gadukino which your grandparents call home. In the main room there is a huge <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> (where you can choose outfits and organize your clothing), and a <a href="exec:gad = 1 & gt ''bed'', ''start''">bed</a> where you can rest. The bed is more comfortable than it looks.'
	'There is an old <a href="exec:gt ''TV'',''gad''">television</a> in the living room. It''s positioned next to a body length <a href="exec:gt ''mirror'', ''start''">mirror</a>.'
	'You can check your weight on your grandma''s old mechanical <a href="exec:msg ''<center>Your weight is <<pcs_weight>> kg<br>Your body mass index (BMI) is <<bmi_calc>>.<br><<$bmi_desc>></center>''">scales</a>.'

	if hour < 8:
		temp = RAND(0,9)
		if temp = 0:'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
	elseif hour >= 8 and hour < 12 and sunWeather = 1:
		temp = RAND(0,2)
		if temp = 1:'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is busy cleaning himself with his tongue.'
		if temp = 2:'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> lies lazily, soaking up some sunshine rays.'
	elseif hour >= 8 and hour < 12 and sunWeather = 0:
		temp = rand(0,1)
		if temp = 0: 'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
		if temp = 1: 'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is staring in disgust at the rain outside.'
	elseif hour >= 12 and hour < 18:
		temp = RAND(0,5)
		if temp = 3:'Next to the table by the window <a href="exec:feedcat = 1 & gt ''Gadhouse'',''villagecat''">Boniface</a> stretches and meows loudly, it''s time for dinner.'
		if temp = 4 and sunWeather = 1: 'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> lies lazily, soaking up some sunshine rays.'
		if temp = 4 and sunWeather = 0: 'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
	elseif hour >= 18 and hour < 22 and catout ! 2:
		temp = RAND(0,3)
		if temp = 0:'<a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is stalking around the main floor, looking for a nice juicy mouse to play with.'
		if temp = 1 and catout = 0: catout = 1 &'<a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> twines around your ankles then goes to the door meowing pitifully.'
	elseif hour >= 22:
		temp = RAND(0,2)
		if temp = 1:'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
	end


	if hour >= 6 and hour < 22:
		'Your <a href="exec: gt ''Gadhouse'',''grandma'' ">grandmother</a> is sitting on her bed. She looks a bit confused, as if she''s not sure where to go.'
		'Your <a href="exec: gt ''Gadhouse'',''grandpa'' ">grandfather</a> slowly shuffles across the room, using his cane for support.'
	else
		'Your grandparents sleep in separate beds. It''s quite strange since they''re still madly in love with eachother.'
	end

	if mira_guest = 1: MiraLoc = 6 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'

	clr
	gs 'stat'
	gs 'themes', 'indoors'

	!125s
	!{
	!New family system, skip for now.
	gs 'zz_family', 'father_sheduler'
	if $father['location'] = $curloc:
		'Your parents room.'
		gs 'gadukino_event', 'go_home'
	end
	}
	if week = 6 and hour > 12 and family_trip_month ! month: indorf = 1

	if indorf = 1:
		'Your parents are relaxing inside.'

		if staygad ! daystart: gs 'gadukino_event', 'go_home'
	end

	 if $clothingworntype ! 'nude':
		act 'Go outside':minut += 1 & gt 'Gaddvor'
	elseif $clothingworntype = 'nude':
		act 'Go outside naked':
			*clr & cla
			menu_off = 1
			minut += 1
			inhib_exp += rand(0,2)
			grandma_trouble += rand(1,3)
			'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/gaddvor_nude.jpg"></center>'
			'It''s certainly risky leaving the hosue like this, and while it''s unlikely anyone saw you go outside naked, there''s a thrill in almost getting caught'
			gs 'arousal', 'voyeur', 10, 'exhibitionism'
			gs 'arousal', 'end'
			gs 'stat'
			act 'Continue': gt 'Gaddvor'
		end
	elseif $clothingworntype = 'nude' and ($pantyworntype ! 'none' or $braworntype ! 'none'):
		act 'Go outside in your underwear':
			*clr & cla
			menu_off = 1
			minut += 1
			inhib_exp += rand(0,2)
			grandma_trouble += rand(1,3)
			'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/gaddvor_nude.jpg"></center>''It''s certainly risky leaving the hosue like this, and while it''s unlikely anyone saw you go outside in your underwear, there''s a thrill in almost getting caught'
			gs 'arousal', 'voyeur', 10, 'exhibitionism'
			gs 'arousal', 'end'
			gs 'stat'
			act 'Continue': gt 'Gaddvor'
		end
	end

	act 'Prepare a full meal (0:30)':gs 'food', 'm_meal'

	act 'Prepare a light meal (0:25)':gs 'food', 's_meal'

	act 'Have a snack (0:15)':gs 'food', 'snack'

	act 'Drink some water (0:05)':gs 'beverage', 'bev_wat'

	act 'Have a cup of tea (0:05)':
		*clr & cla
		minut += 5
		if pcs_hydra >= 100:
			'There is no need for tea. You''re not thirsty.'
		else
			pcs_hydra += 80
			cumspclnt = 2
			gs 'cum_cleanup'
			pcs_breath = 0
			'You make a cup of tea, quenching your thirst.'
		end

		gs 'stat'

		act 'Get up from the table':gt 'Gadhouse', 'Main'
	end

	if pranik > 0:
		'You have <<pranik>> tea biscuits on the plate.'

		act 'Drink tea with biscuits (0:05)':
			cla
			*clr
			menu_off = 1
			minut += 5
			pranik -= 1
			pcs_health += 30
			pcs_mood += 20
			pcs_energy += 80
			if pcs_hydra >= 100:
				pcs_hydra += 30
			else
				pcs_hydra += 60
			end
			cumspclnt = 2
			gs 'cum_cleanup'
			pcs_breath = 0
			fat += 4
			frost = 0
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
			'You enjoy a cup of tea while you eat some of the tea biscuits. They''re too sweet and can''t be good for your figure, but they taste so good!'

			act 'Get up from the table':gt 'Gadhouse', 'Main'
		end
	end

	if edaD > 0:
		act 'Prepare a diet meal (0:30)':
			cla
			*clr
			menu_off = 1
			frost = 0
			minut += 30
			pcs_health += 10
			pcs_mood += 20
			edaD -= 1
			'<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
			if pcs_energy >= 100:
				'You prepare a diet meal and try to eat it, but you''re full. You don''t even take a bite.'
			elseif pcs_energy >= 80:
				pcs_energy += 40
				'You try to enjoy the meal, but half-way you realize you weren''t all that hungry. You manage to finish the meal, but feel like it was kind of a waste to prepare it.'
			else
				pcs_energy += 80
				'The diet meal is tasty, and you enjoy eating it.'
			end

			if pcs_hydra >= 100:
				'You''re not thirsty.'
			else
				pcs_hydra += 100
				cumspclnt = 2
				gs 'cum_cleanup'
				pcs_breath = 0
				'You make a cup of tea, quenching your thirst.'
			end

			act 'Get up from the table':gt 'Gadhouse', 'Main'
		end
	end

	dynamic $fatdel

	if lekarstvo > 0:
		'You have <<lekarstvo>> tablet(s).'

		if sick > 0 and lekarday ! daystart:
			act 'Take a pill (0:05)':
				cla
				*clr
				menu_off = 1
				minut += 5
				lekarday = daystart
				lekarstvo -= 1
				sick -= sick * 20 / 100
				if pcs_hydra >= 100:
					pcs_hydra += 25
				else
					pcs_hydra += 50
				end
				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/lekr<<picrand>>.jpg"></center>'
				'You swallow the pill, and shortly after you feel a bit better.'

				act 'Continue':gt 'Gadhouse', 'Main'
			end
		end
	end

	if vitamin > 0:
		'You have <<vitamin>> vitamin pills.'

		if vitaminday ! daystart:
			act 'Take vitamins (0:05)':
				cla
				*clr
				menu_off = 1

				minut += 5
				vitaminday = daystart
				vitamin -= 1
				frost = 0
				if pcs_hydra >= 100:
					pcs_hydra += 25
				else
					pcs_hydra += 50
				end
				if KandidozOnce = 1:Kandidoz -= 2
				if GerpesOnce = 1:Gerpes -= 2
				if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)

				pcs_skin += 1

				'You swallow a vitamin pill to stay healthy.'

				act 'Continue':gt 'Gadhouse', 'Main'
			end
		end
	end

	gs 'events', 'read'
	gs 'subkid'

	if gobelen>0:'You have <<gobelen>> completed tapestries.'
	if pcs_sewng >= 40 and tkan > 0:'You have enough fabric for <<tkan>> lessons.'
	if pcs_sewng >= 40 and tkan <= 0:'You do not have any fabric.'
	if pcs_sewng >= 80:
		if newgobelen = 0 and tkan > 0:
			act'Start a new tapestry':
				*clr & cla
				menu_off = 1
				tkan -= 1
				newgobelen = 1
				minut += 15
				gs'stat'
				'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
				act'Set the tapestry aside':gt 'Gadhouse', 'Main'
			end
		end
		if newgobelen >= 1:
			'Your tapestry is <<newgobelen/10>> percent finished.'
			act'Work on the tapestry for an hour':
				*clr & cla
				menu_off = 1
				minut += 60
				sewng_exp += rand(pcs_intel/10, pcs_intel/5)
				gobramax = (pcs_sewng - 70) * 6
				gobramin = (pcs_sewng - 70) * 2
				newgobelen += rand(gobramin,gobramax)
				gs'stat'
				if newgobelen < 1000:'You spent an hour working on your tapestry, which is now <<newgobelen/10>> percent finished.'
					if newgobelen >= 1000:
					newgobelen = 0
					gobelen+=1
					'Your work on the tapestry is done.'
				end
				act'Set the tapestry aside':gt 'Gadhouse', 'Main'
			end
		end
	end

	if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
	act 'Relax on your bed': gt 'bed', 'start'
end

if $ARGS[0]='grandma':
	*clr & cla
	menu_off = 1
	minut += 2
	if grandmatalkday ! daystart: grandmatalk = 0
	gs 'stat'

	'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandma.jpg"></center>'
	'Your grandma is extremely old, and almost never leaves the house. Most of the time she just sits on her bed watching TV, or is slowly cleaning.'
	if $clothingworntype = 'nude':
		'Grandma looks a little shocked but its nothing she hasn''t seen before.'
		'"Go put some clothes on dear, you''ll give your poor grandpa a heart attack if he sees you."'

		act 'Maybe you should get dressed before talking to her':gt 'Gadhouse', 'Start'
	else
		if grigory_flower > 0 and grigory_flower < 10:
			act 'Talk to her about the flowers': gt 'grigory', 'flower4'
		end
		if grandmahelpday ! daystart:
			act 'Offer to help out': grandmahelpday = daystart & gt'grandmahelp'
		end
		!125s
		if grandmatalkgad = 0:
			act 'Ask about the village (0:10)':
				cla
				*clr
				grandmatalkgad = 1
				minut += 10
				pcs_mood += 5
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandma.jpg"></center>'
				'You sit next to grandma, eager to have her tell you more about the village.'
				'"Don''t you remember <<$pcs_nickname>>? You''ve visited us many times," said grandma.'
				'"The last time I visited here I was really young. I remember some of the houses, but the clearest memory I have is going swimming with Mitya." you reply.'
				'"And look how big you''ve become! Just look at you." grandma smiled.'
				'She begins telling you about the village.'
				'"The village is small, as you know. You’’ll probably find Mitya by the river or the beach where you can go swimming and sunbathe. There are still some fishermen here in the village if you want to go fishing, ask around after Stepan, he’’ll lend you a fishing rod."'
				'"There is nothing interesting in the village itself. Oh yes... I just remembered... recently a new family moved in, a single parent with his daughter. Could you imagine that, someone new moving in? The girl is about your age. Her father works in the city and from the rumors I''ve heard he''s hardly here because his work forces him to stay in the city most of the time. You''ll probably meet her while you take a walk in the village."'
				'"In the outskirts of the village is the field where the cattle graze and beyond the field is the forest. You''ll usually find our local hunter Andrew in the forest. He often brings along his friends to hunt, they often stay there for days. They say he built a hut somewhere in the forest. So, if you meet Andrew and his friends out there, don''t be afraid. If you want to go to the forest make sure to ask grandfather first."'
				'"If you like running, you can take a run on the road leading into the forest. Or you can take a ride on our old bike. I''m pretty sure the bike is in the shed. Make sure to look for it if you''re interested. And if you want to watch your figure, then go to the garden, have some fruit, it''s as healthy as the diet meals you''re eating, if not more healthier."'
				'"That''s about it my dear granddaughter. Now run along, don''t bother me anymore. My soap opera "Santa Barbara" is about to begin, I don''t want to miss a second of it."'

				act 'Finish':gt 'Gadhouse', 'Start'
			end
		end
		!125e
		if hour >= grandmatalk + 3:
			act 'Chat with your grandmother (0:10)':
				cla
				*clr
				grandmatalk = hour
				grandmatalkday = daystart
				minut += 10
				pcs_mood += RAND(5,10)
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandma.jpg"></center>'
				'You spend some time talking with your grandmother. She''s sometimes difficult to understand. Her nearly toothless mouth makes the pronunciation of words difficult for her. Most of what she says boils down to the same thing, life is much more fun when you''re young!'

				act 'Continue':gt 'Gadhouse', 'Start'
			end
		end

		if grandmastory ! daystart:
			act 'Ask her to tell you a story (0:20)':
				cla
				*clr
				grandmastory = daystart
				minut += 20
				pcs_mood += RAND(10,15)
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/babushka.jpg"></center>'
				'When you ask your grandmother to tell you a story, she mumbles something. Nevertheless, after a brief second or two, she decides on a story to share with you today, she begins to talk slowly.'

				temp = RAND(0,7)

				if temp = 0:
					'"There was this one time my parents allowed me to stay at my friend''s home for the night. During the night, a lot of snow fell... and we heard a soft knock on the door!" she says in an ominous voice.'
					'"We listened more closely, but could only hear the wind whistling through the trees... so we decided to go back to sleep. Then we heard the knocking again!"'
					'"We both ran quickly to the window, but couldn''t see anything other than snow. The knocking became more persistent, and the voice of a small girl begged us to open the door! My friend and I moved to the middle of the room, tightly hugging one another... we were terrified!"'
					'"The knocking continued into the morning, even when the blizzard stopped. It sounded like someone was panicking, but when we told her parents in the morning, they didn''t believe us. When we went outside... there was no tracks on the snow! As if it never happened!"'
					'"We never heard the voice or the knocking ever again after that, but I still feel bad for not going downstairs to answer the door. What if some girl was actually there, begging for our help? I hope she''s okay..."'
				elseif temp = 1:
					'"I had a friend when I was younger." she says, in an ominous voice. "Her husband died at her house, he was a drunken bastard. He got drunk one day and died of alcohol poisoning in the very house."'
					'"One day she came home from work, and the floor boards all of a sudden started creaking! And through the glass panes in the door in the hallway, she could see the silhouette of a man. It looked remarkably like her late husband!"'
					'"She was terrified! She quickly left her house, and only went back when I promised to go with her... but of course, we found nothing. Do you believe in ghosts, <<$pcs_nickname>>? Because ever since then, I do..."'
				elseif temp = 2:
					'"I wasn''t born in Gadukino, I grew up in a different village", your grandmother begins. "This is a true story, by the way!"'
					'"When I was still a little girl, one of our neighbors died. Then, less than two weeks later, one of his brothers died too! And as the legend goes, death comes in threes..."'
					'"His one surviving sister was terrified. She was a friend of mine, but her parents wouldn''t let her leave the house."'
					'"It was well into the winter season then, and people could only go to other towns by sleigh. For forty days, they waited... just when they were about to accept that the legend might not be true, they found one of her relatives. Dead. Muzhik I believe his name was, he was found frozen solid, basically a block of ice! He''d tried to attend his cousin''s funeral, but it cost him his life!"'
					'"Death is not to be trifled with, <<$pcs_nickname>>... her parents were smart to hide her, otherwise she might''ve died instead!"'
				elseif temp = 3:
					'"This really happened!" your grandmother reassures you. "When I was young, basically your age... it was just after the war. No one believed in superstition or anything like that. Those were tough times, all anyone cared about was how to get their next meal on the table for their family."'
					'"We all went to bed, but our cat kept meowing at me! It just wouldn''t let me sleep, for hours and hours!"'
					'"When I finally caught some sleep and woke up the next morning, my father was next to my bed. He said when he cleaned out the furnace of ashes, he found the remains of our dead cat in there!"'
					'You see her eyes tear up. "No one knew how she got there... no one noticed anything! Except for me. To this day I believe she was trying to warn me, asking for my help..."'
					'Your grandmother shrugs, wiping a tear from her eye. You put your hand on her knee reassuringly, but don''t really know what to say to comfort her.'
				!125s
				elseif temp = 4:
					'"I will tell you a story about an event that happened in the village I was brought up. One day a woman from a place far up in the northern Soviet Union moved to our village."'
					'"The woman lived alone with this gorgeous dog, it was of white color, quite large and quiet as a mouse. After a while the dog died and the woman did''nt want to bury it."'
					'"She always said it''s a shame to throw away the pelt since it was so furry. She spent some time thinking about what she could make of this pelt. After a while she decided to make a fur collar of the pelt."'
					'"It took about two months and she got really sick... I among others visited her, and everything looked fine at the first glance. But as soon as I closed the door she started acting erratic and was hallucinating, these were the characteristics of a rabies. Since she was living alone no one noticed it before it was too late to save her life..."'
				elseif temp = 5:
					'"One evening during the Christmas holidays in my younger days I was hanging out with my girlfriends in the kitchen. It was my school friends, so we were always up to some mischief all the time."'
					'"We were home alone, and one of my friends persuades us to do a séance. She tells us that a fortune-teller had explained to her how one could summon a spirit. So we light some candles and began chanting for the spirits to show themself."'
					'"I managed to summon the profile of a male figure. He was holding something resembling a bouquet of flowers. My second friend summoned a kettle looking object while my last friend managed to summon an infant which frightened us."'
					'"Not being discouraged we decided to try again excited by what we would manage to summon this time. This time I summoned a large steamer. My second friend didn''t summon anything special, but my third friend summoned the same infant again, the difference this time was that the infant was in a stroller."'
					'"We ended the séance and went back doing ordinary stuff. All of a sudden we heard a knock on the door, it was the young man from the séance. He pulled out a beautiful bouquet of roses for me and gave them to me. I asked him what the reason was but he just answered that he got a feeling that he should deliver flowers to a girl in this specific village. I got the chills, because I remembered the man with a bouquet of flowers from the séance."'
					'"The most interesting thing that happened was a few months after our séance, my friend that summoned the baby got pregnant. And by the end of the year she had a baby by the young age of 15. So beware when you meet a fortune-teller you never know what might happen..."'
				elseif temp = 6:
					'"I remember sitting down as we are right now," your grandma starts, but suddenly as if she remembered something, she sadly sighs "There are no more matches..."'
					'You look at her perplexed, questioning what she''s talking about. "We do have matches in the kitchen or if you want I can run over to the store to buy some."'
					'"You don''t get it, <<$pcs_nickname>>. The matches today are not as good as those made long time ago. I miss those matches we had during the Great Patriotic War, before they had to move the factory to the far east... Those matches were magical, not like this crap we have now... Ugh..."'

				!Keep the word brigade if you want to change the text. It''s what the people working on the kolkhoz were called.
				elseif temp = 7:
					'"One day my mother, rest her soul, sent us four siblings out to the forest for berry gathering", your grandma begins. "We took our berry collectors and headed out. We reached the entrance of the forest pretty quickly and decided that it would be best to split up to complete the task faster. Since we were familiar with the area we all dispersed to our cherished spots and began gathering berries."'
					'"My favorite spot was a plot surrounded by dense bushes and in the middle of the plot there was a huge stump. It’’s was really a great spot and as I approached I noticed very large number of ripe strawberries. I was rejoicing over the thought that I would gather more than my brothers, slowly gathering the berries and putting them in my berry collector. All of a sudden I hear some rustling behind the bushes. I turn towards the sound, but I''m met with silence. I didn''t notice anyone but I still couldn''t get rid of the eerie feeling."'
					'"I shook off the eerie feeling and go back gathering strawberries again. All of a sudden I get this strange feeling... I look up and I see a person squatting on the stump. He''s completely still and just stares at me. I got really scared and ran away screaming and crying towards my brothers. They tried to stop and calm me down, but I just kept on running. My brothers started running after me, trying to keep up. I could hear my oldest brother shouting to run towards the kolkhoz. You see <<$pcs_nickname>> long time ago we had central collective farms that were called kolkhoz, your grandma explains."'
					'"We were lucky that the farms were close to the forest and didn''t have to run through the woods for long. I kept looking back if this person was following us but there was no sign of him. We knew we were safe when we see the farmers belonging to the brigade. My brothers and I ran up to the foreman and explained to him what had happened. He immediately grabbed the phone and called someone. The other farmers reassured us that we were safe now. After we had calmed down we got sent home. Our mother met as at home, she fed us and comforted me."'
					'"The following day we were informed that not far from the train station Ratomka some people found dismantled railroad rails. Apparently it was done by the same man that I came across in the forest. I didn''t know it then but before the war our area was prone to sabotage by infiltrators, and staying hidden was easy, as the territory is covered by forest, stretching all the way to the border."'
					'"Ever since that day the fear I experienced never disappeared, as I''ve felt it through my whole life. I’ll carry on this fear for the remaining days of my life…"'
				end
				!125e
				act 'You thank your grandmother for the story':gt 'Gadhouse', 'Start'
			end
		end

		act 'Leave her alone':gt 'Gadhouse', 'Start'
	end
end

if $ARGS[0]='grandpa':
	*clr & cla
	menu_off = 1
	minut += 2
	if grandpatalkday ! daystart:grandpatalk = 0
	gs 'stat'

	'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa.jpg"></center>'
	'Your grandfather is a grumpy old man, who is always complaining about the village elders and how they have neglected the village to barely being fit to live in. He can walk, but requires a cane. He doesn''t really leave the house any more, unless he really has to.'
	if $clothingworntype = 'nude':
		'Grandpa looks shocked but it doesn''t stop him from having a good look at you.'
		'"My God <<$pcs_nickname>>! Are you trying to give me a heart attack? Go and put some clothes on!"'

		act 'Maybe you should get dressed before talking to him':gt 'Gadhouse', 'Start'
	else

		if grigory_flower > 0 and grigory_flower < 10:
			act 'Talk to him about the flowers': gt 'grigory', 'flower3'
		end
		if go_in_boletus = 1:'You promise to bring grandpa <<grandpa_boletus>> kg of mushrooms.'
		if go_in_bilberry = 1:'You promise to bring grandpa <<grandpa_bilberry>> kg of berries.'
		if go_in_boletus_bilberry = 1:'You promise to bring grandpa <<grandpa_boletus>> kg mushrooms and <<grandpa_bilberry>> kg of berries.'
		!125s
		if grandpahelpday ! daystart:act 'Offer to help':grandpahelpday = daystart & gt'grandpahelp'
		if grandpatalkforest = 0:
			act 'Ask about the forest (0:10)':
				cla
				*clr
				grandpatalkforest = 1
				minut += 10
				pcs_mood += 5
				goforest += 1
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
				'"Listen carefully <<$pcs_nickname>>. You want to explore the forest and that''s great. But be sure of your surroundings, without having any knowledge of the forest you may easily get lost. Don''t go exploring too deep in the forest, because the mushrooms and berries can be found at the edge of the forest. If you choose to explore the forest you''ll find a swamp in the middle of the forest. You can find mushrooms and berries there too... Going into the forest at night is not recommended, wild boars may attack, and you might end up really hurt."'
				'"If you manage to get lost and can''t find your way out of the forest before it gets dark, then light a fire and sit still there until morning. The beasts in the forest are afraid of the fire, so they won''t approach you."'
				'"There''s one more thing... While you''re in the woods, avoid dressing yourself up in fancy clothes. You might damage them. It''s better to dress in more comfortable clothes instead..."'
				'"Well, I think that''s everything <<$pcs_nickname>>, run along now, and remember what I''ve told you."'

				act 'Finish':gt 'Gadhouse', 'Start'
			end
		end
		!125e
		if hour >= grandpatalk + 3:
			act 'Chat with your grandfather (0:10)':
				cla
				*clr
				grandpatalk = hour
				grandpatalkday = daystart
				minut += 10
				pcs_mood += RAND(5,10)
				gs 'stat'

				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/grandpa1.jpg"></center>'
				'Your grandfather stops complaining and smiles at you, he loves telling stories. He has lived a rich and eventful life, and you enjoy listening to his stories and talking to him. He mostly reminisces about his past, and reflects on his earlier life.'

				act 'Continue':gt 'Gadhouse', 'Start'
			end
		end

		act 'Leave him alone':gt 'Gadhouse', 'Start'
	end
end

if $ARGS[0]='villagecat':
	*clr & cla
	menu_off = 1
	minut += 2
	gs 'stat'

	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/villcat.jpg"></center>'
	'Your grandparents'' fat tomcat, Boniface, is aware of you approaching him, even though his eyes are closed. He tracks you with his ears and simply ignores you.'

	act 'Pet Boniface':
		cla
		*clr
		minut += 5
		pcs_mood += RAND(1,4)
		gs 'stat'

		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/villcat1.jpg"></center>'
		'You gently pet Boniface, giving him a good scratch behind the ears. You hear him start to purr. As soon as you stop scratching him, the purring stops too. That lazy bastard... he''s living the good life!'

		act 'Continue':minut += 2 & gt 'Gadhouse', 'Start'
	end

	if feedcat = 1:
		act 'Feed Boniface':
			cla
			*clr
			minut +=5
			gs 'stat'
			feedcat = 2
			'<center><video autoplay loop src="images/locations/gadukino/grandparents/feedboniface.mp4"></video></center>'
			'When Boniface sees you moving towards the cupboard, he jumps down off of the table and runs to his food dish. It is obvious that he feels that you are moving far too slowly and rattles his bowl to make sure you understand that he is starving while you dawdle.'
			act 'Continue': gt 'Gadhouse', 'Start'
		end
	end

	if catout = 1:
		act 'Let Boniface Out':
			if sunWeather = 0:
				cla
				*clr
				minut += 10
				gs 'stat'
				'You open the door for Boniface who saunters around you only to stop in the doorway as he becomes aware that it is raining out. He glares up at you as if the rain was your fault. He stares out into the wet for another moment then sedately turns around and goes back to his box.'
				act 'Continue': gt 'Gadhouse', 'Start'
			else
				cla
				*clr
				minut +=10
				gs 'stat'
				catout = 2
				'You open the door for Boniface who saunters around you only to stop in the doorway as he stops to consider if he really wants to go outside. After considering all the pros and cons, he finally decides to go out.'
				act 'Continue': gt 'Gadhouse', 'Start'
			end
		end
	end
	act 'Leave Boniface alone':minut += 2 & gt 'Gadhouse', 'Start'
end

if $ARGS[0] = 'intro':
	cla & *clr
	$metka = ''
	$loc = 'Gadhouse'
	$temp_nickname = '<<$npc_nickname[''A29'']>>'
	monthbabkapay = month
	menu_off = 1
	hour = 6
	gs 'stat'
	'<center><H4>Your Grandparents'' Cottage</H4></center>'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
	*nl
	'All of a sudden you hear a familiar voice yell out, "<<$pcs_nickname>>, time to get up. You can''t spend the whole day laying around!"'
	wait 2000
	$npc_nickname['A29'] = input('<center>What name do you address your mother by?<br>Mother (default), Mum, Mom, Mama, etc.</center>')
	if $npc_nickname['A29'] = '':$npc_nickname['A29'] = '<<$temp_nickname>>'
	killvar '$temp_nickname'

	act 'Continue':
		cla & *clr
		minut += 2
		gs 'stat'
		'<center><H4>Your Grandparents'' Cottage</H4></center>'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost5.jpg"></center>'
		*nl
		'You tiredly open your eyes seeing your <<$npc_nickname[''A29'']>> standing over you, "Fifteen more minutes..."'
		'Your <<$npc_nickname[''A29'']>> lets out a loud sigh, "No, up now!" as she yanks the cover off...'
		'"<<$npc_nickname[''A29'']>>!" you exclaim, as you feel a slight cold breeze hit your body.'
		'"Listen!, I''m heading back to Pavlovsk this morning, and I don''t want to hear excuses, <<$pcs_nickname>>. The summer holidays will be over soon and you need to get used to waking up early, for when school starts. So, from now on set your alarm, so you can wake up at a reasonable time." <<$npc_nickname[''A29'']>> says as she stares at you expectantly.'
		act 'Get up':
			cla & *clr
			minut += 2
			gs 'stat'
			'<center><H4>Your Grandparents'' Cottage</H4></center>'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
			*nl
			'As soon as you get off your now coverless bed, your <<$npc_nickname[''A29'']>> is quick to resume her nagging, telling you again what you already heard from her a few moments ago. "Summer is almost over, you can''t sleep in anymore, not even for another fifteen minutes." She''s not even looking at you while she talks, but luckily for you that means she misses you rolling your eyes.'
			'"What are you going to do when school starts, or when you get a job? You better get into the habit of setting your alarm so you can wake up bright and early."'
			act 'Continue':
				cla & *clr
				minut += 2
				gs 'stat'
				'<center><H4>Your Grandparents'' Cottage</H4></center>'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost5.jpg"></center>'
				*nl
				'You let out an exasperated sigh, "Yeah, yeah I know, you told me that already. So, how early are we talking?"'
				'Your <<$npc_nickname[''A29'']>> shoots you a sharp look and you know to fix your attitude or else. "Well, depends on what you plan to do in the morning. There''s showering and brushing your teeth, doing your hair and then makeup and shaving if you really need to. If I remember right...Anya used to wake up at 06:00 for school. Besides, while you are staying at your grandparents house, you should be up extra early helping them tend to the farm, this isn''t a holiday camp!"'
				act 'Continue':
					cla & *clr
					minut += 2
					gs 'stat'
					'<center><H4>Your Grandparents'' Cottage</H4></center>'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
					*nl
					'"You want me to wake up that early?!" You huff. "Can''t I wake up at like... 07:00?"'
					'Your <<$npc_nickname[''A29'']>> shrugs. "You could, but then you might have to cut corners or even end up running late to school, and I won''t be having any of that. Your teachers won''t either," she warns you before making her way outside. "Oh, don''t forget; when you get back to Pavlovsk, you need to head down to the clinic and see the gynecologist for a check up. Not just once, but every month," she adds quickly.'
					act 'But why do I--':
						cla & *clr
						minut += 2
						gs 'stat'
						'<center><H4>Your Grandparents'' Cottage</H4></center>'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost5.jpg"></center>'
						*nl
						'Before you can finish, she cuts you off. "I''m not going to have you running around town like so many of those other girls I see! Opening their legs for any boy that comes around..." She shakes her head in disgust. "I want a referral every month and it better tell me you''re still a virgin or else, understand?" <<$npc_nickname[''A29'']>> says as she storms off towards your grandparent''s outside door. "Don''t forget to talk to your grandparent''s and ask if they need help!" she says loudly. Without waiting for your response, she closes the door, and with that, she''s gone.'

						act 'I understand...':gt 'budilnik', 'start'
					end
				end
			end
		end
	end
end
--- Gadhouse ---------------------------------