# obkitchen
gs 'stat'
$metkaM = $ARGS[0]
$locM = $CURLOC
'<center><B>in the dorm kitchen</B></center>'
'<center><img src="images\img\centr\obkitchen.jpg"></center>'

act 'In the corridor': gt 'dorm','korr'
if eda > 0:
act 'Cook food (0:30)':
cla
*clr
set minut += 30
gs 'stat'
set edahot += 1
set eda -= 1
set manna -= 5
'<center><img src="images\pics\cook.jpg"></center>'
'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
'<center><img src="images\pics\food.jpg"></center>'
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.'
	end
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:15)':
	cla
	*clr
	minut += 15
	pranik -= 1
	set health += 30
	set manna += 100
	energy += 20
	water += 20
	fat += 50
	frost = 0
	gs 'stat'
	'<center><img src="images\pics\food.jpg"></center>'
	'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
	'<center><img src="images\pics\food.jpg"></center>'
	set minut += 30
	set health += 10
	set manna += 20
	set edaD -= 1
	if energy >= 30:
		'You can no longer have.'
		end
		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.'
		end
		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.'
		end
		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 <<lekarstvo>> 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: '<center><img src="images\inBed\lekr1.jpg"></center>'
		if lekrand = 1: '<center><img src="images\inBed\lekr2.jpg"></center>'
		if lekrand = 2: '<center><img src="images\inBed\lekr3.jpg"></center>'
		if lekrand = 3: '<center><img src="images\inBed\lekr4.jpg"></center>'
		if lekrand = 4: '<center><img src="images\inBed\lekr5.jpg"></center>'
		if lekrand = 5: '<center><img src="images\inBed\lekr6.jpg"></center>'
		if lekrand = 6: '<center><img src="images\inBed\lekr7.jpg"></center>'
		if lekrand = 7: '<center><img src="images\inBed\lekr8.jpg"></center>'
		if lekrand = 8: '<center><img src="images\inBed\lekr9.jpg"></center>'
		'You drank the pill'
		act 'Move away': gt 'obkitchen'
		end
	end
end

if vitamin > 0:
'You have <<vitamin>> 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 ---------------------------------

