Home Explore Help
Register Sign In
Kevin_Smarts
/
glife
59
42
Fork 204
Files Issues 4 Pull Requests 0 Wiki
Browse Source

[added] tangled hair and sweating

Lusticon 4 months ago
parent
8cda311d75
commit
2dcf7cc9bc
1 changed files with 10 additions and 0 deletions
Split View Show Diff Stats
  1. 10 0
      locations/arousal.qsrc

+ 10 - 0
locations/arousal.qsrc
View File 

@@ -703,6 +703,16 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 
 		end
 
 	end
 
 
+	if arrpos('$ARGS', 'rape') >= 0:         pcs_hairbsh = iif(rand(30, pcs_hairlng)>30,-1,pcs_hairbsh)  & pcs_sweat += rand(0,2)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'rough') >= 0:        pcs_hairbsh = iif(rand(30, pcs_hairlng)>40,-1,pcs_hairbsh)  & pcs_sweat += rand(1,2)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'gangbang') >= 0:     pcs_hairbsh = iif(rand(30, pcs_hairlng)>50,-1,pcs_hairbsh)  & pcs_sweat += rand(2,4)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'group') >= 0:        pcs_hairbsh = iif(rand(30, pcs_hairlng)>75,-1,pcs_hairbsh)  & pcs_sweat += rand(1,3)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'beast') >= 0:        pcs_hairbsh = iif(rand(30, pcs_hairlng)>100,-1,pcs_hairbsh) & pcs_sweat += rand(0,2)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'maso') >= 0:         pcs_hairbsh = iif(rand(30, pcs_hairlng)>125,rand(-1,0),pcs_hairbsh) & pcs_sweat += rand(0,1)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'prostitution') >= 0: pcs_hairbsh = iif(rand(30, pcs_hairlng)>150,rand(-1,0),pcs_hairbsh) & pcs_sweat += rand(0,1)*max(1,ARGS[1]/5)
 
+	if arrpos('$ARGS', 'unknown') >= 0:      pcs_hairbsh = iif(rand(30, pcs_hairlng)>200,rand(-1,pcs_hairbsh),pcs_hairbsh)
 
+	if arrpos('$ARGS', 'bound') >= 0:        pcs_hairbsh = iif(rand(30, pcs_hairlng)>250,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)
 
 
 	if stim['mag'] > 9: stim['mag'] = 9