sister.qsrc 36 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868
  1. # sister
  2. !!model Megan Vale Valentina Azarov
  3. sisterAge = year - ((npc_dob['A33'] - (npc_dob['A33'] mod 10000)) / 10000)
  4. $sisterLocationTitle = '<center><h1><font color="maroon">Anya</font></h1></center>'
  5. gs 'stat'
  6. *pl $sisterLocationTitle
  7. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  8. *nl
  9. 'Your sister Anya is a bit older than you. She is <<sisterAge>> years old. She graduated from high school, but didn''t go to university and now works at the supermarket.'
  10. gs 'dinsister'
  11. dynamic $sischecks
  12. if hour = 8 and week < 6:
  13. 'God damn it, <<$pcs_nickname>>, because of you I will be late for work.'
  14. act '<B> Apologize and move away</B>':gt $loc, $metka
  15. exit
  16. end
  17. if $ARGS[0] = 'gdk':
  18. !Near the club with friends
  19. if npc_rel['A33'] < 40:
  20. '"What do you want? Fuck off!" Anya and her friends laugh and point at you, until you leave them alone.'
  21. elseif sisboypartyQW < 2 and sisboyparty = 2 and sisboyparty_day + 1 = daystart:
  22. cla
  23. 'Anya and some of her friends are dressed up organizing themselves before going to a party. Anya sees you and waves you to her.'
  24. act 'Go to the party':gt 'sisterQW','sisboyQW_party'
  25. elseif sisboypartyQW >= 2 and sisboyparty = 2 and sisboyparty_day + 1 = daystart:
  26. cla
  27. 'A merry group of friends have gathered for another boozy party at Rex''s.'
  28. act 'Go to the party':dynamic $party_pre_conditions
  29. else
  30. cla
  31. 'Anya sits with some girls and boys, drinking beer. "Hey <<$pcs_nickname>>!" Anya smiles, "Want some beer?"'
  32. act 'Drink beer':
  33. cls
  34. minut += 60
  35. npc_rel['A33'] += 5
  36. alko += 3
  37. cumspclnt = 2
  38. gs 'cum_cleanup'
  39. pcs_breath = 0
  40. gs'stat'
  41. if AniaFrends >= 1:
  42. gt'annafrends', 'scene1'
  43. elseif AniaFrends = 0:
  44. AniaFrends = 1
  45. 'You meet Anya''s friends. They are all her former classmates. There''s small and nimble Lena, Ira who is constantly confused, a tall athletic guy, whom everyone calls Rex, and a red-haired lanky guy named Roma. After the introductions you sit down with them, drinking beer and chatting with Anya and her friends.'
  46. end
  47. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  48. end
  49. if sisboyparty = 2 and sisboyparty_day + 1 = daystart and hour = 17 and minut >= 30:act 'Go to the party':gt'sisterQW','sisboyQW_party'
  50. end
  51. act '<B>Move away</B>':SiSgdk = 0 & gt $loc, $metka
  52. exit
  53. end
  54. !Terms of the campaign to the party
  55. $party_pre_conditions ={
  56. cla
  57. *clr
  58. minut += 5
  59. gs'stat'
  60. if rex <= 80:
  61. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_sister_1.jpg"></center>'
  62. $sisPartyInvite = '"Hi <<$pcs_nickname>>, we''re going to a party at Rex''s today. Want to come with us?"'
  63. if mesec > 0:
  64. *pl $sisPartyInvite
  65. '"Sorry Anya, I''m not in the mood today, you go without me."'
  66. '"What, are you on the rag today? You should have told me! Alright, go home and get some rest."'
  67. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  68. elseif pcs_mood < 50:
  69. *pl $sisPartyInvite
  70. '"Sorry Anya, I''m not in the mood today, you go without me."'
  71. '"You do look a little pale sis, go home and get some rest."'
  72. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  73. elseif alko >= 3:
  74. '"<<$pcs_nickname>>, how the hell did you get so drunk already? I was going to invite you to a party, but you look like you have already been to one. Go home and sleep it off."'
  75. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  76. elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1):
  77. '"My God, you''ll get yourself a reputation! Go home and wash that off, quickly."'
  78. 'You feel a little ashamed that your sister has seen you looking like this in public.'
  79. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  80. else
  81. *pl $sisPartyInvite
  82. act 'Yes':gt 'sbReksHome','party'
  83. act 'Decline':
  84. cla
  85. *clr
  86. minut += 5
  87. sisboyparty = -1
  88. gs'stat'
  89. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_sister_1.jpg"></center>'
  90. *nl
  91. '"I''d love to, but I have a lot of homework to do. I''m sorry."'
  92. '"Don''t worry, maybe next time you can come."'
  93. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  94. end
  95. end
  96. end
  97. if rex > 80:
  98. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/reks.jpg"></center>'
  99. *nl
  100. if pav_slut >= 50:
  101. '"Shit, <<$pcs_nickname>> everywhere people say you are a fucking whore. What is this garbage, <<$pcs_nickname>>? I thought we were an item, and things were getting serious, and you''re fucking around?"'
  102. '"I do not know what came over me, I was not myself, please forgive me, if you can."'
  103. '"Listen, everything''s OK, but let''s just be friends and forget all that we had. Okay?"'
  104. '"Okay..."'
  105. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  106. elseif mesec > 0 or pcs_mood < 50:
  107. '"Sorry Rex, sweetie, I''m not feeling too good today, you go without me."'
  108. '"Sweetie, I do not want to leave you alone, but I need to go with the guys, take care, and do not be sad."'
  109. 'Rex gives you a gentle kiss on your cheek and leaves.'
  110. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  111. elseif alko >= 3:
  112. '"<<$pcs_nickname>>, are you drunk? I wanted to invite you to the party, but you look like you just left a party. Go home and sleep it off."'
  113. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  114. elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1):
  115. '"Shit, <<$pcs_nickname>> you are covered in semen. What is this garbage, <<$pcs_nickname>>? I thought we were an item, and things were getting serious, and you''re fucking around?"'
  116. '"I do not know what came over me, I was not myself, please forgive me, if you can."'
  117. '"Listen, everything''s OK, but let''s just be friends and forget all that we had. Okay?"'
  118. '"Okay..."'
  119. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  120. else
  121. '"Baby, let''s go to my place, once again I am hosting a great get together."'
  122. act 'Accept':gt 'sbReksHome','party'
  123. act 'Decline':
  124. cla
  125. minut += 5
  126. sisboyparty = -1
  127. gs'stat'
  128. '"Sorry Rex, I have a lot of homework. I''d love to but I don''t want to fail my exams."'
  129. '"Well, go on then, but next time you definitely come, okay?"'
  130. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  131. end
  132. end
  133. end
  134. }
  135. act '<B>Move away</B>':gt $loc, $metka
  136. if hour >= 7 and hour < 24:
  137. if npc_rel['A33'] > 65 and mesec > 0 and preg = 0 and tampon = 0 and narkossister = 0:
  138. act 'Ask for a tampon':
  139. 'You tell your sister that you are menstruating and have no tampons. She looks at you knowingly, brings some of hers and recommends that next time you take care of this in advance.'
  140. tampon=3
  141. npc_rel['A33'] -= 15
  142. minut += 3
  143. cla
  144. act '<B>Move away</B>':gt $loc, $metka
  145. exit
  146. end
  147. end
  148. !!This is to make sure that you have this skill
  149. if canBraidHair ! 0 and canBraidHair ! 1:
  150. canBraidHair = 0
  151. end
  152. if canBraidHair = 0 and npc_rel['A33'] > 75 and (pcs_hairlng > 80 and pcs_hairlng <= 800):
  153. act '"Hey sis, can you teach me how to braid my hair...?"':
  154. cls
  155. minut += 1
  156. 'She pauses for a moment and looks at you funny, "You don''t know how to braid your own hair?"'
  157. 'You look down embarrassed, "I usually just go to the salon for them to braid it..."'
  158. 'She laughs and gives you a hug. "<<$pcs_nickname>>, of course I will teach you how to braid your hair, though it make take a bit."'
  159. act 'Spend an hour with your sister learning how to braid your hair.':
  160. minut += 60
  161. canBraidHair = 1
  162. npc_rel['A33'] += 5
  163. cls
  164. 'Though you made plenty of mistakes and got your hair in a knot a couple of times, afterwords you feel confident that you can braid your hair on your own.'
  165. act 'Thank your sister and leave':gt $loc, $metka
  166. end
  167. act 'Thank her but say you really actually have to get going':
  168. cls
  169. 'She shrugs her head and says, "Come back if you want to learn how <<$pcs_nickname>>!"'
  170. minut += 3
  171. act 'Thank your sister and leave':gt $loc, $metka
  172. end
  173. end
  174. end
  175. act 'Chat':
  176. cls
  177. minut+=rand(10,15)
  178. if sischatday ! daystart:npc_rel['A33'] += 2
  179. sischatday = daystart
  180. gs'stat'
  181. *pl $sisterLocationTitle
  182. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  183. if npc_rel['A33'] < 20:'Your relationship with your sister is awful.'
  184. if npc_rel['A33'] >= 20 and npc_rel['A33'] < 40:'Your relationship with your sister is tense.'
  185. if npc_rel['A33'] >= 40 and npc_rel['A33'] < 60:'You and your sister have a normal relationship.'
  186. if npc_rel['A33'] >= 60 and npc_rel['A33'] < 80:'You and your sister have a good relationship.'
  187. if npc_rel['A33'] >= 80:'You have a great relationship with your sister.'
  188. *nl
  189. !!sisboyparty
  190. !!-1 - don''t go to the party
  191. !!0 - don''t know about parties
  192. !!1 - knows about the parties
  193. !!2 - agreed to go to the party
  194. !!3 - Missed the party
  195. if sisboypartyQW >= 2 and sisboyparty = 1 and week >= 2:
  196. if sisboyparty_day = daystart:
  197. '"Listen, <<$pcs_nickname>>, Rex''s apartment is available tomorrow and he''s having a party, do you want to go?"'
  198. elseif week + sisboyparty_day - daystart = 4:
  199. '"Listen, <<$pcs_nickname>>, Rex''s apartment is available on Friday and he''s having a party, do you want to go?"'
  200. elseif week + sisboyparty_day - daystart = 5:
  201. '"Listen, <<$pcs_nickname>>, Rex''s apartment is available on Saturday and he''s having a party, do you want to go?"'
  202. elseif week + sisboyparty_day - daystart = 6:
  203. '"Listen, <<$pcs_nickname>>, Rex''s apartment is available on Sunday and he''s having a party, do you want to go?"'
  204. else
  205. '"Its too late for this weeks party, I find out when they are held on Tuesday morning so you can ask me earlier in the week about the next one."'
  206. sisboyparty = -1
  207. act 'Finish':SiSgdk = 0 & gt'sister'
  208. exit
  209. end
  210. act 'Yes':
  211. cls
  212. minut += 5
  213. sisboyparty = 2
  214. gs'stat'
  215. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_2.jpg"></center>'
  216. *nl
  217. 'You agree to go to the party.'
  218. '"Awesome <<$pcs_nickname>>, it''ll be fun. We will meet at the community center, don''t forget to be there before 18:00, otherwise we will leave without you."'
  219. 'With these words, your sister hugs you and kisses you on the cheek.'
  220. act 'Finish':SiSgdk = 0 & gt'sister'
  221. end
  222. act 'No (study)':
  223. cls
  224. minut += 5
  225. sisboyparty = -1
  226. gs'stat'
  227. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_3.jpg"></center>'
  228. *nl
  229. 'You turn down the invitation.'
  230. '"Sorry Anya, I would love to, but I can''t get behind at school. I have homework and books to read, you know what it''s like."'
  231. act 'Finish':SiSgdk = 0 & gt'sister'
  232. end
  233. if bronzebeg > 0 or silverbeg > 0 or goldbeg > 0:
  234. act 'No (training)':
  235. cls
  236. minut += 5
  237. sisboyparty = -1
  238. gs'stat'
  239. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_4.jpg"></center>'
  240. *nl
  241. 'You turn down the invitation.'
  242. '"I would love to, but I have a competition to prepare for. I have to train. One day I could be a great athlete, not like you lazy bones."'
  243. act 'Finish':SiSgdk = 0 & gt'sister'
  244. end
  245. end
  246. if pcs_vball >= 40:
  247. act 'No (volleyball)':
  248. cls
  249. minut += 5
  250. sisboyparty = -1
  251. gs'stat'
  252. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_5.jpg"></center>'
  253. *nl
  254. 'You turn down the invitation.'
  255. '"I can''t, the coach does not allow my to stay out late, and drinking is also prohibited."'
  256. act 'Finish':SiSgdk = 0 & gt'sister'
  257. end
  258. end
  259. exit
  260. elseif sisboypartyQW >= 2 and sisboyparty = 3:
  261. sisboyparty = 1
  262. '"We missed you at the party, <<$pcs_nickname>>." Anya pouts at you, "I''ll let you know when the next party is and maybe you''ll be able to make it, okay?"'
  263. 'You apologize for missing the party and Anya smiles at you.'
  264. act '<B>Further</B>':SiSgdk = 0 & gt'sister'
  265. exit
  266. end
  267. act '<B>Further</B>':SiSgdk = 0 & gt'sister'
  268. if npc_rel['A33'] <20:
  269. dynamic $d_sister[1]
  270. exit
  271. elseif npc_rel['A33'] >= 20 and npc_rel['A33'] < 40:
  272. dynamic $d_sister[2]
  273. exit
  274. elseif npc_rel['A33'] >=40:
  275. dynamic $d_sister[3]
  276. end
  277. end
  278. if sisterLesb = 2:
  279. cls
  280. minut += 5
  281. gs'stat'
  282. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_24.jpg"></center>'
  283. *nl
  284. 'You''re both embarrassed after what happened that night, and can not look into each other''s eyes, finally Anya speaks with you.'
  285. '"<<$pcs_nickname>>," with a smile she tells you, "Well, you''re a fool, I thought you liked guys, and I always found it much more pleasant to handle men."'
  286. 'You look at Anya blushing, "Forgive me, I was so worked up, I just could not control myself, I do not know what came over me."'
  287. '"Well, I do not mind, if you sometimes lose control of yourself." She smiles slyly, You smile at her...'
  288. sisterLesb = 3
  289. act 'Finish':SiSgdk = 0 & gt'sister'
  290. exit
  291. end
  292. if npc_QW['A33'] = 0 and npc_rel['A33'] >= 40:
  293. act 'Ask about her boyfriend':
  294. cls
  295. minut += 5
  296. npc_rel['A33'] += 2
  297. npc_QW['A33'] = 1
  298. gs'stat'
  299. *pl $sisterLocationTitle
  300. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister.jpg"></center>'
  301. 'You ask Anya about her boyfriend. She smiles.'
  302. '"Well, I have a boyfriend. Although nothing serious. He is more of a friend who I have sex with."'
  303. '"Awesome, now when I think out about it, you simply must introduce me to him!"'
  304. '"Good sister, we hang out in the evenings at the community center. Meet me there and I''ll introduce you to him."'
  305. act 'Finish':SiSgdk = 0 & gt'sister'
  306. end
  307. elseif npc_QW['A33'] >= 2 and npc_rel['A33'] >= 40 and sisboytrioQW > -1 and sisboytrioDayOtkaz <= daystart and sisboypartyQW < 2:
  308. act 'Talk about Roma':
  309. cls
  310. minut += 5
  311. sisboyrand = RAND(1,10)
  312. gs'stat'
  313. !sisboyparty
  314. !-1 - don''t go to the party
  315. !0 - ''t know about Vecherinka
  316. !1 - knows about the parties
  317. !2 - agreed to go to the party
  318. if sisboytrio >= 5 and sisboyparty = 0 and sisboyparty_day ! daystart and week >= 2:
  319. cls
  320. minut += 5
  321. sisboyparty = 1
  322. sisboyparty_day = daystart
  323. gs'stat'
  324. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_1.jpg"></center>'
  325. *nl
  326. '"<<$pcs_nickname>>, one of my friends birthday is tomorrow and he''s having a party. He asked me to invite you."'
  327. '"Oh, Anya I don''t know, they are your friends and I haven''t got to know the boys, I basically just talked to the girls."'
  328. '"Come on, he really wants you to go, I think he might like you. So will you come?"'
  329. act 'Yes':
  330. cls
  331. minut += 5
  332. sisboypartyQW = 1
  333. sisboyparty = 2
  334. gs'stat'
  335. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_2.jpg"></center>'
  336. *nl
  337. 'You agree to go to the birthday party.'
  338. '"Awesome <<$pcs_nickname>>, it''ll be fun! We will meet at the community center, don''t forget to be there before 18:00, otherwise we will leave without you."'
  339. 'With these words, your sister hugs you and kisses you on the cheek.'
  340. act 'Finish':SiSgdk = 0 & gt'sister'
  341. end
  342. act 'No (study)':
  343. cls
  344. minut += 5
  345. sisboyparty = -1
  346. gs'stat'
  347. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_3.jpg"></center>'
  348. *nl
  349. 'You refuse to go to the birthday party.'
  350. '"Sorry Anya, I would love to, but I can''t get behind at school. I have homework and books to read, you know what it''s like."'
  351. act 'Finish':SiSgdk = 0 & gt'sister'
  352. end
  353. if bronzebeg > 0 or silverbeg > 0 or goldbeg > 0:
  354. act 'No (training)':
  355. cls
  356. minut += 5
  357. sisboyparty = -1
  358. gs'stat'
  359. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_4.jpg"></center>'
  360. *nl
  361. 'You refuse to go to the birthday party.'
  362. '"I would love to, but I have a competition to prepare for. I have to train. One day I could be a great athlete, not like you lazy bones."'
  363. act 'Finish':SiSgdk = 0 & gt'sister'
  364. end
  365. end
  366. if pcs_vball >= 100:
  367. act 'No (volleyball)':
  368. cls
  369. minut += 5
  370. sisboyparty = -1
  371. gs'stat'
  372. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_5.jpg"></center>'
  373. *nl
  374. 'You refuse to go to the birthday party.'
  375. '"I can''t, the coach does not allow my to stay out late, and drinking is also prohibited."'
  376. act 'Finish':SiSgdk = 0 & gt'sister'
  377. end
  378. end
  379. exit
  380. end
  381. if sisboyrand >= 8 and npc_QW['A33'] = 2 and sisboyday ! daystart:
  382. *pl $sisterLocationTitle
  383. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_01.jpg"></center>'
  384. *nl
  385. 'Anya takes a long and hesitant look at you, and eventually decides to ask you.'
  386. '"<<$pcs_nickname>> could you spend an hour tomorrow after 18:00 going for a walk or something? Roma wants to visit me here and... well, you know what I mean."'
  387. 'Your sister is blushing a little and looks at you with pleading eyes.'
  388. act 'Of course':
  389. cls
  390. minut += 5
  391. npc_rel['A33'] += 10
  392. sisThank = 1
  393. npc_QW['A33'] = 3
  394. sisboyday = daystart
  395. gs'stat'
  396. *pl $sisterLocationTitle
  397. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_03.jpg"></center>'
  398. *nl
  399. '"Certainly sister, I understand, I will go for a walk late at night. Only do not be too loud, if Kolka hears you it will blow his tiny little mind."'
  400. 'You and Anya laugh and she joyfully hugs you saying, "You''re the best!"'
  401. act 'Finish':SiSgdk = 0 & gt'sister'
  402. end
  403. act 'No':
  404. cls
  405. npc_rel['A33'] -= 10
  406. minut += 5
  407. sisboyday = daystart
  408. gs'stat'
  409. *pl $sisterLocationTitle
  410. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_04.jpg"></center>'
  411. *nl
  412. '"Sorry Anya, I need to study in the evening."'
  413. '"Fine!" Anya turns away angrily and buries her head in her book.'
  414. act 'Finish':SiSgdk = 0 & gt'sister'
  415. end
  416. elseif sisboyrand >= 8 and (npc_QW['A33'] = 4 or npc_QW['A33'] = 6 or npc_QW['A33'] = 8) and sisboyday ! daystart and sisboyparty = 0:
  417. *pl $sisterLocationTitle
  418. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_09.jpg"></center>'
  419. *nl
  420. '"The last time Roma was here was so good, thank you very much."'
  421. '"You''re welcome, I''m always very happy to help my beloved sister and to see her happy."'
  422. '"He would like to come here again tomorrow, do you mind taking another walk for about an hour?"'
  423. act 'Of course':
  424. cls
  425. minut += 5
  426. npc_rel['A33'] += 10
  427. sisThank = 1
  428. if npc_QW['A33'] = 4 or npc_QW['A33'] = 6 or npc_QW['A33'] = 8:npc_QW['A33'] += 1
  429. sisboyday = daystart
  430. gs'stat'
  431. *pl $sisterLocationTitle
  432. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_03.jpg"></center>'
  433. *nl
  434. '"Certainly sister, I understand, I will go for a walk late at night. Only do not be too loud, if Kolka hears you it will blow his tiny little mind."'
  435. 'You and Anya laugh and she joyfully hugs you saying, "You''re the best!"'
  436. act 'Finish':SiSgdk = 0 & gt'sister'
  437. end
  438. act 'No':
  439. cls
  440. npc_rel['A33'] -= 10
  441. minut += 5
  442. sisboyday = daystart
  443. gs'stat'
  444. *pl $sisterLocationTitle
  445. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_04.jpg"></center>'
  446. *nl
  447. '"Sorry Anya, I need to study in the evening."'
  448. '"Fine!" Anya turns away angrily, and buries her head in her book.'
  449. act 'Finish':SiSgdk = 0 & gt'sister'
  450. end
  451. elseif sisboyrand >= 8 and npc_QW['A33'] = 9 and sisterLesb >= 4 and sisboytrioQW = 0 and sisboytrio < 5 and sistrioday <= daystart:
  452. *pl $sisterLocationTitle
  453. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_09.jpg"></center>'
  454. *nl
  455. if hour > 16:
  456. sisboyday = daystart
  457. $siboyday_text = 'tomorrow'
  458. else
  459. sisboyday = daystart - 1
  460. $siboyday_text = 'this'
  461. end
  462. if sisboytrio = 0:
  463. '"Sister, Roma and I have thought about it a lot and... I do not know how to say this..."'
  464. '"Well, don''t just leave me hanging. What is it that you want to say to me?"'
  465. '"Well, hmmm... We want, you to err... join us <<$siboyday_text>> evening."'
  466. else
  467. '"Hello <<$pcs_nickname>>! Well, did you like it last time? We had a very good time with Roma."'
  468. 'You do not say anything and just smile slyly watching your sister''s eyes.'
  469. '"We want to repeat our games <<$siboyday_text>> evening, if you would like to."'
  470. end
  471. act 'Agree':
  472. cls
  473. sisboytrioQW = 1
  474. minut += 5
  475. npc_rel['A33'] += 10
  476. gs'stat'
  477. *pl $sisterLocationTitle
  478. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/sisboyqw_36.jpg"></center>'
  479. *nl
  480. 'You agree to Anya''s indecent proposal.'
  481. '"Well, aren''t you all liberated? Of course I agree, it will be very interesting."'
  482. 'You hug and kiss with your beloved sister.'
  483. act 'Finish':SiSgdk = 0 & gt'sister'
  484. end
  485. act 'Sounds interesting, but can we postpone it?':
  486. cls
  487. minut += 5
  488. sistrioday = daystart + rand(7,14)
  489. gs'stat'
  490. *pl $sisterLocationTitle
  491. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/sisboyqw_36.jpg"></center>'
  492. *nl
  493. '"Oh, sis! I would be glad to join you, but <<$siboyday_text>> evening is really not good! Could we do it some other day?"'
  494. 'She looks kind of dejected, so you continue to talk to her.'
  495. '"Really Anya, I am glad to be asked! And I do want to have sex with you two at the same time! But it is really not a good time, and I am the most bummed about it."'
  496. 'Finally she realize that you didn''t reject her idea, and simply the timing is off a little. She smiles at you and then kisses your lips.'
  497. '"Then later it is, little sis.", she says.'
  498. act 'Finish':SiSgdk = 0 & gt'sister'
  499. end
  500. act 'Decline':
  501. cls
  502. sisboytrioQW = -1
  503. sisboytrioDayOtkaz = daystart + 3
  504. minut += 5
  505. npc_rel['A33'] = 0
  506. npc_QW['A33'] = 2
  507. sisThank = 0
  508. gs'stat'
  509. '<center><img <<$set_imgh>> src="images/characters/city/mikhail/terminal/sisboyqw_37.jpg"></center>'
  510. *nl
  511. 'You decline your sisters indecent proposal.'
  512. '"You fucking perverts! No way, you disgusting bitch!'
  513. 'You quarrel with your sister and when you have both shouted yourselves out and tears roll down your cheeks, she turns away from you and does not want to talk any more."'
  514. act 'Finish':SiSgdk = 0 & gt'sister'
  515. end
  516. else
  517. minut += 10
  518. sistalkabromaday = daystart
  519. if sistalkabromaday ! daystart:npc_rel['A33'] += 2
  520. talkrand = RAND(0,10)
  521. gs'stat'
  522. *pl $sisterLocationTitle
  523. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_05.jpg"></center>'
  524. *nl
  525. if talkrand = 0:'You ask your sister about Roma, she is happy talking about him and says how he is good, responsive and courageous.'
  526. if talkrand = 1:'Anya says, before she met Roma he was with a mean girl, and after ignoring her for a long time he called her, making Anya jealous and she scolded him.'
  527. if talkrand = 2:'One day she and Roma were in a movie, and noticed on the back row a girl sucking a guy, and that Roma asked her if she would do the same.'
  528. if talkrand = 3:'Anya complains that Roma drinks too much beer, does not buy her gifts, and doesn''t pay her enough attention.'
  529. if talkrand = 4:'Anya says, Roma offered her a threesome with another girl, which she was most offended by and didn''t speak to him for a week afterwards.'
  530. if talkrand = 5:'Anya blushes as she tells you that Roma sometimes comes to her work and drags her into the back room.'
  531. if talkrand = 6:'Anya in detail and with enthusiasm tells you about Roma''s magnificent virility, and how if not for this, they would have long since parted.'
  532. if talkrand = 7:'Anya shares with you a secret, that her favorite position is "cowgirl", even though Roma prefers to do her doggy-style.'
  533. if talkrand = 8:'You speak with your sister very frankly about sexual things, and she says shyly, she does not like to swallow sperm, but with Roma it''s different, and she is willing to swallow for him.'
  534. if talkrand = 9:
  535. if reksLike = 0:
  536. reksLike = 1
  537. rex = 50
  538. rexSisTalk = 0
  539. rexPark = 0
  540. rexCar = 0
  541. 'Anya talks for a long time about her and Roma''s friends, and asks you if you want to get to know any of them.'
  542. '"Well, Rex sounds quite nice... I guess."'
  543. 'Anya smiles, "Hmm... He is a nice guy, but sometimes behaves a bit strange, Rex is obsessed with women''s legs.'
  544. 'There was a case when Rex was driving without a license in his father''s car and gazing at a girl walking on the sidewalk, in stockings and a short skirt. Imagine, he was so carried away, he had not noticed a van ahead sitting at the traffic lights.'
  545. 'He drove straight into it and totalled the car! That''s why we call him Rex, because he stares at legs with his mouth open, teeth on show, wanting to devour them." As she says this, Anya is holding her hands like claws and impersonating a T-Rex growling at your legs.'
  546. else
  547. 'You ask your sister about Roma, she is happy talking about him and says how he is good, responsive and courageous.'
  548. end
  549. end
  550. if talkrand = 10:'Anya says that Roma likes you and asks if you like him, too.'
  551. act 'Finish':SiSgdk = 0 & gt'sister'
  552. end
  553. end
  554. end
  555. if ((sisboyday + 1 = daystart and hour > 18) or sisboyday + 1 < daystart) and sisThank = 1:
  556. cls
  557. if npc_QW['A33'] = 9 or npc_QW['A33'] = 7 or npc_QW['A33'] = 5 or npc_QW['A33'] = 3:npc_QW['A33'] = npc_QW['A33'] - 1
  558. sisboyday = 0
  559. sisThank = 0
  560. gs'stat'
  561. *pl $sisterLocationTitle
  562. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_00.jpg"></center>'
  563. *nl
  564. 'Merrily Anya runs up to you and wraps her arms around your neck.'
  565. if sisboytrioQW ! 1:
  566. '"Sister, I adore you! I spent a lovely evening with Roma."'
  567. '"Yes, I''m glad for you. Enough already, you''ll strangle me."'
  568. 'Anya is happy to let you go, and kisses you on the cheek.'
  569. else
  570. '"<<$pcs_nickname>>, I adore you! I really enjoyed our evening with Roma."'
  571. '"Yes, me too. But pease, not so tight, you''re strangling me."'
  572. 'Anya is bouncing with joy and loosens her grip just enough to kiss you on the cheek.'
  573. sisboytrioQW = 0
  574. end
  575. act 'Finish':SiSgdk = 0 & gt'sister'
  576. elseif sisboytrioQW = 1 and ((sisboyday + 1 = daystart and hour > 18) or (sisboyday + 1 < daystart)):
  577. cls
  578. minut += 1
  579. npc_rel['A33'] -= 10
  580. sisboytrioQW = 0
  581. sisboyday = 0
  582. gs'stat'
  583. *pl $sisterLocationTitle
  584. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  585. *nl
  586. 'Anya doesn''t look happy with you.'
  587. '"You promised to join me and Roma, what happened? Well maybe next time..."'
  588. act 'Continue':SiSgdk = 0 & gt'sister'
  589. end
  590. if SisterKnowMastr > 0 and sisterQW = 0:
  591. cls
  592. sisterQW = 1
  593. gs'stat'
  594. *pl $sisterLocationTitle
  595. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  596. 'Anya looks at you and laughs "Well, <<$pcs_nickname>>, I know what you were up to! I went into the room, and you were playing with yourself!"'
  597. act 'Move away':SiSgdk = 0 & gt $loc, $metka
  598. end
  599. if sisterdialog = 2:
  600. cls
  601. cla
  602. gs'stat'
  603. *pl $sisterLocationTitle
  604. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sobir.jpg"></center>'
  605. 'Your sister is busy getting ready for work.'
  606. 'Anya, without even turning around, says, "<<$pcs_nickname>>, no time to talk, I''m already late!"'
  607. act '<B>Move away</B>':gt $loc, $metka
  608. end
  609. !going for a walk
  610. if sisterdialog = 3:
  611. cls
  612. cla
  613. gs'stat'
  614. *pl $sisterLocationTitle
  615. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/progulka.jpg"></center>'
  616. 'Your sister is getting herself ready to go out. She admires herself in a mirror and wiggles her ass, trying different poses.'
  617. 'Anya, without even turning to look at you, says: "<<$pcs_nickname>>, If you decide to take a walk, I will be near the club with my friends."'
  618. act '<B>Move away</B>':gt $loc, $metka
  619. end
  620. if npc_rel['A33'] >= 80 and sisterknowslut > 0 and sisterdialog < 2:
  621. if TwinQW = 1:
  622. act 'Talk about the Twin request':
  623. *clr & cla
  624. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  625. if Twin3QW = 1:jump 'twinboyfriendtalk'
  626. if Twin2QW ! 1:
  627. '"Sis, I have a confession to make.... I have been selling my body in the Pavlovsk hotel." You wince inwardly as the admission leaves your mouth, worried what your sister will think.'
  628. 'Your sister''s face turns to shock and she shakes her head. "<<$pcs_nickname>>, really? Why would you do something like that? If people find out you''ll be ruined! I know I sleep around, but there''s a big difference between being a slut and being a whore."'
  629. 'You roll your eyes at her. "Please. That''s just mom talking. If you''re going to sleep around, you might as well get paid for it while you''re still hot! Besides, nobody will find out, there is a guy there who takes care of everything. And look at all the money I have been making!"'
  630. 'You open your wallet and show your sister all the cash you have on you, <<money>><b>₽</b>.'
  631. elseif TwinQW = 1:
  632. 'You bring up your prostitution job again to your sister and show off your wallet.'
  633. end
  634. if money < 5000:
  635. 'Your sister furrows her brow, looking at your meager amount of money. "Wait, how many times have you prostituted yourself so far?"'
  636. 'You think for a second before responding. "I don''t know. About <<pavproscount>> times?"'
  637. 'You sister gives you a concerned look. "<<pavproscount>> times and this is all you have to show for it?"'
  638. 'Your sister approaches you and gives you a hug, squeezing you tightly. "I really hope you can stop what you are doing, it is not worth it <<$pcs_nickname>>! Not for this pittance! Can''t you see that this asshole is taking advantage of you?"'
  639. '<br>'
  640. 'You lower your head in shame and walk away from your sibling. You didn''t even get the chance to bring up the twin request. It looks like you''ll have to convince your sister that the work you do is worth the risks.'
  641. Twin2QW = 1
  642. end
  643. if money => 5000:
  644. '"Ok, I must admit, that looks like a lot. Do you know how many hours I''d have to work in the supermarket to earn this kind of money? Still, it seems very risky to me." Your sister says.'
  645. 'She''s still trying to sound responsible, but you can practically see her salivating at the sight of cold, hard, cash.'
  646. '"How would you like to earn some of this and spend some time with your favorite sister at the same time?" You ask, raising your eyebrows playfully while waving the money back and forth.'
  647. '"What do you mean, <<$pcs_nickname>>?" Anya asks, finally dropping any act of disapproval.'
  648. 'You explain the twins request to your sister.'
  649. if sisboyparty ! 0:
  650. '"Ha! That actually sounds like a lot of fun." Your sister seems to consider everything for a moment before continuing. "Ok, I''ll do it! When do we leave?"'
  651. '"Well, first I have to make myself look more like you so we''ll pass as twins. I''ll come and get you when I am ready."'
  652. TwinQW = 2
  653. else
  654. '"Sorry, <<$pcs_nickname>>. You know I love you, but my boyfriend would never allow this. And I could never do something like this behind his back. Anyway, thanks for confiding in me. Please stay safe and tell me if you get in over your head. Can''t have my little sis in danger." Anya gives you a little smile and a warm hug.'
  655. 'You''re happy that Anya has a boyfriend she loves, but right now you would give anything to be rid of him.'
  656. Twin3QW = 1
  657. jump 'twinmoveaway'
  658. end
  659. end
  660. :twinboyfriendtalk
  661. if Twin3QW = 1:
  662. if sisboyparty = 0:
  663. 'You bring up the twins request again but Anya still refuses, claiming Roma would be heartbroken if he found out.'
  664. else
  665. 'You bring up the twins request again. Since her relationship with Roma is a little different now, she seems a lot more receptive.'
  666. '"Ha, that actually sounds like a lot of fun. Ok, I''ll do it! When do we leave?"'
  667. '"Well first I have to make myself look more like you so we''ll pass for twins. I''ll come and get you when I am ready."'
  668. TwinQW = 2
  669. end
  670. end
  671. :twinmoveaway
  672. act '<B>Move away</B>':gt 'sister'
  673. end
  674. end
  675. if TwinQW = 2:
  676. act 'Compare yourself with your sister':
  677. *clr & cla
  678. twinqwsiscompare = 0
  679. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  680. 'You sister has straight blonde hair. Her hair reaches her shoulders with several strands going just beyond.'
  681. 'She has good looks. Men and women check her out when they think she isn''t looking.'
  682. '<br>'
  683. '<<$hair>>'
  684. '<<$pcs_apprnc>>'
  685. '<<$pcs_makeup>>'
  686. '<br>'
  687. if pcs_hairlng > 160 and pcs_hairlng <= 260:
  688. '<font color=#008000>Your hair is the correct length</font>'
  689. twinqwsiscompare +=1
  690. else
  691. '<font color=#FF0000>Your hair is not the correct length.</font>'
  692. end
  693. if pcs_hairbsh = 0:
  694. '<font color=#FF0000>You need to brush your hair.</font>'
  695. else
  696. twinqwsiscompare +=1
  697. end
  698. if pcs_haircol = 3:
  699. '<font color=#008000>Your hair is the correct color.</font>'
  700. twinqwsiscompare +=1
  701. else
  702. '<font color=#FF0000>Your hair is not the correct color.</font>'
  703. end
  704. if curly = 0:
  705. '<font color=#008000>Your hair is straight, which is a match for your sister''s.</font>'
  706. twinqwsiscompare +=1
  707. else
  708. '<font color=#FF0000>Your hair is too curly</font>'
  709. end
  710. if pcs_apprnc => 60 and pcs_apprnc < 120:
  711. '<font color=#008000>Your looks matches your sister''s.</font>'
  712. twinqwsiscompare +=1
  713. else
  714. '<font color=#FF0000>Your looks are too different from your sister''s. You are at <<pcs_apprnc>>. You need a score between 60 and 120 </font>'
  715. end
  716. if pcs_makeup = 4:
  717. '<font color=#008000>Your make up hides the last differences between you and your sister.</font>'
  718. twinqwsiscompare +=1
  719. else
  720. '<font color=#FF0000>You need some more make up to make you look more like your sister.</font>'
  721. end
  722. act '<B>Move away</B>':killvar 'twinqwsiscompare' & gt 'sister'
  723. if twinqwsiscompare = 6:
  724. act ' Go to the hotel and have some Twin fun':
  725. if hour >= 12 and hour < 20:
  726. killvar 'twinqwsiscompare'
  727. killvar 'Twin2QW'
  728. killvar 'Twin3QW'
  729. gt 'HotelHole','Twins'
  730. else
  731. 'Pavlin is usually in the hotel lobby between 12:00 and 20:00, No reason to go now.'
  732. end
  733. end
  734. end
  735. end
  736. end
  737. act 'Talk about sex':
  738. cla
  739. cls
  740. gs'stat'
  741. minut+=rand(10,15)
  742. pcs_horny += RAND(5,10)
  743. if sistalkabromaday ! daystart:npc_rel['A33'] += 1
  744. dynamic $d_sistersexstories[1]
  745. act '<B>Move away</B>':gt 'sister'
  746. end
  747. end
  748. else
  749. 'OK <<$pcs_nickname>>, it''s time for bed.'
  750. end
  751. if $ARGS[0] = 'pargone':
  752. cls
  753. cla
  754. gs'stat'
  755. *pl $sisterLocationTitle
  756. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
  757. *nl
  758. '"<<$pcs_nickname>>, you have to get rid of your bird. Have you heard what he has been saying lately. If mom ever heard this she would kick us both out of the house"'
  759. 'You have become quite attached to your bird and really don''t want to get rid of him. " Wait, there must be another solution. Give me a few days, I will go to the pet store and ask if they have a remedy for this"'
  760. if npc_rel['A33'] > 75:
  761. '"Fine you have 3 days, if there is no solution by then , I will release him myself"'
  762. '"Thanks sis, don''t worry I will find something."'
  763. sisrelparday = daystart
  764. saveparQW = 1
  765. saveparjourQW = 1
  766. else
  767. '"No <<$pcs_nickname>>, it is too dangerous"'
  768. '<<$npc_firstname[''A33'']>>, reaches for the cage and opens it. <<$namepopu2>> immediately flies out and leaves through the open window.'
  769. 'You look at your pet flying away and have to hold back your tears'
  770. 'You turn away from your sister because you don''t want her to see you crying.'
  771. popugai2 = 0
  772. end
  773. act '<B>Move away</B>':gt $loc, $metka
  774. end
  775. --- sister ---------------------------------