|
@@ -114,8 +114,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
grange = dyneval('result=strpos(''skinny slimx well pr thicker thickx massive monstrous'',$ARGS[0])',mid($temp_dick_girth+'x',1,6))/2
|
|
|
|
|
|
!! first let us determine how slippery are pc''s holes
|
|
|
- if anal_slip < max(1, 8 + pain['asshole']/2 - pcs_ass) _
|
|
|
- and mid($ARGS[0],1,4) = 'anal' and arrpos('$ARGS', 'anal_finger') < 0:
|
|
|
+ if anal_slip < max(1, 8 + pain['asshole']/2 - pcs_ass) and mid($ARGS[0],1,4) = 'anal' and arrpos('$ARGS', 'anal_finger') < 0:
|
|
|
!! cum
|
|
|
if cumloc[3] > 0: anal_slip += rand(cumvol[3]/15, cumvol[3]/10)
|
|
|
!! spit
|
|
@@ -127,14 +126,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
anal_slip += 8
|
|
|
ar_anal_lube = 1
|
|
|
!! PC lube
|
|
|
- elseif auto_anal_lube = 1 _
|
|
|
- and arrpos('$ARGS', 'rape') < 0 _
|
|
|
- and arrpos('$ARGS', 'gangbang') < 0 _
|
|
|
- and arrpos('$ARGS', 'rough') < 0 _
|
|
|
- and arrpos('$ARGS', 'beast') < 0 _
|
|
|
- and arrpos('$ARGS', 'BDSM') < 0 _
|
|
|
- and arrpos('$ARGS', 'bound') < 0 _
|
|
|
- and arrpos('$ARGS', 'humiliation') < 0:
|
|
|
+ elseif auto_anal_lube = 1 and arrpos('$ARGS', 'rape') < 0 and arrpos('$ARGS', 'gangbang') < 0 and arrpos('$ARGS', 'rough') < 0 and arrpos('$ARGS', 'beast') < 0 and arrpos('$ARGS', 'BDSM') < 0 and arrpos('$ARGS', 'bound') < 0 and arrpos('$ARGS', 'humiliation') < 0:
|
|
|
gs 'arousal', 'auto_lube', 'anal'
|
|
|
end
|
|
|
end
|
|
@@ -145,8 +137,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if vaginal_slip < max(1, 8 + pain['vaginal']/2 - pcs_vag) _
|
|
|
- and mid($ARGS[0],1,4) = 'vagi' and arrpos('$ARGS', 'vaginal_finger') < 0:
|
|
|
+ if vaginal_slip < max(1, 8 + pain['vaginal']/2 - pcs_vag) and mid($ARGS[0],1,4) = 'vagi' and arrpos('$ARGS', 'vaginal_finger') < 0:
|
|
|
!! horny
|
|
|
if vaginal_slip < pcs_horny / 10: vaginal_slip = pcs_horny / 10
|
|
|
!! cum
|
|
@@ -160,14 +151,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
vaginal_slip += 8
|
|
|
ar_vag_lube = 1
|
|
|
!! PC lube
|
|
|
- elseif auto_vag_lube = 1 _
|
|
|
- and arrpos('$ARGS', 'rape') < 0 _
|
|
|
- and arrpos('$ARGS', 'gangbang') < 0 _
|
|
|
- and arrpos('$ARGS', 'rough') < 0 _
|
|
|
- and arrpos('$ARGS', 'beast') < 0 _
|
|
|
- and arrpos('$ARGS', 'BDSM') < 0 _
|
|
|
- and arrpos('$ARGS', 'bound') < 0 _
|
|
|
- and arrpos('$ARGS', 'humiliation') < 0:
|
|
|
+ elseif auto_vag_lube = 1 and arrpos('$ARGS', 'rape') < 0 and arrpos('$ARGS', 'gangbang') < 0 and arrpos('$ARGS', 'rough') < 0 and arrpos('$ARGS', 'beast') < 0 and arrpos('$ARGS', 'BDSM') < 0 and arrpos('$ARGS', 'bound') < 0 and arrpos('$ARGS', 'humiliation') < 0:
|
|
|
gs 'arousal', 'auto_lube', 'vag'
|
|
|
end
|
|
|
end
|
|
@@ -319,10 +303,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
if pain_coeff > 0:gs 'pain', rand(pain_coeff), 'mouth', 'stretch'
|
|
|
if pcs_lipbalm > 0:
|
|
|
pcs_lipbalm = max(0, pcs_lipbalm - 1*max(1,stim_time/5))
|
|
|
- if arrpos('$ARGS', 'rape') >= 0 _
|
|
|
- or arrpos('$ARGS', 'rough') >= 0 _
|
|
|
- or arrpos('$ARGS', 'gangbang') >= 0 _
|
|
|
- or arrpos('$ARGS', 'beast') >= 0:
|
|
|
+ if arrpos('$ARGS', 'rape') >= 0 or arrpos('$ARGS', 'rough') >= 0 or arrpos('$ARGS', 'gangbang') >= 0 or arrpos('$ARGS', 'beast') >= 0:
|
|
|
pcs_lipbalm = max(0, pcs_lipbalm - 1*max(1,stim_time/5))
|
|
|
end
|
|
|
end
|
|
@@ -738,10 +719,8 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
if arrpos('$ARGS', 'maso') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>125,rand(-1,0),pcs_hairbsh)
|
|
|
if arrpos('$ARGS', 'prostitution') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>150,rand(-1,0),pcs_hairbsh)
|
|
|
if arrpos('$ARGS', 'unknown') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>200,rand(-1,pcs_hairbsh),pcs_hairbsh)
|
|
|
- if arrpos('$ARGS', 'anal') >= 0 _
|
|
|
- or arrpos('$ARGS', 'anal_strap') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>220,rand(-1,pcs_hairbsh),pcs_hairbsh)
|
|
|
- if arrpos('$ARGS', 'vaginal') >= 0 _
|
|
|
- or arrpos('$ARGS', 'vaginal_strap') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>240,rand(-1,pcs_hairbsh),pcs_hairbsh)
|
|
|
+ if arrpos('$ARGS', 'anal') >= 0 or arrpos('$ARGS', 'anal_strap') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>220,rand(-1,pcs_hairbsh),pcs_hairbsh)
|
|
|
+ if arrpos('$ARGS', 'vaginal') >= 0 or arrpos('$ARGS', 'vaginal_strap') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>240,rand(-1,pcs_hairbsh),pcs_hairbsh)
|
|
|
if pcs_hairbsh > 0:
|
|
|
if arrpos('$ARGS', 'bound') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>270,rand(0,pcs_hairbsh),pcs_hairbsh)
|
|
|
if arrpos('$ARGS', 'sub') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>300,rand(0,pcs_hairbsh),pcs_hairbsh)
|
|
@@ -764,8 +743,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
|
|
|
end
|
|
|
end
|
|
|
if pcs_makeup > 1:
|
|
|
- if (arrpos('$ARGS', 'bj') >= 0 _
|
|
|
- or arrpos('$ARGS', 'cuni_give') >= 0): pcs_makeup = iif(rand(pcs_makeup, pcs_makupskl/10)<3,rand(0,1),pcs_makeup)
|
|
|
+ if (arrpos('$ARGS', 'bj') >= 0 or arrpos('$ARGS', 'cuni_give') >= 0): pcs_makeup = iif(rand(pcs_makeup, pcs_makupskl/10)<3,rand(0,1),pcs_makeup)
|
|
|
end
|
|
|
end
|
|
|
|