# Katlake
cla
gs 'stat'
'<center><img src="images/img/Lake/kat.jpg"></center>'
'You get bored and you start to examine other vacationers far from you is beautiful girl.'

act 'Do not approach':gt 'Nudelake'

act 'Step up':
	cla
	'You walk up to a girl and trying to have a conversation.'

	act '"Hi."':gt 'Katlake', 'znakomstvo'
end

if $ARGS[0] = 'znakomstvo':
	cla
	gs 'stat'

	if vnesh < 14:
		katday = daystart
		'"Hello" you say, a bit shyly.'
		'The girl looked around you scornful look and said nothing'
		'"Talk will not work" flashed in your head'

		act 'Leave.':gt 'Nudelake'
	else
		cla
		clr
		katday = daystart
		telkat += 1
		kat = 1
		minut += 30
		'"Hello" you say a bit shyly.'
		'Girl looks you up and down, smiles and says, "Hi."'
		'She looks at you with a slight smile and waits. You frantically trying to think of what to say, blushing trying to squeeze out a word.'
		'Girl notices your flour and decides to take matters into their own hands, "I Katja, for friends Kate and what''s your name?"'
		'"<<$name>>" you exhale with relief. Continue the conversation went much better and you chatted for another half hour.'

		act 'Leave.':gt 'Nudelake'
	end
end

if $ARGS[0] = 'kat':
	cla
	clr
	*clr
	gs 'stat'
	minut += 30
	'<center><img src="images/img/Lake/kat.jpg"></center>'
	'See you smiling Kate "<<$name>> Hi how''s it going."'

	act 'Leave':gt 'Nudelake'
	act 'Offer to play volleyball':gt 'Katlake', 'voleybol'
	act 'Suggest a walk':gt 'Katlake', 'walk'

	act 'Chat':
		cla
		clr
		katday = daystart
		kat += 1
		minut += 30
		'You talked for half an hour.'

		act 'Leave':gt 'Nudelake'
	end
end

if $ARGS[0] = 'voleybol':
	cla
	clr
	*clr
	katday = daystart
	kat += 3
	minut += 30
	agil += 1
	react += 1
	speed += 1
	gs 'stat'
	'<center><img src="images/img/Lake/voleybol.jpg"></center>'
	'You can go to Kate volleyball court and Join of playing. When something goes wrong Kate encourages you clapping a hand over your bare ass, with her hand on his buttocks slightly delayed slightly squeezing it.'

	act 'Finish':gt 'Nudelake'
end

if $ARGS[0] = 'walk':
	cla
	katday = daystart
	kat += 2
	minut += 30
	gs 'stat'
	'You Kat walk along the beach, chatting merrily.'
	kwalrand = rand(0, 100)

	if kwalrand >= 80 and kwalrand < 90 and kat > 20:gt 'Kwlake1'
	if kwalrand >= 90 and kat > 20:gt 'Kwlake2'

	act 'Finish':gt 'Nudelake'
end


if $ARGS[0] = 'key':
	cla
	clr
	*clr
	katkey = 1
	kat += 10
	minut += 60
	gs 'stat'
	'<center><img src="images/img/Lake/sun.jpg"></center>'
	'You sunbathe, you suddenly become ill, dizzy, nauseated you. You tried to get up and lost consciousness.'
	'"Now, now, wait a little." where you hear that voice from the darkness Katie.'
	'You feel the cool darkness slowly razveevaetsya and you open your eyes. Before you face the Cat.'
	'"Good, you are finally awake." says Kate. You look around, you have a wet towel on your head, and you yourself are lying in the shade under a tree.'
	'"What happened to me, " you ask.'
	'"What, what, sunstroke, that''s what." meets Katya.'
	'"And now comes to life and went to me, today I''ll stay, " she continued.'
	'"I feel better, I am going home, " you tried to argue.'
	'"No, well, you better it a look, I''m with her noshus like a chicken with egg, three times ran a towel drenched, dragged by his shadow, and she still vykobenivaetsya. All I said to me it means to me, I still nurse and I know better "'
	'After this tirade mind you do not become'

	act 'Go with Kate.':gt 'kathouse0'
end

--- Katlake ---------------------------------