# Cum_Manage
!{ Locations to be defined by 'spafinloc'
0 = 'In your Vagina'
1 = 'On your labia'
2 = 'On your panties over your vagina'
3 = 'In your anus'
4 = 'On your butt'
5 = 'On your panties over your butt'
6 = 'On your clothes in your groin area'
7 = 'On your clothes'
8 = 'On your back'
9 = 'On your legs'
10 = 'On your arms'
11 = 'On your face'
12 = 'Inside your mouth'
13 = 'On your hands'
14 = 'On your stomach'
15 = 'On your breasts'
16 = 'In your hair'
17 = 'In a condom in your vagina'}
if $ARGS[0] = '':
!{Sets the cum array temp to the current size of the cum array, to add a new entry to the end of file. Then checks to see if you are on the pill. If you are and there is no contraception used, it flags this as a "done with pill" act, which means a pregnancy will be a pill failure.}
cumarrtemp = arrsize('$cumarrnam')
if sexcontra = 0 and pillcon > 0: sexcontra = 2
if vibratorIN = 1 and spafinloc = 0: vibratorIN = 0
if analplugIN = 1 and spafinloc = 3: analplugIN = 0
!{It checks to see if this is flagged as a preejaculate emmission. All vaginal penetrations that flag this as cumprecheck contain preejaculate. Guidelines for calling it: If your boy is likely to have masterbated, had sex, or otherwise encouraged semen to leak out of their urethra in the last 48 hours, they probably have some fertile preejaculate. If in doubt, let it leak. The chances of pregnancy from it are low, and the MC should have been wearing protection.}
if cumprecheck ! 1:
!{Here it checks for vaginal deposit. If it is, it sees if theres a deposit made by someone named the same. If so, it checks if this new act is protected. If it isnt, it overwrites the old deposit.}
if spafinloc <= 0:
arrmodtmp = arrpos('$cumarrnam',$boy)
if arrmodtmp >= 0:
if $cumarrnam[arrmodtmp] = $boy and cumarrdel[arrmodtmp] = 0 and sexcontra < 3: cumarrtemp = arrmodtmp
end
!{Next it sets the variables in the array. The cumming boys name first, sets the cum age to 0, then the cum delivery location to vaginally, then sees if its a unknowing sex act. If it is, it makes it so the MC doesnt know who did it. Then if the boy has a custom specified potency, it flags the potency. Otherwise it sets it to the default.}
$cumarrnam[cumarrtemp] = $boy
cumarrage[cumarrtemp] = 0
cumarrdel[cumarrtemp] = 0
if sexunaware > 0 or sexpartkno = 0:
cumarrkno[cumarrtemp] = 0
else
cumarrkno[cumarrtemp] = 1
end
if sexspecpot ! 0:
cumarrppt[cumarrtemp] = sexspecpot
else
cumarrppt[cumarrtemp] = 10000
end
!{Now it sets up the splatter and actual internal cum. First it sets the array to the spatter end of file. Then it checks for riding bareback. If theres a condom, it gives a chance for the condom to fail in general, slip off and remain in the vagina, or break. The cumarrcpt, or current internal potency of the sperm, is set dependent on what happened. the contraception type is also set. For bursting or slippage, a spatter is created.}
cumarrtemp2 = arrsize('sparrvol')
arrmodtmp = arrsize('sparrvol')
:arrmodloop1
if sparrloc[arrmodtmp] = spafinloc and $sparrnam[arrmodtmp] = $boy and sexcontra < 3:
cumarrtemp2 = arrmodtmp
else
arrmodtmp -= 1
if arrmodtmp >= 0: jump 'arrmodloop1'
end
if sexcontra > 2:
if sexcontra = 3:
temprand = rand(0,1000)
if temprand = 0:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/4
cumarrcon[cumarrtemp] = 3
elseif temprand < 4:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/200
cumarrcon[cumarrtemp] = 5
cumcondslip = 1
cumcondsanb = cumarrtemp
sexcontra = 5
sparrage[cumarrtemp2] = 0
sparrloc[cumarrtemp2] = 17
$sparrnam[cumarrtemp2] = $boy
if sexspecpot ! 0:
sparrppt[cumarrtemp2] = sexspecpot
else
sparrppt[cumarrtemp2] = 10000
end
sparrvol[cumarrtemp2] += sexvolume
cumsumbod += sexvolume
cumsumvag += sexvolume
if sexvolume <= 0: sparrvol[cumarrtemp2] += 40 & cumsumbod += 40 & cumsumvag += 40
sparridt[cumarrtemp2] = sexpartkno
sparrslc[cumarrtemp2] = 0
elseif temprand < 10:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/2
cumarrcon[cumarrtemp] = 4
sexcontra = 4
sparrage[cumarrtemp2] = 0
sparrloc[cumarrtemp2] = 0
$sparrnam[cumarrtemp2] = $boy
if sexspecpot ! 0:
sparrppt[cumarrtemp2] = sexspecpot
else
sparrppt[cumarrtemp2] = 10000
end
sparrvol[cumarrtemp2] += sexvolume
cumsumbod += sexvolume
cumsumvag += sexvolume
if sexvolume <= 0: sparrvol[cumarrtemp2] += 40 & cumsumbod += 40 & cumsumvag += 40
sparridt[cumarrtemp2] = sexpartkno
sparrslc[cumarrtemp2] = 0
else
cumarrcpt[cumarrtemp] = 5
cumarrcon[cumarrtemp] = 3
end
!{Next it checks to see if the event is calling specifically for a burst or slipped off condom. It treats them the same as if the condom above had a failure.}
elseif sexcontra = 4:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/2
cumarrcon[cumarrtemp] = 4
sparrage[cumarrtemp2] = 0
sparrloc[cumarrtemp2] = 0
$sparrnam[cumarrtemp2] = $boy
if sexspecpot ! 0:
sparrppt[cumarrtemp2] = sexspecpot
else
sparrppt[cumarrtemp2] = 10000
end
sparrvol[cumarrtemp2] += sexvolume
cumsumbod += sexvolume
cumsumvag += sexvolume
if sexvolume <= 0: sparrvol[cumarrtemp2] += 40 & cumsumbod += 40 & cumsumvag += 40
sparridt[cumarrtemp2] = sexpartkno
sparrslc[cumarrtemp2] = 0
elseif sexcontra = 5:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/200
cumarrcon[cumarrtemp] = 5
cumcondslip = 1
cumcondsanb = cumarrtemp
sparrage[cumarrtemp2] = 0
sparrloc[cumarrtemp2] = 17
$sparrnam[cumarrtemp2] = $boy
if sexspecpot ! 0:
sparrppt[cumarrtemp2] = sexspecpot
else
sparrppt[cumarrtemp2] = 10000
end
sparrvol[cumarrtemp2] += sexvolume
cumsumbod += sexvolume
cumsumvag += sexvolume
if sexvolume <= 0: sparrvol[cumarrtemp2] += 40 & cumsumbod += 40 & cumsumvag += 40
sparridt[cumarrtemp2] = sexpartkno
sparrslc[cumarrtemp2] = 0
!{!Next it checks for sabotaged condoms. First sabotaged by you, then sabotaged by the guy. If they were sabotaged, it acts similar to a condom failure, but worse.}
elseif sexcontra = 6:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/3
cumarrcon[cumarrtemp] = 6
elseif sexcontra = 7:
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/3
cumarrcon[cumarrtemp] = 7
end
!{If you have no protection, you get a nice full load of semen.}
else
sparrage[cumarrtemp2] = 0
sparrloc[cumarrtemp2] = 0
$sparrnam[cumarrtemp2] = $boy
if sexspecpot ! 0:
sparrppt[cumarrtemp2] = sexspecpot
else
sparrppt[cumarrtemp2] = 10000
end
sparrvol[cumarrtemp2] += sexvolume
cumsumbod += sexvolume
cumsumvag += sexvolume
if sexvolume <= 0: sparrvol[cumarrtemp2] += 40 & cumsumbod += 40 & cumsumvag += 40
sparridt[cumarrtemp2] = sexpartkno
sparrslc[cumarrtemp2] = 0
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/5*4
cumarrcon[cumarrtemp] = sexcontra
end
!{If you arent getting it in the vagina, and the boy isnt pumping it into a condom, a spatter is made and applied. If you arent wearing any panties and it was called to hit your panties, it goes directly to your groin. If you are naked and it calls for a clothing strike, it will go to your body instead.}
elseif spafinloc > 0 and sexcontra < 3:
cumarrtemp2 = arrsize('sparrvol')
arrmodtmp = arrsize('sparrvol')
:arrmodloop2
if sparrloc[arrmodtmp] = spafinloc and $sparrnam[arrmodtmp] = $boy and sexcontra < 3:
cumarrtemp2 = arrmodtmp
else
arrmodtmp -= 1
if arrmodtmp >= 0: jump 'arrmodloop2'
end
sparrage[cumarrtemp2] = 0
if tanga = 0:
if spafinloc = 2:
spafinloc = 1
elseif spafinloc = 5:
spafinloc = 4
end
end
if $clothingworntype = 'nude':
if spafinloc = 2:
spafinloc = 1
elseif spafinloc = 5:
spafinloc = 4
elseif spafinloc = 6:
if rand(0,1) = 0:
spafinloc = 1
else
spafinloc = 4
end
elseif spafinloc = 7:
if rand(0,1) = 0:
spafinloc = 14
else
spafinloc = 15
end
end
end
sparrloc[cumarrtemp2] = spafinloc
if spafinloc = 12 and swallow >= 10 and rand(0,3) = 0: energy += 2
$sparrnam[cumarrtemp2] = $boy
if sexspecpot ! 0:
sparrppt[cumarrtemp2] = sexspecpot
else
sparrppt[cumarrtemp2] = 10000
end
sparrvol[cumarrtemp2] += sexvolume
cumsumbod += sexvolume
if sexvolume <= 0: sparrvol[cumarrtemp2] += 40 & cumsumbod += 40 & cumsumvag += 40
if spafinloc = 3:
cumsumass += sexvolume
if sexvolume <= 0: cumsumass += 40
end
sparridt[cumarrtemp2] = sexpartkno
sparrslc[cumarrtemp2] = 0
end
sexpartkno = 0
sexunaware = 0
sexspecpot = 0
!{And this is the pre ejaculate release talked about above.}
elseif sexcontra < 3 and spafinloc = 0:
arrmodtmp = arrpos('$cumarrnam',$boy)
if arrmodtmp >= 0:
if cumarrdel[arrmodtmp] = 0 and cumarrcpt[arrmodtmp] <= ((cumarrppt[arrmodtmp]/12) + 1) and sexcontra < 3: cumarrtemp = arrmodtmp
end
$cumarrnam[cumarrtemp] = $boy
cumarrage[cumarrtemp] = 0
cumarrdel[cumarrtemp] = 0
cumarrkno[cumarrtemp] = 0
if sexspecpot ! 0:
cumarrppt[cumarrtemp] = sexspecpot
else
cumarrppt[cumarrtemp] = 10000
end
cumarrcon[cumarrtemp] = sexcontra
cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]/12
end
sexspecpot = 0
cumprecheck = 0
spafinloc = 0
sexvolume = 0
arrmodtmp = 0
dynamic $din_Update_Condom_Counts
if cumsumass >= 60:
arrmodtmp = arrpos('sparrloc',3)
if sparrslc[arrmodtmp] <= 0: sparrslc[arrmodtmp] += 1
end
if cumsumvag >= 60:
arrmodtmp = arrpos('sparrloc',0)
if sparrslc[arrmodtmp] <= 0: sparrslc[arrmodtmp] += 1
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm <<$cumtemp[3]>>pussy.'
else
pl '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm <<$cumtemp[3]>>pussy.'
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your pussy lips..'
else
pl '<<$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 'You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the crotch of your panties..'
else
pl '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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is stuffed in your ass, corked in by your anal plug.'
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm <<$cumtemp[3]>>ass.'
else
pl '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm <<$cumtemp[3]>>ass.'
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your ass..'
else
pl '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your ass.'
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 'You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the ass of your panties..'
else
pl '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 'You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the crotch of your clothes..'
else
pl 'You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on the crotch of your clothes.'
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 'You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on your clothes..'
else
pl 'You have <<$cumtemp[1]>>''s <<$cumtemp[2]>>semen stains on your clothes.'
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your back..'
else
pl '<<$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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your legs..'
else
pl '<<$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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your arms..'
else
pl '<<$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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your face..'
else
pl '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your face.'
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 'Your mouth smells like <<$cumtemp[1]>>''s sperm..'
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your hands..'
else
pl '<<$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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your stomach..'
else
pl '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your stomach.'
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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared across your breasts..'
else
pl '<<$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 '<<$cumtemp[1]>>''s <<$cumtemp[2]>>sperm is smeared in your hair..'
else
pl '<<$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 '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
}
end
--- Cum_Manage ---------------------------------