Bläddra i källkod

moved statcall back to stat, redid cumeater as individual arguments since I couldn't get 3 argument call to work.

Ekay 8 år sedan
förälder
incheckning
032be64e95
1 ändrade filer med 148 tillägg och 462 borttagningar
  1. 148 462
      locations/Cum_Manage

+ 148 - 462
locations/Cum_Manage

@@ -263,470 +263,156 @@ if $ARGS[0] = '':
 	end
 end
 
-if $ARGS[0] = 'statcall':
-	$temp[1] = {
-		if sparridt[temp1arr] = 1:
-			temp2arr = temp1arr + 1
-			temp3arr = arrpos(temp2arr,'sparrloc',i)
-			if temp3arr > 0 and sparrvol[temp3arr] > 0 and sparrloc[temp3arr] = i and $sparrnam[temp3arr] ! $sparrnam[temp1arr]:
-				$cumtemp[1] = 'Multiple men'
-			else
-				$cumtemp[1] = $sparrnam[temp1arr]
-			end
-		else
-			$cumtemp[1] = 'Somebody'
-		end
-		if sparrage[temp1arr] < temp[2]:
-			$cumtemp[2] = 'fresh '
-		elseif sparrage[temp1arr] < temp[3]:
-			$cumtemp[2] = ''
-		else
-			temp[4] = sparrloc[temp1arr]
-			if temp[4] ! 0 and temp ! 3:
-				$cumtemp[2] = 'crusty '
-			else
-				$cumtemp[2] = 'stale '
-			end
-		end
-	}
-	temp = arrsize('sparrvol')
-	if temp > 0:
-		!{index for use in dynamic}
-		i = 0
-		!{values for fresh and crusty, only updated where needed}
-		temp[2] = 4
-		temp[3] = 10
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			$cumtemp[3] = 'fills your '
-			if sparrslc[temp1arr] > 0:
-				$cumtemp[3] = 'slowly flows from your '
-				spdirtyn = 1
-			elseif sparrslc[temp] > 0 and sparrloc[temp] = 0:
-				$cumtemp[3] = 'slowly flows from your '
-				spdirtyn = 1
-			end
-			if swallow >= 10:
-				pl '<a href="exec:view''images/body/cumpussy.jpg''"><b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',0) & dynamic $cumeater2"><b><font color="blue">sperm</font></b></a><b> <<$cumtemp[3]>>pussy</font></b></a>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm <<$cumtemp[3]>><a href="exec:view''images/body/cumpussy.jpg''">pussy</a>.</font></b>'
-			end
-			spdirty = 1
-			spdirtyi = 1
-		end
-		i = 1
-		temp[2] = 1
-		temp[3] = 5
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',1) & dynamic $cumeater2"><b><font color="blue">sperm</font></b></a><b> is smeared across your pussy lips.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your pussy lips.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 2
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',2) & dynamic $cumeater5"><b><font color="blue">semen</font></b></a><b> stains on the crotch of your panties.</font></b>.'
-			else
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the crotch of your panties.'
-			end
-			spdirtyc = 1
-		end
-		i = 3
-		temp[2] = 4
-		temp[3] = 10
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if analplugin = 1:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is stuffed in your ass, corked in by your anal plug.</font></b>'
-			else
-				$cumtemp[3] = 'fills your '
-				if sparrslc[temp1arr] > 0:
-					$cumtemp[3] = 'slowly flows from your '
-					spdirtyn = 1
-				elseif sparrslc[temp] > 0 and sparrloc[temp] = 3:
-					$cumtemp[3] = 'slowly flows from your '
-					spdirtyn = 1
-				end
-				if swallow >= 10:
-					pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',3) & dynamic $cumeater6"><b><font color="blue">sperm</font></b></a><b> <<$cumtemp[3]>><a href="exec:view''images/body/cumanal.jpg''">ass</a>.</font></b>'
-				else
-					pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm <<$cumtemp[3]>><a href="exec:view''images/body/cumanal.jpg''">ass</a>.</font></b>'
-				end
-			end
-			spdirty = 1
-			spdirtyi = 1
-		end
-		i = 4
-		temp[2] = 1
-		temp[3] = 5
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',4) & dynamic $cumeater3"><b><font color="blue">sperm</font></b></a><b> is smeared across your <a href="exec:view''images/body/cumass.jpg''">ass</a>.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your <a href="exec:view''images/body/cumass.jpg''">ass</a>.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 5
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',5) & dynamic $cumeater5"><b><font color="blue">semen</font></b></a><b> stains on the ass of your panties.</font></b>.'
-			else
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the ass of your panties.'
-			end
-			spdirtyc = 1
-		end
-		i = 6
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',6) & dynamic $cumeater5"><b><font color="blue">semen</font></b></a><b> stains on the crotch of your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.</font></b>.'
-			else
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the crotch of your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.'
-			end
-			spdirtyc = 1
-		end
-		i = 7
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',7) & dynamic $cumeater5"><b><font color="blue">semen</font></b></a><b> stains on your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.</font></b>.'
-			else
-				pl '<b><font color="red">You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.'
-			end
-			spdirtyc = 1
-		end
-		i = 8
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',8) & dynamic $cumeater7"><b><font color="blue">sperm</font></b></a><b> is smeared across your back.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your back.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 9
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',9) & dynamic $cumeater7"><b><font color="blue">sperm</font></b></a><b> is smeared across your legs.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your legs.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 10
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',10) & dynamic $cumeater7"><b><font color="blue">sperm</font></b></a><b> is smeared across your arms.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your arms.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 11
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',11) & dynamic $cumeater7"><b><font color="blue">sperm</font></b></a><b> is smeared across your <a href="exec:view''images/body/cumface.jpg''">face</a>.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your <a href="exec:view''images/body/cumface.jpg''">face</a>.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-			spdirtyv = 1
-		end
-		i = 12
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			pl '<b><font color="red">Your mouth smells like <<$cumtemp[1]>>''s sperm.</a>.'
-			spdirty = 1
-			spdirtyb = 1
-			fbreath = 0
-		end
-		i = 13
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',13) & dynamic $cumeater8"><b><font color="blue">sperm</font></b></a><b> is smeared across your hands.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your hands.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-			spdirtyv = 1
-			spdirtyf = 1
-		end
-		i = 14
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',14) & dynamic $cumeater"><b><font color="blue">sperm</font></b></a><b> is smeared across your <a href="exec:view''images/body/cumbelly.jpg''">stomach</a>.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your <a href="exec:view''images/body/cumbelly.jpg''">stomach</a>.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 15
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',15) & dynamic $cumeater7"><b><font color="blue">sperm</font></b></a><b> is smeared across your breasts.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your breasts.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-		end
-		i = 16
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			dynamic $temp[1]
-			if swallow >= 10 and sparrage[temp1arr] < 5:
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>><a href="exec:temp1arr = arrpos(''sparrloc'',16) & dynamic $cumeater9"><b><font color="blue">sperm</font></b></a><b> is smeared in your hair.</font></b>.'
-			else
-				pl '<b><font color="red"><<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared in your hair.'
-			end
-			spdirty = 1
-			spdirtyn = 1
-			spdirtyv = 1
-		end
-		i = 17
-		temp1arr = arrpos('sparrloc',i)
-		if temp1arr >= 0 and sparrloc[temp1arr] = i and sparrvol[temp1arr] > 0:
-			if sparridt[temp1arr] = 1:
-				$cumtemp[1] = $sparrnam[temp1arr]
-			else
-				$cumtemp[1] = 'Somebody'
-			end
-			if sparrage[temp1arr] < 1:
-				$cumtemp[2] = 'freshly buried'
-			elseif sparrage[temp1arr] < 13:
-				$cumtemp[2] = 'buried'
-			else
-				$cumtemp[2] = 'marinating '
-			end
-			pl '<b><font color="red">A spent condom full of <<$cumtemp[1]>>''s sperm is <<$cumtemp[2]>> deep in your vagina.'
-			spdirty = 1
-			spdirtyi = 1
-		end
-	end
-	!{should kill all temp values}
-	killvar '$temp'
-	killvar '$cumtemp'
-	temp1arr = 0
-	temp2arr = 0
-	temp3arr = 0
-	cumfrot = 0
-	cumpussy = 0
-	cumbelly = 0
-	cumass = 0
-	cumlip = 0
-	cumface = 0
-	cumanus = 0
-end
-
-if $ARGS[0] = 'cumeater':
-	$cumeatercleanup = {
-		KILLVAR 'spafinloc',temp
-		KILLVAR 'sparrage',temp
-		KILLVAR 'sparrloc',temp
-		KILLVAR '$sparrnam',temp
-		KILLVAR 'sparrppt',temp
-		KILLVAR 'sparridt',temp
-		KILLVAR 'sparrvol',temp
-		KILLVAR 'sparrslc',temp
-		cumsumbod -= sparrvol[temp]
-	}
-
-	$cumeater = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your stomach in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your stomach with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:temp = 14 & dynamic $cumeatercleanup
-	}
-
-	$cumeater2 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your pussy in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your pussy with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:
-			temp = 0 & dynamic $cumeatercleanup
-			temp = 1 & dynamic $cumeatercleanup
-		end
-	}
-
-	$cumeater3 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your buttocks in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your buttocks with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:temp = 4 & dynamic $cumeatercleanup
-	}
-
-	$cumeater4 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your face in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your face with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:temp = 11 & dynamic $cumeatercleanup
-	}
-
-	$cumeater5 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your clothes in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your clothes with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:
-			temp = 2 & dynamic $cumeatercleanup
-			temp = 5 & dynamic $cumeatercleanup
-			temp = 6 & dynamic $cumeatercleanup
-			temp = 7 & dynamic $cumeatercleanup
-		end
-	}
-
-	$cumeater6 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your anus in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your anus with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:temp = 3 & dynamic $cumeatercleanup
-	}
-
-	$cumeater7 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your body in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your body with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:
-			temp = 8 & dynamic $cumeatercleanup
-			temp = 9 & dynamic $cumeatercleanup
-			temp = 10 & dynamic $cumeatercleanup
-			temp = 11 & dynamic $cumeatercleanup
-			temp = 15 & dynamic $cumeatercleanup
-		end
-	}
 
-	$cumeater8 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 100:
-			sparrvol[temp1arr] = 0
-			gs 'stat'
-			'You lick up the whole mouthful of sperm, feeling the tart taste as you eat it.'
-		else
-			sparrvol[temp1arr] = 0
-			gs 'stat'
-			'You lick your fingers clean, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:temp = 13 & dynamic $cumeatercleanup
-	}
 
-	$cumeater9 = {
-		spdirtyb = 1
-		fbreath = 0
-		vaf += 1
-		if sparrvol[temp1arr] > 150:
-			sparrvol[temp1arr] -= 100
-			gs 'stat'
-			'You collect a handful of sperm from your hair in your hand and lick it all up, feeling the tart taste of semen.'
-		else
-			sparrvol[temp1arr] -= 20
-			gs 'stat'
-			'You collect the sperm from your hair with your fingers and lick them, feeling the tart taste of semen.'
-		end
-		if sparrvol[temp1arr] <= 0:temp = 16 & dynamic $cumeatercleanup
-	}
+if $ARGS[0] = 'cumeater1':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your stomach in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your stomach with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:temp = 14 & gs 'cum_cleanup', 'cumeatercleanup'
+end
+if $ARGS[0] = 'cumeater2':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your pussy in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your pussy with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:
+		temp = 0 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 1 & gs 'cum_cleanup', 'cumeatercleanup'
+	end
+end
+if $ARGS[0] = 'cumeater3':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your buttocks in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your buttocks with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:temp = 4 & gs 'cum_cleanup', 'cumeatercleanup'
+end
+if $ARGS[0] = 'cumeater4':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your face in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your face with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:temp = 11 & gs 'cum_cleanup', 'cumeatercleanup'
+end
+if $ARGS[0] = 'cumeater5':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your clothes in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your clothes with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:
+		temp = 2 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 5 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 6 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 7 & gs 'cum_cleanup', 'cumeatercleanup'
+	end
+end
+if $ARGS[0] = 'cumeater6':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your anus in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your anus with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:temp = 3 & gs 'cum_cleanup', 'cumeatercleanup'
+end
+if $ARGS[0] = 'cumeater7':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your body in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your body with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:
+		temp = 8 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 9 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 10 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 11 & gs 'cum_cleanup', 'cumeatercleanup'
+		temp = 15 & gs 'cum_cleanup', 'cumeatercleanup'
+	end
+end
+if $ARGS[0] = 'cumeater8':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 100:
+		sparrvol[temp1arr] = 0
+		gs 'stat'
+		'You lick up the whole mouthful of sperm, feeling the tart taste as you eat it.'
+	else
+		sparrvol[temp1arr] = 0
+		gs 'stat'
+		'You lick your fingers clean, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:temp = 13 & gs 'cum_cleanup', 'cumeatercleanup'
+end
+if $ARGS[0] = 'cumeater9':
+	spdirtyb = 1
+	fbreath = 0
+	vaf += 1
+	if sparrvol[temp1arr] > 150:
+		sparrvol[temp1arr] -= 100
+		gs 'stat'
+		'You collect a handful of sperm from your hair in your hand and lick it all up, feeling the tart taste of semen.'
+	else
+		sparrvol[temp1arr] -= 20
+		gs 'stat'
+		'You collect the sperm from your hair with your fingers and lick them, feeling the tart taste of semen.'
+	end
+	if sparrvol[temp1arr] <= 0:temp = 16 & gs 'cum_cleanup', 'cumeatercleanup'
 end
 
 --- Cum_Manage ---------------------------------