|
@@ -11,26 +11,26 @@
|
|
|
!!
|
|
|
!! Cum Array indices:
|
|
|
!!
|
|
|
-!! cumarrnam : Sperm Owner
|
|
|
-!! cumarrppt : Sperm Potential Potency (max sperm delivery)
|
|
|
-!! cumarrcpt : Sperm Current Potency (current amount of sperm)
|
|
|
-!! cumarrdel : Sperm "Delivery" (method of *VAGINAL ONLY* acquisition)
|
|
|
-!! cumarrcon : Contraception type used
|
|
|
-!! cumarrage : Sperm age in hours
|
|
|
-!! cumarrkno : Did you know/realize who did it?
|
|
|
-!! cumarrcnt : Unique identifier of the exact which time the MC has had this sperm incident occur.
|
|
|
+!! $cumarrnam : Sperm Owner
|
|
|
+!! cumarrppt : Sperm Potential Potency (max sperm delivery)
|
|
|
+!! cumarrcpt : Sperm Current Potency (current amount of sperm)
|
|
|
+!! cumarrdel : Sperm "Delivery" (method of *VAGINAL ONLY* acquisition)
|
|
|
+!! cumarrcon : Contraception type used
|
|
|
+!! cumarrage : Sperm age in hours
|
|
|
+!! cumarrkno : Did you know/realize who did it?
|
|
|
+!! cumarrcnt : Unique identifier of the exact which time the MC has had this sperm incident occur.
|
|
|
!!
|
|
|
!!
|
|
|
!!
|
|
|
!! Spatter Array indices:
|
|
|
!!
|
|
|
-!! sparrloc : Location of the sperm, as per cumarrdel
|
|
|
-!! sparrnam : Spatter Owner
|
|
|
-!! sparrppt : Spatter Potential Potency (Used to increase potency if you don't clean yourself out)
|
|
|
-!! sparridt : Did you know/realize who did it?
|
|
|
-!! sparrvol : Volume of the spatter. 40 is average.
|
|
|
-!! sparrslc : Spread status of the spatter. High volume can spread the contaminant from it's starting place.
|
|
|
-!! sparrcnt : Unique identifier of the exact which time the MC has had this spatter incident occur.
|
|
|
+!! sparrloc : Location of the sperm, as per cumarrdel
|
|
|
+!! $sparrnam : Spatter Owner
|
|
|
+!! sparrppt : Spatter Potential Potency (Used to increase potency if you don't clean yourself out)
|
|
|
+!! sparridt : Did you know/realize who did it?
|
|
|
+!! sparrvol : Volume of the spatter. 40 is average.
|
|
|
+!! sparrslc : Spread status of the spatter. High volume can spread the contaminant from it's starting place.
|
|
|
+!! sparrcnt : Unique identifier of the exact which time the MC has had this spatter incident occur.
|
|
|
!!
|
|
|
!!
|
|
|
!!
|
|
@@ -539,7 +539,7 @@ if $ARGS[0] = 'cumeater':
|
|
|
|
|
|
if i ! -1 and i < arrsize('sparrloc'):
|
|
|
cumloc[12] = 1
|
|
|
- spafinloc = 12 & sexvolume = sparrvol[i] & sexunaware = 0 & sexspecpot = -1 & cumarrnam = sparrnam[i] & cumarrcpt = sparrppt[i] & cumarrkno = sparridt[i] & cumarrage = sparrage[i] & cumnostd = 1 & gs 'Cum_Manage'
|
|
|
+ !!spafinloc = 12 & sexvolume = sparrvol[i] & sexunaware = 0 & sexspecpot = -1 & $cumarrnam = $sparrnam[i] & cumarrcpt = sparrppt[i] & cumarrkno = sparridt[i] & cumarrage = sparrage[i] & cumnostd = 1 & gs 'Cum_Manage'
|
|
|
pcs_breath = 0
|
|
|
$part = ''
|
|
|
|
|
@@ -1139,7 +1139,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 1
|
|
|
sexunaware = iif(cumforced=0,iif(rand(0,4)=1 or sparridt[idx]=-2,1,0),0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[1] += sexvolume & cumloc[1] = 1
|
|
|
end
|
|
@@ -1151,7 +1151,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
spafinloc = 2
|
|
|
sexvolume = max(1, cumamount/2)
|
|
|
sexunaware = iif(rand(0,3)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[2] += sexvolume & cumloc[2] = 1
|
|
|
end
|
|
@@ -1161,7 +1161,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 9
|
|
|
sexunaware = iif(rand(0,2)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[9] += sexvolume & cumloc[9] = 1
|
|
|
end
|
|
@@ -1172,7 +1172,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 6
|
|
|
sexunaware = iif(rand(0,4)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = 0 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[6] += sexvolume & cumloc[6] = 1
|
|
|
end
|
|
@@ -1202,7 +1202,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 1
|
|
|
sexunaware = iif(cumforced=0,iif(rand(0,4)=1 or sparridt[idx]=-2,1,0),0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx]/2 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx]/2 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[1] += sexvolume & cumloc[1] = 1
|
|
|
end
|
|
@@ -1213,7 +1213,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
spafinloc = 4
|
|
|
sexvolume = max(0, cumamount/2)
|
|
|
sexunaware = 0
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[4] += sexvolume & cumloc[4] = 1
|
|
|
end
|
|
@@ -1225,7 +1225,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
spafinloc = 5
|
|
|
sexvolume = max(1, cumamount/3)
|
|
|
sexunaware = iif(rand(0,3)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[5] += sexvolume & cumloc[5] = 1
|
|
|
end
|
|
@@ -1235,7 +1235,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 9
|
|
|
sexunaware = iif(rand(0,2)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx]/4 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx]/4 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[9] += sexvolume & cumloc[9] = 1
|
|
|
end
|
|
@@ -1246,7 +1246,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 6
|
|
|
sexunaware = iif(rand(0,4)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[6] += sexvolume & cumloc[6] = 1
|
|
|
end
|
|
@@ -1265,7 +1265,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
sparrvol[idx] -= sexvolume
|
|
|
spafinloc = iif(i=1,2,5)
|
|
|
sexunaware = 1
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx] & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 0
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx] & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 0
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[iif(i=1,2,5)] += sexvolume & cumloc[iif(i=1,2,5)] = 1
|
|
|
end
|
|
@@ -1275,7 +1275,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
if sexvolume > 0:
|
|
|
spafinloc = 6
|
|
|
sexunaware = iif(rand(0,4)=1 or sparridt[idx]=-2,1,0)
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx]/3 & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 1
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[6] += sexvolume & cumloc[6] = 1
|
|
|
end
|
|
@@ -1291,7 +1291,7 @@ if $ARGS[0] = 'cum_decay':
|
|
|
sparrvol[idx] -= sexvolume
|
|
|
spafinloc = 0
|
|
|
sexunaware = 1
|
|
|
- sexspecpot = -1 & cumarrnam = sparrnam[idx] & cumarrcpt = sparrppt[idx] & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 0
|
|
|
+ sexspecpot = -1 & $cumarrnam = $sparrnam[idx] & cumarrcpt = sparrppt[idx] & cumarrkno = sparridt[idx] & cumarrage = sparrage[idx] & cumnostd = 0
|
|
|
gs 'Cum_Manage'
|
|
|
cumvol[17] -= sexvolume & cumvol[0] += sexvolume & cumloc[0] = 1
|
|
|
end
|