[added] new images for using pregnancy tests

[added] reactions for finding out you are not pregnant
[changed] bad formatting
[changed] text edits

locations/din_van.qsrc

@@ -1257,7 +1257,10 @@ if $ARGS[0] = 'private':
 	!For now, the pregnancy reactions use bimbolevel as a chack. Once the pregnancy fetish is added to the game, the check will likely change to that.
 	if pregtest > 0 and (abortionbirthdate = 0 or daystart - abortionbirthdate > 100):
 		act 'Do a pregnancy test (0:05)':
-			cla
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/accessories/birthcontrol/preg_test.jpg"></center>'
+			'You sit down on the toilet and slip the test between your legs, carefully letting loose a stream of urine from your pussy onto the tip. Following the instructions, you then re-cap it and lay it flat on the sink, spending the next five minutes nervously fidgeting, waiting out the suggested time...'
+			'When the time is up, you eagerly snatch it up and yank off the cap to see the results.'
 			minut += 5
 			pregtest -= 1
 			gs 'stat'
@@ -1266,7 +1269,7 @@ if $ARGS[0] = 'private':
 				knowpreg = 1
 				thinkpreg = 1
 				*nl
-				'The test shows two strips. You are pregnant. As you look at the test in your hand, you are?'
+				'The test shows two strips. You are pregnant. As you look at the test in your hand, you are...'
 				act 'Horrified':gt 'din_van', 'HorrifiedReact1'
 				act 'Concerned':gt 'din_van', 'ConcernedReact1'
 				act 'Excited':gt 'din_van', 'ExcitedReact1'
@@ -1275,7 +1278,7 @@ if $ARGS[0] = 'private':
 				knowpreg = 1
 				thinkpreg = 1
 				*nl
-				'The test shows two strips. You are pregnant. As you look at the test in your hand, you are?'
+				'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 husband = 1 and kid = 0 and pcs_pregtalk = 0:
@@ -1300,6 +1303,9 @@ if $ARGS[0] = 'private':
 				knowpreg = 0
 				*nl
 				'The test shows one band. You are not pregnant.'
+				act'Sigh in relief':gt'din_van','ReliefReact'
+				
+				act'Sigh in disappointment':gt'din_van','DisappointedReact'
 			end
 
 			act 'Finish':menu_off = 0 & gt $loc, $loc_arg
@@ -1374,6 +1380,24 @@ if $ARGS[0] = 'buffpick':
 	act 'You don''t like how you look.': nrmbfpckct += 1 & normbuffpick = 0 & mirror_steam = hour & menu_off = 0 & gt $loc, $loc_arg
 end
 
+if $ARGS[0] = 'ReliefReact':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/accessories/birthcontrol/preg_test.jpg"></center>'
+	'Negative.'
+	*nl
+	'You sigh in relief, letting loose a breath that you feel like you''ve been holding for days. You toss the used test into the trash and happily get on with your not-pregnant day.'
+	act 'Finish':menu_off = 0 & gt $loc, $loc_arg
+end
+
+if $ARGS[0] = 'DisappointedReact':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/accessories/birthcontrol/preg_test.jpg"></center>'
+	'Negative.'
+	*nl
+	'You sigh, closing your eyes in disappointment. You had really hoped that this day would be the day you found out you were expecting. But today is not that day. With not a small amount of frustration, you throw the used test into the trash and move on with your day.'
+	act 'Finish':menu_off = 0 & gt $loc, $loc_arg
+end
+
 if $ARGS[0] = 'HorrifiedReact1':
 	menu_off = 1
 	cla
@@ -1381,19 +1405,19 @@ if $ARGS[0] = 'HorrifiedReact1':
 	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?'
-		if stat['hidden_vaginal'] > 0 and stat['vaginal'] = 1:
-			'You don''t even know how this is possible. You''ve never even had sex with anyone.'
-			'What did you do to deserve this? What is everyone going to think of you? Your life is ruined.'
-			'After several minutes of sobbing and trying to make sense of your situation, you finally pull yourself off of the floor. You straighten your clothes and wash your face as you begin to accept the situation you''re stuck with.'
-		elseif rape > 0 and stat['vaginal'] > 1:
-			'It’s bad enough that you were raped, but possibly getting pregnant from it as well? It’s completely unfair!'
-			'What did you do to deserve this? What is everyone going to think of you? Your life is ruined.'
-			'After several minutes of sobbing and trying to make sense of your situation, you finally pull yourself off of the floor. You straighten your clothes and wash your face as you begin to accept the situation you''re stuck with.'
-		else
-			'This is the worst possible thing that could have happened to you. You feel like you''re going to vomit from the stress.'
-			'What did you do to deserve this? What is everyone going to think of you? Your life is ruined.'
-			'After several minutes of sobbing and trying to make sense of your situation, you finally pull yourself off of the floor. You straighten your clothes and wash your face as you begin to accept the situation you''re stuck with.'
-		end
+	if stat['hidden_vaginal'] > 0 and stat['vaginal'] = 1:
+		'You don''t even know how this is possible. You''ve never even had sex with anyone.'
+		'What did you do to deserve this? What is everyone going to think of you? Your life is ruined.'
+		'After several minutes of sobbing and trying to make sense of your situation, you finally pull yourself off of the floor. You straighten your clothes and wash your face as you begin to accept the situation you''re stuck with.'
+	elseif rape > 0 and stat['vaginal'] > 1:
+		'It’s bad enough that you were raped, but possibly getting pregnant from it as well? It’s completely unfair!'
+		'What did you do to deserve this? What is everyone going to think of you? Your life is ruined.'
+		'After several minutes of sobbing and trying to make sense of your situation, you finally pull yourself off of the floor. You straighten your clothes and wash your face as you begin to accept the situation you''re stuck with.'
+	else
+		'This is the worst possible thing that could have happened to you. You feel like you''re going to vomit from the stress.'
+		'What did you do to deserve this? What is everyone going to think of you? Your life is ruined.'
+		'After several minutes of sobbing and trying to make sense of your situation, you finally pull yourself off of the floor. You straighten your clothes and wash your face as you begin to accept the situation you''re stuck with.'
+	end
 	act 'Finish' :menu_off = 0 & gt $loc, $loc_arg
 end
 
@@ -1404,16 +1428,16 @@ if $ARGS[0] = 'ConcernedReact1':
 	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?'
-		if stat['hidden_vaginal'] > 0 and stat['vaginal'] = 1:
-			'The worst part about this whole situation is that you don''t even know how this happened. How can you get pregnant without having sex?'
-			'After spending a few minutes weighing your options, you choose to get on with your day. You still have a lot to consider before you can decide what to do about this pregnancy, but you can’t spend all day in the bathroom without drawing suspicion.'
-		elseif rape > 0 and stat['vaginal'] > 1:
-			'The worst part about this whole situation is that this isn''t even your fault. This was forced on you.'
-			'After spending a few minutes weighing your options, you choose to get on with your day. You still have a lot to consider before you can decide what to do about this pregnancy, but you can’t spend all day in the bathroom without drawing suspicion.'
-		else
-			'On some level, you''re aware that this is a consequence of your own actions, but you''re not quite ready to come to terms with that.'
-			'After spending a few minutes weighing your options, you choose to get on with your day. You still have a lot to consider before you can decide what to do about this pregnancy, but you can’t spend all day in the bathroom without drawing suspicion.'
-		end
+	if stat['hidden_vaginal'] > 0 and stat['vaginal'] = 1:
+		'The worst part about this whole situation is that you don''t even know how this happened. How can you get pregnant without having sex?'
+		'After spending a few minutes weighing your options, you choose to get on with your day. You still have a lot to consider before you can decide what to do about this pregnancy, but you can’t spend all day in the bathroom without drawing suspicion.'
+	elseif rape > 0 and stat['vaginal'] > 1:
+		'The worst part about this whole situation is that this isn''t even your fault. This was forced on you.'
+		'After spending a few minutes weighing your options, you choose to get on with your day. You still have a lot to consider before you can decide what to do about this pregnancy, but you can’t spend all day in the bathroom without drawing suspicion.'
+	else
+		'On some level, you''re aware that this is a consequence of your own actions, but you''re not quite ready to come to terms with that.'
+		'After spending a few minutes weighing your options, you choose to get on with your day. You still have a lot to consider before you can decide what to do about this pregnancy, but you can’t spend all day in the bathroom without drawing suspicion.'
+	end
 	act 'Finish' :menu_off = 0 & gt $loc, $loc_arg
 end
 
@@ -1424,16 +1448,16 @@ if $ARGS[0] = 'ExcitedReact1':
 	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.'
-		if stat['hidden_vaginal'] > 0 and stat['vaginal'] = 1:
-			'You''re not sure how this happened, but you''re not going to complain. Who cares if a miracle made it happen?'
-			'You spend several minutes fantasizing about your entry into parenthood before you remember you have places you need to be. You finally get up, still giddy as you go on with your day.'
-		elseif rape > 0 and stat['vaginal'] > 1:
-			'You don’t even care about the circumstances that got you pregnant. It was absolutely worth it for this moment.'
-			'You spend several minutes fantasizing about your entry into parenthood before you remember you have places you need to be. You finally get up, still giddy as you go on with your day.'
-		else
-			'Every time you''ve had sex, you hoped the act would make you into a mother.'
-			'You spend several minutes fantasizing about your entry into parenthood before you remember you have places you need to be. You finally get up, still giddy as you go on with your day.'
-		end
+	if stat['hidden_vaginal'] > 0 and stat['vaginal'] = 1:
+		'You''re not sure how this happened, but you''re not going to complain. Who cares if a miracle made it happen?'
+		'You spend several minutes fantasizing about your entry into parenthood before you remember you have places you need to be. You finally get up, still giddy as you go on with your day.'
+	elseif rape > 0 and stat['vaginal'] > 1:
+		'You don’t even care about the circumstances that got you pregnant. It was absolutely worth it for this moment.'
+		'You spend several minutes fantasizing about your entry into parenthood before you remember you have places you need to be. You finally get up, still giddy as you go on with your day.'
+	else
+		'Every time you''ve had sex, you hoped the act would make you into a mother.'
+		'You spend several minutes fantasizing about your entry into parenthood before you remember you have places you need to be. You finally get up, still giddy as you go on with your day.'
+	end
 	act 'Finish' :menu_off = 0 & gt $loc, $loc_arg
 end
 
@@ -1444,15 +1468,16 @@ if $ARGS[0] = 'ArousedReact1':
 	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 blasted 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.'
-		if rape > 0 and stat['vaginal'] > 1 and incest['exp'] = 0:
-			'You pick up speed as you recall your rapist forcefully pumping you full of his wonderful semen without any concern for your desires. You loved having your dignity stripped away as a complete stranger decided to make you a mother.'
-		elseif incest['exp'] > 0:
-			'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'
-			'The taboo knowledge that you could have gotten pregnant from incest turns you on even more.'
-		else
-			'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'
-		end
-		'After several minutes of this, you orgasm hard. You spend a moment panting before cleaning up and straightening your clothes. Once you''ve freshened up, you move on with your day, still aroused.'
+	if rape > 0 and stat['vaginal'] > 1 and incest['exp'] = 0:
+		'You pick up speed as you recall your rapist forcefully pumping you full of his wonderful semen without any concern for your desires. You loved having your dignity stripped away as a complete stranger decided to make you a mother.'
+	elseif incest['exp'] > 0:
+		'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'
+		'The taboo knowledge that you could have gotten pregnant from incest turns you on even more.'
+	else
+		'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'
+	end
+	*nl
+	'After several minutes of this, you orgasm hard. You spend a moment panting before cleaning up and straightening your clothes. Once you''ve freshened up, you move on with your day, still aroused.'
 	act 'Finish' :menu_off = 0 & gt $loc, $loc_arg
 end
 
@@ -1462,8 +1487,9 @@ if $ARGS[0] = 'WifeReact1':
 	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. '
-		'You have a little time before your husband gets home and the baby''s room isn''t going to design itself.'
+	'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. '
+	*nl
+	'You have a little time before your husband gets home and the baby''s room isn''t going to design itself.'
 	act 'Finish' :menu_off = 0 & gt $loc, $loc_arg
 end