# bedrPar2
ACT 'Exit the room':
	gt'korrPar'
END
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
'<center><B><font color=maroon>Master bedroom</font></B></center>'
'<center><img src="qwest/alter/<<$loc>>.jpg" ></center>'
clr
set minut = minut + 1
gs'stat'
fcolor=rgb(0,0,0)
bcolor=rgb(255,255,255)
LCOLOR = rgb(106,90,205)
'The room in which the parents live. In the center stands a double bed and large wardrobe against the wall.'


gs'family'

if hour=21 and parsexrand=5 and parentsexday!daystart:gt'seeparentsex'
--- bedrPar2 ---------------------------------

