# KatjaHome CLOSE ALL cla *clr gs 'stat' '
' if hour >= 17 and week < 6 and kanikuli = 0 and hour < 20 or hour >= 9 and week >= 6 and kanikuli = 0 and hour < 20 or hour >= 9 and kanikuli > 0 and hour < 20: 'The door is opened by Katjas mum. "Hello <<$name>>. Kate is in her room. Come in."' act 'Go to Katjas room': if frost > 0: frost = 0 gt'KatjaHomeTalk' end else if hour >= 9:'The door is opened by Katjas mum. "Oh, hello <<$name>>. Katja isn''t home right now."' if hour < 9:'The door is opened by Katjas mum. "<<$name>>. Shouldn''t you be in bed? You shouldn''t come around before nine."' act 'Say goodbye and go home':gt 'pavResidential' end --- KatjaHome ---------------------------------