glife/locations/therapist.qsrc

# therapist

'<center><b><font color="maroon">Psychologist</font></b></center>'
CLOSE ALL
if sound = 0:PLAY 'sound/clock.mp3',80
$location_type = 'public_indoors'

if $ARGS[0] = '':
	therapistday = daystart
	menu_off = 1
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
	'You step into the office of <a href="exec:dynamic $pavlov">Dr. Pavlov</a>, who invites you in with a warm smile.'
	'The room looks like a study room, appearing warm and inviting. There is desk with a chair at one end of the room, but it appears to be seldom used. On the desk there is an older <a href="exec: VIEW ''images/locations/pavlovsk/clinic/therapist/pavlovfamily.jpg''">photograph of Dr. Pavlov''s family</a>, in which he appears to be about two decades younger.'
	'"Come in, Miss <<$pcs_lastname>>! Please, tell me what can I help you with today?"'
	gs 'stat'

	act 'Change your mind and leave':gt $loc

	if pcs_childtrauma > 0:
		act 'Deal with losing the baby':
			cla
			*clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
			$therapy = 'trauma'
			'"I would like some help dealing with my beatings and losing my child."'
			'"I think the best way to do that would be hypnotherapy."'
			act 'Regular therapy':
				cls
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/therapy1.jpg"></center>'
				minut += 60
				pcs_childtrauma -= 1
				gs 'stat'

					'You talk about your traumatic issues, and Dr. Pavlov makes some suggestions, and asks some pointed questions. Although he makes you uncomfortable, it somehow makes you feel better about yourself.'
				if pcs_childtrauma = 0:
					'You were able to give the events a place in your life and you are finally ready to move on.'
					npc_rel['A217'] = 20
					PavlinQW = 8
				end
				'"Please, visit me again if you have any further problems, I will be glad to help!" Says Dr. Pavlov, as he escort you out of his door.'
				act 'Leave':gt $loc
			end
			act 'Hypnotherapy':gt 'therapist', 'hypno'
		end
	end
	act 'Raise your mood':
		cls
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/therapy1.jpg"></center>'
		minut += 60
		!pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5 + 1000
		pcs_mood += rand(30,60)
		gs 'stat'
		'You talk about your problems for a while, and in a few places Dr. Pavlov asks you some pointed questions. Although he makes you look at your own actions and desires closely, making you aware of your own issues, it somehow makes you feel better about yourself.'
		'"Please, visit me again if you have any further problems, I will be glad to help!" Says Dr. Pavlov, as he escort you out of his door.'
		act 'Leave':gt $loc
	end
!Former willpower change, not used anymore
	! act 'Raise your confidence':
		! cla
		! *clr
		! '<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
		! $therapy = 'confidence'
		! '"I would like some help in raising my <<$therapy>>," you say.'
		! '"There are two ways to do that, Miss <<$pcs_lastname>>. I can offer you traditional therapy. This one is slow, but just as effective, as my second offer, the hypnotherapy. I would recommend the hynosis, but some people don''t like the thought of me getting inside their head that much. The choice is yours."'
		! act 'Just talk':
			! cls
			! '<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/therapy1.jpg"></center>'
			! minut += 60
			! pcs_willpwr += rand(2,6)
			! gs 'stat'
			! 'You talk about your self-confidence problem, and Dr. Pavlov makes some suggestions, and asks some pointed questions. Although he makes you look at your own actions and desires closely, making you aware of your own issues, it somehow makes you feel better about yourself.'
			! '"Please, visit me again if you have any further problems, I will be glad to help!" Says Dr. Pavlov, as he escort you out of his door.'
			! act 'Leave':gt $loc
		! end
		! act 'Hypnotherapy':gt 'therapist', 'hypno'
	! end
	act 'Raise your dominance':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
		gs 'stat'
		$therapy = 'dominance'
		'"I would like some help in raising my <<$therapy>>," you say.'
		'"There are two ways to do that, Miss <<$pcs_lastname>>. I can offer you traditional therapy. This one is slow, but just as effective, as my second offer, the hypnotherapy. I would recommend the hynosis, but some people doesn''t like the thought of me inside their head that much. The choice is yours."'
		act 'Just talk':
			cls
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/therapy1.jpg"></center>'
			minut += 60
			willpowermax += rand(0,1)
			gs 'stat'
			'You talk about your submissiveness, and Dr. Pavlov makes some suggestions, and asks some pointed questions. Although he makes you look at your own actions and desires closely, making you aware of your own issues, it somehow makes you feel better about yourself.'
			'"Please, visit me again if you have any further problems, I will be glad to help!" Says Dr. Pavlov, as he escort you out of his door.'
			act 'Leave':gt $loc
		end
		act 'Hypnotherapy':gt 'therapist', 'hypno'
	end
	act 'Lower your dominance':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
		$therapy = 'submission'
		'"I would like some help in raising my <<$therapy>>," you say.'
		'"There are two ways to do that, Miss <<$pcs_lastname>>. I can offer you traditional therapy. This one is slow, but just as effective, as my second offer, the hypnotherapy. I would recommend the hynosis, but some people doesn''t like the thought of me inside their head that much. The choice is yours."'
		act 'Just talk':
			cls
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/therapy1.jpg"></center>'
			minut += 60
			gs 'stat'
			'You talk about your strong dominance issues, and Dr. Pavlov makes some suggestions, and asks some pointed questions. Although he makes you look at your own actions and desires closely, making you aware of your own issues, it somehow makes you feel better about yourself.'
			'"Please, visit me again if you have any further problems, I will be glad to help!" Says Dr. Pavlov, as he escort you out of his door.'
			act 'Leave':gt $loc
		end
		act 'Hypnotherapy':gt 'therapist', 'hypno'
	end
!{	act 'Hypnotherapy to fight addiction':
		cls
		money -= 1000
		minut += 60
		gs 'stat'
		gt 'therapist', 'hypno'
	end
	act 'Hypnotherapy for personality change':
		cls
		money -= 1000
		minut += 60
		gs 'stat'
		gt 'therapist', 'hypno'
	end}
end


if $ARGS[0] = 'hypno':
	hypnoWithdrawal = 0
	minut += 15
	gs 'boyStat', 'A186'
	if firsthypno = 0:
		firsthypno = 1
		$firsthypno = '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>."'
		$firsthypno2 = '"Miss <<$pcs_lastname>>, everything that happens while you are in the black room you will not remember. Understand it?"<br>"Yes, Dr. Pavlov."'
	else
		$firsthypno = ''
		$firsthypno2 = '"<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>."'
	end
	CLOSE 'sound/clock.mp3'
	if sound = 0:PLAY 'sound/rainstorm.mp3',40 & PLAY 'sound/clock.mp3',80
	'"All right, then. Please, lay on the couch, and try to get comfortable."'
	'While he waits for you to lay down ot the couch as you wish, he starts a CD player, that plays the soothing sounds of raining. 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..."'
	''
	'You mind tries to imagine the things the doctor tells you, and this is your last concious memory.'
	act 'Continue':
		cla
		*clr
		PLAY 'sound/rainstorm.mp3',30 & PLAY 'sound/clock.mp3',60
		minut += 15
		'<center><img width=700 src="images/locations/pavlovsk/clinic/therapist/hypnotism<<rand(1,4)>>.jpg"></center>'
		var1 = 10 - (willpowermax/20)
		if var1 < 2: var1 = 2
		if var1 > 9: var1 = 9
		hypnostrength += rand(var1,10)
		if hypnoTime < 15:
			if hypnoStrength >= 20:hypnoStrength -= 20 & hypnoTime += 1
		else
			if hypnoStrength > 20:hypnoStrength = 20
		end

		if $therapy = 'dominance':
			willpowermax += rand(1,2)
			$session = 'You like to do what you want to do. It pleases you if people do what you tell them to do, or act according to your wishes, and you like to cause them pleasure this way. You have to be in control constantly, but that means others around you can relax."<br>...<br>...<br>..."'
		elseif $therapy = 'submission':
			willpowermax -= rand(1,2)
			$session = 'You want to be told what to do and what to think, what to feel and whom to please. Obeying others pleases you because it pleases them, and for a while you do not have to take responsibility for your actions."<br>...<br>...<br>..."'
		elseif $therapy = 'trauma':
			pcs_childtrauma -= rand(2,4)
			if pcs_childtrauma >0:
			$session = 'You are able to observe the events 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. "<br>...<br>...<br>..."'
			else
			killvar 'pcs_childtrauma'
			npc_rel['A217'] = 20
			$session = 'You are able to observe the events 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. "<br>...<br>...<br>..."<br> You were able to give the events a place in your life and you are finally ready to move on.'
			end
		end
		'<font color=brown>'
			$firsthypno2
			'"Good. <<$firsthypno>>"'
			'"All right <i>Cunt</i>, let''s work on your <<$therapy>>. <<$session>>"'
			'"And now let''s play. You will enjoy the play, <i>Cunt</i>, but you will not remember anything about it when you are awake. Understand?"'
			'"Yes, <i>Master</i>."'
			'"Perfect! Now take off your clothes."</font>'
		gs 'stat'
		if hypnostrengh <= 30:
			if hypnotime < 1:
				act 'Refuse':
					minut += 5
					cla
					if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
					'<font color=brown>'
					if hypnostrength <=5:
						'Your body tenses and you shake your head as you reject Dr. Pavlov''s suggestion to remove your clothing. Seeing that you might awaken, he quickly tells you to forget the idea of undressing. As the suggestion fades from your memory, you once again relax.'
						'"Hmmm," Dr. Pavlov muses, "Your will is quite strong, it may take some time to break you - but you will break."'
						act 'Wake up':gt 'therapist', 'hypnoEnd'
					elseif hypnostrength <=10:
						'Your body tenses and you frown as you resist Dr. Pavlov''s suggestion to strip. The doctor frowns but orders you to forget the idea of undressing, for now. You relax as you comply with his order to forget.'
						'"Soon you will be unable to resist me, my dear." he murmurs as he lightly traces the shape of your breast through your clothes, "Then we will have some fun."'
						act 'Wake up':gt 'therapist', 'hypnoEnd'
					elseif hypnostrength <=15:
						'Your brow wrinkles and you frown as you fight the doctor''s suggestion and he quickly tells you to forget that he asked. As the command fades from your memory, you relax once more.'
						'"It would appear that you are not yet ready to play, but it won''t be long now, <i>Cunt</i>." Dr. Pavlov mutters in mild frustration.'
						act 'Wake up':gt 'therapist', 'hypnoEnd'
					else
						'You frown slightly as your hands start to move towards your waist to unfasten your clothes then return to your side before once again beginning to move. Your frown deepens and Dr. Pavlov tells you to forget the command before the conflict awakens you. You relax once more as the doctor sighs in frustration.'
						'"We are very close to a breakthrough, my little <i> Cunt </i>." he whispers in your ear as he caresses your breasts making your nipples stiffen, "You won''t resist me much longer and then you''ll be mine to enjoy."'
						act 'Wake up':gt 'therapist', 'hypnoEnd'
					end
				end
			else
				! Dont know what $ARGS[0] would be appropriate here.. technically youre resisting stripping down, but it eventually ends up as some form of sex... The whole point is that once you give in youre under his control.
				gs 'willpower', 'sex', 'resist'
				! adding a modifier for hypnotime? (more influence - harder checks?)
				will_cost += hypnotime
				if will_cost <= pcs_willpwr:
					act 'Refuse (<<will_cost>> Willpower)':
						gs 'willpower', 'pay', 'resist'
						minut += 5
						cla
						if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
						'<font color=brown>'
						if hypnostrength <=5:
							'Your body tenses and you shake your head as you reject Dr. Pavlov''s suggestion to remove your clothing. Seeing that you might awaken, he quickly tells you to forget the idea of undressing. As the suggestion fades from your memory, you once again relax.'
							'"Hmmm," Dr. Pavlov muses, "Your will is quite strong, it may take some time to break you - but you will break."'
							act 'Wake up':gt 'therapist', 'hypnoEnd'
						elseif hypnostrength <=10:
							'Your body tenses and you frown as you resist Dr. Pavlov''s suggestion to strip. The doctor frowns but orders you to forget the idea of undressing, for now. You relax as you comply with his order to forget.'
							'"Soon you will be unable to resist me, my dear." he murmurs as he lightly traces the shape of your breast through your clothes, "Then we will have some fun."'
							act 'Wake up':gt 'therapist', 'hypnoEnd'
						elseif hypnostrength <=15:
							'Your brow wrinkles and you frown as you fight the doctor''s suggestion and he quickly tells you to forget that he asked. As the command fades from your memory, you relax once more.'
							'"It would appear that you are not yet ready to play, but it won''t be long now, <i>Cunt</i>." Dr. Pavlov mutters in mild frustration.'
							act 'Wake up':gt 'therapist', 'hypnoEnd'
						else
							'You frown slightly as your hands start to move towards your waist to unfasten your clothes then return to your side before once again beginning to move. Your frown deepens and Dr. Pavlov tells you to forget the command before the conflict awakens you. You relax once more as the doctor sighs in frustration.'
							'"We are very close to a breakthrough, my little <i> Cunt </i>." he whispers in your ear as he caresses your breasts making your nipples stiffen, "You won''t resist me much longer and then you''ll be mine to enjoy."'
							act 'Wake up':gt 'therapist', 'hypnoEnd'
						end
					end
				else
					act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end
			end
			act 'Take off your clothes':
				if hypnosexing = 0: hypnosexing = 1 & hidden_guy += 1
				minut += 5
				cla
				*clr
				if sound = 0:PLAY 'sound/rainstorm.mp3',20 & PLAY 'sound/clock.mp3',40
				cumprecheck = 0
				dick = 13
				$dick_girth = 'massive'
				if hypnoTime < 4:
					$hypnoact = 'I want you to suck me!'
					act 'Continue':gt 'therapist', 'hypnoSuck'
				else
		!			if hypnoTime < 10:
						if rand(0,2) > 0:
							$hypnoact = 'I want to fuck your pussy!'
							act 'Continue':gt 'therapist', 'hypnoFuck'
						else
							$hypnoact = 'I want to fuck your ass!'
							act 'Continue':gt 'therapist', 'hypnoAnal'
						end
		!			elseif rand(0,3) = 0:
		!				$hypnoact = 'I thought of something special for you.'
		!				act 'Continue':gt 'therapist', 'hypnoPerv'
		!			else
		!				if rand(0,2) > 0:
		!					$hypnoact = 'I want to fuck your pussy!'
		!					act 'Continue':gt 'therapist', 'hypnoFuck'
		!				else
		!					$hypnoact = 'I want to fuck your ass!'
		!					act 'Continue':gt 'therapist', 'hypnoAnal'
		!				end
		!			end
				end
				'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/stripping<<rand(1,3)>>.mp4"></video></center>'
				'<font color=brown>'
				'You get up from the couch and start to take off all of your clothing. While you do this, Dr. Pavlov opens up his pants and takes out his dick, slowly masturbating as he watches you. After a while he stops and motions you closer to him.'
				'"Come here, <i>Cunt</i>, <<$hypnoact>>"</font>'
			end
		end
	end
end


if $ARGS[0] = 'hypnoSuck':
	if sound = 0:PLAY 'sound/rainstorm.mp3',10 & PLAY 'sound/clock.mp3',20 & PLAY 'sound/sucking.mp3',200
	cls
	'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnoblow<<rand(1,3)>>.mp4"></video></center>'
	gs 'cum_call', 'mouth', 'A186', 2, 0, 15000, 60
	'<font color=brown>'
	'You kneel to suck off Dr. Pavlov. You feel yourself getting moist between your legs at the sight of his massive dick and taking it all in your mouth excites you greatly. You continue to pleasure him enthusiastically, and judging from the breathing of your <i>Master</i> you appear to be doing a great job.'
	'Finally Dr. Pavlov groans, grabs your head, and pushes himself deep, filling your mouth with his seed.'
	''
	'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnoblowcum.mp4"></video></center>'
	''
	'"Come on, <i>Cunt</i>, cum now!" he groans, still shooting spurt after spurt of warm cum down your throat.'
	'His order is all you need - it pushes you over the edge and you scream around his cock as it is throbbing in your mouth.'
	'He waits for you to lick him clean then starts to dress himself.'

	gs 'arousal', 'bj', 20, 'unaware'
	swallow += 1
	gs 'stat'

	if hypnoTime < 10:
		'"Get dressed, <i>Cunt</i>. Do it erotically, as much as you can."'
		'He watches you getting dressed with a small smile in his face.</font>'
	elseif $pantyworntype ! 'none':
		'"Get dressed, <i>Cunt</i>, but forget the underwear. You didn''t wear one when you come, and you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catch a glimpse of your naked pussy or ass."'
		'He watches you getting dressed with a small smile in his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
		gs 'underwear', 'remove'
		bedPanty = 2
	else
		'"Get dressed, <i>Cunt</i>. I see you didn''t wear underwear. Very good, you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catch a glimpse of your naked pussy or ass."'
		'He watches you getting dressed with a small smile in his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
		bedPanty = 2
	end
	'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/dressup.mp4"></video></center>'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Wake up':gt 'therapist', 'hypnoEnd'
end


if $ARGS[0] = 'hypnoFuck':
	if sound = 0:PLAY 'sound/rainstorm.mp3',10 & PLAY 'sound/clock.mp3',20 & PLAY 'sound/sex<<rand(1,3)>>.mp3',100
	cls
	$cumdesciption3 = 'cum filled pussy'
	$cumdesciption2 = 'pussy is full with fresh sperm, leaking out of you'
	gs 'cum_call', 0, 'A186', 2, 0, 15000, 60
	randpos = rand(0,3)
	if randpos = 0:
	!on your back
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnofuckback<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = 'You walk to him and he takes your hand and pushes you onto your back.<br>"You look beautiful. I will fuck you so hard like a teenage boy," he says. "You will take it like a trooper. Unfortunately my wife lost all of her appeal, so I have to satisfy myself with your wet cunt."<br>He grabs your legs and genty pushes your legs apart, then kneeling between your legs he forces his dick into your folds.'
		$hypnofuck2 = 'He pounds deep into your body, and the hard surface does not make it comfortable for you. You wince a few times while his balls rhythmically slap your ass, as he is laboring above you. You feel his sweat dripping down on your tits as you spread your legs as wide as possible to give him as much access as possible.'
	elseif randpos = 1:
	!on your back, couch
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnofuckcouchback<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = 'You walk to him, but he changes his mind.<br>"No, lay back on the couch, I will fuck you there."<br>Doing as he says you watch him as he walks up to you and looks down on your naked body, examining you possessively.<br>"You have a beautiful body. Unfortunately my wife lost all of her appeal, so I have to satisfy myself with girls like you."<br>He grabs your legs and gently pushes your legs apart then, kneeling between your legs, he forces his dick into your body.'
		$hypnofuck2 = 'He pounds you deep into the couch, his balls rhythmically slapping your ass, as he labors above you. You feel his sweat dripping down on your tits as you spread your legs as wide as possible to give him as much access as possible.'
	elseif randpos = 2:
	!kneel, couch
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnofuckcouchkneel<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = '"Stop, just kneel on the couch. I want to fuck you from behind."<br>You turn back, kneeling on the couch, placing your hands on the backrest, and wait for <i>Master</i> to take your body. You soon feel his hands touching your breasts, your neck, your back and your legs, playing a little with your pussy.<br>"Good girl, stay like this."<br>He pushes his fingers into your pussy, playing with your clit for a few minutes, causing you to get aroused.'
		$hypnofuck2 = 'You cry out from the pain as he starts to fuck you, fast, deep and hard, without any regard of the fact that his girth is massive, and you would need some adjustment time.'
	else
	!ride
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnofucksit<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = '"Yes, sit on my lap, I want you to do the work for now."<br>He masturbates a little, then takes his hands away from his massive dick. "I want you to take it into your hands and lower yourself onto it. Take it deep into your pussy."<br>You do as he says, stepping above him with spread legs, then taking his massive pole into your hands you fit his tool into the entrance of your body. You feel yourself getting wet according to <i>Master</i>''s instruction, then take a deep breath and push your body onto his pole.'
		$hypnofuck2 = 'He grabs your hips, moving your body to the rhythm he wants you to ride him, and it is fast. Fast, deep and hard, without any regard to you, or that he actually bumps into your cervix in this position. You just ride him like a cowboy, or in this case cowgirl.'
	end
	'<font color=brown>'
	$hypnofuck
	'As soon as he is inside your pussy, he starts to fuck you.'
	!! Change as long as virginity is still checked with pcs_vag = 0; if this is changed uncomment next line and delete the other one
	!! if pcs_vag = 0:pain['vaginal'] +=5 & pcs_vag += 1 & 'You feel a sharp pain as your <i>Master</i> pushes through your maidenhead, taking it away. He doesn''t seem to care about it, he just pushes himself deeper in your unexplored depths, enjoying himself immensly.'
	if pcs_vag = 0 and stat['hidden_vaginal'] = 0:
		gs 'pain', 5, 'vaginal', 'stretch'
		'You feel a sharp pain as your <i>Master</i> pushes through your maidenhead, taking it away. He doesn''t seem to care about it, he just pushes himself deeper in your unexplored depths, enjoying himself immensly.'
	end	$hypnofuck2
	'"Oh yes, my little <i>Cunt</i>, I am so close! I will blow a huge wad of sperm in your beautiful pussy! And you won''t even know about it!"<br>He finally groans, jabbing his hips deep, jetting all of his sperm as deep in your pussy as he possibly can.<br>"Cum, little <i>Cunt</i>, suck all of my seed deep in your body!"'

	gs 'arousal', 'vaginal', 20, 'unaware'
	gs 'stat'

	if randpos <= 1:
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/creampie1.mp4"></video></center>'
	elseif randpos = 2:
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/creampie3.mp4"></video></center>'
	else
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/creampie2.mp4"></video></center>'
	end
	'He groans and you feel cock contracting inside of you. "Cum, <i>Cunt</i>, cum now!" Holding your hips he forces himself as deep into your body as possible, pushing everything he has into you, while you obey his order and orgasm on his tool. And he certainly has quite a lot to let out.'
	'Finally he is done, and he pulls out of you. "That was amazing, <i>Cunt</i>."'
	if hypnoTime < 10:
		'"Get dressed, <i>Cunt</i>. Do it erotically, as much as you can."'
		'He watches you getting dressed with a small smile in his face.</font>'
	elseif $pantyworntype ! 'none':
		'"Get dressed, <i>Cunt</i>, but forget the underwear. You didn''t wear any when you arrived, and you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catching a glimpse of your naked pussy or ass."'
		'He watches you getting dressed with a small smile in his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
		gs 'underwear', 'remove'
		bedPanty = 2
	else
		'"Get dressed, <i>Cunt</i>. I see you didn''t wear underwear. Very good, you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catching a glimpse of your naked pussy or ass."'
		'He watches you getting dressed with a small smile in his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
		bedPanty = 2
	end
	'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/dressup.mp4"></video></center>'
	$orgasm_or = 'yes'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Wake up':gt 'therapist', 'hypnoEnd'
end


if $ARGS[0] = 'hypnoAnal':
	if sound = 0:PLAY 'sound/rainstorm.mp3',10 & PLAY 'sound/clock.mp3',20 & PLAY 'sound/sex<<rand(1,3)>>.mp3',100
	cls
	$cumdesciption3 = 'cum filled ass'
	$cumdesciption2 = 'ass is full of fresh sperm, slowly leaking out of you'
	gs 'cum_call', 'anus', 'A186', 2, 0, 15000, 60
	randpos = rand(0,2)
	'<font color=brown>'
	if randpos = 0:
	!on your back
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnoanalback<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = 'You walk to him, and he takes your hand and pushes you on to your back.<br>"You look beautiful. I will fuck you so hard like a teenage boy," he says. "You will take it like a trooper. Unfortunately my wife lost all of her appeal, so I have to satisfy myself with your little rosebud."<br>He grabs your legs and genty pushes your legs apart, then kneeling between your legs he forces his dick through your muscles.'
		$hypnofuck2 = 'He pounds deep into your ass, and the hard surface does not make it comfortable for you. You wince a few times while his balls rhythmically slap your asscheeks, laboring above you. You feel his sweat dripping down on your tits as you spread your leg as wide as possible to give him as much access as possible.'
	elseif randpos = 1:
	!on your back, couch
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnoanalcouchback<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = 'You walk to him, but he changes his mind.<br>"No, lay back on the couch, I will fuck you there."<br>Doing as he says you watch him as he walks up to you and looks down on your naked body, examining you possessively.<br>"You have a beautiful body. Unfortunately my wife lost all of her appeal, so I have to satisfy myself with girls like you."<br>He grabs your legs and genty pushes your legs apart, then kneels between your legs he forces his dick into your body.'
		$hypnofuck2 = 'He pounds you deep into the couch, his balls rhythmically slapping your ass, as he labors above you. You feel his sweat dripping down on your tits as you spread your leg as wide as possible to give him as much access as possible.'
	elseif randpos = 2:
	!kneel, couch
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/hypnoanalcouchkneel<<rand(1,2)>>.mp4"></video></center>'
		$hypnofuck = '"Stop, just kneel on the couch. I want to fuck you from behind."<br>You turn back, kneeling on the couch, placing your hands on the backrest, and wait for <i>Master</i> to take your body. You soon feel his hands touching your breasts, your neck, your back and your legs, playing a little with your pussy.<br>"Good girl, stay like this."<br>He pushes his fingers into your ass, trying to make you more accessible, causing you to get aroused.'
		$hypnofuck2 = 'You cry out from the pain as he starts to fuck you, fast, deep and hard, without any regard of the fact that his girth is massive, and you would need some adjustment time.'
	end
	$hypnofuck
	'As soon as he is inside your ass, he starts to fuck you.'
	$hypnofuck2
	'"Oh yes, my little <i>Cunt</i>, I am so close! I will blow a huge wad of sperm in your beautiful ass! And you won''t even know about it!"<br>He finally groans, jabbing his hips deep, jetting all of his sperm as deep in your colon as he possibly can.<br>"Cum, little <i>Cunt</i>, suck all of my seed deep in your body!"'

	gs 'arousal', 'anal', 20, 'unaware'
	gs 'stat'

	if randpos <= 2:
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/creampiea1.mp4"></video></center>'
	else
		'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/sex/creampiea3.mp4"></video></center>'
	end
	'He groans and you feel cock contracting inside of you. "Cum, <i>Cunt</i>, cum now!" Holding your hips he forces himself as deep into your body as possible, pushing everything he has into you, while you obey his order and orgasm on his tool. And he certainly has quite a lot to let out.'
	'Finally he is done, and he pulls out of you. "That was amazing, <i>Cunt</i>."'
	if hypnoTime < 10:
		'"Get dressed, <i>Cunt</i>. Do it erotically, as much as you can."'
		'He watches you getting dressed with a small smile in his face.</font>'
	elseif $pantyworntype ! 'none':
		'"Get dressed, <i>Cunt</i>, but forget the underwear. You didn''t wear one when you come, and you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catch a glimpse of your naked pussy or ass."'
		'He watches you getting dressed with a small smile in his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
		gs 'underwear', 'remove'
		bedpanty = 2
	else
		'"Get dressed, <i>Cunt</i>. I see you didn''t wear underwear. Very good, you do not like to wear them. You enjoy the thought that people may notice that you do not wear underwear, maybe catch a glimpse of your naked pussy or ass."'
		'He watches you getting dressed with a small smile in his face, especially enjoying the sight of you completely ignoring your underwear.</font>'
		bedpanty = 2
	end
	'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/dressup.mp4"></video></center>'
	$orgasm_or = 'yes'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Wake up':gt 'therapist', 'hypnoEnd'
end


if $ARGS[0] = 'hypnoEnd':
	minut += 5
	CLOSE ALL
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/clinic/therapist/room.jpg"></center>'
	'<font color=brown>"All right, <i>Cunt</i>, now listen to me. You will not remember any of this. You do not feel any discomfort from any of our activities, and you do not notice anything related to what happened here. No taste, no smell, no aches, no fluids. Nothing. You will not respont to Cunt while you are Awake, just while you are Under. You will wake up feeling good, but responsive to all of my commands. Understand, <i>Cunt</i>?"'
	'"Yes, <i>Master</i>."'
	'"Oh, I almost forgot. While you are Awake, you will call me Dr. Pavlov, you will not have any desire to call me Master. Now, you are sitting in the black room. Stand up, and start walking through the door. As you close the door of the black room, you forget..."</font>'
	'...'
	'...'
	if hypnoTime < 4:
		'When you wake up, you see your therapist looking at you.'
		'"How do you feel, Miss <<$pcs_lastname>>?"'
		'You have a nagging feeling that you have forgotten somehing you should remember, but it is quickly forgotten, when you realize that you feel better about your problem. The therapy helped you a lot.'
		if hypnotime ! 0: 'You certainly do not notice that your mouth tastes like sperm.'
	elseif hypnoTime < 7:
		'When you wake up, you see your therapist smiling.'
		'"Very good, Miss <<$pcs_lastname>>. How do you feel?"'
		'You ponder about it for a while, then you realize, that you feel better about your problem. The therapy certainly helped a lot.'
		'You don''t even notice that your <<$cumdesciption2>>.'
	elseif hypnoTime < 10:
		hypnoAddict = 1
		hypnoDay = daystart
		i += (200-willpowermax)/25+1
		gs 'exhibitionism', i
		inhib_exp += (200-willpowermax)/25+1
		if pain['vaginal'] > 0: pain['vaginal'] -= 5
		if pain['asshole'] > 0: pain['asshole'] -= 5
		pcs_horny = 40
		'When you wake up, you see your therapist smiling.'
		'"Very good, Miss <<$pcs_lastname>>. How do you feel?"'
		'You didn''t even have to ponder about it, you immediately answer that you feel better. The therapy certainly helped a lot.'
		'You are also unconsciously aroused when you feel your therapist''s sperm slowly leaking out of your <<$cumdesciption3>>.'
	else
		hypnoAddict = 2
		hypnoDay = daystart
		i += (200-willpowermax)/25+2
		gs 'exhibitionism', i
		inhib_exp += (200-willpowermax)/25+1
		if pain['vaginal'] > 0: pain['vaginal'] -= 5
		if pain['asshole'] > 0: pain['asshole'] -= 5
		pcs_horny = 60
		'When you wake up, you see your therapist fixing his shirt.'
		'"Miss <<$pcs_lastname>>, how do you feel right now?"'
		'Without hesitation, you reply, "I feel wounderful, Dr. Pavlov."'
		'"Good, just as expected," nods the doctor, as he escorts you out of his office.'
		'You feel aroused, and you try to close your legs as you walk out, unconsciously trying to keep your psychologist''s sperm inside your <<$cumdesciption3>> as long as possible.'
	end
	'The doctor smiles jovially, his hand on your shoulder as he slowly escort you out of his office.'
	'"Please, visit me again if you have any further problems, I will be glad to help!" Says Dr. Pavlov as a goodbye, taking your hands in his, patting them, then closes his door.'
	act 'Leave':gt $loc
end

$pavlov = {
	*clr
	cla
	VIEW 'images/locations/pavlovsk/clinic/therapist/pavlov.jpg'
	'Dr. Pavlov appears to be a few years over sixty, slightly overweight, but still fit. He still looks charming, but in a grandfatherly way. His hair, or what is left of it is gray, but thinning. He usually wears a dress shirt and sharply ironed pants, with dress shoes.'
	'He is always helpful and has a lot of patience, which likely had been helpful to raising five children.'
	if firsthypno = 0:
		'He seems to like you, but he would never flirt. He appears to consider you like a troubled grandchild.'
	else
		'He also has a dark side, because he appears to use his hypnotized female patients to satisfy his own needs with their body. He especially seems to like you. Not that you would know anything about this, since you do not remember anything about what happened to you during these sessions.'
	end
	act 'Back':gt 'therapist'
}

--- therapist ---------------------------------