# spalnya $metkaM = $ARGS[0] $locM = $CURLOC '
Bedroom
' '
' set minut += 5 set tanhouse1 = 1 gs 'stat' if komp = 1:'Computer.' act 'In the corridor':gt 'house' act 'Learn lesson (2:00)': cla set minut += 120 set intel += 1 'You prozanimavshis two hours seems something in your head postponed' act 'Finish':gt 'spalnya' end if student > 0 and kursovik < 100: act 'Write kursovik (1:00)': cla *clr set minut += 60 set kursovik += rand(intel / 20, intel / 10) if kursovik > 100:set kursovik = 100 set manna -= 10 '
' 'You sat on the course work and prepared her <> percent.' act 'Finish':gt 'spalnya' end end act 'Mirror':gt 'mirror', 'start' act 'Cupboard':gt 'loker', 'start' act 'In bed':gt 'bed', 'start' if tanga = 0 and clrbelo > 0: act 'Wear underwear': cla set tanga = 1 gt 'spalnya' end else act 'Remove Underwear': cla set tanga = 0 gt 'spalnya' end end --- spalnya ---------------------------------