glife/locations/116_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 ---------------------------------