# katspalnya
$sexloc = $CURLOC
if $ARGS[0] = 'start':
$metkaM = $ARGS[0]
$locM = $CURLOC
cls
gs 'stat'
'
Guest Katie'
''
if hour >= 18 and hour < 23:'Sitting on the couch Kate and watching television'
if hour >= 23 or hour < 6:'In bed asleep Kate.'
'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
minut += 30
if katjob = 0 and kat > 60:gt 'katspalnya', 'katjobs'
''
'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
minut += 30
if katjob = 0 and kat > 60:gt 'katspalnya', 'katjobs'
''
'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
*clr
if telkat = 0:telkat = 1
kat += 1
minut += 30
''
'You talked for half an hour.'
act 'Finish':gt 'katspalnya', 'start'
end
end
if $ARGS[0] = 'katjobs':
cla
clr
*clr
katjob = 1
minut += 30
''
'"<<$name>> 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 ---------------------------------