CommonEvent 4044
Name = "プロメスティン小4"

  999([4044])
  ConditionalBranch([0, 25, 1])
    FadeoutScreen([])
    ErasePicture([5])
    ErasePicture([6])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText([".........................."])
    FadeoutBGM([2])
    Wait([120])
    PlayBGM(["RPG::BGM(@name=\"castle6\", @volume=100, @pitch=100)"])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ShowPicture([5, "80_stein_st31", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Um, could you cooperate with the semen collection?"])
  ShowText(["I need a little more..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Y-yeah... I guess that's fine..."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Then, please come this way..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Thus, I was invited into a private room――"])
  FadeoutScreen([])
  ShowPicture([1, "bg195", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowPicture([5, "ev_stein_hse1", 0, 0, 0, 0, 100, 100, 255, 0])
  FadeinScreen([])
  PlayBGM(["RPG::BGM(@name=\"ero1\", @volume=100, @pitch=100)"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Well then, let's get this over with quickly."])
  ShowText(["This time, I'll use a milking organism to extract semen."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["As soon as I entered the room, my pants and underwear were taken off――"])
  ShowText(["And my exposed penis was enveloped by an unknown soft-bodied creature."])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean21_tentacle2\", @volume=80, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The milking orifice twisted and squirmed, squeezing my penis."])
  ShowText(["The creature's writhing directly stimulated my member, and I writhed in response."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Aah……"])
  ShowText(["W-What is this creature……?"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["It is a lowly milking organism that feeds on mammalian semen."])
  ShowText(["I've trained it to feed on human semen."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With its eerie writhing, the insides of the organism squirmed."])
  ShowText(["The sensation was like the digestive organs peristalsing, stimulating my penis."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["This is a disgusting creature that feeds on semen."])
  ShowText(["It intends to make me ejaculate and devour my essence――"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Could you please just let me ejaculate quickly?"])
  ShowText(["I want to collect the semen swiftly and get to the experiment…"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestine looked up at me with a troublesome expression."])
  ShowText(["The milking organism attached to my penis repeated its eerie writhing."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The inner walls dripping with mucus squeezed my penis tightly――"])
  ShowText(["Enveloping the glans in mucous, it licked and teased――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Continuing to provide pleasurable stimulation to the penis wrapped in the milking orifice."])
  ShowText(["To extract semen from the male organ and use it as food――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Aah, aaah…… it feels good……"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Stop making such pathetic sounds and just let me ejaculate quickly, will you?"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestine looked at me with cold eyes, observing my writhing in pleasure."])
  ShowText(["The writhing of the inner walls grew faster and faster, and I couldn't help but thrust my hips."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah…… Hahhh……!"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Even as a human, to be brought to climax by such a lowly milking organism……"])
  ShowText(["...My apologies, that was inappropriate. Please come quickly."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Emotionlessly stating this, Promesthin continues to observe me."])
  ShowText(["As I am gazed at with those cold eyes, I am being pushed further and further into a corner――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah, I'm going to come...!"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["……………………"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_stein_hse2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I unexpectedly ejaculated inside the extraction hole."])
  ShowText(["She is watching this scene with an expressionless face――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["……………………"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["As expected, one time's worth isn't that much."])
  ShowText(["If I don't get 50cc out, I can't conduct the experiment..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promesthin won't detach the extraction organism from my groin."])
  ShowText(["Inside the extraction hole, my penis is still being stimulated, squishing around――"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["I'm going to have to ejaculate a few more times."])
  ShowText(["Seriously, to make me go through this trouble..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["N-no..."])
  ShowText(["Aaaahhh..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The inner walls of the extraction hole writhe alluringly, continuing to stimulate my penis."])
  ShowText(["Squished and rubbed, the folds are licking the glans――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["N-no... Aaaahhh..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The lowly extraction organism undulates the inner walls, providing various stimuli."])
  ShowText(["That is an action solely for extracting semen from the male organ."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Receiving such stimulation, my penis is responding to the maximum."])
  ShowText(["Inside this dreadful extraction hole, I am being cornered more and more――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah, I'm going to come again...!"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Yes, please let it out just like that."])
  ShowText(["It will suck it all up, so it's fine to scatter it around..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah, aaaaahhh...!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_stein_hse3", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Inside the extraction hole, I am driven to a second ejaculation."])
  ShowText(["Semen overflows out, gushing from a protruding organ."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["It's still a little short on quantity."])
  ShowText(["Let's have you ejaculate one more time..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["N-no... I can't do it..."])
  ShowText(["Aaaahhh...!"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["She will force it out of you, no matter what."])
  ShowText(["You should still have one more left..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestine continues to extract using the creature without changing her expression."])
  ShowText(["It was almost equivalent to abuse towards the penis."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["I can't produce anymore... I just can't..."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["……………………"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["She doesn't even respond to my plea to stop."])
  ShowText(["And inside the extraction hole, the penis is being stimulated squelchily—"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["N-no... ahhh..."])
  FadeoutBGS([1])
  CallCommonEvent([104])
  ShowPicture([5, "ev_stein_hse4", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With a thrusting impulse, I reached my third climax."])
  ShowText(["I trembled and shook my waist, letting the semen drip down—"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah... aa..."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["...Together, we have collected the necessary amount for three times."])
  ShowText(["Shall we call it a day here?"])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["So, that will be all for now."])
  ShowText(["Thank you for your hard work."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["……………………"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Forced to climax continuously by the lowly extraction creature, my semen was drained—"])
  ShowText(["I was completely exhausted, both physically and mentally."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["I will continue to collect semen as needed from now on."])
  ShowText(["Please come here again."])
  ShowTextAttributes(["stein_fc2", 1, 0, 2])
  ShowText(["<Promestine>"])
  ShowText(["Now then, let's dissect this creature..."])
  ShowText(["And collect the extracted semen once more..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["……………………"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It seems this creature is going to be dissected after all."])
  ShowText(["I could only tremble in a state of complete relaxation—"])
  FadeoutScreen([])
  ErasePicture([5])
  ErasePicture([6])
  FadeoutBGS([2])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText([".........................."])
  CallCommonEvent([4000])
  Empty([])
