[added] reaction to the gynecologist referral after being caught with a dildo

[added] additional reactions if your mother already knew you were sexually active

locations/mother.qsrc

@@ -723,6 +723,31 @@ if $ARGS[0] = 'referral_pass':
 	act 'Continue': gt 'mother'
 end
 
+if $ARGS[0] = 'dildo_gyno_fail':
+	dildo_gyno_check = 0
+	dildo_gyno_fail = 0
+	motherKnowDildo = 1
+	'<center><b><font color="maroon">Your <<$npc_nickname[''A29'']>>, Natasha <<$pcs_lastname>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
+	*nl
+	'You hand your <<$npc_nickname[''A29'']>> the referral. She opens and reads it, fingers crumpling the edges where she holds it as she sees the result.'
+	'"I knew it! You little slut! I can''t !"'
+end
+
+
+if $ARGS[0] = 'dildo_gyno_pass':
+	dildo_gyno_check = 0
+	Gspassed = 0
+	menu_off = 1
+	*clr & cla
+	'<center><b><font color="maroon">Your <<$npc_nickname[''A29'']>>, Natasha <<$pcs_lastname>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
+	*nl
+	'You hand your <<$npc_nickname[''A29'']>> the referral. She opens and reads it, before squinting her eyes at you suspiciously and putting it in her pocket.'
+	'"Okay, you''re off the hook for now. But don''t you dare bring one of those things home again young lady!"'
+	act 'Continue': gt 'mother'
+end
+
 if $ARGS[0] = 'pregreact':
 	menu_off = 1
 	*nl

locations/mother_sextalk.qsrc

@@ -1,6 +1,7 @@
 # mother_sextalk
 
 if $ARGS[0] = 'bathroom_dildo_shriek1':
+	if motherKnowSpravka > 0 or motherKnowWhore > 0:gt'mother_sextalk','bathroom_dildo_shriek4'
 	motherQW['bathroom_dildos'] = vanrPar_suction_dildo
 	if motherQW['dildo_caught'] = 0:
 		motherQW['dildo_caught'] = 1
@@ -165,16 +166,31 @@ if $ARGS[0] = 'bathroom_dildo_shriek3':
 	act'Continue':gt $loc, $loc_arg
 end
 
+if $ARGS[0] = 'bathroom_dildo_shriek4':
+	gs 'npc_relationship', 'modify', 'A29', -10
+	vanrPar_bathtub_dildo = 0
+	vanrPar_shower_dildo = 0
+	suction_dildo += motherQW['bathroom_dildos']
+	motherQW['bathroom_dildos'] = 0
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/korrpar.jpg"></center>'
+	'You''re walking down the hall when you suddenly hear a shriek come from the bathroom. Oh shit, not again. Right as you get to the door, it flies open to show your very angry mother.'
+	'"<<$pcs_firstname>>! You disgusting whore! How dare you leave filth like this laying around the house! This is going straight into the garbage!"'
+	'She stomps straight past you to the front door and flings it open, going down the stairs.'
+	act'Continue':gt $loc, $loc_arg
+end
+
 
 
 !! Mom found your dildos when you weren''t at home
 
 if $ARGS[0] = 'bathroom_dildos1':
 	if motherQW['dildo_caught'] = 0:
+		if motherKnowSpravka > 0 or motherKnowWhore > 0:gt'mother_sextalk','bathroom_dildos4'
 		motherQW['dildo_caught'] = 1
 	elseif motherQW['dildo_caught'] = 1:
 		gt'mother_sextalk','bathroom_dildos2'
 	elseif motherQW['dildo_caught'] = 2:
+		if motherKnowSpravka > 0 or motherKnowWhore > 0:gt'mother_sextalk','bathroom_dildos5'
 		gt'mother_sextalk','bathroom_dildos3'
 	end
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
@@ -317,6 +333,42 @@ if $ARGS[0] = 'bathroom_dildos3':
 	act'Continue':gt $loc, $loc_arg
 end
 
+if $ARGS[0] = 'bathroom_dildos4':
+	gs 'npc_relationship', 'modify', 'A29', -10
+	vanrPar_bathtub_dildo = 0
+	vanrPar_shower_dildo = 0
+	motherQW['bathroom_dildos'] = 0
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/korrpar.jpg"></center>'
+	'As you step into the hall of your family home, you see your mother is there waiting for you. She looks very angry.'
+	'"I want you to know that I found your whore things that you left in the bathroom." You look at her in confusion for a moment.'
+	'"What thi-" and then it hits you. Oh shit, you left your dildo in the bathroom.'
+	'"I also want you to know that I threw them out. If you want to be a slut you can go do it somewhere else."'
+	if momloc = 11 or momloc = 12:
+		'With that she walks off into the kitchen.'
+	elseif momloc = 13:
+		'With that she walks off into the living room where you hear your stepfather watching TV.'
+	end
+	act'Continue':gt $loc, $loc_arg
+end
+
+if $ARGS[0] = 'bathroom_dildos5':
+	gs 'npc_relationship', 'modify', 'A29', -10
+	vanrPar_bathtub_dildo = 0
+	vanrPar_shower_dildo = 0
+	motherQW['bathroom_dildos'] = 0
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/korrpar.jpg"></center>'
+	'As you step into the hall of your family home, you see your mother is there waiting for you. She looks very angry.'
+	'"I want you to know that I found your whore things that you left in the bathroom." She glares at you. "Again."'
+	'"... did you throw them awa-"'
+	'"<i>Yes.</i> Obviously. I can''t believe that you''re such a whore now, leaving things like that around for your family to find. Do you have no conscience at all?" She sighs deeply. "My daughter is a shameless slut... What am I going to do..."'
+	if momloc = 11 or momloc = 12:
+		'With that she walks off into the kitchen.'
+	elseif momloc = 13:
+		'With that she walks off into the living room where you hear your stepfather watching TV.'
+	end
+	act'Continue':gt $loc, $loc_arg
+end
+
 if $ARGS[0] = 'dildo_wakeup1':
 	if motherQW['dildo_wakeup'] = 0:
 		motherQW['dildo_wakeup'] = 1