glife/sugarcube/src/locations/generic/din_van.tw

:: din_van

<!-- !2021/04/26-->
<!-- !!pcs_leghair = leg hair 0 - 3 for smooth <= 6 for stubble <= 9 for light after that hairy-->
<!-- !!pcs_pubes = pubes 0 - 3 for smooth <= 10 for stubble <= 20 for light hair after that its hairy-->
<!-- !!pubestyle = the style in which you have determined to shave your pubic hair-->
<!-- !!shave_length = the length that your pubic hair will be shortened to after shaving/trimming-->
<!-- !!shave_trigger = the length that your pubic hair needs to be to shave/trim it-->
<!-- !!stanok = razor-->
<!-- !!$brit = shaving dynamic-->
<!-- !! Meant for non-home bathrooms. If you have a bag stashes the underwear in there and enables putting it back on later.-->
<!-- !! purse_____ variables get wiped in ''wardrobe'', ''clothing'', ''panties'' and ''bra'' so there isn''t a chance of duplication-->

<<act "Mirror">><<gt "mirror" "start">><</act>>

<<if _tags.includes('private')>>
	<<if $inventory.get("razor") > 0>>
		<p>You have enough razors left for <b><<=$inventory.get("razor")>></b> more shaves./*<<link "Shave Options">><<gt 'shave_options'>><</link>>*/</p>
	<</if>>
	<<if getvar("$mosolmaz") > 0>>
		On a shelf is a tube of ointment for chafing, which will be enough for <b>$mosolmaz</b> applications.
	<</if>>
	<<if $inventory.get("tampon") == 0 and $inventory.get("sanpad") == 0>>
		<b><<negative 2>>You have no feminine hygiene products left.<</negative>></b>
	<</if>>

	<<if $inventory.get("tampon") == 1>>
		<<negative>>You have only <b>1</b> tampon left.<</negative>>
	<<elseif $inventory.get("tampon") > 1>>
		You have <b><<=$inventory.get("tampon")>></b> tampons.
	<</if>>

	<<if $inventory.get("sanpad") == 1>>
		<<negative>>You have only <b>1</b> pad left.<</negative>>
	<<elseif $inventory.get("sanpad") > 1>>
		You have <b><<=$inventory.get("sanpad")>></b> pads.
	<</if>>
	Your deodorant will last you for <b><<=$inventory.get("deo")>></b> more <<plural $inventory.get("deo")  "application"  "applications">>.

	<!-- Shampoo -->
	<<if _tags.includes('bathtub') or _tags.includes('shower')>>
		<<if _tags.includes('hotel')>>
			<<set _hasEnoughShampoo = true>>
		<<elseif _tags.includes('homeParents')>>
			You can use your parent's shampoo.
			<<set _hasEnoughShampoo = true>>
		<<elseif _tags.includes('shampooProvided')>>
			You are allowed to use the owners shampoo.
			<<set _hasEnoughShampoo = true>>
		<<elseif $inventory.get("shampoo") > 0>>
			You have enough shampoo for <b>$inventory.get("shampoo")</b> uses.
			<<set _hasEnoughShampoo = true>>
		<<else>>
			<font color="red">You've run out of shampoo and will have to buy some more before you can wash yourself.</font>
		<</if>>
		<<if _hasEnoughShampoo>>
			<<if _tags.includes('bathtub')>>
				<<bath>>
			<</if>>
			<<if _tags.includes('shower')>>
				<<shower>>
			<</if>>
		<</if>>
	<</if>>




	<<SkinCare>>
	<<if $inventory.get("painkiller") > 0>>
		You have <b>$inventory.get("painkiller")</b> painkiller<<plural $inventory.get("painkiller") 's.' '.'>>
		<<if getvar("$pain['total']") > 0 and getvar("$pain['killer']") == 0>>
			<<actCLA 'Take a painkiller'>>
				<<setinit $pain['killer'] += 1>>
				<<run $inventory.dec('painkiller',1)>>
				<<set $pc.pcs_hydra += 20>>

				You take a painkiller and gulp it down with a glass of water.
				<<actCLA 'Finish'>>
					<<set $menu_off = 0>> <<gt $location>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
	<</if>>
	<<if getvar("$bcream_have") > 0>>
		<<act 'Apply breast cream'>>
			<<use_bcream>>
		<</act>>
	<</if>>
	<<if $pc.decoGet('piercing','tongue') + $pc.decoGet('piercing','lip') + $pc.decoGet('piercing','ears') + $pc.decoGet('piercing','nose') + $pc.decoGet('piercing','eyebrow') + $pc.decoGet('piercing','nipple') + $pc.decoGet('piercing','navel') + $pc.decoGet('piercing','pussy') > 0>>
		<<link "Manage your piercings">><</link>>

	<</if>>
	<<if getvar("$fillimplant") == 1 and getvar("$siliconeBag") >= 1>>
		<<link "Inject silicone into your breast implants.">> <<set $siliconeBag -= 1>> <<set $silicone += 10>> <<gt $location>><</link>>

	<</if>>
	<<if getvar("$fillimplant") == 1 and getvar("$silicone") >= 20>>
		<<link "Drain silicone from your breast implants.">> <<set $silicone -= 10>> <<gt $location>><</link>>

	<</if>>
	<<bteeth>>
	/*$inventory.get("tampon")*/
	<<actCLA 'Change clothes and toys' -1>>
		<<actCLA 'Return'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<<wearpan>>
		<<removepan>>
		<<if $curloc == 'vanrPar' and $wardrobe.clothingworntype == 'nude'>>
			<<actCLA 'Wear clothes (0:05)'>>
				<<set $time.minutes += 5>>
				<<video "pc/activities/misc/dress_1.mp4">>
				You get dressed.
				<<gs 'clothing' 'wear_last_worn'>>

				<<actCLA 'Return'>>
					<<set $menu_off = 0>> <<gt $location>>
				<</actCLA>>
			<</actCLA>>
		<<elseif $curloc == 'vanrPar' and $wardrobe.clothingworntype != 'nude'>>
			<<actCLA 'Remove clothes (0:05)'>>
				<<set $time.minutes += 5>>
				<<video "pc/items/accessories/computer/webcam/undress1.mp4">>
				You remove your clothing.
				<<gs 'clothing' 'strip'>>

				<<actCLA 'Return'>>
					<<set $menu_off = 0>> <<gt $location>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
		<<toymanage>>
	<</actCLA>>
	<<act "Check weight on the scales">>
		<<msg `'<center>Your weight is '+$pc.pcs_weight.roundToDecimal(1)+' kg<br>Your body mass index (BMI) is '+$pc.bmi.roundToDecimal(1)+'.<br>$pc.bmi_desc</center>'`>>
	<</act>>
	<<gs 'bathroom_pee_private_action'>>
	<<basin>>
	<<brit>>
	<<enema>>
	<<palelady>>
	<<if getvar("$mosolmaz") > 0 and getvar("$mosol") > 0 and $mosal_time != ($time.daystart * 100) + $time.hour>>
		<<actCLA 'Rub ointment onto your pussy (0:05)'>>
			<<set $mosal_time = ($time.daystart * 100) + $time.hour>>
			<<set $time.minutes += 5>>
			<<set $mosolmaz -= 1>>
			<<set $mosol -= 5>>
			You take a tube of cream and rub it onto your itchy vulva.
			<<actCLA 'Finish'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<!-- !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 getvar("$pc.pregtest") > 0 and (getvar("$abortionbirthdate") == 0 or $time.daystart - getvar("$abortionbirthdate") > 100)>>
		<<actCLA 'Do a pregnancy test (0:05)'>>
			<<image "pc/items/accessories/birthcontrol/preg_test.jpg">>
			<p>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...</p>
			When the time is up, you eagerly snatch it up and yank off the cap to see the results.
			<<set $time.minutes += 5>>
			<<set $pc.pregtest -= 1>>

			<<if getvar("$pc.pregchem") > 120 and getvar("$bimbolevel") < 3 and $pc.knowpreg == 0 and getvar("$husband") == 0 and getvar("$pcs_pregtalk") == 0>>
				<<set $pc.knowpreg = 1>>
				<<set $pc.thinkpreg = 1>>
				The test shows two strips. You are pregnant. As you look at the test in your hand, you are...
				<<actCLA 'Horrified'>>
					<<gt 'din_van' 'HorrifiedReact1'>>
				<</actCLA>>
				<<actCLA 'Concerned'>>
					<<gt 'din_van' 'ConcernedReact1'>>
				<</actCLA>>
				<<actCLA 'Excited'>>
					<<gt 'din_van' 'ExcitedReact1'>>
				<</actCLA>>
			<<elseif getvar("$pc.pregchem") > 120 and getvar("$bimbolevel") == 3 and $pc.knowpreg == 0 and getvar("$husband") == 0 and getvar("$pcs_pregtalk") == 0>>
				<<set $pc.knowpreg = 1>>
				<<set $pc.thinkpreg = 1>>
				The test shows two strips. You are pregnant. As you look at the test in your hand, you are...
				<<actCLA 'Excited'>>
					<<gt 'din_van' 'ExcitedReact1'>>
				<</actCLA>>
				<<actCLA 'Aroused'>>
					<<gt 'din_van' 'ArousedReact1'>>
				<</actCLA>>
			<<elseif getvar("$pc.pregchem") > 120 and $pc.knowpreg == 0 and getvar("$husband") == 1 and getvar("$kid") == 0 and getvar("$pcs_pregtalk") == 0>>
				<<set $pc.knowpreg = 1>>
				<<set $pc.thinkpreg = 1>>
				<<gt 'din_van' 'WifeReact1'>>
			<<elseif getvar("$pc.pregchem") > 120 and $pc.knowpreg == 0 and getvar("$husband") == 1 and getvar("$kid") > 0 and getvar("$pcs_pregtalk") == 0>>
				<<set $pc.knowpreg = 1>>
				<<set $pc.thinkpreg = 1>>
				<<gt 'din_van' 'WifeReact2'>>
			<<elseif getvar("$pcs_pregtalk") == 1 and getvar("$pc.pregchem") > 120 and $pc.knowpreg == 0>>
				<<set $pc.knowpreg = 1>>
				<<set $pc.thinkpreg = 1>>
				The test shows two strips. You are pregnant.
			<<elseif getvar("$pcs_pregtalk") == 1 or ($pc.knowpreg == 1 and $pc.preg == 1)>>
				<<set $pc.knowpreg = 1>>
				<<set $pc.thinkpreg = 1>>
				The test shows two strips. You are pregnant.
			<<else>>
				<<set $pc.knowpreg = 0>>
				The test shows one band. You are not pregnant.
				<<actCLA 'Sigh in relief'>>
					<<gt 'din_van' 'ReliefReact'>>
				<</actCLA>>
				<<actCLA 'Sigh in disappointment'>>
					<<gt 'din_van' 'DisappointedReact'>>
				<</actCLA>>
			<</if>>
			<<actCLA 'Finish'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<!-- !!breast pump is now in the menu, not on the screen-->
	<<if getvar("$breastpump") > 0 and getvar("$bp_unbox") >= 1>>
		<<actCLA 'Use breast pump'>>
			<<gt 'lact_bp' 'bp_milking'>>
		<</actCLA>>
	<<elseif getvar("$breastpump") > 0 and getvar("$bp_unbox") <= 0>>
		<<link "Unbox">><<gt 'lact_bp' 'bp_unbox_event'>><</link>> your breast pump
	<<elseif getvar("$breastpump") <= 0>>
		<<gs 'lact_bp' 'massage'>>
	<</if>>
<<else>>
	<!-- Public toilet -->
	<<gs 'bathroom_pee_public_action'>>
<</if>>

:: bathroomEvents

<<if $location_var[$here][0] == 'misery'>>
	<<set $menu_off = 1>>
	<<if getvar("$stiralka") > 0>>
		<<if getvar("$husband") > 0 and getvar("$husbanday") > 0 and $husporday != $time.daystart and getvar("$poroshok") >= 1>>
			<<set $husband += 5>>
			<<set $poroshok -= 1>>
			<<set $husporday = $time.daystart>>
			The washing machine washed your husband''s dirty laundry.
		<<elseif getvar("$poroshok") < 1>>
			You have run out of washing powder for the washing machine.
		<</if>>
	<</if>>
	<<if getvar("$husband") > 0 and getvar("$husbanday") > 0 and $husporday != $time.daystart and getvar("$poroshok") >= 2>>
		<<actCLA 'Wash your husband`s clothes (2 units of washing powder) (1:00)'>>
			<<set $husband += 5>>
			<<set $poroshok -= 2>>
			<<set $time.minutes += 60>>
			<<set $husporday = $time.daystart>>
			<<set $pc.mood -= 20>>
			<<image "locations/city/residential/apartment/stir.jpg">>
			You spend an hour washing your husband''s dirty laundry.
			<<actCLA 'Leave the bathroom'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$husband") > 0 and getvar("$husbanday") > 0 and $huspolday != $time.daystart>>
		<<actCLA 'Clean the apartment (1:00)'>>
			<<set $husband += 5>>
			<<set $time.minutes += 60>>
			<<set $huspolday = $time.daystart>>
			<<set $pc.mood -= 20>>
			<!-- !!'<<image `'shared/home/kitchen/cook.jpg'`>>'-->
			You take a rag and start cleaning the apartment.
			<<actCLA 'Finish'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'misery_2'>>
	<<set $menu_off = 1>>
	<<if getvar("$stiralka") > 0>>
		<<if getvar("$husband") > 0 and getvar("$husbanday") > 0 and $husporday != $time.daystart and getvar("$poroshok") >= 1>>
			<<set $husband += 5>>
			<<set $poroshok -= 1>>
			<<set $husporday = $time.daystart>>
			The washing machine washed your husband''s dirty laundry.
		<<elseif getvar("$poroshok") < 1>>
			You have run out of washing powder for the washing machine.
		<</if>>
	<</if>>
	<<if getvar("$husband") > 0 and getvar("$husbanday") > 0 and $husporday != $time.daystart and getvar("$poroshok") >= 2>>
		<<actCLA "Wash your husband`s clothes (2 units of washing powder) (1:00)">>
			<<set $husband += 5>>
			<<set $poroshok -= 2>>
			<<set $time.minutes += 60>>
			<<set $husporday = $time.daystart>>
			<<set $pc.mood -= 20>>
			<<image "locations/city/residential/apartment/stir.jpg">>
			You spend an hour washing your husband''s dirty laundry.
			<<actCLA 'Leave the bathroom'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$husband") > 0 and getvar("$husbanday") > 0 and $huspolday != $time.daystart>>
		<<actCLA 'Clean the apartment (1:00)'>>
			<<set $husband += 5>>
			<<set $time.minutes += 60>>
			<<set $huspolday = $time.daystart>>
			<<set $pc.mood -= 20>>
			<!-- !!'<<image `'shared/home/kitchen/cook.jpg'`>>'-->
			You take a rag and start cleaning the apartment.
			<<actCLA 'Finish'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'buffpick'>>
	<<set $menu_off = 1>>
	<<image "locations/city/citycenter/gym/exercise/fit2.jpg">>
	While drying off and getting dressed, you examine the sleek muscles that are showing through your skin.
	As you do so, you think about how you look and decide:
	<<actCLA 'You like how you look.'>>
		<<set $normbuffpick = 2>> <<set $mirror_steam = $time.hour>> <<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
	<<actCLA "You don`t like how you look.">>
		<<set $nrmbfpckct += 1>> <<set $normbuffpick = 0>> <<set $mirror_steam = $time.hour>> <<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'ReliefReact'>>
	<<image "pc/items/accessories/birthcontrol/preg_test.jpg">>
	Negative.
	<p>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.</p>
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'DisappointedReact'>>
	<<image "pc/items/accessories/birthcontrol/preg_test.jpg">>
	Negative.
	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.
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'HorrifiedReact1'>>
	<<set $menu_off = 1>>
	<<set $pcs_pregtalk = 1>>
	<<set $time.minutes += 10>>
	<p>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?</p>
	<<if $pc.sexStat('hidden_vaginal') > 0 and $pc.sexStat('vaginal') == 1>>
		You don't even know how this is possible. You've never even had sex with anyone.
		<p>What did you do to deserve this? What is everyone going to think of you? Your life is ruined.</p>
		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 getvar("$rape") > 0 and $pc.sexStat('vaginal') > 1>>
		<p>It’s bad enough that you were raped, but possibly getting pregnant from it as well? It’s completely unfair!</p>
		<p>What did you do to deserve this? What is everyone going to think of you? Your life is ruined.</p>
		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.
		<p>What did you do to deserve this? What is everyone going to think of you? Your life is ruined.</p>
		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.
	<</if>>
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'ConcernedReact1'>>
	<<set $menu_off = 1>>
	<<set $pcs_pregtalk = 1>>
	<<set $time.minutes += 10>>
	<p>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?</p>
	<<if $pc.sexStat('hidden_vaginal') > 0 and $pc.sexStat('vaginal') == 1>>
		<p>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?</p>
		<p>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.</p>
	<<elseif getvar("$rape") > 0 and $pc.sexStat('vaginal') > 1>>
		The worst part about this whole situation is that this isn''t even your fault. This was forced on you.
		<p>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.</p>
	<<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.
		<p>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.</p>
	<</if>>
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'ExcitedReact1'>>
	<<set $menu_off = 1>>
	<<set $pcs_pregtalk = 1>>
	<<set $time.minutes += 10>>
	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 $pc.sexStat('hidden_vaginal') > 0 and $pc.sexStat('vaginal') == 1>>
		<p>You're not sure how this happened, but you're not going to complain. Who cares if a miracle made it happen?</p>
		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 getvar("$rape") > 0 and $pc.sexStat('vaginal') > 1>>
		<p>You don’t even care about the circumstances that got you pregnant. It was absolutely worth it for this moment.</p>
		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.
	<</if>>
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'ArousedReact1'>>
	<<set $menu_off = 1>>
	<<set $pcs_pregtalk = 1>>
	<<set $time.minutes += 10>>
	<p>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.</p>
	<<if getvar("$rape") > 0 and $pc.sexStat('vaginal') > 1 and getvar("$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 getvar("$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.
	<</if>>
	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.
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'WifeReact1'>>
	<<set $menu_off = 1>>
	<<set $pcs_pregtalk = 1>>
	<<set $time.minutes += 10>>
	<p>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. </p>
	You have a little time before your husband gets home and the baby''s room isn''t going to design itself.
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'WifeReact2'>>
	<<set $menu_off = 1>>
	<<set $pcs_pregtalk = 1>>
	<<set $time.minutes += 10>>
	<p>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.</p>
	<<actCLA 'Finish'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>
<</if>>
<!-- !!-------------------------------------------------------------------------------------------------------------------------------------------------------->
<!-- !!Peeing text-->
<!-- !!I'm separating the following text into two versions, some for private bathrooms like those found in homes, and one set for public bathrooms, like those at the school.-->
<!-- !!Private bathrooms: One of these text should be randomly selected if using a private restroom, such as one in a home.-->
:: bathroom_pee_private_action
	<<if ($pee_hour != $time.hour or ($pee_hour == $time.hour and $pee_day != $time.daystart)) and getvar("$cheatPee") == 0>>
		<<actCLA 'Go pee (0:04)'>>
			<<set $menu_off = 1>>
			<<set $pee_hour = $time.hour>>
			<<set $pee_day = $time.daystart>>
			<<set $time.minutes += 4>>
			<<image "pc/body/pee/private/#.jpg" 1 19>>
			<!-- !!Get random private peeing picture-->
			<<either>>
				You take a seat on the toilet and begin peeing, glad to feel the pressure released.
			<<or>>
				After sitting on the toilet you finally release your bladder. A shiver runs down your spine as the stream flows out of you. "Wow." you think, "I had to go more than I thought."
			<<or>>
				Settling onto the toilet seat, you pull out your phone and begin checking for messages and doing other things to occupy the time until the stream slows to a trickle and finally stops.
			<<or>>
				You plop down onto the porcelain throne and begin to unleash a torrent of urine into the bowl. As you wait for nature to finish it's business, you begin to daydream a bit as your mind wanders off.
			<<or>>
				<p>While relaxing your bladder and beginning to pee, you decide to reflect on your recent interactions with the people in your life. "What do they think of me? Do they talk behind my back?" You continue contemplating until your body signals that the flow has ended.</p>
			<<or>>
				You nearly piss yourself as you rush to seat yourself on the toilet. Unable to hold back the flood anymore, your body releases a seemingly endless stream as you moan quietly in relief, thankful that you made it in time.
			<<or>>
				After situating yourself on the toilet, you relax and begin peeing. The urine tickles your labia as it sprays out of you into the toilet bowl.
			<<or>>
				As you begin to sit down, you nearly jump back to your feet as the cold toilet seat stings your bare bottom. You shake your head and sigh before settling back onto the icy seat and doing your business.
			<</either>>
			<!-- !!If PC is on her period and using tampon, then the following options should appear as well as the standard "Finish and wipe" act:-->
			<!-- !!This may require an addition check to see if the PC has a purse since I think they need that to carry tampons with them.-->
			<<if getvar("$isprok") == 1 and $inventory.get("tampon") > 0>>
				<<actCLA 'Change tampon (0:02)'>>
					<<set $time.minutes += 2>>
					<<image "pc/body/pee/period/tampon/#.jpg" 1 12>>
					Reaching down and taking the string between your fingers, you slowly pull the used tampon from your vagina. You wrap it in toilet paper to be thrown in the trash bin. Opening your purse, you retrieve a fresh one, unpack it and carefully insert it into yourself.
					<<gs 'bathroom_pee_private_end_action'>>
				<</actCLA>>
			<</if>>
			<!-- !!If PC is on her period and using pad, then the following options should appear as well as the standard "Finish and wipe" act:-->
			<!-- !!This may require an addition check to see if the PC has a purse since I think they need that to carry pads with them.-->
			<<if getvar("$isprokp") == 1 and $inventory.get("sanpad") > 0>>
				<<actCLA 'Change pad (0:02)'>>
					<<set $time.minutes += 2>>
					<<image "pc/body/pee/period/pad/#.jpg" 1 6>>
					Checking your pad, you decide it's time for a new one. You carefully peel it off of your panties before folding it into thirds and setting it aside to be thrown away. Digging in your bag, you pull out a fresh pad, unpackage it, peel off the adhesive strip, and place it into your underwear. Finally, you wrap the wings around the sides of the gusset to make sure it is nice and secure.
					<<gs 'bathroom_pee_private_end_action'>>
				<</actCLA>>
			<</if>>
			<<gs 'bathroom_pee_private_end_action'>>
		<</actCLA>>
	<</if>>

:: bathroom_pee_private_end_action
	<<actCLA 'Finish and wipe'>>
		<<image "pc/body/pee/wiping/#.jpg" 1 9>>
		<<either>>
			Gathering some toilet paper from the roll, you reach down wipe your vagina clean from the last drops of urine leaking from you before dropping the paper into the toilet.
		<<or>>
			Wrapping some toilet paper around your hand, you reach around and give your pussy and ass a quick wipe before letting the paper drop into the bowl.
		<<or>>
			You take a wad of toilet paper in your fist before using it to gently pat your vagina dry. You toss the used material in the toilet and flush it down.
		<</either>>
		<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
	<</actCLA>>

:: bathroom_pee_public_action[include]
	<!-- !!Public bathrooms: These texts should be randomly selected if using a public restroom-->
	/*<<if ($pee_hour != $time.hour or $pee_day != $time.daystart) and getvar("$cheatPee") == 0>>*/
		<<act 'Go pee (0:04)'>>
			<<gt 'bathroom_pee_public_action_execute'>>
		<</act>>
	/*<</if>>*/
:: bathroom_pee_public_action_execute[event]
	<<set $time.minutes += 4>>
	<<image "pc/body/pee/public/#.jpg" 1 11>>
	<<either>>
		Settling onto the toilet seat, you pull out your phone and begin checking for messages and doing other things to occupy the time until the stream slows to a trickle and finally stops.
	<<or>>
		<p>While relaxing your bladder and beginning to pee you decide to reflect on your recent interactions with the people in your life. "What do they think of me? Do they talk behind my back?" You continue contemplating until your body signals that the flow has ended.</p>
	<<or>>
		You nearly piss yourself as you rush to seat yourself onto the toilet. Unable to hold back the flood anymore, your body releases a seemingly endless stream as you moan quietly in relief, thankful that you made it in time.
	<<or>>
		Immediately up entering the restroom, your nostrils are assaulted by the most heinous stench. Knowing that you have no other option, you try to suppress your gags as you sit in a stall and do your business.
	<<or>>
		<<image "pc/body/pee/public/hovercraft#.jpg" 1 2>>
		You enter the stall and groan in disgust at the sight of the gross facilities. Realizing that you have no choice, you decided to "hovercraft" it. Instead of sitting down on the filthy seat, you hover your ass above the bowl before letting go of the pee you''d been holding, not caring if all of the stream gets into the toilet or elsewhere.
	<<or 3>>
		<!-- !!Graffiti trigger text-->
		As you sit down to relieve your bladder you get distracted reading some of the graffiti on the wall of the stall.
		<<set $rand_girl = func('gschool_randperson', 1, '', 1, 1, 1, 1, 1, 0)>>
		<<either>>
			<p>Albina and her Starlets are a bunch of dirty whores!</p>
		<<or>>
			<p>$rand_girl's vagina smells like puke!</p>
		<<or>>
			<p>Beware of Dimka! He's not as nice as he seems!</p>
		<<or>>
			<p>If you're on the rag, check the seat when you get up and WIPE IT OFF!!! No one wants a nasty seat!</p>
		<<or>>
			<p>If you smell fish, it's probably your dirty twat! Hahaha!</p>
		<<or>>
			<p>Shave your punani, bitches! No one likes digging through a forest, LOL.</p>
		<<or>>
			<p>Shaved pussies stink and are prone to infection! Don't believe the lies!</p>
		<<or>>
			<p>Fight the Patriarchy!</p>
		<<or>>
			<p>Tampons vs. Pads, cast your vote! Below this text are hash marks indicating various girl's preference. One person also wrote "Freebleeder for life!" Ewww.</p>
		<<or>>
			<p>Petka's cock is smaller than my lipstick tube, LOL!</p>
		<<or>>
			<p>You're beautiful! Believe that!</p>
		<<or>>
			<p>Putin is a chauvinist pig!</p>
		<<or>>
			<p>Suck dick! It's good for you!</p>
		<<or>>
			<p>"I'll pull out, I swear! is the most dangerous lie you can believe." This text is followed by a crude drawing of a pregnant woman.</p>
		<<or>>
			Cut back on the perfume, ladies. It smells like a unicorn farted in here.
		<<or>>
			<p>$rand_girl is a slut and everyone knows it!</p>
		<<or>>
			<p>Men are like pantyhose; They either run, cling, or don't fit right in the crotch!</p>
		<<or>>
			<p>Gopnik guys are SO HOT!!!</p>
		<<or>>
			<p>That rumor about black guys is true! Just ask Marcus for a sneak peek.</p>
		<<or>>
			<p>Butt sex is the best sex!</p>
		<<or>>
			<p>I just wrote on the wall. Take THAT, society!</p>
		<<or>>
			Never quit loving your clit.
		<</either>>
	<</either>>
	/*<<if getvar("$mesec") > 0 and (getvar("$isprok") == 1 or (getvar("$isprok") == 0 and getvar("$isprokp") == 0)) and $inventory.get("tampon") > 0 and $wardrobe.purseEquipped == 1>>
		<<actCLA 'Change tampon (0:02)'>>
			<<set $time.minutes += 2>>
			<<image "pc/body/pee/period/tampon/#.jpg" 1 12>>
			Reaching down and taking the string between your fingers, you slowly pull the used tampon from your vagina. You wrap it in toilet paper to be thrown in the trash bin. Opening your purse, you retrieve a fresh one before unpackaging it and carefully inserting it into yourself.
			<<gs 'bathroom_pee_public_end_action'>>
		<</actCLA>>
	<</if>>
	<<if getvar("$mesec") > 0 and (getvar("$isprokp") == 1 or (getvar("$isprok") == 0 and getvar("$isprokp") == 0)) and $inventory.get("sanpad") > 0 and $wardrobe.purseEquipped == 1>>
		<<actCLA 'Change pad (0:02)'>>
			<<set $time.minutes += 2>>
			<<image "pc/body/pee/period/pad/#.jpg" 1 6>>
			Checking your pad, you decide it's time for a new one. You carefully peel it off of your panties before folding it into thirds and setting it aside to be thrown away. Digging in your bag, you pull out a fresh pad, unpackage it, peel off the adhesive strip, and place it into your underwear. Finally, you wrap the wings around the sides of the gusset to make sure it is nice and secure.
			<<gs 'bathroom_pee_public_end_action'>>
		<</actCLA>>
	<</if>>*/
	<<gs 'bathroom_pee_public_end_action'>>
:: bathroom_pee_public_end_action
	<<actCLA 'Finish and wipe'>>
		<<image "pc/body/pee/wiping/#.jpg" 1 9>>
		<<either>>
			Gathering some toilet paper from the roll, you reach down wipe your vagina clean from the last drops of urine leaking from you before dropping the paper into the toilet.
		<<or>>
			Wrapping some toilet paper around your hand, you reach around and give your pussy and ass a quick wipe before letting the paper drop into the bowl.
		<<or>>
			You take a wad of toilet paper in your fist before using it to gently pay your vagina dry. You toss the used material in the toilet and flush it down.
		<<or>>
			You gather some of the rough, cheap toilet paper and use it to lightly wipe yourself, not wanting to irritate your sensitive skin. You drop it into the dirty toilet and use your foot to push the handle in order to flush.
		<<or>>
			Looking for the roll of toilet paper, you are dismayed to see that the roll has been used up. Noticing that the stall next to you seems occupied, you politely ask the stranger to help you out. The stranger chuckles a bit before kindly handing you a wad under the stall wall, which you happily use.
		<<or>>
			<<image "pc/body/pee/wiping/no#.jpg" 1 6>>
			Reaching out for toilet paper, you sigh as you notice that the roll is empty. Annoyed, you wiggle your ass to shake the last few drops off before pulling up your panties and walking out of the stall.
		<</either>>
		<<ret 'Finish'>>
	<</actCLA>>

:: shave_options

	<<set $menu_off = 1>>

	<!-- !! images handled using FUNC(''$pube_image'')-->
	<h2>Shaving optons</h2>
	<center>Here you can choose your style for pubic hair and which body parts you wish to shave.</center>

	<div id="pussyShaveOptions">
	<<linkWithImage `func('$pube_image',60,$pcs_pubecol[2],2)` "Don't Shave" `($pc.pubestyle == 0) ? 'selected' : ''`>>
		<<set $pc.pubestyle = 0>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage 'pc/body/pussy/hair/pussy.jpg' 'Clean Shave' `($pc.pubestyle == 1) ? 'selected' : ''`>>
		<<set $pc.pubestyle = 1>>
		<<set $shave_length = 2>>
		<<set $shave_trigger = 4>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],2)` 'V-shaped' `($pc.pubestyle == 2) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 2>> <<set $shave_length = 16>> <<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],3)` 'Triangle-shaped' `($pc.pubestyle == 3) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 3>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],4)` 'Landing-strip' `($pc.pubestyle == 4) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 4>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],5)` 'Heart-shaped' `($pc.pubestyle == 5) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 5>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],6)` 'Flame-shaped' `($pc.pubestyle == 6) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 6>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],7)` 'Cross-Shaped' `($pc.pubestyle == 7) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 7>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],8)` 'Trimmed' `($pc.pubestyle == 8) ? 'selected' : ''` `($pc.pcs_pubes > 20) ? true : false`>>
		<<set $pc.pubestyle = 8>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],9)` 'Small Bush' `($pc.pubestyle == 9) ? 'selected' : ''` `($pc.pcs_pubes > 25) ? true : false`>>
		<<set $pc.pubestyle = 9>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],10)` 'Full Bush' `($pc.pubestyle == 10) ? 'selected' : ''`>>
		<<set $pc.pubestyle = 10>>
		<<set $shave_length = 26>>
		<<set $shave_trigger = 31>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],11)` 'Lazy' `($pc.pubestyle == 11) ? 'selected' : ''` `($pc.pcs_pubes > 10) ? true : false`>>
		<<set $pc.pubestyle = 11>>
		<<set $shave_length = 2>>
		<<set $shave_trigger = 8>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],12)` 'Mini Bush' `($pc.pubestyle == 12) ? 'selected' : ''` `($pc.pcs_pubes > 15) ? true : false`>>
		<<set $pc.pubestyle = 12>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],13)` 'Bushy Strip' `($pc.pubestyle == 13) ? 'selected' : ''` `($pc.pcs_pubes > 20) ? true : false`>>
		<<set $pc.pubestyle = 13>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>

	<<linkWithImage `func('$pube_image',16,$pcs_pubecol[2],14)` 'Rectangle' `($pc.pubestyle == 14) ? 'selected' : ''` `($pc.pcs_pubes > 20) ? true : false`>>
		<<set $pc.pubestyle = 14>>
		<<set $shave_length = 16>>
		<<set $shave_trigger = 21>>
		<<gt 'shave_options'>>
	<</linkWithImage>>
	</div>

	Your razor will last for <b>$inventory.get("razor")</b> more shaves.
	<<actCLA 'Return'>>
		<<set $menu_off = 0>> <<gt $location>>
	<</actCLA>>

:: showerdin_macro[widget]
<<widget 'showerdin'>>
	<<if getvar("$q.therapist.hypnoAddict") == 0>>
		<<set $cumspclnt = 1>>
	<<else>>
		<<set $cumspclnt = 18>>
	<</if>>
	<<gs 'cum_cleanup'>>
	<<set $pc.body_write = 0>>
	<<set $face_write = 0>>
	<<set $pc.pcs_hairbsh = 0>>
	<<set $pc.makeupAmount = 0>>
	<<if $pc.frost > 0>>
		<<set $pc.frost = 0>>
	<</if>>
	<<setinit $lactation['lactmess'] = 0>>
	<<if $pc.pcs_sweat > 10>>
		<<set $pc.pcs_sweat = 10 + rand(0,4)>>
	<</if>>
	<<gs 'body' 'SkinGain' 'CleanSelf'>>
	/*<<if $pc.eyelashes_false >= 1>>
		<<if rand(0,4) <= 2>>
			You're careful enough that your false lashes make it through relatively unscathed.
		<<else>>
			Unfortunately, your false lashes don't make it through the shower.
			<<set $pc.eyelashes_false = 0>>
			<<set $pc.eyelashes = $pcs_naturallashes>>

		<</if>>
	<</if>>*/
<</widget>>
:: bteeth_macro[widget]
<<widget 'bteeth'>>
	<<if $pc.pcs_breath != 1 or $pc.cumAtLocation(12) == 1>>
		<<actCLA 'Brush your teeth (0:03)'>>
			<<gt 'brush_teeth'>>
		<</actCLA>>
	<</if>>
<</widget>>

:: brush_teeth
<<set $time.minutes += 3>>
<<set $cumspclnt = 2>>
<<gs 'cum_cleanup'>>
<<set $pc.pcs_breath = 1>>
<<setinit $pc.teeth['brushed'] += 1>>
<<if $wardrobe.clothingworntype == 'nude' and $wardrobe.braworntype == 'none' and $wardrobe.pantyworntype == 'none'>>
	<<video "shared/home/bathroom/brushteeth.mp4">>
<<else>>
	<<image "shared/home/bathroom/brushteeth.jpg">>
<</if>>
You brush your teeth and now they are clean and minty fresh.
<<ret 'Finish'>>

:: dryOff_macro[widget]
<<widget 'dryOff'>>
	<<actCLA 'Get out and dry off'>>
		<<set $mirror_steam = $time.hour>> <<gt $location>>
	<</actCLA>>
<</widget>>
:: shower_macro[widget]
<<widget 'shower'>>
	<<act 'Take a shower (0:15)'>>
		<<gt "shower_macro_exec">>
	<</act>>
<</widget>>
:: shower_macro_exec[event]
	<<set $time.minutes += 15>>
	
	/*<<set $noShampoo_tmp = $noShampoo>>*/
	<<showerdin>>
	<<video "shared/home/bathroom/dush.mp4">>
	You undress and turn on the water in the shower. When it hits the right temperature, you step into the shower and let the warm water rain down on you.

	<<if !$location.tags.includes('freeShampoo')>>
		<<run $inventory.dec("shampoo")>>
		<<set _shampooLeft = $inventory.get("shampoo")>>
		<<if _shampooLeft == 0>>
			<<negative 2>>You have no shampoo left. When you get a chance, you should stop by the supermarket and buy some shampoo.<</negative>>
		<<elseif _shampooLeft <= 5>>
			<<negative>>You are getting low on shampoo, with only _shampooLeft remaining. When you get a chance, you should stop by the supermarket and buy some more.<</negative>>
		<</if>>
	<</if>>

	<<ret 'Get out and dry off'>>
		/*<<if $time.daystart < 10 and $start_subtype == 'tg'>>
			<<set $pc.horny += rand(6,10)>>
			It's really arousing to see your new body with all its smooth curves, breasts with large nipples, wide hips and smooth legs. You begin to lather your body, noticing how soft and tender it feels. Once you're sure you haven''t missed a single spot, you begin to wash yourself off, continuing to experience new and strange sensations.
		<<elseif $time.daystart < 30 and $start_subtype == 'tg'>>
			<<set $pc.horny += rand(2,6)>>
			You've already gotten used to your feminine body and its softness doesn''t surprise you very much anymore, but you still let your hands wander a bit over your soft curves before you begin to wash yourself in earnest.
		<<else>>
			<<set $pc.horny += rand(0,2)>>
			<<if $noShampoo_tmp == 1>>
				It's not your shampoo, so you use a little more than you normally would; with a tinge of guilt you
			<<else>>
				Using your own shampoo, you carefully
			<</if>>
			lather yourself up, trying not to miss any spots, and then wash off.
		<</if>>
		
		<<if getvar("$q.therapist.hypnoAddict") > 0>>
			You have no reason to, but you carefully avoid cleaning out your pussy and ass.
		<</if>>
		<<if $pc.deodorant_on == 1>>
		<<gs 'sweat' 'remove_deo'>>
	<</if>>
		<<if getvar("$btwarn") > 0>>
			<<if getvar("$btwarn") == 1>>
			<<set $weightwarn = 'losing'>>

		<</if>>
			<<if getvar("$btwarn") == 2>>
			<<set $weightwarn = 'gaining'>>

		<</if>>
			<font color="red"><b>You seem to be <<$weightwarn>> weight.</b></font>
			 <<set $btwarn = 0>>
		<</if>>
		<<if getvar("$normbuffpick") == 1>>
			<b>You notice that your muscles are starting to show through your skin.</b>
			<<actCLA 'Examine yourself closer while drying off and getting dressed...'>>
			<<gt 'din_van' 'buffpick'>>
		<</actCLA>>
		<</if>>
		<<if getvar("$lactation['active']") > 0 and getvar("$pain['nipples']") < 60 and getvar("$lactation['pc_aware']") <= 0>>
			<<if getvar("$pcs_usedbreastpumponherself") > 0 and getvar("$pcs_massagedherbreasts") <= 0>>
				<p>As you clean your breasts, something catches your eye. White drops come from your nipples. It is milk.<br>Using the breast pump regularly probably made you lactate!</p>
				<<setinit $lactation['induced'] = 1>>
			<<elseif getvar("$pcs_usedbreastpumponherself") <= 0 and getvar("$pcs_massagedherbreasts") > 0>>
				<p>As you clean your breasts, something catches your eye. White drops come from your nipples. It is milk. Regularly massaging your breasts probably made you lactate!<br></p>
				<<setinit $lactation['induced'] = 1>>
			<<elseif getvar("$pcs_usedbreastpumponherself") > 0 and getvar("$pcs_massagedherbreasts") > 0>>
				<p>As you clean your breasts, something catches your eye. White drops come from your nipples. It is milk. All that pumping and massaging your breasts probably caused you to lactate!<br></p>
				<<setinit $lactation['induced'] = 1>>
			<<else>>
				<p>As you clean your breasts, something catches your eye. White drops come from your nipples. You find, to your surprise, that it is milk. You have started lactating!<br></p>
				<<if $pc.thinkpreg == 1 or $pc.knowpreg == 1>>
					This is probably happening because you are pregnant.
				<<else>>
					You should have this checked out by a doctor. You could be pregnant.
				<</if>>
				<<setinit $lactation['induced'] = 0>>
			<</if>>
			<<set $pcs_usedbreastpumponherself = 0>>
			<<set $pcs_massagedherbreasts = 0>>
			<<setinit $lactation['pc_aware'] = 1>>
		<</if>>
		<<dryOff>>
		<<if $rapeday == $time.daystart and $rape_shower != $time.daystart>>
			<<actCLA 'Cry (react to rape)'>>
				<<set $rape_shower = $time.daystart>>
				<<set $time.minutes += rand(10,40)>>
				<<image "shared/home/bathroom/cry.jpg">>
				The last of the suds run off of you, but you can still <i>feel it</i>.
				Your rapist's cock <i>inside</i> you.
				His cum <i>leaking</i> out of you.
				You grab the soap again and scrub yourself again, but it still feels like something is there, coating your skin. You scrub and scrub and scrub but it just won''t go away until you finally cry out, throwing it into the corner. Tremors begin coursing through your body and you slowly sink down onto the shower floor, where you remain, sobbing while the water continues raining down on you.
				<<dryOff>>
			<</actCLA>>
		<<elseif $pc.horny >= 40>>
			<<actCLA 'Use the shower head on your pussy'>>
				<<set $menu_off = 1>>
				<<if rand(0, 5) == 0 and $locM == 'uni_dorm'>>
				<<gt 'vann' 'v4'>>

			<</if>>
				<<video "shared/home/bathroom/wash2.mp4">>
				You place the shower head onto your pussy and a powerful jet of warm water begins to caress you.
				<<if $pc.pcs_inhib < 30>>
				<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>

			<</if>>
				<<set $pc.mood += 15>>
				<<set $orgasm_or = 'no'>>
				<<gs 'arousal' 'clit_vibe'  - 10 'masturbate'>>
				<<set $orgasm_or = 'no'>>
				<<gs 'arousal' 'clit_vibe'  - 10 'masturbate'>>
				<<set $orgasm_or = 'yes'>>
				<<gs 'arousal' 'clit_vibe' 10 'masturbate'>>
				<<arousalEnd>>
				<<if getvar("$q.therapist.hypnoAddict") != 0>>
					You unconsciously avoid spraying water into your vagina.
				<<else>>
					<<set $cumspclnt = 8>>
					<<gs 'cum_cleanup'>>
				<</if>>
				<<dryOff>>
			<</actCLA>>
		<</if>>
		<<gs 'selfplay' 'shower_dildo_check'>>
		<<actCLA 'Take a selfie'>>
			<<gs 'telefon' 'Phone_selfie_image_bathing' 'shower'>>
		<</actCLA>>
		<<brit>>
		<<if getvar("$vanr_lock") == 0 and $loc == 'vanrPar'>>
			In your absentmindedness, you have forgotton to close the door.
			The idea that the door is open occupies your mind while you are showering. It would be very embarrassing if your brother or stepfather looked in at the wrong time.
			<<if getvar("$locat['Fam_inGad']") == 0>>
			<<gs 'vanrPar' 'peek'>>

		<</if>>
		<</if>>
		<<set $noShampoo_tmp to null>>*/
:: bath_macro[widget]
<<widget 'bath'>>
	<<actCLA 'Soak in the bath (0:30)'>>
		<<gt 'bath_macro_exec'>>
	<</actCLA>>
<</widget>>
:: bath_macro_exec[event]
		<<set $time.minutes += 30>>
		<<set $pc.pcs_sweat = 7 + rand(0,4)>>
		<<set $pc.mood += 20>>
		<<if !$location.tags.includes('freeShampoo')>>
			<<run $inventory.dec("shampoo")>>
			<<set _shampooLeft = $inventory.get("shampoo")>>
			<<if _shampooLeft == 0>>
				<<negative 2>>You have no shampoo left. When you get a chance, you should stop by the supermarket and buy some shampoo.<</negative>>
			<<elseif _shampooLeft <= 5>>
				<<negative>>You are getting low on shampoo, with only _shampooLeft remaining. When you get a chance, you should stop by the supermarket and buy some more.<</negative>>
			<</if>>
		<</if>>
		<<showerdin>>
		<<gs 'body' 'SkinGain' 'Bath'>>

		<<image "shared/home/bathroom/wash4.jpg">>
		<p>
			You undress while the bathtub fills up and dip a toe into the water.
			It is just the right temperature, so you climb in and let yourself sink into the warm water, moaning softly as you feel your muscles start to relax.
		</p>
		<<ret 'Get out and dry off'>>
		/*<<if $time.daystart < 10 and $start_subtype == 'tg'>>
			<<set $pc.horny += rand(6,10)>>
			You stare at the smooth, soft legs sticking out of the water. You're still not used to this new body and the look of all this roundness.
			As you start to soap yourself, you unwittingly turn your attention to your breasts. They're so soft and big, and when you touch them you feel an unfamiliar but pleasant sensation. You take your time getting familiar with your new body, then you begin to wash yourself in earnest.
		<<elseif $time.daystart < 30 and $start_subtype == 'tg'>>
			<<set $pc.horny += rand(2,6)>>
			You have become a little accustomed to your female body and casually soap up all these soft curves and rinse yourself off, rubbing your hands all over your feminine body to make sure you didn''t miss a spot.
		<<else>>
			<<set $pc.horny += rand(0,2)>>
			<<set 'You lean back and relax for a while. ' + iif($noShampoo_tmp == 1, 'It’s not your shampoo, so you use a little more than you normally would; with a tinge of guilt you ', 'Using your own shampoo, you carefully ') + 'begin to lather your body, gently gliding your soft hands over your smooth curves, and wash yourself thoroughly.'>>
		<</if>>
		<<if $inventory.get("shampoo") == 0 and getvar("$noShampoo_tmp") == 1>>
			When you get a chance, you should stop by the supermarket and buy some shampoo.
		<<elseif $inventory.get("shampoo") <= 5>>
			You are getting low on shampoo, with only $inventory.get("shampoo") remaining. When you get a chance, you should stop by the supermarket and buy some more.
		<</if>>
		<<if getvar("$q.therapist.hypnoAddict") > 0>>
			You have no reason to, but you carefully avoid cleaning out your pussy and ass.
		<</if>>

		<<if $pc.deodorant_on == 1>>
			<<gs 'sweat' 'remove_deo'>>
		<</if>>
		<<if getvar("$btwarn") > 0>>
			<<if getvar("$btwarn") == 1>>
			<<set $weightwarn = 'losing'>>

		<</if>>
			<<if getvar("$btwarn") == 2>>
			<<set $weightwarn = 'gaining'>>

		<</if>>
			<font color="red"><b>You seem to be <<$weightwarn>> weight.</b></font>
			 <<set $btwarn = 0>>
		<</if>>
		<<if getvar("$normbuffpick") == 1>>
			<b>You notice that your muscles are starting to show through your skin.</b>
			<<actCLA 'Examine yourself closer while drying off and getting dressed...'>>
				<<gt 'din_van' 'buffpick'>>
			<</actCLA>>
		<</if>>
		<<dryOff>>
		<<actCLA '"Wash" your pussy'>>
			<<set $menu_off = 1>>
			<<if $locM == 'uni_dorm' and rand(0, 5) == 1>>
				<<gt 'vann' 'v4'>>

			<</if>>
			<<set $time.minutes += 10>>
			<<video "shared/home/bathroom/wash7.mp4">>
			You turn on the faucet, lift your legs and scoot your ass over to align your pussy with the jet of warm water. It feels really good and soon a warmth begins to grow in your abdomen.
			<<if $pc.pcs_inhib < 30>>
				<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>

			<</if>>
			<<set $pc.mood += 15>>
			<<set $orgasm_or = 'no'>>
			<<gs 'arousal' 'clit_vibe'  - 10 'masturbate'>>
			<<set $orgasm_or = 'no'>>
			<<gs 'arousal' 'clit_vibe'  - 10 'masturbate'>>
			<<set $orgasm_or = 'yes'>>
			<<gs 'arousal' 'clit_vibe' 10 'masturbate'>>
			<<arousalEnd>>
			<<dryOff>>
		<</actCLA>>
		<<gs 'selfplay' 'bathtub_dildo_check'>>
		<<actCLA 'Take a selfie'>>
			<<gs 'telefon' 'Phone_selfie_image_bathing' 'bath'>>
		<</actCLA>>
		<<brit>>*/

:: SkinCare_macro[widget]
<<widget 'SkinCare'>>
	<<if $inventory.get("moisturizer") > 0 and $item_moisturizer_time <= $totminut>>
		<<actCLA 'Apply Moisturizer (0:05)'>>
			<<run $inventory.dec('moisturizer',1)>>
			<!-- ! Moisturiser ware-off timer, so you can only use twice a day. Cleared in cikl so always available in morning-->
			<<set $item_moisturizer_time = $time.minutesTimestamp+ 10 * 60>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 5>>
			<<image "shared/home/bathroom/skincare.jpg">>
			You get out your skin care products and apply them, the creams feel cool and nice against your skin. You sometimes wonder if all this effort and money is worth it, but one look in the mirror at your skin and you figure it is.
			<<gs 'body' 'SkinGain' 'Moisturizer'>>

			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
:: brit_macro[widget]
<<widget 'brit'>>
	<<if $inventory.get("razor") > 1>>
		<<if $pc.legHair > 3 or ($pc.pubestyle > 0 and $pc.pcs_pubes >= $shave_trigger)>>
			<<if $pc.legHair > 3 and ($pc.pubestyle > 0 and $pc.pcs_pubes >= $shave_trigger)>>
				<<actCLA 'Shave legs and pussy (0:15)'>>
					<<gt 'shaveLegsAndPubic'>>
				<</actCLA>>
			<</if>>
		<</if>>
	<</if>>
	<<if $inventory.get("razor") > 0>>
		<<if $pc.pubestyle > 0 and $pc.pcs_pubes >= $shave_trigger>>
			<<if $pc.pubestyle == 1>>
				<<set $shave_act = 'Shave your pussy'>>
				<<if $pc.pcs_pubes <= 10>>
					<<set $shave_txt1 = 'You lather up yourself up, and grab your razor, carefully scraping away stubble that is growing from your crotch.'>>
					<<set $shave_txt2 = 'After a few minutes of work, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble hiding in the folds of your crotch somewhere. Satisfied, you rinse yourself off, smiling in relief that your pussy is silky smooth once again.'>>
				<<else>>
					<<set $shave_txt1 = 'You lather up your crotch and take a razor to the hair growing there. After a few minutes of shaving, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble hiding in the folds of your crotch somewhere. Satisfied, you rinse yourself off, enjoying the newfound smoothness of your pussy.'>>
				<</if>>
			<<elseif ($pc.pubestyle >= 2 and $pc.pubestyle <= 8) or $pc.pubestyle >= 12>>
				<<if $pc.pcs_pubes >= $shave_trigger + 5>>
					<<set $shave_act = 'Shave your pussy'>>
					<<set $shave_txt1 = 'You lather up your crotch and start shaving away the edges of your pubic hair. After a few minutes, you`ve given your pussy a perfect hairdoo and rinse off the rest of the soap, admiring your new sexual fashion.'>>
				<<else>>
					<<set $shave_act = 'Trim your bush'>>
					<<set $shave_txt1 = 'You lather up your crotch and spend some time cleaning up the stubble around your pussy until your bush is neatly styled again.'>>
				<</if>>
			<<elseif $pc.pubestyle == 9>>
				<<set $shave_act = 'Trim your bush'>>
				<<if $pc.pcs_pubes >= 26>>
					<<set $shave_txt1 = 'You spend some time trimming back your thick bush of pubic hair, until it is a neat and tidy lawn of hair instead.'>>
				<<else>>
					<<set $shave_txt1 = 'You spend some time maintaining your bush, keeping it short and neat.'>>
				<</if>>
			<<elseif $pc.pubestyle == 10>>
				<<if $pc.pcs_pubes >= 40>>
					<<set $shave_act = 'Trim back your bush'>>
					<<set $shave_txt1 = 'You spend some time hacking back the wild jungle covering your crotch. Soon enough, you`re left with a sophisticated and tidy bush of hair that neatly carpets your pussy.'>>
				<<else>>
					<<set $shave_act = 'Trim your bush'>>
					<<set $shave_txt1 = 'You spend some time maintaining your bush, trimming back the edges, keeping it neat and tidy.'>>
				<</if>>
			<<elseif $pc.pubestyle == 11>>
				<<set $shave_act = 'Shave your pussy'>>
				<<if $pc.pcs_pubes <= 10>>
					<<set $shave_txt1 = 'As the water of the shower continues to roll down your body, you suddenly realize that the stubble growing around your pussy is starting to become irritating and you can`t put it off any longer. Lathering yourself up, you grab your razor and carefully scrape away the rough itchy hairs have been bothering you so.'>>
					<<set $shave_txt2 = 'After a few minutes of work, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble hiding in the folds of your crotch somewhere. Satisfied, you rinse yourself off, smiling in relief that your pussy is smooth once again.'>>
				<<else>>
					<<set $shave_txt1 = 'You lather up yourself up and take a razor to the hair growing over your crotch. After a few minutes of shaving, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble hiding in the folds of your crotch somewhere. Satisfied, you rinse yourself off, enjoying the newfound smoothness of your pussy.'>>
				<</if>>
			<<else>>
				<<set $shave_act = ''>>
			<</if>>
			<<if $shave_act != ''>>
				<<actCLA '$shave_act (0:10)'>>
					<<set $menu_off = 1>>
					<<if $pc.pcs_pubes <= 10 and getvar("$shave_length") == 2>>
						<<video "shared/home/bathroom/shave_stubble.mp4">>
					<<elseif getvar("$shave_length") == 2>>
						<<video "shared/home/bathroom/shave_bush.mp4">>
					<<elseif getvar("$shave_length") > 2>>
						<<video "shared/home/bathroom/trim_bush.mp4">>
					<<else>>
						<<image "shared/home/bathroom/shave3.jpg">>
					<</if>>
					<<set $time.minutes += 10>>
					<<set $pc.pcs_pubes = $shave_length>>
					<<set $pc.horny += 5>>
					<<run $inventory.dec('razor',1)>>
					<<=$shave_txt1||''>>
					<<=$shave_txt2||''>>
					<<dryOff>>
					/*<<gs 'selfplay' 'bathtub_dildo_check'>>
					<<gs 'selfplay' 'shower_dildo_check'>>*/
				<</actCLA>>
			<</if>>
		<</if>>
	<</if>>
	<<if $inventory.get("razor") > 0>>
		<<if $pc.legHair > 3>>
			<<actCLA 'Shave your legs (0:05)'>>
				<<gt 'shave_legs_tub'>>
			<</actCLA>>
		<</if>>
	<</if>>
<</widget>>

:: shave_legs_tub[event]
<<set $time.minutes += 5>>
<<set $pc.legHair = 0>>
<<set $pc.horny += 5>>
<<run $inventory.dec('razor',1)>>
/*<<if $locM == 'uni_dorm' and rand(0, 5) == 5>>
	<<gt 'vann' 'brit1'>>
<</if>>*/
<<image "shared/home/bathroom/shave.jpg">>
<<if $time.daystart < 10 and $start_subtype == 'tg'>>
	You can't shake off the fact that you're a girl now, so you decide it'd be best to shave your legs. You begin to lather your legs, still marveling at how soft and round they are. Then you take the razor in your hand and begin to shave your legs.
	You feel really awkward, never having done this before as a guy. Luckily, you had more than enough experience with shaving your face and technically this isn''t really all that different. In the end, you get a pretty decent job done.
<<elseif $time.daystart < 30 and $start_subtype == 'tg'>>
	<<set $pc.mood += 10>>
	<p>With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don't need to hide your legs in pants. Maybe you should wear a skirt tomorrow?</p>
<<else>>
	You lather your legs up with some soapy water and shave your legs. After a few swift movements, your legs are smooth as silk. The feeling of your smooth legs turns you on a little.
<</if>>
<<dryOff>>
/*<<gs 'selfplay' 'bathtub_dildo_check'>>
<<gs 'selfplay' 'shower_dildo_check'>>*/

:: tampon_macro[widget]
<<widget 'tampon'>>
	<<if $inventory.get("sanpad") > 0 and (getvar("$mesec") > 0 or (getvar("$placebopart") > 2 and getvar("$pillcon") < 40000)) and getvar("$isprokp") == 0 and getvar("$isprok") == 0 and $wardrobe.pantyworntype != 'none' and $pc.knowpreg == 0>>
		<<actCLA 'Use a sanitary pad (0:02)'>>
			<<set $menu_off = 1>>
			<<run $inventory.dec('sanpad',1)>>
			<<set $isprokp = 1>>
			<<set $time.minutes += 2>>
			<<set $pc.mood -= 5>>
			<<image `'pc/body/pee/period/pad/'+rand(2,3)+'.jpg'`>>
			You use a sanitary pad.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $inventory.get("tampon") > 0 and (getvar("$mesec") > 0 or (getvar("$placebopart") > 2 and getvar("$pillcon") < 40000)) and getvar("$isprok") == 0 and getvar("$isprokp") == 0 and $pc.knowpreg == 0>>
		<<actCLA 'Use a tampon (0:02)'>>
			<<set $menu_off = 1>>
			<<run $inventory.dec('tampon',1)>>
			<<set $isprok = 1>>
			<<set $time.minutes += 2>>
			<<set $pc.mood -= 5>>
			<<image "pc/body/pee/period/tampon/6.jpg">>
			You use a tampon.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
:: quickwash_macro[widget]
<<widget 'quickwash'>>
	<<if getvar("$spdirty") > 0>>
		<<actCLA 'Quick wash (0:15)'>>
			<<set $menu_off = 1>>
			<<set $cumspclnt = 4>>
			<<gs 'cum_cleanup'>>
			<<if $pc.pcs_sweat < 30>>
				<<set $pc.pcs_sweat = 15 + rand(0,4)>>
			<<else>>
				<<set $pc.pcs_sweat -= 10 + rand(0,4)>>
			<</if>>
			<<set $time.minutes += 15>>
			<<image "shared/home/bathroom/wash5.jpg">>
			You give yourself a catlick, thus removing any traces of cum.
			<<actCLA 'Finish'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>

<</widget>>
:: wearpan_macro[widget]
<<widget 'wearpan'>>
	<<if $wardrobe.pantyworntype == 'none'>>
		<<actCLA 'Wear panties (0:02)'>>
			<<set $time.minutes += 2>>

			<<gt 'panties' 'view_panty_list' 'bathroom'>>
		<</actCLA>>
	<</if>>
	<<if $wardrobe.braworntype == 'none'>>
		<<actCLA 'Wear a bra (0:02)'>>
			<<set $time.minutes += 2>>

			<<gt 'bras' 'view_bra_list' 'bathroom'>>
		<</actCLA>>
	<</if>>
<</widget>>
:: removepan_macro[widget]
<<widget 'removepan'>>
	<<if $wardrobe.pantyworntype != 'none' and $wardrobe.braworntype != 'none'>>
		<<actCLA 'Remove underwear (0:02)'>>
			<<set $time.minutes += 2>>

			<<gs 'underwear' 'remove'>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
	<<if $wardrobe.pantyworntype != 'none'>>
		<<actCLA 'Remove panties (0:02)'>>
			<<set $time.minutes += 2>>

			<<run $wardrobe.strip('panties')>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
	<<if $wardrobe.braworntype != 'none'>>
		<<actCLA 'Remove bra (0:02)'>>
			<<set $time.minutes += 2>>

			<<run $wardrobe.strip('bra')>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
<</widget>>
:: publicpan_macro[widget]
<<widget 'publicpan'>>
	<<if $wardrobe.pantyworntype != 'none' and $wardrobe.braworntype != 'none'>>
		<<actCLA `'Remove underwear'+iif(bag = 1, ' and put it in your purse ',' ') + '(0:02)'`>>
			<<set $time.minutes += 2>>

			<<if $wardrobe.purseEquipped == 1>>
				<<set $pursepantytype = $wardrobe.pantyworntype>>
				<<set $pursepantynumber = $wardrobe.pantywornnumber>>
				<<set $pursebratype = $wardrobe.braworntype>>
				<<set $pursebranumber = $wardrobe.brawornnumber>>
			<</if>>
			<<gs 'underwear' 'remove'>>
			<<gt $location>>
		<</actCLA>>
	<<elseif $wardrobe.purseEquipped == 1 and $wardrobe.pantyworntype == 'none' and $wardrobe.braworntype == 'none' and $pursepantytype != '' and $pursebratype != ''>>
		<<actCLA 'Put your underwear back on (0:02)'>>
			<<set $time.minutes += 2>>

			<<gs 'panties' 'wear' $pursepantytype $pursepantynumber>>
			<<gs 'bras' 'wear' $pursebratype $pursebranumber>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
	<<if $wardrobe.pantyworntype != 'none'>>
		<<actCLA `'Remove panties'+iif(bag = 1, ' and put them in your purse ',' ') + '(0:02)'`>>
			<<set $time.minutes += 2>>

			<<if $wardrobe.purseEquipped == 1>>
				<<set $pursepantytype = $wardrobe.pantyworntype>>
				<<set $pursepantynumber = $wardrobe.pantywornnumber>>
			<</if>>
			<<run $wardrobe.strip('panties')>>
			<<gt $location>>
		<</actCLA>>
	<<elseif $wardrobe.purseEquipped == 1 and $wardrobe.pantyworntype == 'none' and $pursepantytype != ''>>
		<<actCLA 'Put your panties back on (0:02)'>>
			<<set $time.minutes += 2>>

			<<gs 'panties' 'wear' $pursepantytype $pursepantynumber>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
	<<if $wardrobe.braworntype != 'none'>>
		<<actCLA `'Remove bra'+iif(bag = 1, ' and put it in your purse ',' ') + '(0:02)'`>>
			<<set $time.minutes += 2>>

			<<if $wardrobe.purseEquipped == 1>>
				<<set $pursebratype = $wardrobe.braworntype>>
				<<set $pursebranumber = $wardrobe.brawornnumber>>
			<</if>>
			<<run $wardrobe.strip('bra')>>
			<<gt $location>>
		<</actCLA>>
	<<elseif $wardrobe.purseEquipped == 1 and $wardrobe.braworntype == 'none' and $pursebratype != ''>>
		<<actCLA 'Put your bra back on (0:02)'>>
			<<set $time.minutes += 2>>

			<<gs 'bras' 'wear' $pursebratype $pursebranumber>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
	<!-- !! Changing into a different outfit for prostitution-->
	<<if getvar("$prostitute['active']") == 1>>
		<<gs 'prostitution_functions' 'work_clothes'>>
		<<if getvar("$prostitute['work_clothes']") == 0 and $prostitute['outfit_is_set']>>
			<<actCLA 'Change into prostitute outfit'>>
			<<gt 'prostitution_functions' 'change_to_work' 'restroom'>>
		<</actCLA>>
		<<elseif $prostitute['work_clothes'] and $prostitute['changed_for_work']>>
			<<actCLA 'Change into your regular clothes'>>
			<<gt 'prostitution_functions' 'change_back' 'restroom'>>
		<</actCLA>>
		<</if>>
	<</if>>
<</widget>>
:: basin_macro[widget]
<<widget 'basin'>>
	<<if $pc.cumAtLocation(12) == 1>>
		<<actCLA 'Rinse your mouth (0:05)'>>
			<<set $menu_off = 1>>
				<<set $cumspclnt = 2>>
			<<gs 'cum_cleanup'>>
			<<set $time.minutes += 5>>

			You rinse your mouth and get rid of the taste of cum.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $pc.cumAtLocation(13) == 1>>
		<<actCLA 'Wash the cum from your hands (0:05)'>>
			<<set $menu_off = 1>>
				<<set $cumspclnt = 9>>
			<<gs 'cum_cleanup'>>
			<<set $time.minutes += 5>>

			You wash your hands and get rid of any trace of cum.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $pc.cumAtLocation(11) == 1 and $pc.cumAtLocation(16) == 0>>
		<<actCLA 'Wash the cum from your face (0:05)'>>
			<<set $menu_off = 1>>
			<<set $pc.pcs_makeup = 1>>
			<<set $cumspclnt = 9>>
			<<gs 'cum_cleanup'>>
			<<set $cumspclnt = 11>>
			<<gs 'cum_cleanup'>>
			<<if $pc.pcs_sweat > 19>>
			<<setn $pc.pcs_sweat -= 5>>

		<</if>>
			<<set $time.minutes += 5>>

			<<image "pc/activities/facewash.jpg">>
			You clean your face and get rid of any trace of cum.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<<elseif $pc.cumAtLocation(11) == 0 and $pc.cumAtLocation(16) == 1>>
		<<actCLA 'Wash the cum out of your hair (0:10)'>>
			<<set $menu_off = 1>>
				<<set $cumspclnt = 9>>
			<<gs 'cum_cleanup'>>
			<<set $cumspclnt = 5>>
			<<gs 'cum_cleanup'>>
			<<set $pc.pcs_hairbsh = 0>>
			<<if $pc.pcs_sweat > 19>>
			<<setn $pc.pcs_sweat -= 5>>

		<</if>>
			<<set $time.minutes += 10>>

			You clean your hair and get rid of any trace of cum.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<<elseif $pc.cumAtLocation(11) == 1 and $pc.cumAtLocation(16) == 1>>
		<<actCLA 'Wash the cum from your face and hair (0:10)'>>
			<<set $menu_off = 1>>
			<<set $pc.pcs_makeup = 1>>
			<<set $cumspclnt = 9>>
			<<gs 'cum_cleanup'>>
			<<set $cumspclnt = 12>>
			<<gs 'cum_cleanup'>>
			<<set $pc.pcs_hairbsh = 0>>
			<<if $pc.pcs_sweat > 19>>
			<<setn $pc.pcs_sweat -= 5>>

		<</if>>
			<<set $time.minutes += 10>>

			<<image "pc/activities/facewash.jpg">>
			You clean your face and hair and get rid of any trace of cum.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $pc.cumAtLocation(2) == 1 or $pc.cumAtLocation(5) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1>>
		<<actCLA 'Wash the cum off your clothes (0:10)'>>
			<<set $menu_off = 1>>
			<<set $cumspclnt = 9>>
			<<gs 'cum_cleanup'>>
			<<set $cumspclnt = 6>>
			<<gs 'cum_cleanup'>>
			<<set $time.minutes += 10>>

			<<image "shared/sex/cum/frotsp.jpg">>
			You spend ten minutes wiping and rinsing the cum stains out of your clothes. In the end, all that remains of the stains are some damp spots that should dry up in a few minutes.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$pc.body_write") > 0 or getvar("$face_write") > 0>>
		<<actCLA 'Wash the writings off your body (0:10)'>>
			<<set $menu_off = 1>>
			<<set $pc.body_write = 0>>
			<<set $face_write = 0>>
			<<set $time.minutes += 10>>

			<<image "shared/home/bathroom/wash1.jpg">>
			You wash off the indecent inscriptions on your body.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $pc.makeupAmount > 0 and $pc.cosmetic_tattoo == 0>>
		<<actCLA 'Wash off cosmetics (0:10)'>>
			<<gt 'wash_off_cosmetics'>>
		<</actCLA>>
	<</if>>
	<<if $pc.eyelashes_false >= 1>>
		<<actCLA 'Remove false lashes (0:05)'>>
			<<set $menu_off = 1>>
				<p>You carefully peel off the glued-on strip, careful to protect your natural lashes.</p>
			<<set $lashsavechance = rand(0,4)>>
			<<if getvar("$lashsavechance") == 4>>
				<p>These lashes still look to be in pretty good shape; you could probably use them again.</p>
				<<if $pc.eyelashes == 4>>
				<<setn $fakelashesmink += 1>>

			<</if>>
				<<if $pc.eyelashes == 3>>
				<<setn $fakelashesplain += 1>>

			<</if>>
			<</if>>
			<<set $pc.eyelashes = $pcs_naturallashes>>
			<<set $pc.eyelashes_false = 0>>
			<<set $time.minutes += 5>>

			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $inventory.get("deo") > 0 and $pc.deodorant_on == 0>>
		<<actCLA 'Apply deodorant (0:01)'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 1>>
			<<run $inventory.dec('deo',1)>>
			<<gs 'sweat' 'deo'>>
			<<set iif(func('body_din','pregnancyVisibility') = 1, '<<image `'shared/home/bathroom/deodorant_preg.jpg'`>>', '<<image `'shared/home/bathroom/deodorant.jpg'`>>')>>
			You apply deodorant to your armpits. It will keep you feeling fresh and clean for longer.
			<<actCLA 'Continue'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$KandidozOnce") == 1 and getvar("$KandidNapr") > 0>>
		<<actCLA 'Use antifungal Medication'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 1>>
			<<set $KandidNapr -= 1>>
			<<set $Kandidoz -= 5>>
			<<image "shared/home/kitchen/lekr2.jpg">>
			You take the large pill with some water, this should help you infection.
			<<actCLA 'Continue'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>

:: wash_off_cosmetics[event]
<<set $pc.makeupQuality = 0>>
<<set $pc.makeupAmount = 0>>
<<set $cumspclnt = 9>>
<<gs 'cum_cleanup'>>
<<set $cumspclnt = 11>>
<<gs 'cum_cleanup'>>
<<set $time.minutes += 10>>
You wash off your makeup.
<<ret 'Finish'>>

:: pirManage_macro[widget]
<<widget 'pirManage'>>
	<<gt 'piercing_management' 'main'>>
<</widget>>
:: enema_macro[widget]
<<widget 'enema'>>
	<<if getvar("$klisma") == 1 and (klismaday != $time.daystart or arrpos('sparrloc', 3) > 0)>>
		<<actCLA 'Give yourself an enema (0:05)'>>
			<<set $menu_off = 1>>
				 			<<set $cumspclnt = 7>>
			<<gs 'cum_cleanup'>>
			<<set $time.minutes += 5>>
			<<set $klismaday = $time.daystart>>
			<<set $klismaday1 = 1>>
			<<image "shared/home/bathroom/klisma.jpg">>
			You give yourself an enema, feeling clean down there. Your ass is now ready for anal sex without any awkward surprises.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
:: toymanage_macro[widget]
<<widget 'toymanage'>>
	<<if getvar("$pc.analplugin") == 1>>
		<<actCLA 'Remove your butt plug (0:05)'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 5>>
			<<set $pc.analplugin = 0>>
			<<if $pc.pcs_ass < 30>>
				<<setn $pc.pcs_ass += 1>>

			<</if>>
			<<image "pc/body/analplug.jpg">>
			<<actCLA 'Finish'>>
				<<set $menu_off = 0>> <<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<<elseif getvar("$analplug") == 1 and getvar("$pc.analplugin") == 0 and $klismaday == $time.daystart>>
		<<actCLA 'Insert your butt plug (0:05)'>>
			<<set $menu_off = 1>>
				 			<<set $time.minutes += 5>>
			<<set $pc.analplugin = 1>>
			<<if $pc.pcs_ass < 10>>
			<<setn $pc.pcs_ass += 5>>

		<</if>>
			<<if $pc.pcs_ass >= 10 and $pc.pcs_ass < 20>>
			<<set $pc.pcs_ass += rand(1, 2)>>

		<</if>>
			<<if $pc.pcs_ass >= 20 and $pc.pcs_ass < 30>>
			<<set $pc.pcs_ass += rand(0, 1)>>

		<</if>>
			<<image "pc/body/analplug.jpg">>
			<<if getvar("$butpluguse") > 0>>
			You squat and gently rub the butt plug against your anus after lubricating it with a bit of saliva. After a few minutes, you've relaxed enough to be able to push it in. Once it's in, you give it a few gentle tugs, wondering if anyone will catch you wearing it today.

		<</if>>
			<<if !$butpluguse >>
			<<set $butpluguse = 1>>

		<</if>>
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $pc.vibratorin == 1>>
		<<actCLA 'Remove the vibrator (0:05)'>>
			<<set $menu_off = 1>>
				 			<<set $time.minutes += 5>>
			<<set $pc.vibratorin = 0>>
			<<if $pc.pcs_vag < 30>>
			<<setn $pc.pcs_vag += 1>>

		<</if>>
			<<image "pc/items/sextoys/vibrator.jpg">>
			You spread your legs and take the vibrator out of your pussy, letting out a slight moan as you do so. You feel somewhat empty now.
			<<actCLA 'Finish'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<<elseif getvar("$vibrator") == 1 and $pc.vibratorin == 0 and $pc.pcs_vag != 0>>
		<<actCLA 'Insert the vibrator in your vagina (0:05)'>>
			<<set $menu_off = 1>>
				 			<<set $time.minutes += 5>>
			<<set $pc.vibratorin = 1>>
			<<if $pc.pcs_vag < 30>>
			<<setn $pc.pcs_vag += 2>>

		<</if>>
			<<image "pc/items/sextoys/vibrator.jpg">>
			You spread your legs and slowly insert the vibrator in your pussy, wondering if anyone will notice you wearing it today.
			<<actCLA 'Finish'>>
			<<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
:: palelady_macro[widget]
<<widget 'palelady'>>
	<<if getvar("$dur") > 0>>
		You have enough cocaine for $dur <<plural $dur 'line' 'lines'>>.
	<</if>>
	<<if getvar("$dur") > 0 and $pc.narkday != $time.daystart>>
		<<actCLA 'Do a line of cocaine (0:05)'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 5>>
			<<set $pc.narkday = $time.daystart>>
			<<gs 'drugs' 'cocaine'>>
			<<if $locclass == 'restroom'>>
				<<image "shared/drugs/public_rr_coke.jpg">>
				You go into a stall sit down and snort some cocaine, feeling dizzy for just a moment. After that you feel fantastic, and incredibly horny.
			<<else>>
				<<image "shared/drugs/dur.jpg">>
				You snort some cocaine, feeling dizzy for just a moment. After that you feel fantastic, and incredibly horny.
			<</if>>
			<<actCLA 'Continue'>>
			<<set $menu_off = 0>> <<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>

:: shaveLegsAndPubic[event]
	/*<<set $menu_off = 1>>
	<<if $locM == 'uni_dorm' and rand(0, 5) == 0>>
		<<gt 'vann' 'brit1'>>

	<</if>>*/
	<<if $loc == 'gadbana'>>
		<<video "shared/home/bathroom/shave.mp4">>
	<<elseif $pc.pcs_pubes <= 10 and getvar("$shave_length") == 2>>
		<<video "shared/home/bathroom/shave_stubble.mp4">>
	<<elseif getvar("$shave_length") == 2>>
		<<video "shared/home/bathroom/shave_bush.mp4">>
	<<elseif getvar("$shave_length") > 2>>
		<<video "shared/home/bathroom/trim_bush.mp4">>
	<<else>>
		<<image "shared/home/bathroom/shave3.jpg">>
	<</if>>
	<<if $time.daystart < 10 and $start_subtype == 'tg'>>
		<p>You can`t shake off the fact that you`re a girl now, so you decide it`d be best to shave your legs. You begin to lather your legs, still marveling at how soft and round they are. Then you take the razor in your hand and begin to shave your legs.</p>
		<p>You feel really awkward, never having done this before as a guy. Luckily, you had more than enough experience with shaving your face and technically this isn`t really all that different. In the end, you get a pretty decent job done.</p>
	<<elseif $time.daystart < 30 and $start_subtype == 'tg'>>
		<<set $pc.mood += 10>>
		<p>With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don`t need to hide your legs in pants. Maybe you should wear a skirt tomorrow?</p>
	<<elseif $pc.pubestyle == 1>>
		<<if $pc.pcs_pubes <= 10>>
			<p>You do your legs first before lathering up your crotch and taking a razor to the bush growing there. After a few minutes of shaving, you take a moment to inspect yourself, making sure you got everything.</p>
			<p>Satisfied there isn`t even a single hair left, you rinse yourself off, enjoying the newfound smoothness of your pussy.</p>
		<<else>>
			<p>You lather up your legs and crotch, grabbing your razor and carefully scraping away stubble that is growing from them.</p>
			<p>After a few minutes of work, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble left. Satisfied, you rinse yourself off, smiling in relief that your pussy is silky smooth once again.</p>
		<</if>>
	<<elseif ($pc.pubestyle >= 2 and $pc.pubestyle <= 8) or $pc.pubestyle >= 12>>
		<<if $pc.pcs_pubes >= $shave_trigger + 5>>
			<p>You lather up your legs and carefully shave them. Once finished, you lather up your crotch and start shaving away the edges of your pubic hair. After a few minutes, you`ve given your pussy a perfect hairdoo and rinse off the rest of the soap, admiring your new sexual fashion before deciding what to do next.</p>
		<<else>>
			<p>You lather up your legs and carefully shave them. Once finished, you spend some time cleaning up the area around your styled pubic hair, trimming back stubble and hair until it`s neat and tidy again.</p>
		<</if>>
	<<elseif $pc.pubestyle == 9>>
		<<if $pc.pcs_pubes >= 26>>
			<p>You lather up your legs and carefully shave them. Once you`re finished, you spend some time maintaining your bush and your bikini lines, until it is a neat and tidy lawn of hair.</p>
		<<else>>
			<p>You lather up your legs and carefully shave them. Once you`re finished, you spend some time maintaining your bush, keeping it short and neat.</p>
		<</if>>
	<<elseif $pc.pubestyle == 10>>
		<<if $pc.pcs_pubes >= 40>>
			<p>You lather up your legs and carefully shave them. Once you`re finished, you spend some time hacking back the wild jungle covering your crotch. Soon enough, you`re left with a sophisticated and tidy bush of hair that neatly carpets your pussy.</p>
		<<else>>
			<p>You lather up your legs and carefully shave them. Once you`re finished, you spend some time maintaining your bush, keeping it neat and tidy.</p>
		<</if>>
	<<elseif $pc.pubestyle == 11>>
		<<if $pc.pcs_pubes <= 10>>
			<p>You do your legs first before realizing that the stubble growing around your pussy is starting to become irritating and you can`t put it off any longer. Lathering yourself up, you grab your razor and carefully scrape away the rough itchy hairs have been bothering you so.</p>
			<p>After a few minutes of work, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble hiding in the folds of your crotch somewhere. Satisfied, you rinse yourself off, smiling in relief that your pussy is smooth once again.</p>
		<<else>>
			<p>You do your legs first before lathering up your crotch and taking a razor to the hair growing there. After a few minutes of shaving, you take a moment to inspect yourself, making sure you got every last pube and there isn`t even a bit of stubble hiding in the folds of your crotch somewhere. Satisfied, you rinse yourself off, enjoying the newfound smoothness of your pussy.</p>
		<</if>>
	<</if>>
	<<set $time.minutes += 15>>
	<<set $pc.legHair = 0>>
	<<set $pc.pcs_pubes = $shave_length>>
	<<set $pc.horny += 5>>
	<<run $inventory.dec('razor',2)>>
	<<dryOff>>
	/*<<gs 'selfplay' 'bathtub_dildo_check'>>
	<<gs 'selfplay' 'shower_dildo_check'>>*/