# NatBelVhod
CLOSE ALL

cla
clr

if BeInNatBelHome = 0:BeInNatBelHome = 1
gs'stat'

GoInside = 1
$byetext=''
if hour <18 and kanikuli = 0 and week <6: $byetext='You knock on the door, but nobody answers.' & GoInside = 0

if hour > 20 : $byetext='It is to late to go to visit.' & GoInside = 0

if hour < 8 : $byetext='It is to early to go to visit.' & GoInside = 0

if GoInside ! 0:
	'You knock on the door. Natasha answers and invites you in.'
	act 'Go into the apartment':gt'NatBelHome'
else
	'<<$byetext>>'
end
act 'Leave':gt'pod_ezd','etaj_4'

--- NatBelVhod ---------------------------------