,,,,,,,<!-- Misc. vars -->
(set: $show_side to false)
<!-- title is the game's title -->
(set: $title to "Doctor's Orders")
<!-- Player vars -->
(set: $age to "an adult")
(set: $cbt to 0)
(set: $fill to 0)
(set: $gender to "female")
(set: $lesbian to 0)
(set: $name to "Sally")
<!-- vct will be the female equivalent of cbt, "Vaginal/Clitoris Torture" -->
(set: $vct to 0)
(set: $virgin to false)
<!-- Doctor vars -->
(set: $body to "full")
(set: $bust to "large")
(set: $clothing to "full")
(set: $dcock to "none")
(set: $dcolor to red+white)
(set: $doctor to "Sexbomb")
(set: $dOrgasm to 0)
(set: $dsmell to "heady")
(set: $futa to false)
(set: $futaOrgasm to false)
(set: $nextLine to "What shall we examine next?")
(set: $strapon to "moderate")
<!-- World vars -->
(set: $anal to false)
(set: $balls to false)
(set: $breasts to false)
(set: $clit to false)
(set: $cock to true)
(set: $condom to false)
(set: $f_anal_passage_visited to false)
(set: $m_anal_passage_visited to false)
(set: $vag_passage_visited to false)
(if: $newGamePlus is not true)[
(set: $ending to "End.")
(set: $pcolor to "red")
]
(set: $goodEnd to true)
(set: $language to 2)
(set: $oral to false)
(set: $orgasmQuestion to false)
(set: $points to 0)
(set: $points_min to 5)
(set: $points_mod to 7)
(set: $points_hi to 10)
(set: $recorded to false)
(set: $urine to false)
(set: $vag to true)
<!-- Other colors -->
(set: $ambient to "grey")
<!-- Start -->
(if: $bonus_room_access is true)[
(set: $bonus_room_access to false)
(goto: "bonus room")
](else:)[
(goto: "main menu")
]{
(set: $show_side to true)
You are |age>[(cycling-link: bind $age,"an adult",
"a middle-aged","an older","a young")]|Gender>[...]
|sel0>[
<br><br>
(link: "man")[
(set: $gender_temp to "man")
(set: $gender to "male")
(set: $vag to false)
(goto: "intro text")
]<br>
(link: "woman")[
(set: $gender_temp to "woman")
(set: $gender to "female")
(set: $cock to false)
(goto: "intro text")
]
]
}{
(if: $anal is true)[
(link: "Anal assessment")[
(if: $gender is "female")[
(goto: "anal (female)")
](else:)[
(goto: "anal (male)")
]
]
<br>]
(if: $breasts is true)[
(link-goto: "Bosom assessment.", "breasts")
<br>]
(if: ($gender is "male") and ($cock is true))[
(link-goto: "Genital assessment.", "cock & balls")
<br>]
(if: ($gender is "female") and ($vag is true))[
(link-goto: "Genital assessment.", "vaginal")
<br>]
(if: $oral is true)[
(link: "Oral assessment.")[
(if: $gender is "female")[
(goto: "oral (female)")
](else:)[
(goto: "oral (male)")
]
]
<br>]
}{
(set: $fill to 1)
(color: $pcolor)[So, how exactly does this work?]
<br><br>
(color: $dcolor)[Simple!]
<br><br>
Dr. (print: $doctor)'s hand drifts over to the many instruments still lying in wait beside the lithotomy table. Her selection made, she brings into your view a narrow tube with green end-cap.
<br><br>
(color: $dcolor)[See this? //This// is what I'm going to use to coax that pesky orgasm out of you.]
<br><br>
|select1>[
(link: "Ask what it is.")[
(replace:?select1)[
(color: $pcolor)[What, erm... What //is// that, doctor?]
<br><br>
(if: $age is "an older")[
(color: $dcolor)[I'm honestly surprised you've never seen one—or something similar—a (if:$gender is "male")[man](else:)[woman] your age. ]
]
(color: $dcolor)[This, here, is a one-way catheter tube. Typical medical usage sees them employed to //drain// the bladder of its contents. I, however, will be using this one for //quite// the opposite purpose!]
]
(show:?desc1)
]<br>
(link: "Ask if it's going to hurt.")[
(replace:?select1)[
(color: $pcolor)[//Heh//, you aren't going to... That is, will the procedure hurt much?]
<br><br>
(color: $dcolor)[//Tch!// Perish the thought! //This// fine tool happens to be the key to many patients' salvation. Just a little push, and you'll be smiling!]
]
(show:?desc1)
]
]
|desc1)[
<br><br>
Dr. (print: $doctor)'s grin spreads from ear to ear as she begins coating the flexible canary-colored hose with a viscous gel. She begins humming—her tone lilting, soothing—as she daubs your urethral opening with a healthy dose of the sticky jelly.
<br><br>
(color: $dcolor)[Now, let us introduce these two elements, shall we? Medical induction port, meet fluid-waste ventilation unit.]
<br><br>
With grace that can come only with practice carried out //ad nauseuam//, the doctor invades your urinary tract with the lubricated rubber channel. Although you experience the faintest discomfort, it fades almost before you recognize the sensation.
<br><br>
(color: $dcolor)[//Ta-da!// Nice and snug. What do you think, eh, (print: $name)? We'll just inflate the little vestibule at the other end of this fellow here and we may finally begin. Ready?]
<br><br>
|select2>[
(link: "Agree nervously.")[
(replace:?select2)[
(color: $pcolor)[Y-Yes, erm... I suppose I am.]
<br><br>
(color: $dcolor)[Oh, fret not. This will feel just //ducky// once we get going!]
]
(show:?desc2)
]<br>
(link: "Agree enthusiastically.")[
(set: $points to it + 1)
(replace:?select2)[
(color: $pcolor)[Yeah, doc; let's get going!]
<br><br>
(color: $dcolor)[That's the spirit!]
]
(show:?desc2)
]
]
]
|desc2)[
<br><br>
Dr. (print: $doctor) plugs some unseen apparatus into the conduit occupying your urinary tract. Craning your neck to catch a glimpse, you're still unable to tell what, exactly, is going on between your legs.
<br><br>
(color: $dcolor)[Intravesical pressure is almost non-existent, so your bladder must be nearly empty. As with the introduction of all new experiences: let us start small. Four-hundred milliliters ought to do it.]
<br><br>
You sense, more than hear, the doctor depress the plunger at her side. Immediately, a warmth begins to spread below your navel.
|select3>[
<br><br>
(link: "Ask what has just happened.")[
(replace:?select3)[
<br><br>
(color: $pcolor)[Wh-what just //happened//, doctor?]
<br><br>
(color: $dcolor)[Weren't paying close attention during our discussion earlier, were you, (print: $name)? ]
]
(show:?desc3)
]<br>
(link: "Moan sensuously.")[
(replace:?select3)[
Your lips form a letter "O" and a low moan escapes your throat before you have time to stop it.
<br><br>
(color: $dcolor)[Ooh, you like that, eh? ]
]
(show:?desc3)
]<br>
(link: "Gasp in surprise.")[
(replace:?select3)[
Eyes wide with something akin to stupefaction, a short gasp escapes your throat before you can stop it.
<br><br>
(color: $dcolor)[Yes, most are all-too-familiar with the sensation of //emptying// the bladder, but few can claim to appreciate the reverse sensation. ]
]
(show:?desc3)
]
]
]
|desc3)[
(color: $dcolor)[It's a medical-grade saline solution: designed specifically to safely expand parts of the body—though, admittedly, there's typically a balloon involved during such procedures.]
<br><br>
Glancing down at your belly, nothing seems amiss. Dr. (print: $doctor) places a hand just above
(if: $gender is "male")[
the base of your shaft.
](else:)[
your mons pubis.
]
<br><br>
(color: $dcolor)[Most adults experience a need—not necessarily an urgent one—to void the bladder at about four-hundred milliliters. How are you feeling? Ready for more?]
<br><br>
(link: "Agree and continue.")[
(set: $points to it + 1)
(goto: "fill II")
]<br>
(link: "Tell her you've reached your limit.")[
(goto: "end (normal)")
]
]
}{
(set: $fill to 2)
(color: $pcolor)[I'm ready for more, doctor.]
<br><br>
(color: $dcolor)[Splendid, //splen//~did! We'll just push down on this, here, and...]
<br><br>
That familiar sensation again: heat pouring into your belly. The mild need for urination is instantly replaced with considerable demand. Glancing down, there isn't any visually appreciable change in your stomach, but the urgency within your bladder mounts all the same.
<br><br>
(color: $dcolor)[That's doubled your capacity to eight-hundred milliliters. This is roughly what you might feel after a full night's rest, assuming you were well-hydrated the day prior. What do you think, (print: $name)?]
<br><br>
|select1>[
(link: "Tell her it feels uncomfortable.")[
(replace:?select1)[
(color: $pcolor)[It's... Well, it feels a touch //uncomfortable//, doc.]
<br><br>
(color: $dcolor)[Yes, that's a perfectly normal reaction. The disquietude of having the bladder //filled//, rather than emptied, can certainly be enough to rattle one's cage. ]
]
(show:?desc1)
]<br>
(link: "Tell her it feels interesting.")[
(replace:?select1)[
(color: $pcolor)[It is definitely an //interesting// sensation. I don't dislike it, but... I'm just not sure //how// to feel quite yet.]
<br><br>
(color: $dcolor)[Perfectly understandable! The disquietude of having the bladder filled, rather than emptied, can certainly be enough to rattle one's cage. ]
]
(show:?desc1)
]<br>
(link: "Tell her it feels incredible.")[
(replace:?select1)[
(color: $pcolor)[It's incredible! Indescribable; //ineffable//, even.]
<br><br>
(color: $dcolor)[Well! That's //some// praise, and we've only just begun! ]
]
(show:?desc1)
]
]
|desc1)[
(color: $dcolor)[Tell you what...]
<br><br>
The doctor sets down whatever item she's been cleaving to, then steps into easy view on one side of the lithotomy table.
<br><br>
(color: $dcolor)[Let's have a short reprieve. We'll keep you precisely as you are now and you can adjust to this new sensation. Once you've thought it over, we can decide together if your limit's been reached.]
<br><br>
An audible click can be heard and a ceiling panel directly above you slides away to reveal an inlaid television set.
<br><br>
(color: $dcolor)[I can leave you alone with your thoughts or I can play something on the television screen. Do you have a preference?]
<br><br>
|select2>[
(link: "Tell her silence would be preferable.")[
(replace:?select2)[
(color: $pcolor)[I'd have some quiet solitude, if it pleases you, doctor. I need time to... To fully adjust to this experience.]
]
(show:?silence)
]<br>
(link: "Request the television be turned on.")[
(replace:?select2)[
(color: $pcolor)[A spot of TV wouldn't go amiss, I suppose. What channels have you got?]
]
(show:?tv1)
]<br>
(if: $points >= $points_min)[
(link: "Ask her to stay with you.")[
(replace:?select2)[
(color: $pcolor)[Doctor (print: $doctor)?]
<br><br>
(color: $dcolor)[Yes? What will it be: television or tranquil introspection?]
<br><br>
(color: $pcolor)[I was actually wondering if... Well, would you stay? I'd rather have company than mindless entertainment or uncanny quiet.]
]
(set: $points to it + 1)
(show:?stay)
]
]
]
]
|silence)[
<br><br>
Dr. (print: $doctor) bows respectfully, a gesture that clearly expresses, "I understand." Another click and the television screen disappears from view—its hiding place restored. The doctor gently, but firmly, squeezes your shoulder then makes to quit the room.
<br><br>
(color: $dcolor)[I'll return in fifteen minutes or so.]
(show:?non_sub)
]
|tv1)[
<br><br>
(color: $dcolor)[Ooh, plenty! I have subscriptions to over twenty-fi—] (color: $ambient)[//cough cough//] (color: $dcolor)[—erm, that is, just a //few// adult content providers. Go on: name a category you're interested in.]
<br><br>
|selectTV>[
(link: "Anal.")[
(replace:?selectTV)[
(color: $pcolor)[Anal-only?]
<br><br>
(color: $dcolor)[Got it in spa~ades!]
]
(set: $tv_select to 1)
(show:?tv2)
]<br>
(link: "BDSM.")[
(replace:?selectTV)[
(color: $pcolor)[Perhaps something with BDSM or, um... bondage?]
<br><br>
(color: $dcolor)[Kinky! I like your style, (print: $name).]
]
(set: $tv_select to 2)
(show:?tv2)
]<br>
(link: "Bukkake.")[
(replace:?selectTV)[
(color: $pcolor)[Do you know, um... Bukkake?]
<br><br>
(color: $dcolor)[Yes, from the Japanese meaning "to splash", or something along those lines... Worry not; I have you covered—pun intended!]
]
(set: $tv_select to 3)
(show:?tv2)
]<br>
(if: $cbt >= 2)[
(link: "CBT.")[
(replace:?selectTV)[
(color: $pcolor)[CBT?]
<br><br>
(color: $dcolor)[Ah, one of my favorites! Cock-ball-torture it is!]
]
(set: $tv_select to 4)
(show:?tv2)
]<br>
]
(link: "Interracial.")[
(replace:?selectTV)[
(color: $pcolor)[Interracial?]
<br><br>
(color: $dcolor)[A classic. Let me show you one of my favorites in the category!]
]
(set: $tv_select to 5)
(show:?tv2)
]<br>
(link: "Lesbian.")[
(replace:?selectTV)[
(color: $pcolor)[Lesbian?]
<br><br>
(if:$gender is "female")[
(color: $dcolor)[Are you coming onto me?]
<br><br>
(color: $pcolor)[What? No, no! I meant—]
<br><br>
(color: $dcolor)[Rela~ax, (print: $name); I knew what you were referring to.]
](else:)[
(color: $dcolor)[Mm, yes. A mainstay for men //and// women around the globe. A //fine// choice, indeed!]
]
]
(set: $tv_select to 6)
(show:?tv2)
]<br>
(if: $urine is true)[
(link: "Water Sports.")[
(replace:?selectTV)[
(color: $pcolor)[What about... erm... You know... ](color: $ambient)[//cough// ](color: $pcolor)[Water sports..?]
<br><br>
(color: $dcolor)[Ooh, you //dirty// (if:$gender is "male")[boy](else:)[girl]! You want to watch two adults //urinate// on one another?]
<br><br>
(color: $pcolor)[Well, it's not like—]
<br><br>
(color: $dcolor)[I'm //joking//, (print: $name)! Given my profession—and my own sexual proclivities—it would be churlish of me to degrade another's favored adult material.]
]
(set: $tv_select to 7)
(show:?tv2)
]<br>
]
(link: "Something not pornographic.")[
(replace:?selectTV)[
(color: $pcolor)[Erm, would it be okay if I watch something that //isn't// adult-themed?]
<br><br>
(color: $dcolor)[Oh. Yes. Yes, I suppose...]
]
(set: $tv_select to 0)
(show:?tv2)
]
]
]
|tv2)[
<br><br>
The dark screen overhead flickers to life. Dr. (print: $doctor) expertly flips through the digital catalog until the image of
(if: $tv_select is 7)[
a blonde woman—lying on her back, facing the camera, lips parted and tongue extended skyward—appears. A nondescript phallus juts into frame, a clear stream connecting it to the woman's forehead, cheeks, and exposed gullet.
](else-if: $tv_select is 2)[
a woman with dyed hair appears. She's restrained in place (reminding you, momentarily, of your own situation), (if:$language>1)[ass](else:)[buttocks] in the air; her breasts are compressed painfully by cordage; a machine works over her (if:$language>1)[pussy](else:)[vagina] while a masked man paddles her posterior mercilessly.
](else-if: $tv_select is 3)[
a petite Asian woman, surrounded on all sides by a plenitude of fit males, appears. They're drenching her in a never-ending deluge of (if:$language>1)[cum](else:)[ejaculate]; the woman's face is almost invisible behind a wall of white.
](else-if: $tv_select is 4)[
a man's penis appears. Beside him, a dark-haired lady in skintight attire is busy working a thick, steel rod into her charge's urethra. He moans as his mistress shifts her attention from his shaft to his testes, which she begins to massage vigorously, painfully.
](else-if: $tv_select is 5)[
a red-haired woman lying face-down, (if:$language>1)[ass](else:)[buttocks] in the air, appears. Behind her, a strong black man is carefully working his immense shaft into her (if:$language>1)[pussy](else:)[vagina] as she lets out a moan of delight intermingled with discomfort.
](else-if: $tv_select is 6)[
two women, locked in a sloppy soul kiss, appear. One gradually migrates toward the apex of the other's thighs, where the former begins loudly sucking the latter's engorged clitoris.
](else-if: $tv_select is 0)[
a tall man—smartly dressed, lining up his club—appears. He swings, arms firing in a single arc as though driven by a piston, sending a white ball sailing off into the distance.
](else:)[
a woman lying face-down, (if:$language>1)[ass](else:)[buttocks] in the air, appears. Behind her, a muscular, olive-skinned man is busy pummeling her (if:$language>1)[asshole](else:)[sphincter] as she coos in delight. The camera is zoomed in sufficiently to show the woman's anus stretched to its limit.
]
<br><br>
(color: $dcolor)[I'll return in fifteen minutes or so. Enjoy yourself!]
(show:?non_sub)
]
|non_sub)[
<br><br>
A quarter of an hour goes by, your bladder aching with repletion all the while.
(if: $tv_select >= 0)[
The sights and sounds overhead do little to distract from your desperate need for relief
(if: $tv_select > 0)[
—although they certainly stiffen your
(if: $gender is "male")[
penis
](else:)[
clitoris
]
]
. Once or twice, you unconsciously attempt to alleviate your condition but, alas, the catheter remains immovable. Your concetration is so fixed on the agony mounting in your belly that you almost don't perceive the doctor's return.
<br><br>
(color: $dcolor)[And how are we doing, (print: $name)? Ready for a little more excitement?]
]
(show:?finish)
]
|stay)[
<br><br>
The doctor's countenance takes on a new expression: her eyes shut, widen; her mouth contorts, curls into a grin; her brow furrows, then arches. Whatever is passing in her brain, it's painted there for the world to see.
<br><br>
(color: $dcolor)[You'd... Have me stay? And do what?]
<br><br>
|select3>[
(link: "Just to talk.")[
(replace:?select3)[
(color: $pcolor)[I just... Want someone to talk to.]
<br><br>
The doctor's expression melts. What was there before is now gone, replaced with the warm visage a professional reserves for their clientele.
<br><br>
(color: $dcolor)[Ah, I see. Well, I'll happily oblige.]
]
(show:?stay_talk)
]<br>
(if: $points >= $points_mod)[
(link: "To be her sub.")[
(replace:?select3)[
(color: $pcolor)[Well, I'm fully restrained and awaiting sexual epiphany by means of urinary stimulation. //Perhaps// it wouldn't be too forward of me to suggest that you do //whatever you like// to me?]
<br><br>
The doctor's eyes light up; the tip of her tongue passes before her parted lips.
<br><br>
(color: $dcolor)[No such thing as //too forward// in my line of work, (print: $name).]
]
(set: $points to it + 1)
(show:?stay_sub)
]
]
]
]
|stay_talk)[
<br><br>
She seats herself beside the lithotomy table and rests one palm on your elevated thigh.
<br><br>
(color: $dcolor)[What would you speak of?]
<br><br>
|select_talk>[
(link: "Ask after her.")[
(replace:?select_talk)[
(color: $pcolor)[I'd hear more about you, doctor.]
<br><br>
(color: $dcolor)[Me? I'm flattered. Though, admittedly, my tale isn't nearly as interesting as you might think—given my current profession.]
<br><br>
(color: $pcolor)[I would hear it all the same.]
<br><br>
Dr. (print: $doctor) blushes almost imperceptibly. Her hand begins idly caressing the flesh of your upper leg.
<br><br>
(color: $dcolor)[Oh, alright. I studied to become a physician, but encountered an //unusual// problem in my twenties.]
<br><br>
(color: $pcolor)[Let me guess: trouble with sexual pleasure?]
<br><br>
(color: $dcolor)[Mm, the //pleasure// part of it never faded; it was the //finishing// that failed its intended operation.]
<br><br>
(color: $pcolor)[So, then; we aren't very different at all, you and I.]
<br><br>
(color: $dcolor)[It's the same for most of my clients. Fortunately, I discovered a cure inside of a year. A fifteen-hour flight from New York to Frankfurt. The bastard next to me wouldn't budge an inch, so I held my water all the way to Germany. As luck would have it, the line for the nearest restroom was wrapped around the atrium. I must have waited another hour before finally seeing the inside of a stall.]
<br><br>
(color: $pcolor)[(if:$language>1)[Jesus.](else:)[Jeez.]]
<br><br>
(color: $dcolor)[It wasn't until slamming the lock home that I finally realized how aroused I had become. My hands operated on auto-pilot. Eleven months after my little "problem" first reared its ugly head, I climaxed with ease in that bathroom stall.]
<br><br>
Dr. (print: $doctor) rises, her hand leaving your thigh.
<br><br>
(color: $pcolor)[And you, what? Dedicated yourself to healing others of the same ailment?]
<br><br>
(color: $dcolor)[Yes, that's about right. But enough about all that; it's time we continued.]
(if: ($clothing is "none") and ($futa is true))[
<br><br>
(color: $pcolor)[Wait, that's all?]
<br><br>
(color: $dcolor)[You were expecting more?]
<br><br>
(color: $pcolor)[Well... I was rather anticipating a footnote about that magnificent (if:$language>1)[cock](else:)[manhood] of yours.]
<br><br>
The doctor beams, then leans down and plants a gentle kiss on your forehead.
<br><br>
(color: $dcolor)[I was born with it, //mon cher//. I hope you can be satisfied with that response for now, as we really //must// be moving along.]
]
]
(show:?finish)
]
]
]
|stay_sub)[
(set: $dOrgasm to it + 1)
<br><br>
Dr. (print: $doctor) leaps astride you with impressive grace.
(if: $clothing is not "none")[
She hikes up the hem of her skirt once more before letting her weight down; her
](else:)[
Her
]
(if: ($clothing is "none") and ($futa is true))[
rotund testicles press against your navel.
](else:)[
secret flesh presses against your bare midriff.
]
Your bladder sings, aching with repletion.
<br><br>
(color: $dcolor)[//Heh//, you really //are// far more interesting than my usual fare. Most patients can only think of themselves—it's "//me, me, me//" from the moment they arrive until they pay their tab and depart. But //you//, (print: $name)... Do you spare a thought for the lonely doctor, or does the idea of being dominated by (if:$gender is "female")[another ](else:)[a ]woman get you off?]
<br><br>
Without warning, she foists one
(if: $bust is "modest")[
perky
](else-if: $bust is "enormous")[
gargantuan
](else:)[
large
]
(if: $language>1)[tit](else:)[breast] upon you. It feels completely natural to envelop her areola in your mouth.
<br><br>
(color: $dcolor)[//Mm//, yes, that's lovely. Your oral qualities are admirable, (print: $name). Perhaps we could—]
<br><br>
Suddenly, the doctor spins on one axis and plants herself directly atop your unsuspecting face. Your neck and nose throb as she lets every pound sink onto you.
<br><br>
(color: $dcolor)[—put them to use elsewhere.]
<br><br>
Dr. (print: $doctor)'s
(if: ($clothing is "none") and ($futa is true))[
(if: $language>1)[balls push](else:)[scrotum pushes]
](else:)[
(if: $language>1)[pussy pushes](else:)[labia pushes]
]
against your circumscribed lips.
(if: ($clothing is "none") and ($futa is true))[
(if: $dsmell is "unwashed")[
She reeks of sweat and stale smegma.
](else-if: ($dsmell is "clean") or ($dsmell is "fragrant"))[
Despite her earlier efforts, that same floral aroma remains.
](else:)[
Her masculine scent overwhelms your senses.
]
If you were to part your lips now, her testes could be inside you in a matter of seconds...
(show:?sub_futa)
](else:)[
Extending your tongue would be the easiest thing in the world...
(show:?sub_woman)
]
]
|sub_futa)[
<br><br>
(if: $language>1)[
(set: $throat_temp to "her for a throatfuck")
](else:)[
(set: $throat_temp to "for deepthroat")
]
|futaSelect1>[
(link: "Open your mouth and suck.")[
(replace:?futaSelect1)[
Mewling like an infant, you swallow Dr. (print: $doctor)'s heavy sack in one go.
]
(show:?sub_balls)
]<br>
(link: "Beg (print: $throat_temp).")[
(replace:?futaSelect1)[
(color: $pcolor)[D-Doc, don't... Don't tease me like this. You know where I want this thing.]
<br><br>
(color: $dcolor)[I //certainly// do.]
]
(show:?sub_shaft)
(show:?doc_cum_inside)
(show:?finish)
]
]
]
|sub_balls)[
<br><br>
(color: $dcolor)[Oh, //(if: $language>1)[fuck](else:)[heavens above]!// You dirty little...]
<br><br>
The doctor's testes are incredible.
(if: $dsmell is "unwashed")[
They taste like the inside of a gym sock: sour and musty; yet, somehow, wonderfully arousing.
](else-if: ($dsmell is "clean") or ($dsmell is "fragrant"))[
There's a hint of soap and mint as they jostle about inside your mouth.
](else:)[
Sweat rolls off them, delighting your tastebuds with a mixture of bold flavors.
]
<br><br>
(color: $dcolor)[Oh-ho! You like them, do you? Very well; don't feel as though you have to be gentle!]
<br><br>
|sub_balls2>[
(link: "Suck harder.")[
(replace:?sub_balls2)[
If it were possible to respond with ten pounds of testicles in your mouth, you might express delight at hearing those words. As it stands, there's only one option open to you: abuse the doctor's (if:$language>2)[nuts](else:)[scrotum] (if:$cbt>1)[as she did yours](else:)[with all the force you can muster].
<br><br>
Inhaling deeply, the first of Dr. (print: $doctor)'s (if:$language>1)[balls](else:)[testicles] slips past your tonsils, followed closely by the second. Their owner begins to howl and tears well up at the corners of your eyes—brought on by the unusual lump in your throat.
<br><br>
(color: $dcolor)[//Holy God, (print: $name)!// Oof, that hurts so //good//; your gullet is //tight!//]
<br><br>
She begins pumping
(if: $dcock is "moderately-sized")[
two fingers
](else-if: $dcock is "positively elephantine")[
both fists
](else:)[
a fist
]
along the surface of her (if:$language>1)[dick](else:)[penis]. You don't let up the assault on her undercarriage for an instant.
]
(show:?doc_cum_outside)
(show:?finish)
]<br>
(link: "Beg (print: $throat_temp), instead.")[
(replace:?sub_balls2)[
Suddenly, you release her from the prison behind your teeth.
<br><br>
(color: $pcolor)[D-Doc, don't... Don't tease me like this. You know where I want this thing.]
<br><br>
(color: $dcolor)[I //certainly// do.]
]
(show:?sub_shaft)
(show:?doc_cum_inside)
(show:?finish)
]<br>
(if: $gender is "female")[
(link: "Push your breasts together, envelope her shaft.")[
(replace:?sub_balls2)[
Given the impossibility of fielding a response with ten pounds of testicles in your mouth, you gesticulate instead. Unfortunately, your hands are still bound; you force your breasts skyward, hoping that the doctor interprets the message.
]
(show:?sub_titfuck)
(show:?doc_cum_outside)
(show:?finish)
]<br>
]
]
]
|sub_shaft)[
<br><br>
Dr. (print: $doctor) adjusts her hips until her glans rests against your chin. Balancing carefully, she guides herself onto your waiting tongue—extended like a landing strip awaiting an incoming aircraft—before inserting her penis
(if: $dcock is "moderately-sized")[
up to the hilt.
<br><br>
(color: $dcolor)[//Mm//, so warm.]
](else-if: $dcock is "positively elephantine")[
as far as it will go.
<br><br>
(color: $dcolor)[What, only half of it? //Tsk tsk//, (print: $name); we shall have to correct that.]
](else:)[
almost to its hilt.
<br><br>
(color: $dcolor)[//Mmph//, what a tight fit.]
]
<br><br>
At the expiration of an instant, she begins that familiar action of undulating her hips,
(if: $dcock is "moderately-sized")[
teasing the rear of your oral cavity with her personal tongue depressor.
](else-if: $dcock is "positively elephantine")[
eliciting from you an unsettling //glurk!// as she advances ever further into your esophagus with her impossible flesh.
](else:)[
stressing your esophageal tract to incredible lengths as she builds speed over the course of a minute.
]
]
|sub_titfuck)[
<br><br>
(color: $dcolor)[What do... Oh. Oh, I see.]
<br><br>
The doctor pinches your nipples with opposing hands, then uses them to pull your bosom
(if: $dcock is "moderately-sized")[
around her shaft—thus enveloping it.
](else-if: $dcock is "positively elephantine")[
astride her mammoth (if:$language>1)[cock](else:)[shaft].
](else:)[
around most of her shaft, partially enveloping it.
]
Rhythmically, enchantingly, she begins to undulate. Her thighs stroke your cheeks; her scrotum stretches and recedes; her(if: $dcock is not "moderately-sized")[ thick] manhood presses its way between your breasts, stimulated by the flesh of your stomach.
<br><br>
(color: $dcolor)[//Mm//, what a magnificently twisted mind you seem to have, (print: $name). //(if:$language>1)[Fuck](else:)[Oh]//, this is too good. I'm...]
<br><br>
Her pace quickens; your core warms from the friction caused by the doctor's genitals.
]
|doc_cum_outside)[
<br><br>
(color: $dcolor)[//Ha, ha// I think I'm... No, I'm //definitely// going to—]
<br><br>
Dr. (print: $doctor) surges forward, running her manhood against your belly. The wave of white gushing from the end of her glans can only be described as "torrential." Instead of individual bursts, her semen rushes on in one continuous strand.
<br><br>
She coats your
(if: $gender is "male")[
erect penis, as well as your upraised thighs. The scalding fluid courses between the channels formed around your groin, concealing your entire scrotum,
](else:)[
exposed vulva, as well as your upraised thighs. The scalding fluid courses between the channels formed around your groin, flowing around—between—your labia,
]
before pattering noisily to the tile below. Your lungs begin to burn for air but the doctor is still finishing. Her orgasm lasts a full minute before subsiding.
<br><br>
(color: $dcolor)[Oh... Oh my... That was... //Delightful//, (print: $name). Still, much as it pains me to admit it, we //really// must be moving along.]
<br><br>
You can't help but cough and sputter in response as she dismounts.
]
|doc_cum_inside)[
<br><br>
(color: $dcolor)[//Ha, ha// I think I'm... No, I'm //definitely// going to—]
<br><br>
Dr. (print: $doctor) surges forward, driving her manhood deep, deep into you.
(if: $dcock is "positively elephantine")[
Somewhere at your core, part of you begins to spasm—you're certain it's because the doctor's glans has, impossibly, entered your stomach.
](else-if: $dcock is not "moderately-sized")[
Somewhere at your core, part of you begins to spasm—the doctor's glans must be nearly to your stomach.
]
She swells, then dispenses her load:
(if: $dcock is "moderately-sized")[
it courses through your throat, pouring into your belly,
](else-if: $dcock is "positively elephantine")[
it courses directly into your belly,
](else:)[
it crashes against your esophageal sphincter before coursing into your belly,
]
bloating your midsection. Her orgasm lasts a full minute before subsiding, your lungs burning for air all the while. She withdraws from you, excess (if:$language>1)[cum ](else:)[semen ] gushing onto your face before pattering noisily to the tile below.
<br><br>
(color: $dcolor)[Oh... Oh my... That was... //Delightful//, (print: $name). Still, much as it pains me to admit it, we //really// must be moving along.]
<br><br>
You can't help but cough and sputter in response as she dismounts.
]
|sub_woman)[
<br><br>
|select3>[
(link: "Lick her clit(if:$language<=1)[oris].")[
(replace:?select3)[
You reach out with (if: $gender is "male")[one of your two unrestrained appendages](else:)[your only unrestrained appendage].
]
(show:?sub_clit)
(show:?doc_cum_woman)
(show:?finish)
]<br>
(link: "Insert your tongue.")[
(replace:?select3)[
You reach out with (if: $gender is "male")[one of your two unrestrained appendages](else:)[your only unrestrained appendage].
]
(show:?sub_tongue)
(show:?doc_cum_woman)
(show:?finish)
]
]
]
|sub_clit)[
<br><br>
(color: $dcolor)[O-Oh! Oh, //my//... Yes, (print: $name), that is //quite// lovely!]
<br><br>
Buoyed by the doctor's response, you lavish further pleasure upon her. Slurping and sucking the engorged fruit peering out from the folds of its rind, your efforts reach their crescendo and the woman's thighs begin to quake all about you.
(show:?doc_cum_woman)
]
|sub_tongue)[
<br><br>
(color: $dcolor)[Ooh, (print: $name)... That feels //wonderful//. Please, go as deep as you can.]
<br><br>
Obliging to the best of your ability, you plumb the doctor's depths, pushing through shrouds that are as irriguous as they are fantastically hot. Thrusting then withdrawing, only to repeat the action; the doctor can't take it; her thighs begin to quake.
]
|doc_cum_woman)[
<br><br>
(if: $language>1)[
(color: $dcolor)[C-c-c—]
](else:)[
(color: $dcolor)[I'm... //I'm//—]
]
<br><br>
Dr. (print: $doctor) shivers uncontrollably, sinking further and further against you until you feel her hot breath on your
(if: $gender is "male")[
manhood
](else:)[
labia
].
<br><br>
(if: $language>1)[
(color: $dcolor)[—//umming!//]
](else:)[
(color: $dcolor)[//Unf!//]
]
<br><br>
Thighs clenched around your temples, the doctor rides out her orgasm for a solid minute. At length, she relinquishes her hold and dismounts.
<br><br>
(color: $dcolor)[Oh... Oh my... That was... //Delightful//, (print: $name). Still, much as it pains me to admit it, we //really// must be moving along.]
]
|finish)[
<br><br>
(if: $points >= $points_mod)[
(link: "Agree and continue.")[
(set: $points to it + 1)
(goto: "fill III")
]<br>
]
(link: "Tell her you've reached your limit.")[
(goto: "end (normal)")
]
]
}{
(set: $fill to 3)
(color: $pcolor)[How much more is there, doctor?]
<br><br>
(color: $dcolor)[Ooh, depends. How much more can you hold?]
<br><br>
Dr. (print: $doctor) works the unseen action between your legs and discomfort races up your belly. Glancing down, you watch as your stomach swells until it looks as though you are well into the first trimester of pregnancy(if: $gender is "male")[, odd as that would be for a member of your sex]. You can't feel much of anything below your waist.
<br><br>
(color: $dcolor)[Well? How's that?]
<br><br>
Her voice is distant. Nearly every part of your consciousness is now laser-focused on the desperate need to urinate.
<br><br>
|select1>[
(if: $points >= $points_hi)[
(link: "Ask for more.")[
(replace:?select1)[
(color: $pcolor)[I feel... //Tight//. It's... I don't know... But I want //more//.]
]
(set: $fill to 4)
(show:?desc1)
(show:?select2)
]<br>
]
(link: "Tell her you've reached your limit.")[
(goto: "end (full)")
]
]
|desc1)[
<br><br>
(color: $dcolor)[That's what I like to hear!]
<br><br>
The doctor injects you again and the discomfort intensifies immediately. A rumble escapes your gut, which doesn't look half as large as it feels—although you could be well into your second trimester by now, going by sight alone. Unintentionally, you attempt to expel the inducted saline. It's no use; your urethra is stoppered but good.
<br><br>
Without meaning to, you begin to emit a slew of unintelligible gibberish. Maybe you're asking the doctor to let you go; maybe you're merely expressing the sublime anguish in which you are now wallowing. Even you don't know the answer. Tracing her finger from your navel, over the bump protruding below it, down to your groin and back again, Dr. (print: $doctor) beams like an artist admiring her masterpiece.
<br><br>
(color: $dcolor)[You seem to be enjoying yourself, eh, (print: $name)? Shall we go on, or is this the boundary of our shared depravity?]
<br><br>
]
|select2)[
(if: $points >= $points_hi)[
(link: "Beg for more.")[
(replace:?select2)[
(color: $pcolor)[M-more... Need //more//... F-Fill me... P-//Please//, doctor!]
]
(set: $fill to 5)
(show:?desc2)
(show:?select2)
]<br>
]
(link: "Tell her you've reached your limit.")[
(goto: "end (full)")
]
]
|desc2)[
<br><br>
(color: $dcolor)[So eager; how incredible! Hardly any of my patients exhibit such gluttony: you've got three //liters// in there; isn't that enough?]
<br><br>
As her gaze roams over you, the doctor's eyes narrow in what would seem to be subtle curiosity.
<br><br>
(color: $dcolor)[This is //three times// what would normally constitute acute urinary discomfort for most adults. You're certain you can handle more?]
<br><br>
You nod slowly. Though your throat is dry and the agony dwelling within your belly threatens to destroy your very consciousness, you desire that the sensation should be aggravated exponentially. Upon the doctor's face, a mischievous grin slowly turns the corners of her mouth.
<br><br>
(color: $dcolor)[Well, if you are willing, (print: $name)—]
<br><br>
She fiddles with something between your legs, just out of view.
<br><br>
(color: $dcolor)[—then, by thunder, so am I!]
<br><br>
As Dr. (print: $doctor) delivers the final payload into your bladder, the world darkens momentarily. Seconds later, the exam room swims back into view from the periphery of your sight. The colors are lurid, almost unbearable to look upon. Your senses are so heightened, the very air kissing your skin feels heavenly. Glancing down, it is now impossible to see your own groin over the mountain dominating the flesh around your navel.
<br><br>
(link: "Tell her you've reached your limit.")[
(goto: "end (full)")
]
]
}{
(if: $gender is "female")[
She plunges her
(if: ($clothing is "none") and ($futa is true))[
manhood
](else:)[
silicone instrument ]
into you with reckless abandon, pushing as deep into your vaginal cavity as she is capable of doing.
](else:)[
Bringing her rear down one final time, the doctor envelopes you as fully as she is capable of doing.
]
You feel it coming: an orgasm.
(if: $age is "a young")[
Almost two years
](else-if: $age is "an adult")[
Years
](else-if: $age is "a middle-aged")[
Several years
](else:)[
Many, many years
]
of denial are done with; release has come. Your body convulses involuntarily with the sheer ecstasy of sensation.
(if: $gender is "female")[
As climax overtakes you, a thin jet of whitish fluid sprays from the delta of your thighs directly onto the doctor's
(if: $clothing is "none")[
naked abdomen.
](else-if: $clothing is "half")[
abdomen and skirt.
](else:)[
skirt and blouse.
]
Dr. (print: $doctor) moans as though it were //her// caught in the throes of climax.
](else:)[
A torrent of ejaculate fires from the end of your glans. Dr. (print: $doctor) moans as though it were //her// caught in the throes of climax. She rises again, then descends—continuing the act of penetration even as your seed courses into her, floods her womb, spills onto the tile below.
]
<br><br>
(color: $pcolor)[Oh (if: $language>1)[//f-fuck!//](else:)[//w-wow!//]]
<br><br>
You can't help but shout, enraptured as you are. Bliss overwhelms your senses; orgasm becomes all you know.
<br><br>
(color: $dcolor)[Mm, I //love// this part of the treatment!
(if: $language>2)[All this //hot// fluid
(if: $gender is "female")[
(if: $clothing is "none")[
squirting all over me, bathing my midriff...
](else:)[
soaking my skirt(if: $clothing is "full")[ and panties]...
]
](else:)[
pouring into me, filling me to the brim...
]
](else:)[
Oh, (print: $name)... I'm //so// glad you visited today!
]
]
<br><br>
(link: "Ride out your orgasm.")[
(goto: "wrap up")
]
}{
At length, the sensation of climax dwindles to non-existence. Dr. (print: $doctor) dismounts and begins the process of draining your bladder.
(if: $fill <= 2)[
It doesn't take her long, but the relief is still very much welcome.
](else:)[
Your belly aches as it deflates to its normal size; the relief is truly overwhelming.
]
Your legs and feet feel as though stung by a thousand pins when your restraints are undone at last.
(if: ($gender is "female") and
($futa is true) and
($clothing is "none") and
($condom is false)
)[
<br><br>
(color: $dcolor)[Here, take these.]
<br><br>
Dr. (print: $doctor) places two small tablets in the palm of your newly-freed hand.
<br><br>
(color: $dcolor)[They're contraceptives. I believe I mentioned before that I wouldn't have you quit my care with (if: $language>2)[a bun in your oven](else:)[the possibility of pregnancy looming over you].
]
]
<br><br>
|select1>[
(link: "Thank the doctor.")[
(replace:?select1)[
(color: $pcolor)[Thank you, doctor. That was... You've done me an incredible service.]
]
(show:?thanks)
(show:?finish)
]<br>
(link: "Apologize for the mess.")[
(replace:?select1)[
(color: $pcolor)[Sorry about the mess, doc.]
]
(show:?apology)
(show:?finish)
]
]
|thanks)[
<br><br>
(color: $dcolor)[Think nothing of it! Healing "ailments" of this nature is both my passion and my speciality.]
]
|apology)[
<br><br>
Your eyes can't help but fixate on the
(if: $gender is "female")[
(if: $clothing is "none")[
shiny streaks indicating where you showered the doctor's midsection.
](else:)[
damp streaks indicating where you showered the doctor's skirt (if: $clothing is "half")[and midsection](else:)[and blouse].
]
](else:)[
alabaster puddle pooling at the foot of the lithotomy table.
]
<br><br>
(color: $dcolor)[Oh, there's no need for apologies! If I expected treatment of this variety to exclude any tidying-up, I'd likely have quit this profession many years ago.]
]
|finish)[
<br><br>
(if: ($clothing is "none") or ($clothing is "half"))[
You both
](else:)[
You
]
finish dressing and the doctor ushers you back into her office, where the two of you discuss financial matters. Even as you remit payment, Dr. (print: $doctor) seems distracted. She barely notices as you return the pen used to sign your release forms. The doctor rises and offers you her hand.
<br><br>
|select2>[
(if: $points >= $points_hi)[
(link: "Ask what's bothering her.")[
(replace:?select2)[
(display: "wrap up (good)")
]
]<br>
]
(link: "Shake her hand.")[
(replace:?select2)[
(display: "wrap up (normal)")
]
]
]
]
}{
(set: $vag_passage_visited to true)
(color: $pcolor)[Well, I must say that I am //aching// for you to have a look at my (if:$language>2)[pussy](else:)[womanhood], doctor... (if:$language>1)[Jesus](else:)[Gosh], that sounds a bit hackneyed, doesn't it?]
<br><br>
(color: $dcolor)[Ha! No, not at all. It is an accurate statement and a natural concomitant of our analysis.]
<br><br>
Dr. (print: $doctor)'s hand begins firmly stroking and squeezing your labia.
<br><br>
(color: $dcolor)[Mm, would you just //look// at this //gorgeous// sheath? ]
<br><br>
The doctor kneels down until her countenance becomes concealed below your mons pubis. Although she is now invisible to you, it is easy to detect her continued scrutiny of your inguinal components.
<br><br>
(color: $dcolor)[Say, erm... Before we begin, you wouldn't mind if I... Well, //may// I assess you //viva voce//?]
<br><br>
|sel0>[
(link: "Agree.")[
(set: $points to it + 1)
(replace:?sel0)[
(color: $pcolor)[Ooh, that sounds //quite// diverting. Please, proceed!]
]
(show:?cunnilingus)
(show:?continue)
]<br>
(link: "Ask her to elaborate.")[
(replace:?sel0)[
(color: $pcolor)[I'm afraid your medical terminology is beyond my ken. To what are you referring?]
]
(show:?questioning)
]<br>
(link: "Decline.")[
(replace:?sel0)[
(color: $pcolor)[Actually, doctor, I was hoping we could get on with things.]
]
(show:?decline)
(show:?continue)
]
]
|questioning)[
<br><br>
(color: $dcolor)[Actually, my dear, the term is rather more academic than medical in nature—though I've bastardized its meaning a tad. I mean to say: may I administer cunnilingus?]
<br><br>
|sel02>[
(link: "Agree.")[
(set: $points to it + 1)
(replace:?sel02)[
(color: $pcolor)[Ooh, I quite like the sound of that!]
]
(show:?cunnilingus)
(show:?continue)
]<br>
(link: "Decline.")[
(replace:?sel02)[
(color: $pcolor)[Actually, doctor, I was hoping we could get on with things.]
]
(show:?decline)
(show:?continue)
]
]
]
|cunnilingus)[
<br><br>
(color: $dcolor)[That's what I like to hear!]
<br><br>
Though it is impossible to observe from your position of restraint, the doctor's eager tone makes it easy to imagine the woman practically salivating as she hovers mere inches from your exposed groin. An instant later, she descends upon you: first bestowing a sensual kiss to your rapidly-swelling clitoris, followed by a second, which she plants directly onto your labia.
<br><br>
(color: $dcolor)[//Mm//, I do so //adore// the fundamentals of femininity!]
<br><br>
Dr. (print: $doctor)'s kisses become more amorous and, presently, the employment of her tongue is imposed. She lavishes your vulva with her oral instrument, not letting one square centimeter escape her attention, before delving deep into your vaginal canal. At length, however, her labors cease and the good doctor once more swims into view, one hand supporting her forehead.
<br><br>
(color: $dcolor)[Wow, (print: $name)! I really could remain down there all day but, alas, I //am// aware that the predicament which brought you to my clinic has not yet been assuaged.]
<br><br>
Dr. (print: $doctor)'s tongue, made sheeny from her efforts, lolls out and circles her own saturated lips while she noises her contentment. (if: ($clothing is "none") and ($futa is true))[She begins meaningfully stroking her (if: $dcock is not "moderately-sized")[thick ](if:$language>1)[cock](else:)[penis](if: $f_anal_passage_visited is true)[, still slick from its foray into your posterior.](else:)[.]](else:)[She permits one delicate palm to linger over the utensils resting to one side of you.]
<br><br>
]
|decline)[
<br><br>
(color: $dcolor)[Ah, y-yes... Of course. Apologies for my... //Zeal//.]
<br><br>
Dr. (print: $doctor) looks crestfallen only a moment before—outwardly, at least—making a full recovery. (if: ($clothing is "none") and ($futa is true))[She begins meaningfully stroking her (if: $dcock is not "moderately-sized")[thick ](if:$language>1)[cock](else:)[penis](if: $f_anal_passage_visited is true)[, still slick from its foray into your posterior.](else:)[.]](else:)[She permits one delicate palm to linger over the utensils resting to one side of you.]
<br><br>
]
|continue)[
(if: $f_anal_passage_visited is true)[
(if: ($clothing is "none") and ($futa is true))[
(show:?futapenis)
](else:)[
(show:?strapon)
]
](else:)[
(if: ($clothing is "none") and ($futa is true))[
(show:?futapenisNew)
](else:)[
(display: "choose strapon")
]
]
]
|futapenis)[
(color: $dcolor)[Might I assume that I may once again employ my own //personal// instrument for this assessment?]
<br><br>
|fpselect1>[
(link: "Reaffirm.")[
(replace:?fpselect1)[
(color: $pcolor)[Yes, doctor. Please do.]
]
(show:?futaStart)
]<br>
(link: "Impatiently reaffirm.")[
(replace:?fpselect1)[
(color: $pcolor)[C'mon, doc! Quit pussyfooting around and stick it in me already!]
(if: $virgin is true)[
<br><br>
(color: $dcolor)[Oh-ho! Such impatience, and from one claiming to be a virgin, no less!]
]
(show:?futaStart)
]
]
]
]
|futapenisNew)[
(color: $dcolor)[I assume you won't balk if I perform your assessment with my own //personal// instrument?]
<br><br>
|fpselect2>[
(link: "Tell her you don't mind.")[
(replace:?fpselect2)[
(color: $pcolor)[Go right ahead; I don't mind one bit.]
<br><br>
(color: $dcolor)[Excellent! Fret not, I'll see to it that there will be no resulting conception.]
]
(show:?futaStart)
]<br>
(link: "Declare that you will accept no substitute.")[
(set: $points to it + 2)
(replace:?fpselect2)[
(color: $pcolor)[I would be offended if you employed anything lesser.]
<br><br>
(color: $dcolor)[My, my; you flatter me, (print: $name)! Fret not, I will dispense contraceptives before we finish today.]
]
(show:?futaStart)
]<br>
(link: "Affirm, on the grounds that she wear protection.")[
(set: $condom to true)
(replace:?fpselect2)[
(color: $pcolor)[I won't complain, so long as you have a rubber on-hand.]
<br><br>
(color: $dcolor)[Oh, boo, (print: $name)! I can dispense contraceptives easily enough... Oh, well; I'll respect your decision.]
]
(show:?futaStart)
]
]
]
|strapon)[
(color: $dcolor)[Shall we utilize the same apparatus as before?]
<br><br>
|select1>[
(link: "Agree: use the (print: $strapon) one.")[
(replace:?select1)[
(color: $pcolor)[Yes, I think that one will do nicely.]
<br><br>
(color: $dcolor)[I couldn't agree more.]
(show:?apparatus)
]
]<br>
(link: "Choose a different instrument.")[
(replace:?select1)[
(color: $pcolor)[Actually, I should like to choose again.]
<br><br>
(color: $dcolor)[Very well. ]
(display: "choose strapon")
]
]
]
]
|apparatus)[
<br><br>
Dr. (print: $doctor)(if: $f_anal_passage_visited is true)[ once again] fastens the (print: $strapon) apparatus onto her
(if: $clothing is "none")[
nude groin before coating
](else:)[
groin, hiking up her skirt in the process; she coats
]
it with a sheen of lubricant, eyeing you hungrily. As she steps forward to mount you, her instrument's gleaming tip presses against your labial folds.
It
(if: $strapon is "modest")[
feels roughly the size of a man's penis.
](else-if: $strapon is "large")[
will be no small task, receiving this monster.
](else:)[
is almost certainly going to hurt when she pushes it into you. Eyes fluttering shut, you draw a deep breath.
]
<br><br>
(color: $dcolor)[Let's begin, shall we?]
<br><br>
Without another word, Dr. (print: $doctor) plunges into you.
(if: $strapon is "modest")[
There's enough lube, and the size is quite manageable, so the tool's slick surface glides instantly into you up to its hilt.
(if: $virgin is false)[
Taking it is not unlike the sensation of sex with a man.
]
](else-if: $strapon is "large")[
In the breadth of an instant, the air is expelled from your lungs. This must be what sex with a horse is like: very filling and //very// overwhelming.
](else:)[
The "glans," which could rival the dimensions of a woman's fist, only catches for a moment before the wrist-thick shaft follows. You let out a startled gasp; the sensation is not unpleasant, but it is //definitely// overwhelming.
]
<br><br>
(color: $dcolor)[How's that? Ready for the first thrust?]
<br><br>
|select1>[
(if: $strapon is "modest")[
(link: "Agree and continue.")[
(replace:?select1)[
(color: $pcolor)[Yes, absolutely!]
<br><br>
(color: $dcolor)[Excellent! ]
]
(show:?finish)
]<br>
(if: ($virgin is false) and ($points >= $points_min))[
(link: "Agree impatiently.")[
(replace:?select1)[
(color: $pcolor)[C'mon, doc; give it to me already!]
<br><br>
(color: $dcolor)[//Tch!// So impatient! Very well, then... ]
]
(show:?finish)
]<br>
]
](else:)[
(link: "Ask her to be gentle.")[
(replace:?select1)[
(color: $pcolor)[G-gently, doctor.]
<br><br>
(color: $dcolor)[Of course. Just need a stable grip, and... ]
]
(show:?finish)
]<br>
(if: $strapon is "massive")[
(link: "Tell her to do her worst.")[
(set: $points to it + 1)
<!-- $temp_vag determines if additional text is shown while the player is being fucked -->
(set: $temp_vag to true)
(replace:?select1)[
(color: $pcolor)[I, erm...]
<br><br>
(color: $dcolor)[Yes, (print: $name)?]
<br><br>
(color: $pcolor)[Sorry; it's embarrassing.]
<br><br>
(color: $dcolor)[There is no shame at this clinic. Whatever you have to say, it can be said freely.]
<br><br>
(color: $pcolor)[Well, I... I want you to visit your worst upon me, doctor. Don't hold back; (if:$language>2)[wreck my insides](else-if:$language>1)[//really// stretch me out](else:)[display your truest fervor]... Please.]
<br><br>
]
(show:?wreck)
(show:?finish)
]
]
]
]
]
|wreck)[
(if: ($clothing is "none") and ($futa is true))[
It's difficult to be certain, but it's possible the woman's already-stiff member increases in rigidity two-fold.
](else:)[
(if: ($clothing is "full") or ($clothing is "sexy"))[
Though you need to crane your neck to see, you're certain the woman's nipples are nearly stiff enough to puncture her blouse.
](else:)[
Though you need to crane your neck to see, you're certain the woman's nipples have just stiffened considerably.
]
]
<br><br>
(color: $dcolor)[Good God... How I //delight// in hearing such things! Very well, //mon petit chou-fleur//. My very worst, coming right up! ]
]
|futaStart)[
<br><br>
Dr. (print: $doctor) coats her erect penis with a sheen of lubricant and eyes you hungrily. As she steps forward to mount you, her glans presses against your labial folds.
(if: $dcock is "modest")[
Her penis feels roughly the size of a man's.
](else-if: ($dcock is "rather large") or ($dcock is "worryingly-large"))[
It will be no small task, receiving this monster.
](else:)[
It is almost certainly going to hurt when she advances into you. Eyes fluttering shut, you draw a deep breath.
]
<br><br>
(color: $dcolor)[Let's begin, shall we?]
<br><br>
Without another word, Dr. (print: $doctor) plunges into you.
(if: $dcock is "moderately-sized")[
There's enough lube, and the size is quite manageable, so her (if: $language>1)[cock](else:)[shaft] glides instantly into you up to its hilt.
(if: $virgin is false)[
Taking it is not unlike the sensation of sex with a man.
]
](else-if: $dcock is "positively elephantine")[
The glans, which rivals the dimensions of a woman's fist, only catches for a moment before the wrist-thick shaft follows. You let out a startled gasp; the sensation is not unpleasant, but it is //definitely// overwhelming.
](else:)[
In the breadth of an instant, the air is expelled from your lungs. This must be what sex with a horse is like: very filling and //very// overwhelming.
]
<br><br>
(color: $dcolor)[How's that? Ready for the first thrust?]
<br><br>
|fpselect3>[
(if: $dcock is "moderately-sized")[
(if: $virgin is true)[
(link: "Agree and continue.")[
(replace:?fpselect3)[
(color: $pcolor)[Yes, absolutely!]
<br><br>
(color: $dcolor)[Excellent! (print: $name), you are a virgin no longer. ]
]
(show:?finish)
]
](else:)[
(link: "Agree impatiently.")[
(replace:?fpselect3)[
(color: $pcolor)[Yes, yes! Just //do it// already!]
<br><br>
(color: $dcolor)[//Tch!// So impatient! Very well, then... ]
]
(show:?finish)
]
]
](else:)[
(link: "Ask her to be gentle.")[
(replace:?fpselect3)[
(color: $pcolor)[G-gently, doctor.]
<br><br>
(color: $dcolor)[Of course. Just need a firm grip, and... ]
]
(show:?finish)
]
]
]
]
|finish)[
(color: $dcolor)[Here. We...]
<br><br>
Her back arches; she's mostly out of you; then, in the blink of an eye, her hips rocket forward—once again burying her shaft in the warm folds of your womanhood.
<br><br>
(color: $dcolor)[//Go//.]
<br><br>
She thrusts again and again; the lewd sounds issuing from the delta of your thighs are turning you on.
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
Dr. (print: $doctor) is practically flying in and out of your (if: $langauge>1)[pussy](else:)[vagina].
](else:)[
Dr. (print: $doctor) is digging into you with Herculean force; your cervix shudders in reponse. (if: $temp_vag is true)[You wince as your uterus is pushed further into your abdomen to accommodate her.]
]
<br><br>
<!-- clit stuff -->
(color: $dcolor)[Say, (print: $name) ](color: $ambient)[//pant//] (color: $dcolor)[Want me to play with this?]
<br><br>
The doctor rests her thumb atop your engorged clitoris; her pace doesn't slow one iota.
<br><br>
|selectClit>[
(link: "Yes.")[
(set: $clit to true)
(set: $vct to it + 1)
(set: $points to it + 1)
(replace:?selectClit)[
(color: $pcolor)[Yes, doctor; I think that would feel lovely!]
<br><br>
(color: $dcolor)[I ](color: $ambient)[//huff//] (color: $dcolor)[agree!]
]
(show:?clit)
]<br>
(link: "No.")[
(replace:?selectClit)[
(color: $pcolor)[Oh, erm... No thank you, doctor. Not while you're... Well, you get the idea.]
<br><br>
(color: $dcolor)[I ](color: $ambient)[//huff//] (color: $dcolor)[completely understand!]
<br><br>
Dr. (print: $doctor) continues to thrust faster, ever faster.
]
(show:?finish2)
]
]
]
|clit)[
<br><br>
Dr. (print: $doctor)'s thumb begins slowly circling the swollen bead peering out from your clitoral hood. Coupled with the intensity of her thrusts, it's a truly unrivaled sensation. She plies your clit(if:$language<2)[oris] faster, ever faster; until, at the end of but a minute, she has worked it to a sizable protuberance. Your head swims as the doctor wreaks upon you one stimulus after another. This is bliss.
<br><br>
(color: $ambient)[//pant//] (color: $dcolor)[Satisifed yet, ](color: $ambient)[//huff//] (color: $dcolor)[(print: $name)?]
<br><br>
|selectClit2>[
(link: "Yes.")[
(replace:?selectClit2)[
(color: $pcolor)[Yes! Oh, //doctor!// Right there!]
<br><br>
In response, Dr. (print: $doctor) continues to thrust faster, ever faster.
]
(show:?finish2)
]<br>
(link: "Beg her for more.")[
(set: $vct to it + 1)
(set: $points to it + 1)
(replace:?selectClit2)[
(color: $pcolor)[No! //No!// //Please// give me more, doctor!]
<br><br>
(color: $dcolor)[That's what I like to hear.]
]
(show:?clit2)
(show:?finish2)
]
]
]
|clit2)[
<br><br>
Electricity suddenly surges through your belly and you don't need to glance down to realize its source. Dr. (print: $doctor) has pinched your clitoris between two fingers; she's squeezing and twisting it; pulling your most delicate feminine component out and away from its usual resting place.
<br><br>
(color: $pcolor)[//AaAaa AAaAahHh hhhH h!//]
<br><br>
The agony is unfathomable; the pleasure unmatched. You've never experienced such a blend of distress and delight. And all the while, the doctor's tool continues its relentless forward march and subsequent retreat.
<br><br>
]
|finish2)[
For nearly ten minutes straight, she hammers your insides like a carpenter behind schedule. At length,
(if: ($clothing is "none") and ($futa is true))[
the intensity of the doctor's motion crescendoes. Her breath comes in stertorous gasps, between which can be heard short grunts of pleasure.
<br><br>
(if: $language>1)[
(color: $dcolor)[//C-cumming//...]
](else:)[
(color: $dcolor)[(print: $name), I'm...]
]
<br><br>
Lunging forward one final time, the doctor clutches you to her breast as though to prevent your escape. She noises her content in your ear as you begin to feel
(if: $condom is true)[
the condom balloon inside you, swelling with the weight of her (if: $langauge>1)[cum](else:)[ejaculate].
](else:)[
her (if: $langauge>1)[hot cum](else:)[warm ejaculate] billowing out inside you, swelling your womb and pattering wetly onto the linoleum.
]
When the doctor is finally finished, she steps back.
](else:)[
however, the doctor's breathing becomes stertorous; her pace wanes incrementally before, finally, she withdraws from you. Her disappointment is evident in the methodical manner by which she retires her apparatus(if: $clothing is not "none")[, pulling her skirt back into position as she does so].
]
Her respiration labored, Dr. (print: $doctor) regards you with something akin to embarrassment.
<br><br>
(color: $dcolor)[Apologies, (print: $name). Few ](color: $ambient)[//huff//] (color: $dcolor)[few patients outmatch my stamina, but it seems this exercise has been for naught.
(if: ($clothing is "none") and ($futa is true) and ($condom is false))[
As promised, I'll dispense a contraceptive before we finish today.
]
]
<br><br>
|select2>[
(if: $futaOrgasm is true)[
(set: $tempFutaOrgasm to true)
]
(if: ($f_anal_passage_visited is true) and ($futa is true) and ($clothing is "none"))[
(set: $tempAnalOrgasm to true)
]
(if: ($tempFutaOrgasm is true) or ($tempAnalOrgasm is true))[
(link: "Ask about her orgasm.")[
(replace:?select2)[
(if: $orgasmQuestion is false)[
(color: $pcolor)[Did... Didn't you //just// climax, doctor?]
](else:)[
(if: $virgin is true)[
(color: $pcolor)[Gracious... You're so... //Virile//, doctor!]
](else:)[
(color: $pcolor)[Again, doctor? I've never met anyone so... //Virile!//]
]
]
]
(if: $orgasmQuestion is false)[
(show:?climaxExtra)
](else:)[
(show:?climax2)
]
(set: $orgasmQuestion to true)
(show:?nextAssessment)
]
]
(link: "Offer condolences.")[
(replace:?select2)[
(color: $pcolor)[For what it's worth, I rather enjoyed your efforts.]
<br><br>
(color: $dcolor)[You're too kind, really. ]
]
(show:?nextAssessment)
]<br>
(link: "Shrug.")[
(replace:?select2)[
Restrained as you are, you do your best to shrug.
<br><br>
(color: $dcolor)[I agree: it was worth a shot. ]
]
(show:?nextAssessment)
]
]
]
|climaxExtra)[
<br><br>
(color: $dcolor)[Hm? What //are// you on about?]
<br><br>
(if: $futaOrgasm is true)[
(color: $pcolor)[Before—in your office—when we were... //Intimate// together.]
](else:)[
(color: $pcolor)[Just now... You
(if: $language>2)[
blew your load
](else-if: $language>1)[
came
](else:)[
finished
]
in my
(if: $language>1)[
ass.
](else:)[
posterior.
]
]
]
<br><br>
(if: $docInspected is true)[
(color: $dcolor)[Heavens, didn't I mention my output earlier? I thought, by now, you would not find this quality surprising.]
<br><br>
The doctor winks slyly as her lips curl into a mischievous grin.
<br><br>
](else:)[
(color: $dcolor)[Although I cannot claim to have ever fully measured my output, I should think myself capable of producing a liter of the stuff. Maybe even two—assuming I were to commit myself to no enterprise other than masturbation.]
<br><br>
You can't help but gawk in response. The doctor blushes, giggles coquettishly, and bats her eyelashes.
<br><br>
]
]
|climax2)[
<br><br>
(color: $dcolor)[Still surprised, eh? I suppose that's natural. Sometimes I forget the average male only produces five milliliters per emission. ]
]
|nextAssessment)[
(color: $dcolor)[Anyway... What's next, hm?]
(set: $vag to false)
(display: "assess complete")
]
}{
(set: $f_anal_passage_visited to true)
(color: $pcolor)[What if we //ass//-ess this posterior, eh?]
<br><br>
Dr. (print: $doctor) stares at you, and it's not immediately clear whether she's stifling a laugh or trying to keep from losing her lunch. A few moments later, one corner of her mouth curls into a grin.
<br><br>
(if: $points >= $points_min)[
(color: $dcolor)[So, you want an //anal//-ysis, eh, (print: $name)?]
](else:)[
(color: $dcolor)[Don't quit your day-job, (print: $name).]
]
<br><br>
Over the course of several minutes, the doctor carries out a number of ablutions to prepare you for the assessment. When finished, she kneels at the foot of the lithotomy table, just out of view. The distinct squelch of oil on skin can be heard.
<br><br>
(color: $dcolor)[This is one of my favorite orifices. So delicate, and yet so...]
<br><br>
Without warning, a mysterious, supple device parts your anus. It is Dr. (print: $doctor)'s finger; well-lubricated as it seems to be, she glides into you up to the knuckle without resistance.
<br><br>
(color: $dcolor)[...//Eager//.]
<br><br>
|select1>[
(link: "Ask her for more.")[
(set: $points to it + 1)
(replace:?select1)[
(color: $pcolor)[Oh, doctor; don't tease a poor girl like that.]
]
(show:?analingus)
]<br>
(link: "Tell her to get on with it.")[
(replace:?select1)[
(color: $pcolor)[Doc, you're killing me here! Quit with the //fiddling// and get to the //diddling!//]
<br><br>
(color: $dcolor)[What's the hurry? I was only... Oh, fine. We'll move along.]
<br><br>
She stands there a moment, something like longing in her eyes.
(show:?futaOrStrapon)
]
]
]
|analingus)[
<br><br>
(color: $dcolor)[Terribly sorry, (print: $name). Where //are// my manners?]
<br><br>
Suddenly, the finger retreats from you, instantly replaced by something warm and moist. It only takes the work of a moment to identify the doctor's tongue through sensation alone. It probes deep, deeper... The depths this woman begins to plumb are unfathomable. With an idle hand, she (if: $language>2)[fingers](else:)[bores into] your (if: $language>1)[pussy](else:)[vagina]; with the other, she expertly (if: $language>2)[flicks](else:)[caresses] your (if: $language>1)[clit](else:)[clitoris]. At length, a loud sucking noise heralds Dr. (print: $doctor)'s withdrawal from your bowels.
<br><br>
(color: $dcolor)[That was a lovely bit of fun, but I think we'd better move along.]
<br><br>
She stands, beaming down at you.
(show:?futaOrStrapon)
]
|futaOrStrapon)[
(if: ($clothing is "none") and ($futa is true))[
Her nude figure truly //is// something to behold.
(if: $vag_passage_visited is true)[
(show:?futapenis)
](else:)[
(show:?futapenisNew)
]
](else:)[
(if: $clothing is "none")[
Her nude figure truly //is// something to behold.
](else-if: $clothing is "sexy")[
Her micro-skirt rides up and her (if: $language>2)[slit](else-if: $language>1)[pussy](else:)[vulva] becomes momentarily visible.
](else-if: $clothing is "half")[
Her breasts sway idly, pleasantly.
]
(if: $vag_passage_visited is true)[
(show:?strapon)
](else:)[
(show:?straponNew)
]
]
]
|futapenis)[
(color: $dcolor)[Might I assume that I may once again employ my own //personal// instrument for this assessment?]
<br><br>
|fpselect1>[
(link: "Reaffirm.")[
(replace:?fpselect1)[
(color: $pcolor)[Yes, that would be lovely.]
<br><br>
]
(show:?futaStart)
]<br>
(link: "Impatiently reaffirm.")[
(replace:?fpselect1)[
(color: $pcolor)[Yes, yes! Get on with it, doc!]
<br><br>
(color: $dcolor)[Oh ho! Eager indeed; well, I'd hate to disappoint...]
<br><br>
(show:?futaStart)
]
]
]
]
|futapenisNew)[
<br><br>
(color: $dcolor)[I assume you won't balk if I perform your assessment with my own //personal// instrument?]
<br><br>
|fpselect2>[
(link: "Tell her you don't mind.")[
(replace:?fpselect2)[
(color: $pcolor)[Go right ahead; I don't mind one bit.]
<br><br>
(color: $dcolor)[Excellent! Fret not, I'll be gentle... At first.]
<br><br>
]
(show:?futaStart)
(show:?anal0)
]<br>
(link: "Declare that you will accept no substitute.")[
(set: $points to it + 2)
(replace:?fpselect2)[
(color: $pcolor)[I would be offended if you employed anything lesser.]
<br><br>
(color: $dcolor)[Oh, you //are// a smooth on, aren't you?]
<br><br>
]
(show:?futaStart)
(show:?anal0)
]
]
]
|strapon)[
(color: $dcolor)[Same instrument as the first penetration, (print: $name)?]
<br><br>
|select1>[
(link: "Agree: use the (print: $strapon) one.")[
(replace:?select1)[
(color: $pcolor)[Yes, that one suits me well.]
<br><br>
(color: $dcolor)[Indubitably!]
(show:?apparatus)
(show:?anal0)
]
]<br>
(link: "Choose a different instrument.")[
(replace:?select1)[
(color: $pcolor)[Actually, I should like to choose again.]
<br><br>
(color: $dcolor)[Very well. ]
(display: "choose strapon")
]
]
]
]
|straponNew)[
Dr. (print: $doctor)'s hand ranges over the paraphernalia arranged beside the table.
<br><br>
(display: "choose strapon")
]
|apparatus)[
<br><br>
The doctor girds on the chosen instrument before inundating both it and your exposed posterior with a deluge of of sweet-scented lubricant.
]
|futaStart)[
The doctor moans sensuously, slathering both her erection and your exposed posterior with a deluge of of sweet-scented lubricant.
]
|anal0)[
<br><br>
(color: $dcolor)[We'll start slow, eh?]
<br><br>
|sel2>[
(link: "Agree.")[
(replace:?sel2)[
(color: $pcolor)[Sounds delightful, doctor.]
]
(show:?anal1)
]
(if: $strapon is not "modest")[<br>
(link: "Tell her to do her worst.")[
(set: $points to it + 1)
(set: $depth to 3)
(replace:?sel2)[
(color: $pcolor)[Actually, doctor, I was thinking you could give it to me rough and fast. I can take it... Really.]
<br><br>
It is evident from the doctor's expression that she was not expecting your response.
<br><br>
(color: $dcolor)[I, erm... Are you certain? There's great potential for—]
<br><br>
Dr. (print: $doctor) shuts her mouth forcibly before a look of giddiness overwhelms her countenance.
<br><br>
(color: $dcolor)[Oh, but what am I saying! What sort of medical professional would I be to ignore the pleas of those in my care?]
]
(show:?analRam)
(show:?finish)
]
]
]
]
|anal1)[
<br><br>
Dr. (print: $doctor) aligns the tip of her (if: $clothing is not "none")[artificial ]phallus with your defenseless anus. Cooing under her breath, she takes your upraised thighs in her hands and begins to push.
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
<br><br>
(color: $pcolor)[//Ahn!//]
<br><br>
She glides a short ways into you; the sensation is heavenly.
](else:)[
<br><br>
(color: $pcolor)[//Aah!//]
<br><br>
You feel (if:$language>2)[your asshole](else:)[the space between your buttocks] opening wide, stretching to the limit to welcome its new guest.
]
<br><br>
(color: $dcolor)[There we are; about four inches in. I'm stimulating the entirety of your rectum. Feels //wonder//-ful, doesn't it?]
<br><br>
|sel3>[
(link: "Agree.")[
(set: $depth to 1)
(replace:?sel3)[
(color: $pcolor)[Yes, doctor; that's quite nice!]
]
(show:?analRectumOnly)
(show:?finish)
]<br>
(link: "Ask her to push deeper.")[
(set: $points to it + 1)
(set: $depth to 2)
(replace:?sel3)[
(color: $pcolor)[It does, but... Couldn't you probe a bit //deeper//, Dr. (print: $doctor)?]
]
(show:?analPushDeeper)
(show:?finish)
]
]
]
|analRectumOnly)[
<br><br>
(color: $dcolor)[
(if: ($clothing is "none") and ($futa is true))[
Mm, and I assure you: you feel just as incredible wrapped around (if:$language>1)[my cock](else:)[me].
](else:)[
Mm, this is one of my //favorite// exercises.
]
Why don't we try moving just a tad?
]
]
|analPushDeeper)[
<br><br>
The doctor sucks air through her teeth before emitting a sigh of delight.
<br><br>
(color: $dcolor)[You really //are// one of the most entertaining patients I've ever tended to, my dear.]
<br><br>
She begins; gingerly, ever so slowly, the doctor advances into your colon.
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
Only an inch or two thereafter, her inguinal muscles come to rest against your naked bottom.
](else:)[
Pressure begins to build as she travels up the narrow canal of your intestinal tract.
(if: ($strapon is "massive") or ($dcock is "positively elephantine"))[
Even at the height of your descending colon, her progression does not cease.
](else:)[
At the height of your descending colon, her progression finally comes to a halt.
]
The satisfaction garnered from the burial of Dr. (print: $doctor)'s implement deep within you outweighs the intensity of discomfort welling inside your belly—if only just.
]
]
|analRam)[
<br><br>
Dr. (print: $doctor) aligns the tip of her (if: $clothing is not "none")[artificial ]phallus with your defenseless anus. Cooing under her breath, she takes your upraised thighs in her hands and, in a single swift motion, thrusts into you up to the hilt.
<br><br>
(color: $pcolor)[
(if: $language>2)[
//Holy fuck!//
](else:)[
//Aah!//
]
]
<br><br>
Glancing down, a worrisome protuberance has formed just
(if: ($strapon is "massive") or ($dcock is "positively elephantine"))[
above
](else:)[
below
]
your navel. Accompanying it, a sensation of nausea and immense pressure intermingled with unbridled pleasure.
<br><br>
(color: $dcolor)[Would you look at //that!// You took it all at once, (print: $name); your (if:$language>1)[ass](else:)[body] must be //inordinately// avaricious to induct me so readily!]
]
|finish)[
<br><br>
The doctor impels her hips into motion—starting slow, but quickly building rhythm.
(if: $depth is 1)[
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
Her shape feels almost tailor-made for your posterior; she glides in and out of you effortlessly. A pleasant twitch begins pulsing somewhere in your groin, radiating euphoria which ripples through you.
](else:)[
Although well-lubricated, the (if: ($clothing is "none") and ($futa is true))[(if:$language>1)[cock](else:)[penis]](else:)[apparatus] seems to pull vigorously at your rectum, threatening a prolapse with every reversal.
]
](else:)[
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
She's slipping in and out of your sigmoid colon, penetrating and then relieving it—driving you wild with the ebb and flow of her movements.
](else:)[
The entire column of your colon seems to shift in time with her thrusts. Although alarming at first, you rapidly detect the sheer ecstasy radiating out from your groin as the doctor repeatedly impales you.
]
]
<br><br>
(if: ($clothing is "none") and ($futa is true))[
(color: $dcolor)[Oh, //(print: $name)!// I'm... //Ah!// I'm going to
(if:$language>2)[fill your guts to the brim!](else-if:$language>1)[cum!](else:)[finish inside you!] //Mmph!//]
<br><br>
Dr. (print: $doctor) thrusts into you one final time,
(if: $depth > 2)[
pushing so deep that your stomach rumbles in protest,
](else:)[
stopping just as her frontal glans enters your sigmoid colon,
]
and begins pumping you full(if:$language>2)[ of her hot, sticky cum](else-if:$language>1)[ of her boiling cum]. Your insides begin to swell with unimagineable pressure; it is definitely a thrilling—disquieting—sensation. However, even before the doctor has completed her load, it becomes evident that she'll be the only one experiencing climax.
](else:)[
(color: $dcolor)[That's it, //(print: $name)!// You like that, don't you? Go on; prove how much you love this;
(if:$language>2)[squirt for me!](else-if:$language>1)[cum for me!](else:)[let's put an end to this condition of yours!]]
<br><br>
Dr. (print: $doctor) is thrusting and thrusting, and it //does// feel incredible... At length, sensing something amiss, the doctor permits her vigor to wane.
]
<br><br>
(color: $dcolor)[It's no good, eh?]
<br><br>
|sel4>[
(if: $futaOrgasm is true)[
(set: $tempFutaOrgasm to true)
]
(if: ($vag_passage_visited is true) and ($futa is true) and ($clothing is "none"))[
(set: $tempVagOrgasm to true)
]
(if: ($tempFutaOrgasm is true) or ($tempVagOrgasm is true))[
(link: "Ask about her orgasm.")[
(replace:?sel4)[
(if: $orgasmQuestion is false)[
(color: $pcolor)[Did... Didn't you //just// climax, doctor?]
](else:)[
(if: $virgin is true)[
(color: $pcolor)[Gracious... You're so... //Virile//, doctor!]
](else:)[
(color: $pcolor)[Again, doctor? I've never met anyone so... //Virile!//]
]
]
]
(if: $orgasmQuestion is false)[
(show:?climaxExtra)
](else:)[
(show:?climax2)
]
(set: $orgasmQuestion to true)
(show:?nextAssessment)
]<br>
]
(link: "Express satisfaction.")[
(replace:?sel4)[
(color: $pcolor)[Well, it //was// a delightful experience...]
<br><br>
(color: $dcolor)[But no fortune in the department of orgasm, I see. Pity. ]
]
(show:?nextAssessment)
]<br>
(link: "Smile wanly.")[
(replace:?sel4)[
Though the doctor's disappointment is evident, yours is, perhaps, more salient. You fashion your lips into a weak smile, which the woman standing over you returns in kind.
<br><br>
]
(show:?nextAssessment)
]
]
]
|climaxExtra)[
<br><br>
(color: $dcolor)[Hm? What //are// you on about?]
<br><br>
(if: $futaOrgasm is true)[
(color: $pcolor)[Before—in your office—when we were... //Intimate// together.]
](else:)[
(color: $pcolor)[Just now... You
(if: $language>2)[
blew your load
](else-if: $language>1)[
came
](else:)[
finished
]
in my
(if: $language>1)[
ass.
](else:)[
posterior.
]
]
]
<br><br>
(if: $docInspected is true)[
(color: $dcolor)[Heavens, didn't I mention my output earlier? I thought, by now, you would not find this quality surprising.]
<br><br>
The doctor winks slyly as her lips curl into a mischievous grin.
<br><br>
](else:)[
(color: $dcolor)[Although I cannot claim to have ever fully measured my output, I should think myself capable of producing a liter of the stuff. Maybe even two—assuming I were to commit myself to no enterprise other than masturbation.]
<br><br>
You can't help but gawk in response. The doctor blushes, giggles coquettishly, and bats her eyelashes.
<br><br>
]
]
|climax2)[
<br><br>
(color: $dcolor)[Still surprised, eh? I suppose that's natural. Sometimes I forget the average male only produces five milliliters per emission. ]
]
|nextAssessment)[
(color: $dcolor)[Hm, what's left on our checklist?]
(set: $anal to false)
(display: "assess complete")
]
}{
(set: $dOrgasm to it + 1)
(color: $pcolor)[Perhaps we could get to the meat-and-potatoes of this evaluation.]
<br><br>
Dr. (print: $doctor) emits a brief chortle while rolling her eyes.
<br><br>
(if: (history:) contains "oral (male)")[
(color: $dcolor)[Sucking it wasn't enough, eh, (print: $name)?]
](else:)[
(color: $dcolor)[I think that's //quite// enough of that.]
]
<br><br>
She devours your shaft with her gaze,
(if: $clothing is not "none")[
hiking the hem of her skirt up over her hips and baring her gorgeous womanhood.
](else:)[
(if: $futa is true)[
then rests her manhood atop yours.
(if: $dcock is "moderately-sized")[
Encircling both your (if: $language>1)[cock](else:)[penis] and hers with the fingers on one hand, she begins to stroke.
](else-if: $dcock is "positively elephantine")[
She's enormous, absolutely eclipsing your (if: $language>1)[cock](else:)[penis] beneath her own. Encircling your members with both hands; she begins to stroke.
](else:)[
Encircling both your (if: $language>1)[cock](else:)[penis] and hers, just barely, with the fingers on one hand, she begins to stroke.
]
](else:)[
none-too-subtly massaging her own clitoris.
]
]
<br><br>
(color: $dcolor)[You know, there is simply no better tool with which to gauge the sensitivity of a male's genitals than those of the opposite sex.]
<br><br>
|select1>[
(link: "Ask her to elaborate.")[
(replace:?select1)[
(color: $pcolor)[I'm afraid I don't quite follow, doctor. You don't mean to say...]
<br><br>
(color: $dcolor)[Oh, I mean to say, alright. Your (if:$language>1)[cock](else:)[plug]; my (if:$language>1)[pussy](else:)[socket]. Let's get going.]
]
(show:?result1)
]<br>
(link: "Ask about protection.")[
(replace:?select1)[
(color: $pcolor)[While that //does// sound inviting, doctor, I neglected to pack a rubber for myself. Have you got one I can borrow?]
<br><br>
(color: $dcolor)[Forget the condom, (print: $name); today is your lucky day. You get to have me //sans// protection.]
]
(show:?result1)
]
]
|result1)[
<br><br>
Dr. (print: $doctor)
(if: ($clothing is "none") and ($futa is true))[
relinquishes her grip and pushes her male genitals aside—revealing her gorgeous, bare womanhood. Seizing your glans, she
](else:)[
steps up to the lithotomy table and
]
presses her vulva against you. The doctor bobs up and down, forcing you against her clit(if:$language<2)[oris] as you glide between her labial folds. There are entire //rivers// that are drier than this woman's genitals.
<br><br>
(color: $dcolor)[//Mmph//, I know we're here for you, but... Don't make a lady wait any longer. How do you want me?]
<br><br>
|select2>[
(link: "Her on top.")[
(set:$doc_pos to "top")
(replace:?select2)[
(color: $pcolor)[I want you on top of me, doctor.]
<br><br>
(color: $dcolor)[//Hm//, yes; of course!]
]
(show:?docOnTop)
(show:?desc1)
(show:?balls1)
]<br>
(link: "Reverse-cowgirl.")[
(set:$doc_pos to "cowgirl")
(replace:?select2)[
(color: $pcolor)[How about reverse-cowgirl?]
<br><br>
(color: $dcolor)[//Heh//, kinky. Let's do it!]
]
(show:?reverseCowgirl)
(show:?desc1)
(show:?balls1)
]
]
]
|docOnTop)[
<br><br>
The doctor ceases her undulation and climbs onto the lithotomy table, her
(if: ($clothing is "none") or ($clothing is "half"))[
(if: $bust is "modest")[
modest chest swaying
](else-if: $bust is "enormous")[
immense chest smothering you
](else:)[
supple breasts swaying and occasionally brushing against you
]
](else-if: $clothing is "sexy")[
(if: $bust is "modest")[
cleavage oscillating winsomely
](else-if: $bust is "enormous")[
monumental chest nearly escaping her low-cut shirt
](else:)[
breasts threatening to escape her low-cut shirt
]
](else:)[
hips swaying in wide arcs
]
as she takes position.
(if: ($clothing is "none") and ($futa is true))[
Her (if:$language>1)[dick](else:)[penis] grazes your own, then slips delicately up your belly before she
](else:)[
With one hand, she
]
expertly guides your glans into her.
]
|reverseCowgirl)[
<br><br>
She ceases her undulation and turns her backside to you, her naked buttocks
(if: $clothing is "none")[
jostling invitingly
(if: $futa is true)[; her tackle now just out of view].
](else:)[
peering out invitingly from under the hem of her skirt.] With one hand, she expertly guides your glans into her.
]
|desc1)[
<br><br>
(color: $dcolor)[Just lie still and—]
<br><br>
Dr. (print: $doctor) lets her weight down and you sink into her like a thirty-ton anchor to the open sea. The head of your shaft slams home against something.
<br><br>
(color: $pcolor)[//Ah!//]
<br>
(color: $dcolor)[//Ah!//]
<br><br>
A shudder runs through the doctor and, apparently unconscious of her actions, she begins gyrating her hips—grinding against your pelvis while emitting low squeals like a (if: $language>1)[bitch](else:)[beast] in heat.
<br><br>
(if: $virgin is false)[
(color: $dcolor)[//Mmph!// Forgive me if I seem too... //Enthusiastic.// I haven't (if: $language>2)[been fucked](else:)[engaged in coitus] since this morning.]
](else:)[
(color: $dcolor)[//Mmph!// And, just like that, you are a virgin no longer, (print: $name)!]
]
<br><br>
A hand goes to her midsection, where it begins to caress the
(if: ($body is "curvy") or ($body is "chubby") or ($body is "large"))[
plump
](else-if: $body is "well-built")[
muscular
](else:)[
smooth
]
flesh of her stomach.
<br><br>
(color: $dcolor)[
(if: $name is "Needledick")[//Needledick//, eh? I suppose you selected that name out of jest? ]
//Mm//, it's so //filling//, so... //Oh//, how it fits me like a glove!
]
<br><br>
Dr. (print: $doctor) raises her hips, almost permitting your member to quit her warmth, then forcefully strikes downward again.
(if: ($clothing is "none") and ($futa is true))[
Her testes slap loudly; she gasps coquettishly.
](else:)[
She's pouring every iota of energy into each fresh rebound.
]
]
|balls1)[
Suddenly, by some miracle of acrobatic balance, one of the doctor's hands finds its way to your scrotum. Despite this auxiliary action, at no point do her hips cease their indefatigable ricocheting.
<br><br>
(color: $dcolor)[(upperfirst: $name), (if: $points >= $points_min)[my darling, ]tell me: would you like me to examine //these// while you
(if: $language>2)[
fuck my tight pussy?
](else-if: $langauge>1)[
fuck me?
](else:)[
drill into me?
]
]
<br><br>
Your testes seem to pulsate within her grasp.
<br><br>
|select3>[
(link: "Ask that she be delicate.")[
(set: $balls to true)
(set: $points to it + 1)
(set: $cbt to it + 1)
(replace:?select3)[
(color: $pcolor)[Yes, doctor... I think that would be just the ticket. But, erm, please... Be gentle with them?]
<br><br>
(color: $dcolor)[Naturally!]
]
(show:?balls2)
]<br>
(link: "Tell her not to hold back.")[
(set: $balls to true)
(set: $points to it + 3)
(set: $cbt to it + 4)
(replace:?select3)[
(color: $pcolor)[Oh,
(if: $doctor is "Oh")[
Doctor, erm... //Oh!//
](else:)[
Doctor (print: $doctor)!
]
What a //splendid// idea! Don't show them any mercy; I can take it!]
<br><br>
(color: $dcolor)[Your wish is my desire.]
]
(show:?balls4)
(show:?desc2)
]
(link: "Decline.")[
(set: $balls to false)
(replace:?select3)[
(color: $pcolor)[Erm, that's alright, doctor. Your current course of action shall suffice, I think.]
<br><br>
(color: $dcolor)[As you ](color: $ambient)[//unf//] (color: $dcolor)[wish, (print: $name).]
]
(show:?desc2)
]
]
]
|balls2)[
<br><br>
Dr. (print: $doctor) first cups, then begins tenderly kneading your (if: $language>2)[nuts](else-if: $language>1)[balls](else:)[testicles]. Coupled with the continued action of her flank burying, releasing, re-burying your manhood; it's a heavenly sensation.
<br><br>
(color: $dcolor)[How is that?]
<br><br>
|select4>[
(link: "Express satisfaction.")[
(replace:?select4)[
(color: $pcolor)[//Ah!// That is a truly //delightful// feeling, doctor! Please, don't stop!]
]
(show:?desc2)
]<br>
(link: "Ask for more.")[
(set: $points to it + 1)
(set: $cbt to it + 1)
(replace:?select4)[
(color: $pcolor)[Oh, doctor! It feels incredible, but... Perhaps you might be just a //tad// rougher with them?]
<br><br>
(color: $dcolor)[Mm, how I love to hear those words!]
]
(show:?balls3)
]
]
]
|balls3)[
<br><br>
The massage blends to a more forceful manipulation of your testes. A powerful surge of electricity courses through your midsection—discomfort intermingled with bliss—as the doctor continues her inexorable effort to bring you off.
<br><br>
(color: $dcolor)[Satisfied yet, (print: $name)?]
<br><br>
|select5>[
(link: "Indicate that you are.")[
(replace:?select5)[
(color: $pcolor)[Oh, //yes!// That's just right. It feels //wonderful//, doctor!]
]
<br><br>
(color: $dcolor)[Th-then let us not tarry a moment longer!]
(show:?desc2)
]<br>
(link: "Beg her for more.")[
(set: $points to it + 1)
(set: $cbt to it + 1)
(replace:?select5)[
(color: $pcolor)[Doctor, I beg you... D-Don't hold back any longer! Do your worst!]
<br><br>
(color: $dcolor)[My, what an entertaining patient you are! If only all my examinations were so... //Diverting//.]
]
(show:?balls4)
(show:?desc2)
]
]
]
|balls4)[
<br><br>
(if: $cbt>=4)[
The doctor employs immediate and unforgiving force—enough to turn you falsetto.
](else:)[
Where before there was discomfort, agony now preponderates.
]
Your vision recedes; the world fades to almost a pinprick; it's as though a vice has encircled you down there. Dr. (print: $doctor) is saying something, but it's impossible to make out; her voice is distant.
<br><br>
(color: $pcolor)[Y-Y//ee e//e es //ss s// ss..!]
<br><br>
It isn't your choice to speak but, regardless, the word spills from your lips like water from a carafe.
<br><br>
(color: $dcolor)[Oh, dear. I haven't broken you, have I, (print: $name)? Perhaps we had better conclude this portion of the session...]
]
|desc2)[
<br><br>
Impossible though it seems at first, given her already-considerable momentum, the doctor's pace quickens. Beads of sweat glisten
(if: $clothing is "none")[
on Dr. (print: $doctor)'s skin
](else-if: $clothing is "half")[
on Dr. (print: $doctor)'s bare chest
](else-if: $clothing is "sexy")[
in the cleft of Dr. (print: $doctor)'s bosom
](else:)[
on Dr. (print: $doctor)'s brow
]
and fly off in every direction.
Her (if: ($body is "well-built") or ($body is "curvy") or ($body is "wide-set") or ($body is "chubby") or ($body is "large"))[heavy ]buttocks slam against you as though she means to atomize your very bones. You want to finish inside her. //Need// to finish inside her.
<br><br>
This is it:
(if: $age is "a young")[
almost two years
](else-if: $age is "an adult")[
after years
](else-if: $age is "a middle-aged")[
after several years
](else:)[
after decades
]
of impotency, this saintly woman is finally going to
(if: $balls is true)[
force an orgasm from your very (if:$language>2)[nut-sack](else:)[testicles]!
](else:)[
(if: $language>1)[fuck](else:)[force] a climax out of you through sheer willpower!
]
At the height of her fervor, the doctor hurls herself against you one final time. She begins convulsing; her lips quiver and her eyes screw themselves shut. Dr. (print: $doctor) holds this pose for almost a full minute, howling like a maniac all the while, before slumping
(if: $doc_pos is "cowgirl")[
backward against your torso, content;
](else:)[
forward against your torso, exhausted;
]
your throbbing manhood still buried in her. It seems a long time before either of you say anything.
<br><br>
(color: $dcolor)[//Mmph//... What a //man// you are! That was the best sex I've had in.... Well, I can only //imagine// what you're like unrestrained!]
(show:?finish)
]
|finish)[
<br><br>
|select6>[
(link: "Say nothing.")[
(replace:?select6)[
Electing to keep your thoughts to yourself, you stare blankly at the ceiling tiles overhead, wondering if Dr. (print: $doctor) has yet realized your predicament.
]
(show:?quiet)
(show:?finish2)
]<br>
(link: "Clear your throat.")[
(replace:?select6)[
Lips pursed, you clear your throat; otherwise remaining silent.
]
(show:?quiet)
(show:?finish2)
]<br>
(link: "Express gratitude for her compliment.")[
(replace:?select6)[
(color: $pcolor)[//Heh//, that's really very kind of you, doctor. You flatter me.]
]
(show:?flatter)
(show:?finish2)
]
]
|quiet)[
<br><br>
(color: $dcolor)[Hm? What's wrong? Men aren't usually so pensive after such delayed...]
]
|flatter)[
<br><br>
(color: $dcolor)[Oh, but I mean it, truly! I've serviced enough patients to know an otherwise-virile man stung by the vicissitudes of fate. Now that you've been cured, perhaps we might...]
]
]
|finish2)[
<br><br>
She sits up, her expression suddenly overcome by a mixture of horror and embarrassment.
<br><br>
(color: $dcolor)[Oh. //Oh!// Dear Lord, I've... You didn't finish, did you? Cripes! I was too enrapt to notice!]
<br><br>
Dr. (print: $doctor) leaps off you, letting your penis withdraw from her with a wet murmur. She inspects you with chagrin, color mounting to her face.
<br><br>
(color: $dcolor)[Damn, you're right... Apologies for that. If it's any consolation, the only reason I failed to notice was that I genuinely //was// enjoying myself. But perhaps that's no consolation at all, given the circumstances.]
<br><br>
She lets out a protracted sigh of defeat,
(if: ($clothing is "none") or ($clothing is "half"))[
dabbing sweat from her
(if: ($clothing is "none") and ($futa is true))[
breast and pre-(if:$language>1)[cum](else:)[ejaculate] from her engorged glans.
](else:)[
breast.
]
](else:)[
tugging at the hem of her skirt.
]
(show:?nextAssessment)
]
|nextAssessment)[
<br><br>
(color: $dcolor)[Well, there's no sense dwelling on it. Onward and upward, as my old college professor used to say. What now?]
(set: $balls to false)
(set: $cock to false)
(display: "assess complete")
]
}{
(color: $pcolor)[(print: $response)]
<br><br>
(color: $dcolor)[Most excellent! My nascent suspicion suggests that you and I will get along famously. Won't you follow me into my office? We may commence the interview forthwith.]
<br><br>
The doctor beams and leads you into her study. She offers you a seat opposite her, a desk—hewn from rich Nordic Cherry—dividing the two of you.
<br><br>
(color: $dcolor)[Now, permit me to elucidate: to stem impotency, I have found a three-part procedure to be most effective. I am highly confident in my ninety-nine percent guarantee that, if treated today, you will walk away having not only experienced //an// orgasm, but one of the most //intense// orgasms of your adult life.]
<br><br>
(link: "Request details.")[
(show:?explain)
]
|explain)[
(color: $pcolor)[Sounds almost too good to be true! Can you explain the procedure?]
<br><br>
(color: $dcolor)[Of course! First, it will be necessary to restrain you—nothing sinister; merely a precaution to ensure your safety while I effect proceedings. Second, an assessment of your body: where you are, and are not, sensitive. You would be surprised how many patients leave my care having climaxed without requiring the full treatment!]
<br><br>
(link: "Request additional details.")[
(show:?dialogue1)
]
]
|dialogue1)[
(color: $pcolor)[And what exactly //is// the full treatment?]
<br><br>
(color: $dcolor)[Ha! Yes, well; it's an odd explanation to some; most don't realize the bladder is a latent erogenous zone.]
<br><br>
|select>[
(link: "Express interest")[
(replace:?select)[]
(set: $pc_response to "That's fascinating!")
(show:?dialogue4)
]<br>
(link: "Express confusion.")[
(replace:?select)[]
(show:?dialogue2)
]
]
]
|dialogue2)[
(color: $pcolor)[It is?]
<br><br>
(color: $dcolor)[Yes, of course! The more saturated an adult's bladder, the greater the pressure exerted upon internal sexual characteristics. With increased pressure comes—pun intended—amplified likelihood of orgasm.]
<br><br>
|sel2>[
(link: "Express interest.")[
(replace:?sel2)[]
(set: $pc_response to "That's fascinating!")
(show:?dialogue4)
]<br>
(link: "Express further confusion.")[
(replace:?sel2)[]
(show:?dialogue3)
]
]
]
|dialogue3)[
(color: $pcolor)[The bladder... What are you saying, doctor?]
<br><br>
(color: $dcolor)[It's quite simple: the more I fill your urinary bladder, the more it will push against your
(if: $gender is "female")[
clitoris
](else:)[
prostate
]
from within. Such increased pressure brings with it improved capacity for orgasm.]
<br><br>
|select3>[
(link: "Express interest.")[
(replace:?select3)[]
(set: $pc_response to "Fascinating!")
(show:?dialogue4)
]<br>
(link: "Voice concerns regarding safety.")[
(set: $pc_response to "How... Fascinating.")
(replace:?select3)[
(color: $pcolor)[I'm not so sure I like the sound of that... Is it even //safe// to purposely inflate the bladder?]
<br><br>
(color: $dcolor)[Oh, come now—//ha!// There I go again—there isn't the slightest danger! Expansion is what the urinary bladder was //designed// for. It really is //quite// an amazing organ!]
<br><br>
]
(show:?dialogue4)
]
]
]
|dialogue4)[
(color: $pcolor)[(print: $pc_response)]
<br><br>
(color: $dcolor)[Isn't it? I've studied the body's many erogenous zones at length, and always find myself coming—//ha!// I simply cannot help myself today!—back to the amazing urinary bladder.]
<br><br>
Dr. (print: $doctor) withdraws a thin stack of papers from a desk drawer.
<br><br>
(color: $dcolor)[Let's see... Ah! I shall require you to fill out these additional forms before we may begin.]
<br><br>
(link: "Review the forms.")[
(goto: "restraint")
]
]
}{
(color: $pcolor)[Apologies, ma'am; had I understood this requirement before setting foot in this clinic, I would have saved us both the trouble and stayed home.]
<br><br>
Both eyebrows climb to the heights of the doctor's forehead. She brushes an imagined wrinkle from her sleeve and clears her throat.
<br><br>
(color: $dcolor)[Yes. Well. Permit me to dispense my own apology: had I known it would be a sticking point, I would have warned you more readily.]
<br><br>
Standing, she offers her hand in the common gesture of salutation. Shaking, turning, leaving; you return home via the same route which bore you to the clinic in the first place. The remainder of the wasted afternoon stretches before you like an endless sea.
<br><br>
You spend days, months questing for some new avenue by which your impotency may be cured, but the only source of treatment seems to be a return to the clinic. Dejected, but confident your decision was the right one, you devote your time to more civilized matters: your career, your hobbies; the things that bring you happiness.
<br><br>
(link: "Go on living.")[
(goto: "fin")
]
}{
You are (print:$age) (print:$gender_temp), unfortunately afflicted with an inability to climax. It has been
(if: $age is "a young")[
almost two years;
](else-if: $age is "an adult")[
years;
](else-if: $age is "a middle-aged")[
several years;
](else:)[
a very long time;
]
no matter your efforts, orgasm seems just out of reach. Fortunately, you've heard tell of a certain clinic, not too distant from your home, operating under the maxim that "any sexual ailment can be cured, no matter the magnitude."
<br><br>
Desperate, you meet with the resident physician: a |body>[(cycling-link: bind $body,"slender","well-built","curvy","wide-set","chubby","large","tall")] woman by the name of Dr|Doctor>[...<br><br>]
|docChoice>[
(link: "Badcock")[
(set: $doctor to "Badcock")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Bush")[
(set: $doctor to "Bush")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Carnál")[
(set: $doctor to "Carnál")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Cummings")[
(set: $doctor to "Cummings")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Feelgood")[
(set: $doctor to "Feelgood")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Fox")[
(set: $doctor to "Fox")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Gräthed")[
(set: $doctor to "Gräthed")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Gyno")[
(set: $doctor to "Gyno")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Legs")[
(set: $doctor to "Legs")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Monalott")[
(set: $doctor to "Monalott")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Oh")[
(set: $doctor to "Oh")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Pearl")[
(set: $doctor to "Pearl")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Perverto")[
(set: $doctor to "Perverto")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Rubbers")[
(set: $doctor to "Rubbers")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Sexbomb")[
(set: $doctor to "Sexbomb")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Spitz")[
(set: $doctor to "Spitz")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Summers")[
(set: $doctor to "Summers")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Swallows")[
(set: $doctor to "Swallows")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Vong")[
(set: $doctor to "Vong")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
(link: "Wang")[
(set: $doctor to "Wang")
(replace:?Doctor)[. (print: $doctor). (display: "intro text cont")]
(replace:?body)[(print: $body)]
(replace:?docChoice)[]
]<br>
]
}{
She's middle-aged, handsome, and her |bust>[(cycling-link: bind $bust,"modest","large","very large","enormous")] bust is pleasing to the eye. Her soft voice immediately disarms any apprehensions you may have brought with you upon entering. As you engage with the mundanities of paperwork, Dr. (print: $doctor) begins to discuss the finer details with you:
<br><br>
(color: $dcolor)[Once you've filled out your basic information, a short interview will follow. My schedule permits me to begin today, if that is acceptable to you,
(if: $gender is "female")[
(if: $age is "a young")[
young miss
](else-if: $age is "an older")[
ma'am
](else:)[
miss
]
](else:)[
(if: $age is "a young")[
young master
](else-if: $age is "an older")[
my good fellow
](else:)[
sir
]
]
.]
<br><br>
(link: "Agree wholeheartedly.")[
(set: $response to "So long as it's no trouble, you'll hear no complaint from my quarter.")
(goto: "preamble")
]
}{
(color: $dcolor)[Let's get this one out of the way first: you will need to consent to being restrained for the duration of the treatment. Obviously, I will not keep you fettered in the event that you wish to immediately conclude the procedure. This form merely indicates your acknowledgement that you are to be restrained, and that I have made you aware of such.]
<br><br>
She slides a sheet headed "Consent to Medical Restraint" across the desk to you. The font is nearly illegible, it's so miniscule. At first glance, however, everything appears to be just as the doctor has said...
<br><br>
|dialogue1>[
(link: "Consent.")[
(set: $docResponse to "As you scratch your approval onto the form, the doctor seems relieved. She replaces the signed document in her desk drawer and continues the interview.")
(goto: "name")
]<br>
(link: "Do not consent.")[
(replace:?dialogue1)[Skimming the paperwork, a measure of doubt slips into your mind. You check off the option indicating you do not agree to be restrained. As you return it to the doctor's possession, her countenance takes on a look of concern.]
(show:?dialogue2)
]
]
|dialogue2)[
<br><br>
(color: $dcolor)[I... See. I believe I indicated that no malicious behavior will come of your agreement to inhibit bodily movement. This is a perfectly legitimate requirement; are you certain you won't reconsider?]
<br><br>
(link: "Reconsider. Agree to be restrained.")[
(set: $docResponse to "Thinking again, you decide it best to agree to the restraints—so long as the doctor can deliver on her promise of orgasm, it seems a worthwhile indulgence. She hands you a fresh copy of the form, which you sign.")
(goto: "name")
]<br>
(link: "Stand firm. You won't be restrained.")[
(set: $ending to "Impotent end.")
(goto: "bad end")
]
]
}{
(link: "Baby Cakes")[
(set: $name to "Baby Cakes")
(goto: "assess form")
]<br>
(link: "Bambi")[
(set: $name to "Bambi")
(goto: "assess form")
]<br>
(link: "Breeder")[
(set: $name to "Breeder")
(goto: "assess form")
]<br>
(link: "Cock Jock")[
(set: $name to "Cock Jock")
(goto: "assess form")
]<br>
(link: "Cowboy")[
(set: $name to "Cowboy")
(goto: "assess form")
]<br>
(link: "Daddy")[
(set: $name to "Daddy")
(goto: "assess form")
]<br>
(link: "Hot Stuff")[
(set: $name to "Hot Stuff")
(goto: "assess form")
]<br>
(link: "Lover Boy")[
(set: $name to "Lover Boy")
(goto: "assess form")
]<br>
(link: "Needledick")[
(set: $name to "Needledick")
(goto: "assess form")
]<br>
(link: "Papa Bear")[
(set: $name to "Papa Bear")
(goto: "assess form")
]<br>
(link: "Romeo")[
(set: $name to "Romeo")
(goto: "assess form")
]<br>
(link: "Sexy")[
(set: $name to "Sexy")
(goto: "assess form")
]<br>
(link: "Stud")[
(set: $name to "Stud")
(goto: "assess form")
]<br>
(link: "Woody")[
(set: $name to "Woody")
(goto: "assess form")
]<br>
(link: "Waive moniker selection.")[
(set: $name to "sir")
(goto: "assess form")
]
}{
(if: $futa is true)[
Upon reviewing your submission, the doctor's face is suddenly overcome with a giddy expression.
<br><br>
(color: $dcolor)[W-wow... This is... Well... //Unexpected//. Might I suggest the third selection on this next one? I promise you won't be disappointed.]
](else:)[
(color: $dcolor)[A~And that's the medical review phase dealt with. I do have another form for you to fill out, but I promise the results of this selection to be a shade... //Raunchier//.]
]
<br><br>
The doctor hands you another form, this one titled "Selection of Caregiver Habiliments." You stare at the print thereon, glancing back and forth between the paper and the woman who handed it to you.
<!--
Going to assign a variable, "clothing", to track what the doctor is wearing. In order of the respective options below, there's:
-Sexy
-Half
-None
-Full
-->
|clothes>[
<br><br>
(link: "Option 1: provocative.")[
(set: $clothing to "sexy")
(set: $points to it + 1)
(replace:?clothes)[(display: "clothes: sexy")]
]<br>
(link: "Option 2: topless.")[
(set: $clothing to "half")
(set: $points to it + 1)
(replace:?clothes)[(display: "clothes: half")]
]<br>
(link: "Option 3: none.")[
(set: $clothing to "none")
(set: $points to it + 1)
(if: $futa is true)[
(set: $points to it + 2)
(replace:?clothes)[(display: "clothes: none (futa)")]
](else:)[
(replace:?clothes)[(display: "clothes: none")]
]
]<br>
(link: "Option 4: waive habiliment selection.")[
(set: $clothing to "full")
(replace:?clothes)[(display: "clothes: full")]
]
]
}{
(link: "Bubble Butt")[
(set: $name to "Bubble Butt")
(goto: "assess form")
]<br>
(link: "Cookie")[
(set: $name to "Cookie")
(goto: "assess form")
]<br>
(link: "Cowgirl")[
(set: $name to "Cowgirl")
(goto: "assess form")
]<br>
(link: "Dolly")[
(set: $name to "Dolly")
(goto: "assess form")
]<br>
(link: "Duchess")[
(set: $name to "Duchess")
(goto: "assess form")
]<br>
(link: "Fuck Toy")[
(set: $name to "Fuck Toy")
(goto: "assess form")
]<br>
(link: "Kitty")[
(set: $name to "Kitty")
(goto: "assess form")
]<br>
(link: "Lolita")[
(set: $name to "Lolita")
(goto: "assess form")
]<br>
(link: "Mommy")[
(set: $name to "Mommy")
(goto: "assess form")
]<br>
(link: "Princess")[
(set: $name to "Princess")
(goto: "assess form")
]<br>
(link: "Sexy")[
(set: $name to "Sexy")
(goto: "assess form")
]<br>
(link: "Slut")[
(set: $name to "Slut")
(goto: "assess form")
]<br>
(link: "Sweetie")[
(set: $name to "Sweetie")
(goto: "assess form")
]<br>
(link: "Toots")[
(set: $name to "Toots")
(goto: "assess form")
]<br>
(link: "Waive moniker selection.")[
(set: $name to "miss")
(goto: "assess form")
]
}{
<!-- Run this section when the player has completed their assessment. -->
(if:
($anal is false) and
($balls is false) and
($breasts is false) and
(($gender is "female") or ($cock is false)) and
($oral is false) and
(($gender is "male") or ($vag is false)))[
<br><br>
(color: $pcolor)[Actually, that's everything isn't it, doctor? It's just your "secret" technique that's left to try.]
<br><br>
(color: $dcolor)[Oh, don't sound so //dejected//, (print: $name)! Where //traditional// approaches fail, the //unorthodox// will prevail. Are you ready?]
<br><br>
(link: "Agree and continue.")[
(if: $urine is true)[
(goto: "fill (urine)")
](else:)[
(goto: "fill (normal)")
]
]
](else:)[
<br><br>
(display: "assessment")
]
}{
(set: $newGamePlus to true)
(print: $ending)
<br><br><br>
(link: "Return to Main Menu")[
(goto: "instantiate")
]<br>
(link: "Bonus")[
(set: $bonus_room_access to true)
(goto: "instantiate")
]
}{
(print: $docResponse)
<br><br>
(color: $dcolor)[Moving right along: there is an obvious level of concomitant titillation to any procedure by which success is measured in sexual discharge. Many patients have indicated the use of a "pet name" has improved, or strongly improved, their experience at this clinic. Would you kindly review these and make your desired selection?]
<br><br>
Dr. (print: $doctor) hands you another sheet of paper, this one designated "Patient Moniker Preference". On it, you see printed a plethora of lewd, humorous, and frankly bizarre aliases, beside each of which is a single tick-box.
<br><br>
(if: $gender is "female")[
(display: "name select (female)")
](else:)[
(display: "name select (male)")
]
}{
<br><br>
You scratch a mark in the box labeled "provocative" and return the document to Dr. (print: $doctor). As she reviews your selection, her eyes appear wide with excitement.
<br><br>
(color: $dcolor)[A
(if: $gender is "male")[
man
](else:)[
woman
]
of taste, I see. Please, wait here; I'll return momentarily.]
<br><br>
The doctor quits the room, leaving you to wonder as to the meaning of her cryptic response. Shortly thereafter, she returns. Her white coat endures, but her midriff is bare and the cleavage revealed by her new blouse
(if: $bust is "modest")[
is impressive, to say the least.
](else-if: ($bust is "large") or ($bust is "very large"))[
is nothing short of remarkable.
](else:)[
threatens to split the article at its seams.
]
Upon her feet, a pair of stiletto heels; depending from her hips, a skirt so skimpy the woman's bare labia peer out from beneath its hem.
<br><br>
(color: $dcolor)[What do you think? Was your last visit to the doctor //this// stimulating?]
<br><br>
|select1>[
(link: "Compliment her appearance.")[
(set: $points to it + 1)
(replace:?select1)[]
(show:?dialogue1)
]<br>
(link: "Change the subject.")[
(replace:?select1)[]
(show:?dialogue2)
]
]
|dialogue1)[
(color: $pcolor)[Incredible. You look positively stunning, doctor!]
<br><br>
Half-moon spectacles slip to the end of her nose as she peers down at you. For a brief moment, she begins gently chewing on one well-manicured thumb.
<br><br>
(color: $dcolor)[That's very kind of you to say; such a charming
(if: $age is "a young")[
young
]
(if: $gender is "male")[man](else:)[woman]... Perhaps you'd care for a more //comprehensive// exhibition?
]
<br><br>
Dr. (print: $doctor) doesn't give you time to respond. She begins to strut, lifting the border of her coat to waist height. Her hips gyrate pleasingly as she dances over to you. When she draws closer, the good doctor turns and gracefully reveals a rhinestone heart glittering invitingly between her
(if: $body is "well-built")[
muscular
](else-if: ($body is "slender") or ($body is "tall"))[
lean
](else:)[
ample
]
buttocks.
<br><br>
She descends upon you, brushing her bare groin against the delta of your thighs for a moment before grinding against you more vigorously. Suddenly, almost as soon as it begun, the moment ends. The doctor stands, straightens her clothing, and returns to her seat.
<br><br>
(color: $dcolor)[Apologies, but we really //must// be moving along. Shall we conclude the interview and begin promptly?]
(show:?select2)
]
|dialogue2)[
(color: $pcolor)[Erm, yes, well... Does that conclude the interview, doctor?]
<br><br>
Color mounts to the woman's face and she hurriedly smooths an errant wrinkle about one shoulder.
<br><br>
(color: $dcolor)[Ah, yes, of course... It's just like me, to forget that others are in a hurry. Why don't we move things along?]
(show:?select2)
]
|select2)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}{
<br><br>
You scratch a mark in the box labeled "topless" and return the document to Dr. (print: $doctor). As she reviews your selection, her lips widen into a smile.
<br><br>
(color: $dcolor)[So, you want to see the good doctor's bosom, eh?]
<br><br>
She stands and slips out of her white coat, then begins unbottoning her blouse.
(if: $bust is "modest")[
Her breasts thus freed, she sets aside her shirt and proceeds to fondle herself. Dr. (print: $doctor) moans sensuously as her fingers range over the perfectly-smooth flesh of her areolas. She beams as you look on.
](else-if: ($bust is "large") or ($bust is "very large"))[
The cloth of her shirt is strained, even before she begins removing it. When her chest is finally bared, you find it difficult not to gawk. Whether they are natural is up to the imagination; the fact remains: Dr. (print: $doctor)'s breasts are astounding in both immensity and contour.
](else:)[
Her titanic breasts force their way free before she undoes the final clasp on her shirt. The look on her face says it all: this is not the first time her chest has caused this problem. Rolling her eyes and discarding her top, Dr. (print: $doctor) grins puckishly when she sees you staring.
]
<br><br>
(color: $dcolor)[Well? What say you to //these//?]
<br><br>
|select1>[
(link: "Remain wide-eyed and speechless.")[
(set: $points to it + 1)
(replace:?select1)[]
(show:?dialogue1)
]<br>
(link: "Cough awkwardly into your hand.")[
(replace:?select1)[]
(show:?dialogue2)
]
]
|dialogue1)[
You aren't able to offer a verbal response. Your attention is utterly entranced; you cannot look away from the
(if: $bust is "modest")[
immaculate
](else-if: ($bust is "large") or ($bust is "very large"))[
considerable
](else:)[
ineffably immense
]
bosom that Dr. (print: $doctor) is parading before you. Your mouth suddenly feels dry, as though stuffed with cotton. The doctor chews her lower lip coquettishly.
<br><br>
(color: $dcolor)[You know, I //really// shouldn't do this, but... What the (if:$language>1)[hell](else:)[heck]? I've already taken down your information; it's not as though you'll bolt the moment we've had a little fun.]
<br><br>
She stands, side-steps the desk, approaches, and straddles you.
(if: $body is "well-built")[
Her muscular buttocks rest against your lap.
](else-if: ($body is "slender") or ($body is "tall"))[
She is remarkably light, and your hands unconsciously find their way to her waist.
](else:)[
She is rather heavy, but the weight feels //right//, somehow.
]
<br><br>
(color: $dcolor)[Is this seat taken, "(print: $name)"?]
<br><br>
Dr. (print: $doctor) kisses you, relents, and instead pulls you to her bosom. There's no question of her intent: your lips part and your tongue is immediately upon her breast. She permits you to suckle, lick, even gently chew on her nipples. Every little thing seems to arouse her. At length, she tenderly pushes you back against your seat.
<br><br>
(color: $dcolor)[Enjoyable as that was—and //my//, how it was!—I do believe we should be moving along. Don't you?]
(show:?select2)
]
|dialogue2)[
Not knowing what else to say, you cup a hand to your mouth and utter an embarrassed cough. Color mounts to the doctor's face and she hurriedly resumes her seat.
<br><br>
(color: $dcolor)[Ah, yes, of course... It's just like me, to forget that others are in a hurry. Why don't we move things along?]
(show:?select2)
]
|select2)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}{
<br><br>
Your mind racing with the possibility of your next action, you scratch a mark in the box labeled "none". Hands shaking ever so slightly, you return the document to Dr. (print: $doctor). As she reviews your selection, you catch a glint of mischief shining in those beautiful grey eyes.
<br><br>
Wordlessly, the doctor rises from her chair and begins to disrobe before you. When she is through, only her work heels remain. She moves to your side of the desk and perches atop it, spreading her legs and revealing to you her wonderfully-smooth, perfectly-sculpted vulva.
<br><br>
(color: $dcolor)[I suppose you realize now, if you hadn't before, my clinic is unlike any other. What do you think about... //This//, hm? Care to see more?]
<br><br>
|select1>[
(link: "Nod, slack-jawed and speechless.")[
(set: $points to it + 1)
(replace:?select1)[]
(show:?dialogue1)
]<br>
(link: "Look away.")[
(replace:?select1)[]
(show:?dialogue2)
]
]
|dialogue1)[
Some distant part of you is vaguely aware that your mouth hangs agape as you stare, nodding in response to the doctor's query. She smiles warmly, a faint color mounting to her cheeks.
<br><br>
(color: $dcolor)[There's no need for such //reverence//, I assure you. Still, your... //Interest// is appreciated.]
<br><br>
With one hand propping her up, Dr. (print: $doctor) leans back and tilts her hips in your direction. Her free hand finds its way to her clitoris, whence she proceeds to massage herself vigorously. The doctor emits a moan of deep satisfaction and begins chewing on her lip. It takes every iota of willpower to prevent your hand from shifting to your own groin.
<br><br>
(color: $dcolor)[It is so //freeing// to be nude. Don't you agree? Not simply because a lack of clothing is conducive to sexual enterprise—though I own that to be a plus. I find it //powerfully// exciting to permit others to observe me //au naturel//, as it were.]
<br><br>
At length, the doctor lets loose a muted cry. She leans back, riding out her orgasm as you watch, tansfixed by the sight of her soaked genitals. When her gratification is concluded, she resumes her seat with a radiant glow.
<br><br>
(color: $ambient)[//Ahem//] (color: $dcolor)[Now, I //do// hope you enjoyed that—//I// certainly did—but I believe we must be moving along.]
(show:?select2)
]
|dialogue2)[
Not knowing what to say, you suddenly feign keen interest in a faux plant inhabitating one corner of the office. Color mounts to the doctor's face and she hurriedly resumes her seat, folding her hands in front of her.
<br><br>
(color: $dcolor)[Ah, yes, I see... That //was// a bit forward, I suppose. I'm sure you are in a hurry; why don't we move things along?]
(show:?select2)
]
|select2)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}{
<br><br>
Cheeks burning, you scratch a mark in the box indicating that you waive the selection entirely and return the document to Dr. (print: $doctor). As she reviews your selection, her expression changes. Levity becomes bemusement; expectation crumbles; she looks as if she's been slapped in the face.
<br><br>
(color: $dcolor)[I... See. Very well. Your comfort is my utmost concern; this was your choice to make and I'll not object. Shall we press on, then?]
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
}{
(if: ($name is "sir") or ($name is "miss"))[
When you return the form to Dr. (print: $doctor), she appears bemused. It lasts only a moment, however, and her previously cheery disposition returns.
<br><br>
(color: $dcolor)[You are certain you wish to waive your selection? It's just a bit of harmless fun... Oh, well; it's no business of mine. Why don't we move along, eh? I have a little questionnaire I'd like you to fill out.]
](else:)[
(color: $dcolor)[//"(print: $name)"//, eh?]
<br><br>
Dr. (print: $doctor) reviews your choice with curiosity. She repeats the sobriquet, then repeats it again—as if relishing the taste of the spoken syllables.
<br><br>
(color: $dcolor)[I like it! Now, I have a little questionnaire I'd like you to fill out.]
]
<br><br>
The doctor passes you a sheet of paper headed "Patient Information".
<br><br>
(color: $dcolor)[Regarding the videotaping of the session, I wish it to be known that no recording will ever be shared. It exists purely for the purpose of my own... //Personal// review.]
<br><br>
The doctor winks slyly as she continues.
<br><br>
(color: $dcolor)[Of course, I could provide you a copy... If you're interested in a souvenir.]
<br><br>
Printed upon the document's surface, you observe a series of assertions and responses which read thusly:
<br><br>
//Submission 1: patient is a virgin.//
<br>
(cycling-link: bind $virginTrue,"No.","Yes.")
<br><br>
<!-- for language, going to have 3 levels:
-Lv 1 "Disagree": language will be disabled. All references to anatomy will be purely scientific (e.g. "vulva" instead of "pussy")
-Lv 2 "Agree": language is on, but limited. Contrast with Lv 3 (e.g. "pussy" instead of "vulva", or "pussy" instead of "slutty little hole")
-Lv 3 "Strongly Agree": language is turned to max. The PC will be allowed to sweart frequently in their responses, and the doctor will use colorful expletives whenever possible
-->
//Submission 2: patient is aroused by the use of foul language.//
<br>
(cycling-link: bind $languageLv,"Disagree.","Agree.","Strongly Agree.")
<br><br>
//Submission 3: patient consents to their session being video-recorded.//
<br>
(cycling-link: bind $recordTrue,"No.","Yes.")
<br><br>
//Submission 4: patient would like to receive an anal assessment.//
<br>
(cycling-link: bind $analTrue,"No.","Yes.")
<br><br>
//Submission 5: patient is aroused by the figure of hermaphrodites.//
<br>
(cycling-link: bind $futaTrue,"No.","Yes.")
<br><br><br>
(link: "Submit form.")[
(if: $virginTrue is "No.")[
(set: $virgin to false)
](else:)[
(set: $virgin to true)
]
(if: $languageLv is "Disagree.")[
(set: $language to 1)
](else-if: $languageLv is "Agree.")[
(set: $language to 2)
(set: $points to it + 1)
](else:)[
(set: $language to 3)
(set: $points to it + 1)
]
(if: $recordTrue is "Yes.")[
(set: $recorded to true)
(set: $points to it + 1)
](else:)[
(set: $recorded to false)
]
(if: $analTrue is "Yes.")[
(set: $anal to true)
(set: $points to it + 2)
](else:)[
(set: $anal to false)
]
(if: $futaTrue is "Yes.")[
(set: $futa to true)
](else:)[
(set: $futa to false)
]
(goto: "costumes")
]
}{
<br><br>
Your mind racing with the possibility of your next action, you scratch a mark in the box labeled "none". Hands shaking ever so slightly, you return the document to Dr. (print: $doctor). As she reviews your selection, you catch a hint of mischief shining in those beautiful grey eyes.
<br><br>
Wordlessly, the doctor rises from her chair and begins to disrobe before you. When she is through, only her work heels remain. She moves to your side of the desk and perches atop it, spreading her legs and revealing a shocking sight: a full set of |size>[(cycling-link: bind $dcock,"moderately-sized","rather large","worryingly-large","positively elephantine")] male genitals.
<br><br>
(color: $dcolor)[I suppose you realize now, that bit concerning hermaphrodites is something of a litmus test to weed out unwanted attention. No one who answers in the negative will ever see this part of me. What do you think about it, by the way? Care to see more?]
<br><br>
|select1>[
(link: "Nod, slack-jawed and speechless.")[
(set: $points to it + 1)
(set: $dOrgasm to it + 1)
(replace:?size)[(print: $dcock)]
(replace:?select1)[]
(show:?dialogue1)
]<br>
(link: "Tell her you desire more than observation.")[
(set: $points to it + 2)
(replace:?size)[(print: $dcock)]
(replace:?select1)[]
(show:?dialogue2)
]<br>
(link: "Look away.")[
(replace:?size)[(print: $dcock)]
(replace:?select1)[]
(show:?dialogue3)
]
]
|dialogue1)[
Some distant part of you is vaguely aware that your mouth hangs agape as you stare, nodding in response to the doctor's query. She smiles warmly, a faint color mounting to her cheeks.
<br><br>
(color: $dcolor)[There's no need for such //reverence//, I assure you. Still, your... //Interest// is appreciated.]
<br><br>
With one hand propping her up, Dr. (print: $doctor) leans back and tilts her hips in your direction. Her free hand finds its way to her
(if: ($dcock is "moderately-sized") or ($dcock is "rather large"))[
prodigious
](else:)[
well-endowed
]
shaft, whence she proceeds to stroke herself vigorously. The doctor emits a moan of deep satisfaction and begins chewing on her lip. It takes every iota of willpower to prevent your hand from shifting to your own groin.
<br><br>
(color: $dcolor)[It is so //freeing// to show others what I am. This erotic body of mine... Not many enjoy the sight of a woman possessing
(if: $language > 1)[a cock and balls](else:)[male reproductive organs], and the people who do are a rare breed.]
<br><br>
At length, the doctor lets loose a muted cry. She leans back and begins firing an elongated strand of
(if: $language >1)[hot cum](else:)[pearly ejaculate]. It reaches her cheek before sheering off, draped against her torso. The second—and the third and fourth—jet of fluid is equally protracted. When her gratification is concluded, Dr. (print: $doctor)'s belly and
(if: $bust is "modest")[
perky
](else:)[
plump
]
(if: $language > 1)[
tits are
](else:)[
bosom is
]
drenched in alabaster stains. Standing and sauntering back to her seat, the doctor begins dragging a single finger from her soaked figure to her lips and back again.
<br><br>
(color: $dcolor)[Now, I //do// hope you enjoyed that—//I// certainly did—but I believe we must be moving along.]
(show:?select2)
]
|dialogue2)[
You lean forward, all attention. The |smell>[(cycling-link: bind $dsmell,"heady","potent","musky","unwashed","clean","fragrant")] scent of her
(if: $language > 1)[cock ](else:)[penis ]
washes over you. Practically salivating, you stare up at the creature thus exposed before you.
<br><br>
(color: $pcolor)[Doctor, if I may be so bold, I am completely taken by this... //Glamorous// display. //Seeing// could not possibly be sufficient.]
<br><br>
You can almost hear the doctor's heartbeat quicken. Twin suns intensify upon her soft cheeks until her face is redder than a beet.
<br><br>
(color: $dcolor)[Well I... I mean I never let a patient... That is, erm, not during the initial interview, anyway...]
<br><br>
(color: $pcolor)[I'll take that as a "yes."]
<br><br>
(if: $language > 1)[
(set: $cockTemp to "cock")
](else:)[
(set: $cockTemp to "penis")
]
(if: $language > 2)[
(set: $fingerTemp to "Finger-fuck")
](else:)[
(set: $fingerTemp to "Finger")
]
(link: "Inspect her (print: $cockTemp).")[
(goto: "futa: inspect")
]<br>
(link: "Give her a handjob.")[
(set: $points to it + 1)
(goto: "futa: hj")
]<br>
(link: "Give her a blowjob.")[
(set: $points to it + 1)
(goto: "futa: bj")
]<br>
(link: "(print: $fingerTemp) her urethra.")[
(set: $points to it + 1)
(goto: "futa: ff")
]
]
|dialogue3)[
Not knowing what to say, you suddenly feign keen interest in a faux plant inhabitating one corner of the office. Color mounts to the doctor's face and she hurriedly resumes her seat, folding her hands in front of her.
<br><br>
(color: $dcolor)[Ah, yes, I see... That //was// a bit forward, I suppose. I'm sure you are in a hurry; why don't we move things along?]
(show:?select2)
]
|select2)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}{
(set: $docInspected to true)
You lean in for a closer look at the magnificent, uncircumcised tool between Dr. (print: $doctor)'s legs. She giggles nervously.
<br><br>
(color: $dcolor)[And here I thought //I// would be the one inspecting //you!//]
<br><br>
Her
(if: $language > 1)[
cock presses against your nostrils.
](else:)[
phallus presses against your nostrils.
]
|sel0>[
<br><br>
(link: "Inhale.")[
(replace:?sel0)[
You inhale deeply;
(if: $dsmell is "unwashed")[
(show:?unwashed)
](else-if: ($dsmell is "clean") or ($dsmell is "fragrant"))[
(show:?clean)
](else:)[
(show:?other)
]
]
]
]
|unwashed)[
the essence of stale (if: $language > 1)[cum](else:)[smegma] overwhlems your senses.
<br><br>
(color: $dcolor)[Apologies... For the smell, I mean. I suppose I do not clean it often enough. I am... Rather delighted by its potent fetor when it gets this way.]
<br><br>
|select1>[
(link: "Admit that you feel the same way.")[
(replace:?select1)[]
(show:?response1)
]<br>
(link: "Suggest a tongue-bath.")[
(replace:?select1)[]
(show:?response2)
]
]
]
|clean)[
the scent of lilacs—or perhaps it's lavender—wafts over you.
<br><br>
(color: $dcolor)[How... Erm, what do you think? It isn't foul-smelling at all, is it?]
<br><br>
|select2>[
(link: "Tell her the scent is incredible.")[
(replace:?select2)[]
(show:?response3)
]<br>
(link: "Ask her how she keeps it so clean.")[
(replace:?select2)[]
(show:?response4)
]
]
]
|other)[
her scent is intoxicating: a perfect mixture of sweat and pheromones.
<br><br>
(color: $dcolor)[What do you think of... Well, //me//? Is it everything you hoped it could be?]
<br><br>
|select3>[
(link: "Tell her it's perfect.")[
(replace:?select3)[]
(show:?response5)
]<br>
(link: "Examine her testes.")[
(replace:?select3)[]
(show:?response6)
]
]
]
|response1)[
(color: $pcolor)[Not to worry, doctor.]
<br><br>
You take another deep breath, pressing your septum directly beneath the rim of her glans.
<br><br>
(color: $pcolor)[I couldn't agree more. This scent: so //enticing//, so... I could //never// get enough of this.]
<br><br>
Dr. (print: $doctor) gingerly chews one supple finger.
(show:?final)
]
|response2)[
(color: $pcolor)[Well, I'd wager we might tame its aroma with a quick ablution.]
<br><br>
(color: $dcolor)[I don't... What are you sugg—]
<br><br>
You don't permit her to finish her statement. Your lips part and your tongue is instantly upon the thickest coat of gold-ivory concretion—just beneath the rim of her glans.
<br><br>
(color: $dcolor)[Oh! Oh //my!//]
<br><br>
Working diligently, carefully, //slowly//, you swallow every ounce of her gloriously-rancid smegma. It glides down your throat and, when the doctor's shaft is sparkling, your only wish is that there were more of it.
(show:?final)
]
|response3)[
(color: $pcolor)[Quite the contrary, actually. Your scent is...]
<br><br>
You take another deep breath, pressing your septum directly beneath the rim of her glans.
<br><br>
(color: $pcolor)[...//Irresistible//.]
<br><br>
Dr. (print: $doctor) watches as you run your face up and down her shaft. Each fresh inhalation builds excitement in your loins. You want to do //so// much more to this woman(if: $language > 1)['s cock]...
(show:?final)
]
|response4)[
(color: $pcolor)[Quite the contrary, actually; it's so //clean//.
(if: $gender is "male")[
Mine attracts odor like honey attracts flies.
](else:)[
(if: $virgin is false)[I've //never// been around one so well-kept. ]
]
Do you perfume it?
]
<br><br>
(color: $dcolor)[No, actually; I wash it once every few hours with a floral soap. It truly works wonders.]
<br><br>
Dr. (print: $doctor) blushes deeply and begins idly playing with her foreskin.
(show:?final)
]
|response5)[
(color: $pcolor)[Ma'am, never in my life have I beheld so majestic a ruler's scepter.
(if: $gender is "male")[
Even my own pales in comparison.
]
]
<br><br>
(color: $dcolor)[Oh, //please!// Such //reverence// is hardly necessary! Still... I would be doing you a disservice if I dismissed your compliments out of hand. As you may observe, I am... //Excited// by your observation.]
<br><br>
True to her word, Dr. (print: $doctor)'s
(if: $language > 1)[
cock
](else:)[
penis
]
seems to be hardening under your affections.
(show:?final)
]
|response6)[
(color: $pcolor)[Oh, I never //dreamed// of such rapture. This
(if: $language > 1)[
cock
](else:)[
penis
]
is glorious, and these
(if: $language > 1)[
balls...
](else:)[
testicles...
]
]
<br><br>
You can't keep your hands off the ripe fruits suspended between Dr. (print: $doctor)'s legs any longer. They are heavy with the need to discharge.
<br><br>
(color: $pcolor)[Seems as though you haven't
(if: $language > 2)[
shot your load
](else-if: $language > 1)[
cum
](else:)[
ejaculated
]
for quite some time.]
<br><br>
(color: $dcolor)[//Au contraire//, I
(if: $language > 2)[
"shot my load"
](else:)[
finished
]
less than half an hour before your arrival.]
<br><br>
(color: $pcolor)[You're kidding! How much can you produce in a single day?]
<br><br>
(color: $dcolor)[Well, I can't say I've fully measured my output, but... Perhaps a liter or two? Assuming I were to commit myself to no enterprise other than masturbation.]
<br><br>
You can't help but gawk in response. The doctor blushes, giggles coquettishly, and bats her eyelashes.
(show:?final)
]
|final)[
<br><br>
(color: $dcolor)[Would you care to... I mean... That is, //will// you kindly "examine" me further? Switching roles with a patient is rather stimulating.]
<br><br>
(link: "Give her a handjob.")[
(set: $points to it + 1)
(goto: "futa: hj")
]<br>
(link: "Give her a blowjob.")[
(set: $points to it + 1)
(goto: "futa: bj")
]<br>
(link: "(print: $fingerTemp) her urethra.")[
(set: $points to it + 1)
(goto: "futa: ff")
]
]
}{
(set: $dOrgasm to it + 1)
(set: $futaOrgasm to true)
You can't wait any longer;
(if: $dcock is "moderately-sized")[
your hand wraps around the doctor's shaft easily.
](else-if: $dcock is "rather large")[
the doctor's girth fills your grip.
](else-if: $dcock is "worryingly-large")[
you struggle to wrap your fingers all the way round the doctor's shaft.
](else:)[
your fingertips do not meet when you wrap your grip around the doctor's shaft.
]
<br><br>
(color: $dcolor)[P-please be gentle! It is rather... //Sensitive//.]
<br><br>
You start slow, working her (if: $language > 1)[cock ]as though (if: $language > 1)[it](else:)[she] were a marble sculpture in need of polishing. Dr. (print: $doctor) winces, stops you, and retrieves a bottle of lubricant from one corner of her desk. Only once she applies a generous amount to herself does she signal you to continue.
<br><br>
(color: $dcolor)[There; //that's// better. Did I mention that I typically
(if: $language > 1)[
rub one out
](else:)[
masturbate
]
before I see a patient? Keeps my urges in check.]
<br><br>
You begin pumping your fist, oscillating across the (if: $dcock is not "moderately-sized")[impressive ]breadth of Dr. (print: $doctor)'s penis. She grips the edge of her desk, her countenance tightening into that effervescent demeanor of orgasm: the "O-face".
<br><br>
(if: $language > 1)[
(color: $dcolor)[C-cumming!]
](else:)[
(color: $dcolor)[I'm... //I'm//..!] (color: $ambient)[//Unf//]
]
<br><br>
|select1>[
(link: "Let her finish on your face.")[
(replace:?select1)[]
(show:?face)
]<br>
(link: "Let her finish in your mouth.")[
(replace:?select1)[]
(show:?mouth)
]<br>
(if: $gender is "female")[
(if: $language > 1)[
(set: $titTemp to "tits")
](else:)[
(set: $titTemp to "breasts")
]
(link: "Let her finish on your (print: $titTemp).")[
(replace:?select1)[]
(show:?tits)
]<br>
]
(link: "Let her finish in your eye.")[
(replace:?select1)[]
(show:?eye)
]<br>
(link: "Make her finish on herself.")[
(replace:?select1)[]
(show:?body)
]
]
|face)[
Never has there been a more fitting time for a facial(if: $language > 1)[ cum-shot]. Holding your head no more than a foot from the doctor's glans, you await the fated moment. It comes seconds later, accompanied by Dr. (print: $doctor)'s satisfied moans.
<br><br>
No man could possibly produce like she can. The first spurt, which strikes with the pressure of a fire-hose, coats everything below your eyes. Then, unexpectedly, she lets off a second, a third, a fourth burst. By the fifth, and final, shot, your face is totally saturated with the doctor's
(if: $language > 2)[
baby batter.
](else-if: $language > 1)[
hot cum.
](else:)[
thick ejaculate.
]
<br><br>
(color: $dcolor)[That was... //incredible!// And you are positively drenched! Very sexy, (print: $name); five stars! Now: ready for some //real// fun?]
(show:?final)
]
|mouth)[
You've never been hungrier for anything in your life. As you continue to work the doctor's shaft, your lips part and your tongue lolls out. You make no conscious effort to hold your mouth inches from her swollen glans; it is merely something which happens.
<br><br>
No man could possibly produce like she can. The first spurt, which strikes the back of your throat with remarkable force, is enough to fill your mouth instantly. Then, unexpectedly, she lets off a second, a third, a fourth burst. She tastes surprisingly like heavy cream. By the fifth, and final, shot, you feel your belly bloating with the doctor's
(if: $language > 2)[
baby batter.
](else-if: $language > 1)[
hot cum.
](else:)[
thick ejaculate.
]
<br><br>
(color: $dcolor)[That was... //incredible!// I cannot believe you managed to drink it //all//, (print: $name)! Very sexy; five stars! Now: ready for some //real// fun?]
(show:?final)
]
|tits)[
It will be a close call, but you //need// to let Dr. (print: $doctor) finish on your (print: $titTemp). As one hand continues pumping the doctor's shaft, the other quickly and carefully grabs at the hem of your blouse. Your shirt tails come free just as the first droplets begin to spill from the doctor's glans.
<br><br>
No man could possibly produce like she can. The first spurt is enough to coat your entire right breast by itself. Then, unexpectedly, she lets off a second, a third, a fourth burst. By the fifth, and final, shot, your bosom is drenched with the doctor's
(if: $language > 2)[
baby batter.
](else-if: $language > 1)[
hot cum.
](else:)[
thick ejaculate.
]
<br><br>
(color: $dcolor)[That was... Oh, my, look at those! You look //very// sexy right now, (print: $name)! Now: ready for some //real// fun?]
(show:?final)
]
|eye)[
There isn't time to consider how the Dr. (print: $doctor) will respond to a less... //Conventional// target for insemination. You
|reason>[(cycling-link: bind $reasonForCumInEye,
"are curious as to what it will feel like",
"have long fantasized about permitting someone to do this to you",
"know it will sting, but that's exactly the sensation you're after",
)]
. One hand, still vigorously stroking the doctor's manhood, takes aim with its erotic armament; as you lean closer, the other spreads your eyelids to bare the target.
<br><br>
(color: $dcolor)[Wh-what are you—]
<br><br>
Dr. (print: $doctor) doesn't finish her sentence, but she //does// finish directly into your eyeball. Her
(if: $language > 1)[
hot cum
](else:)[
ejaculate
]
fires from her glans with the pressure of a fire-hose. It's a direct hit; your eye burns, and you struggle to keep it open. Each successive burst pours more and more fluid onto you. By the fifth, and final, spurt, the stinging pain has subsided to a dull pulsing which could nearly be described as enjoyable.
<br><br>
(color: $dcolor)[That was... just //wow//, (print: $name). I've never finished... That is, in a person's... Well, it was //very// sexy; five stars! Now: ready for some //real// fun?]
(show:?final)
]
|body)[
Looking at Dr. (print: $doctor)'s naked torso—her
(if: $bust is "modest")[
perfectly perky
](else-if: ($bust is "large") or ($bust is "very large"))[
abundant
](else:)[
behemothic
]
chest slick with sweat—never has there been a finer target(if: $language > 1)[ for a cum-shot]. Aiming the doctor's shaft toward her, you await the critical moment.
<br><br>
No man could possibly produce like she can. The first spurt, which coats her bosom in a single stroke, fires in a continuous strand until it reaches her clavicle. Then, unexpectedly, she lets off a second, a third, a fourth burst. By the fifth, and final, shot, she is positively dripping with her own
(if: $language > 2)[
baby batter.
](else-if: $language > 1)[
hot cum.
](else:)[
thick ejaculate.
]
<br><br>
(color: $dcolor)[That was... //wow!// I am //drenched//, (print: $name)! Still, we have to be moving on; are you ready for some //real// fun?]
(show:?final)
]
|final)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}{
(set: $dOrgasm to it + 1)
(set: $futaOrgasm to true)
You can't wait any longer;
(if: $dcock is "moderately-sized")[
you inhale the doctor's shaft; her glans just barely reaches your throat.
](else-if: $dcock is "rather large")[
the doctor's girth fills your mouth and stretches your esophagus; there're still a few inches of her to go.
](else-if: $dcock is "worryingly-large")[
you struggle to fit the doctor's shaft in your mouth; she's pushing into your throat, and you're barely halfway to the base.
](else:)[
you make a valiant effort, but her glans alone fills your entire mouth. You manage to take her no further than your tonsils.
]
<br><br>
(color: $dcolor)[P-please be gentle! It is rather... //Sensitive//.]
<br><br>
You begin bobbing your head,
(if: $dcock is "moderately-sized")[
letting Dr. (print: $doctor)'s perfectly-fitted shaft glide along your tongue.
](else-if: $dcock is "rather large")[
fighting your gag reflex as you struggle to take Dr. (print: $doctor)'s entire shaft.
](else-if: $dcock is "worryingly-large")[
emitting lewd noises of satisfaction as you gag on Dr. (print: $doctor)'s immense shaft.
](else:)[
and barely manage to force Dr. (print: $doctor)'s head into your throat.
]
<br><br>
(color: $dcolor)[Oh,
(if: $language > 1)[
//fuck//,
](else:)[
(print: $name),
]
that's good!
]
<br><br>
You suck and twirl you're tongue; you're moving faster, faster, taking in the (if: $dcock is not "moderately-sized")[impressive ]breadth of Dr. (print: $doctor)'s penis. She grips the edge of her desk, her countenance tightening into that effervescent demeanor of orgasm: the "O-face".
<br><br>
(color: $dcolor)[
(if: $language > 1)[
I'm going to c-cum!
(set: $ballsTemp to "balls")
(set: $anusTemp to "asshole")
](else:)[
I'm... //I'm//... //unf!//
(set: $ballsTemp to "testicles")
(set: $anusTemp to "anus")
]
]
<br><br>
|select1>[
(link: "Fondle her (print: $ballsTemp).")[
(replace:?select1)[]
(show:?fondle)
]<br>
(link: "Squeeze her (print: $ballsTemp).")[
(replace:?select1)[]
(show:?squeeze)
]<br>
(link: "Finger her (print: $anusTemp).")[
(replace:?select1)[]
(show:?ass)
]
]
|fondle)[
You grip the doctor's (print: $ballsTemp) and begin to gently knead them.
<br><br>
(color: $dcolor)[Oh, that's..! Yes! Yes, keep doing that!]
(show:?select2)
]
|squeeze)[
You grip the doctor's (print: $ballsTemp) and begin to knead them—gently at first but, within seconds, you're clutching them with enough force to inflict considerable discomfort.
<br><br>
(color: $dcolor)[That //hurts!// I... Please, k-keep doing that!]
(show:?select2)
]
|ass)[
Brushing aside the doctor's shaft and (print: $ballsTemp), you bare the woman's pulsating (print: $anusTemp).
<br><br>
(color: $dcolor)[Wh-what are you—]
<br><br>
Before the question is out of her mouth, you've lubricated two fingers with cast-off saliva and slipped them into Dr. (print: $doctor)'s rectum. Pushing up to the knuckle, you locate what you think must be her prostate and give it a vigorous prodding.
<br><br>
(color: $dcolor)[Th-that's my..! You're... Oh my (if: $language > 2)[fucking ]//God!//]
(show:?select2)
]
|select2)[
<br><br>
(link: "Let her finish on your face.")[
(replace:?select2)[]
(show:?face)
]<br>
(link: "Let her finish in your mouth.")[
(replace:?select2)[]
(show:?mouth)
]
]
|face)[
<br><br>
You feel the doctor tensing up and pull away just in time. No man could possibly produce like this. The first spurt, which strikes with the pressure of a fire-hose, coats everything below your eyes. Then, unexpectedly, she lets off a second, a third, a fourth burst. By the fifth, and final, shot, your face is totally saturated with the doctor's
(if: $language > 2)[
baby batter.
](else-if: $language > 1)[
hot cum.
](else:)[
thick ejaculate.
]
<br><br>
(color: $dcolor)[That was... //incredible!// And you are positively drenched! Very sexy, (print: $name); five stars! Now, ready for some //real// fun?]
(show:?final)
]
|mouth)[
<br><br>
Without warning, the doctor grips a tuft of your hair in each of her fists.
<br><br>
(color: $dcolor)[I'm terribly sorry about this, but...]
<br><br>
She gives a powerful yank and
(if: $dcock is "moderately-sized")[
drives herself into your esophagus.
](else-if: $dcock is "rather large")[
drives herself into you, stretching your throat rather uncomfortably.
](else-if: $dcock is "worryingly-large")[
forces her way into you, stretching your throat. She seems hell-bent on penetrating your stomach.
](else:)[
instantly chokes you on her enormous girth. Even with such vehement effort, she's only halfway into your gullet. Your jaw is strained to its breaking point and you can feel the immensity of her stretching your throat.
]
No man could possibly produce like she can. The first spurt feels as though it's been fired directly into your belly. Then, unexpectedly, she lets off a second, a third, a fourth burst. By the fifth, and final, shot, you feel your belly bloating with the doctor's
(if: $language > 2)[
baby batter.
](else-if: $language > 1)[
hot cum.
](else:)[
thick ejaculate.
]
<br><br>
(color: $dcolor)[S-sorry about that. I just... //wow!// I cannot believe you managed to drink it //all//, (print: $name)! Now, are you ready for some //real// fun?]
(show:?final)
]
|final)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}
{
(set: $dOrgasm to it + 1)
(set: $futaOrgasm to true)
With a mischievous grin, you
(if: $dcock is "moderately-sized")[
encircle the doctor's glans with your thumb and forefinger.
](else-if: ($dcock is "rather large") or ($dcock is "worryingly-large"))[
attempt to encircle the doctor's glans with your thumb and forefinger, though your digits don't quite meet.
](else:)[
attempt to encircle the doctor's glans with your thumb and forefinger, though your digits come nowhere close to meeting.
]
Extending one finger from your opposite hand, you begin massaging Dr. (print: $doctor)'s
(if: $language > 2)[
pisshole.
](else-if: $language > 1)[
peehole.
](else:)[
meatus.
]
<br><br>
(color: $dcolor)[W-wait, you aren't about to... Oh,
(if: $language > 2)[
fuck!
](else-if: $language > 1)[
Jesus!
](else:)[
well...
]
Here, let me at least...]
<br><br>
She removes a bottle of lubricant from behind her back and spreads a generous supply over your index finger.
<br><br>
(color: $dcolor)[There. That should help. You may... That is, please proceed.]
<br><br>
|select1>[
(link: "Insert your finger.")[
(replace:?select1)[]
(show:?fingerfuck)
]
]
|fingerfuck)[
(color: $pcolor)[With pleasure.]
<br><br>
(if: $dcock is "positively elephantine")[
Meeting almost no resistance whatsoever,
](else:)[
With some difficulty,
]
you slip into the (if: $dcock is not "positively elephantine")[small ]opening at the tip of Dr. (print: $doctor)'s (if: $language > 1)[cock](else:)[penis]. Suddenly, she lets out a moan like
(if: $language > 1)[
a bitch in heat
](else:)[
a woman posessed
]
and begins slowly thrusting her hips toward you—(if: $language > 1)[fucking](else:)[penetrating] herself with your appendage.
<br><br>
(color: $dcolor)[
(if: $language > 1)[
F-f//uuuck//,
](else:)[
Oh, my God,
]
that's deep!]
<br><br>
The doctor begins gyrating faster, faster; she's forcing you into her up to the knuckle. Stabilizing herself against the desk, she shifts her testes aside to reveal her (if: $language > 1)[pussy](else:)[womanhood].
<br><br>
(color: $dcolor)[I-I have another one, you know. A second urethra. Won't you please... //P-please//..!] (color: $ambient)[//Unf//]
<br><br>
The woman throws her head back and groans in ecstasy. She won't last much longer, the way she's going.
<br><br>
(show:?select2)
]
|select2)[
(link: "Finger both her urethras.")[
(set: $tempSelect to 1)
(replace:?select2)[]
(show:?vag)
(show:?select3)
]<br>
(link: "Insert a second finger into her penis.")[
(set: $tempSelect to 2)
(replace:?select2)[]
(show:?dick)
(show:?select3)
]
]
|vag)[
There isn't time to lubricate your unoccupied forefinger; you plunge it into the orifice just below the doctor's clitoris, deep as it will go. She squeals like a stuck pig and starts bucking like a horse trying to throw its rider. All the while, your digits work in and out of her, two pistons firing in alternating rhythm.
]
|dick)[
There isn't time to lubricate your unoccupied forefinger. Ignoring the doctor's plea, you plunge a second digit into the opening at the end of her penis. She squeals like a stuck pig and starts bucking like a horse trying to throw its rider. All the while, you alternate between depth and diameter—doing everything in your power to give her urethra a real workout.
]
|select3)[
<br><br>
(color: $dcolor)[
(if: $language > 2)[
Holy fucking //God!//
](else-if: $language > 1)[
C-cumming!
](else:)[
K-keep... I'm so... C-close..!
]
]
<br><br>
|sel3p5>[
(link: "Squeeze her testicles.")[
(replace:?sel3p5)[]
(show:?squeeze)
(show:?final)
]<br>
(link: "Ruin her orgasm.")[
(replace:?sel3p5)[]
(show:?ruin)
(show:?final)
]
]
]
|squeeze)[
(if: $tempSelect is 1)[
Removing your finger from Dr. (print: $doctor)'s urinary tract—at least, from one of them—you immediately
](else:)[
Removing your fingers from Dr. (print: $doctor)'s urinary tract, you immediately
]
grip her testicles and begin to knead them with enough force to inflict considerable discomfort.
<br><br>
(color: $dcolor)[That //hurts!// I... Please, k-keep doing that!]
<br><br>
She shoots a thick rope two feet high. No man could possibly produce like she can. Even before the first spurt splatters wetly to the carpet, she lets off another, then another. By the fifth, and final, shot, the doctor's
(if: $language > 2)[
baby batter
](else-if: $language > 1)[
hot cum
](else:)[
thick ejaculate
]
is absolutely everywhere. She's breathing heavily.
<br><br>
(color: $dcolor)[That was... //Incredible!// Honestly, I don't know if I've //ever// let someone finger me //there// before. Very sexy, (print: $name); five stars! Now, are you ready for some //real// fun?]
]
|ruin)[
You plunge into the doctor with reckless abandon, intent on spoiling her fun here at the critical moment.
<br><br>
(color: $dcolor)[What? No! L-let me finish!]
<br><br>
It's too late. Her boiling-hot
(if: $language > 2)[
baby batter
](else-if: $language > 1)[
cum
](else:)[
ejaculate
]
pools up behind the finger buried in her penis. She's whimpering and shaking as her urethra seems to bloat with the pressure building within. A few rivulets run around your knuckles. When you extricate yourself from within her, a veritable ocean of ivory fluid leaks onto the floor below.
<br><br>
(color: $dcolor)[Oh, you absolute... //Mm//, but it //did// feel rather nice... Don't worry, (print: $name); I'll get you back for that. Now, are you ready for some //real// fun?]
]
|final)[
<br><br>
(link: "Agree and continue.")[
(goto: "player restrained")
]
]
}{
Dr. (print: $doctor) leads you into an adjacent quarter, all sterile white tile and immaculate trim. The only trappings indicative of the room's true purpose consist of a few pornographic posters and a host of devious-looking implements arrayed atop a wheeled cart.
<br><br>
(color: $dcolor)[Alright, here we are. If you are ready to begin, I'd ask that you disrobe now.]
<br><br>
|select1>[
(link: "Disrobe.")[
(replace:?select1)[]
(show:?agree1)
(show:?nude)
(show:?select2)
]<br>
(link: "Object.")[
(replace:?select1)[]
(show:?object1)
(show:?nude)
(show:?select2)
]
]
|agree1)[
Wordlessly, you begin undressing. The doctor watches closely as you denude yourself before her.
]
|object1)[
(color: $pcolor)[I'm not so sure I'm comfortable with that, doctor. Is it really necessary that I undress?]
<br><br>
(if: $clothing is "full")[
(color: $dcolor)[Listen, it is evident that you have some issue with nudity, but I //promise// this is the only means by which I can effect your treatment. However, if you are militantly indignant toward your own natural state, well... There's the door.]
](else:)[
(color: $dcolor)[Oh, I see how it is. It's okay to ask the //medical professional//
(if: $clothing is "sexy")[
to dress up for a little fun
](else-if: $clothing is "half")[
to flash her bosom
](else:)[
to strip naked
]
but, the moment it's //you// in the hot seat... Look, please just... I realize the situation in which you find yourself is by no means //ordinary//, but I would ask for your trust—even if I haven't necessarily earned it just yet. Trust me as your doctor, if nothing else.]
]
<br><br>
Reluctantly, you begin to remove your clothing.
]
|nude)[
When, at last, you are finished, Dr. (print: $doctor) orbits you slowly, nodding and noising her satisfaction.
<br><br>
(color: $dcolor)[Hmm, yes... Yes, you're quite a //fine// specimen, aren't you? Such
(if: $gender is "female")[
a wonderful figure—and an exquisite vulva, if I do say so myself.
](else:)[
rippling musculature—and an excellent (if: $language>2)[cock](else:)[penis], I might add. (if: ($clothing is "none") and ($futa is true))[(show:?futapenis)]
]
(if: $age is "an older")[
I should like to look half as splendid when I'm your age.
]
]
|futapenis)[
At the mention of your apparatus, you glance down at the doctor's own member(if: $futaOrgasm)[—still throbbing, despite your earlier efforts—](else:)[ ]and
(if: $dcock is "moderately-sized")[
figure you're no larger than she is.
](else-if: $dcock is "rather large")[
repress a scoff, seeing as how she's nearly twice your size.
](else-if: $dcock is "worryingly-large")[
genuinely wonder if she is joking at your expense, given her comparable immensity.
](else:)[
wonder, not for the first time, if her penis is large enough to house your own.
]
]
<br><br>
]
|select2)[
(link: "Thank her.")[
(replace:?select2)[]
(show:?thank)
(show:?lithTable)
]<br>
(link: "Avert your gaze.")[
(replace:?select2)[]
(show:?awkward)
(show:?lithTable)
]
]
|thank)[
(color: $pcolor)[Thank you, doctor. You flatter me, really. ]
(if:
($gender is "male") and
($futa is true) and
($clothing is "none") and
($dcock is not "moderately-sized")
)[
(color: $pcolor)[Especially given the behemoth //you're// toting about.]
<br><br>
(color: $dcolor)[Oh, //please.// Now who's flattering whom?]
]
]
|awkward)[
Your cheeks burn. Not knowing how else to respond, you lower your gaze to avoid making eye-contact. The doctor coughs into her hand.
<br><br>
(color: $dcolor)[Well, now; I believe it's high time we got started, don't you?]
]
|lithTable)[
<br><br>
Dr. (print: $doctor) diverts your attention to the focal piece of the room: a custom-built, padded lithotomy table. She helps you into a sitting position at the table's edge(if: $body is "well-built")[
, lifting you easily with her powerful arms].
<br><br>
(color: $dcolor)[Do keep in mind what I mentioned before: if, at any point, you wish to end the session, you may do so. No safe-word, no (if: $language > 1)[bullshit](else:)[nonsense]. I'm not here to make you feel uncomfortable. Now, then... Lie back and let us begin.]
<br><br>
Dr. (print: $doctor) eases you into the lithotomy position: lying flat with legs apart and held aloft by two upholstered stirrups. She restrains your torso, your wrists, your ankles. When she's finished, you can hardly move. Leaving you thus exposed, the doctor wheels a cart to one side of the table. Laid upon it are the same instruments of sexual fantasy observed upon first entering—each one growing in scale as they march from left to right.
<br><br>
(color: $dcolor)[There we are; all nice and snug. What shall we "assess" first, (print: $name)?]
(display: "assess complete")
]
}{
(set: $temp_strapon to $strapon)
(color: $dcolor)[Which of these fine instruments would you prefer I use to perform your assessment, (print: $name)?]
<br><br>
|straponselect>[
(if: $temp_strapon is not "modest")[
(link: "The modestly-sized one.")[
(set: $strapon to "modest")
(replace:?straponselect)[
(color: $pcolor)[How about the moderate-looking one, there?]
]
(show:?apparatus)
(show:?anal0)
]<br>
]
(if: $temp_strapon is not "large")[
(link: "The large one.")[
(set: $points to it + 1)
(set: $strapon to "large")
(replace:?straponselect)[
(color: $pcolor)[Let's live a little; go with the large one, there.]
]
(show:?apparatus)
(show:?anal0)
]<br>
]
(if: $temp_strapon is not "massive")[
(link: "The worryingly-massive one.")[
(set: $points to it + 2)
(set: $strapon to "massive")
(replace:?straponselect)[
(color: $pcolor)[I'm feeling a shade masochistic today, doctor. Go with the enormous one at the end.]
]
(show:?apparatus)
(show:?anal0)
]<br>
]
(if: $temp_strapon is not "moderate")[
(link: "Stick with the (print: $temp_strapon) one.")[
(replace:?straponselect)[
(color: $pcolor)[Erm, actually, I've changed my mind.]
<br><br>
Although the doctor smiles in response, there's an almost imperceptible twinge of annoyance in her countenance.
<br><br>
(color: $dcolor)[Not a problem! We'll stick with this (print: $temp_strapon) fellow, eh?]
]
(show:?apparatus)
(show:?anal0)
]
]
]
}Master list for points:
FORMS
>+1 for "agree" or "strongly agree"
>+1 for recording
>+2 for anal
RUNNING TOTAL = 4
CLOTHES
>+1 for "sexy", "half", or "none"
>+1 additional if you selected BOTH clothing: "none" and form: "futa"
>+1 for complimenting her
RUNNING TOTAL = 7
FUTA TOTAL = 8
FUTA
>+1 for compliment OR +2 for asking to do more to her
>+1 for HJ, BJ, or FF
RUNNING TOTAL = 7
FUTA TOTAL = 11
ASSESSMENT
>+2 (FUTA) the first time you tell her she can use her penis
OR +1 for the large strapon OR +2 for the huge strapon
>+1 for analingus
>+1 for anal ramming
>[M] +1 for each level of cbt selected (max=3)
>[F] +1 for vaginal ramming
>[F] +1 for each level of vct selected (max=2)
>[F] +1 if you let her proctor cunnilingus
RUNNING TOTAL [M] = 14 - [F] = 15
FUTA TOTAL = 18 [M] - 19 [F]
BLADDER
>+1 for every fill level above 1 (effective max is +2 at fill=3)
>+1 if you ask the doctor to stay with you
>+1 if you ask to be the doctor's sub
RUNNING TOTAL [M] = 19 - [F] = 20
FUTA TOTAL = 23 [M] - 24 [F]
(set: $points_min to 5)
(set: $points_mod to 9)
(set: $points_hi to 15){
(color: $pcolor)[Actually, I believe that's about my limit, doctor.]
<br><br>
(color: $dcolor)[Already? That's a shame; I had so much more... //Bah!// But you don't need to hear about that. This amount should suffice.]
<br><br>
(display: "end (sex)")
}{
Dr. (print: $doctor) gently removes your catheter,
(if: $gender is "female")[
(if: ($clothing is "none") and ($futa is true))[
(if: $condom is true)[
adroitly rolls a condom over her exposed manhood,
](else:)[
expeditiously applies plentiful lubrication to her exposed manhood,
]
](else:)[
affixes the (print: $strapon) apparatus used earlier,
]
then mounts you. There's no elegance in the action this time; it's clear she won't hold back. Her hands find their way to your chest, her full weight bearing down on your bosom.
<br><br>
(color: $dcolor)[Let's make some magic happen, shall we?]
<br><br>
As the doctor thrusts into you(if: $language>1)[r pussy], the lithotomy table begins to rock wildly. If she was vigorous before, she's positively //feral// now.
(if: ($clothing is "none") or ($clothing is "half"))[
Dr. (print: $doctor)'s (if: $bust is not "modest")[sizeable ]breasts undulate uncontrollably with the force of each movement.
]
](else:)[
turns away from you—exposing her buttocks—then seats herself between your legs—one hand hastily guiding you into her womanhood.
<br><br>
(color: $dcolor)[Let's make some magic happen, shall we?]
<br><br>
The doctor lets her weight down; you haven't an instant to register the sensation before she's ascended again; your glans is nearly free of her warmth before she sinks once more to strike her posterior earthward. If she was vigorous before, she's positively feral now—engaged as she is in this perverse dance, the sheer force of each movement shakes the lithotomy table upon which you lie.
]
(if: $fill > 3)[
With every fresh (if: $gender is "male")[p]lunge, your impossibly-bloated belly ripples from the doctor's fervor.
]
(if: $fill > 4)[
The agony is unreal, as is the unbridled bliss imbued in every fiber of your being.
](else:)[
Sex has //never// felt this good.
]
<br><br>
(color: $dcolor)[You're close, aren't you?]
<br><br>
Dr. (print: $doctor)'s breathing is labored; understandable, given her rapid pace.
<br><br>
(color: $dcolor)[Come on, (print: $name)!
(if: $language>2)[
(if: $gender is "male")[
Fill me up! Oh, //please// give it to me!
](else:)[
You filthy little slut! Cum all over my floor!
]
](else-if: $language>1)[
Cum for me(if: $points >= $points_hi)[, darling]!
](else:)[
Let's finish this!
]
]
<br><br>
(link: "You can't hold back any more. This is it.")[
(display: "conclusion")
]
}{
You take it in the common gesture of salutation before parting ways, returning home via the same route which bore you to the clinic in the first place. Even before your front door swings open, you feel arousal awakened within you once more. Sure enough, the doctor's treatment seems to have worked:
(if: $gender is "female")[
your clitoris is still plenty sensitive, and orgasm quickly ensues.
](else:)[
you rub one out easily enough.
]
<br><br>
A month later, while unwinding at a local bar, you hit things off with the nurse seated beside you. By date number three, it's back to your place to indulge in opportune intimacy. The sex is adequate; nothing mind-blowing, but how //could// it be after your experience with Dr. (print: $doctor)? As you lay there, your quiet reverie swaddled by the blanket of midnight, somewhere at the back of your mind, an unwelcome thought wriggles about like a venomous snake: despite your newfound libido, perhaps you should pay the good doctor another visit...
<br><br>
You roll over and sling one arm around your new lover's waist, putting the idea out of your head. It's likely for the best that things turned out the way they did. Probably.
<br><br>
(link: "Sleep.")[
(set: $ending to "Normal end.")
(goto: "fin")
]
}{
(color: $pcolor)[Something the matter, doctor? You're awfully reticent all of a sudden.]
<br><br>
Dr. (print: $doctor) meets your gaze, her cheeks coloring faintly.
<br><br>
(color: $dcolor)[Well, it's just that I... That is... My, I feel quite... Quite unexpectedly //frazzled// at the moment. Perhaps we could... You and I, I mean... Our time together has been a touch more //exhilarating// than usual...]
<br><br>
Her brow knits and she puts one palm to her forehead.
<br><br>
(color: $dcolor)[Oh dear, I'm not making much sense, am I?]
<br><br>
|select3>[
(link: "Ask if she'd be interested in meeting again.")[
(replace:?select3)[]
(show:?desc1)
(show:?select4)
]<br>
]
|desc1)[
(color: $pcolor)[Maybe we could see each other again? When you're off work, that is.]
<br><br>
(color: $dcolor)[//Heh//, are you asking me on a //romantic// endeavor, (if: $gender is "male")[sir](else:)[madam]?]
<br><br>
]
|select4)[
(link: "Affirm romantic intent.")[
(replace:?select4)[
(color: $pcolor)[That is precisely what I am asking.]
]
(set: $ending to "True end.")
(show:?date)
]<br>
(link: "Ask about a purely sexual relationship.")[
(replace:?select4)[
(color: $pcolor)[Perhaps the encounter could be driven more by prurience than romance. How does that strike you?]
]
(set: $ending to "Lustful end.")
(show:?fuckbuddy)
(show:?final)
]
]
|date)[
<br><br>
You can practically hear the beating of the doctor's heart from where you sit.
(if: ($age is "a young") or ($age is "an adult"))[
<br><br>
(color: $dcolor)[
Are you certain, young (if: $gender is "male")[man](else:)[lady]? I'm (if: $age is "a young")[//quite// ]a bit older than you.
]
<br><br>
]
Standing, your eyes never leaving the doctor's, an honest smile tugs at your lips.
<br><br>
(color: $pcolor)[I'll pick you up Friday, if it pleases you. Say, eight O'clock? There's this marvelous bistro I know.]
(if: ($age is "a young") or ($age is "an adult"))[
<br><br>
The hammering—real or imagined—of the heart inside her breast seems to intensify.
]
<br><br>
(color: $dcolor)[I'd like that. Let me give you my address.]
<br><br>
Dr. (print: $doctor) takes up a ballpoint pen and a scrap of paper from one corner of her desk. Hastily scribbling onto the fragment, she offers it to you. Written in her neat hand is a street address not ten miles from the clinic. Pocketing it, you make for the door.
<br><br>
(color: $dcolor)[Erm...]
<br><br>
Stopping at the threshold, you turn to eye the woman still seated behind her desk.
<br><br>
(color: $ambient)[//Ahem//] (color: $dcolor)[Although I'm certain the locale you've selected will feature many sumptuous comestibles, I forewarn you I shall require... //Dessert// afterward. Doctor's orders.]
<br><br>
|select5>[
(link: "Agree.")[
(replace:?select5)[
(color: $pcolor)[Yes, I believe I would like that, as well.]
]
(show:?final)
]<br>
(link: "Wink.")[
(replace:?select5)[
One corner of your mouth curves into (what you hope to be) a roguish smile and you give her a quick, charming wink in confirmation.
]
(show:?final)
]
]
]
|fuckbuddy)[
<br><br>
Dr. (print: $doctor) flashes a mischievous grin.
<br><br>
(color: $dcolor)[What you mean to say is: you want a
(if: $language>1)[
fuck-buddy.
](else:)[
friend with benefits.
]
]
<br><br>
(color: $pcolor)[I mean to say.]
<br><br>
She mulls it over a minute, then takes up a ballpoint pen and a scrap of paper from one corner of her desk. Hastily scribbling onto the fragment, the doctor offers it to you. Written in her neat hand is a street address not ten miles from the clinic.
<br><br>
(color: $dcolor)[Be there at eight tonight; bring wine and
(if: $gender is "male")[
something for yourself.
](else:)[
wear something sexy for me.
]
Doctor's orders. Oh, and don't anticipate quitting my company before midnight—if you want what I have to offer, you'll do as I say, hm? Now...
]
<br><br>
The doctor leans back, hikes up her skirt in plain view, and begins fondling herself without any hint of shame.
<br><br>
(color: $dcolor)[Leave me be. I have to fantasize about what I'm going to do to you tonight.]
]
|final)[
<br><br>
(link: "Leave.")[
(goto: "fin")
]
]
}{
(if: $fill is 3)[
(color: $pcolor)[I-I think I'm calling it here, doctor. That's about my limit.]
<br><br>
(color: $dcolor)[Perfectly understandable! After all, that's nearly //double// what would normally constitute acute urinary discomfort for most adults.]
](else-if: $fill is 4)[
(color: $pcolor)[That's... Oof, that's it for me, doc. So //full//...]
<br><br>
(color: $dcolor)[Yes, I'd say so! You're packing //triple// what would normally constitute acute urinary discomfort for most adults, you know!]
<br><br>
(color: $pcolor)[O-Oh, only triple? Gee, I h-hadn't noticed...]
](else:)[
(color: $pcolor)[Ooh... C-Can't... //Mmph//...]
<br><br>
Dr. (print: $doctor) gingerly caresses the protuberance jutting skyward from whence your stomach only recently plateaued.
<br><br>
(color: $dcolor)[//My//... Truly impressive! //Four liters// and you're still conscious? Tell me, how are you feeling?]
<br><br>
(color: $pcolor)[Sho... //Fu~ull//...]
<br><br>
(color: $dcolor)[Oh, gracious... Perhaps I overdid it a tad. Why don't we move along with things, eh?]
]
<br><br>
(display: "end (sex)")
}{
(align: "=><=")[
(text-style: "outline")[(css: "font-size: 150%;")[(uppercase: $title)]]<br>
(color: $ambient)[(css: "font-size: 75%;")[//a tale of medical debauchery//]]
<br><br><br>
(text-style: "fade-in-out")[
(link: "New Game")[
(if: $newGamePlus is true)[
(goto: "intro")
](else:)[
(goto: "discretion")
]
]
]<br>
(link: "How to Play")[
(goto: "how2play")
]<br>
(link:"Customize Text Options")[
(goto: "color select")
]<br>
(if: $newGamePlus is true)[
(link:"Bonus")[
(goto: "bonus room")
]
]
]
}{
|colorChoice>[
As you play, you will be prompted with choices that result in your character's vocal response. Currently, dialogue responses will be shown in (color: $pcolor)[
(if: $pcolor is not (rgb: 0, 240, 0))[
(print: $pcolor)
](else:)[
green
]
].
<br><br>
Change the dialogue color?
<br><br>
<!-- (link: "Blue")[
(set: $pcolor to "blue")
(replace:?colorChoice)[(display: "intro text")]
]<br> -->
(if: $pcolor is not "cyan")[
(link: "Cyan")[
(set: $pcolor to "cyan")
(goto: "color select 2")
]<br>
]
(if: $pcolor is not "green")[
(link: "Green")[
(set: $pcolor to (rgb: 0, 240, 0))
(goto: "color select 2")
]<br>
]
(if: $pcolor is not "orange")[
(link: "Orange")[
(set: $pcolor to "orange")
(goto: "color select 2")
]<br>
]
(if: $pcolor is not "purple")[
(link: "Purple")[
(set: $pcolor to "purple")
(goto: "color select 2")
]<br>
]
(if: $pcolor is not "red")[
(link: "Red")[
(set: $pcolor to "red")
(goto: "color select 2")
]<br>
]
(if: $pcolor is not "yellow")[
(link: "Yellow")[
(set: $pcolor to "yellow")
(goto: "color select 2")
]
]
<br>
(link:"BACK TO MAIN MENU")[
(goto: "main menu")
]
(enchant: "Blue", (text-colour: blue))
(enchant: "Cyan", (text-colour: cyan))
(enchant: "Green", (text-colour: green))
(enchant: "Orange", (text-colour: orange))
(enchant: "Purple", (text-colour: purple))
(enchant: "Red", (text-colour: red))
(enchant: "Yellow", (text-colour: yellow))
]
}{
//(print: $title)// is a text-adventure; you will make progress through a combination of reading and choosing from a list of options.
<br><br>
|cho1>[
(link: "Try clicking this choice to progress")[
(replace:?cho1)[]
(show:?d0)
]
]
|d0)[
Less common than the standard choice is the //cycling link//, which appears in the body of a sentence |cycler>[(cycling-link: bind $cycle,"like this one.","see how clicking changed this link?","click once more to reset this link.")]
<br><br>
|cho2>[
(link:"Click here after changing the cycling link above")[
(replace:?cycler)[(print:$cycle)]
(replace:?cho2)[
Notice how choices that progress the story lock your ability to cycle links in the paragraph above? Keep this in mind as you play.
<br><br>
]
(show:?cho3)
]
]
]
|cho3)[
(link:"Click here to continue")[
(replace:?cho3)[]
(show:?d1)
]
]
|d1)[
Sometimes, you will be presented with multiple choices—each of which cause your character to respond differently to the situation at-hand. This is the last thing you'll need to know before playing. The choices below will let you start a new game or customize the color of text displayed on-screen.
<br><br>
(link: "Start a new game")[
(if: $newGamePlus is true)[
(goto: "intro")
](else:)[
(goto: "discretion")
]
]<br>
(link:"Customize text options before playing")[
(goto: "color select")
]<br>
]
<br><br><br>
(link:"BACK TO MAIN MENU")[
(goto: "main menu")
]
}{
(color: $pcolor)[Your character's dialogue will now be shown in
(if: $pcolor is not (rgb: 0, 240, 0))[
//(print: $pcolor)//,
](else:)[
//green//,
] like this!]
<br><br>
Choose a different dialogue color?
<br><br>
(link: "Choose a different color")[
(goto: "color select")
]<br>
(link: "Keep the current color")[
(goto: "main menu")
]
}{
(set: $m_anal_passage_visited to true)
(color: $pcolor)[What if we //ass//-ess this posterior, eh?]
<br><br>
Dr. (print: $doctor) stares at you, and it's not immediately clear whether she's stifling a laugh or trying to keep from losing her lunch. A few moments later, one corner of her mouth curls into a grin.
<br><br>
(if: $points >= $points_min)[
(color: $dcolor)[So, you want an //anal//-ysis, eh, (print: $name)?]
](else:)[
(color: $dcolor)[Don't quit your day-job, (print: $name).]
]
<br><br>
Over the course of several minutes, the doctor carries out a number of ablutions to prepare you for the assessment. When finished, she kneels at the foot of the lithotomy table, just out of view. The distinct squelch of oil on skin can be heard.
<br><br>
(color: $dcolor)[This is one of my favorite orifices. So delicate, and yet so...]
<br><br>
Without warning, a mysterious, supple device parts your anus. It is Dr. (print: $doctor)'s finger; well-lubricated as it seems to be, she glides into you up to the knuckle without resistance.
<br><br>
(color: $dcolor)[...//Eager//.]
<br><br>
|select1>[
(link: "Ask her for more.")[
(set: $points to it + 1)
(replace:?select1)[
(color: $pcolor)[Doctor, I hope you're prepared to do more than merely tease a poor fellow.]
]
(show:?analingus)
]<br>
(link: "Tell her to get on with it.")[
(replace:?select1)[
(color: $pcolor)[Doc, you're killing me here! Quit with the //fiddling// and get to the //diddling!//]
<br><br>
(color: $dcolor)[What's the hurry? I was only... Oh, fine. We'll move along.]
<br><br>
She stands there a moment, something like longing in her eyes.
(show:?futaOrStrapon)
]
]
]
|analingus)[
<br><br>
(color: $dcolor)[Terribly sorry, (print: $name). Where //are// my manners?]
<br><br>
Suddenly, the finger retreats from you, instantly replaced by something warm and moist. It only takes the work of a moment to identify the doctor's tongue through sensation alone. It probes deep, deeper... The depths this woman begins to plumb are unfathomable. With an idle hand, she begins stroking your (if: $language>1)[cock](else:)[shaft]; with the other, she expertly fondles your (if: $language>1)[balls](else:)[testes]. Despite the issue which brought you to the clinic in the first place, you are //very// erect. At length, a loud sucking noise heralds Dr. (print: $doctor)'s withdrawal from your bowels.
<br><br>
(color: $dcolor)[That was a lovely bit of fun, but I think we'd better move along.]
<br><br>
She stands, beaming down at you.
(show:?futaOrStrapon)
]
|futaOrStrapon)[
(if: ($clothing is "none") and ($futa is true))[
Her nude figure truly //is// something to behold.
(show:?futapenisNew)
](else:)[
(if: $clothing is "none")[
Her nude figure truly //is// something to behold.
](else-if: $clothing is "sexy")[
Her micro-skirt rides up and her (if: $language>2)[slit](else-if: $language>1)[pussy](else:)[vulva] becomes momentarily visible.
](else-if: $clothing is "half")[
Her breasts sway idly, pleasantly.
]
(show:?straponNew)
]
]
|futapenis)[
(color: $dcolor)[Might I assume that I may once again employ my own //personal// instrument for this assessment?]
<br><br>
|fpselect1>[
(link: "Reaffirm.")[
(replace:?fpselect1)[
(color: $pcolor)[Yes, that would be lovely.]
<br><br>
]
(show:?futaStart)
]<br>
(link: "Impatiently reaffirm.")[
(replace:?fpselect1)[
(color: $pcolor)[Yes, yes! Get on with it, doc!]
<br><br>
(color: $dcolor)[Oh ho! Eager indeed; well, I'd hate to disappoint...]
<br><br>
]
(show:?futaStart)
]
]
]
|futapenisNew)[
<br><br>
(color: $dcolor)[I assume you won't balk if I perform your assessment with my own //personal// instrument?]
<br><br>
|fpselect2>[
(link: "Tell her you don't mind.")[
(replace:?fpselect2)[
(color: $pcolor)[Go right ahead; I don't mind one bit.]
<br><br>
(color: $dcolor)[Excellent! Fret not, I'll be gentle... At first.]
<br><br>
]
(show:?futaStart)
(show:?anal0)
]<br>
(link: "Declare that you will accept no substitute.")[
(set: $points to it + 2)
(replace:?fpselect2)[
(color: $pcolor)[I would be offended if you employed anything lesser.]
<br><br>
(color: $dcolor)[Oh, you //are// a smooth on, aren't you?]
<br><br>
]
(show:?futaStart)
(show:?anal0)
]
]
]
|strapon)[
(color: $dcolor)[Same instrument as the first penetration, (print: $name)?]
<br><br>
|select1>[
(link: "Agree: use the (print: $strapon) one.")[
(replace:?select1)[
(color: $pcolor)[Yes, the (print: $strapon) suits me well.]
<br><br>
(color: $dcolor)[Indubitably!]
(show:?apparatus)
(show:?anal0)
]
]<br>
(link: "Choose a different instrument.")[
(replace:?select1)[
(color: $pcolor)[Actually, I should like to choose again.]
<br><br>
(color: $dcolor)[Very well. ]
(display: "choose strapon")
]
]
]
]
|straponNew)[
Dr. (print: $doctor)'s hand ranges over the paraphernalia arranged beside the table.
<br><br>
(display: "choose strapon")
]
|apparatus)[
<br><br>
The doctor girds on the chosen instrument before inundating both it and your exposed posterior with a deluge of of sweet-scented lubricant.
]
|futaStart)[
The doctor moans sensuously, slathering both her erection and your exposed posterior with a deluge of of sweet-scented lubricant.
]
|anal0)[
<br><br>
(color: $dcolor)[We'll start slow, eh?]
<br><br>
|sel2>[
(link: "Agree.")[
(replace:?sel2)[
(color: $pcolor)[Sounds delightful, doctor.]
]
(show:?anal1)
]
(if: $strapon is not "modest")[<br>
(link: "Tell her to do her worst.")[
(set: $points to it + 1)
(set: $depth to 3)
(replace:?sel2)[
(color: $pcolor)[Actually, doctor, I was thinking you could give it to me rough and fast. I can take it... Really.]
<br><br>
It is evident from the doctor's expression that she was not expecting your response.
<br><br>
(color: $dcolor)[I, erm... Are you certain? There's great potential for—]
<br><br>
Dr. (print: $doctor) shuts her mouth forcibly before a look of giddiness overwhelms her countenance.
<br><br>
(color: $dcolor)[Oh, but what am I saying! What sort of medical professional would I be to ignore the pleas of those in my care?]
]
(show:?analRam)
(show:?finish)
]
]
]
]
|anal1)[
<br><br>
Dr. (print: $doctor) aligns the tip of her (if: $clothing is not "none")[artificial ]phallus with your defenseless anus. Cooing under her breath, she takes your upraised thighs in her hands and begins to push.
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
<br><br>
(color: $pcolor)[//Ahn!//]
<br><br>
She glides a short ways into you; the sensation is heavenly.
](else:)[
<br><br>
(color: $pcolor)[//Aah!//]
<br><br>
You feel (if:$language>2)[your asshole](else:)[the space between your buttocks] opening wide, stretching to the limit to welcome its new guest.
]
<br><br>
(color: $dcolor)[There we are; about four inches in. I'm stimulating the entirety of your rectum. Feels //wonder//-ful, doesn't it?]
<br><br>
|sel3>[
(link: "Agree.")[
(set: $depth to 1)
(replace:?sel3)[
(color: $pcolor)[Yes, doctor; that's quite nice!]
]
(show:?analRectumOnly)
(show:?finish)
]<br>
(link: "Ask her to push deeper.")[
(set: $points to it + 1)
(set: $depth to 2)
(replace:?sel3)[
(color: $pcolor)[It does, but... Couldn't you probe a bit //deeper//, Dr. (print: $doctor)?]
]
(show:?analPushDeeper)
(show:?finish)
]
]
]
|analRectumOnly)[
<br><br>
(color: $dcolor)[
(if: ($clothing is "none") and ($futa is true))[
Mm, and I assure you: you feel just as incredible wrapped around (if:$language>1)[my cock](else:)[me].
](else:)[
Mm, this is one of my //favorite// exercises.
]
Why don't we try moving just a tad?
]
]
|analPushDeeper)[
<br><br>
The doctor sucks air through her teeth before emitting a sigh of delight.
<br><br>
(color: $dcolor)[You really //are// one of the most entertaining patients I've ever tended to, my dear.]
<br><br>
She begins; gingerly, ever so slowly, the doctor advances into your colon.
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
Only an inch or two thereafter, her inguinal muscles come to rest against your naked bottom.
](else:)[
Pressure begins to build as she travels up the narrow canal of your intestinal tract.
(if: ($strapon is "massive") or ($dcock is "positively elephantine"))[
Even at the height of your descending colon, her progression does not cease.
](else:)[
At the height of your descending colon, her progression finally comes to a halt.
]
The satisfaction garnered from the burial of Dr. (print: $doctor)'s implement deep within you outweighs the intensity of discomfort welling inside your belly—if only just.
]
]
|analRam)[
<br><br>
Dr. (print: $doctor) aligns the tip of her (if: $clothing is not "none")[artificial ]phallus with your defenseless anus. Cooing under her breath, she takes your upraised thighs in her hands and, in a single swift motion, thrusts into you up to the hilt.
<br><br>
(color: $pcolor)[
(if: $language>2)[
//Holy fuck!//
](else:)[
//Aah!//
]
]
<br><br>
Glancing down, a worrisome protuberance has formed just
(if: ($strapon is "massive") or ($dcock is "positively elephantine"))[
above
](else:)[
below
]
your navel. Accompanying it, a sensation of nausea and immense pressure intermingled with unbridled pleasure.
<br><br>
(color: $dcolor)[Would you look at //that!// You took it all at once, (print: $name); your (if:$language>1)[ass](else:)[body] must be //inordinately// avaricious to induct me so readily!]
]
|finish)[
<br><br>
The doctor impels her hips into motion—starting slow, but quickly building rhythm.
(if: $depth is 1)[
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
Her shape feels almost tailor-made for your posterior; she glides in and out of you effortlessly. Your member begins to pulsate in time with the doctor's thrusts as sheer euphoria ripples through you.
](else:)[
Although well-lubricated, the (if: ($clothing is "none") and ($futa is true))[(if:$language>1)[cock](else:)[penis]](else:)[apparatus] seems to pull vigorously at your rectum, threatening a prolapse with every reversal.
]
](else:)[
(if: ($strapon is "modest") or ($dcock is "moderately-sized"))[
She's slipping in and out of your sigmoid colon, penetrating and then relieving it—driving you wild with the ebb and flow of her movements.
](else:)[
The entire column of your colon seems to shift in time with her thrusts. Although alarming at first, you rapidly detect the sheer ecstasy radiating out from your belly as the doctor repeatedly impales you.
]
]
<br><br>
(if: ($clothing is "none") and ($futa is true))[
(color: $dcolor)[Oh, //(print: $name)!// I'm... //Ah!// I'm going to
(if:$language>2)[fill your guts to the brim!](else-if:$language>1)[cum!](else:)[finish inside you!] //Mmph!//]
<br><br>
Dr. (print: $doctor) thrusts into you one final time,
(if: $depth > 2)[
pushing so deep that your stomach rumbles in protest,
](else:)[
stopping just as her frontal glans enters your sigmoid colon,
]
and begins pumping you full(if:$language>2)[ of her hot, sticky cum](else-if:$language>1)[ of her boiling cum]. Your insides begin to swell with unimagineable pressure; it is definitely a thrilling—albeit disquieting—sensation. However, even before the doctor has completed her load, it becomes evident that she'll be the only one experiencing climax.
](else:)[
(color: $dcolor)[That's it, //(print: $name)!// You like that, don't you? Go on; prove how much you love this;
(if:$language>2)[squirt for me!](else-if:$language>1)[cum for me!](else:)[let's put an end to this condition of yours!]]
<br><br>
Dr. (print: $doctor) is thrusting and thrusting, and it //does// feel incredible... At length, sensing something amiss, the doctor permits her vigor to wane.
]
<br><br>
(color: $dcolor)[It's no good, eh?]
<br><br>
|sel4>[
(if: $futaOrgasm is true)[
(link: "Ask about her orgasm.")[
(replace:?sel4)[
(if: $orgasmQuestion is false)[
(color: $pcolor)[Did... Didn't you //just// climax, doctor?]
](else:)[
(color: $pcolor)[
(if: $language>1)[Damn](else:)[Wow]... I wish
(if: $language>1)[
I could cum with that kind of frequency!
](else:)[
my output were similar to yours, doctor!
]
]
]
]
(if: $orgasmQuestion is false)[
(show:?climaxExtra)
](else:)[
(show:?climax2)
]
(set: $orgasmQuestion to true)
(show:?nextAssessment)
]<br>
]
(link: "Express satisfaction.")[
(replace:?sel4)[
(color: $pcolor)[Well, it //was// a delightful experience...]
<br><br>
(color: $dcolor)[But no fortune in the department of orgasm, I see. Pity. ]
]
(show:?nextAssessment)
]<br>
(link: "Smile wanly.")[
(replace:?sel4)[
Though the doctor's disappointment is evident, yours is, perhaps, more salient. You fashion your lips into a weak smile, which the woman standing over you returns in kind.
<br><br>
]
(show:?nextAssessment)
]
]
]
|climaxExtra)[
<br><br>
(color: $dcolor)[Hm? What //are// you on about?]
<br><br>
(if: $futaOrgasm is true)[
(color: $pcolor)[Before—in your office—when we were... //Intimate// together.]
](else:)[
(color: $pcolor)[Just now... You
(if: $language>2)[
blew your load
](else-if: $language>1)[
came
](else:)[
finished
]
in my
(if: $language>1)[
ass.
](else:)[
posterior.
]
]
]
<br><br>
(if: $docInspected is true)[
(color: $dcolor)[Heavens, didn't I mention my output earlier? I thought, by now, you would not find this quality surprising.]
<br><br>
The doctor winks slyly as her lips curl into a mischievous grin.
<br><br>
](else:)[
(color: $dcolor)[Although I cannot claim to have ever fully measured my output, I should think myself capable of producing a liter of the stuff. Maybe even two—assuming I were to commit myself to no enterprise other than masturbation.]
<br><br>
You can't help but gawk in response. The doctor blushes, giggles coquettishly, and bats her eyelashes.
<br><br>
]
]
|climax2)[
<br><br>
Dr. (print: $doctor) permits herself to chortle—a pleasant, airy sound—as she runs one finger from your sternum to your navel. Her eyes are still fixed on the point connecting the two of you which, although you cannot see it, you begin to suspect may be leaking ejaculate onto the linoleum.
<br><br>
(color: $dcolor)[Well, that //is// the challenge we've engaged ourselves to resolve, eh? To that end... ]
]
|nextAssessment)[
(color: $dcolor)[Hm, what's left on our checklist?]
(set: $anal to false)
(display: "assess complete")
]
}{
(print: $title) contains material suitable only for adults of at least (color:$pcolor)[eighteen years of age]. If you are not yet of age, kindly look elsewhere for entertainment.
<br><br>
(link: "I am at least 18 years old")[
(show:?warning)
(show:?continue)
]
|warning)[
Although you may choose to avoid much of the content herein which may displease you, it is advised that you review the following. Some of these topics cannot be avoided; if any of the fetishes below disturb you, you are advised to exit this session immediately.
<br><br>
(color:$pcolor)[You have been warned.]
<br><br>
* Anal intercourse & pegging
* Bladder inflation
* Coarse language
* Consensual bondage
* Hermaphroditism (futanari)
* Lesbianism
* Oral stimulation of genitals
* Textual nudity & risqué attire
* Vaginal intercourse
]
|continue)[
<br><br>
(link: "Acknowledge and continue")[
(goto: "intro")
]<br>
(link:"BACK TO MAIN MENU")[
(goto: "main menu")
]
]
}{
Congratulations! You've completed //(print: $title)//! There are four endings in total, ranked in ascending order according to those which show the least amount of content to the most:
<br>
* (if: $ending is "Impotent end.")[(color: $pcolor)[Impotent end]](else:)[Impotent end]
* (if: $ending is "Normal end.")[(color: $pcolor)[Normal end]](else:)[Normal end]
* (if: $ending is "Lustful end.")[(color: $pcolor)[Lustful end]](else:)[Lustful end]
* (if: $ending is "True end.")[(color: $pcolor)[True end]](else:)[True end]
<br>
(if: $ending is "True end.")[
You earned the True End which, as far as this designer is concerned, is the ultimate denouement of this title.
<br><br>
If you haven't achieved the other endings yet, you are welcome to play again to see what content they offer, though the //Lustful end// is only a minor variation of what you have already seen and the other two endings contain less content overall.
<br><br>
Thank you for playing!
](else-if: $ending is "Lustful end.")[
You earned the Lustful End, which offers only a minor variation on the last scene when compared to the True End. All-in-all, you've seen most all there is to see.
<br><br>
If you haven't achieved the other endings yet, you are welcome to play again to see what content they offer, though the //Normal// and //Impotent// endings contain less content overall.
<br><br>
Thank you for playing!
](else-if: $ending is "Impotent end.")[
You earned the Impotent End which, in this designer's humble opinion, is inferior to all others. Not to denigrate your choices (especially if you were purposely aiming for this denouement), but this ending certainly contains the least amount of content.
<br><br>
If you haven't achieved the other endings yet, you are highly encouraged to play again to see what content they offer.
<br><br>
The choices you make as you play affect what ending you receive. The more of the doctor's desires that you cater to, the greater your chance of receiving one of the more content-rich endings.
<br><br>
Adult language, intense sexual episodes, and offering submission to the doctor all contribute to the ending you are shown. You don't need to make //every// lewd selection to get the True End, but you do need a lot of them!
](else:)[
You earned the Normal End. This is likely to be the denouement you receive on your first playthrough, as choices made throughout the story affect what ending you receive. The more of the doctor's desires that you cater to, the greater your chance of receiving one of the more content-rich endings.
<br><br>
Feel free to play again to see what content the other endings have to offer! Adult language, intense sexual episodes, and offering submission to the doctor all contribute to the ending you are shown. You don't need to make //every// lewd selection to get the True End, but you do need a lot of them!
<br><br>
Thank you for playing!
]
<br><br>
(link: "Play Again?")[
(goto: "intro")
]<br>
(link:"BACK TO MAIN MENU")[
(goto: "main menu")
]
}[X] Clean up whitespace
[X] Need "FutaStart" section on anal and vaginal passages
[X] Potentially remove reliance on "history:" in all passages
[X] Unique dialogue/disallow choosing same strapon twice
[X] Normal end playthrough
[X] Impotent end playthrough
[X] True end playthrough (female)
[X] Lustful end playthrough (male)
[X] No nickname playthrough
[X] Repeat playthrough ("play again?" as soon as prompted)
[X] Full futa playthrough
[X] Futa playthrough (costume #3 NOT selected){
(if: $show_side is true)[
(replace: ?Sidebar)[
(text-style: "underline")[
(color: $ambient)[
(css: "font-size: 80%;")[
(link:"RESET STORY")[
(set: $current_passage to (passage:)'s name)
(goto: "reset")
]
]
]
]
]
(enchant: "RESET STORY", (text-colour: $ambient))
](else:)[
(replace: ?Sidebar)[]
]
}{
(set: $show_side to false)
Would you like to reset the game-state to default? Doing so will take you back to the main menu and revert all variables. //All game progress will be (color: $pcolor)[lost]!//
<br><br>
|choice>[
(link: "No, I'd like to keep playing")[
(set: $show_side to true)
(goto: $current_passage)
]<br>
(link: "Yes, reset everything")[
(show:?choice2)
(replace:?choice)[]
]
]
|choice2)[
Are you sure?
<br><br>
(link: "No, I'd like to keep playing")[
(set: $show_side to true)
(goto: $current_passage)
]<br>
(link: "Yes, please revert the game-state")[
(goto: "instantiate")
]
]
}