1
0

selfplay.qsrc 42 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094
  1. # selfplay
  2. $d_self_ass_fingering = {
  3. }
  4. if $ARGS[0] = 'start':
  5. if mastrOnce = 0:
  6. stat['mast'] += 1
  7. mastrOnce = 1
  8. org_temp = orgasm
  9. if pcs_inhib < 30:inhib_exp += rand(1,3)
  10. end
  11. if org_temp < orgasm:
  12. act 'Finish': gt 'selfplay', 'stop'
  13. exit
  14. end
  15. gs 'stat'
  16. if $loc = 'bedrPar' or $loc = 'gadsarai':'<center><img <<$set_imgh>> src="images/shared/sex/mast/start.jpg"></center>'
  17. if $loc = 'vanrPar':'<center><video autoplay loop src="images/shared/sex/mast/startvann.mp4"></video></center>'
  18. if sisboytrio > 0 and sis_watch = 0 and $loc = 'bedrPar':
  19. sis_watch = 1
  20. if sisterHere > 0:sis_watch = 2 & 'Anya smiles and lets you carry on.'
  21. end
  22. !!then the calculation invasion
  23. if $loc = 'vanrPar':
  24. if selfplaytime >= 60:
  25. end
  26. end
  27. gs 'selfplay', 'sis_prov'
  28. ! This keeps resetting your dildo choices and makes it impossible to masturbate with them. Sicaa
  29. !if dildo + middildo + largedildo + bigdildo + extradildo + superdildo + maddildo ! 0:
  30. ! dildonumber = 0
  31. !end
  32. if dildonumber > 0: gs 'boyStat', 'D<<dildonumber>>' & dildohand = (dildonumber + 1) * 5
  33. gs 'selfplay', 'dildo_options'
  34. if pcs_horny > 0:
  35. act 'Caress your clitoris':
  36. cls
  37. selfplaytime += 5
  38. gs 'selfplay', 'sis_prov'
  39. !!if $loc = 'bedrPar':'<center><video autoplay loop src="images/shared/sex/mast/klit.mp4"></video></center>'
  40. if $loc = 'vanrPar':
  41. '<center><img <<$set_imgh>> src="images/shared/sex/mast/klitvann.jpg"></center>'
  42. else
  43. '<center><video autoplay loop src="images/shared/sex/mast/klit.mp4"></video></center>'
  44. end
  45. if pcs_mood >= 20:
  46. pcs_horny += rand(5, 10)
  47. 'You put your hand down between your legs and gently rub your fingers over your groin. Running your fingers between your pussy lips, you scout out your clitoris and lightly run your finger over it repeatedly. The feeling you get out of this is great, and you feel a pleasant warmth spreading in your lower area.'
  48. else
  49. pcs_horny += rand(0, 1)
  50. 'You caress your clit with your fingers. It feels nice, but you''re in such a bad mood that you''re too distracted to really enjoy it.'
  51. end
  52. $orgasm_txt = 'Suddenly, you rub your clit just right and your whole body starts to shiver in orgasm. The intensity of the orgasm nearly makes you scream, but you bite down on your lip and do your best to stifle down the moans so no one hears you.'
  53. gs 'arousal', 'masturbate', 20
  54. minut -= 15
  55. gs 'stat'
  56. '<<$AnyaMsg>>'
  57. act 'Stop touching yourself':gt 'selfplay', 'stop'
  58. if org_temp = orgasm:gs 'selfplay', 'fingering'
  59. end
  60. end
  61. if pcs_horny > 0 and agape < 3:
  62. act 'Put a finger in your ass':
  63. cls
  64. selfplaytime += 5
  65. gs 'selfplay', 'sis_prov'
  66. !!if $loc = 'bedrPar':'<center><video autoplay loop src="images/shared/sex/mast/klit.mp4"></video></center>'
  67. !!if $loc = 'vanrPar':'<center><img <<$set_imgh>> src="images/shared/sex/mast/klitvann.jpg"></center>'
  68. '<center><img <<$set_imgh>> src="images/shared/sex/mast/1.jpg"></center>'
  69. gs 'arousal', 'masturbate', 5
  70. gs 'stat'
  71. if pcs_ass >= 5:
  72. 'You press a finger against your asshole and push it in. It slides in quite easily.'
  73. else
  74. pcs_ass += 1
  75. 'You press a finger against your tight asshole and push it in. Your anus is squeezing your finger tightly.'
  76. end
  77. if $loc = 'vanrPar' and selfplaytime >= 60:gs 'selfplay', 'van_vtor'
  78. gs 'stat'
  79. '<<$AnyaMsg>>'
  80. act 'Stop touching yourself':gt $loc, $loc_arg
  81. if org_temp = orgasm:
  82. act 'Add a second finger':
  83. cls
  84. selfplaytime += 5
  85. gs 'selfplay', 'sis_prov'
  86. '<center><img <<$set_imgh>> src="images/shared/sex/mast/2.jpg"></center>'
  87. gs 'arousal', 'masturbate', 5
  88. gs 'stat'
  89. if pcs_ass >= 10:
  90. 'You relax and squeeze a second finger in, alongside the first. It slides in fairly easily.'
  91. if agape > 0:
  92. if agape = 2:agape = 3
  93. if agape = 1:agape = 2
  94. pcs_horny -= 50
  95. if pcs_ass > 1:pcs_ass -= 1
  96. 'Pushing a second finger into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  97. end
  98. elseif pcs_ass >= 5 and pcs_ass < 10:
  99. analplay += 1
  100. 'You slide a second finger into your asshole. You can feel your anus squeezing your fingers tightly.'
  101. if agape > 0:
  102. if agape = 2:agape = 3
  103. if agape = 1:agape = 2
  104. pcs_horny -= 50
  105. pcs_ass += 1
  106. 'Pushing a second finger into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  107. end
  108. else
  109. pcs_ass += 1
  110. if agape = 2:agape = 3
  111. if agape = 1:agape = 2
  112. if agape = 0:agape = 1
  113. pcs_horny -= 50
  114. 'When you slide in the second finger, you feel a sharp pain in your anus. You may have tried too much, too fast.'
  115. end
  116. gs 'stat'
  117. '<<$AnyaMsg>>'
  118. act 'Stop touching yourself':gt 'selfplay', 'stop'
  119. if $loc = 'vanrPar' and selfplaytime >= 60:gs 'selfplay', 'van_vtor'
  120. if org_temp = orgasm and agape < 3:
  121. act 'Thrust three fingers in':
  122. cls
  123. selfplaytime += 5
  124. gs 'selfplay', 'sis_prov'
  125. '<center><img <<$set_imgh>> src="images/shared/sex/mast/3.jpg"></center>'
  126. gs 'arousal', 'masturbate', 5
  127. gs 'stat'
  128. if pcs_ass >= 15:
  129. 'Your asshole is fairly loose, and you manage to slide three fingers in without much effort.'
  130. if agape > 0:
  131. if agape = 2:agape = 3
  132. if agape = 1:agape = 2
  133. pcs_horny -= 50
  134. if pcs_ass > 1:pcs_ass += 1
  135. 'Pushing three fingers into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  136. end
  137. elseif pcs_ass >= 10 and pcs_ass < 15:
  138. analplay += 1
  139. 'You slide three fingers into your asshole. You can feel your anus squeezing your fingers tightly.'
  140. if agape > 0:
  141. if agape = 2:agape = 3
  142. if agape = 1:agape = 2
  143. pcs_horny -= 50
  144. pcs_ass += 1
  145. 'Pushing three fingers into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  146. end
  147. else
  148. pcs_ass += 1
  149. if agape = 2:agape = 3
  150. if agape = 1:agape = 2
  151. if agape = 0:agape = 1
  152. pcs_horny -= 50
  153. 'When you slide in three fingers, you feel a sharp pain in your anus. You may have tried too much, too fast.'
  154. end
  155. if $loc = 'vanrPar' and selfplaytime >= 60:gs 'selfplay', 'van_vtor'
  156. gs 'stat'
  157. '<<$AnyaMsg>>'
  158. act 'Stop touching yourself':gt 'selfplay', 'stop'
  159. if org_temp = orgasm and agape < 3:
  160. act 'Push four fingers into your asshole':
  161. cls
  162. selfplaytime += 5
  163. gs 'selfplay', 'sis_prov'
  164. '<center><img <<$set_imgh>> src="images/shared/sex/mast/4.jpg"></center>'
  165. gs 'arousal', 'masturbate', 5
  166. gs 'stat'
  167. if pcs_ass >= 20:
  168. 'Your asshole is very loose, and you manage to push four fingers into it.'
  169. if agape > 0:
  170. if agape = 2:agape = 3
  171. if agape = 1:agape = 2
  172. pcs_horny -= 50
  173. if pcs_ass > 1:pcs_ass -= 1
  174. 'Pushing four fingers into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  175. end
  176. elseif pcs_ass >= 15 and pcs_ass < 20:
  177. analplay += 1
  178. 'You manage to push four fingers into your asshole. You can feel your anus squeezing your fingers tightly.'
  179. if agape > 0:
  180. if agape = 2:agape = 3
  181. if agape = 1:agape = 2
  182. pcs_horny -= 50
  183. pcs_ass += 1
  184. 'Pushing four fingers into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  185. end
  186. else
  187. pcs_ass += 1
  188. if agape = 2:agape = 3
  189. if agape = 1:agape = 2
  190. if agape = 0:agape = 1
  191. pcs_horny -= 50
  192. 'When you slide in four fingers, you feel a sharp pain in your anus. You may have tried too much, too fast.'
  193. end
  194. if $loc = 'vanrPar' and selfplaytime >= 60:gs 'selfplay', 'van_vtor'
  195. gs 'stat'
  196. '<<$AnyaMsg>>'
  197. act 'Stop touching yourself':gt 'selfplay', 'stop'
  198. if org_temp = orgasm and agape < 3:
  199. act 'Put your whole hand in':
  200. cls
  201. SelfFisting += 1
  202. selfplaytime += 5
  203. gs 'selfplay', 'sis_prov'
  204. '<center><img <<$set_imgh>> src="images/shared/sex/mast/5.jpg"></center>'
  205. gs 'arousal', 'masturbate', 5
  206. gs 'stat'
  207. if pcs_ass >= 25:
  208. 'Slowly but surely, you manage to get your entire hand into your ass.'
  209. if agape > 0:
  210. if agape = 2:agape = 3
  211. if agape = 1:agape = 2
  212. pcs_horny -= 50
  213. if pcs_ass > 1:pcs_ass -= 1
  214. 'Pushing your whole hand into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  215. end
  216. elseif pcs_ass >= 20 and pcs_ass < 25:
  217. analplay += 1
  218. 'It takes a lot of effort, but over the course of several minutes you manage to work your whole hand into your ass. You feel your anus squeeze your wrist tightly.'
  219. if agape > 0:
  220. if agape = 2:agape = 3
  221. if agape = 1:agape = 2
  222. pcs_horny -= 50
  223. pcs_ass += 1
  224. 'Pushing your whole hand into your already sore asshole was a bad idea. It hurts a lot and you feel like you damaged it further.'
  225. end
  226. else
  227. pcs_ass += 1
  228. if agape = 2:agape = 3
  229. if agape = 1:agape = 2
  230. if agape = 0:agape = 1
  231. pcs_horny -= 50
  232. 'When you push your hand into your asshole, you feel a sharp pain in your anus. You may have tried too much, too fast.'
  233. end
  234. act 'Stop touching yourself':gt 'selfplay', 'stop'
  235. if $loc = 'vanrPar' and selfplaytime >= 60:gs 'selfplay', 'van_vtor'
  236. gs 'stat'
  237. '<<$AnyaMsg>>'
  238. end
  239. end
  240. end
  241. end
  242. end
  243. end
  244. end
  245. end
  246. end
  247. end
  248. if pcs_horny > 10:
  249. if dildo >= 1 or middildo = 1 or largedildo = 1 or bigdildo = 1 or extradildo = 1 or superdildo = 1 or maddildo = 1:
  250. if dildonumber > 0:
  251. gs 'boyStat', 'D<<dildonumber>>'
  252. if vgape <= 0:
  253. act 'Use the dildo on your pussy':
  254. if pcs_vag = 0 and dick >= 20:
  255. 'Are you sure? Doing so will most likely break your hymen.'
  256. act 'Yes, do it':
  257. cls
  258. selfplaytime += 15
  259. gs 'selfplay', 'sis_prov'
  260. if husband > 0 and housrA = 1 and husbandrink ! 10 and $loc = 'bedr': gt 'husbsex','husb_mastr_vtor'
  261. !!if $loc = 'bedrPar':'<center><img <<$set_imgh>> src="images/shared/sex/mast/dildo.jpg"></center>'
  262. if $loc = 'vanrPar':
  263. '<center><img <<$set_imgh>> src="images/shared/sex/mast/dildovann.jpg"></center>'
  264. else
  265. '<center><img <<$set_imgh>> src="images/shared/sex/mast/dildo.jpg"></center>'
  266. end
  267. gs 'dinsex2', 'd_vag_sex_dildo', 15
  268. gs 'stat'
  269. '<<$AnyaMsg>>'
  270. act 'Stop using the dildo':gt 'selfplay', 'start'
  271. end
  272. act 'On second thoughts, no': gt 'selfplay', 'start'
  273. else
  274. cls
  275. selfplaytime += 15
  276. gs 'selfplay', 'sis_prov'
  277. if husband > 0 and housrA = 1 and husbandrink ! 10 and $loc = 'bedr': gt 'husbsex','husb_mastr_vtor'
  278. !!if $loc = 'bedrPar':'<center><img <<$set_imgh>> src="images/shared/sex/mast/dildo.jpg"></center>'
  279. if $loc = 'vanrPar':
  280. '<center><img <<$set_imgh>> src="images/shared/sex/mast/dildovann.jpg"></center>'
  281. else
  282. '<center><img <<$set_imgh>> src="images/shared/sex/mast/dildo.jpg"></center>'
  283. end
  284. gs 'dinsex2', 'd_vag_sex_dildo', 15
  285. gs 'stat'
  286. '<<$AnyaMsg>>'
  287. act 'Stop using the dildo':gt 'selfplay', 'start'
  288. end
  289. end
  290. end
  291. if agape <= 0:
  292. act 'Use the dildo on your ass':
  293. cls
  294. selfplaytime += 15
  295. gs 'selfplay', 'sis_prov'
  296. !!if $loc = 'bedrPar':'<center><img <<$set_imgh>> src="images/shared/sex/mast/dildoanal.jpg"></center>'
  297. if $loc = 'vanrPar':
  298. '<center><img <<$set_imgh>> src="images/shared/sex/mast/dildovann.jpg"></center>'
  299. else
  300. '<center><img <<$set_imgh>> src="images/shared/sex/mast/dildoanal.jpg"></center>'
  301. end
  302. gs 'dinsex2', 'd_analsex_dildo',15
  303. gs 'stat'
  304. '<<$AnyaMsg>>'
  305. act 'Stop using the dildo':gt 'selfplay', 'start'
  306. end
  307. end
  308. end
  309. end
  310. end
  311. if pcs_horny > 0:gs 'selfplay', 'fingering'
  312. act 'Stop masturbating': gt 'selfplay', 'stop'
  313. if $loc = 'vanrPar' and selfplaytime >= 60:gs 'selfplay', 'van_vtor'
  314. if $loc = 'gadsarai':
  315. npc_horny['A66'] += 1
  316. 'Bandit the dog is watching you curiously.'
  317. end
  318. end
  319. if $ARGS[0] = 'dildo_options':
  320. if dildonumber ! 0: *pl & *pl 'You are using a <<dick>>cm long dildo.'
  321. *pl
  322. if dildo = 1:
  323. if dildonumber = 1:
  324. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 10cm long dildo.'
  325. else
  326. *pl '<a href="exec:dildonumber = 1 & gs ''boyStat'', ''D1'' & gt ''selfplay'', ''start''">Start</a> using the 10cm long dildo.'
  327. end
  328. end
  329. if middildo = 1:
  330. if dildonumber = 2:
  331. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 15cm long dildo.'
  332. else
  333. *pl '<a href="exec:dildonumber = 2 & gs ''boyStat'', ''D2'' & gt ''selfplay'', ''start''">Start</a> using the 15cm long dildo.'
  334. end
  335. end
  336. if largedildo = 1:
  337. if dildonumber = 3:
  338. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 20cm long dildo.'
  339. else
  340. *pl '<a href="exec:dildonumber = 3 & gs ''boyStat'', ''D3'' & gt ''selfplay'', ''start''">Start</a> using the 20cm long dildo.'
  341. end
  342. end
  343. if bigdildo = 1:
  344. if dildonumber = 4:
  345. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 25cm long dildo.'
  346. else
  347. *pl '<a href="exec:dildonumber = 4 & gs ''boyStat'', ''D4'' & gt ''selfplay'', ''start''">Start</a> using the 25cm long dildo.'
  348. end
  349. end
  350. if extradildo = 1:
  351. if dildonumber = 5:
  352. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 30cm long dildo.'
  353. else
  354. *pl '<a href="exec:dildonumber = 5 & gs ''boyStat'', ''D5'' & gt ''selfplay'', ''start''">Start</a> using the 30cm long dildo.'
  355. end
  356. end
  357. if superdildo = 1:
  358. if dildonumber = 6:
  359. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 35cm long dildo.'
  360. else
  361. *pl '<a href="exec:dildonumber = 6 & gs ''boyStat'', ''D6'' & gt ''selfplay'', ''start''">Start</a> using the 35cm long dildo.'
  362. end
  363. end
  364. if maddildo = 1:
  365. if dildonumber = 7:
  366. *pl '<a href="exec:dildonumber = 0 & gt ''selfplay'', ''start''">Stop</a> using the 40cm long dildo.'
  367. else
  368. *pl '<a href="exec:dildonumber = 7 & gs ''boyStat'', ''D7'' & gt ''selfplay'', ''start''">Start</a> using the 40cm long dildo.'
  369. end
  370. end
  371. end
  372. !! Bathroom Dildo Info
  373. !! bathtub_suction_dildo - dildo that is applied on the low wall of a bathtub
  374. !! bath_shower_dildo - dildo that is applied onto the wall of a bathtub that also has a shower
  375. !! glass_shower_dildo - dildo applied to glass wall of a shower with no tub
  376. if $ARGS[0] = 'suction_dildo':
  377. *nl
  378. if dyneval('result = <<$loc>>_bathtub_dildo') ! 1 and suction_dildo > 0:
  379. 'You can stick your suction dildo to the <a href="exec:gs ''selfplay'',''bathtub_suction_dildo_apply'' & gt $loc, $loc_arg">bath tub</a> to play with.'
  380. elseif dyneval('result = <<$loc>>_bathtub_dildo') = 1:
  381. 'Your <a href="exec:gs ''selfplay'',''bath_suction_dildo''">suction dildo</a> is stuck to the bath tub.'
  382. end
  383. *nl
  384. if suction_dildo > 0 and (dyneval('result = <<$loc>>_bath_shower_dildo') ! 1 or dyneval('result = <<$loc>>_glass_shower_dildo') ! 1):
  385. 'You can also stick a suction dildo inside <a href="exec:gs ''selfplay'',''shower_suction_dildo_apply'' & gt $loc, $loc_arg">the shower</a>.'
  386. elseif dyneval('result = <<$loc>>_bath_shower_dildo') = 1 or dyneval('result = <<$loc>>_glass_shower_dildo') = 1:
  387. 'Your suction dildo is <a href="exec:gs ''selfplay'',''shower_suction_dildo''">inside the shower</a>.'
  388. end
  389. *nl
  390. end
  391. if $ARGS[0] = 'bathtub_suction_dildo_apply':
  392. dynamic('<<$loc>>_bathtub_dildo = 1')
  393. dynamic('<<$loc>>_suction_dildo += 1')
  394. suction_dildo -= 1
  395. end
  396. if $ARGS[0] = 'bathtub_suction_dildo_remove':
  397. dynamic('<<$loc>>_bathtub_dildo = 0')
  398. dynamic('<<$loc>>_suction_dildo -= 1')
  399. suction_dildo += 1
  400. end
  401. if $ARGS[0] = 'shower_suction_dildo_apply':
  402. dynamic('<<$loc>>_suction_dildo += 1')
  403. suction_dildo -= 1
  404. if $bathtype = 'bathtub shower':
  405. dynamic('<<$loc>>_bath_shower_dildo = 1')
  406. elseif $bathtype = 'glass shower' or $bathtype = 'glass shower and tub':
  407. dynamic('<<$loc>>_glass_shower_dildo = 1')
  408. end
  409. end
  410. if $ARGS[0] = 'shower_suction_dildo_remove':
  411. dynamic('<<$loc>>_suction_dildo -= 1')
  412. if $bathtype = 'bathtub shower':
  413. dynamic('<<$loc>>_bath_shower_dildo = 0')
  414. elseif $bathtype = 'glass shower' or $bathtype = 'glass shower and tub':
  415. dynamic('<<$loc>>_glass_shower_dildo = 0')
  416. end
  417. suction_dildo += 1
  418. end
  419. if $ARGS[0] = 'bathtub_dildo_check':
  420. if dyneval('result = <<$loc>>_bathtub_dildo') = 1:
  421. act 'Ride your bathtub dildo':gt'selfplay','bath_bathtub_suction_dildo_ride'
  422. end
  423. end
  424. if $ARGS[0] = 'shower_dildo_check':
  425. if dyneval('result = <<$loc>>_bathtub_dildo') = 1:
  426. act 'Ride your bathtub dildo':gt'selfplay','shower_bathtub_suction_dildo_ride'
  427. end
  428. if dyneval('result = <<$loc>>_glass_shower_dildo') = 1:
  429. act 'Ride your wall mounted dildo':gt'selfplay','glass_shower_suction_dildo_ride'
  430. elseif dyneval('result = <<$loc>>_bath_shower_dildo') = 1:
  431. act 'Ride your wall mounted dildo':gt'selfplay','shower_bathtub_wall_dildo_fuck'
  432. end
  433. end
  434. if $ARGS[0] = 'bath_suction_dildo':
  435. cla & *clr
  436. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/bathtub_dildo.jpg"></center>'
  437. 'Your suction dildo is currently stuck onto the bathtub.'
  438. act'Leave it there':gt $loc, $loc_arg
  439. act'Take it off':suction_dildo = 1 & dynamic('<<$loc>>_bathtub_dildo = 0') & gt $loc, $loc_arg
  440. act'Ride it':gt'selfplay','bath_suction_dildo_ride'
  441. end
  442. if $ARGS[0] = 'shower_suction_dildo':
  443. cla & *clr
  444. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/shower_dildo.jpg"></center>'
  445. 'Your suction dildo is currently stuck on the wall of the shower.'
  446. act'Leave it there':gt $loc, $loc_arg
  447. act'Take it off':
  448. suction_dildo += 1
  449. if $bathtype = 'bathtub shower':
  450. dynamic('<<$loc>>_bath_shower_dildo = 0')
  451. elseif $bathtype = 'glass shower' or $bathtype = 'glass shower and tub':
  452. dynamic('<<$loc>>_glass_shower_dildo = 0')
  453. end
  454. gt $loc, $loc_arg
  455. end
  456. end
  457. !! for using a dildo suctioned to the BATHTUB when not bathing
  458. if $ARGS[0] = 'bath_suction_dildo_ride':
  459. pcs_horny += 20
  460. gs 'boyStat', 'D2'
  461. gs 'stat'
  462. '<center><video autoplay loop src="images/shared/home/bathroom/bath_dildo.mp4"></video></center>'
  463. if dildo_timer = 0:
  464. dildo_timer = 1
  465. dildo_start_minute = minut
  466. dildo_start_hour = hour
  467. end
  468. if pcs_vag = 0:
  469. 'You wince in pain as you sit down on your dildo and it tears through your hymen. After giving yourself a minute to adjust, you tentatively bounce up and down on it, until you start to enjoy yourself.'
  470. elseif dildo_start_minute = minut and dildo_start_hour = hour:
  471. 'You spend 5 minutes bouncing up and down on the dildo mounted on your bathtub wall and having a good time.'
  472. else
  473. 'You spend 5 more minutes happily bouncing up and down on your bathtub mounted dildo.'
  474. end
  475. *nl
  476. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Gasping, quivering, and clenching, you ride out your orgasm while impaled on your bathtub dildo.'
  477. if pcs_horny >= 90:$orgasm_or = 'yes'
  478. gs'arousal','vaginal_dildo',5
  479. act'Keep masturbating': gt'selfplay','bath_suction_dildo_ride'
  480. act'Finish masturbating':
  481. dildo_timer = 0
  482. gs'arousal','end'
  483. gt $loc, $loc_arg
  484. end
  485. act'Finish masturbating and unmount your dildo':
  486. dildo_timer = 0
  487. gs'arousal','end'
  488. gs 'selfplay','bathtub_suction_dildo_remove'
  489. gt $loc, $loc_arg
  490. end
  491. end
  492. !! this is riding a dildo mounted on the low wall of a bath tub during a SHOWER
  493. if $ARGS[0] = 'shower_bathtub_suction_dildo_ride':
  494. vaginal_slip = 10
  495. pcs_horny += 20
  496. gs 'boyStat','D2'
  497. gs 'stat'
  498. '<center><video autoplay loop src="images/shared/home/bathroom/shower_bath_dildo.mp4"></video></center>'
  499. if dildo_timer = 0:
  500. dildo_timer = 1
  501. dildo_start_minute = minut
  502. dildo_start_hour = hour
  503. end
  504. *nl
  505. if pcs_vag = 0:
  506. 'Leaving the shower running, you move the curtain aside and ease down onto your bathtub mounted rubber cock.'
  507. *nl
  508. 'You wince in pain as it tears through your hymen and slip on the wet tub floor, gasping aloud when you suddenly find yourself ass-to-tub and the entire thing shoved up your pussy.'
  509. *nl
  510. '<i>Ow! Ow! Ow! Ow! I did not mean to take the full length of that thing right away!</i>'
  511. *nl
  512. 'Biting hard on your lip, you give yourself a minute to adjust and let your walls stretch out. Eventually you feel a little braver and you tentatively bounce up and down on it. One bounce becomes two, two becomes twelve, and suddenly you are jumping up and down on it with reckless abandon, very much enjoying your big rubber cock.'
  513. elseif dildo_start_minute = minut and dildo_start_hour = hour:
  514. 'Leaving the shower running, you move the curtain aside and ease down onto your bathtub mounted rubber cock.'
  515. *nl
  516. if $loc = 'vanrPar':
  517. '<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
  518. *nl
  519. 'You bounce up and down on your dildo, allowing yourself to sofly moan in pleasure, fairly certain that the sound of the shower ought to cover up most of your voice. Maybe it''s just the steam but you feel like you''re enjoying yourself a lot more than you might otherwise.'
  520. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Gasping, quivering, and clenching, you ride out your orgasm while impaled on your bathtub dildo doing your best not to allow your voice escape and let your family know what you''ve been up to.'
  521. else
  522. '<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
  523. *nl
  524. 'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and making sure anyone on the other side of the wall knows you''re enjoying yourself too.'
  525. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. You cry out loudly in climax, caught in the euphoric bliss of release, before slowly winding down.'
  526. end
  527. else
  528. if $loc = 'vanrPar':
  529. '<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
  530. *nl
  531. 'You continue bouncing up and down on your dildo, unwilling to finish your shower while you''re still enjoying yourself.'
  532. else
  533. '<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
  534. *nl
  535. 'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and making sure anyone on the other side of the wall knows you''re enjoying yourself too.'
  536. end
  537. end
  538. *nl
  539. if pcs_horny >= 90:$orgasm_or = 'yes'
  540. gs'arousal','vaginal_dildo',5
  541. act'Keep masturbating':gt'selfplay','shower_bathtub_suction_dildo_ride'
  542. act'Finish masturbating and dry off':
  543. dildo_timer = 0
  544. gs'arousal','end'
  545. mirror_steam = hour
  546. gt $loc, $loc_arg
  547. end
  548. act'Finish masturbating, unmount your dildo, and get out and dry off':
  549. dildo_timer = 0
  550. gs 'selfplay','bathtub_suction_dildo_remove'
  551. gs'arousal','end'
  552. mirror_steam = hour
  553. gt $loc, $loc_arg
  554. end
  555. end
  556. !! this is riding a dildo mounted on the low wall of a bath tub during a BATH
  557. if $ARGS[0] = 'bath_bathtub_suction_dildo_ride':
  558. vaginal_slip = 10
  559. pcs_horny += 20
  560. gs 'boyStat','D2'
  561. gs 'stat'
  562. '<center><video autoplay loop src="images/shared/home/bathroom/shower_bath_dildo.mp4"></video></center>'
  563. if dildo_timer = 0:
  564. dildo_timer = 1
  565. dildo_start_minute = minut
  566. dildo_start_hour = hour
  567. end
  568. if pcs_vag = 0:
  569. 'Pulling yourself up out of the bath, you point your ass towards your suction mounted dildo and ease your pussy onto it.'
  570. *nl
  571. 'You wince in pain as it tears through your hymen and you slip, the bathwater sloshing around from your sudden movement. Next thing you know, you''re gasping aloud when you suddenly find yourself ass-to-tub and the entire dildo shoved up your pussy to the hilt.'
  572. *nl
  573. '<i>Ow! Ow! Ow! Ow! I did not mean to take the full length of that thing right away!</i>'
  574. *nl
  575. 'Biting hard on your lip, you give yourself a minute to adjust and let your walls stretch out. Eventually you feel a little braver and you tentatively bounce up and down on it. One bounce becomes two, two becomes twelve, and suddenly you are jumping up and down on it with reckless abandon, creating mini waves in the bathwater and very much enjoying your big rubber cock.'
  576. elseif dildo_start_minute = minut and dildo_start_hour = hour:
  577. 'Pulling yourself out of the bath, you decide it''s time for a different kind of relaxation and ease down onto your bathtub mounted rubber cock.'
  578. if $loc = 'vanrPar':
  579. '<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
  580. *nl
  581. 'You bounce up and down on your dildo, creating ripples in the bathwater with your motion. In a very tiny voice, you let out small moans, doing your best but unable to completely hold it.'
  582. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your bathtub dildo taking strained breaths to prevent your voice escaping and let your family know what you''ve been up to.'
  583. else
  584. '<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
  585. *nl
  586. 'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and making sure anyone on the other side of the wall knows you''re enjoying yourself too.'
  587. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. You cry out loudly in climax, caught in the euphoric bliss of release, before it slowly winds down.'
  588. end
  589. else
  590. if $loc = 'vanrPar':
  591. '<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
  592. *nl
  593. 'You continue bouncing up and down on your dildo, unwilling to finish your shower while you''re still enjoying yourself. Maybe it''s just the steam in the room but your body feels like its on fire right now and it''s so difficult to not let your voice escape and travel into the hallway.'
  594. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam yourself all the way down onto your dildo and climax hard all over it. Your walls squeeze tight and you can feel the entire shape of the rubber cock inside you. Legs shaking and splashing bathwater everywhere, you ride out your orgasm while impaled on your bathtub dildo taking strained breaths to prevent your voice escaping and let your family know what you''ve been up to.'
  595. else
  596. '<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
  597. *nl
  598. 'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and making sure anyone on the other side of the wall knows you''re enjoying yourself too.'
  599. end
  600. end
  601. *nl
  602. if pcs_horny >= 90:$orgasm_or = 'yes'
  603. gs'arousal','vaginal_dildo',5
  604. act'Keep masturbating':gt'selfplay','bath_bathtub_suction_dildo_ride'
  605. act'Finish masturbating and dry off':
  606. dildo_timer = 0
  607. gs'arousal','end'
  608. mirror_steam = hour
  609. gt $loc, $loc_arg
  610. end
  611. act'Finish masturbating, unmount your dildo, and get out and dry off':
  612. dildo_timer = 0
  613. gs 'selfplay','bathtub_suction_dildo_remove'
  614. gs'arousal','end'
  615. mirror_steam = hour
  616. gt $loc, $loc_arg
  617. end
  618. end
  619. !! this is using a dildo mounted on WALL the shower in a bathtub during a SHOWER
  620. if $ARGS[0] = 'shower_bathtub_wall_dildo_fuck':
  621. vaginal_slip = 10
  622. pcs_mood += 1
  623. pcs_horny += 20
  624. gs 'boyStat','D2'
  625. gs 'stat'
  626. '<center><video autoplay loop src="images/shared/home/bathroom/shower_dildo2.mp4"></video></center>'
  627. $orgasm_txt = 'You can''t take it anymore and throw yourself as far back onto the dildo as you can, impaling yourself to the hilt on it. Spraying your clit with the showerhead, you don''t stop even when your orgasm makes you a quivering mess, standing up on your tip toes as pleasure rocks your entire body.'
  628. if dildo_timer = 0:
  629. dildo_timer = 1
  630. dildo_start_minute = minut
  631. dildo_start_hour = hour
  632. end
  633. if pcs_vag = 0:
  634. 'Leaving the shower running, you bend over, pointing your bottom towards your wall mounted dildo. You figure it''s time that you test this thing out.'
  635. *nl
  636. 'Lining it up with your pussy, you slowly push yourself back onto it, feeling it stretch you and penetrate you until you feel it bumping against your hymen. After taking a deep breath, you force your ass backward, immediately letting out a whimper of pain when you feel it tear through your maidenhood.'
  637. *nl
  638. 'Biting hard on your lip, you give yourself a minute to adjust and let your walls stretch out. Eventually you feel a little braver and you tentatively slide off of it and then push back on again. With big long strokes, you pull all the way off and then push slowly back on until your filled and you feel your ass touching the wall. Soon it starts to feel good, and you pick up the pace. And then you grab the shower head and start spraying your clit with it while you slam yourself back on forth on your rubber cock.'
  639. *nl
  640. '<i>Ohhhhhh yeahhhhhh.... I could get used to this...</i>'
  641. elseif dildo_start_minute = minut and dildo_start_hour = hour:
  642. if $loc = 'vanrPar':
  643. 'Using the wall of the tub as leverage, you breathe hard as you push your ass back and forth on the dildo mounted on the wall. Hot water from the shower rains down and steam fills the air and you to play tag with the bathtub wall, repeatedly tapping it with the back of your ass while your pussy gets stuffed with rubber.'
  644. *nl
  645. '<i>Haahhh~! Hhhh~! Mmmm~! Unnnh~!</i>'
  646. *nl
  647. 'Though whimpers and gasps escape your lips, you do your best to keep your voice under control so your family doesn''t catch you masturbating in the shower.'
  648. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam your ass all the way to the wall and climax hard all over your dildo. Your walls squeeze tight and you can perfectly feel the shape of the entire rubber cock inside you. Legs shaking and knees trying not to buckle, you ride out your orgasm while impaled on your shower dildo, taking gasping breaths instead of screaming and letting your family know what you''ve been up to.'
  649. else
  650. '<b>thump</b><b>thump</b><b>thump</b><b>thump'
  651. *nl
  652. '<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
  653. *nl
  654. 'Your cries of pleasure echo off the walls of the bathroom as you slap your ass back and forth against the shower wall, thorougly enjoying the dildo that''s pumping in and out of you right now.'
  655. $orgasm_txt = 'Pleasure and heat build between your legs until finally you slam your ass all the way to the wall and climax hard all over your dildo. Your walls squeeze tight and you can perfectly feel the shape of the entire rubber cock inside you. You cry out loudly in climax, legs shaking and knees trying not to buckle, as you ride out your orgasm caught in euphoric bliss.'
  656. end
  657. else
  658. if $loc = 'vanrPar':
  659. '<i>Hnnn~! Hnnnnhhh~! Nnnnn~! Mmmmm~!</i>'
  660. *nl
  661. 'You''re not done yet. The shower keeps raining down on you just as you keep fucking your wall mounted dildo, making squelching noises as you occassionally slide it up and down with the force of your thrusts. Maybe it''s just the steam in the room but your body feels like its on fire right now and it''s so difficult to not let your voice escape and travel into the hallway.'
  662. else
  663. '<i><b>thump</b></i> <i><b>thump</b></i> <i><b>thump</b></i> <i><b>thump</b></i>'
  664. '<i>Haahhh~! Hhhh~! Unnnh~! Unnnh~! Ahhh~!</i>'
  665. *nl
  666. 'Your cries of pleasure echo off the walls of the bathroom as you ride your dildo, thoroughly enjoying yourself and making sure anyone on the other side of the wall knows you''re enjoying yourself too.'
  667. end
  668. end
  669. *nl
  670. if pcs_horny >= 90:$orgasm_or = 'yes'
  671. gs'arousal','vaginal_dildo',5
  672. act'Keep masturbating':gt'selfplay','shower_bathtub_wall_dildo_fuck'
  673. act'Finish masturbating and dry off':
  674. dildo_timer = 0
  675. mirror_steam = hour
  676. gs'arousal','end'
  677. gt $loc, $loc_arg
  678. end
  679. act'Finish masturbating, unmount your dildo, and get out and dry off':
  680. dildo_timer = 0
  681. gs 'selfplay','shower_suction_dildo_remove'
  682. mirror_steam = hour
  683. gs'arousal','end'
  684. gt $loc, $loc_arg
  685. end
  686. end
  687. !! this is for using a dildo mounted of the glass WALL of a SHOWER with no tub
  688. if $ARGS[0] = 'glass_shower_suction_dildo_fuck':
  689. pcs_mood += 1
  690. pcs_horny += 20
  691. vaginal_slip = 10
  692. gs 'boyStat','D2'
  693. gs 'stat'
  694. '<center><video autoplay loop src="images/shared/home/bathroom/shower_dildo1.mp4"></video></center>'
  695. $orgasm_txt = 'You can''t take it anymore and throw yourself as far back onto the dildo as you can, impaling yourself to the hilt on it. Spraying your clit with the showerhead, you don''t stop even when your orgasm makes you a quivering mess, standing up on your tip toes as pleasure rocks your entire body.'
  696. if dildo_timer = 0:
  697. dildo_timer = 1
  698. dildo_start_minute = minut
  699. dildo_start_hour = hour
  700. end
  701. if pcs_vag = 0:
  702. 'Moving your bottom over towards your wall mounted dildo, you figure it''s time that you test this thing out.'
  703. *nl
  704. 'Lining it up with your pussy, you slowly push yourself back onto it, feeling it stretch you and penetrate you until you feel it bumping against your hymen. After taking a deep breath, you force your ass backward, immediately letting out a whimper of pain when you feel it tear through your maidenhood.'
  705. *nl
  706. 'Biting hard on your lip, you give yourself a minute to adjust and let your walls stretch out. Eventually you feel a little braver and you tentatively slide off of it and then push back on again. With big long strokes, you pull all the way off and then push slowly back on until your filled and you feel your ass touching the wall. Soon it starts to feel good, and you pick up the pace. And then you grab the shower head and start spraying your clit with it while you slam yourself back on forth on your rubber cock.'
  707. *nl
  708. '<i>Ohhhhhh yeahhhhhh.... I could get used to this...</i>'
  709. elseif dildo_start_minute = minut and dildo_start_hour = hour:
  710. '"Haahhh~!" <i>thump</i> "Hhhh~!" <i>thump</i> "Unnnh~!" <i>thump</i> "Unnnh~!" <i>thump</i> "Ahhh~!"'
  711. *nl
  712. 'Cries of pleasure echo inside the shower, as you repeatedly slam yourself back against your wall mounted dildo. Your ass makes a thumping sound every time you drive yourself to the base of the dildo and the only other sound is the white noise of the shower head spraying against your clit.'
  713. else
  714. '"Anngh~!" <i><b>thump</b></i> "Hnnngh~!" <i><b>thump</b></i> "Unnngh~!" <i><b>thump</b></i> "Mmmnngh~!" <i><b>thump</b></i> "Ahhh~!!</i>'
  715. *nl
  716. 'The thump of your ass against the wall is even louder now, but your voice too. In the far back of your mind, you vaguely wonder how awkward it might be if you have to explain to the landlord you shattered the shower by fucking a rubber cock you suctioned to it.'
  717. end
  718. *nl
  719. if pcs_horny >= 90:$orgasm_or = 'yes'
  720. gs'arousal','masturbate',-5
  721. gs'arousal','vaginal_dildo',5
  722. act'Keep masturbating':gt'selfplay','glass_shower_suction_dildo_fuck'
  723. act'Finish masturbating and dry off':
  724. dildo_timer = 0
  725. mirror_steam = hour
  726. gs'arousal','end'
  727. gt $loc, $loc_arg
  728. end
  729. act'Finish masturbating, unmount your dildo, and get out and dry off':
  730. dildo_timer = 0
  731. gs 'selfplay','shower_suction_dildo_remove'
  732. mirror_steam = hour
  733. gs'arousal','end'
  734. gt $loc, $loc_arg
  735. end
  736. end
  737. if $ARGS[0] = 'sis_prov':
  738. $AnyaMsg = ''
  739. if $loc = 'bedrPar' and (hour >= 7 or hour < 23):
  740. gs 'family'
  741. if sister_indorf = 0:
  742. if sisterHere = 0 and proverkasisterhere = 0:proverkasisterhere = 1
  743. if sisterHere > 0:
  744. cls
  745. if sisboytrio > 0 and sis_watch = 1:
  746. sis_watch = 2
  747. $AnyaMsg = 'Anya smiles as she enters the room and waves at you to carry on.'
  748. else
  749. if proverkasisterhere = 2 and RAND(1,3) = 3:
  750. SisterKnowMastr += 1
  751. $AnyaMsg = '<font color="red"><b>Anya saw you masturbate.</b></font>'
  752. end
  753. if proverkasisterhere = 1:
  754. proverkasisterhere = 2
  755. $AnyaMsg = '<font color="red"><b>You hear footsteps approaching your room.</b></font>'
  756. end
  757. end
  758. end
  759. end
  760. end
  761. end
  762. ! WD: Masturbating at night only has 10% chance to be discovered
  763. if $ARGS[0] = 'van_vtor':
  764. if indorf = 0 and (hour >= 6 or Rand(1, 10) = 1):
  765. cls
  766. pcs_horny -= 50
  767. pcs_mood -= 10
  768. gs 'stat'
  769. 'You hear shouting from outside the bathroom: "<<$pcs_nickname>>! Are you drowning in there or something? What''s taking so long? Get out of there!"'
  770. act 'Get out of the bath and dry yourself off':
  771. gt 'selfplay', 'stop'
  772. end
  773. exit
  774. else
  775. selfplaytime -= 15
  776. end
  777. end
  778. if $ARGS[0] = 'fingering':
  779. act 'Put a finger inside your vagina':
  780. cls
  781. selfplaytime += 2
  782. gs 'selfplay', 'sis_prov'
  783. gs 'stat'
  784. '<center><img <<$set_imgh>> src="images/shared/sex/mast/finger.jpg"></center>'
  785. if pcs_vag = 0 and mesec <= 0:
  786. 'You let your fingers dart over your soft and wet pussy lips, before gradually attempting to slide your finger into your pussy. You feel your hymen stretch a little as you slide first one and then a second finger inside.'
  787. gs 'arousal', 'masturbate', 2
  788. gs 'stat'
  789. gs 'selfplay', 'fingering2'
  790. elseif pcs_vag > 0:
  791. 'You slide one finger into your vagina, and then another.'
  792. if pcs_vag < 5:
  793. pcs_horny += rand(2, 5)
  794. 'You feel your pussy clasping around your fingers very tightly.'
  795. elseif pcs_vag < 10:
  796. pcs_horny += rand(5, 10)
  797. 'You feel your slippery pussy walls around your fingers. It feels nice and tight.'
  798. else
  799. pcs_horny += rand(2, 5)
  800. 'Having your fingers in your pussy feels nice, but it doesn''t feel very tight. You feel like you can take more.'
  801. end
  802. gs 'arousal', 'masturbate', 2
  803. gs 'stat'
  804. '<<$AnyaMsg>>'
  805. if org_temp = orgasm: gs 'selfplay', 'fingering2'
  806. elseif mesec > 0:
  807. pcs_mood -= 5
  808. 'Your vagina has some dried up blood from your period on it. You attempt to shove your finger in, but then are kind of grossed out by the idea and reconsider.'
  809. end
  810. act 'Stop touching yourself':gt 'selfplay', 'stop'
  811. end
  812. end
  813. if $ARGS[0] = 'fingering2':
  814. act 'Fuck your fingers':
  815. cls
  816. selfplaytime += 10
  817. gs 'selfplay', 'sis_prov'
  818. '<center><img <<$set_imgh>> src="images/shared/sex/mast/finger.jpg"></center>'
  819. if args[1] = 1:
  820. 'You continue fucking yourself with your fingers, massaging and squeezing your breasts.'
  821. else
  822. 'You start moving your fingers in and out, softly pinching your nipples as you play with yourself.'
  823. end
  824. *nl
  825. if pcs_vag <= 12:'Your pussy walls are stretched nicely from the finger fucking, and you feel a pleasant warmth spread in your lower body.'
  826. if pcs_vag > 12:'Your pussy is quite loose, and you have to work hard to get much enjoyment out of it.'
  827. gs 'arousal', 'masturbate', 10
  828. gs 'stat'
  829. '<<$AnyaMsg>>'
  830. gs 'selfplay', 'fingering2', 1
  831. if org_temp = orgasm and pcs_vag > 0: gs 'selfplay', 'fingering3'
  832. act 'Stop touching yourself':gt 'selfplay', 'stop'
  833. end
  834. end
  835. if $ARGS[0] = 'fingering3':
  836. act 'Thrust all of your fingers into your vagina':
  837. cls
  838. selfplaytime += 2
  839. gs 'selfplay', 'sis_prov'
  840. '<center><img <<$set_imgh>> src="images/shared/sex/mast/hand.jpg"></center>'
  841. 'You shove all your fingers inside your pussy.'
  842. if pcs_vag < 10:
  843. if vgape = 2:vgape = 3
  844. if vgape = 1:vgape = 2
  845. if vgape = 0:vgape = 1
  846. pcs_horny -= 10
  847. pcs_mood -= 10
  848. 'You shove all your fingers inside your tight pussy, and feel it stretch out way more than it should. It''s rather painful.'
  849. elseif pcs_vag < 15:
  850. pcs_horny += rand(1, 3)
  851. 'You shove all your fingers inside your tight pussy, feeling your pussy grip them tightly. It doesn''t hurt, but doesn''t feel very good either.'
  852. elseif pcs_vag < 20:
  853. pcs_horny += rand(3, 6)
  854. 'You shove all your fingers inside your tight pussy, feeling your pussy grip them tightly.'
  855. else
  856. pcs_horny += rand(6, 12)
  857. 'You stick all of your fingers in your pussy, and feel how your vagina envelops them nicely. You get a pleasant feeling of fullness.'
  858. end
  859. if pcs_vag < 15:vaginaTemp += 1
  860. gs 'arousal', 'masturbate', 2
  861. gs 'stat'
  862. '<<$AnyaMsg>>'
  863. if org_temp = orgasm:
  864. act 'Fuck yourself with your fingers':
  865. cls
  866. selfplaytime += 10
  867. gs 'selfplay', 'sis_prov'
  868. if pcs_vag < 10:
  869. if vgape = 2:vgape = 3
  870. if vgape = 1:vgape = 2
  871. if vgape = 0:vgape = 1
  872. pcs_horny -= 10
  873. pcs_mood -= 10
  874. end
  875. '<center><img <<$set_imgh>> src="images/shared/sex/mast/hand.jpg"></center>'
  876. 'You start to slowly move your hand, thrusting your fingers into your pussy again and again.'
  877. gs 'arousal', 'masturbate', 10
  878. gs 'stat'
  879. if pcs_vag <= 15:pcs_horny -= 10 & pcs_mood -= 10 & 'You''re stretching your pussy to the point where it becomes rather painful, and don''t get any enjoyment out of it.'
  880. if pcs_vag > 10:pcs_horny += rand(10, 20) & 'Your pussy walls are stretched nicely from the finger fucking, and you feel a pleasant warmth spread in your lower body.'
  881. gs 'stat'
  882. if pcs_vag < 20:vaginaTemp += 1
  883. '<<$AnyaMsg>>'
  884. gs 'selfplay', 'fingering3'
  885. act 'Stop touching yourself':gt 'selfplay', 'stop'
  886. end
  887. else
  888. act 'Stop touching yourself':gt 'selfplay', 'stop'
  889. end
  890. end
  891. act 'Stop touching yourself':gt 'selfplay', 'stop'
  892. end
  893. if $ARGS[0] = 'stop':
  894. analplay = 0
  895. selfplaytime = 0
  896. mastrOnce = 0
  897. proverkasisterhere = 0
  898. if vaginaTemp > pcs_vag * 2:pcs_vag += 1 & vaginaTemp = 0
  899. gs 'arousal', 'end'
  900. gs 'stat'
  901. gt $loc, $loc_arg
  902. end
  903. --- selfplay ---------------------------------