|
@@ -0,0 +1,135 @@
|
|
|
+# fisting2
|
|
|
+if $ARGS[0] = 'start':
|
|
|
+ *clr & cla
|
|
|
+ trubknow = 1
|
|
|
+ alko += 6
|
|
|
+ pcs_hydra -= 10
|
|
|
+ pcs_breath = 0
|
|
|
+ ! a count of the number total visits
|
|
|
+ trubtimes += 1
|
|
|
+ ! the temp count of the number of acts
|
|
|
+ trubsextimes = 0
|
|
|
+ pain['mouth'] += 2
|
|
|
+ pain['lips'] += 2
|
|
|
+ gs 'clothing', 'strip'
|
|
|
+ '<center><img <<$set_imgh>> src="mod/basement/fiks.jpg"></center>'
|
|
|
+ *nl
|
|
|
+ 'Drink it up honey, it will help you relax a little.<br><br>- you took the glass, and gulped it down, then without fuss, removed your clothing.<br><br>- The Doctor binds you to a very interesting contraption.<br><br>Well, let''s party!'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'no'
|
|
|
+ gs 'arousal', 'foreplay', 60, 'sub', 'maso', 'rough', 'bound'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ gs 'pain', 1 , 'hands', 'bind'
|
|
|
+ gs 'pain', 1 , 'feet', 'bind'
|
|
|
+ gs 'stat'
|
|
|
+ act 'Let''s start': gt 'fisting2', 'sex_init'
|
|
|
+end
|
|
|
+if $ARGS[0] = 'sex_init':
|
|
|
+ if trubsextimes = 0:
|
|
|
+ *clr & cla
|
|
|
+ '<center><video autoplay loop src="mod/basement/porka.mp4"></video></center>'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'no'
|
|
|
+ gs 'arousal', 'foreplay', 5, 'sub', 'maso', 'rough', 'bound'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ gs 'pain', 3 , 'asscheeks', 'spank'
|
|
|
+ act 'The party continues art_bed': trubsextimes += 1 & gt 'fisting2', 'art_bed'
|
|
|
+ elseif trubsextimes > 0:
|
|
|
+ *clr & cla
|
|
|
+ '<center><video autoplay loop src="mod/basement/fist/org.mp4"></video></center>'
|
|
|
+ *nl
|
|
|
+ 'The Doctor was preparing you for the next phase, but you don''t care, and are completely absorbed in your own feelings as you orgasm.'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'yes'
|
|
|
+ gs 'arousal', 'foreplay', 5, 'sub', 'maso', 'rough', 'bound'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ act 'More!': trubsextimes += 1 & gt 'fisting2', 'art_bed'
|
|
|
+ end
|
|
|
+end
|
|
|
+! --- random ---
|
|
|
+if $ARGS[0] = 'art_bed':
|
|
|
+ if trubsextimes < 10:
|
|
|
+ *clr & cla
|
|
|
+ pain['clitoris'] += 2
|
|
|
+ pain['cervix'] += 2
|
|
|
+ pain['labia'] += 2
|
|
|
+ pain['mouth'] += 2
|
|
|
+ pain['lips'] += 2
|
|
|
+ picrand = rand(1,32)
|
|
|
+ '<center><video autoplay loop src="mod/basement/fist/<<picrand>>.mp4"></video></center>'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'no'
|
|
|
+ gs 'arousal', 'anal_dilo', 10, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'anal_fist', 10, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'vaginal_dilo', 10, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'vaginal_fist', 10, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'vaginal_vibe', 10, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ gs 'pain', 2 , 'vaginal', 'stretch'
|
|
|
+ gs 'pain', 2 , 'asshole', 'stretch'
|
|
|
+ gs 'pain', 2 , 'hands', 'bind'
|
|
|
+ gs 'pain', 2 , 'feet', 'bind'
|
|
|
+ gs 'stat'
|
|
|
+ act 'Another round!': gt 'fisting2', 'sex_init'
|
|
|
+ else
|
|
|
+ *clr & cla
|
|
|
+ '<center><video autoplay loop src="mod/basement/squirt.mp4"></video></center>'
|
|
|
+ *nl
|
|
|
+ '<br>You, can''t help it - you moan loudly, as you experience a wave of orgasms. A feeling of congestion, pain, and pleasure embraces your overworked pussy, while your pussy gushes like a victorious fountain.'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'yes'
|
|
|
+ gs 'arousal', 'vaginal_dilo', 1, 'sub', 'maso', 'rough', 'lube'
|
|
|
+ gs 'arousal', 'anal_dilo', 1, 'sub', 'maso', 'rough', 'lube'
|
|
|
+ gs 'arousal', 'anal_fist', 1, 'sub', 'maso', 'rough', 'lube'
|
|
|
+ gs 'arousal', 'vaginal_fist', 1, 'sub', 'maso', 'rough', 'lube'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ act 'More': gt 'fisting2', 'ender'
|
|
|
+ end
|
|
|
+end
|
|
|
+! --- end ---
|
|
|
+if $ARGS[0] = 'ender':
|
|
|
+ if pcs_ass => 25 and pcs_vag =>25 :
|
|
|
+ *clr & cla
|
|
|
+ pcs_vag += 3
|
|
|
+ pcs_ass += 3
|
|
|
+ '<center><img <<$set_imgh>> src="mod/basement/duplo.jpg"></center>'
|
|
|
+ *nl
|
|
|
+ 'I see your holes are now well accustomed to our activities! Well done!<br>When you are finished reviewing your well-worn holes, it''s time to leave, said the Doctor.<br><br>- You get dressed and went back to the basement, with your legs trembling.'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'yes'
|
|
|
+ gs 'arousal', 'anal_fist', 2, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'vaginal_fist', 2, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ gs 'pain', 1 , 'vaginal', 'stretch'
|
|
|
+ gs 'pain', 1 , 'asshole', 'stretch'
|
|
|
+ gs 'stat'
|
|
|
+ act 'Leave': gs 'clothing', 'wear_last_worn' & gt 'basement', 'start'
|
|
|
+ else
|
|
|
+ *clr & cla
|
|
|
+ lubri += 1
|
|
|
+ vitamin += 5
|
|
|
+ pcs_vag += 5
|
|
|
+ pcs_ass += 5
|
|
|
+ pain['vaginal'] += vagDMG * 2
|
|
|
+ pain['asshole'] += assDMG * 2
|
|
|
+ if pcs_vag < 25 : vgape = 2
|
|
|
+ if pcs_vag < 15 : vgape = 3
|
|
|
+ vgapetime = totminut + (vgape + 1) * 1440
|
|
|
+ if pcs_ass < 25 : agape = 2
|
|
|
+ if pcs_ass < 15 : agape = 3
|
|
|
+ agapetime = totminut + (agape + 1) * 1440
|
|
|
+ '<center><img <<$set_imgh>> src="mod/basement/porval.jpg"></center>'
|
|
|
+ *nl
|
|
|
+ 'Enough!. I think the night was a success. Well ,you go recover, and until then, here are some vitamins and lube.<br><br>- As you say Doctor, It was awesome, but If I cum one more time I will burst. Thank you!<br><br>- you got dressed and left the room, your legs shaking, your pussy and anus aching mercilessly, but the feeling of fullness filling your body.'
|
|
|
+ *nl
|
|
|
+ $orgasm_or = 'no'
|
|
|
+ gs 'arousal', 'anal_fist', 2, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'vaginal_fist', 2, 'sub', 'maso', 'rough', 'bound', 'lube'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ gs 'stat'
|
|
|
+ act 'Leave': gs 'clothing', 'wear_last_worn' & gt 'basement', 'start'
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+--- fisting2 ---------------------------------
|
|
|
+
|