sitrPar.qsrc 3.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  1. # sitrPar
  2. CLOSE ALL
  3. act 'Leave the room':gt 'korrPar'
  4. $metka = ''
  5. $loc = 'sitrPar'
  6. $menu_loc = 'sitrPar'
  7. $menu_arg = ''
  8. menu_off = 0
  9. $location_type = 'private'
  10. $locclass = 'livingr'
  11. clr
  12. minut += 1
  13. gs 'stat'
  14. if night_mode = 1:
  15. fcolor = rgb(255, 255, 255)
  16. bcolor = rgb(0, 0, 0)
  17. lcolor = rgb(106, 90, 205)
  18. else
  19. fcolor = rgb(0, 0, 0)
  20. bcolor = rgb(255, 255, 255)
  21. lcolor = rgb(106, 90, 205)
  22. end
  23. '<center><b><font color="maroon">Living Room</font></b></center>'
  24. ! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
  25. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/sitrpar.jpg"></center>'
  26. ''
  27. 'The living room has a <a href="exec:gt ''TV'',''pav''">TV</a>, which is near the window. In front of the TV is a <a href="exec:gt ''family'',''sofa''">sofa bed</a>, on which your brother sleeps at night. A large tapestry covers one wall, while the other wall has several shelves on it, stocked with books and other things.'
  28. gs 'family'
  29. gs 'subkid'
  30. if month = 12 and day >= 20:'A Christmas tree stands next to the TV, decorated with tinsel garlands and other ornaments.'
  31. if month = 12 and day = 31 and hour >= 20:
  32. act 'Celebrate the New Year with your family.':
  33. cls
  34. npc_rel['A29'] = 100
  35. npc_rel['A28'] = 100
  36. npc_rel['A33'] = 100
  37. npc_rel['A34'] = 100
  38. money += 5000
  39. hour = 23
  40. minut = 0
  41. minut += 120
  42. pcs_sleep = 0
  43. pcs_mood += 100
  44. wipo += 1000
  45. gs 'food', 'l_meal'
  46. gs 'stat'
  47. 'You sit at the festive table laid in front of the TV and celebrate the New Year with your family, the TV providing some background noise. At the table people strike up a conversation and common problems are forgotten for a while, everyone is having fun talking to each other. At midnight, everyone wishes one another a happy New Year and enjoys the champagne and fireworks outside. Your <<$npc_nickname[''A29'']>> gives you an envelope with a greeting card and 5000 <b>₽</b>. For a while you continue to watch TV, enjoying the champagne and company of your family, but after a while everyone is kind of tired and one by one they go to bed.'
  48. act 'Leave':gt $loc, $metka
  49. end
  50. elseif month = 1 and day = 1:
  51. act 'Eat some leftovers at the festive table.':
  52. cla
  53. *clr
  54. frost = 0
  55. minut += 15
  56. pcs_health += 10
  57. pcs_mood += 20
  58. fat += 2
  59. pcs_energy += 20
  60. pcs_hydra += 20
  61. cumspclnt = 2
  62. gs 'cum_cleanup'
  63. pcs_breath = 0
  64. gs 'stat'
  65. '<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
  66. 'You have finished the leftovers remaining on the table from the holidays.'
  67. act 'Get up from the table':gt $loc, $metka
  68. end
  69. end
  70. if ocpd_room = 0 and breastpump = 1 and bp_unbox <= 0:
  71. '<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Unbox</a> your breast pump'
  72. elseif kid >= 1 and breastpump = 1 and bp_unbox <= 0:
  73. '<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Unbox</a> your breast pump'
  74. elseif ocpd_room = 0 and breastpump = 1 and bp_unbox = 1 and pcs_inbition > 40:
  75. '<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Try out</a> your breast pump'
  76. elseif kid >= 1 and breastpump = 1 and bp_unbox = 1 and pcs_inbition > 30:
  77. '<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Try out</a> your breast pump'
  78. end
  79. --- sitrPar ---------------------------------