natbelEv.qsrc 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326
  1. # natbelEv
  2. !! Events concerning Natasha Belova (and her mother)
  3. !! Event handling for Natasha''s storyline
  4. if $ARGS[0] = 'natbelQuest':
  5. NatbelQW['natbelXP'] += ARGS[1]
  6. if NatbelQW['QWstage'] < 10:
  7. if NatbelQW['natbelXP'] > 50:
  8. NatbelQW['QWstage'] = 10
  9. NatbelQW['natbelXP'] = 0
  10. end
  11. elseif NatbelQW['QWstage'] < 20:
  12. if NatbelQW['natbelXP'] > 10:
  13. NatbelQW['QWstage'] = 20
  14. NatbelQW['natbelXP'] = 0
  15. end
  16. elseif NatbelQW['QWstage'] < 30:
  17. if NatbelQW['natbelXP'] > 150:
  18. NatbelQW['QWstage'] = 30
  19. NatbelQW['natbelXP'] = 0
  20. end
  21. elseif NatbelQW['QWstage'] < 40:
  22. if NatbelQW['natbelXP'] > 200:
  23. NatbelQW['QWstage'] = 40
  24. NatbelQW['natbelXP'] = 0
  25. end
  26. elseif NatbelQW['QWstage'] < 50:
  27. if NatbelQW['natbelXP'] > 250:
  28. NatbelQW['QWstage'] = 50
  29. NatbelQW['natbelXP'] = 0
  30. end
  31. elseif NatbelQW['QWstage'] < 60:
  32. if NatbelQW['natbelXP'] > 300:
  33. NatbelQW['QWstage'] = 60
  34. NatbelQW['natbelXP'] = 0
  35. end
  36. elseif NatbelQW['QWstage'] < 70:
  37. if NatbelQW['natbelXP'] > 350:
  38. NatbelQW['QWstage'] = 70
  39. NatbelQW['natbelXP'] = 0
  40. end
  41. elseif NatbelQW['QWstage'] < 80:
  42. if NatbelQW['natbelXP'] > 400:
  43. NatbelQW['QWstage'] = 80
  44. NatbelQW['natbelXP'] = 0
  45. end
  46. elseif NatbelQW['QWstage'] < 90:
  47. if NatbelQW['natbelXP'] > 450:
  48. NatbelQW['QWstage'] = 90
  49. NatbelQW['natbelXP'] = 0
  50. end
  51. elseif NatbelQW['QWstage'] < 100:
  52. if NatbelQW['natbelXP'] > 500:
  53. NatbelQW['QWstage'] = 100
  54. NatbelQW['natbelXP'] = 0
  55. end
  56. elseif NatbelQW['QWstage'] < 110:
  57. if NatbelQW['natbelXP'] > 550:
  58. NatbelQW['QWstage'] = 110
  59. NatbelQW['natbelXP'] = 0
  60. end
  61. elseif NatbelQW['QWstage'] < 120:
  62. if NatbelQW['natbelXP'] > 600:
  63. NatbelQW['QWstage'] = 120
  64. NatbelQW['natbelXP'] = 0
  65. end
  66. end
  67. end
  68. if $ARGS[0] = 'natcumresponse':
  69. if NatbelQW['KolkaCP'] = 0:
  70. 'Natasha suddenly tries to pull away from Kolka, saying "Pull out, not inside! I don''t want to end up pregnant!"'
  71. elseif NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 20 and (daystart-NatbelQW['pregday']) < 90:
  72. 'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t seems to bother her that Kolka may knock her up.'
  73. elseif NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) >= 90:
  74. 'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t really matter now, since Kolka has already knocked her up.'
  75. elseif NatbelQW['pregday'] = 0 and npc_pregtalk['A16'] = 1 and NatbelQW['babycount'] = 0:
  76. 'Natasha looks at you and almost inaudably whispers "Please let him cum inside me. I want a baby too."'
  77. elseif NatbelQW['pregday'] = 0 and npc_pregtalk['A16'] = 1 and NatbelQW['babycount'] > 0:
  78. 'Natasha looks at you and moans "Please let him cum inside me. I need him to give me another baby."'
  79. else
  80. 'Natasha looks at you questioningly, whether will you let him cum inside of her and risking her getting pregnant with your niece or nephew, or letting her pull away from you brother.'
  81. end
  82. end
  83. !! Check if Natasha''s mother is home from work so this can be called with: gs 'natbelEv', 'natmomhome'
  84. if $ARGS[0] = 'natmomhome':
  85. if (hour >= 16 and hour < 21) or (week > 5 and hour >= 10 and hour < 21):
  86. NatbelQW['MotherHome'] = 1
  87. else
  88. NatbelQW['MotherHome'] = 0
  89. end
  90. end
  91. !! This is the book carrying event in Natasha''s questline -- needs a check to see if it isn''t a holiday
  92. !! if (hour >= 6 and hour < 8 and week < 6) and NatbelQW['QWstage'] > 4 and NatbelQW['Debt'] > 0 and ???: to be added from the hallway in Sveta''s home?
  93. if $ARGS[0] = 'carrybooks':
  94. menu_off = 1
  95. if NatbelQW['QWstage'] = 4: NatbelQW['QWstage'] = 5
  96. *clr & cla
  97. '<center><img src="images/characters/pavlovsk/school/girl/natasha/natgetreadyschool.jpg"></center>'
  98. 'When you head over to Natasha''s apartment to pick her up her mother opens the door and tells you she''s in her room getting ready so you go there.'
  99. 'As you open the door you see Natasha sitting on her small sofa, pulling up her stockings'
  100. '"Ready to go?" You ask her, as you put your bag next to her.'
  101. if NatbelQW['QWstage'] >= 7:
  102. gs 'willpower', 'exhib', 'force', 'easy'
  103. if will_cost <= pcs_willpwr:
  104. act 'Lift her skirt (<<will_cost>> Willpower)':
  105. gs 'willpower', 'exhib', 'force', 'easy'
  106. gs 'willpower', 'pay', 'force'
  107. *clr & cla
  108. '<center><img src="images/characters/pavlovsk/school/girl/natasha/skirt.jpg"></center>'
  109. 'You can''t stop yourself from pulling up her skirt as she turns to grab your bag. "Cute panties Natasha, they match the stockings."'
  110. 'Natasha looks over her shoulder at you with a faint blush on her cheeks. "I... Uhm... Thank you <<$pcs_nickname>>." She says, blushing at you prettily.'
  111. '"We have some time before school." You tell her while you start pulling off her skirt and panties.'
  112. '"Today you''ll be wearing them a little differently." You say, pushing her back on the couch. "Open your legs."'
  113. 'Natasha obediently opens her legs for you. showing off her pretty pussy. Not wasting any time you start playing with her, first rubbing her lips, then focussing more on her clit as you watch closely while Natasha''s pussy gets wetter and wetter.'
  114. act 'Stuff her panties':
  115. *clr & cla
  116. '<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/stuffpanties.mp4"></video></center>'
  117. 'You stop playing with her pussy and grab her panties, handing them over to her. "Put them inside your pussy."'
  118. 'Natasha looks at you in confusion for a second but then starts to slowly push them into her pussy.'
  119. 'When there''s only enough left to easily grab on in case you''d want to pull them out she stops and looks at you expectantly. "Like this <<$pcs_nickname>>?"'
  120. 'You reach down and push the last bit inside as well, holding them in with your finger for a bit before pulling your finger out again.'
  121. '"This is how you''ll wear your panties for me at school today Natasha." You tell her. "Now put your skirt back on or we''ll be late.'
  122. act 'Go to school': gt 'natbelEv', 'schoolwalk'
  123. end
  124. end
  125. else
  126. act 'Lift her skirt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  127. end
  128. elseif NatbelQW['QWstage'] > 5:
  129. gs 'willpower', 'exhib', 'force', 'easy'
  130. if will_cost <= pcs_willpwr:
  131. act 'Lift her skirt (<<will_cost>> Willpower)':
  132. gs 'willpower', 'exhib', 'force', 'easy'
  133. gs 'willpower', 'pay', 'force'
  134. *clr & cla
  135. '<center><img src="images/characters/pavlovsk/school/girl/natasha/skirt.jpg"></center>'
  136. 'You can''t stop yourself from pulling up her skirt as she turns to grab your bag. "Cute panties Natasha, they match the stockings."'
  137. 'Natasha looks over her shoulder at you with a faint blush on her cheeks. "I... Uhm... Thank you <<$pcs_nickname>>." She lets out in a whisper.'
  138. 'Not wanting to lose your mule to school you let her skirt fall down again and head to school.'
  139. act 'Go to school': gt 'gschool_grounds', 'main'
  140. end
  141. else
  142. act 'Lift her skirt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  143. end
  144. else
  145. 'Natasha grabs both of your bags and you head to school.'
  146. act 'Go to school': gt 'gschool_grounds', 'main'
  147. end
  148. act 'Go to school': gt 'gschool_grounds', 'main'
  149. end
  150. if $ARGS[0] = 'schoolwalk':
  151. if rand(0,4) = 0:
  152. if NatbelQW['KolkaTease'] = 0: NatbelQW['KolkaTease'] = 1
  153. *clr & cla
  154. '<center><img src="images/characters/pavlovsk/school/girl/natasha/tease.jpg"></center>'
  155. 'As you reach the bottom of the stairs, you notice Kolka coming down as well.'
  156. 'Deciding to tease him a bit you grab the bottom of Natasha''s skirt and pull it up while you bend over yourself to show him both of your asses.'
  157. 'Natasha quickly slaps your hand away and the two of you resume your walk to school. As you exit the hall you can''t hear Kolka''s footsteps. He must have stopped in his tracks at the sight.'
  158. act 'Continue on to school': gt 'gschool_grounds', 'main'
  159. else
  160. gt 'gschool_grounds', 'main'
  161. end
  162. end
  163. !! This is the cucumber event in Natasha''s questline
  164. if $ARGS[0] = 'laundry':
  165. $menu_loc = 'natbelEv'
  166. $menu_arg = 'laundry'
  167. menu_off = 0
  168. CLOSE ALL
  169. *clr & cla
  170. $locclass = ''
  171. minut += 1
  172. gs 'stat'
  173. '<center><b><font color = maroon>Laundry room</font></b></center>'
  174. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natlaundry.jpg"></center>'
  175. 'You walk in and see Natasha just turning on the machine. She turns around and sees you in the doorway.'
  176. if NatashaLoc = 7 and NatbelQW['cucumber'] = 1 and NatbelQW['QWstage'] >= 10:
  177. gs 'willpower', 'mast', 'force', 'easy'
  178. if will_cost <= pcs_willpwr:
  179. act 'Make her play with a cucumber (<<will_cost>> Willpower)':
  180. gs 'willpower', 'pay', 'force'
  181. if NatbelQW['QWstage'] = 10: NatbelQW['QWstage'] = 11
  182. NatbelQW['cucumber'] = 0
  183. *clr & cla
  184. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natashacucumber01.jpg"></center>'
  185. 'You move over and make her sit on top of it.'
  186. '"I thought we could have some fun in here. The noise from the washer should prevent anyone from hearing." You tell her as you hand her the cucumber.'
  187. '"What''s this for?" She asks you. "I Want to see you slide it in your pussy Natasha." You tell her with an excited grin on your face.'
  188. '"It''s enormous, it won''t fit." She hesitantly tries to back out. "I''ve seen you take bigger. Now open those legs and get yourself ready or I''ll put it in myself right now." You hiss at her.'
  189. act 'Further':
  190. *clr & cla
  191. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natashacucumber02.jpg"></center>'
  192. 'Natasha has a shocked look on her face as she scoots back a bit and obediently starts to play with her pussy. You can see she''s already wet. "Being dominated really turns her on." You think to yourself.'
  193. '"T-The vibrations from the washer are ..." She starts moaning softly.'
  194. '"You better start opening that pussy up or it''s going to sting bitch." You continue in the same threatening tone you used before. Natasha moans as she slips two fingers inside. "That went easy enough, now add a third." You order her, and to your delight she immediately forces a third finger inside her vagina.'
  195. '"Good, now spread your pussy, I want to have a last look before the cucumber goes in." You hiss again, wanting to make sure she keeps takign your orders immediately.'
  196. 'You smile as you she opens her pussy for you with her hands, showing you just how dripping wet she is.'
  197. act 'Now put it in':
  198. *clr & cla
  199. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natashacucumber03.jpg"></center>'
  200. 'Natasha lets out a loud moan as she forces the cucumber inside her pussy even though she was biting her lip to try and stay quiet. It slides about half way in on the first stroke. "You see, it wasn''t too big at all." You praise her. "Now I want to see you fuck yourself hard. Keep going."'
  201. 'She''s all too eager to obey. With a furious effort she rapidly strokes the big vegetable in and out of herself. Her moans growing louder and louder. Within a few minutes you are rewarded with the sight of her delicious orgasm. Her legs shake as she keeps fucking herself for a bit longer before she finally slides it all the way out and leans back. Her face sporting a deep red flush.'
  202. 'You lean in and kiss her passionately before telling her: "Let''s go to your room."'
  203. act 'Go to her room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
  204. end
  205. end
  206. end
  207. else
  208. act 'Make her play with a cucumber (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  209. act 'Go to her room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
  210. end
  211. elseif NatashaLoc = 7:
  212. '"Oh hey <<$pcs_nickname>>, let''s go to my room"'
  213. act 'Go to her room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
  214. else
  215. *clr & cla
  216. 'There is nobody here. This room isn''t exactly big enough to hang out in so you head back out.'
  217. act 'Go to the hallway': gt 'natbelapt', 'hallway'
  218. end
  219. end
  220. !! This is an event where Sveta can spy on Natasha in the shower
  221. if $ARGS[0] = 'showerspy':
  222. menu_off = 1
  223. CLOSE ALL
  224. $metka = 'bathroom'
  225. $loc = 'natbelapt'
  226. $metkaM = 'bathroom'
  227. $locM = 'natbelapt'
  228. gs 'stat'
  229. $location_type = 'bathroom'
  230. *clr & cla
  231. '<center><img src="images/characters/pavlovsk/school/girl/natasha/sex/natshowerspy01.jpg"></center>'
  232. 'You open the bathroom door as quietly as you can and peer through the crack to see Natasha sitting down in the shower while she''s shaving her pussy, completely absorbed in the her grooming.'
  233. gs 'arousal', 'voyeur', 5
  234. if NatbelQW['QWstage'] >= 5:
  235. gs 'willpower', 'voyeur', 'self', 'easy'
  236. if will_cost <= pcs_willpwr:
  237. act 'Get a closer look (<<will_cost>> Willpower)':
  238. gs 'willpower', 'pay', 'self'
  239. *clr & cla
  240. '<center><img src="images/characters/pavlovsk/school/girl/natasha/sex/natshowerspy02.jpg"></center>'
  241. 'Wanting to get a better look you step into the bathroom and close the door behind you.'
  242. '"Making yourself presentable I see." You say with a grin, which breaks Natasha out of her concentration, making her look up at you with an embarassed look on her face.'
  243. 'She then shrugs and gets back to her shaving. "I-It just feels nice... You know..." She lets out.'
  244. '"Yeah, I understand. Freshly shaven skin is really nice to touch." You let her know as you keep watching while she finishes shaving.'
  245. gs 'arousal', 'voyeur', 5
  246. if NatbelQW['QWstage'] >= 9:
  247. act 'Keep chatting while she rinses off':
  248. *clr & cla
  249. '<center><img src="images/characters/pavlovsk/school/girl/natasha/sex/natshowerspy02.jpg"></center>'
  250. 'When Natasha is done she quickly rinses off the remaining shaving cream and then looks up at you with a mischievous grin on her face.'
  251. '"This feels even nicer." She says as she spreads her pussylips with one hand and inserts the handle of her razor in her pussy, gently pushing it in and then slowly pulling it out a few times.'
  252. '"Someone''s in a great mood today." You praise her as you feel your own pussy getting wet at the sight of Natasha playing with herself in the shower. "I think we should continue this in your room."'
  253. 'Natasha quickly gets up and rinses off her entire body and you hand her a towel as she steps out of the shower.'
  254. '"Don''t take too long. I''ll be in your room." You tell her and leave the bathroom.'
  255. gs 'arousal', 'voyeur', 5
  256. gs 'arousal', 'end'
  257. gs 'stat'
  258. act 'Leave': gt 'natbelapt','natroom'
  259. end
  260. else
  261. gs 'arousal', 'end'
  262. gs 'stat'
  263. 'When Natasha is done she quickly rinses off the remaining shaving cream and you hand her a towel as she steps out of the shower.'
  264. '"I''ll let you finish up in here. I''ll be in your room." You tell her and leave the bathroom.'
  265. act 'Leave': gt 'natbelapt','natroom'
  266. end
  267. end
  268. else
  269. act 'Get a closer look (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  270. end
  271. else
  272. 'Not wanting to intrude any further you decide to leave her be and close the door again.'
  273. end
  274. act 'Leave': gt 'natbelapt','hallway'
  275. end
  276. !! This is an event where Sveta wants to take a shower and strips down in Natasha''s mother''s room before taking a towel and heading to the bathroom
  277. if $ARGS[0] = 'Get_Towel':
  278. menu_off = 1
  279. CLOSE ALL
  280. *clr & cla
  281. minut += 1
  282. gs 'stat'
  283. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/undressinnatmomroom01.jpg"></center>'
  284. 'On your way to the bathroom you see a basket of freshly laundered towels in <<$npc_nickname[''A191'']>>''s room. "I might as well get one from here." You think to yourself as you step inside and start taking off your clothes.'
  285. 'Just as you take your top off <<$npc_nickname[''A191'']>> comes back with more laundry and freezes in the doorway. She gives you an appraising look and says: "What are you up to <<$pcs_nickname>>?"'
  286. '"Oh, I was just about to take a shower. You don''t mind if I grab a towel from here do you?"'
  287. if pcs_inhib >= 50:
  288. act 'Chat as you undress':
  289. *clr & cla
  290. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/undressinnatmomroom02.jpg"></center>'
  291. '<<$npc_nickname[''A191'']>> eases up a bit as she realises you don''t intend to do anything weird and comes into the room to grab a few things she intends to wash.'
  292. 'You just keep stripping down until you''re completely naked while you ask her about her day.'
  293. '"Just laundry day <<$pcs_nickname>>." She says a bit uncomfortably.'
  294. 'Since you don''t want to cause a scene by upsetting her you decide it''s best if you just go take a shower.'
  295. act 'Grab a towel and go shower': gt 'natbelEv', 'Go_Shower'
  296. end
  297. else
  298. act 'Grab a towel and go shower': gt 'natbelEv', 'Go_Shower'
  299. end
  300. end
  301. if $ARGS[0] = 'Go_Shower':
  302. menu_off = 1
  303. CLOSE ALL
  304. *clr & cla
  305. minut += 1
  306. gs 'stat'
  307. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/undressinnatmomroom03.jpg"></center>'
  308. 'You pick up a clean towel and wrap it around yourself, wondering about what kind of impression you just made on <<$npc_nickname[''A191'']>>.'
  309. act 'Go to the bathroom': gt 'natbelapt', 'bathroom'
  310. end
  311. --- natbelEv ---------------------------------