Browse Source

[fixes] reset pregtalk variables for natasha and kolka, so they don't magically now that sveta is pregnant again

julzor 5 years ago
parent
commit
6d59215934

+ 2 - 0
locations/Cheatmenu_din.qsrc

@@ -1535,6 +1535,8 @@ $cheatmenu['force_preg'] = {
 $cheatmenu['remove_preg'] = {
 	pregtime = 0
 	pregtalk = 0
+	pregTalkNat = 0
+	pregTalkbrother = 0
 	preg = 0
 	thinkpreg = 0
 	knowpreg = 0

+ 2 - 0
locations/HotelHole.qsrc

@@ -592,6 +592,8 @@ if $ARGS[0] = 'PregBDSM' :
 									'The nurse turns around, slightly startled, and says, "Oh you are awake. Just one minute, I will get the doctor for you." The nurse quickly exits the room.'
 									pregtime = 0
 									pregtalk = 0
+									pregTalkNat = 0
+									pregTalkbrother = 0
 									preg = 0
 									abortionbirthdate = daystart
 									cycle = 4

+ 2 - 0
locations/bed2.qsrc

@@ -484,6 +484,8 @@ if $ARGS[0] = 'succubinit':
 		preg = 0
 		pregtime = 0
 		pregtalk = 0
+		pregTalkNat = 0
+		pregTalkbrother = 0
 		thinkpreg = 0
 		knowpreg = 0
 		pregchem = 0

+ 2 - 2
locations/brother.qsrc

@@ -315,7 +315,7 @@ if $ARGS[0] = 'start':
 
 	if $loc = 'sitrPar':
 
-		gs 'brother', 'pregreact'
+		if pregTalkBrother = 0: gs 'brother', 'pregreact'
 		gs 'brother', 'brotherSexCount'
 
 		if indorf = 0 and $clothingworntype ! 'nude' and brothersawpirsF=0 and father_go = 1 and npc_rel['A34'] > 85 and hour >= 18 and hour < 23 and pirsF > 0:
@@ -1529,7 +1529,7 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 end
 
 if $ARGS[0] = 'pregreact':
-	if pregTalkbrother = 0 and knowpreg = 1 and kid = 0:
+	if knowpreg = 1 and kid = 0:
 		if $clothingworntype = 'nude' and pregchem > 2000 and brotherSex < 7 and kid = 0:
 			'Surprised, your brother looks at your tummy. "<<$pcs_nickname>>, are you pregnant? <<$npc_nickname[''A29'']>> and dad are going to be pissed!" After a moments pause he adds "You do still look good pregnant, though."'
 			pregTalkbrother = 1

+ 2 - 0
locations/gpoli.qsrc

@@ -57,6 +57,8 @@ if $ARGS[0] = '':
 			knowpregrecover = 1
 			vidage += 1
 			pregtalk = 0
+			pregTalkNat = 0
+			pregTalkbrother = 0
 			pregchem = 0
 			cycle = 4
 			gs 'cum_cleanup', 'reset'

+ 4 - 0
locations/poli.qsrc

@@ -141,6 +141,8 @@ if $ARGS[0] = 'start':
 			money -= 15000
 			pregtime = 0
 			pregtalk = 0
+			pregTalkNat = 0
+			pregTalkbrother = 0
 			preg = 0
 			thinkpreg = 0
 			knowpreg = 0
@@ -232,6 +234,8 @@ if $ARGS[0] = 'start':
 			knowpregrecover = 1
 			vidage += 1
 			pregtalk = 0
+			pregTalkNat = 0
+			pregTalkbrother = 0
 			pregchem = 0
 			cycle = 4
 			gs 'cum_cleanup', 'reset'