glife/locations/katspalnya

# katspalnya
$sexloc = $CURLOC

if $ARGS[0] = 'start':
	cls
	gs 'stat'
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	'<center><b><font color="maroon">Guest Katie</font></b></center>'
	'<center><img src="images/img/SleepingQuarter/Kathouse/bedroom.jpg"></center>'

	if hour >= 18 and hour < 23:'Sitting on the couch <a href="exec:gt ''katspalnya'', ''kat''">Kate</a> and watching television'
	if hour >= 23 or hour < 6:'In bed asleep <a href="exec:gt ''katspalnya'', ''katslip''">Kate</a>.'

	'Large room in the middle is a huge bed, a small couch in the side.'

	act 'Leave':gt 'street'
end

if $ARGS[0] = 'katslip':
	cla
	clr
	*clr
	set minut += 30

	if katjob = 0 and kat > 60:gt 'katspalnya', 'katjobs'

	'<center><img src="images/img/Kathouse/kat.jpg"></center>'
	'Katya rubs his eyes "Hey how´s it going."'

	act 'Move away':gt 'katspalnya', 'start'

	if kat > 50:act 'Sex':gt 'lezbsex', 'start'
end

if $ARGS[0] = 'kat':
	cla
	clr
	*clr
	set minut += 30

	if katjob = 0 and kat > 60:gt 'katspalnya', 'katjobs'

	'<center><img src="images/img/Kathouse/kat.jpg"></center>'
	'Seeing you Katya smiling "Hi how´s it going."'

	act 'Move away':gt 'katspalnya', 'start'

	if kat > 50:act 'Sex':gt 'lezbsex', 'start'

	act 'Chat':
		cla
		clr

		if telkat = 0:set telkat = 1

		set kat += 1
		set minut += 30
		'<center><img src="images/img/Kathouse/kat.jpg"></center>'
		'You talked for half an hour.'

		act 'Finish':gt 'katspalnya', 'start'
	end
end

if $ARGS[0] = 'katjobs':
	cla
	clr
	*clr
	set katjob = 1
	set minut += 30
	'<center><img src="images/img/Kathouse/kat.jpg"></center>'
	'"Svetsik if you want I can talk to your doctor and heads take to work in the clinic."'

	act '"But I´m not a nurse."':
		cla
		'"But I´m not a nurse." you tried to argue.'
		'"Oh, come on, you start with what some unpretentious, dressing will do. And there you´ll learn, life safety in the school because it was."'
		'"Yes, it was." otveteli you thinking about what you are interested in while not dressings.'
		'"Well, okay, I´ll talk and you yourself want to come see it or not."'

		act '"Good."':gt 'katspalnya', 'start'
	end
end

--- katspalnya ---------------------------------