1
0

rolanbath.qsrc 36 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923
  1. # rolanbath
  2. if $ARGS[0] = 'start':
  3. CLOSE ALL
  4. $metka = 'start'
  5. $loc = 'rolanbath'
  6. $metkaM = 'start'
  7. $locM = 'rolanbath'
  8. $location_type = 'bathroom'
  9. cla & *clr
  10. gs 'stat'
  11. if RolanLoc[hour] = 7:
  12. 'Rolan is here.'
  13. if RAND(0,100) >= 30:
  14. gt 'rolanbath', 'ev'
  15. else
  16. gt 'rolanbath', 'sexev'
  17. end
  18. end
  19. '<center><b><font color = maroon>Bathroom</font></b></center>'
  20. if newbath ! 1:
  21. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathroom.jpg"></center>'
  22. 'The bathroom has seen better days. There''s some mold in the corners and floor. A big crack in the wall. This place probably hasn''t been cleaned for quite some time. The toilet sits along the far wall. There''s also a bathtub, with an old plastic shower curtain hanging from a rod above it. It also seems that the latch on the door is broken.'
  23. elseif newbath = 1:
  24. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathroomnew.jpg"></center>'
  25. 'The bathroom is in much better shape since you worked on it.'
  26. end
  27. if rolanworker = 2 and (RolanLoc[hour] = 9 or RolanLoc[hour] = 10):
  28. ! if rolanworker = 2 and RolanLoc[hour] = 9 or RolanLoc[hour] = 10:
  29. if workertool = 0:
  30. act 'Get some tools': gt 'rolanbath', 'tools'
  31. elseif workertool = 1:
  32. act 'Look for concrete mix': gt 'rolanapt','hallway'
  33. elseif workertool = 2:
  34. cla
  35. *clr
  36. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathchat/builder/girlpow.jpg"></center>'
  37. '"Now I''ll show Rolan what girl power can do!"'
  38. act 'Get to work': gt 'rolanapt', 'worker'
  39. end
  40. end
  41. act 'Return to the hallway': gt 'rolanapt','hallway'
  42. act 'Take a shower (0:15)':
  43. cla
  44. *clr
  45. minut += 15
  46. if shampoo > 0: shampoo -= 1
  47. dynamic $showerdin
  48. if frost > 0:frost = 0
  49. '<center><img src="images/shared/home/bathroom/wash3.jpg"></center>'
  50. *nl
  51. 'You undress and turn on the water in the shower. When it hits the right temperature you enter the shower and let the warm water rain down on you. You carefully soap yourself trying not to miss any spots and then rinse off.'
  52. *nl
  53. dynamic $brit
  54. if hypnoAddict > 0:'You have no reason to, but you carefully avoid cleaning out your pussy and ass.'
  55. if btwarn > 0:
  56. if btwarn = 1: $weightwarn = 'losing'
  57. if btwarn = 2: $weightwarn = 'gaining'
  58. '<font color="red"><b>You seem to be <<$weightwarn>> weight.</b></font>'
  59. killvar '$weightwarn' & btwarn = 0
  60. end
  61. if normbuffpick = 1:
  62. *nl
  63. '<b>You notice that your muscles are starting to show through your skin.</b>'
  64. act 'Examine yourself closer while drying off and getting dressed...': gt 'din_van', 'buffpick'
  65. end
  66. if RolanLoc[hour] ! 0 and RolanLoc[hour] ! 1:
  67. pcs_horny += rand(0,2)
  68. *nl
  69. 'You try to forget that Rolan''s bathroom door doesn''t have a latch.'
  70. 'The idea that the door is open occupies your mind while you are showering. It would be very embarrassing if Rolan was to enter at the wrong time.'
  71. if rand(0,3) = 0:
  72. act 'Sing in the shower':
  73. cla & *clr
  74. minut += 1
  75. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathsing'+rand(0,1)+'.jpg"></center>'
  76. *nl
  77. 'The warm water feels amazing against you. You forget for a moment that Rolan could enter the bathroom at any moment. The shower is so relaxing that you begin to sing under the water, imagining that you''re a famous rockstar performing for your thousands of fans.'
  78. pcs_mood += 10
  79. pcs_willpwr += 10
  80. if hypnoAddict ! 0:
  81. 'You unconsciously avoid spraying water into your vagina.'
  82. else
  83. cumspclnt = 8
  84. gs 'cum_cleanup'
  85. end
  86. act 'Dry off': gt 'rolanbath','dryOff'
  87. end
  88. elseif rand(0,3) = 1:
  89. act 'Uh..? Is someone there?':
  90. cla & *clr
  91. minut += 1
  92. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathpeek.jpg"></center>'
  93. *nl
  94. 'As the jet of warm water begins to caress you, you hear a noise. You call out, "Rolan, is that you?" You don''t hear a response. "Bah! Probably just me being paranoid."'
  95. cumspclnt = 8
  96. gs 'cum_cleanup'
  97. if $pantyworntype ! 'none' and rolan_steal_day ! daystart:
  98. gs 'panties', 'dispose'
  99. rolan_panty_day = daystart
  100. rolan_panty_count -= 1
  101. if rolanpantyQW =< 1: rolanpantyQW = 1
  102. end
  103. act 'Finish showering':
  104. cla & *clr
  105. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathcold.jpg"></center>'
  106. *nl
  107. 'The water is suddenly ice cold, "Ahhh! I must have used up all the hot water!"'
  108. act 'Dry yourself':
  109. cla & *clr
  110. minut += 5
  111. !! gs 'rolanbath', 'rolansteal'
  112. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathtowel1.jpg"></center>'
  113. *nl
  114. 'You wrap yourself with a towel before exiting the shower, just to be cautious.'
  115. if hypnoAddict ! 0:
  116. 'You unconsciously avoid spraying water into your vagina.'
  117. else
  118. cumspclnt = 8
  119. gs 'cum_cleanup'
  120. end
  121. act'Quickly get dressed': gt 'rolanbath','dryOff'
  122. end
  123. end
  124. end
  125. elseif rand(0,3) = 2:
  126. act 'Uh..? Is someone there?':
  127. cla & *clr
  128. minut += 1
  129. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathaware'+rand(0,2)+'.jpg"></center>'
  130. *nl
  131. 'You think you hear a noise. "Rolan, is that you?"'
  132. act 'What the f...?':
  133. cla & *clr
  134. minut += 10
  135. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathwhat.jpg"></center>'
  136. *nl
  137. 'Shit! Rolan is in here... masturbating!?'
  138. act 'look':
  139. cla
  140. *clr
  141. minut += 2
  142. '<center><video src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanmazt0.mp4"></center>'
  143. 'Rolan is furiously stroking his cock a few meters away from you while you are showering... You can''t believe it!'
  144. act 'Close the curtain (0:05)':
  145. cla
  146. *clr
  147. minut += 5
  148. dynamic $showerdin
  149. pcs_horny += rand(0,2)
  150. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathhide0.jpg"></center>'
  151. *nl
  152. 'You think to yourself, "<i>Better let him finish, don''t want him seeing me naked while he''s pleasuring himself...</i>"'
  153. act 'Wait': gt 'rolanbath','dryOff'
  154. end
  155. end
  156. end
  157. end
  158. else
  159. act 'Clean yourself':
  160. cla & *clr
  161. minut += 10
  162. '<center><video src="images/shared/home/bathroom/dush.mp4"></center>'
  163. *nl
  164. 'No, Rolan is a good guy, he wouldn''t come into the bathroom while you''re showering.'
  165. if hypnoAddict ! 0:
  166. 'You unconsciously avoid spraying water into your vagina.'
  167. else
  168. cumspclnt = 8
  169. gs 'cum_cleanup'
  170. end
  171. act 'Rolanbathdryoff': gt 'rolanbath','dryOff'
  172. end
  173. end
  174. else
  175. if pcs_horny >= 40:
  176. act 'Use the shower head on your pussy':
  177. cla & *clr
  178. minut += 10
  179. '<center><video src="images/shared/home/bathroom/wash2.mp4"></center>'
  180. *nl
  181. 'You know Rolan isn''t in here.'
  182. *nl
  183. 'You place the shower head onto your pussy and a powerful jet of warm water begins to caress you.'
  184. gs 'arousal', 'masturbate', 10
  185. if hypnoAddict ! 0:
  186. 'You unconsciously avoid spraying water into your vagina.'
  187. else
  188. cumspclnt = 8
  189. gs 'cum_cleanup'
  190. end
  191. act 'Dry off': gt $loc, 'start'
  192. end
  193. else
  194. act 'Continue washing':
  195. cla & *clr
  196. minut += 10
  197. '<center><video src="images/shared/home/bathroom/dush.mp4"></center>'
  198. *nl
  199. 'You know Rolan isn''t in here.'
  200. *nl
  201. 'No, Rolan is a good guy, he wouldn''t come into the bathroom while you''re showering.'
  202. if hypnoAddict ! 0:
  203. 'You unconsciously avoid spraying water into your vagina.'
  204. else
  205. cumspclnt = 8
  206. gs 'cum_cleanup'
  207. end
  208. act 'Dry off': gt $loc, 'start'
  209. end
  210. end
  211. end
  212. dynamic $preshave
  213. !! dynamic $dryOff
  214. end
  215. !!gs 'arousal', 'masturbate', 20
  216. !!bath
  217. act 'Have a bath (0:30)':
  218. cla
  219. *clr
  220. gs 'stat'
  221. minut += 30
  222. pcs_sweat = 7 + rand(0,4)
  223. pcs_mood += 20
  224. pcs_skin += 1
  225. dynamic $showerdin
  226. if frost > 0:frost = 0
  227. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/wash4.jpg"></center>'
  228. *nl
  229. 'While the bathtub fills up you get undressed and then dip a toe into the water. It''s just the right temperature so you climb in and let yourself sink into the warm water.'
  230. *nl
  231. dynamic $brit
  232. *nl
  233. if sh_rolan_bazar < 4:
  234. 'You''re not used to having Rolan wandering around, especially with a broken door.'
  235. elseif sh_rolan_bazar >= 5:
  236. pcs_horny += rand(0,2)
  237. 'You''re still not used to having Rolan wandering around, especially with a broken door.'
  238. 'Starting to soap yourself you unwittingly turn your attention to your breasts...'
  239. elseif sh_rolan_bazar >= 15:
  240. pcs_horny += rand(0,4)
  241. 'You have become a little bit accustomed to washing yourself in Rolan''s bath and casually you pinch your nipple as if this situation arouses you.'
  242. elseif sh_rolan_bazar >= 25:
  243. pcs_horny += rand(2,6)
  244. 'You lean back and relax for a while. Then you begin to lather your body, gently gliding your soft hands over your smooth curves, and wash yourself thoroughly.'
  245. end
  246. if btwarn > 0:
  247. if btwarn = 1: $weightwarn = 'losing'
  248. if btwarn = 2: $weightwarn = 'gaining'
  249. '<font color="red"><b>You seem to be <<$weightwarn>> weight.</b></font>'
  250. killvar '$weightwarn' & btwarn = 0
  251. end
  252. if normbuffpick = 1:
  253. *nl
  254. '<b>You notice that your muscles are starting to show through your skin.</b>'
  255. act 'Examine yourself closer while drying off and getting dressed...': gt 'din_van', 'buffpick'
  256. end
  257. if RolanLoc[hour] ! 0 and RolanLoc[hour] ! 1:
  258. pcs_horny += rand(0,2)
  259. *nl
  260. 'You try to forget that Rolan''s bathroom door doesn''t latch.'
  261. 'The idea that the door is open occupies your mind while you are bathing. It would be very embarrassing if Rolan entered at the wrong time.'
  262. if rand(0,3) = 0:
  263. act 'Sing in the shower':
  264. cla
  265. *clr
  266. minut += 1
  267. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathsing1.jpg"></center>'
  268. *nl
  269. 'The warm water feels amazing against you. You forget for a moment that Rolan could enter the bathroom at any moment. The shower is so relaxing that you begin to sing under the water, imagining that you''re a famous rockstar performing for your thousands of fans.'
  270. pcs_mood += 10
  271. pcs_willpwr += 10
  272. act 'Dry off': gt 'rolanbath','dryOff'
  273. end
  274. elseif rand(0,3) = 1:
  275. act 'Uh..? Is someone there?':
  276. cla
  277. *clr
  278. minut += 1
  279. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathpeek.jpg"></center>'
  280. *nl
  281. 'As the jet of warm water begins to caress you, you hear a noise. You call out, "Rolan, is that you?" You don''t hear a response. "Bah! Probably just me being paranoid."'
  282. gs 'cum_cleanup'
  283. !! gs 'panties', 'linen'
  284. if $pantyworntype ! 'none' and rolan_steal_day ! daystart:
  285. gs 'panties', 'dispose'
  286. rolan_panty_day = daystart
  287. rolan_panty_count -= 1
  288. if rolanpantyQW < 1: rolanpantyQW = 1
  289. end
  290. !! gs 'panties', 'remove'
  291. act 'Finish showering':
  292. cla
  293. *clr
  294. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathcold.jpg"></center>'
  295. *nl
  296. 'The water is suddenly ice cold, "Ahhh! I must have used up all the hot water!"'
  297. act 'Dry yourself':
  298. cla
  299. *clr
  300. minut += 5
  301. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathtowel1.jpg"></center>'
  302. *nl
  303. 'You wrap yourself with a towel before exiting the shower, just to be cautious.'
  304. act'Quick dressing': gt 'rolanbath','dryOff'
  305. end
  306. end
  307. end
  308. elseif rand(0,3) = 2:
  309. act 'Uh..? Is someone there?':
  310. cla
  311. *clr
  312. minut += 1
  313. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathaware'+rand(3,5)+'.jpg"></center>'
  314. *nl
  315. 'You think you hear a noise. "Rolan, is that you?"'
  316. act 'What the f...?':
  317. cla
  318. *clr
  319. minut += 10
  320. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathwhat.jpg"></center>'
  321. *nl
  322. 'Shit, Rolan is in here... masturbating!?'
  323. act 'look':
  324. cla
  325. *clr
  326. minut += 2
  327. '<center><video src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanmazt1.mp4"></center>'
  328. 'Wait... he''s not masturbating... What the fuck is he doing? You can''t believe what are you seeing.'
  329. act 'Close curtain (0:05)':
  330. cla
  331. *clr
  332. minut += 5
  333. dynamic $showerdin
  334. pcs_horny += rand(0,2)
  335. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathhide0.jpg"></center>'
  336. *nl
  337. 'You think to yourself, "<i>Better let him finish, don''t want him seeing me naked...</i>"'
  338. act 'wait': gt 'rolanbath','dryOff'
  339. end
  340. end
  341. end
  342. end
  343. else
  344. act 'Clean yourself':
  345. cla
  346. *clr
  347. minut += 10
  348. '<center><video src="images/locations/pavlovsk/resident/apartment/aptrolan/bathtub28.mp4"></center>'
  349. *nl
  350. 'No, Rolan is a good guy, he wouldn''t come into the bathroom while you''re showering.'
  351. act 'Rolanbathdryoff': gt 'rolanbath','dryOff'
  352. end
  353. end
  354. else
  355. if pcs_horny >= 40:
  356. act 'Refief':
  357. cla
  358. *clr
  359. minut += 10
  360. '<center><video src="images/shared/home/bathroom/wash7.mp4"></center>'
  361. *nl
  362. 'You know Rolan isn''t here.'
  363. *nl
  364. 'You turn on the faucet, lift your legs and scoot your ass over to align your pussy with the jet of warm water.'
  365. gs 'arousal', 'masturbate', 10
  366. act 'Rolanbathdryoff': gt $loc, 'start'
  367. end
  368. else
  369. act 'Wash':
  370. cla
  371. *clr
  372. minut += 10
  373. '<center><video src="images/locations/pavlovsk/resident/apartment/aptrolan/bathtub28.mp4"></center>'
  374. *nl
  375. 'You know Rolan isn''t here.'
  376. *nl
  377. 'He wouldn''t come into the bathroom knowing you were in here.'
  378. act 'Rolanbathdryoff': gt $loc, 'start'
  379. end
  380. end
  381. end
  382. dynamic $preshave
  383. !! dynamic $dryOff
  384. end
  385. if pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG + pirsGL > 0:'<a href="exec:dynamic $pirManage">Manage Piercings.</a>'
  386. if fillimplant = 1 and siliconeBag >= 1:'<a href="exec:cls & siliconeBag -= 1 & silicone += 10 & gt $loc, $metka">Inject silicone into breast implants.</a>'
  387. if fillimplant = 1 and silicone >= 20:'<a href="exec:cls & silicone -= 10 & gt $loc, $metka">Drain silicone from breast implants.</a>'
  388. dynamic $bteeth
  389. dynamic $tampon
  390. dynamic $basin
  391. if (cumloc[6] = 1 or cumloc[7] = 1):
  392. act 'Clean semen stains from your clothing (0:15)':
  393. *clr & cla
  394. cumspclnt = 6
  395. gs 'cum_cleanup'
  396. minut = minut + 15
  397. gs 'stat'
  398. '<center><img <<$set_imgh>> src="images/shared/sex/cum/frotsp.jpg"></center>'
  399. 'You take fifteen minutes to thoroughly rinse the semen stains out of your clothes. By the time you''re done, all the evidence that remains of them are some quickly drying damp spots.'
  400. act 'Finish': gt 'rolanbath', 'start'
  401. end
  402. end
  403. if klisma = 1 and (klismaday ! daystart or arrpos('sparrloc', 3) ! -1):
  404. act 'Give yourself an enema (0:05)':
  405. *clr & cla
  406. cumspclnt = 7
  407. gs 'cum_cleanup'
  408. minut += 5
  409. klismaday = daystart
  410. klismaday1= 1
  411. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/klisma.jpg"></center>'
  412. 'You give yourself an enema, feeling clean down there. Your ass is now ready for anal sex without any awkward surprises.'
  413. act 'Finish':gt 'rolanbath', 'start'
  414. end
  415. end
  416. if analplug = 1 and analplugin = 1:
  417. act 'Take out your butt plug (0:05)':
  418. *clr & cla
  419. minut += 5
  420. analplugIN = 0
  421. if pcs_ass < 30:pcs_ass += 1
  422. '<center><img <<$set_imgh>> src="images/pc/body/analplug.jpg"></center>'
  423. 'You squat and tug gently at the butt plug, gasping as you push it out of you. You can''t help but feel a bit empty, now that it''s out.'
  424. act 'Finish':gt 'rolanbath', 'start'
  425. end
  426. elseif analplug = 1 and analplugin = 0 and klismaday = daystart:
  427. act 'Wear your butt plug (0:05)':
  428. *clr & cla
  429. minut += 5
  430. analplugIN = 1
  431. if pcs_ass < 10:pcs_ass = pcs_ass + 5
  432. if pcs_ass >= 10 and pcs_ass < 20:pcs_ass += rand(1, 2)
  433. if pcs_ass >= 20 and pcs_ass < 30:pcs_ass += rand(0, 1)
  434. '<center><img <<$set_imgh>> src="images/pc/body/analplug.jpg"></center>'
  435. if butpluguse > 0:'You squat and gently rub the butt plug against your anus, after lubricating it with a bit of saliva. After a short while, you''ve relaxed enough to be able to push it in. Once it''s in you give it a few gentle tugs, wondering if anyone will catch you wearing it today.'
  436. if butpluguse = 0:butpluguse = 1 & '"If I''m not going to use it, then why did I buy it?" you ask yourself. You look at the butt plug for a while, thinking "It is necessary to start developing my ass, so I could have great adventures someday... you could even say huge and thick adventures with crimson heads, uh, now I got carried away..." You''re slightly embarrassed at the thought for a second, but are then overcome by your horny fantasies. Determined to get the plug all the way in, you slowly press it against your asshole after lubricating it with a bit of saliva. It hurts a bit at first, but once the thickest part is in the rest follows rather easily. Patting yourself on your ass once it''s in, you wonder if anyone will notice you''re wearing it today and then immediately feel naughty for even having thought that.'
  437. act 'Finish':gt 'rolanbath', 'start'
  438. end
  439. end
  440. if pregtest > 0 and (abortionbirthdate = 0 or daystart - abortionbirthdate > 100):
  441. act 'Do a pregnancy test':
  442. cla
  443. pregtest -= 1
  444. gs 'stat'
  445. if pregchem > 120:
  446. knowpreg = 1
  447. thinkpreg = 1
  448. 'The test shows the two strips: you''re pregnant!'
  449. else
  450. knowpreg = 0
  451. 'The test shows one band: you''re not pregnant.'
  452. end
  453. act 'Finish':gt 'rolanbath', 'start'
  454. end
  455. end
  456. if vibrator = 1 and vibratorIN = 1:
  457. act 'Remove the vibrator (0:05)':
  458. *clr & cla
  459. minut += 5
  460. vibratorIN = 0
  461. if pcs_vag < 30:pcs_vag += 1
  462. '<center><img <<$set_imgh>> src="images/shared/accessories/toys/vibrator.jpg"></center>'
  463. 'You spread your legs and take the vibrator out of your pussy, letting out a slight moan as you do so. You feel somewhat empty now.'
  464. act 'Finish':gt 'rolanbath', 'start'
  465. end
  466. elseif vibrator = 1 and vibratorIN = 0 and pcs_vag > 0:
  467. act 'Insert the vibrator in your vagina (0:05)':
  468. *clr & cla
  469. minut += 5
  470. vibratorIN = 1
  471. if pcs_vag < 30:pcs_vag += 2
  472. '<center><img <<$set_imgh>> src="images/shared/accessories/toys/vibrator.jpg"></center>'
  473. 'You spread your legs and slowly insert the vibrator in your pussy, wondering if anyone will notice you wearing it today.'
  474. act 'Finish':gt 'rolanbath', 'start'
  475. end
  476. end
  477. end
  478. !Bathroom, Rolan caught:
  479. if $ARGS[0] = 'sexev':
  480. if RAND(0,100) < 50:
  481. *clr & cla
  482. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/caught0.jpg"></center>'
  483. '...oops... better leave him be.'
  484. gs 'arousal', 'voyeur', 5
  485. gs 'arousal', 'end'
  486. gs 'stat'
  487. act 'Leave him alone': gt 'rolanapt','hallway'
  488. else
  489. *clr & cla
  490. '<center><video src="images/locations/pavlovsk/resident/apartment/aptrolan/caught1.mp4"></center>'
  491. '...it''s difficult to turn away, but you know you should leave him be.'
  492. gs 'arousal', 'voyeur', 5
  493. gs 'arousal', 'end'
  494. gs 'stat'
  495. act 'Leave him alone': gt 'rolanapt','hallway'
  496. end
  497. end
  498. !Bathroom, Rolan busy:
  499. if $ARGS[0] = 'ev':
  500. if RAND(0,100) <= 90:
  501. *clr & cla
  502. minut += 2
  503. gs 'stat'
  504. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanselfcare'+rand(1,3)+'.jpg"></center>'
  505. '"Miss <<$pcs_lastname>>, is there something you want to talk about?"'
  506. act 'Chat with Rolan': gt 'rolanbath', 'bazar'
  507. act 'Return to the hallway': gt 'rolanapt','hallway'
  508. else
  509. *clr & cla
  510. minut += 2
  511. gs 'stat'
  512. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbusy'+rand(0,2)+'.jpg"></center>'
  513. 'When you go to the bathroom, you find Rolan already in there. "Hey!" he shouts indignantly. Oops, he''s on the toilet!'
  514. '"Sorry, sorry!" you apologize, quickly leaving the bathroom.'
  515. act 'Return to the hallway': gt 'rolanapt','hallway'
  516. end
  517. end
  518. if $ARGS[0] = 'bazar':
  519. minut += 2
  520. gs 'stat'
  521. if rolan_bazar_count = 0:
  522. *clr & cla
  523. gs 'stat'
  524. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanselfcare0.jpg"></center>'
  525. '"Sorry Miss <<$pcs_lastname>>, I have to go. Maybe we can chat some more later?"'
  526. act 'Return to the hallway': gt 'rolanapt','hallway'
  527. else
  528. *clr & cla
  529. gs 'stat'
  530. rolan_bazar_day = daystart
  531. rolan_bazar_count -= 1
  532. sh_rolan_bazar += 1
  533. minut += 5
  534. rolan_textb_vanna = RAND(1,8)
  535. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/bathroom.jpg"></center>'
  536. if rolan_textb_vanna = 1:$rolan_textb_vanna = 'Rolan tells you that he doesn''t mind if you take a shower here.'
  537. if rolan_textb_vanna = 2:$rolan_textb_vanna = 'Rolan tells you that he see often sees some of your classmates buying clothes at G&M Stores, though he doesn''t know how it''s possible for young girls to have so much money.'
  538. if rolan_textb_vanna = 3:$rolan_textb_vanna = 'Rolan tells you that he wants to run for mayor and end the discrimination he sees in Pavlovsk.'
  539. if rolan_textb_vanna = 4:$rolan_textb_vanna = 'Rolan tells you that the day before Ms. Sokoloff stopped to chat with him as he was coming back from the supermarket.'
  540. if rolan_textb_vanna = 5:$rolan_textb_vanna = 'Rolan tells you that he saw two of your classmates arguing outside.'
  541. if rolan_textb_vanna = 6:$rolan_textb_vanna = 'Rolan tells you that the courtyard is dangerous at night.'
  542. if rolan_textb_vanna = 7:$rolan_textb_kuh = 'Rolan tells you he saw two girls walking in the park, hand in hand, like they were in love. He wonders what is wrong with people these days. Girls need a man after all.'
  543. if rolan_textb_vanna = 8:$rolan_textb_kuh = 'Rolan tells you he saw Anushka and Alyona kissing on the playground, in the apartment courtyard. He thinks it is very unbecoming of them, they should be with men.'
  544. '<br><<$rolan_imgb_vanna>><br>'
  545. '<br><<$rolan_textb_vanna>><br>'
  546. '"Sure Miss <<$pcs_lastname>>, tell me!"'
  547. ! RolanLoc[hour] = 7
  548. act 'Chat some more': gt 'rolanbath', 'bazar'
  549. if sh_rolan_bazar > 5 and mesec <=0:
  550. *clr & cla
  551. gs 'stat'
  552. '<br><<$rolan_imgb_vanna>><br>'
  553. '<br><<$rolan_textb_vanna>><br>'
  554. act 'Chat some more': gt 'rolanbath', 'bazar'
  555. act 'Ask to take a shower': gt 'rolanbath', 'pervshower'
  556. end
  557. if sh_rolan_bazar >= 25 and npc_rel['A133'] >= 50 and rolan_bazar_count >= 1 and pcs_vag >=1:
  558. *clr & cla
  559. gs 'stat'
  560. '<br><<$rolan_imgb_vanna>><br>'
  561. '<br><<$rolan_textb_vanna>><br>'
  562. act 'Chat some more': gt 'rolanbath', 'bazar'
  563. act 'Ask to take a shower': gt 'rolanbath', 'pervshower'
  564. act 'Suggest bathing together': gt 'rolanbath', 'bonershower'
  565. end
  566. end
  567. act 'Return to the hallway': gt 'rolanapt','hallway'
  568. end
  569. !gg and take a bath when Rolan in bath
  570. if $ARGS[0] = 'pervshower':
  571. *clr & cla
  572. gs 'stat'
  573. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanselfcare0.jpg"></center>'
  574. '"Sure Miss <<$pcs_lastname>>, tell me!"'
  575. act 'Take a shower (0:15)':
  576. cla
  577. *clr
  578. minut += 15
  579. dynamic $showerdin
  580. if frost > 0:frost = 0
  581. '<center><img src="images/shared/home/bathroom/wash3.jpg"></center>'
  582. *nl
  583. 'You carefully undress behind the curtain and turn on the water. When it hits the right temperature you enter the shower and let the warm water rain down on you. You carefully soap yourself trying not to miss any spot and then wash off.'
  584. *nl
  585. dynamic $brit
  586. 'You try to forget that Rolan''s is here.'
  587. 'The idea of him opening the curtain occupies your mind while you are showering. It would be really embarrassing if Rolan opened the curtain now.'
  588. if hypnoAddict > 0:'You have no reason to, but you carefully avoid cleaning out your pussy and ass.'
  589. if btwarn > 0:
  590. if btwarn = 1: $weightwarn = 'losing'
  591. if btwarn = 2: $weightwarn = 'gaining'
  592. '<font color="red"><b>You seem to be <<$weightwarn>> weight.</b></font>'
  593. killvar '$weightwarn' & btwarn = 0
  594. end
  595. if normbuffpick = 1:
  596. *nl
  597. '<b>You notice that your muscles are starting to show through your skin.</b>'
  598. act 'Examine yourself closer while drying off and getting dressed...': gt 'din_van', 'buffpick'
  599. end
  600. if pcs_horny >= 40:
  601. act 'Use the shower head on your pussy':
  602. cla
  603. *clr
  604. minut += 10
  605. '<center><video src="images/shared/home/bathroom/wash2.mp4"></center>'
  606. *nl
  607. 'You place the shower head onto your pussy and a powerful jet of warm water begins to caress you.'
  608. gs 'arousal', 'masturbate', 10
  609. if hypnoAddict ! 0:
  610. 'You unconsciously avoid spraying water into your vagina.'
  611. else
  612. cumspclnt = 8
  613. gs 'cum_cleanup'
  614. end
  615. act 'Rolanbathdryoff': gt 'rolanbath','dryOff'
  616. end
  617. act 'Continue washing':
  618. cla
  619. *clr
  620. minut += 10
  621. '<center><video src="images/shared/home/bathroom/dush.mp4"></center>'
  622. *nl
  623. 'No, Rolan is a good guy, he wouldn''t peek on you while you''re showering.'
  624. if hypnoAddict ! 0:
  625. 'You unconsciously avoid spraying water into your vagina.'
  626. else
  627. cumspclnt = 8
  628. gs 'cum_cleanup'
  629. end
  630. act 'Rolanbathdryoff': gt 'rolanbath','dryOff'
  631. end
  632. else
  633. if rand(0,3) =< 2:
  634. act 'Sing in the shower':
  635. cla
  636. *clr
  637. minut += 1
  638. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathsing'+rand(0,1)+'.jpg"></center>'
  639. *nl
  640. 'The warm water feels amazing against you. As you relax you begin to sing under the water completely forgetting that Rolan is there and can hear you. You imagine that you''re a famous rockstar performing for your thousands of fans.'
  641. pcs_mood += 10
  642. pcs_willpwr += 10
  643. if hypnoAddict ! 0:
  644. 'You unconsciously avoid spraying water into your vagina.'
  645. else
  646. cumspclnt = 8
  647. gs 'cum_cleanup'
  648. end
  649. act 'Dry off': gt 'rolanbath','dryOff'
  650. end
  651. else
  652. act 'Clean yourself':
  653. cla
  654. *clr
  655. minut += 10
  656. '<center><video src="images/shared/home/bathroom/dush.mp4"></center>'
  657. *nl
  658. 'No, Rolan is a good guy, he wouldn''t peek on you while you''re showering.'
  659. if hypnoAddict ! 0:
  660. 'You unconsciously avoid spraying water into your vagina.'
  661. else
  662. cumspclnt = 8
  663. gs 'cum_cleanup'
  664. end
  665. act 'Rolanbathdryoff': gt 'rolanbath','dryOff'
  666. end
  667. end
  668. end
  669. dynamic $preshave
  670. end
  671. end
  672. !gg take a bath with Rolan
  673. if $ARGS[0] = 'bonershower':
  674. *clr & cla
  675. minut += 5
  676. if shampoo > 0: shampoo -= 1
  677. dynamic $showerdin
  678. if frost > 0:frost = 0
  679. gs 'stat'
  680. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanboner1.jpg"></center>'
  681. *nl
  682. '"Rolan, I see you''re getting ready to bathe. Do you mind if I join you?"'
  683. *nl
  684. '"Miss <<$pcs_lastname>>, w-w-what do you mean?"'
  685. *nl
  686. '"I mean, we could both save some time and water if we bathed together!"'
  687. *nl
  688. 'Rolan can only stutter and stammer.'
  689. act 'Bra':
  690. *clr & cla
  691. minut += 5
  692. gs 'stat'
  693. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanboner0.jpg"></center>'
  694. *nl
  695. 'You try to snap Rolan out of his stupor, "Come on, Rolan, we don''t have all day!"'
  696. *nl
  697. 'Rolan has quickly stripped out of his clothes, while you''ve only managed to get your shirt off.'
  698. *nl
  699. '"Here, help me with my bra..."'
  700. act 'Shoes':
  701. *clr & cla
  702. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanshoes.jpg"></center>'
  703. *nl
  704. 'You ask Rolan to help you remove your shoes.'
  705. *nl
  706. 'Rolan reaches down and starts to remove your shoes, his eyes darting between your feet and your panties.'
  707. *nl
  708. 'You wonder, "<i>Could Rolan have a foot fetish, in addition to his panties addiction?</i>"'
  709. pcs_horny += rand(2,4)
  710. minut += 5
  711. gs 'stat'
  712. act 'Bathe together':
  713. *clr & cla
  714. pcs_hairbsh = 0
  715. pcs_makeup = 1
  716. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanhair0.jpg"></center>'
  717. *nl
  718. '"Rolan, could you please wash my hair. It''s so nice not having to do it myself!"'
  719. *nl
  720. '"O-o-of course, Miss <<$pcs_lastname>>..."'
  721. pcs_horny += rand(3,6)
  722. gs 'stat'
  723. act 'Continue':
  724. *clr & cla
  725. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanboner3.jpg"></center>'
  726. *nl
  727. 'You stand up and help Rolan up too, you are ready to continue when you notice he has a hard on...'
  728. *nl
  729. '"I''m sorry, Miss <<$pcs_lastname>>... I shouldn''t...I haven''t...it''s jus-" '
  730. *nl
  731. 'You cut him off, "It''s alright, Rolan. It''s perfectly normal for a healthy man to get an erection when around a <i>beautiful</i> woman."'
  732. *nl
  733. 'You continue to start at his rock hard cock, "And you certainly are <i>healthy</i>."'
  734. pcs_horny += rand(3,6)
  735. gs 'stat'
  736. act 'Continue':
  737. *clr & cla
  738. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanhelp.jpg"></center>'
  739. *nl
  740. 'You continue to wash each other''s bodies, Rolan''s erection slowly subsiding. Whether he''s adjusted to bathing with you or he''s just nervous being on display, you''re not sure.'
  741. *nl
  742. '"Thank you, Rolan, we''re almost done!"'
  743. pcs_horny += rand(4,6)
  744. gs 'stat'
  745. act 'Continue':
  746. *clr & cla
  747. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolancheek.jpg"></center>'
  748. 'You give Rolan a peck on the cheek, "You see, wasn''t that quicker than a solo bath?"'
  749. 'Rolan does not respond. Instead he grabs a towel and quickly exits the bathroom. You wonder how worked up this bath got him. Maybe next time you''ll take it upon yourself to find out...'
  750. pcs_horny += rand(3,6)
  751. gs 'stat'
  752. act 'Finish': gt 'rolanapt','hallway'
  753. end
  754. end
  755. end
  756. end
  757. end
  758. end
  759. end
  760. !rolanbathdryloc
  761. if $ARGS[0] = 'dryOff':
  762. if RolanLoc[hour] = 0:
  763. cla
  764. *clr
  765. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathtowel'+rand(0,1)+'.jpg"></center>'
  766. *nl
  767. 'You know Rolan isn''t here.'
  768. act 'Get out and dry off': gt $loc, 'start'
  769. else
  770. if rand (0,3) = 3:
  771. cla
  772. *clr
  773. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbusy1.jpg"></center>'
  774. 'Shit! It''s Rolan! ...when did he enter?'
  775. act 'Close curtain (0:05)':
  776. cla
  777. *clr
  778. minut += 5
  779. dynamic $showerdin
  780. pcs_horny += rand(0,2)
  781. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathhide0.jpg"></center>'
  782. *nl
  783. 'It would be very embarrassing if Rolan sees you like this. You''d better wait until he''s done.'
  784. act 'wait': gt 'rolanbath','dryOff'
  785. end
  786. else
  787. cla
  788. *clr
  789. '<center><b><font color = maroon>Bathroom</font></b></center>'
  790. if newbath ! 1:
  791. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathroom.jpg"></center>'
  792. 'The bathroom has seen better days. There''s some mold in the corners and floor. A big crack in the wall. This place probably hasn''t been cleaned for quite some time. The toilet sits along the far wall. There''s also a bathtub, with an old plastic shower curtain hanging from a rod above it. It also seems that the latch on the door is broken.'
  793. elseif newbath = 1:
  794. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathroomnew.jpg"></center>'
  795. 'The bathroom is in much better shape since you worked on it.'
  796. end
  797. *nl
  798. 'Phew! Rolan isn''t here.'
  799. act 'Dry off and dress':
  800. if rolan_panty_count = 0 and rolan_panty_day = daystart and rolan_steal_count = 0:
  801. cla
  802. *clr
  803. minut += 1
  804. rolan_steal_count +=1
  805. rolan_steal_day = daystart
  806. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/headrol.jpg"></center>'
  807. if rolanpantyQW =< 1:
  808. rolanpantyQW += 1
  809. *nl
  810. '"Damn! Rolan really is a panty thief!"'
  811. else
  812. rolanpantyQW += 1
  813. *nl
  814. '"I knew it!"'
  815. end
  816. act 'Exit': gt $loc, 'start'
  817. else
  818. cla
  819. *clr
  820. minut += 1
  821. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanbathdry'+rand(0,1)+'.jpg"></center>'
  822. *nl
  823. 'Better hurry and dry off. You never know...'
  824. act 'exit': gt $loc, 'start'
  825. end
  826. end
  827. end
  828. end
  829. end
  830. if $ARGS[0] = 'tools':
  831. if workertool = 0:
  832. cla
  833. *clr
  834. minut += 15
  835. workertool += 1
  836. gs 'stat'
  837. '<center><h4><font color="maroon">Tools</font></h4></center>'
  838. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/garages.jpg"></center>'
  839. 'You quickly run to your stepfather''s garage to grab some tools. Rolan said he already has the paint so you won''t need to bring that. You start to rummaging in search of the tools.'
  840. 'You spend several minutes gathering the appropriate tools from your stepfather''s garage. However, you are unable to find any concrete mix. Perhaps Rolan has some back at the apartment.'
  841. act 'Back to Rolan''s':
  842. cla
  843. *clr
  844. minut += 10
  845. '<center><b><font color = maroon>Tools</font></b></center>'
  846. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathchat/builder/worker0.jpg"></center>'
  847. 'You search the apartment from top to bottom but don''t find any concrete mix. The only room left is...'
  848. act 'Only one room left...': gt 'rolanapt','grandmaroom'
  849. end
  850. end
  851. end
  852. if $ARGS[0] = 'surprise':
  853. cla
  854. *clr
  855. minut += 5
  856. rolanworker += 1
  857. gs 'stat'
  858. '<center><h4><font color="maroon">Surprise</font></h4></center>'
  859. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanwelcome.jpg"></center>'
  860. '"Hi, Rolan! What do you think of your new bathroom?"'
  861. *nl
  862. '"Miss <<$pcs_lastname>>... I-I am speechless..."'
  863. *nl
  864. '"Which part do you like best?"'
  865. act 'Continue':
  866. cla
  867. *clr
  868. minut += 1
  869. '<center><b><font color = maroon>Surprise</font></b></center>'
  870. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/bathroomnew.jpg"></center>'
  871. '"Miss <<$pcs_lastname>>, the lighting is better, the mold and the smell are gone. All I had done was buy some paint, how..."'
  872. *nl
  873. '"Yes, I did use some of the paint, but there''s still left if you need to do any tounching up."'
  874. *nl
  875. '"I really don''t know what to say."'
  876. act 'Continue':
  877. cla
  878. *clr
  879. minut += 1
  880. '<center><b><font color = maroon>Surprise</font></b></center>'
  881. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanheadbath0.jpg"></center>'
  882. '"This must have cost you a lot of money, Miss <<$pcs_lastname>>. I don''t have much but I have to repay y-"'
  883. *nl
  884. 'You interrupt him, "No, Rolan, I didn''t do this for the money. It didn''t cost me anything, actually."'
  885. *nl
  886. '"Did you do all this work by yourself?"'
  887. *nl
  888. '"Yes, well, I borrowed all the tools I used from my stepfather."'
  889. act 'Continue':
  890. cla
  891. *clr
  892. minut += 1
  893. rolanknow = 1
  894. RolanLoc[hour] = 6
  895. '<center><b><font color = maroon>Surprise</font></b></center>'
  896. '<center><img src="images/locations/pavlovsk/resident/apartment/aptrolan/rolanheadbath1.jpg"></center>'
  897. '"Ah I see, your stepfather. That would make sense. He seems like a man who take cares of his property. But did he have the concrete, as well? I didn''t have time to get any. But you fixed that crack in the wall?"'
  898. *nl
  899. '"No, I didn''t get the concrete from my stepfather," You raise an eyebrow, "I found that container of concrete powder in that one bedroom you actually keep clean."'
  900. *nl
  901. 'Without saying another word, Rolan runs out of the room...'
  902. act 'follow Rolan': gt 'rolanapt','hallway'
  903. end
  904. end
  905. end
  906. end
  907. --- rolanbath ---------------------------------