ソースを参照

[fixed] Converted individual pregtalk variables for characters into npc_pregtalk[] array and self pregtalk into pcs_pregtalk. Added explination in cum_arrcheat via comments

jhawkkaw 5 年 前
コミット
c50fda7e64

+ 3 - 3
locations/Cheatmenu_din.qsrc

@@ -1660,9 +1660,9 @@ $cheatmenu['force_preg'] = {
 $cheatmenu['remove_preg'] = {
 	pregtime = 0
 	pregtalk = 0
-	pregTalkPC = 0
-	pregTalkNat = 0
-	pregTalkbrother = 0
+	pcs_pregtalk = 0
+	npc_pregtalk['A16'] = 0
+	npc_pregtalk['A34'] = 0
 	preg = 0
 	thinkpreg = 0
 	knowpreg = 0

+ 4 - 4
locations/Gnpc.qsrc

@@ -214,7 +214,7 @@ act 'Take a walk through the park':
 	end
 end
 
-if preg = 1 and pregchem <= 1920 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] > 0 and knowpreg = 1:
+if preg = 1 and pregchem <= 1920 and npc_pregtalk[numnpc] = 0 and gnpcSex[numnpc] > 0 and knowpreg = 1:
 	if $father ! $nameBoyfrend[numnpc]:
 		$pregLie = '(Lie) '
 	else
@@ -233,7 +233,7 @@ if preg = 1 and pregchem <= 1920 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] >
 			act 'Dump him and take the money':
 				cla
 				pcs_dom += 2
-				pregTalk[numnpc] = 1
+				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				money += 5000
 				gs 'stat'
@@ -245,7 +245,7 @@ if preg = 1 and pregchem <= 1920 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] >
 			act 'Dump him and throw the money in his face':
 				cla
 				pcs_dom += 5
-				pregTalk[numnpc] = 1
+				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
 				'You furiously scream at him that you never want to see him again and throw the money in his face before storming off.'
@@ -259,7 +259,7 @@ if preg = 1 and pregchem <= 1920 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] >
 			act 'Dump him':
 				cla
 				pcs_dom += 5
-				pregTalk[numnpc] = 1
+				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
 				'You furiously scream at him that you never want to see him again and storm off.'

+ 3 - 3
locations/HotelHole.qsrc

@@ -617,9 +617,9 @@ 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
-									pregTalkPC = 0
-									pregTalkNat = 0
-									pregTalkbrother = 0
+									pcs_pregtalk = 0
+									npc_pregtalk['A16'] = 0
+									npc_pregtalk['A34'] = 0
 									preg = 0
 									abortionbirthdate = daystart
 									cycle = 4

+ 6 - 6
locations/KatjaHomeTalk.qsrc

@@ -223,7 +223,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and KatjaConflict = 0 and kid = 0:
+	if npc_pregtalk['A14'] = 0 and KatjaConflict = 0 and kid = 0:
 		if knowKatjaPreg = 1 and pregchem >= 3600:
 			cla
 			gs 'stat'
@@ -263,7 +263,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and (KatjaConflict = 0 or katjaconflict = 2) and kid > 0:
+	if npc_pregtalk['A14'] = 0 and (KatjaConflict = 0 or katjaconflict = 2) and kid > 0:
 		if knowKatjaPreg = 1 and pregchem >= 3600:
 			cla
 			gs 'stat'
@@ -285,7 +285,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid = 0:
+	if npc_pregtalk['A14'] = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid = 0:
 		act 'Apologize':
 			cls
 			gs 'stat'
@@ -299,7 +299,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid > 0:
+	if npc_pregtalk['A14'] = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid > 0:
 		act 'Apologize':
 			cls
 			gs 'stat'
@@ -318,7 +318,7 @@ end
 
 if $ARGS[0] = 'katjaknows':
    cla
-   pregTalkKatja = 1
+   npc_pregtalk['A14'] = 1
 	*nl
 	if KatjaSlut < 60 and $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
 		minut += 10
@@ -416,7 +416,7 @@ end
 
 if $ARGS[0] = 'katjaknows1':
 	cla
-	pregTalkKatja = 1
+	npc_pregtalk['A14'] = 1
 	if KatjaSlut < 60: 
 		'"So, hot stuff. Same father as last time?"'
 	else

+ 13 - 13
locations/NatBelHome.qsrc

@@ -291,14 +291,14 @@ elseif lernHome = 0:
 									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t seems to bother her that Kolka may knock her up.'
 								elseif natpregday > 0 and (daystart-natpregday) >= 84:
 									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t really matter now, since Kolka has already knocked her up.'
-								elseif natpregday = 0 and pregtalknat = 1 and natbabycount = 0:
+								elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount = 0:
 									'Natasha looks at you and almost inaudably whispers "Please let him cum inside me. I want a baby too."'
-								elseif natpregday = 0 and pregtalknat = 1 and natbabycount > 0:
+								elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount > 0:
 									'Natasha looks at you and moans "Please let him cum inside me. I need him to give me another baby."'		
 								else
 									'Natasha looks at you questioningly, whether will you let him cum inside of her and risking her getting pregnant with your niece or nephew, or letting her pull away from you brother.'
 								end
-								if natsub >= 20 and pcs_dom > 20 and natcp > 0 and pregtalknat = 0:
+								if natsub >= 20 and pcs_dom > 20 and natcp > 0 and npc_pregtalk['A16'] = 0:
 									act 'Let him cum inside her':
 										cla
 										natcp += 1
@@ -311,7 +311,7 @@ elseif lernHome = 0:
 										gs 'stat'
 										act 'Next':gt $curloc
 									end
-								elseif natsub >= 20 and pcs_dom > 20 and natcp > 0 and pregtalknat = 1:
+								elseif natsub >= 20 and pcs_dom > 20 and natcp > 0 and npc_pregtalk['A16'] = 1:
 									act 'Let him cum inside her':
 										cla
 										natcp += 1
@@ -475,7 +475,7 @@ elseif lernHome = 0:
 	end
 end
 
-if pregTalkNat = 0 and kid = 0:
+if npc_pregtalk['A16'] = 0 and kid = 0:
 	if natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and pregchem >= 3600:
 		*clr & cla
 		gs 'stat'
@@ -496,7 +496,7 @@ if pregTalkNat = 0 and kid = 0:
 			*nl
 			'"<<$pcs_nickname>>, you''re," she pauses momentarily before continuing in a tone of shock mixed with disgust, "pregnant? Have you been sleeping around? This will definitely impact your studies."'
 			act 'Continue' :gt 'NatBelhome'
-			pregTalkNat = 1
+			npc_pregtalk['A16'] = 1
 		end
 	elseif pregchem > 0 and knowpreg = 1 and natsub > 0 and (daystart-natpregday) < 84:
 		act 'Tell her you''re pregnant':
@@ -508,19 +508,19 @@ if pregTalkNat = 0 and kid = 0:
 				'"Honestly, I don''t even know."'
 				'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
 				act 'Continue' :gt 'NatBelhome'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 			else
 				'You tell her that <<$wombthfath>> is the father and then give her brief details as to how you got pregnant, without getting too explicit.'
 				*nl
 				'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
 				act 'Continue' :gt 'NatBelhome'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 			end
 		end
 	end
 end
 
-if pregTalkNat = 0 and kid > 0:
+if npc_pregtalk['A16'] = 0 and kid > 0:
 	if (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and pregchem >= 3600:
 		*clr & cla
 		gs 'stat'
@@ -541,7 +541,7 @@ if pregTalkNat = 0 and kid > 0:
 			*nl
 			'"Really? You''re pregnant again? You should really try to be more careful."'
 			act 'Continue' :gt 'NatBelhome'
-			pregTalkNat = 1
+			npc_pregtalk['A16'] = 1
 		end
 	elseif pregchem > 0 and natsub > 0 and (daystart-natpregday) < 84 and knowpreg = 1:
 		act 'Tell her you''re pregnant':
@@ -549,14 +549,14 @@ if pregTalkNat = 0 and kid > 0:
 			*nl
 			'"You got pregnant again. It must be wonderful…" She trails off, clearly envious.'
 			act 'Continue' :gt 'NatBelhome'
-			pregTalkNat = 1
+			npc_pregtalk['A16'] = 1
 		end
 	end
 end
 
 if $ARGS[0] = 'natknows':
 	cla
-	pregTalkNat = 1
+	npc_pregtalk['A16'] = 1
 	if pav_slut < 125: '"So, who''s the father?"'
 	if pav_slut >= 125: '"So, do you know who the father is?"'
 	*nl
@@ -578,7 +578,7 @@ end
 !When pregnancy fetish is added, another reaction will be added here
 if $ARGS[0] = 'natknows1':
 	cla
-	pregTalkNat = 1
+	npc_pregtalk['A16'] = 1
 	if pav_slut < 125: '"Is it the same father as last time?"'
 	if pav_slut >= 125: '"Do you know if it''s the same father as last time?"'
 	*nl

+ 3 - 3
locations/bed2.qsrc

@@ -494,9 +494,9 @@ if $ARGS[0] = 'succubinit':
 		preg = 0
 		pregtime = 0
 		pregtalk = 0
-		pregTalkPC = 0
-		pregTalkNat = 0
-		pregTalkbrother = 0
+		pcs_pregtalk = 0
+		npc_pregtalk['A16'] = 0
+		npc_pregtalk['A34'] = 0
 		thinkpreg = 0
 		knowpreg = 0
 		pregchem = 0

+ 15 - 15
locations/brother.qsrc

@@ -23,7 +23,7 @@ if npc_QW['A34'] > 20 and npc_QW['A34'] < 25: npc_QW['A34'] = 20
 ! npc_QW['A34']: Quest stages
 ! brotherAge: your age - 2
 ! brotherknowslut: brother knowledge of your sexual activity (1 = seen cum, 2 = groupsex in park)
-! pregTalkBrother: Flag 0/1 Do your brother know you are pregnant
+! npc_pregtalk['A34']: Flag 0/1 Do your brother know you are pregnant
 ! brotherDay:
 ! brotherSexCount: the number of times left that you can have sex with your brother today (resets to 5 each day)
 ! brotherMorningSex: Last day this happend. Used to block to once a day.
@@ -204,7 +204,7 @@ if $ARGS[0] = 'start':
 	end
 
 	if $loc = 'sitrPar':
-		if pregTalkBrother = 0: gs 'brother', 'pregreact'
+		if npc_pregtalk['A34'] = 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:
@@ -1459,19 +1459,19 @@ if $ARGS[0] = 'pregreact':
 	if knowpreg = 1 and kid = 0:
 		if $clothingworntype = 'nude' and pregchem > 2000 and brotherSex < 7 and kid = 0:
 			'Surprised, your brother looks at your stomach. "<<$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, though."'
-			pregTalkbrother = 1
+			npc_pregtalk['A34'] = 1
 
 			act 'Continue' :gt 'sitrPar'
 		exit
 
 		elseif $clothingworntype ! 'nude' and pregchem > 3460 and brotherSex < 7 and kid = 0:
 			'Surprised, your brother looks at your stomach, "<<$pcs_nickname>>, why didn''t you tell me I''m going to be an uncle?"'
-			pregTalkbrother = 1
+			npc_pregtalk['A34'] = 1
 
 			act 'Continue' :gt 'sitrPar'
 			exit
 
-		elseif brotherSex >= 7 and kid = 0 and pregTalkMom = 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
+		elseif brotherSex >= 7 and kid = 0 and npc_pregtalk['A29'] = 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
 			cla
 			'Surprised, your brother looks at your stomach, "Are you really pregnant? It... it''s not mine, is it?"'
 			*nl
@@ -1495,8 +1495,8 @@ if $ARGS[0] = 'pregreact':
 		'You''re briefly taken aback by his uncharacteristic sincerity, "Thanks, really. I love you, too."'
 		'You leave your brother to what he was doing before, glad that the two of you have the relationship that you do.'
 
-		act 'Continue' :pregTalkbrother = 1 & gt 'sitrPar'
-	elseif brotherSex >= 7 and kid > 0 and pregTalkMom = 0 and (($clothingworntype = 'nude' and pregchem >= 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460)):
+		act 'Continue' :npc_pregtalk['A34'] = 1 & gt 'sitrPar'
+	elseif brotherSex >= 7 and kid > 0 and npc_pregtalk['A29'] = 0 and (($clothingworntype = 'nude' and pregchem >= 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460)):
 		cla
 		'Kolka looks at your stomach for moment before asking, "Wow, you''re pregnant again? Is it mine?"'
 		*nl
@@ -1512,7 +1512,7 @@ end
 
 if $ARGS[0] = 'brotherknows1':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	'"Yeah, this baby is yours," you say, rubbing your belly. "And after it''s born, I might let you help me make another one," you add before giving your brother a kiss. You look down at him and notice a lump starting to form in his pants.'
 	'Kolka''s eyes suddenly go wide, "Wait! You''re not going to tell <<$npc_nickname[''A29'']>> I got you pregnant, are you?"'
@@ -1541,7 +1541,7 @@ end
 
 if $ARGS[0] = 'brotherknows2':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	'"Yes, it is and you''re going to take responsibility. I am not going to be a single mother raising this child on my own."'
 	'Kolka stares at you in shock, "But I don''t know anything about raising a kid!"'
@@ -1567,7 +1567,7 @@ end
 
 if $ARGS[0] = 'brotherknows3':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	'"It could be, I''m still not sure yet. I just wanted to give you a heads up." You then add with a wink, "Honestly, I kind of hope it is."'
 	'"Me too," he states just a little too eagerly. He then quickly moves his lips to yours and you share a passionate kiss.'
@@ -1577,7 +1577,7 @@ end
 
 if $ARGS[0] = 'brotherknows4':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	'"I''m still not sure," you say. "But if it is, you had better take responsibility."'
 	'Your brother rolls his eyes, "Then I really hope it''s someone else''s problem."'
@@ -1588,7 +1588,7 @@ end
 
 if $ARGS[0] = 'brotherknows5':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	'"No, you got lucky this time. It''s actually <<$wombthfath>>''s," you tell him. "I just wanted to share the news with my little brother."'
 	'"Oh, well congratulations!" He tries to sound happy, but you detect a note of disappointment in his voice.'
@@ -1598,7 +1598,7 @@ end
 
 !Once pregnancy fetish is added, these will be expanded
 if $ARGS[0] = 'brotherknows6':
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	if arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherHappy = 1:
 		cla
@@ -1684,7 +1684,7 @@ end
 
 if $ARGS[0] = 'brotherknows7':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	if arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherHappy = 1:
 		'"It could be, I''m still not sure yet. I just wanted to give you a heads up." You then add with a wink, "Honestly, I''m kind of hoping it is. I would love to be carrying another one of my brother''s children."'
@@ -1705,7 +1705,7 @@ end
 
 if $ARGS[0] = 'brotherknows8':
 	cla
-	pregTalkbrother = 1
+	npc_pregtalk['A34'] = 1
 	*nl
 	if $ChildThFath = 'Kolka':
 		'"Not this time. It''s actually <<$wombthfath>>''s. Why, were you hoping you''d give me more children? Sorry, but this body is just too good to limit myself to one man, even if that man is my cute younger brother," you giggle.'

+ 1 - 1
locations/brother_voyeur.qsrc

@@ -16,7 +16,7 @@ if npc_QW['A34'] > 20 and npc_QW['A34'] < 25: npc_QW['A34'] = 20
 ! npc_QW['A34']: Quest stages
 ! brotherAge: your age - 2
 ! brotherknowslut: brother knowledge of your sexual activity (1 = seen cum, 2 = groupsex in park)
-! pregTalkBrother: Flag 0/1 Do your brother know you are pregnant
+! npc_pregtalk['A34']: Flag 0/1 Do your brother know you are pregnant
 ! brotherDay:
 ! brotherSexCount: the number of times left that you can have sex with your brother today (resets to 5 each day)
 ! brotherMorningSex: Last day this happend. Used to block to once a day.

+ 11 - 13
locations/cikl.qsrc

@@ -625,21 +625,19 @@ elseif preg = 2 and pregminut < totminut:
 		pregminut = totminut + 1440
 	end
 elseif preg = 0:
-	KILLVAR 'pregTalkBrother'
-	KILLVAR 'pregTalkSister'
-	KILLVAR 'pregTalkFather'
+	KILLVAR 'npc_pregtalk[''A34'']'
+	KILLVAR 'npc_pregtalk[''A33'']'
+	KILLVAR 'npc_pregtalk[''A28'']'
 	!{KILLVAR 'pregTalkFamily' -- Do not kill this (Abortion talk).}
-	KILLVAR 'pregTalkMom'
+	KILLVAR 'npc_pregtalk[''A29'']'
 	KILLVAR 'pregTalk'
-	KILLVAR 'pregTalkNat'
-	KILLVAR 'pregTalkKatja'
-	KILLVAR 'pregTalkAlbina'
-	KILLVAR 'pregTalkPC'
-	KILLVAR 'pregTalkStarlets'
-	KILLVAR 'pregTalkvball'
-	KILLVAR 'pregTalkTrack'
-	killvar 'pregtalkStarlets'
-	killvar 'pregtalkvball'
+	KILLVAR 'npc_pregtalk[''A16'']'
+	KILLVAR 'npc_pregtalk[''A14'']'
+	KILLVAR 'pcs_pregtalk'
+	KILLVAR 'npc_pregtalk[''A69'']'
+	KILLVAR 'npc_pregtalk[''A131'']'
+	killvar 'npc_pregtalk[''A23'']'
+	killvar 'npc_pregtalk[''A69'']'
 	killvar 'pregtime'
 	killvar 'knowpreg'
 	killvar 'denypreg'

+ 3 - 0
locations/cum_arrcheat.qsrc

@@ -1,5 +1,8 @@
 # cum_arrcheat
 
+!! npc_pregtalk[] 0/1: Does character A# know that you are currently pregnant
+!! pcs_pregtalk 0/1: Has PC been told she is pregnant
+
 *clr & cla
 '<center><h2>Cheat Menu - OOX Debug</h2></center>'
 if cycle = 0:

+ 12 - 12
locations/din_van.qsrc

@@ -1063,7 +1063,7 @@ if $ARGS[0] = 'private':
 			minut += 5
 			pregtest -= 1
 			gs 'stat'
-			 if pregchem > 120 and bimbolevel < 3 and knowpreg = 0 and huband = 0 and pregTalkPC = 0:
+			 if pregchem > 120 and bimbolevel < 3 and knowpreg = 0 and huband = 0 and pcs_pregtalk = 0:
 				cla
 				knowpreg = 1
 				thinkpreg = 1
@@ -1072,7 +1072,7 @@ if $ARGS[0] = 'private':
 				act 'Horrified':gt 'din_van', 'HorrifiedReact1'
 				act 'Concerned':gt 'din_van', 'ConcernedReact1'
 				act 'Excited':gt 'din_van', 'ExcitedReact1'
-			elseif pregchem > 120 and bimbolevel = 3 and knowpreg = 0 and huband = 0 and pregTalkPC = 0:
+			elseif pregchem > 120 and bimbolevel = 3 and knowpreg = 0 and huband = 0 and pcs_pregtalk = 0:
 				cla
 				knowpreg = 1
 				thinkpreg = 1
@@ -1080,20 +1080,20 @@ if $ARGS[0] = 'private':
 				'The test shows two strips. You are pregnant. As you look at the test in your hand, you are?'
 				act 'Excited':gt 'din_van', 'ExcitedReact1'
 				act 'Aroused':gt 'din_van', 'ArousedReact1'
-			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid = 0 and pregTalkPC = 0:
+			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid = 0 and pcs_pregtalk = 0:
 				knowpreg = 1
 				thinkpreg = 1
 				gt 'din_van', 'WifeReact1'
-			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid > 0 and pregTalkPC = 0:
+			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid > 0 and pcs_pregtalk = 0:
 				knowpreg = 1
 				thinkpreg = 1
 				gt 'din_van', 'WifeReact2'
-			elseif pregTalkPC = 1 and pregchem > 120 and knowpreg = 0:
+			elseif pcs_pregtalk = 1 and pregchem > 120 and knowpreg = 0:
 				*nl
 				knowpreg = 1
 				thinkpreg = 1
 				'The test shows two strips. You are pregnant.'
-			elseif pregTalkPC = 1 or (knowpreg = 1 and preg = 1):
+			elseif pcs_pregtalk = 1 or (knowpreg = 1 and preg = 1):
 				*nl
 				knowpreg = 1
 				thinkpreg = 1
@@ -1181,7 +1181,7 @@ end
 if $ARGS[0] = 'HorrifiedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You stare in disbelief at the test in your hand. The two strips displayed can only mean one thing: you are pregnant. You sink to the floor, mind spinning. Tears well in your eyes. How could this happen?'
@@ -1204,7 +1204,7 @@ end
 if $ARGS[0] = 'ConcernedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'Your mind races as you gaze at the test in your hand. The two strips clearly show that you''re pregnant. You know this isn''t the worst thing that could happen to you, but your life is definitely going to change. Are you even ready for that kind of change?'
@@ -1224,7 +1224,7 @@ end
 if $ARGS[0] = 'ExcitedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You''re overcome with glee as you look at the pregnancy test in your hand. Its two strips confirm that your wish has been granted: you are pregnant. You giggle as you clutch the pregnancy test, excited to share the news with everyone you know.'
@@ -1244,7 +1244,7 @@ end
 if $ARGS[0] = 'ArousedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You rub your thighs together as you stare at the pregnancy test in your hand. The two strips displayed confirm that you’ve been knocked up. You excitedly recount every load of cum blast into your fertile womb, wondering which one found purchase. You gently rub your clit in a circular motion as you think about the fact that, in a few months, everyone who sees your large, pregnant belly will know what a slut you are.'
@@ -1265,7 +1265,7 @@ end
 if $ARGS[0] = 'WifeReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 		'A wide smile spreads across your face as you look down at the pregnancy test. The two strips displayed exclaim that you’re finally starting a family. You begin to shake with excitement as you think about how you are going to tell your husband. Should you just tell him as soon as you see him, or do you want to make it an even more special occasion and tell him over a fancy dinner? Maybe you should just nonchalantly drop the test in front of him to see his reaction. Regardless of how you decide to do it, you can''t keep the excitement to yourself any longer. You take a brief moment to freshen up before leaving the room. '
@@ -1276,7 +1276,7 @@ end
 if $ARGS[0] = 'WifeReact2':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You smile warmly at the test in your hand. You are definitely pregnant again. Your chest swells with joy, knowing that your wonderful family is about to get a little bit larger. You contentedly sigh as you envision your pregnant belly swelling again, proclaiming your motherhood to the world. Having a child is the greatest thing that has ever happened to you, and you’re thrilled at the opportunity to experience it again. You can’t wait any longer to tell your husband. You quickly spruce yourself up before going to share the fantastic news with your spouse.'

+ 2 - 2
locations/dinsister.qsrc

@@ -114,8 +114,8 @@ $sischecks = {
 		'Your sister takes a good look at your eyebrow piercing and says, "Nice, but be careful, don''t accidentally get it caught on something!"'
 	end
 	
-	if pregTalkSister = 0 and (($clothingworntype = 'nude' and pregchem > 2688) or ($clothingworntype ! 'nude' and pregchem > 3600)):
-		pregTalkSister = 1
+	if npc_pregtalk['A33'] = 0 and (($clothingworntype = 'nude' and pregchem > 2688) or ($clothingworntype ! 'nude' and pregchem > 3600)):
+		npc_pregtalk['A33'] = 1
 		if $clothingworntype ! 'nude' and pregchem > 3600:
 			'With surprise your sister says, "You''re pregnant, <<$pcs_nickname>>!"'
 			'"How the hell can you tell?"'

+ 2 - 2
locations/experiment.qsrc

@@ -1116,7 +1116,7 @@ if $ARGS[0] = 'testarea:treatment:bed:wait:event':
 				act 'Continue':gt 'experiment', 'testarea:treatment:bed:doctor1'
 			else
 				if pregchem > 30:
-					pregTalkPC = 1
+					pcs_pregtalk = 1
 					impreg = 1
 					*nl
 					'"Very well you little cum bucket, you have finally managed to finish the impregnation process. You will proceed to the final stage in a short time." the doctor tells you.'
@@ -2235,7 +2235,7 @@ if $ARGS[0] = 'testarea:treatment:room:event:nurse:check':
 	'<i>The cold medical mirror is nothing compared to the abuse endured by the giant black cocks.</i>'
 	'When she''s done, she packs up her equipment and says,'
 	if pregchem > 30:
-		pregTalkPC = 1
+		pcs_pregtalk = 1
 		impreg = 1
 		'Very well miss <<$pcs_lastname>>, you have finally managed to complete the impregnation process. You will proceed to the final stage in a short time.'
 	else

+ 4 - 4
locations/father.qsrc

@@ -134,19 +134,19 @@ if tatlip>0 and fatherTatLip=0 and npc_rel['A28']>=60:
     end
 end
 
-if $clothingworntype = 'nude' and pregTalkFather = 0 and pregchem > 2688:
+if $clothingworntype = 'nude' and npc_pregtalk['A28'] = 0 and pregchem > 2688:
     'Your stepfather looks at your belly with a surprised look on his face: "<<$pcs_nickname>>, you''re pregnant?"'
     if npc_sex['A28']!0:
         'You see him hesitate for a second, as if weighing whether he should say something or not. He finally does: "It''s not mine, I hope?"'
     end
-    pregTalkFather = 1
+    npc_pregtalk['A28'] = 1
     
-elseif $clothingworntype ! 'nude' and pregTalkFather = 0 and pregchem > 3600:
+elseif $clothingworntype ! 'nude' and npc_pregtalk['A28'] = 0 and pregchem > 3600:
     'Your stepfather looks at your belly with a surprised look on his face: "<<$pcs_nickname>>, you''re pregnant?"'
     if npc_sex['A28']!0:
         'You see him hesitate for a second, as if weighing whether he should say something or not. He finally does: "It''s not mine, I hope?"'
     end
-    pregTalkFather = 1
+    npc_pregtalk['A28'] = 1
 end
 
 !!----------------------------------------end reaction block---------------------------------------------

+ 6 - 6
locations/gdksport.qsrc

@@ -74,10 +74,10 @@ if $ARGS[0] = 'start':
 	*nl
 
 	if pcs_stam > 20 and $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour < 18:
-		if gsAboBeg > 0 and pregTalkTrack = 0:
+		if gsAboBeg > 0 and npc_pregtalk['A131'] = 0:
 			act 'Take a track lesson, you have <<gsAboBeg>> lessons remaining':gt 'gdksport', 'racing2'
 		end
-		if gsAboVolley > 0 and volleysostav = 0 and pregTalkvball = 0:
+		if gsAboVolley > 0 and volleysostav = 0 and npc_pregtalk['A69'] = 0:
 			if week ! 5:
 				act 'Take a volleyball lesson, you have <<gsAboVolley>> lessons remaining':gt 'gdksport', 'vball2'
 			else
@@ -98,10 +98,10 @@ if $ARGS[0] = 'start':
 				act 'Play with the team':gt 'gdksport', 'vballreact'
 			end
 		end
-		if gsAboDance > 0 and albinaQWdance = 0 and pregTalkStarlets = 0:
+		if gsAboDance > 0 and albinaQWdance = 0 and npc_pregtalk['A23'] = 0:
 			act 'Take a dance lesson, you have <<gsAboDance>> lessons remaining':gt 'gdksport', 'dance2'
 		end
-		if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and pregTalkStarlets = 0 and startletsday ! daystart:
+		if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and npc_pregtalk['A23'] = 0 and startletsday ! daystart:
 			if pregtime >= 90:
 				act 'Train with Starlets':gt 'gdksport', 'Starletsreact'
 			else
@@ -1232,14 +1232,14 @@ if $ARGS[0] = 'Starletsreact':
 	cla
 	menu_off = 1
 	'As you approach the Starlets, Albina looks at you in disgust. Loudly enough for the whole team to hear, she says "<<$pcs_nickname>>, no one wants to see some pregnant whore dance. Leave. You''re done." Tears welling in your eyes, you leave, the sound of laughter and taunting following your departure.'
-	act 'Continue':pregtalkStarlets = 1 & gt 'gdk'
+	act 'Continue':npc_pregtalk['A23'] = 1 & gt 'gdk'
 end
 
 if $ARGS[0] = 'vballreact':
 	cla
 	menu_off = 1
 	'As you approach the team, your coach notices you and calls you aside. "<<$pcs_firstname>>, are you pregnant? I can''t let you play like that. Also, a pregnant teenager would definitely reflect poorly on me and the rest of the team. Sorry, but off the team." Tears welling in your eyes, you leave.'
-	act 'Continue':pregtalkvball = 1 & gt 'gdk'
+	act 'Continue':npc_pregtalk['A69'] = 1 & gt 'gdk'
 end
 
 

+ 3 - 3
locations/gpoli.qsrc

@@ -57,9 +57,9 @@ if $ARGS[0] = '':
 			knowpregrecover = 1
 			vidage += 1
 			pregtalk = 0
-			pregTalkPC = 0
-			pregTalkNat = 0
-			pregTalkbrother = 0
+			pcs_pregtalk = 0
+			npc_pregtalk['A16'] = 0
+			npc_pregtalk['A34'] = 0
 			pregchem = 0
 			cycle = 4
 			gs 'cum_cleanup', 'reset'

+ 19 - 19
locations/mother.qsrc

@@ -753,7 +753,7 @@ end
 if $ARGS[0] = 'pregreact':
 	menu_off = 1
 	*nl
-	if pregTalkFamily = 0 and pregtalkmom = 0 and kid = 0:
+	if pregTalkFamily = 0 and npc_pregtalk['A29'] = 0 and kid = 0:
 		if ($clothingworntype = 'nude' and pregchem > 2688) or ($clothingworntype ! 'nude' and pregchem > 3600):
 			cla
 			gs 'stat'
@@ -763,11 +763,11 @@ if $ARGS[0] = 'pregreact':
 			if $clothingworntype ! 'nude':
 				'"I do want to know who the father is, though."'
 
-				act 'Tell her':pregTalkFamily = 1 & pregTalkMom = 1 & gt 'mother', 'pregreact1'
+				act 'Tell her':pregTalkFamily = 1 & npc_pregtalk['A29'] = 1 & gt 'mother', 'pregreact1'
 			elseif $clothingworntype = 'nude':
 				'"And go put on some clothes and then come back to talk to me. I need you to tell me who the father is"'
 
-				act 'Go get dressed':pregTalkFamily = 1 & pregTalkMom = 1 & gt 'mother', 'pregreactnude'
+				act 'Go get dressed':pregTalkFamily = 1 & npc_pregtalk['A29'] = 1 & gt 'mother', 'pregreactnude'
 			end
 		elseif knowpreg = 1 and $clothingworntype ! 'nude' and pregchem <= 3600:
 			act 'Tell your mother you are pregnant':
@@ -775,7 +775,7 @@ if $ARGS[0] = 'pregreact':
 				minut += 5
 				npc_rel['A29'] -= 20
 				pregTalkFamily = 1
-				pregtalkmom = 1
+				npc_pregtalk['A29'] = 1
 				delin_beh += 1 &!counter for getting sent to Gadukino for the summer
 				if motherKnowSpravka = 0:motherKnowSpravka = 1
 				gs 'stat'
@@ -787,7 +787,7 @@ if $ARGS[0] = 'pregreact':
 				'"Of course you can sweetie, we''ll get through this together", she reassures you, returning your hug. Despite her supportive attitude, you can tell she''s very disappointed in you. You''ll have to put in some work if you want to get back on her good side.'
 				'"So, who''s the father?"'
 
-				act 'Tell her':pregTalkFamily = 1 & pregTalkMom = 1 & gt 'mother', 'pregreact1'
+				act 'Tell her':pregTalkFamily = 1 & npc_pregtalk['A29'] = 1 & gt 'mother', 'pregreact1'
 			end
 		elseif knowpreg = 1 and $clothingworntype = 'nude' and pregchem <= 2688:
 			act 'Tell your mother you are pregnant':
@@ -795,7 +795,7 @@ if $ARGS[0] = 'pregreact':
 				minut += 5
 				npc_rel['A29'] -= 20
 				pregTalkFamily = 1
-				pregtalkmom = 1
+				npc_pregtalk['A29'] = 1
 				delin_beh += 1 &!counter for getting sent to Gadukino for the summer
 				if motherKnowSpravka = 0:motherKnowSpravka = 1
 				gs 'stat'
@@ -808,7 +808,7 @@ if $ARGS[0] = 'pregreact':
 
 				'"And go put on some clothes and then come back to talk to me. I need you to tell me who the father is."'
 
-				act 'Go get dressed':pregTalkFamily = 1 & pregTalkMom = 1 & gt 'mother', 'pregreactnude'
+				act 'Go get dressed':pregTalkFamily = 1 & npc_pregtalk['A29'] = 1 & gt 'mother', 'pregreactnude'
 			end
 		end
 	end
@@ -904,7 +904,7 @@ end
 !!When Sveta has another place to stay in Pav, there will be a follow-up to this conversation that restores access to the family apartment, if <<$npc_nickname[''A29'']>> relationship is high enough.
 if $ARGS[0] = 'pregreactbrother':
 	menu_off = 1
-	if npc_rel['A29'] < 60 and pregtalkbrother = 1 and brothersecret = 0:
+	if npc_rel['A29'] < 60 and npc_pregtalk['A34'] = 1 and brothersecret = 0:
 		'As soon as your brother''s name crosses your lips, your mother''s face visibly reddens. Her mouth curls into a snarl and she reaches up and grips you by your hair. '
 		'"What the fuck is wrong with you?" she screams in your face. "I knew you were a worthless whore, but this? Even I didn''t think you’d go so far as to try corrupting your brother, too."'
 		'Kolka tries to speak up. "<<$npc_nickname[''A29'']>>, <<$pcs_nickname>>-"'
@@ -928,7 +928,7 @@ if $ARGS[0] = 'pregreactbrother':
 
 			act 'Continue':momKnowsKolka = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and pregtalkbrother = 1 and brothersecret = 0:
+	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and npc_pregtalk['A34'] = 1 and brothersecret = 0:
 		'Before you can even finish the second syllable of your brother''s name, you see the rage building in your mother''s face. She balls her fists and visibly shakes, making it clear that she is using all of her strength to stop herself from transferring that strength from her open palm to your face.. '
 		'When she finally speaks, it''s through gritted teeth, and she just says "Get out."'
 		'You stare at her dumbfounded, unsure where she expects you to go.'
@@ -947,7 +947,7 @@ if $ARGS[0] = 'pregreactbrother':
 
 			act 'Continue':momKnowsKolka = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] > 80 and pregtalkbrother = 1 and brothersecret = 0:
+	elseif npc_rel['A29'] > 80 and npc_pregtalk['A34'] = 1 and brothersecret = 0:
 		'Your mother stares in stunned silence as you utter Kolka''s name. Her knees seem to give out, and she barely manages to hold herself up by leaning on the counter.'
 		'After several moments of silence that feel like an eternity, your mother says "Please tell me I just misheard you. Did you really just say your brother''s name?"'
 		'You stare at the floor, only giving your mother the smallest nod you can manage as a reply.'
@@ -976,7 +976,7 @@ if $ARGS[0] = 'pregreactbrother':
 
 			act 'Continue':momKnowsKolka = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] < 60 and (pregtalkbrother = 0 or brothersecret = 1):
+	elseif npc_rel['A29'] < 60 and (npc_pregtalk['A34'] = 0 or brothersecret = 1):
 		'As soon as your brother''s name crosses your lips, your mother''s face visibly reddens. Her mouth curls into a snarl and she reaches up and grips you by your hair. '
 		'"What the fuck is wrong with you?" she screams in your face. "I knew you were a worthless whore, but this? Even I didn''t think you’d go so far as to try corrupting your brother, too."'
 		'Your mother releases your hair as tears begin to stream down your face.'
@@ -996,7 +996,7 @@ if $ARGS[0] = 'pregreactbrother':
 
 			act 'Continue':momKnowsKolka = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and (pregtalkbrother = 0 or brothersecret = 1):
+	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and (npc_pregtalk['A34'] = 0 or brothersecret = 1):
 		'Before you can even finish the second syllable of your brother''s name, you see the rage building in your mother''s face. She balls her fists and visibly shakes, making it clear that she is using all of her strength to stop herself from transferring that strength from her open palm to your face.. '
 		'When she finally speaks, it''s through gritted teeth, and she just says "Get out."'
 		'You stare at her dumbfounded, unsure where she expects you to go.'
@@ -1014,7 +1014,7 @@ if $ARGS[0] = 'pregreactbrother':
 
 			act 'Continue':momKnowsKolka = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] > 80 and (pregtalkbrother = 0 or brothersecret = 1):
+	elseif npc_rel['A29'] > 80 and (npc_pregtalk['A34'] = 0 or brothersecret = 1):
 		'Your mother stares in stunned silence as you utter Kolka''s name. Her knees seem to give out, and she barely manages to hold herself up by leaning on the counter.'
 		'After several moments of silence that feel like an eternity, your mother says "Please tell me I just misheard you. Did you really just say your brother''s name?"'
 		'You stare at the floor, only giving your mother the smallest nod you can manage as a reply.'
@@ -1044,7 +1044,7 @@ end
 !!When Sveta has another place to stay in Pav, there will be a follow-up to this conversation that restores access to the family apartment, if <<$npc_nickname[''A29'']>> relationship is high enough.
 if $ARGS[0] = 'pregreactstepdad':
 	menu_off = 1
-	if npc_rel['A29'] < 60 and pregtalkstepdad = 1 and stepdadSecret = 0:
+	if npc_rel['A29'] < 60 and npc_pregtalk['A28'] = 1 and stepdadSecret = 0:
 		'As soon as your step-father''s name crosses your lips, your mother''s face visibly reddens. Her mouth curls into a snarl and she reaches up and grips you by your hair and starts draging you around.'
 		'"What the fuck is wrong with you?" she screams in your face. "I know you are a worthless whore, but this? Even I didn''t think you''d stoop this low as seducting your own step-father... What kind of sick people are you two?"'
 		'Vladimir begins clearing his throat, "Honey, <<$pcs_nickname>> and I-"'
@@ -1068,7 +1068,7 @@ if $ARGS[0] = 'pregreactstepdad':
 			'It''s too late to look for an apartment today. Instead you decide to look for a place to sleep tonight. You''ll need to go apartment hunting first thing tomorrow.'
 			act 'Continue':momKnowsVladimir = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and pregtalkbrother = 1 and brothersecret = 0:
+	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and npc_pregtalk['A34'] = 1 and brothersecret = 0:
 		'Before you''re able to finish the second syllable of your step-father''s name, you see the rage building in your mother''s face. She tightens her fist and is visibly shaking, making it clear that she is using all of her might to hinder herself from attacking you...'
 		'When she finally manages to speak up, through gritted teeth, only saying, "Get out!"'
 		'You stare at her dumbfounded, unsure where she expects you to go.'
@@ -1086,7 +1086,7 @@ if $ARGS[0] = 'pregreactstepdad':
 			'It''s too late to look for an apartment today. Instead you decide to look for a place to sleep tonight. You''ll need to go apartment hunting first thing tomorrow.'
 			act 'Continue':momKnowsVladimir = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] > 80 and pregtalkstepdad = 1 and stepdadSecret = 0:
+	elseif npc_rel['A29'] > 80 and npc_pregtalk['A28'] = 1 and stepdadSecret = 0:
 		'Your mother stares at you in stunned silence as you utter Vladimir''s name. Her knees seem to give out, as she barely manages to hold herself up by leaning on the counter.'
 		'After long period of silence that feels like an eternity, your mother finally manages to speak up, "Please tell me I just misheard you. Did I really hear you just say your step-father''s name?"'
 		'You stare shamefully at the floor, only giving your mother the smallest nod you can manage as a reply.'
@@ -1115,7 +1115,7 @@ if $ARGS[0] = 'pregreactstepdad':
 			'It''s too late to look for an apartment today. Instead you decide to look for a place to sleep tonight. You''ll need to go apartment hunting first thing tomorrow.'
 			act 'Continue':momKnowsVladimir = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] < 60 and (pregtalkstepdad = 0 or stepdadSecret = 1):
+	elseif npc_rel['A29'] < 60 and (npc_pregtalk['A28'] = 0 or stepdadSecret = 1):
 		'As soon as your step-father''s name crosses your lips, your mother''s face visibly reddens. Her mouth curls into a snarl and she reaches up and grips you by your hair and starts draging you around.'
 		'"What the fuck is wrong with you?" she screams in your face. "I know you are a worthless whore, but this? Even I didn''t think you''d stoop this low as seducting your own step-father... What kind of sick people are you two?"'
 		'Vladimir begins clearing his throat, "Honey, <<$pcs_nickname>> and I-"'
@@ -1139,7 +1139,7 @@ if $ARGS[0] = 'pregreactstepdad':
 			'It''s too late to look for an apartment today. Instead you decide to look for a place to sleep tonight. You''ll need to go apartment hunting first thing tomorrow.'
 			act 'Continue':momKnowsVladimir = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and (pregtalkstepdad = 0 or stepdadSecret = 1):
+	elseif npc_rel['A29'] >= 60 and npc_rel['A29'] <= 80 and (npc_pregtalk['A28'] = 0 or stepdadSecret = 1):
 		'Before you''re able to finish the second syllable of your step-father''s name, you see the rage building in your mother''s face. She tightens her fist and is visibly shaking, making it clear that she is using all of her might to hinder herself from attacking you...'
 		'When she finally manages to speak up, through gritted teeth, only saying, "Get out!"'
 		'You stare at her dumbfounded, unsure where she expects you to go.'
@@ -1157,7 +1157,7 @@ if $ARGS[0] = 'pregreactstepdad':
 			'It''s too late to look for an apartment today. Instead you decide to look for a place to sleep tonight. You''ll need to go apartment hunting first thing tomorrow.'
 			act 'Continue':momKnowsVladimir = 1 & home_owned[2] = 0 & ParHomeBlock = 1 & minut += 15 & gt 'pod_ezd', 'etaj_2'
 		end
-	elseif npc_rel['A29'] > 80 and (pregtalkstepdad = 0 or stepdadSecret = 1):
+	elseif npc_rel['A29'] > 80 and (npc_pregtalk['A28'] = 0 or stepdadSecret = 1):
 		'Your mother stares at you in stunned silence as you utter Vladimir''s name. Her knees seem to give out, as she barely manages to hold herself up by leaning on the counter.'
 		'After long period of silence that feels like an eternity, your mother finally manages to speak up, "Please tell me I just misheard you. Did I really hear you just say your step-father''s name?"'
 		'You stare shamefully at the floor, only giving your mother the smallest nod you can manage as a reply.'

+ 2 - 2
locations/natbelEv.qsrc

@@ -75,9 +75,9 @@ if $ARGS[0] = 'natcumresponse':
 		'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t seems to bother her that Kolka may knock her up.'
 	elseif natpregday > 0 and (daystart-natpregday) >= 84:
 		'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t really matter now, since Kolka has already knocked her up.'
-	elseif natpregday = 0 and pregtalknat = 1 and natbabycount = 0:
+	elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount = 0:
 		'Natasha looks at you and almost inaudably whispers "Please let him cum inside me. I want a baby too."'
-	elseif natpregday = 0 and pregtalknat = 1 and natbabycount > 0:
+	elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount > 0:
 		'Natasha looks at you and moans "Please let him cum inside me. I need him to give me another baby."'		
 	else
 		'Natasha looks at you questioningly, whether will you let him cum inside of her and risking her getting pregnant with your niece or nephew, or letting her pull away from you brother.'

+ 9 - 9
locations/natbelapt.qsrc

@@ -1908,7 +1908,7 @@ if $ARGS[0] = 'chat':
 	
 	act 'Stop talking': gt 'natbelapt','natroom'
 	
-	if pregTalkNat = 0 and kid = 0:
+	if npc_pregtalk['A16'] = 0 and kid = 0:
 		if natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and pregchem >= 3600:
 			*clr & cla
 			'"<<$pcs_nickname>>, are you pregnant, too? Well, I guess I don''t have to worry about being the only pregnant girl at school," she giggles.'
@@ -1926,7 +1926,7 @@ if $ARGS[0] = 'chat':
 				cla
 				*nl
 				'"<<$pcs_nickname>>, you''re," she pauses momentarily before continuing in a tone of shock mixed with disgust, "pregnant? Have you been sleeping around? This will definitely impact your studies."'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 				act 'Continue' :gt 'natbelapt', 'natroom'
 			end
 		elseif pregchem > 0 and knowpreg = 1 and natsub > 0 and (daystart-natpregday) < 84:
@@ -1938,20 +1938,20 @@ if $ARGS[0] = 'chat':
 				if $wombthfath = '':
 					'"Honestly, I don''t even know."'
 					'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
-					pregTalkNat = 1
+					npc_pregtalk['A16'] = 1
 					act 'Continue' :gt 'natbelapt', 'natroom'
 				else
 					'You tell her that <<$wombthfath>> is the father and then give her brief details as to how you got pregnant, without getting too explicit.'
 					*nl
 					'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
-					pregTalkNat = 1
+					npc_pregtalk['A16'] = 1
 					act 'Continue' :gt 'natbelapt', 'natroom'
 				end
 			end
 		end
 	end
 	
-	if pregTalkNat = 0 and kid > 0:
+	if npc_pregtalk['A16'] = 0 and kid > 0:
 		if (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and pregchem >= 3600:
 			*clr & cla
 			'"Wow, <<$pcs_nickname>>, you''re pregnant again? You''re really committed to making sure I''m not the only young mother around here, huh?" She playfully smiles and puts a hand on your shoulder. "It''s good to know you''re looking out for me."'
@@ -1969,7 +1969,7 @@ if $ARGS[0] = 'chat':
 				*clr & cla
 				*nl
 				'"Really? You''re pregnant again? You should really try to be more careful."'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 				act 'Continue' :gt 'natbelapt', 'natroom'
 			end
 		elseif pregchem > 0 and natsub > 0 and (daystart-natpregday) < 84 and knowpreg = 1:
@@ -1977,7 +1977,7 @@ if $ARGS[0] = 'chat':
 				*clr & cla
 				*nl
 				'"You got pregnant again. It must be wonderful…" She trails off, clearly envious.'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 				act 'Continue' :gt 'natbelapt', 'natroom'
 			end
 		end
@@ -2157,7 +2157,7 @@ end
 
 if $ARGS[0] = 'natknows':
 	cla
-	pregTalkNat = 1
+	npc_pregtalk['A16'] = 1
 	if pav_slut < 125: '"So, who''s the father?"'
 	if pav_slut >= 125: '"So, do you know who the father is?"'
 	*nl
@@ -2179,7 +2179,7 @@ end
 !When pregnancy fetish is added, another reaction will be added here
 if $ARGS[0] = 'natknows1':
 	cla
-	pregTalkNat = 1
+	npc_pregtalk['A16'] = 1
 	if pav_slut < 125: '"Is it the same father as last time?"'
 	if pav_slut >= 125: '"Do you know if it''s the same father as last time?"'
 	*nl

+ 6 - 6
locations/poli.qsrc

@@ -151,9 +151,9 @@ if $ARGS[0] = 'start':
 			money -= 15000
 			pregtime = 0
 			pregtalk = 0
-			pregTalkPC = 0
-			pregTalkNat = 0
-			pregTalkbrother = 0
+			pcs_pregtalk = 0
+			npc_pregtalk['A16'] = 0
+			npc_pregtalk['A34'] = 0
 			preg = 0
 			thinkpreg = 0
 			knowpreg = 0
@@ -245,9 +245,9 @@ if $ARGS[0] = 'start':
 			knowpregrecover = 1
 			vidage += 1
 			pregtalk = 0
-			pregTalkPC = 0
-			pregTalkNat = 0
-			pregTalkbrother = 0
+			pcs_pregtalk = 0
+			npc_pregtalk['A16'] = 0
+			npc_pregtalk['A34'] = 0
 			pregchem = 0
 			cycle = 4
 			gs 'cum_cleanup', 'reset'