1
0

kuhrPar.qsrc 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136
  1. # kuhrPar
  2. CLOSE ALL
  3. if fullmorrout = 1:
  4. minut += 2
  5. act '<font color = maroon><b>Leave the apartment and go outside</b></font>':
  6. minut +=1
  7. killvar 'fullmorrout'
  8. gs 'korrPar'
  9. gt'pavResidential'
  10. end
  11. end
  12. act 'Return to the hallway':
  13. killvar 'fullmorrout'
  14. gt 'korrPar'
  15. end
  16. $loc = 'kuhrPar'
  17. $metka = ''
  18. $locclass = 'kitr'
  19. $menu_loc = 'kuhrPar'
  20. $menu_arg = ''
  21. menu_off = 0
  22. clr
  23. minut += 1
  24. gs 'stat'
  25. gs 'kit_din'
  26. gs 'themes', 'indoors'
  27. '<center><b><font color="maroon">Kitchen</font></b></center>'
  28. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/kuhrpar.jpg"></center>'
  29. if hour = 7 and indorf = 0:
  30. !r125
  31. *nl '<a href="exec:gt''father''">Your stepfather</a> and <a href="exec:gt ''brother'', ''start''">Kolka</a> are sitting at the table eating Breakfast. <a href="exec:gt''mother''">Your mother</a> is hard at work to make sure everybody has enough to eat for the rest of the day.'
  32. ! on weekdays Anka here too
  33. if week <= 5: *P ' <a href="exec:gt''sister''">Anya</a> is trying to lose some weight so she is only having a very light breakfast.'
  34. else
  35. 'The kitchen is not very impressive, but it has everything your family needs. Since everyone has the habit of eating at different times, <<$npc_nickname[''A29'']>> usually pre-cooks the meals and stores them in the fridge. Of course, you could also just have a snack if you''re not that hungry.'
  36. end
  37. gs 'family'
  38. act 'Eat a meal (0:30)':gs 'food', 'm_meal'
  39. act 'Have a snack (0:15)':gs 'food', 'snack'
  40. act 'Drink some water (0:05)':gs 'beverage', 'bev_wat'
  41. act 'Have a cup of tea (0:05)':
  42. cls
  43. if pcs_hydra >= 100:
  44. 'You don''t need any more tea.'
  45. else
  46. minut += 5
  47. pcs_hydra += 80
  48. cumspclnt = 2
  49. gs 'cum_cleanup'
  50. pcs_breath = 0
  51. pcs_mood += rand(3, 6)
  52. 'You make a refreshing cup of tea and everything seems a little better.'
  53. end
  54. gs 'stat'
  55. act 'Get up from the table':gt $loc, $metka
  56. end
  57. if pranik > 0:
  58. 'You have <<pranik>> tea biscuits.'
  59. act 'Drink tea with biscuits (0:05)':
  60. cla
  61. *clr
  62. minut += 5
  63. pranik -= 1
  64. pcs_health += 30
  65. pcs_mood += 20
  66. pcs_energy += 20
  67. if pcs_hydra >= 100:
  68. pcs_hydra += 30
  69. else
  70. pcs_hydra += 60
  71. end
  72. cumspclnt = 2
  73. gs 'cum_cleanup'
  74. pcs_breath = 0
  75. fat += 4
  76. frost = 0
  77. gs 'stat'
  78. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  79. 'You drank tea and enjoyed the tea biscuits. You know they''re too sweet and can''t be good for your figure, but they taste so good!'
  80. act 'Get up from the table':gt $curloc
  81. end
  82. end
  83. if edaD > 0:
  84. act 'Eat diet food (0:30)':
  85. cla
  86. *clr
  87. frost = 0
  88. minut += 30
  89. pcs_health += 10
  90. pcs_mood += 20
  91. edaD -= 1
  92. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  93. if pcs_energy >= 100:
  94. 'You prepare a diet meal and try to eat it, but you''re really not hungry at all. You can''t finish the meal.'
  95. elseif pcs_energy >= 80:
  96. pcs_energy += 40
  97. 'You try to enjoy the diet meal, but half-way in you realize you weren''t all that hungry yet. You manage to finish the meal, but feel like it was kind of wasted.'
  98. else
  99. pcs_energy += 80
  100. 'The diet meal is tasty, and you enjoy eating it.'
  101. end
  102. if pcs_hydra >= 80:
  103. 'You don''t need any more tea.'
  104. else
  105. pcs_hydra += 100
  106. cumspclnt = 2
  107. gs 'cum_cleanup'
  108. pcs_breath = 0
  109. 'You have a cup of tea, quenching your thirst.'
  110. end
  111. act 'Get up from the table':gt $curloc
  112. end
  113. end
  114. dynamic $fatdel
  115. dynamic $lekarstvo
  116. dynamic $vitamin
  117. --- kuhrPar ---------------------------------