:: therapist_hypno
	<<if $quest('therapist').stage < 20>><<run $quest('therapist').setStage(20)>><</if>>

	<<set $quest('therapist').numTimesHypnoed += 1>>
	<<set $quest('therapist').hypnoWithdrawal = 0>>
	<<set $time.minutes += 3>>

	<<image "locations/pavlovsk/clinic/therapist/hypnotism3.jpg">>
	<p>
		"All right, then. Please, lie on the couch and try to get comfortable."
		While he waits for you to lie down on the couch as you wish, he starts a CD player that plays the soothing sounds of rain.
		After you are comfortable, he starts to talk in a strangely hypnotic voice.
		"Please, close your eyes."
		He waits a little. The only sound in the room is the clock ticking and the sound of rain.
		"You are standing in front of a house. This house has three rooms, but each of them can only be reached through the one before.
		The first room is the green room, then the blue room, and at last the black room..."
	</p>
	<!--
	<<if getvar("$succubusflag") == 1>>
		<<gs 'therapist' 'succubus'>>
	<<else>> -->
	<p>Your mind tries to imagine the things the doctor tells you, and this is your last conscious memory.</p>

	<<hypnoNotice>>

	<<if !$settings.hypno_actions or $settings.hypno_actions == "wakeOnly">>
		<<act 'Wake up'>>
			<!--TODO -->
			<<if $quest('therapist').hypnoStage < 3>>
				<<set $quest('therapist').hypnoStage += 1>>
			<</if>>
			<<set $time.minutes += 30>>
			<<gt 'hypno_wakeup'>>
		<</act>>
	<</if>>
	<<if !$settings.hypno_actions or $settings.hypno_actions == "experienceOnly">>
		<<actCLA 'Continue'>>
			<<set $time.minutes += 3>>
			<<image 'locations/pavlovsk/clinic/therapist/hypnotism#.jpg' 1 4>>

			<<if $quest('therapist').numTimesHypnoed == 1>>
				<p>"Miss $pc.name_last, everything that happens while you are in the black room you will not remember. Understand?"<br>"Yes, Dr. Pavlov."</p>
				<p>Good. While you are under, I will call you <i>Cunt</i>, and you will respond to it. You will also call me Master.<br>You reply, "Yes, <i>Master</i>."</p>
			<<else>>
				<p>"<i>Cunt</i>, what do you know about the black room?"<br>"I know that everything that happens here I will not remember, <i>Master</i>."</p>
			<</if>>
			<p>"All right <i>Cunt</i>, let's work on your therapy".</p>

			<<if $quest('therapist').hypnoStage > 2>>
				<<set $var1 = 10 - ($pc.willpowermax / 10)>>
				<<if getvar("$var1") < 2>>
					<<set $var1 = 2>>
				<<elseif getvar("$var1") < 4>>
					<<set $var1 = 4>>
				<<elseif getvar("$var1") < 6>>
					<<set $var1 = 6>>
				<<else>>
					<<set $var1 = 8>>
				<</if>>
				<<if getvar("$var1") >= 9>>
					<<set $var1 = 9>>

				<</if>>
				<<set $hypnostrength += rand(var1,10) + 3>>
				<<if $quest('therapist').hypnoTime < 15>>
					<<if $quest('therapist').hypnoStrength >= 20>>
						<<setn $quest('therapist').hypnoStrength -= 20>> <<setn $quest('therapist').hypnoTime += 1>>

					<</if>>
				<<else>>
					<<if $quest('therapist').hypnoStrength > 20>>
						<<set $quest('therapist').hypnoStrength = 20>>

					<</if>>
				<</if>>
			<</if>>

			<<switch $quest('therapist').therapy>>
				<<case 'school troubles'>>
					<p>
						"You are an outcast because you deserve to be.
						You're a stupid girl that doesn't deserve to be treated with any respect.
						You understand this fact and know your place.
						You feel that it is acceptable for others to abuse you as they please, because you are not a worthwhile person."
					</p>
					<<set $pc.willpowermax -= rand(4,8)>>
					<<set $hypnoOutcast += 1>>
				<<case 'confidence'>>
					<<if $pc.willpowermax < 149>>
						<<set $pc.willpowermax += rand(1,2)>>
					<</if>>
					<p>
						"You feel confident in your body.
						You are comfortable in the idea that others could see you naked, this will bring you pleasure.
						When others are intimate with you, and you show them your body or allow them to use your body for their pleasure.
						You feel more confident in yourself and in turn, be more confident in yourself."
					</p>
				<<case 'charm'>>
					<p>"A charming woman understands her place
					<<if $quest('therapist').hypnoTime < 5>>
						in this world.
						A female must always show respect to men.
						She will put his needs before her own.
						This will make her feel more charming to the greater sex.
						<<set $pc.willpowermax -= rand(1,2)>>
					<<elseif $quest('therapist').hypnoTime < 10>>
						as a female.
						A charming woman understands to show respect and make herself sexually available to any male,
						especially those who are older than herself.
						<<set $pc.willpowermax -= rand(2,4)>>
					<<elseif $quest('therapist').hypnoTime < 15>>
						as a female.
						A charming female understands that her primary purpose in life is to bring pleasure to males and bear their children.
						Especially those who are much older than them.
						<<set $pc.willpowermax -= rand(2,4)>>
					<<else>>
						<<either>>
							in this world.
							A female must always show respect to men.
							She will put his needs before her own.
							This will make her feel more charming to the greater sex.
						<<or>>
							as a female.
							A charming woman understands to show respect and make herself sexually available to any male, especially those who are older than herself.
						<<or>>
							as a female. A charming female understands that her primary purpose in life is to bring pleasure to males and bear their children. Especially those who are much older than them.
						<<or>>
							as a female. A charming female understands that her primary purpose and duty in life is to bring pleasure to males, serve them in every way possible and bear their children. Especially those who are much older than them.
						<<or>>
							as a female. A charming female understands that her primary purpose and duty in her life is to have many children as possible especially with men who are much older than them.
						<<or>>
							as a female. A charming female understands that her value as a human being is derived from the amount of effort she puts to sexually pleasing men, especially men who are older than herself.
						<</either>>
						<<set $pc.willpowermax -= rand(8,10)>>
					<</if>>
					"</p>
				<<case 'trauma'>>
					<<set $pcs_childtrauma -= rand(2,4)>>
					<p>"You are able to observe the events that happened to you without the sharp emotional effect.
						You still feel the emotions, but they are no longer enormous, and you can put them aside."
					<<if getvar("$pcs_childtrauma") > 0>>
					<<else>>
						<<set $pcs_childtrauma to null>>
						<<set $npc('A217').rel = 20>>
						<p>"You are able to give the events a place in your life, and are finally ready to move on."</p>
					<</if>>
					</p>
				<<case 'mood'>>
					<p>"Your mood will be uplifted when you have hypnosis therapy. The more you have, then the better you will feel. When you go without them, you will feel terrible, your body will ache, you NEED therapy."</p>
			<</switch>>

			<<switch $quest('therapist').hypnoStage>>
            <<case 0>>
				"Now... let's work on breaking you, <i>Cunt</i>."
				<<act 'Continue'>>
					<<gt 'therapist_firstHypnoStage'>>
				<</act>>
			<<case 1>>
				"Now... let's work on breaking you, <i>Cunt</i>."
				<<act 'Continue'>>
					<<gt 'therapist_secondHypnoStage'>>
				<</act>>
			<<case 2>>
				"Now... let's work on breaking you, <i>Cunt</i>."
				<<act 'Continue'>>
					<<gt 'therapist_thirdHypnoStage'>>
				<</act>>
			<<default>>
				"Now take off your clothes."</font>
				<<actCLA 'Take off your clothes'>>
					<<set $hypnoStripped = 1>>
					<<set $time.minutes += 3>>
					 					<<if getvar("$sound") == 0>>
					<</if>>
					<<therapistUndressVideo>>
					<font color="<<$hypnocolour>>">
					You get up from the couch and start to take off all of your clothing.
					<<if setup.func('body_din','pregnancyVisibility',0,'nude') == 1 and getvar("$HypnoPregNoticed") == 0>>
						<<set $HypnoPregNoticed = 1>>
						<p>After stripping off your clothes, the doctor takes a look at you and smiles at your pregnant stomach. He kneels before you and kisses your belly, sending a shiver up your spine. "Seeing you pregnant is a beautiful sight" he exclaims. "Is it mine?" he asks</p>
						<<actCLA 'Yes, <i>Master</i>'>>
							<<image 'locations/pavlovsk/clinic/therapist/waiting#.jpg' 1 2>>
							"Yes Master, It is yours" you say "Good, If anyone asks, you got raped and that's how you think you got pregnant. One day you will learn that the child is mine, but for now, the child belongs to some random person on the street" he says and leads you to the couch to start the session.
							<<act 'Continue'>>
								<<gt 'therapist_hypno2'>>
							<</act>>
						<</actCLA>>
						<<actCLA 'No, <i>Master</i>'>>
							<<image 'locations/pavlovsk/clinic/therapist/waiting#.jpg' 1 2>>
							"No, Master, It belongs to (Brother/Fedor/Boyfriend) "Thats upsetting." he says. "Since you did allow someone else to get you pregnant, I must punish you" he says and bends you over his desk, takes off his belt and starts to whip your bare ass with it. "You will not feel this pain when you wake up, but you will feel that you shouldn''t let anyone else but me get you pregnant. Do you understand, Cunt"
							<<actCLA 'Yes, <i>Master</i>'>>
								<<image 'locations/pavlovsk/clinic/therapist/waiting#.jpg' 1 2>>
								"All right, Now please lay on the couch so we can get started" he says putting his belt back on his pants but placing it unbuckled.
								<<act 'Continue'>>
									<<gt 'therapist_hypno2'>>
								<</act>>
							<</actCLA>>
							<<actCLA 'Yes, <i>Master</i>'>>
								<<image 'locations/pavlovsk/clinic/therapist/waiting#.jpg' 1 2>>
								<<set _will_cost = setup.func('willpower','cost',['misc','resist','easy'])>>
								<<set _will_cost += ($quest('therapist').hypnoSchedule * 10)>>
								<<set _will_cost += ($quest('therapist').hypnoStage * 10)>>
								<<set _will_cost += $quest('therapist').hypnoTime * 3>>
								<<if _will_cost <= $pc.pcs_willpwr>>
									"I love the baby''s father too much" you say and he sighs. We will have to do some more theopy to break you of that. You must only love me. Get on the couch with me.
								<<else>>
									"I... Yes, sir" you say. "I will not have unprotected sex with anyone except you," you explain. "Good Girl" he gives you a kiss before having you sit on the couch to start the session.
								<</if>>
								<<act 'Continue'>>
									<<gt 'therapist_hypno2'>>
								<</act>>
							<</actCLA>>
						<</actCLA>>
					<</if>>
					<<gs 'therapist' 'hypno3'>>
				<</actCLA>>
			<</switch>>
		<</actCLA>>
	<</if>>

