kuhrPar.qsrc 3.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144
  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. if night_mode = 1:
  27. fcolor = rgb(255, 255, 255)
  28. bcolor = rgb(0, 0, 0)
  29. lcolor = rgb(106, 90, 205)
  30. else
  31. fcolor = rgb(0, 0, 0)
  32. bcolor = rgb(255, 255, 255)
  33. lcolor = rgb(106, 90, 205)
  34. end
  35. '<center><b><font color="maroon">Kitchen</font></b></center>'
  36. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/kuhrpar.jpg"></center>'
  37. if hour = 7 and indorf = 0:
  38. !r125
  39. *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.'
  40. ! on weekdays Anka here too
  41. 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.'
  42. else
  43. '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.'
  44. end
  45. gs 'family'
  46. act 'Eat a meal (0:30)':gs 'food', 'm_meal'
  47. act 'Have a snack (0:15)':gs 'food', 'snack'
  48. act 'Drink some water (0:05)':gs 'beverage', 'bev_wat'
  49. act 'Have a cup of tea (0:05)':
  50. cls
  51. if pcs_hydra >= 100:
  52. 'You don''t need any more tea.'
  53. else
  54. minut += 5
  55. pcs_hydra += 80
  56. cumspclnt = 2
  57. gs 'cum_cleanup'
  58. pcs_breath = 0
  59. pcs_mood += rand(3, 6)
  60. 'You make a refreshing cup of tea and everything seems a little better.'
  61. end
  62. gs 'stat'
  63. act 'Get up from the table':gt $loc, $metka
  64. end
  65. if pranik > 0:
  66. 'You have <<pranik>> tea biscuits.'
  67. act 'Drink tea with biscuits (0:05)':
  68. cla
  69. *clr
  70. minut += 5
  71. pranik -= 1
  72. pcs_health += 30
  73. pcs_mood += 20
  74. pcs_energy += 20
  75. if pcs_hydra >= 100:
  76. pcs_hydra += 30
  77. else
  78. pcs_hydra += 60
  79. end
  80. cumspclnt = 2
  81. gs 'cum_cleanup'
  82. pcs_breath = 0
  83. fat += 4
  84. frost = 0
  85. gs 'stat'
  86. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  87. '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!'
  88. act 'Get up from the table':gt $curloc
  89. end
  90. end
  91. if edaD > 0:
  92. act 'Eat diet food (0:30)':
  93. cla
  94. *clr
  95. frost = 0
  96. minut += 30
  97. pcs_health += 10
  98. pcs_mood += 20
  99. edaD -= 1
  100. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  101. if pcs_energy >= 100:
  102. 'You prepare a diet meal and try to eat it, but you''re really not hungry at all. You can''t finish the meal.'
  103. elseif pcs_energy >= 80:
  104. pcs_energy += 40
  105. '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.'
  106. else
  107. pcs_energy += 80
  108. 'The diet meal is tasty, and you enjoy eating it.'
  109. end
  110. if pcs_hydra >= 80:
  111. 'You don''t need any more tea.'
  112. else
  113. pcs_hydra += 100
  114. cumspclnt = 2
  115. gs 'cum_cleanup'
  116. pcs_breath = 0
  117. 'You have a cup of tea, quenching your thirst.'
  118. end
  119. act 'Get up from the table':gt $curloc
  120. end
  121. end
  122. dynamic $fatdel
  123. dynamic $lekarstvo
  124. dynamic $vitamin
  125. --- kuhrPar ---------------------------------