# obkitchen
if $args[0] = '':
$metkaM = $ARGS[0]
$locM = $CURLOC
gs 'stat'
'
in the dorm kitchen'
''
act 'Return to the corridor':gt 'dorm', 'korr'
if eda > 0:
'Your shelf in the refrigerator holds <> servings of food.'
if edahot = 0:
act 'Cook food (0:30)':
cla
*clr
minut += 30
edahot += 1
eda -= 1
manna -= 5
gs 'stat'
''
'You prepare a meal.'
gs 'obkitchen', 'food'
act 'Leave the meal':gt 'obkitchen'
end
end
end
if edaD = 0 and eda = 0:'Your shelf in the refrigerator is bare, there is nothing left for you to eat.'
if edahot > 0:
'A cooked meal is on the table.'
gs 'obkitchen', 'food'
end
if pranik > 0:
if pranik = 1:
'You only have one more portion of cookies.'
else
'You have enough cookies for <> more snacks.'
end
dynamic $pranik
end
dynamic $edaD
dynamic $fatdel
dynamic $driwater
dynamic $lekarstvo
dynamic $vitamin
end
if $args[0] = 'food':
act 'Eat cooked food (0:30)':
cla
*clr
edahot = 0
manna += 20
dynamic $food
end
end
--- obkitchen ---------------------------------