# saunaroom
$metka = $ARGS[0]
$loc = $CURLOC
$metkaBroom = $ARGS[0]
$locBroom = $CURLOC
$metkaM = $ARGS[0]
$locM = $CURLOC
saunaYouRoom = 1
'<center><B><font color = maroon>Room</font></B></center>'
'<center><img src="images\etogame\saunaroom.jpg"></center>'
'The room is barely removed <a href="exec:sec += 30 & GT ''saunabed''">bed</a> and <a href="exec:GT ''loker'',''start''">cabinet</a>.'
'Hanging on the wall <a href="exec:GT ''mirror'',''start''">mirror</a>'
if money > 0 and workDolg > 0: workDolg -= money & money = 0
if workDolg > 0: 'Your debt is <<workDolg>> rubles'

	act 'Go to the sauna': gt 'saunawork'


if workDolg > 0:
	act 'There are in debt (0:05)':
	cla
	*clr
	minut += 5
	workDolg += 50
	set health += 30
	set manna += 100
	energy = 20
	water = 20
	fat += 50
	salo += 1
	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 $curloc
	end

	act 'Borrow cosmetics':
	workDolg += 1000
	set kosmetica += 25
	gt $curloc
	end
end

if water < 20:
	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 $curloc
	end
end
--- saunaroom ---------------------------------

