# yban
$metka = $ARGS[0]
$loc = $CURLOC
clr
gs 'stat'
gs 'themes', 'indoors'
'
Sauna'
'> src="images/locations/city/suburb/mansion/yban.jpg">'
if $clothingworntype ! 'nude':act 'Walk back to the house':minut += 5 & gt 'youplace'
act 'Go to the gym': minut += 5 & gt 'ysport'
if saunaday ! daystart:
act 'Use the sauna':
cls
minut += 60
fat -= 10
pcs_sweat = rand(0,5)
dynamic $showerdin
saunaday = daystart
pcs_mood = 100
gs 'stat'
'> src="images/locations/city/shared/sauna/sau.jpg">'
'You spend an hour relaxing in the heat of the sauna. You take a shower after you''re done to cool down and get dressed. You feel revitalised.'
act 'Leave':gt 'yban'
end
end
--- yban ---------------------------------