1
0

korrPar.qsrc 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410
  1. # korrPar
  2. music_loop = 0
  3. CLOSE ALL
  4. if sound = 0 and pavhome_enter = 1:
  5. PLAY 'sound/korr.mp3',30
  6. pavhome_enter = 0
  7. end
  8. $loc = 'korrPar'
  9. $loc_arg = ''
  10. $locM = 'korrPar'
  11. $locM_arg = ''
  12. $location_type = 'private'
  13. $menu_loc = 'korrPar'
  14. $menu_arg = ''
  15. menu_off = 0
  16. killvar '$locclass'
  17. clr
  18. popolaini = 0
  19. saunaYouRoom = 0
  20. boycherdaksex = 0
  21. minut += 1
  22. bonusZ = 0
  23. display_bb = 0
  24. gs 'stat'
  25. gs 'themes', 'indoors'
  26. gs 'family'
  27. gs 'family_schedule'
  28. '<center><h1><font color="maroon">Corridor</font></h1></center>'
  29. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/korrpar.jpg"></center>'
  30. *nl
  31. 'The corridor of your parent''s apartment. There are several doors which lead to the other rooms of the apartment, as well as the front door which leads outside to the stairwell.'
  32. *nl
  33. 'A <a href="exec:gt ''mirror'', ''start''">mirror</a> hangs on the wall near the front door.'
  34. *nl
  35. if indorf = 1:'With your parents being away to visit your grandparents, the apartment seems quiet and empty.'
  36. if courtletter_date <= daystart and courtletter_date ! 0: gt 'sentence', 'letter'
  37. if hour ! 18 and blockBedrPar = 1:blockBedrPar = 0
  38. !!Her room isn''t on the cleaning list yet
  39. !!if (momloc = <number for cleaning her room> ) and motherQW['con_steal_hear'] + 4 < daystart and prezikday + 4 < daystart and rand(1,4) = 1: gt 'mother', 'condom_steal', 'hear'
  40. if momloc = 1 and hour = 22 and minut < 30 and motherQW['con_steal_talk'] + 4 < daystart and prezikday + 4 < daystart and rand(1,2) = 1: gt 'mother', 'condom_steal', 'talk'
  41. act '<b>Leave and go to the stairwell</b>':
  42. if $clothingworntype ! 'nude':
  43. gt'pod_ezd','etaj_2'
  44. else
  45. msg'<b><font color = red>You need to get dressed.</font></b>'
  46. gt 'korrPar'
  47. end
  48. end
  49. act '<b>Leave and go to the courtyard</b>':
  50. if $clothingworntype ! 'nude':
  51. if hour < 4 and motherWorry = 0 and age < 18:
  52. '<font color=red>Are you sure? Your mother will worry.</b></font>'
  53. cla
  54. act '<font color=red><b>Yes, go outside</b></font>': minut += 5 & gt'pav_complex', 'start'
  55. act 'No, stay inside':gt 'korrPar'
  56. else
  57. minut += 5
  58. gt'pav_complex', 'start'
  59. end
  60. else
  61. msg'<b><font color = red>You need to get dressed.</font></b>'
  62. gt 'korrPar'
  63. end
  64. end
  65. if blockBedrPar = 0:
  66. if anyaloc = 11 and sisboytrioQW = 1:
  67. act 'Go to your room':gt 'sisterQW', 'sisboytrioQW_bedroom'
  68. elseif anyaloc = 11 and (npc_QW['A33'] = 3 or npc_QW['A33'] = 5 or npc_QW['A33'] = 7 or npc_QW['A33'] >= 9):
  69. act 'Go to your room':gt 'sisterQW', 'sisboyQW_bedroom'
  70. else
  71. act 'Go to your room':gt 'bedrPar'
  72. end
  73. end
  74. if momloc = 1:
  75. if (hour = 5 and minut > 30) or (hour = 6 and minut < 10):
  76. 'The door is closed. You know your <<$npc_nickname[''A29'']>> is likely waking up your stepfather and getting dressed.'
  77. act 'Knock on your parents'' door':
  78. if hour = 6 and minut < 10 and rand(0,2) ! 0:
  79. cla & *clr
  80. minut += 2
  81. gs 'stat'
  82. '<center><img <<$set_imgh>> src="images/pc/activities/spy/peep3.jpg"></center>'
  83. 'You knock on the door and wait for a few minutes. Your <<$npc_nickname[''A29'']>> opens the door looking like she just woke up. "I don''t have time right now. Go wake up your brother." She then closes the door in your face.'
  84. act 'Leave':gt 'korrPar'
  85. act 'Go wake up Kolka':
  86. cla & *clr
  87. minut += 5
  88. gs 'stat'
  89. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/sleeping.jpg"></center>'
  90. 'You walk down the hall and into the living room where you find Kolka still sound asleep on the couch.'
  91. !!act 'Shake him':gt '', ''
  92. !!I am leaving the rest of this for Sicaa so he can tie in any events he has for kolka
  93. act 'Leave':gt 'korrPar'
  94. end
  95. else
  96. cla & *clr
  97. minut += 2
  98. momvladroom = rand(1,10)
  99. gs 'stat'
  100. '<center><img <<$set_imgh>> src="images/pc/activities/spy/peep3.jpg"></center>'
  101. if momvladroom = 1:
  102. 'You knock on the door and you hear your <<$npc_nickname[''A29'']>> say "<<$pcs_nickname>>? Is that you? Go set the table."'
  103. *nl
  104. 'After a few minutes of silence, you faintly hear hushed voices and what you <i>think</i> is the sound of your mother giggling.'
  105. act 'Leave':gt 'korrPar'
  106. gs 'willpower', 'voyeur', 'self', 'medium'
  107. if will_cost <= pcs_willpwr:
  108. act 'Peek (<<will_cost>> Willpower)':
  109. *clr & cla
  110. gs 'willpower', 'pay', 'self'
  111. gs 'stat'
  112. gt 'bedrPar2', 'peek'
  113. end
  114. else
  115. act 'Peek (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  116. end
  117. else
  118. 'You knock on the door and wait for a few minutes. Your <<$npc_nickname[''A29'']>> opens the door fully dressed while your stepfather gets out of bed. "I don''t have time right now. Go set the table for breakfast." She then closes the door in your face.'
  119. act 'Leave':gt 'korrPar'
  120. end
  121. end
  122. end
  123. else
  124. act 'Go to your parents'' room': msg'Your parents are probably asleep, you shouldn''t go in right now.'
  125. end
  126. else
  127. act 'Go to your parents'' room':gt 'bedrPar2'
  128. end
  129. act 'Go to the living room':gt 'sitrPar'
  130. if momloc = 5:
  131. if vanrPar_suction_dildo > 0:
  132. motherQW['dildo_shower_discovery'] = 1
  133. gt'mother','bathroom_dildo_shriek1'
  134. end
  135. act 'Go to the bathroom':msg'You try to open the bathroom door but it immediately stops, banging against the latch. You hear the water running and your mother shouting at the door. "Doesn''t anybody in this family know how to knock?!"'
  136. else
  137. act 'Go to the bathroom':minut += 1 & gt 'vanrPar'
  138. end
  139. if motherQW['bathroom_dildos'] > 0 and momloc['athome'] = 1: gt'mother_sextalk','bathroom_dildos1'
  140. act 'Go to the kitchen':gt 'kuhrPar'
  141. !to add a counter if you avoid Dimka
  142. if nodimkaK >= rand(7,10) and DimkaWarnedToday = 0 and DimaRudeBlock = 0:
  143. nodimkaK = 0
  144. if hour >= 14 and hour < 24 and week <=5 and DimkaWarnedToday = 0: gt 'dimaEv', 'Dimka_warning'
  145. if hour >= 9 and hour < 24 and week >=6 and DimkaWarnedToday = 0: gt 'dimaEv', 'Dimka_warning'
  146. end
  147. if NatbelQW['QWstage'] >= 4 and week < 6 and (hour = 6 or hour = 7) and kanikuli = 0 and SchoolAtestat = 0 and SchoolBlock = 0 and (PCloStyle2 = 4 or Enable_sforma = 1):
  148. *nl
  149. 'You could go to Natasha''s apartment and get her to carry your books to school.'
  150. act 'Go to Natasha''s apartment':gt 'natbelEv', 'carrybooks'
  151. end
  152. $korrParMomHeader = '<center><h1><font color="maroon"><<$npc_nickname[''A29'']>></font></h1></center><center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center><br />'
  153. if hour >= 16 and hour <= 20 and indorf = 0:
  154. if artemvbrosvid = 1 and artemhakday ! daystart and npc_QW['A29'] < 2 and mothervideotalk = 0 or BrotherNo = 1 and BrotherNoDay ! daystart:
  155. *clr & cla
  156. menu_off = 1
  157. BJvideoPublic = 1
  158. BrotherNo = 0
  159. BrotherNoDay = daystart
  160. pcs_mood = 5
  161. npc_rel['A29'] -= 40
  162. gs 'stat'
  163. *pl $korrParMomHeader
  164. 'Your mother stands in the hallway waiting for you, clearly angry. As soon as she sees you, she grabs your ear and pinches it hard, making you wince in pain. "I just saw this video of you sucking some guy''s dick! What the hell were you thinking!? Your stepfather and I worked so hard to raise you properly, and then you do this. Do you realize that this video was sent to others too? What will the people in town think of us now? I should teach you a lesson. What do you have to say for yourself!? Speak up!"'
  165. act 'Beg her to do nothing':
  166. cla
  167. mothervideotalk = 2
  168. minut += 5
  169. gs 'stat'
  170. *nl
  171. 'You burst into tears: "<<$npc_nickname[''A29'']>>, please forgive me! It will never happen again! I made a stupid mistake, I''m sorry... I didn''t mean to... please... I don''t... sorry..." You fall to your knees sobbing uncontrollably, hoping she will have mercy on you. Your mother looks down at you, still angry but not quite sure what to do. She lets out an exasperated gasp, shakes her head and walks away.'
  172. act 'Get back on your feet':gt $curloc
  173. end
  174. act 'Be silent':
  175. *clr & cla
  176. mothervideotalk = 3
  177. minut += 5
  178. spank += 1
  179. gs 'pain', 5, 'asscheeks', 'spank'
  180. gs 'stat'
  181. '<center><h1><font color="maroon"><<$npc_nickname[''A29'']>></font></h1></center>'
  182. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/spank.jpg"></center>'
  183. *nl
  184. 'You stand in the hallway staring at the floor, too embarrassed to say anything.'
  185. 'Your mother grabs you by the arm and pulls you into the living room: "Take off your pants and bend over!" You shake your head, not liking where this is going at all. Getting even angrier by your refusal, she shouts: "Vladimir, come and hold her down!"'
  186. 'A few seconds later, your stepfather enters the living room and immediately pulls you down and keeps you in place while your mother pulls away your clothing. She then grabs a belt and starts to flog your bare ass with it, not holding back at all.'
  187. 'You take your punishment as good as you can, but towards the end you''re in tears and your cries are heard throughout the apartment. When it''s finally over, you raise your head just in time to catch the startled faces of your brother and sister in the doorway.'
  188. act 'Stand up and straighten your clothes':gt $curloc
  189. end
  190. if momslut >= 2:
  191. act 'Threaten her':
  192. cla
  193. mothervideotalk = 1
  194. npc_rel['A29'] -= 10
  195. minut += 5
  196. gs 'stat'
  197. *nl
  198. 'You slap away her hand with a defiant look in your eyes. "Oh really? Well you''re no angel yourself either, <<$npc_nickname[''A29'']>>! Does Vladimir know what YOU have been up to lately? Why don''t we go ask him?"'
  199. 'Your mother looks at you furiously, but is at a loss for words. After a few seconds of awkward silence she storms off, slamming the door shut behind her.'
  200. act 'Continue':gt $curloc
  201. end
  202. end
  203. exit
  204. end
  205. if artemvbrosvid=1 and artemhakday ! daystart and npc_QW['A29'] >= 2 and mothervideotalk = 0:
  206. *clr & cla
  207. menu_off = 1
  208. BJvideoPublic = 1
  209. pcs_mood = 5
  210. gs 'stat'
  211. *pl $korrParMomHeader
  212. 'When you enter the hallway, you find your mother waiting there for you. "What''s all this I hear about a video of you sucking some guy''s dick? How could you be so careless <<$pcs_nickname>>? You do realize this makes our whole family look bad..."'
  213. act 'Apologize':
  214. cla
  215. mothervideotalk = 1
  216. minut += 5
  217. npc_rel['A29'] -= 40
  218. gs 'stat'
  219. *nl
  220. '"I don''t know what to say <<$npc_nickname[''A29'']>>... I''m really sorry."'
  221. 'Your mother is clearly very upset with you. After a short discussion, she walks away.'
  222. act 'Continue':gt $curloc
  223. end
  224. exit
  225. end
  226. if schoolprogul > 2 and SchoolAtestat = 0 and schoolPredupr < 3:
  227. *clr & cla
  228. gs 'stat'
  229. *pl $korrParMomHeader
  230. if npc_QW['A113'] = 10000:
  231. menu_off = 1
  232. npc_QW['A113'] = 10001
  233. schoolprogul = 0
  234. GspravkaT = 2
  235. motherKnowSpravka = 1
  236. gs 'stat'
  237. '"Oh my darling, where have you been? We have been so worried."'
  238. 'You go into the kitchen with your <<$npc_nickname[''A29'']>> and spend some time explaining what happened to you. Many of the details are difficult to talk about, and you cry and hug your <<$npc_nickname[''A29'']>> as you tell your story.'
  239. 'Your <<$npc_nickname[''A29'']>> tells you she will sort out everything with the school and makes you a bowl of chicken soup.'
  240. if pcs_energy >= 30:
  241. 'You are too full to eat it.'
  242. elseif pcs_energy >= 20 and pcs_energy < 30:
  243. if pcs_hydra < 20:
  244. pcs_hydra += 20
  245. cumspclnt = 2
  246. gs 'cum_cleanup'
  247. pcs_breath = 0
  248. end
  249. fat += 3
  250. pcs_energy += 10
  251. 'You have some of the chicken soup, but can''t finish it.'
  252. elseif pcs_energy < 20:
  253. if pcs_hydra < 20:
  254. pcs_hydra += 20
  255. cumspclnt = 2
  256. gs 'cum_cleanup'
  257. pcs_breath = 0
  258. end
  259. pcs_energy += 20
  260. 'You gladly eat it all.'
  261. end
  262. act 'Leave':gt 'kuhrPar'
  263. exit
  264. elseif npc_rel['A29'] >= 40:
  265. if schoolPredupr = 2:
  266. schoolPredupr = 3
  267. npc_rel['A29'] = 0
  268. SchoolBlock = 1
  269. schoolprogul = 0
  270. pcs_grades = 0
  271. 'As you enter the hallway, you find your mother there waiting for you. You have never seen her this furious. "<<$pcs_nickname>>? I just got off the phone with the school. They told me you didn''t show up yet again and expelled you. I''m extremely disappointed with you! I''ve warned you so many times! If you want to remain living in this house, you best start pulling your weight around here! Right now I want you out of the house, go out and find some work!" After that, she pushes you out the door and slams it shut in your face.'
  272. act 'Leave':gt 'pav_residential'
  273. exit
  274. elseif schoolPredupr = 1:
  275. schoolPredupr = 2
  276. npc_rel['A29'] = 0
  277. schoolprogul = 0
  278. pcs_grades -= 40
  279. 'As you enter the hallway, you find your mother there waiting for you. She seems very angry with you. "The school called saying you didn''t show up for class again. They wanted to expel you! I had to go over there and beg the principal to give you one last chance. I''ve never felt so humiliated! This is your last chance <<$pcs_nickname>>. You will not embarrass me any further. If you miss one more day of school, they will kick you out. And if you get kicked out of school, life is going to get a lot tougher for you, especially around here!" Having said her piece, your mother turns around and leaves.'
  280. elseif schoolPredupr = 0:
  281. schoolPredupr = 1
  282. npc_rel['A29'] = 0
  283. schoolprogul = 0
  284. pcs_grades -= 20
  285. 'As you enter the hallway, you find your mother there waiting for you. "<<$pcs_nickname>>? The school called saying you weren''t at school today. You know they''re very unforgiving when it comes to absenteeism. They said they would expel you if it happens again. What are you doing with your life? Get it together!" Your mother angrily leaves the room, leaving you to your thoughts.'
  286. end
  287. elseif npc_rel['A29'] < 40:
  288. if schoolPredupr = 2:
  289. schoolPredupr = 3
  290. npc_rel['A29'] = 0
  291. SchoolBlock = 1
  292. home_owned[2] = 0
  293. schoolprogul = 0
  294. pcs_grades = 0
  295. 'As you enter the hallway, you find your mother there waiting for you. You have never seen her this furious. "<<$pcs_nickname>>? I just got off the phone with the school, they told me you didn''t show up yet again and expelled you. I''ve had it with you! I''ve warned you so many times! Go ahead, live your irresponsible life the way you want. You''re no longer welcome here." She already packed up all your things from your room before you got home, and roughly shoves the bag into your hands. After that, she pushes you out the door and slams it shut in your face.'
  296. act 'Leave':gt 'pav_residential'
  297. exit
  298. elseif schoolPredupr = 1:
  299. schoolPredupr = 2
  300. npc_rel['A29'] = 0
  301. schoolprogul = 0
  302. pcs_grades -= 40
  303. 'As you enter the hallway, you find your mother there waiting for you. She seems very angry with you. "The school called saying you didn''t show up for class again. They wanted to expel you! I had to go over there and beg the principal to give you one last chance. I''ve never felt so humiliated! This is your last chance <<$pcs_nickname>>. You will not embarrass me any further. If you miss one more day of school, they will kick you out. And if you get kicked out of school, I will personally kick you out of the house. If you cannot be responsible and behave like a normal person, then get out! No one is forcing you to stay." Having said her piece, your mother turns around and leaves.'
  304. elseif schoolPredupr = 0:
  305. schoolPredupr = 1
  306. npc_rel['A29'] = 0
  307. schoolprogul = 0
  308. pcs_grades -= 20
  309. 'As you enter the hallway, you find your mother there waiting for you. "<<$pcs_nickname>>? The school called saying you weren''t at school today. You know they''re very unforgiving when it comes to absenteeism. They said they would expel you if it happens again. What are you doing with your life? Get it together!" Your mother angrily leaves the room, leaving you to your thoughts.'
  310. end
  311. end
  312. act 'Continue':gt $curloc
  313. exit
  314. end
  315. end
  316. if hour >= 15 and hour < 20:
  317. if Gcall = 0:
  318. numnpcboy = 0
  319. :markboyfrendcall
  320. numnpcboy += 1
  321. if otnBoyFrend[numnpcboy] >= 20 and boyinday[numnpcboy]!daystart:
  322. Gcall = 1
  323. 'You hear the <a href="exec:gt ''gtelefon''">phone</a> ringing in the hallway.'
  324. elseif numboyFrend > numnpcboy:
  325. jump 'markboyfrendcall'
  326. end
  327. end
  328. else
  329. if Gcall > 0:Gcall = 0
  330. end
  331. if motherWorry = 1 and indorf = 0:
  332. gt'mother'
  333. elseif motherWorry = 1 and indorf > 0:
  334. motherWorry = 0
  335. end
  336. if notathomesleep > 7 and hour >= 16 and hour < 21 and mother_go = 0:
  337. notathomesleep = 0
  338. *clr & cla
  339. *pl $korrParMomHeader
  340. if npc_rel['A29'] < 40:
  341. 'You run into your mother in the hallway. "Well well, look who decided to come home for once.'
  342. act 'Continue':gt 'korrPar'
  343. end
  344. if npc_rel['A29'] >= 40:
  345. 'You run into your mother in the hallway. She looks happy to see you. "What a surprise! Welcome home, honey! I missed you.'
  346. act 'Continue':gt 'korrPar'
  347. end
  348. end
  349. !If she has given herself to boys in the stairwell, customers start hammering at the door:
  350. if hour >= 10 and hour <= 23 and pav_slut >= 250 and podwhoreQW >= 3:
  351. pod_client = rand(0,100)
  352. if pod_whore_countQW <= 15 and pod_client <= 5:
  353. play 'sound/door1.mp3',100
  354. 'Someone is at the door: <a href="exec: gt ''pod_whore'', ''client_talk''">Answer</a>'
  355. elseif pod_whore_countQW > 15 and pod_client <= 20:
  356. play 'sound/door1.mp3',100
  357. 'Someone is at the door: <a href="exec: gt ''pod_whore'', ''client_talk''">Answer</a>'
  358. end
  359. end
  360. !!if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  361. --- korrPar ---------------------------------