# dachain
clr
$loc = 'dachain'
$metka = ''
$locM = 'dachain'
$metkaM = ''
gs 'stat'
if night_mode = 1:
fcolor = rgb(255, 255, 255)
bcolor = rgb(0, 0, 0)
lcolor = rgb(106, 90, 205)
else
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
end
if $args[0] = '':
$location_type = 'private'
$metka = ''
$metkaM = ''
cls
clr
gs 'stat'
'
Cottage'
if home_owned[3] = 2:
'> src="images/locations/suburban/cottage/dacharoom2.jpg">'
else
'> src="images/locations/suburban/cottage/dacharoom1.jpg">'
end
'Your favorite summer residence.'
*nl
'There is a bed against one wall. Next to it is a wardrobe (where you can choose outfits and organize your clothing). On the other side of the bed is a table and a mirror'
*nl
'There is a sofa in front of the fireplace, a kitchen alcove opposite the bed and the door to the bathroom next to that.'
*nl
if hour >= 6 and hour <= 20 and etoexhib = 11:'Kopashatsya working in the garden, hmm ... maybe sometime motivate for them to work quicker and smarter.'
if hour >= 6 and hour <= 20 and etoexhib = 12:'Leave in garden in lingerie and robe.'
if hour >= 6 and hour <= 20 and etoexhib = 13 and temp ! daystart:'I wonder how to garden'
act 'Lie on the couch': gt 'divan', 'start'
act 'Goto the kitchen alcove': gt 'dachain', 'dachakit'
act 'Goto the Bathroom': gt 'dachain', 'dachavann'
act 'Get in the bed': gt 'bed', 'start'
act 'Go outside':
if $clothingworntype ! 'nude':
minut += 5 & gt 'dachamy'
else
msg'You can''t leave the house naked! You need to get dressed first.'
gt 'dachain'
end
end
end
if $args[0] = 'dachakit':
$location_type = 'private'
$metka = 'dachakit'
$metkaM = 'dachakit'
cls
clr
gs 'stat'
'Cottage Kitchen'
if home_owned[3] = 2:
'> src="images/locations/suburban/cottage/dachakit2.jpg">'
else
'> src="images/locations/suburban/cottage/dachakit1.jpg">'
end
if cltarelka > 0:
'<> clean plates are stored in the cupboard.'
else
'You have no clean dishes left.'
end
if dirttarelka > 0:'<> dirty dishes are lying in the sink. Wash the dishes.'
if fairy > 0:
'Next to the sink is dishwashing liquid, enough for <> uses.'
else
'You have nothing to wash dishes with, you need to buy dishwashing liquid.'
end
if eda > 0:
if cltarelka = 0 or edahot > 0:$edagot = ''
if cltarelka > 0 and edahot = 0:$edagot = 'Cook meal (0:30)'
'In the refrigerator there''s food, enough for <> servings. <<$edagot>>'
end
if edaD = 0 and eda = 0:'The refrigerator is empty, you have nothing to eat.'
if edahot > 0: act 'A cooked meal is on the table (0:30).': dynamic $edahotd
if husband > 0 and husbandrink ! 10:
if hour = 7 or hour = 17:'Your husband is eating at the table.'
end
if pranik > 0:
if pranik = 1:
'You only have one more portion of tea biscuits.'
else
'You have enough tea biscuits for <> more snacks.'
end
dynamic $pranik
end
dynamic $edaD
dynamic $fatdel
dynamic $driwater
dynamic $lekarstvo
dynamic $vitamin
act 'Go into the main room': gt 'dachain', ''
act 'Goto the Bathroom': gt 'dachain', 'dachavann'
end
if $args[0] = 'dachavann':
$metka = 'dachavann'
$metkaM = 'dachavann'
$location_type = 'bathroom'
cls
clr
gs 'stat'
'Cottage Bathroom'
if home_owned[3] = 2:
'> src="images/locations/suburban/cottage/dachavan2.jpg">'
else
'> src="images/locations/suburban/cottage/dachavan1.jpg">'
end
gs 'din_van', 'private'
act 'Goto the kitchen alcove': gt 'dachain', 'dachakit'
act 'Go into the main room': gt 'dachain', ''
end
--- dachain ---------------------------------