# obkitchen gs 'stat' $metkaM = $ARGS[0] $locM = $CURLOC '
in the dorm kitchen
' '
' act 'In the corridor':gt 'dorm', 'korr' if eda > 0: act 'Cook food (1:00)': cla *clr set minut += 60 gs 'stat' set edahot += 1 set eda -= 1 set manna -= 5 '
' 'You prepare the meal.' act 'Leave the meal':gt 'obkitchen' end end if edahot > 0: act 'Eat cooked food (0:30)': cla *clr gs 'stat' frost = 0 '
' set minut += 30 set edahot -= 1 set health += 10 set manna += 20 if energy >= 30: set fat += 5 'You can no longer have.' end if energy >= 20 and energy < 30: set fat += 3 set energy += 10 'You pushed through the power of a meal.' end if energy < 20: set energy += 20 !!set fat += 1 'You gladly ate cooked food.' end if water >= 20:'Tea in you no longer climbs.' if water < 20: 'You gladly drank a mug of tea.' set water += 20 end act 'Get up from the table':gt 'obkitchen' end end if pranik > 0: act 'Drink tea with cookies (0:05)': cla *clr minut += 5 pranik -= 1 set health += 30 set manna += 100 energy += 20 water += 20 fat += 50 frost = 0 gs 'stat' '
' 'You drank tea with cookies, sweet and very bad for the figure, but so nice.' act 'Get up from the table':gt 'obkitchen' end end if edaD > 0: act 'Eat diet meal (0:30)': cla *clr frost = 0 '
' set minut += 30 set health += 10 set manna += 20 set edaD -= 1 if energy >= 30:'You can no longer have.' if energy >= 20 and energy < 30: set energy += 10 'You pushed through the power of a meal.' end if energy < 20: set energy += 20 'You gladly ate cooked food.' end if water >= 20:'Tea in you no longer climbs.' if water < 20: 'You gladly drank a mug of tea.' set water += 20 end act 'Get up from the table':gt 'obkitchen' end end if fatdel > 0: act 'Consume fat burners': cla *clr set fatdel -= 1 set fat -= 25 if fat < 0:fat = 0 'You drank fat burning capsule. These capsules are gradually and results will be seen immediately.' act 'Get up from the table':gt 'obkitchen' end end act 'Drink': cla set minut += 5 if water >= 20:'Water in you no longer climbs.' if water < 20: 'You gladly drank a glass of water.' set water += 20 end act 'Get up from the table':gt 'obkitchen' end if lekarstvo > 0: 'You have <> tablets.' if sick > 0 and lekarday ! day: act 'Take a pill': cla *clr set minut += 5 lekarday = day lekarstvo -= 1 sick -= sick * 20/100 set lekrand = rand(0, 8) if lekrand = 0:'
' if lekrand = 1:'
' if lekrand = 2:'
' if lekrand = 3:'
' if lekrand = 4:'
' if lekrand = 5:'
' if lekrand = 6:'
' if lekrand = 7:'
' if lekrand = 8:'
' 'You drank the pill' act 'Move away':gt 'obkitchen' end end end if vitamin > 0: 'You have <> vitaminok.' if vitaminday ! day: act 'Drink Vitamins': cla *clr set minut += 5 vitaminday = day vitamin -= 1 frost = 0 set skinvan += 1 if skinvan = 20:set skinvan = 0 & set skin += 1 'You drank Vitaminki' act 'Move away':gt 'obkitchen' end end end --- obkitchen ---------------------------------