Merge remote-tracking branch 'spectre1viper/master'

locations/Cum_Manage.qsrc

@@ -147,8 +147,17 @@ if $ARGS[0] = '':
 
 	if cumprecheck ! 1:
 
-!!{	Here it checks for vaginal deposit.}
+!!{	Here it checks for anal deposit and increments anal creampie variable.}
+
+		if spafinloc = 3:
+			if sexunaware = 1 or sexcontra = 6:
+				pcs_acp_unknown += 1
+			else
+				pcs_acp_known += 1
+			end
+		end
 
+!!{	Here it checks for vaginal deposit.}
 
 		if spafinloc <= 0:
 
@@ -337,7 +346,7 @@ if $ARGS[0] = '':
 
 			end
 
-	!! creampie statistics:
+	!! creampie vaginal statistics:
 			if spafinloc = 0:
 				!! safe creampie (if cycle > 3 or on pill or succubus):
 				if cycle > 3 or pillcon2 > 1000 or succubusflag = 1:
@@ -361,16 +370,7 @@ if $ARGS[0] = '':
 						pcs_cp_risky_known += 1
 					end
 				end
-			elseif spafinloc = 3:
-				if sexunaware = 1 or sexcontra = 6:
-					pcs_acp_unknown += 1
-				else
-					pcs_acp_known += 1
-				end
-			end
-			
-			
-
+			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.

locations/din_van.qsrc

@@ -675,7 +675,7 @@ $pirLip = {
 	:looplip_pir
 		if dyneval('RESULT = PirsB<<i>>_owned') = 1:*p '<a href="exec:pirsB = <<i>> & pierWearCount += 1 & dynamic $pirManage"><img src="images/pc/body/piercings/b<<i>>.jpg"	height="250" ></a>'
 		i += 1
-	if i <= 6:jump 'looplip_pir'
+	if i <= 7:jump 'looplip_pir'
 }
 
 $pirEars = {