1
0

family.qsrc 7.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249
  1. # family
  2. sisterAge = year - ((npc_dob['A33'] - (npc_dob['A33'] mod 10000)) / 10000)
  3. if daystart ! m_day:
  4. m_day = daystart
  5. father_go = rand(0,1)
  6. mother_go = rand(0,1)
  7. end
  8. indorf = 0
  9. !brother or father are in the livign room
  10. ocpd_room = 0
  11. if indorf_month ! month and week ! 7 and week ! 1:
  12. !!monthly
  13. indorf_month = month
  14. dostupindorf = 1
  15. end
  16. if week = 1 and dostupindorf = 1:dostupindorf = 0
  17. if dostupindorf = 1 and ((week = 6 and hour >= 12) or (week = 7 and hour < 20)):
  18. !!go to the village
  19. indorf = 1
  20. father_go = 0
  21. mother_go = 0
  22. end
  23. if indorf = 1 and sister_opr_indorf = 0:
  24. sister_opr_indorf = 1
  25. sister_indorf = rand(0, 1)
  26. end
  27. if indorf = 0:
  28. sister_opr_indorf = 0
  29. sister_indorf = 0
  30. end
  31. if sisboyparty_day + 1 = daystart:sister_indorf = 0
  32. if sister_indorf = 1:sisterHere = 0
  33. *nl
  34. if StoryLine = 1:
  35. if sisboyparty_day + 1 = daystart and hour > 18 and sisboypartyQW = 1:
  36. if sisboyparty = 1: sisboyparty = -1
  37. if sisboyparty = 2:
  38. *clr & cla
  39. menu_off = 1
  40. minut += 5
  41. sisboyparty = -1
  42. gs 'stat'
  43. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_7.jpg"></center>'
  44. 'You forgot to go to Rexs'' birthday party.'
  45. 'You brush it off thinking, <i>Oh well, hopefully he won''t be offended.</i>'
  46. act 'Move away':gt $loc, $metka
  47. exit
  48. end
  49. end
  50. if sister_indorf = 0:
  51. if $loc = 'bedrPar':
  52. sisterHere = 0
  53. sisterdialog = 1
  54. if hour < 7:
  55. sisterHere = 1
  56. 'Your sister <a href="exec:gt ''sistersleep'', ''sister_sleep''">Anya</a> is asleep in her bed.'
  57. end
  58. if week >= 6:
  59. if hour >= 7 and hour < 10:
  60. sisterHere = 1
  61. 'Your sister <a href="exec:gt ''sistersleep'', ''sister_sleep''">Anya</a> is asleep in her bed.'
  62. end
  63. if hour = 10:
  64. sisterHere = 2
  65. sisterdialog = 3
  66. 'Your sister <a href="exec:gt ''sister_chat'', ''sister_chat''">Anya</a> is getting ready to go for a walk.'
  67. end
  68. end
  69. if hour >= 18 and sisboyparty_day + 1 ! daystart:
  70. sisterHere = 2
  71. 'Your sister <a href="exec:gt ''sister_chat'', ''sister_chat''">Anya</a> is sitting on her bed, reading a book.'
  72. elseif sisboyparty_day + 1 = daystart and sisboyparty = -1 and hour = 22:
  73. *clr & cla
  74. menu_off = 1
  75. minut += 5
  76. gs 'stat'
  77. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_6_<<rand(1,7)>>.jpg"></center>'
  78. 'Drunk and disheveled, Anya bursts into the room.'
  79. 'You notice that her hair, and all her clothes are smeared in sticky sperm.'
  80. 'In this state, she falls on the bed and instantly falls asleep.'
  81. sisboyparty = 1
  82. act 'Move away': gt $loc
  83. exit
  84. elseif sisboyparty_day + 1 = daystart and hour >= 22:
  85. sisterHere = 1
  86. if sisboypartyQW = 1: sisboypartyQW = 2
  87. if sisboyparty = -1: sisboyparty = 1
  88. 'Your drunken sister Anya is sound asleep in her bed.'
  89. end
  90. end
  91. if $loc = 'pav_commcenter':
  92. if week < 6:
  93. if hour >= 16 and hour < 18:
  94. 'Your sister <a href="exec:gt ''sister'', ''pav_commcenter''">Anya</a> is sitting with a group of boys and girls, drinking beer.'
  95. end
  96. elseif week >= 6:
  97. if hour >= 11 and hour < 18:
  98. 'Your sister <a href="exec:gt ''sister'', ''pav_commcenter''">Anya</a> is sitting with a group of boys and girls, drinking beer.'
  99. end
  100. end
  101. end
  102. end
  103. if indorf = 0:
  104. if $loc = 'bedrPar2':
  105. if moloc = 1:
  106. 'Your <<$npc_nickname[''A29'']>> and stepfather are sleeping on the bed.'
  107. end
  108. end
  109. if $loc = 'sitrPar' or ($loc = 'family' and $metka = 'sofa'):
  110. if hour < 7 and brothermorningsex = daystart:
  111. ocpd_room = 1
  112. 'Your younger brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is getting ready for school.'
  113. elseif hour < 7 and brothermorningsex ! daystart:
  114. ocpd_room = 1
  115. 'Your younger brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is sleeping on the sofa.'
  116. elseif hour >= 23:
  117. ocpd_room = 1
  118. 'Your younger brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is sleeping on the sofa.'
  119. end
  120. if week < 6:
  121. if father_go = 0:
  122. if hour >= 16 and hour < 21:
  123. ocpd_room = 1
  124. 'Your <a href="exec:gt ''father''">stepfather</a> is sitting on the sofa, watching TV.'
  125. end
  126. end
  127. if hour >= 18 and hour < 20:
  128. if kanikuli > 0:
  129. ocpd_room = 1
  130. 'Your younger brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is sitting on the sofa, playing video games.'
  131. else
  132. ocpd_room = 1
  133. 'Your little brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is sitting by the table and doing his homework.'
  134. end
  135. end
  136. if hour >= 20 and hour < 23:
  137. ocpd_room = 1
  138. 'Your younger brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is sitting on the sofa, playing video games.'
  139. end
  140. end
  141. if week >= 6:
  142. if father_go = 0:
  143. if hour >= 7 and hour < 21:
  144. ocpd_room = 1
  145. 'Your <a href="exec:gt ''father''">stepfather</a> is sitting on the sofa, watching TV.'
  146. end
  147. else
  148. if hour >= 7 and hour < 16:
  149. ocpd_room = 1
  150. 'Your <a href="exec:gt ''father''">stepfather</a> is sitting on the sofa, watching TV.'
  151. end
  152. end
  153. if hour >= 20 and hour < 23:
  154. ocpd_room = 1
  155. 'Your younger brother <a href="exec:gt ''brother'', ''start''">Kolka</a> is sitting on the sofa, watching TV.'
  156. end
  157. end
  158. end
  159. if $loc = 'korrPar':
  160. !! for future code I guess
  161. end
  162. if $loc = 'pavtrain':
  163. !! for future code I guess
  164. end
  165. if $loc = 'gschool_grounds':
  166. if week = 5 and hour >= 16 and hour <= 18:
  167. 'You wonder if your <a href="exec:gt ''brother'', ''start''">brother</a> is one of the kids yelling.'
  168. elseif (week < 6 and hour >= 14 and hour <= 17) or ((week >= 6 or kanikuli > 0) and hour >= 7 and hour <= 17):
  169. 'You see your <a href="exec:gt ''brother'', ''start''">brother</a> play football by the field near the school.'
  170. end
  171. end
  172. end
  173. end
  174. if $loc = 'sitrPar': act 'Sit on the sofa':gt 'family', 'sofa'
  175. if $loc = 'sitrPar' and ocpd_room = 0 and momloc ! 24:
  176. 'No one else is here right now, so you''re free to use the room how you like.'
  177. gs 'exercise','start'
  178. end
  179. if $ARGS[0]='sofa':
  180. $menu_loc = 'family'
  181. $menu_arg = 'sofa'
  182. menu_off = 0
  183. $metka = 'sofa'
  184. $loc = 'family'
  185. *clr & cla
  186. gs 'stat'
  187. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/sofa.jpg"></center>'
  188. ''
  189. '<center>A small sofa bed, when not folded out into a bed, is just big enough for you to curl up on and take a nap.</center>'
  190. ''
  191. act 'Watch TV':gt 'TV','pav'
  192. if ocpd_room = 0 and pornMagazine > 0:
  193. '<br>There is a porn magazine under the sofa cushions'
  194. gs 'events', 'read_porn'
  195. if pcs_horny >= 50:
  196. act 'Masturbate':gt 'selfplay', 'start'
  197. end
  198. end
  199. gs 'events', 'read'
  200. gs 'family'
  201. if ocpd_room = 0:
  202. act 'Take a nap (1:00)':
  203. if pcs_sleep < 90:
  204. pcs_sleep += 10
  205. pcs_health += 5
  206. minut += 60
  207. gs 'stat'
  208. 'You sleep about an hour.'
  209. else
  210. minut += 5
  211. gs 'stat'
  212. 'You are not tired enough to sleep, even for a short nap.'
  213. end
  214. end
  215. end
  216. act 'Get up':gt 'sitrPar'
  217. end
  218. --- family ---------------------------------