|
|
@@ -1302,25 +1302,30 @@ if $ARGS[0] = '13':
|
|
|
else
|
|
|
act 'Block out everything but the pleasure and let yourself orgasm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
|
|
|
end
|
|
|
- else orgasm_buildup < 300 - pcs_inhib:
|
|
|
- act 'Fake orgasm':
|
|
|
- cla
|
|
|
- 'While still dripping the sperm of the previous two guys from your pussy, <<$paktor3>> and <<$paktor4>> switches places with <<$paktor>> and <<$paktor2>>, but they just dip their dick in your slick pussy, then push their dick in your anus. At first the place is pretty tight, but soon start to build up a good rithm. They also cum in you, this time in your ass.'
|
|
|
- '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasmfake.mp4" width="400"></video></center>'
|
|
|
- 'You fake an orgasm for the camera while you wait for them to finish in your bowels.'
|
|
|
- gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
|
|
|
- gs 'arousal', 'end'
|
|
|
- gs 'stat'
|
|
|
-
|
|
|
- act 'Take a shower': gt 'pornstudio', 'shower'
|
|
|
- act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
|
|
|
- end
|
|
|
+ gs 'pornfilm', '13a'
|
|
|
+ else
|
|
|
+ gs 'pornfilm', '13a'
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
|
|
|
+if $ARGS[0] = '13a':
|
|
|
+ act 'Fake orgasm':
|
|
|
+ cla
|
|
|
+ 'While still dripping the sperm of the previous two guys from your pussy, <<$paktor3>> and <<$paktor4>> switches places with <<$paktor>> and <<$paktor2>>, but they just dip their dick in your slick pussy, then push their dick in your anus. At first the place is pretty tight, but soon start to build up a good rithm. They also cum in you, this time in your ass.'
|
|
|
+ '<center><video autoplay loop src="images/locations/city/citycenter/studio/sex/porgasmfake.mp4" width="400"></video></center>'
|
|
|
+ 'You fake an orgasm for the camera while you wait for them to finish in your bowels.'
|
|
|
+ gs 'arousal', 'anal', 5, 'exhibitionism', 'group'
|
|
|
+ gs 'arousal', 'end'
|
|
|
+ gs 'stat'
|
|
|
+
|
|
|
+ act 'Take a shower': gt 'pornstudio', 'shower'
|
|
|
+ act 'Don''t bother to clean up': gt 'pornstudio', 'postvideo'
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
if $ARGS[0] = '14':
|
|
|
porngang += 5
|
|
|
pornexhib += 5
|
KevinSmarts