|
@@ -883,22 +883,7 @@ if $ARGS[0] = 'punishSpank':
|
|
|
gs 'arousal', 'foreplay', 15, 'sub', 'rough', 'unknown'
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
-
|
|
|
- ! SM it was too hard to get abducted so remove old check against strength/agility, now only checks against slut reputation
|
|
|
- ! minimum chance of 1% maximum chance of 90% to be abducted
|
|
|
- abductionChance = min(max(1,slut_compare),180)/2
|
|
|
- if abductionChance >= rand(1,100):
|
|
|
- 'But your perpetrator isn''t done with you.'
|
|
|
- 'He catches you again, drags you to his car and pushes you into the trunk...'
|
|
|
- 'You have a feeling this probably will not go well for you...'
|
|
|
-
|
|
|
- act 'Cry for help':gt 'abduction', 'start'
|
|
|
- else
|
|
|
- 'Your perpetrator stands up and just watches as you crawl away in pain.'
|
|
|
- 'He turns around and calmly walks away, leaving you alone.'
|
|
|
-
|
|
|
- act 'Escape':gt 'zaprF', 'start'
|
|
|
- end
|
|
|
+ gs 'zaprFWash', 'punishEnd'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'punishAnal':
|
|
@@ -919,20 +904,7 @@ if $ARGS[0] = 'punishAnal':
|
|
|
gs 'arousal', 'anal', 30, 'sub', 'rough', 'rape', 'unknown'
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
-
|
|
|
- abductionChance = min(max(1,slut_compare),180)/2
|
|
|
- if abductionChance >= rand(1,100):
|
|
|
- 'But your perpetrator isn''t done with you.'
|
|
|
- 'He catches you again, drags you to his car and pushes you into the trunk...'
|
|
|
- 'You have a feeling this probably will not go well for you...'
|
|
|
-
|
|
|
- act 'Cry for help':gt 'abduction', 'start'
|
|
|
- else
|
|
|
- 'Your perpetrator stands up and just watches as you crawl away in pain.'
|
|
|
- 'He turns around and calmly walks away, leaving you alone.'
|
|
|
-
|
|
|
- act 'Escape':gt 'zaprF', 'start'
|
|
|
- end
|
|
|
+ gs 'zaprFWash', 'punishEnd'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'punishPussyQ':
|
|
@@ -983,7 +955,12 @@ if $ARGS[0] = 'punishPussy':
|
|
|
gs 'arousal', 'vaginal', 30, 'sub', 'rough', 'rape', 'unknown'
|
|
|
gs 'arousal', 'end'
|
|
|
gs 'stat'
|
|
|
-
|
|
|
+ gs 'zaprFWash', 'punishEnd'
|
|
|
+end
|
|
|
+
|
|
|
+!! SM it was too hard to get abducted so remove old check against strength/agility, now only checks against slut reputation
|
|
|
+!! minimum chance of 1% maximum chance of 90% to be abducted
|
|
|
+if $ARGS[0] = 'punishEnd':
|
|
|
abductionChance = min(max(1,slut_compare),180)/2
|
|
|
if abductionChance >= rand(1,100):
|
|
|
'But your perpetrator isn''t done with you.'
|