mjsmagalhaes пре 8 година
родитељ
комит
05d433bae2
2 измењених фајлова са 102 додато и 469 уклоњено
  1. 1 1
      MakeQSP.bat
  2. 101 468
      locations/stat

+ 1 - 1
MakeQSP.bat

@@ -1,2 +1,2 @@
 python -3 txtmerge.py locations glife.txt
-txt2gam.exe glife.txt glife.qsp
+txt2gam.exe glife.txt ../GL_ECV/glife.qsp

+ 101 - 468
locations/stat

@@ -187,7 +187,7 @@ end
 
 shameless = guy + bj + anal + hj + ((slutty + gang) * 2)
 moneySUM = money + karta + stolmoney
-cumSUM = cumsumbod/40
+cumSUM = cumbelly + cumpussy + cumass + cumlip + cumface + cumfrot + cumanus
 
 if husbizvradd > 5:izvratH = 1
 if husbharmin > 10:harakHusb = 0
@@ -402,6 +402,13 @@ mannamax = (intel * magik) + magik * 100 + vital * 10 + rikudo
 
 
 ! WD: totminut fix ~ Calculates total minutes since NYE 2000
+!! old calc added the value of the variable 'minut'
+!! not the number of minutes passed since last update
+!if nminut ! minut:
+!	!!totminut playing time in minutes
+!	totminut += minut
+!	nminut = minut
+!end
 
 if nminut ! minut:
 	! Zero totminut will be at New Years Eve of 2015
@@ -497,7 +504,6 @@ if minut >= 60:
 	water -= 1
 	son -= 1
 	minut -= 60
-	gs 'femcyc'
 
 	if alko > 0 and alkoblock = 0:
 		if alko >= 4:
@@ -562,10 +568,7 @@ if minut >= 60:
 		manna -= 5
 	end
 
-	if energy > 25:
-		fat += (energy - 25) / 2
-		energy = 25
-	end
+	if energy >= 25:energy -= 5 & fat += 1
 
 	if mosol > 0:
 		if tanga = 1 or $clothingworntype = 'nude':mosol -= 1
@@ -613,6 +616,23 @@ if hour >= 24:
 		vidage += 1
 	end
 
+	! WD: Piecing arousal is bit broken as only fires at midnight is more horny than previous night
+	! WD: Moved out of daily to enod of time
+	! if horny > hornyStat:
+		! hornyStat = horny
+		! if pirsA > 0:horny += 1
+		! if pirsB > 0:horny += 1
+		! if pirsC > 0:horny += 1
+		! if pirsD > 0:horny += 1
+		! if pirsE > 0:horny += 1
+		! if pirsF > 0:horny += 5
+		! if pirsG > 0:horny += 5
+		! if pirsN > 0:horny += 1
+	! end
+
+	! if horny < hornyStat:hornyStat = horny
+	
+	
 	!!!!!!!!!!!!!!!
 	!!!generation!!!
 	!!!!!!!!!!!!!!!
@@ -638,68 +658,20 @@ if hour >= 24:
 	if IvanPodstavaQW = 2 and PodpiskaNeviezd = 30:IvanPodstavaQW = 3
 	if IvanPodstavaQW = 2 and PodpiskaNeviezd > 0 and PodpiskaNeviezd < 30:PodpiskaNeviezd += 1
 
-	if salo > (fat + 40):
-		salo -= 3
-		fat += 3
-	elseif salo > (fat + 20):
+	if salo > fat:
 		salo -= 1
 		fat += 1
-	elseif salo > (fat + 10):
-		fatD2roll = rand(0,1)
-		salo -= fatD2roll
-		fat += fatD2roll
-	end
-
-	if fat > (salo + 40):
-		salo += 3
-		fat -= 3
-	elseif fat > (salo + 20):
-		salo += 1
-		fat -= 1
-	elseif fat > (salo + 10):
-		fatD2roll = rand(0,1)
-		salo += fatD2roll
-		fat -= fatD2roll
-	end
-
-	if salo > 240:
-		salo = 240
-	elseif salo > 180:
-		salo -= 3
-	elseif salo > 120:
-		salo -= 2
-	elseif salo > 60:
-		salo -= 1
-	elseif salo < 30: 
-		salo += 2
-	elseif salo < 60:
+		if salo>fat*2:
+			salo -= 1
+			fat += 1
+		end
+		if salo>fat*4:
+			salo -= 1
+			fat += 1
+		end
+	elseif salo < fat:
 		salo += 1
-	end
-
-	if fat > 240:
-		fat = 240
-	elseif fat > 180:
-		fat -= 3
-	elseif fat > 120:
-		fat -= 2
-	elseif fat > 60:
 		fat -= 1
-	elseif fat < 30:
-		fat += 2
-	elseif fat < 60:
-		fat += 1
-	end
-
-	if strenbuf > 90:
-		strenbuf -= 2
-	elseif strenbuf > 80:
-		strenbuf -= 1
-	end
-
-	if vitalbuf > 90:
-		vitalbuf -= 2
-	elseif vitalbuf > 80:
-		vitalbuf -= 1
 	end
 
 	if strenbuf > stren:strenbuf -= 1
@@ -857,6 +829,11 @@ else
 	if day > 30:day -= 30 & month += 1
 end
 
+! if day > 30:
+	! day -= 30
+	! month += 1
+! end
+
 if day = 0:day = 1
 
 if week > 7:
@@ -1272,8 +1249,7 @@ pl
 pl '<b><<money>></b> rubles in your purse.'
 if karta > 0:pl '<b><<karta>></b> rubles in your bank account.'
 if stolmoney > 0:pl '<b><<stolmoney>></b> rubles in your table drawer.'
-
-if fairycurse >= daystart: horny = 90
+pl
 
 if ETOmenu = 1:
 	pl '<b><<$health>></b>'
@@ -1311,10 +1287,10 @@ if  pogodaday = daystart: pl '<<$pogoda>>' & pl
 
 if opPRE = 0: pl '<<$mop>> and your hair is <<$hapri>>.' & pl
 
-if StoryLine > 0 and SchoolAtestat = 0:pl '<<$holyday>>'
-if birthday = day and birthmonth = month:pl '<b>Today is your birthday.</b>'
+if StoryLine > 0 and SchoolAtestat = 0 and $holyday ! '': pl '<<$holyday>>' & pl
+if birthday = day and birthmonth = month: pl '<b>Today is your birthday.</b>' & pl
 
-!!if shame > 0:pl '<<$shame>>'
+!!if shame > 0:pl '<<$shame>>' & pl
 pl '<b><<$manna>></b>'
 pl
 
@@ -1328,8 +1304,12 @@ if horny >= 50:
 	else
 		pl'<font color = #FF1493>You feel that between your legs you are <a href="exec:view''images/picb/briefs2a.jpg''">soaked</a> from your juices.</font>' 
 	end
+	pl
 end
 
+!MJ: It should be moved up .... Before sentences update.
+if fairycurse >= daystart: horny = 90
+
 $smoker = {
 	siga -= 1
 	smoker += 1
@@ -1362,20 +1342,20 @@ elseif CondomToggle = 0 and Sprezik > 0:
 end
 
 if $mud ! '':pl '<font color="green"><b><<$mud>></b></font>.'
-if siga <= 0 and smoker >= 20:pl '<font color="red"><b>You have run out of cigarettes.</b></font>' & pl
+if siga <= 0 and smoker >= 20:pl '<font color="red"><b>You have run out of cigarettes.</b></font>.' & pl
 
 if smokeNeed > 0 and siga > 0 and smoker >= 20:
-	pl '<a href="exec:dynamic $smoker"><font color="red"><b>You want to smoke. You have <<siga>> cigarettes left.</b></font></a>'
+	pl '<a href="exec:dynamic $smoker"><font color="red"><b>You want to smoke. You have <<siga>> cigarettes left</b></font></a>.'
 	pl
 elseif siga > 0 and smoker >= 20:
-	pl '<a href="exec:dynamic $smoker"><font color="blue"><b>You have <<siga>> cigarettes left.</b></font></a>'
+	pl '<a href="exec:dynamic $smoker"><font color="blue"><b>You have <<siga>> cigarettes left</b></font></a>.'
 	pl
 end
 
 if siga > 0 and smoker < 20:
 	if smokeHour = hour and smokeday = day and smokeminut >= minut:
 	else
-		pl'<a href="exec:dynamic $smoker"><font color = blue><b>You have <<siga>> cigarettes.</b></font></a>'
+		pl'<a href="exec:dynamic $smoker"><font color = blue><b>You have <<siga>> cigarettes</b></font></a>'
 		pl
 	end
 end
@@ -1404,15 +1384,8 @@ elseif sweat > 3:
 	pl '<b><font color="red">You really stink.</font></b>'
 end
 
-if sweat = 0: pl
+if sweat > 0: pl
 
-if cyccustom = 0:
-	temp[1] = daystart-daylastperiod
-	pl 'It has been <<temp[1]>> days since you last had a period.'
-else
-	temp[1] = daystart-daylastperiod
-	pl 'It has been <<temp[1]>> days since you last remember having a period.'
-end
 if preg = 1:
 	rodtime = 280 - pregtime
 	if pregtime < 280 and pregtime > 27:knowpreg = 1 & pl '<b><font color="blue">You have been pregnant for <<pregtime>> days. Days until delivery <<rodtime>></font></b>'
@@ -1424,116 +1397,68 @@ if preg = 1:
 	elseif pregtime >= 90:
 		pl'<font color = black>Do you have a barely perceptible <a href="exec:view''images/pregnant/1.jpg''"> tummy</a>, which, however, invisible under clothing</font>'
 	end
-end
-if mesec > 0:
-	if isprok = 0 and isprokp = 0:
-		pl '<b><font color="red">You are bleeding between your legs, you need to use feminine hygine products.</font></b>'
-	elseif isprok = 1:
-		pl 'You are having your period.'
-	elseif isprokp = 1:
-		if tenga = 0:
-			pl '<b><font color="red">You are bleeding between your legs, you need to use feminine hygine products.</font></b>'
-		else
-			pl 'You are having your period.'
-		end
-	end
+else
+	if isprok = 0 and mesec > 0:pl '<b><font color="red">You are bleeding between your legs, urgently need a tampon.</font></b>'
+	if isprok = 1 and mesec > 0:pl 'You are having your period.'
 end
 
-if lactate = 1:
-	if lactatemv >= lactatemm-1:
-		pl'<font color = black>Your breasts are so full they hurt and a little milk is constantly dribbling out.</font>'
-	elseif lactatemv > lactatemm*9/10:
-		pl'<font color = black>Your breasts are firm and full, and starting to hurt from all the milk they contain.</font>'
-	elseif lactatemv > lactatemm*3/4:
-		pl'<font color = black>Your breasts feel firm and heavy, full of milk.</font>'
-	elseif lactatemv > lactatemm/2:
-		pl'<font color = black>Your breasts are heavy, a cargo of milk inside.</font>'
-	elseif lactatemv > lactatemm/4:
-		pl'<font color = black>Your breasts feel a little heavy.</font>'
-	elseif lactatemv > 0:
-		pl'<font color = black>Your breasts tingle a little from the feeling of milk production.</font>'
-	else
-		pl'<font color = black>Your breasts feel soft and empty.</font>'
-	end
-end
 if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:pl '<b><font color="red">It''s time to work your shift as a waitress in a cafe</font></b>'
 if hour >= 8 and hour < 9 and week < 5 and workSec >= 1:pl '<b><font color="red">It''s time to work your shift as a secretary</font></b>'
 if PersSecWork = 1 and week < 6 and hour < 10 and hour >= 5:pl '<b><font color="red">It''s time to work your shift as a secretary</font></b>'
 if workFabrika = 1 and week => 1 and week <= 5 and hour = 8 and age >= 18 or workFabrika = 1 and week => 1 and week <= 5 and hour = 16 and age < 18:pl'<b><font color = red>TheAM To go to work in the factory as a seamstress Pavlovsky</font></b>'
 
+if cumlip = 1:fbreath = 0
+
 $cumeater = {
-	spdirtyb = 1
-	fbreath = 0
+	if rand(0,3) = 0: energy += 1
+	cumbelly = 0
+	cumlip += 1
 	vaf += 1
-	sparrvol[cumloc] -= 20
 	gs 'stat'
-	'You collect the sperm from your stomach with your fingers and lick them, feeling the tart taste of semen.'
+	'You collect the sperm from your stomach with your fingers and lick them feeling the tart taste of semen.'
 }
 $cumeater2 = {
-	spdirtyb = 1
-	fbreath = 0
+	if rand(0,3) = 0: energy += 1
+	cumpussy = 0
+	cumlip += 1
 	vaf += 1
-	sparrvol[cumloc] -= 20
 	gs 'stat'
-	'You collect the sperm from your pussy with your fingers and lick them, feeling the tart taste of semen.'
+	'You collect the sperm from your pussy with your fingers and lick them feeling the tart taste of semen.'
 }
 $cumeater3 = {
-	spdirtyb = 1
-	fbreath = 0
+	if rand(0,3) = 0: energy += 1
+	cumass = 0
+	cumlip += 1
 	vaf += 1
-	sparrvol[cumloc] -= 20
 	gs 'stat'
-	'You collect the sperm from your buttocks with your fingers and lick them, feeling the tart taste of semen.'
+	'You collect the sperm from your buttocks with your fingers and lick them feeling the tart taste of semen.'
 }
 $cumeater4 = {
-	spdirtyb = 1
-	fbreath = 0
+	if rand(0,3) = 0: energy += 1
+	cumface = 0
+	cumlip += 1
 	vaf += 1
-	sparrvol[cumloc] -= 20
 	gs 'stat'
-	'You collect the sperm from your face with your fingers and lick them, feeling the tart taste of semen.'
+	'You collect the sperm from your face with your fingers and lick them feeling the tart taste of semen.'
 }
 $cumeater5 = {
-	spdirtyb = 1
-	fbreath = 0
+	if rand(0,3) = 0: energy += 1
+	cumfrot = 0
+	cumlip += 1
 	vaf += 1
-	sparrvol[cumloc] -= 20
 	gs 'stat'
-	'You collect the sperm from your clothes with your fingers and lick them, feeling the tart taste of semen.'
+	'You collect the sperm from your clothes with your fingers and lick them feeling the tart taste of semen.'
 }
 
 $cumeater6 = {
-	spdirtyb = 1
-	fbreath = 0
-	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your anus with your fingers and lick them, feeling the tart taste of semen.'
-}
-$cumeater7 = {
-	spdirtyb = 1
-	fbreath = 0
+	if rand(0,3) = 0: energy += 1
+	cumanus = 0
+	cumlip += 1
 	vaf += 1
-	sparrvol[cumloc] -= 20
 	gs 'stat'
-	'You collect the sperm from your body with your fingers and lick them, feeling the tart taste of semen.'
-}
-$cumeater8 = {
-	spdirtyb = 1
-	fbreath = 0
-	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You lick your fingers clean, feeling the tart taste of semen.'
-}
-$cumeater9 = {
-	spdirtyb = 1
-	fbreath = 0
-	vaf += 1
-	sparrvol[cumloc] -= 20
-	gs 'stat'
-	'You collect the sperm from your hair with your fingers and lick them, feeling the tart taste of semen.'
+	'You collect the sperm from your anus with your fingers and lick them feeling the tart taste of semen.'
 }
+
 $clear_write = {
 	body_write = 0
 	face_write = 0
@@ -1560,314 +1485,24 @@ if body_write > 0 and face_write > 0:
 	end
 end
 
-$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
-	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 = 0
-	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
-
-if $clothingworntype = 'nude' and lactatemess > 0:
-	if lactatemess < 3:
-		pl'<font color = black>You have a little milk residue around your nipples.</font>'
-	elseif if lactatemess < 7:
-		pl'<font color = black>You have a lot of milk residue around your nipples.</font>'
-	else
-		pl'<font color = black>Your breasts are drenched with milk residue.</font>'
-	end
-elseif lactatemess > 0:
-	if lactatemess < 3:
-		pl'<font color = black>You have tiny wet spots on your clothes above your nippes.</font>'
-	elseif if lactatemess < 7:
-		pl'<font color = black>Milk has soaked through your clothes and made visible circles on your breasts.</font>'
-	else
-		pl'<font color = black>Your shirt is drenched with milk from your breasts.</font>'
-	end	
+if swallow < 10:
+	if cumbelly > 0:pl '<b><font color="red">Your <a href="exec:view''images/body/cumbelly.jpg''">stomach</a> is smeared with sperm.</font></b>'
+	if cumpussy > 0:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumpussy.jpg''">pussy</a>.</font></b>'
+	if cumass > 0:pl '<b><font color="red">Your <a href="exec:view''images/body/cumass.jpg''">ass</a> is smeared with semen.</font></b>'
+	if cumface > 0:pl '<b><font color="red">Your <a href="exec:view''images/body/cumface.jpg''">face</a> and hair are smeared with sperm.</font></b>'
+	if cumfrot > 0:pl '<b><font color="red">You have semen stains on your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.</font></b>'
+	if cumanus > 0:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumanal.jpg''">ass</a>.</font></b>'
+else
+	if cumbelly > 0:pl '<a href="exec:view''images/body/cumbelly.jpg''"><b><font color="red">Your stomach is smeared with </font></b></a><a href="exec:dynamic $cumeater"><b><font color="blue">sperm.</font></b></a>'
+	if cumpussy > 0:pl '<a href="exec:view''images/body/cumpussy.jpg''"><a href="exec:dynamic $cumeater2"><b><font color="blue">Sperm</font></b></a><b><font color="red"> slowly flows from your pussy</font></b></a>.'
+	if cumass > 0:pl '<a href="exec:view''images/body/cumass.jpg''"><b><font color="red">Your ass is smeared with </font></b></a><a href="exec:dynamic $cumeater3"><b><font color="blue">semen.</font></b></a>'
+	if cumface > 0:pl '<a href="exec:view''images/body/cumface.jpg''"><b><font color="red">Your face and hair are smeared with </font></b></a><a href="exec:dynamic $cumeater4"><b><font color="blue">sperm.</font></b></a>'
+	if cumfrot > 0:pl '<a href="exec:view''images/body/cumfrot.jpg''"><b><font color="red">You have <a href="exec:dynamic $cumeater5"><b><font color="blue">semen</font></b></a> stains on your clothes</font></b></a>.'
+	if cumanus > 0:pl '<a href="exec:view''images/body/cumanal.jpg''"><a href="exec:dynamic $cumeater6"><b><font color="blue">Sperm</font></b></a><b><font color="red"> slowly flows from your ass</font></b></a>.'
 end
+
+if cumlip > 0:pl '<b><font color="red">Your mouth smells like sperm.</font></b>'
+
 if vgape > 0:
 	if vgape >= 3:
 		pl '<b><font color="red">You have very sore vagina, you can hardly even walk, while trying to keep your feet apart.</font></b>'
@@ -2017,8 +1652,6 @@ if StoryLine = 1 and sisboyday + 1 = daystart and hour < 19 and sisboytrioQW = 1
 
 
 
-dynamic $brotherSexCount
-
 if bag > 0:pl '<a href="exec:dynamic $d_bag"><b>Handbag</b></a>'
 
 !!zero checks marriage