dachain 4.2 KB

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