family 5.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207
  1. # family
  2. if daystart ! m_day:
  3. m_day = daystart
  4. father_go = rand(0, 1)
  5. mother_go = rand(0, 1)
  6. end
  7. indorf = 0
  8. if indorf_month ! month:
  9. !!monthly
  10. indorf_month = month
  11. dostupindorf = 1
  12. end
  13. if week = 1 and dostupindorf = 1:dostupindorf = 0
  14. if dostupindorf = 1 and ((week = 6 and hour >= 12) or (week = 7 and hour < 20)):
  15. !!go to the village
  16. indorf = 1
  17. father_go = 0
  18. mother_go = 0
  19. end
  20. if indorf = 1 and sister_opr_indorf = 0:
  21. sister_opr_indorf = 1
  22. sister_indorf = rand(0, 1)
  23. end
  24. if indorf = 0:
  25. sister_opr_indorf = 0
  26. sister_indorf = 0
  27. end
  28. if sisboyparty_day + 1 = daystart:sister_indorf = 0
  29. if sister_indorf = 1:sisterHere = 0
  30. ''
  31. if StoryLine = 1:
  32. if sisboypartyQW >= 2 and sisboyparty ! 0 and sisboyparty_day + 1 < daystart and randsbPartyDay <= daystart and week >= 4:
  33. if week = 4:randParty = rand(5,7) & randsbPartyDay = daystart + 4
  34. if week = 4 and randParty = 5:sisboyparty_day = daystart
  35. if week = 4 and randParty = 6:sisboyparty_day = daystart + 1
  36. if week = 4 and randParty = 7:sisboyparty_day = daystart + 2
  37. if week = 5:randParty = rand(6,7) & randsbPartyDay = daystart + 3
  38. if week = 5 and randParty = 6:sisboyparty_day = daystart
  39. if week = 5 and randParty = 7:sisboyparty_day = daystart + 1
  40. if week = 6:randParty = 7 & randsbPartyDay = daystart + 2 & sisboyparty_day = daystart
  41. end
  42. if sisboyparty_day + 1 = daystart and hour > 18 and sisboypartyQW = 1:
  43. if sisboyparty = 1:sisboyparty = -1
  44. if sisboyparty = 2:
  45. cls
  46. minut += 5
  47. sisboyparty = -1
  48. gs 'stat'
  49. '<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_7.jpg"></center>'
  50. 'You have forgotten to go to a Rexs'' birthday party.'
  51. 'You think, "Oh well, I hope they are not greatly offended."'
  52. act 'Move away':gt $loc, $metka
  53. exit
  54. end
  55. end
  56. if sister_indorf = 0:
  57. if $loc = 'bedrPar':
  58. sisterHere = 0
  59. sisterdialog = 1
  60. if hour < 7:
  61. sisterHere = 1
  62. 'Your sister <a href="exec:gt ''sistersleep''">Anya</a> is asleep in bed.'
  63. end
  64. if week < 6:
  65. if hour = 7:
  66. sisterHere = 2
  67. sisterdialog = 2
  68. 'Your sister <a href="exec:GT ''sister''">Anya</a> is getting ready for work.'
  69. end
  70. end
  71. if week >= 6:
  72. if hour >= 7 and hour < 10:
  73. sisterHere = 1
  74. 'Your sister <a href="exec:gt ''sistersleep''">Anya</a> is asleep in bed.'
  75. end
  76. if hour = 10:
  77. sisterHere = 2
  78. sisterdialog = 3
  79. 'Your sister <a href="exec:GT ''sister''">Anya</a> is getting ready to go for a walk.'
  80. end
  81. end
  82. if hour >= 18 and sisboyparty_day + 1 ! daystart:
  83. sisterHere = 2
  84. 'Your sister <a href="exec:gt ''sister'', ''home''">Anya</a> is sitting on her bed, reading a book.'
  85. elseif sisboyparty_day + 1 = daystart and sisboyparty = -1 and hour = 22:
  86. cls
  87. minut += 5
  88. gs 'stat'
  89. '<center><img src="images/qwest/alter/sisterQW/Party/sisboyQWParty_6_<<rand(1,7)>>.jpg"></center>'
  90. 'Drunk and disheveled, Anya bursts into the room.'
  91. 'You notice that her hair, and all over her clothes she is smeared in sticky sperm.'
  92. 'In this state, she falls on the bed and instantly falls asleep.'
  93. sisboyparty = 1
  94. act 'Move away':gt $loc
  95. exit
  96. elseif sisboyparty_day + 1 = daystart and hour >= 22:
  97. sisterHere = 1
  98. if sisboypartyQW = 1:sisboypartyQW = 2
  99. if sisboyparty = -1:sisboyparty = 1
  100. 'Your drunken sister Anya asleep in her bed.'
  101. end
  102. end
  103. end
  104. if indorf = 0:
  105. if $loc = 'bedrPar2':
  106. if hour < 6 or hour >= 21:
  107. 'On the bed sleeps your mom and stepfather.'
  108. if hour = 21:parsexrand = rand(0, 5)
  109. end
  110. end
  111. if $loc = 'sitrPar':
  112. if hour < 7 or hour >= 21:
  113. 'Sleeping on the couch, your younger brother <a href="exec:GT ''brother''">Kolka</a>.'
  114. end
  115. if week < 6:
  116. if father_go = 0:
  117. if hour >= 16 and hour < 21:
  118. 'Sitting on the couch is your <a href="exec:gt ''father''">stepfather</a> watching TV.'
  119. end
  120. end
  121. if hour >= 18 and hour < 20:
  122. if kanikuli > 0:
  123. 'Sitting on the couch your younger brother <a href="exec:GT ''brother''">Kolka</a> is watching TV.'
  124. else
  125. 'Sitting at the table your little brother <a href="exec:gt ''brother''">Kolka</a> is doing his homework.'
  126. end
  127. end
  128. if hour = 20 or hour = 17:
  129. 'Sitting on the couch your younger brother <a href="exec:gt ''brother''">Kolka</a> is watching TV.'
  130. end
  131. end
  132. if week >= 6:
  133. if father_go = 0:
  134. if hour >= 7 and hour < 21:'Sitting on the couch is your <a href="exec:gt ''father''">stepfather</a> watching TV.'
  135. else
  136. if hour >= 7 and hour < 16:'Sitting on the couch is your <a href="exec:gt ''father''">stepfather</a> watching TV.'
  137. end
  138. if hour >= 18 and hour <= 20:'Sitting on the couch your younger brother <a href="exec:gt ''brother''">Kolka</a> is watching TV.'
  139. end
  140. end
  141. if $loc = 'kuhrPar':
  142. gs 'dinmother'
  143. if mother_go = 0:
  144. if (week < 6 and hour >= 16 and hour < 21) or (week >= 6 and hour >= 7 and hour < 21):
  145. *pl dyneval($d_mother[rand(4,8)])
  146. end
  147. else
  148. if (week < 6 and hour >= 17 and hour < 21) or (week >= 6 and hour >= 7 and hour < 21 and hour ! 16):
  149. *pl dyneval($d_mother[rand(4,8)])
  150. end
  151. end
  152. end
  153. if $loc = 'korrPar':
  154. !! for future code I guess
  155. end
  156. if $loc = 'vokzalG':
  157. !! for future code I guess
  158. end
  159. if $loc = 'gdk':
  160. if week < 6:
  161. if hour >= 16 and hour < 18:
  162. 'Your sister <a href="exec:GT ''sister'', ''gdk''">Anya</a> is sitting in a group of boys and girls, drinking beer.'
  163. end
  164. elseif week >= 6:
  165. if hour >= 11 and hour < 18:
  166. 'Your sister <a href="exec:GT ''sister'', ''gdk''">Anya</a> is sitting in a group of boys and girls, drinking beer.'
  167. end
  168. end
  169. end
  170. if $loc = 'gschool':
  171. if (week < 6 and hour >= 15 and hour <= 17) or ((week >= 6 or kanikuli > 0) and hour >= 7 and hour <= 17):
  172. 'On the field near the school your <a href="exec:gt ''brother''">brother</a> plays football.'
  173. end
  174. end
  175. end
  176. end
  177. --- family ---------------------------------