dachain 4.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124
  1. # dachain
  2. clr
  3. $loc = 'dachain'
  4. $locm = 'dachain'
  5. gs 'stat'
  6. if night_mode = 1:
  7. fcolor = rgb(255, 255, 255)
  8. bcolor = rgb(0, 0, 0)
  9. lcolor = rgb(106, 90, 205)
  10. else
  11. fcolor = rgb(0, 0, 0)
  12. bcolor = rgb(255, 255, 255)
  13. lcolor = rgb(106, 90, 205)
  14. end
  15. if $args[0] = '':
  16. $location_type = 'private'
  17. $metka = ''
  18. $metkaM = ''
  19. cls
  20. clr
  21. gs 'stat'
  22. '<center><b><font color="maroon">Cottage</font></b></center>'
  23. if dachaest = 2:
  24. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dacharoom2.jpg"></center>'
  25. else
  26. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dacharoom1.jpg"></center>'
  27. end
  28. 'Your favorite summer residence.'
  29. ''
  30. 'There is a <a href="exec:gt ''bed'', ''start''">bed</a> against one wall. Next to it is a wardrobe(where you can <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">organize your clothes</a> or <a href="exec:gt ''clothing_QV'', ''list''">pick something to wear</a>). You have a <a href="exec:gt ''clothing'', ''view_clothing_list'', ''store''">chest</a> at the end of your bed where you can store some clothes. On the other side of the bed is a table and a <a href="exec:gt ''mirror'', ''start''">mirror</a>'
  31. ''
  32. 'There is a sofa in front of the fireplace, a kitchen alcove oppsite the bed, the door to the bathroom next to it and beside the entrance is the <a href="exec:gt ''cloakroom'', ''view_coat_list''">coat closet</a>.'
  33. ''
  34. if hour >= 6 and hour <= 20 and etoexhib = 11:'Kopashatsya working in the garden, hmm ... maybe sometime <a href="exec:gt ''etoexhib'', ''pos10''">motivate</a> for them to work quicker and smarter.'
  35. if hour >= 6 and hour <= 20 and etoexhib = 12:'Leave in <a href="exec:gt ''etoexhib'', ''pos11''">garden in lingerie and robe.</a>'
  36. if hour >= 6 and hour <= 20 and etoexhib = 13 and temp ! daystart:'I wonder how to <a href="exec:gt ''etoexhib'', ''pos12''">garden</a>'
  37. act 'Lie on the couch': gt 'divan', 'start'
  38. act 'Goto the kitchen alcove': gt 'dachain', 'dachakit'
  39. act 'Goto the Bathroom': gt 'dachain', 'dachavann'
  40. act 'Get in the bed': gt 'bed', 'start'
  41. act 'Go outside': gt 'dachamy'
  42. end
  43. if $args[0] = 'dachakit':
  44. $location_type = 'private'
  45. $metka = 'dachakit'
  46. $metkaM = 'dachakit'
  47. cls
  48. clr
  49. gs 'stat'
  50. '<center><b><font color="maroon">Cottage Kitchen</font></b></center>'
  51. if dachaest = 2:
  52. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dachakit2.jpg"></center>'
  53. else
  54. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dachakit1.jpg"></center>'
  55. end
  56. if cltarelka > 0:
  57. '<b><<cltarelka>></b> clean plates are stored in the cupboard.'
  58. else
  59. '<b><font color="red">You have no clean dishes left.</font></b>'
  60. end
  61. if dirttarelka > 0:'<b><<dirttarelka>></b> dirty dishes are lying in the sink. <a href="exec:dynamic $dirtarm">Wash the dishes</a>.'
  62. if fairy > 0:
  63. 'Next to the sink is dishwashing liquid, enough for <b><<fairy>></b> uses.'
  64. else
  65. '<b><font color="red">You have nothing to wash dishes with, you need to buy dishwashing liquid.</font></b>'
  66. end
  67. if eda > 0:
  68. if cltarelka = 0 or edahot > 0:$edagot = ''
  69. if cltarelka > 0 and edahot = 0:$edagot = '<a href="exec:dynamic $edagotd">Cook meal (0:30)</a>'
  70. 'In the refrigerator there''s food, enough for <b><<eda>></b> servings. <<$edagot>>'
  71. end
  72. if edaD = 0 and eda = 0:'<b><font color="red">The refrigerator is empty, you have nothing to eat.</font></b>'
  73. if edahot > 0: act 'A cooked meal is on the table (0:30).': dynamic $edahotd
  74. if husband > 0 and husbandrink ! 10:
  75. if hour = 7 or hour = 17:'<a href="exec:gt ''husb'', ''start''">Your husband is eating at the table.</a>'
  76. end
  77. if pranik > 0:
  78. if pranik = 1:
  79. 'You only have one more portion of cookies.'
  80. else
  81. 'You have enough cookies for <b><<pranik>></b> more snacks.'
  82. end
  83. dynamic $pranik
  84. end
  85. dynamic $edaD
  86. dynamic $fatdel
  87. dynamic $driwater
  88. dynamic $lekarstvo
  89. dynamic $vitamin
  90. act 'Go into the main room': gt 'dachain', ''
  91. act 'Goto the Bathroom': gt 'dachain', 'dachavann'
  92. end
  93. if $args[0] = 'dachavann':
  94. $metka = 'dachavann'
  95. $metkaM = 'dachavann'
  96. $location_type = 'bathroom'
  97. cls
  98. clr
  99. gs 'stat'
  100. '<center><b><font color="maroon">Cottage Bathroom</font></b></center>'
  101. if dachaest = 2:
  102. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dachavan2.jpg"></center>'
  103. else
  104. '<center><img <<$set_imgh>> src="images/locations/suburban/cottage/dachavan1.jpg"></center>'
  105. end
  106. gs 'din_van', 'private'
  107. act 'Goto the kitchen alcove': gt 'dachain', 'dachakit'
  108. act 'Go into the main room': gt 'dachain', ''
  109. end
  110. --- dachain ---------------------------------